From: Emanuele Fornara <efornara@users.sourceforge.net>
Date: Wed, 2 Oct 2013 19:55:01 +0000 (+0100)
Subject: fixed timep handling in time()
X-Git-Tag: V2.15~222^2
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=refs%2Fpull%2F48%2Fhead;p=cc65

fixed timep handling in time()
---

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