errno/oserrno stuff is cleaned up, saved some bytes in dialog box functions

[cc65] / libsrc / geos / file / findftypes.s

diff --git a/libsrc/geos/file/findftypes.s b/libsrc/geos/file/findftypes.s
index 66e270c963dad2a28a539baab7163e0ac1c8dfac..8c020985dd91ab6b1bf457109d2de3c9448f5dba 100644 (file)
--- a/libsrc/geos/file/findftypes.s
+++ b/libsrc/geos/file/findftypes.s
@@ -1,13 +1,13 @@
 
 ;
-; Maciej 'YTM/Alliance' Witkowiak
+; Maciej 'YTM/Elysium' Witkowiak
 ;
-; 25.12.99
+; 25.12.99, 30.7.2000
 
 ; char FindFTypes  (char *buffer, char fileType, char fileMax, char *Class);
 
            .export _FindFTypes
-           .import popax, popa
+           .import popax, popa, __oserror
 
            .include "../inc/jumptab.inc"
            .include "../inc/geossym.inc"
@@ -17,12 +17,18 @@ _FindFTypes:
        stx r10H
        jsr popa
        sta r7H
+       sta tmpFileMax
        jsr popa
        sta r7L
        jsr popax
        sta r6L
        stx r6H
        jsr FindFTypes
-       stx errno
-       txa
+       stx __oserror
+; return (fileMax - r7H)
+       lda tmpFileMax
+       sec
+       sbc r7H
        rts
+
+tmpFileMax:    .byte 0