1
0
mirror of https://github.com/cc65/cc65.git synced 2024-06-15 02:29:32 +00:00
cc65/libsrc/cbm/sysremove.s
uz 770d230178 fnparse will return zero flag according to error (ZF=1 means no error).
git-svn-id: svn://svn.cc65.org/cc65/trunk@3938 b7a2c559-68d2-44c3-8de9-860c34a00d81
2009-02-22 13:54:03 +00:00

24 lines
498 B
ArmAsm

;
; Ullrich von Bassewitz, 16.11.2002
;
; unsigned char __fastcall__ _sysremove (const char* name);
;
.export __sysremove
.import fnparse, scratch
;--------------------------------------------------------------------------
; __sysremove:
.proc __sysremove
jsr fnparse ; Parse the given file name
bne err ; Jump if yes
jmp scratch ; Scratch the file, return an error code
err: rts
.endproc