From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Mon, 2 Jun 2003 16:10:54 +0000 (+0000)
Subject: Added remove()
X-Git-Tag: V2.12.0~1531
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=6e301bc88e531a38fb75538c43ebb33b026fa329;p=cc65

Added remove()


git-svn-id: svn://svn.cc65.org/cc65/trunk@2187 b7a2c559-68d2-44c3-8de9-860c34a00d81
---

diff --git a/libsrc/common/remove.s b/libsrc/common/remove.s
new file mode 100644
index 000000000..1bda12474
--- /dev/null
+++ b/libsrc/common/remove.s
@@ -0,0 +1,45 @@
+;
+; Ullrich von Bassewitz, 16.11.2002
+;
+; int __fastcall__ remove (const char* name);
+;
+
+        .export         _remove
+
+        .import         __sysremove
+        .import         __osmaperrno
+        .import         __errno
+
+
+;--------------------------------------------------------------------------
+; 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
+
+.endproc
+
+
+
+