]> git.sur5r.net Git - cc65/blobdiff - libsrc/common/_fdesc.s
On Apple GEOS all "low jumptable" entries went into 'diskdrv.inc'. So this needs...
[cc65] / libsrc / common / _fdesc.s
index a2cf747ce6520ec87864b6ef3ced50401d1df99a..682bcb78eaa924f2d85e2b446a2b39f65c15dc06 100644 (file)
@@ -8,18 +8,19 @@
                .export         __fdesc
        .import         return0
 
+        .include        "stdio.inc"
         .include        "_file.inc"
 
 .proc   __fdesc
 
                ldy     #0
         lda     #_FOPEN
-Loop:          and     __filetab + _FILE_f_flags,y     ; load flags
+Loop:          and     __filetab + _FILE::f_flags,y    ; load flags
                beq     Found                           ; jump if closed
-.repeat ::_FILE_size
+.repeat .sizeof(_FILE)
        iny
 .endrepeat
-               cpy     #(FOPEN_MAX * _FILE_size)       ; Done?
+               cpy     #(FOPEN_MAX * .sizeof(_FILE))   ; Done?
        bne     Loop
 
 ; File table is full