6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-06-20 05:29:39 +00:00
Code Issues Projects Releases Wiki Activity

Fixed errno handling

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@120 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz 2000-06-24 09:02:08 +00:00
parent 668c031c32
commit 48f1d0ad28
1 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
libsrc/common/atexit.s
View File

@ -9,6 +9,8 @@
.export _atexit, doatexit
.import __errno, jmpvec
.include "errno.inc"
.bss
ecount: .byte 0 ; Really an index, inc'ed by 2
efunc: .word 0,0,0,0,0 ; 5 exit functions
@ -39,17 +41,19 @@ _atexit:
; Error, no space left
E0: lda #$FF
sta __errno ; Use -1 until codes are defined ###
sta __errno+1
tax
E0: lda #ENOSPC ; No space left
sta __errno
ldx #$00
stx __errno+1
dex
txa
rts
; Function called from exit
doatexit:
ldy ecount ; get index
beq L9 ; jump if done
ldy ecount ; get index
beq L9 ; jump if done
dey
lda efunc,y
sta jmpvec+2