all functions returning char in A now have X cleared

git-svn-id: svn://svn.cc65.org/cc65/trunk@1868 b7a2c559-68d2-44c3-8de9-860c34a00d81
2003-01-02 01:50:39 +00:00
parent 38dcb86552
commit e6e35390d1
56 changed files with 239 additions and 279 deletions
--- a/libsrc/geos/file/writerecord.s
+++ b/libsrc/geos/file/writerecord.s
@@ -1,13 +1,13 @@

 ;
-; Maciej 'YTM/Alliance' Witkowiak
+; Maciej 'YTM/Elysium' Witkowiak
 ;
-; 25.12.99
+; 25.12.1999, 2.1.2003

 ; char WriteRecord  (char *buffer, int length);

 	    .export _WriteRecord
-	    .import popax, __oserror
+	    .import popax, setoserror

 	    .include "../inc/jumptab.inc"
 	    .include "../inc/geossym.inc"
@@ -19,6 +19,4 @@ _WriteRecord:
 	sta r7L
 	stx r7H
 	jsr WriteRecord
-	stx __oserror
-	txa
-	rts
+	jmp setoserror