mirror of
https://github.com/cc65/cc65.git
synced 2025-01-11 11:30:13 +00:00
26 lines
582 B
ArmAsm
26 lines
582 B
ArmAsm
;
|
|
; 1999-10-26, Maciej 'YTM/Alliance' Witkowiak
|
|
; 2020-10-29, Greg King
|
|
;
|
|
|
|
; struct filehandle* GetNxtDirEntry (void);
|
|
|
|
.import ___oserror, return0
|
|
.export _GetNxtDirEntry
|
|
|
|
.include "diskdrv.inc"
|
|
.include "geossym.inc"
|
|
|
|
_GetNxtDirEntry:
|
|
jsr GetNxtDirEntry
|
|
stx ___oserror
|
|
txa
|
|
bne L1 ; jump if disk error
|
|
tya
|
|
bne L1 ; jump when no more entries
|
|
lda r5L
|
|
ldx r5H
|
|
rts
|
|
|
|
L1: jmp return0 ; return NULL if not valid entry
|