]> git.sur5r.net Git - cc65/blob - libsrc/geos-common/file/getnxtdirentry.s
Apply "improved" cursor-off handling for native GEOS API too.
[cc65] / libsrc / geos-common / file / getnxtdirentry.s
1 ;
2 ; Maciej 'YTM/Alliance' Witkowiak
3 ;
4 ; 26.10.99
5
6 ; struct filehandle* GetNxtDirEntry (void);
7
8             .import __oserror
9             .export _GetNxtDirEntry
10
11             .include "diskdrv.inc"
12             .include "geossym.inc"
13
14 _GetNxtDirEntry:
15         jsr GetNxtDirEntry
16         stx __oserror
17         lda r5L
18         ldx r5H
19         rts