From 35388418fda7fada093cc0f3bf0583b078ad56af Mon Sep 17 00:00:00 2001
From: Emanuele Fornara <efornara@users.sourceforge.net>
Date: Wed, 2 Oct 2013 20:55:01 +0100
Subject: [PATCH] fixed timep handling in time()

---
 libsrc/common/time.s | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/libsrc/common/time.s b/libsrc/common/time.s
index 2157eb49f..140d47e2c 100644
--- a/libsrc/common/time.s
+++ b/libsrc/common/time.s
@@ -27,10 +27,10 @@
 ; Restore timep and check if it is NULL
 
         pla
-        sta     ptr1
+        sta     ptr1+1
         pla
-        sta     ptr1+1          ; Restore timep
-        ora     ptr1            ; timep == 0?
+        sta     ptr1            ; Restore timep
+        ora     ptr1+1          ; timep == 0?
         beq     @L1
 
 ; timep is not NULL, store the result there