Finally: Commodore file I/O

git-svn-id: svn://svn.cc65.org/cc65/trunk@1531 b7a2c559-68d2-44c3-8de9-860c34a00d81
2002-11-16 23:45:15 +00:00
parent 9e74c2b26f
commit 751aaee63d
23 changed files with 1023 additions and 273 deletions
--- a/libsrc/cbm/sysremove.s
+++ b/libsrc/cbm/sysremove.s
@@ -0,0 +1,24 @@
+;
+; 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
+        cmp     #0              ; Do we have an error?
+        bne     err             ; Jump if yes
+        jmp     scratch         ; Scratch the file, return an error code
+err:    rts
+
+.endproc
+
+