Moved reusable parts of remove into oserrcheck.
Rewrote remove(). Added rename(). git-svn-id: svn://svn.cc65.org/cc65/trunk@2272 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -1,5 +1,5 @@
|
||||
;
|
||||
; Ullrich von Bassewitz, 16.11.2002
|
||||
; Ullrich von Bassewitz, 2003-08-12
|
||||
;
|
||||
; int __fastcall__ remove (const char* name);
|
||||
;
|
||||
@@ -7,36 +7,15 @@
|
||||
.export _remove
|
||||
|
||||
.import __sysremove
|
||||
.import __osmaperrno
|
||||
.import __errno
|
||||
.import oserrcheck
|
||||
|
||||
|
||||
;--------------------------------------------------------------------------
|
||||
; remove
|
||||
|
||||
|
||||
.proc _remove
|
||||
|
||||
; Go ahead and call the machine dependent function
|
||||
|
||||
jsr __sysremove
|
||||
|
||||
; Check for errors
|
||||
|
||||
cmp #$00
|
||||
bne ok
|
||||
jsr __osmaperrno
|
||||
sta __errno
|
||||
stx __errno+1
|
||||
lda #$FF
|
||||
tax
|
||||
rts
|
||||
|
||||
; Error free
|
||||
|
||||
ok: lda #$00
|
||||
tax
|
||||
rts
|
||||
jsr __sysremove ; Call the machine specific function
|
||||
jmp oserrcheck ; Store into _oserror, set errno, return 0/-1
|
||||
|
||||
.endproc
|
||||
|
||||
|
||||
Reference in New Issue
Block a user