Started to add text output functions

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

diff --git a/libsrc/geos/file/findftypes.s b/libsrc/geos/file/findftypes.s
index b15c3d4d11d93b6b5a7c287102463be64a36bc3f..6b5b260d417319cbb3e045b0bb9d17e47c28462b 100644 (file)
--- a/libsrc/geos/file/findftypes.s
+++ b/libsrc/geos/file/findftypes.s
@@ -7,10 +7,12 @@
 ; 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"
+
+.code
        
 _FindFTypes:
        sta r10L
@@ -24,11 +26,13 @@ _FindFTypes:
        sta r6L
        stx r6H
        jsr FindFTypes
-       stx errno
+       stx __oserror
 ; return (fileMax - r7H)
        lda tmpFileMax
        sec
        sbc r7H
        rts
 
-tmpFileMax:    .byte 0
+.bss
+
+tmpFileMax:    .res 1