6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-06-26 20:29:34 +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 .export _atexit, doatexit
.import __errno, jmpvec .import __errno, jmpvec
.include "errno.inc"
.bss .bss
ecount: .byte 0 ; Really an index, inc'ed by 2 ecount: .byte 0 ; Really an index, inc'ed by 2
efunc: .word 0,0,0,0,0 ; 5 exit functions efunc: .word 0,0,0,0,0 ; 5 exit functions
@ -39,17 +41,19 @@ _atexit:
; Error, no space left ; Error, no space left
E0: lda #$FF E0: lda #ENOSPC ; No space left
sta __errno ; Use -1 until codes are defined ### sta __errno
sta __errno+1 ldx #$00
tax stx __errno+1
dex
txa
rts rts
; Function called from exit ; Function called from exit
doatexit: doatexit:
ldy ecount ; get index ldy ecount ; get index
beq L9 ; jump if done beq L9 ; jump if done
dey dey
lda efunc,y lda efunc,y
sta jmpvec+2 sta jmpvec+2