mirror of
https://github.com/cc65/cc65.git
synced 2024-12-25 17:29:50 +00:00
26 lines
580 B
ArmAsm
26 lines
580 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
|