all functions returning char in A now have X cleared

[cc65] / libsrc / geos / mousesprite / getnextchar.s

diff --git a/libsrc/geos/mousesprite/getnextchar.s b/libsrc/geos/mousesprite/getnextchar.s
index 85cd9e04367372f4b9aabd0ee15f3a031ddc697b..fed9f8b08d75ac3c70f8876567c8f86ef82f3082 100644 (file)
--- a/libsrc/geos/mousesprite/getnextchar.s
+++ b/libsrc/geos/mousesprite/getnextchar.s
@@ -1,8 +1,8 @@
 
 ;
-; Maciej 'YTM/Alliance' Witkowiak
+; Maciej 'YTM/Elysium' Witkowiak
 ;
-; 21.12.99
+; 21.12.1999, 2.1.2003
 
 ; char GetNextChar (void);
 ;      note that if it returns 0 (FALSE) then no characters are available
@@ -11,4 +11,8 @@
 
            .include "../inc/jumptab.inc"
 
-_GetNextChar = GetNextChar
\ No newline at end of file
+_GetNextChar:
+           jsr GetNextChar
+           ldx #0
+           tay                 ; preserve Z flag
+           rts