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/disk/freeblock.s
+++ b/libsrc/geos/disk/freeblock.s
@@ -1,12 +1,12 @@

 ;
-; Maciej 'YTM/Alliance' Witkowiak
+; Maciej 'YTM/Elysium' Witkowiak
 ;
-; 21.12.99
+; 21.12.1999, 2.1.2003

 ; char FreeBlock (struct tr_se *TS);

-	    .import gettrse, __oserror
+	    .import gettrse, setoserror
 	    .export _FreeBlock

 	    .include "../inc/jumptab.inc"
@@ -17,6 +17,4 @@ _FreeBlock:
 	sta r6L
 	stx r6H
 	jsr FreeBlock
-	stx __oserror
-	txa
-	rts
+	jmp setoserror