1
0
mirror of https://github.com/cc65/cc65.git synced 2024-08-14 14:29:07 +00:00
cc65/libsrc/sim6502/errno.s

31 lines
666 B
ArmAsm

;
; 2013-05-16, Oliver Schmidt
; 2015-07-18, Greg King
;
; Helper functions for several high-level functions.
;
.include "errno.inc"
; ----------------------------------------------------------------------------
; int __fastcall__ _directerrno (unsigned char code);
; /* Set errno to a specific error code; and, return -1. Used
; ** by the library.
; */
__directerrno:
jsr __seterrno ; Save in errno
fail: lda #$FF ; Return -1
tax
ok: rts
; ----------------------------------------------------------------------------
;
; extern int _errno;
;
.bss
__errno:
.word 0