1
0
mirror of https://github.com/cc65/cc65.git synced 2024-10-31 04:04:49 +00:00
cc65/libsrc/apple2/fileerr.s

19 lines
278 B
ArmAsm
Raw Normal View History

;
; Oliver Schmidt, 15.01.2004
;
; Error handling for ProDOS 8 file I/O
;
.export errnoexit, oserrexit
.include "errno.inc"
errnoexit:
jsr __seterrno ; Returns with A = 0
oserrexit:
sta __oserror
lda #$FF
tax
rts