added support for remove() and rename() standard functions

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

diff --git a/libsrc/geos/file/Makefile b/libsrc/geos/file/Makefile
index f944691d14100330ca4a3bca9a361181abad025c..3bc506698582fb2cebcb7656f4eae94bf3bf9a4c 100644 (file)
--- a/libsrc/geos/file/Makefile
+++ b/libsrc/geos/file/Makefile
@@ -12,7 +12,8 @@ S_OBJS        = get1stdirentry.o getnxtdirentry.o\
          deleterecord.o insertrecord.o appendrecord.o readrecord.o writerecord.o\
          updaterecordfile.o\
          findfile.o followchain.o getfhdrinfo.o readfile.o savefile.o freefile.o\
-         deletefile.o renamefile.o findftypes.o readbyte.o getfile.o
+         deletefile.o renamefile.o findftypes.o readbyte.o getfile.o\
+         sysremove.o sysrename.o
 
 all: $(S_OBJS)
 

diff --git a/libsrc/geos/file/sysremove.s b/libsrc/geos/file/sysremove.s
new file mode 100644 (file)
index 0000000..4311447
--- /dev/null
+++ b/libsrc/geos/file/sysremove.s
@@ -0,0 +1,20 @@
+
+;
+; Maciej 'YTM/Elysium' Witkowiak
+;
+; 19.07.2005
+
+; unsigned char __fastcall__ _sysremove (const char* name);
+
+           .export  __sysremove
+
+           .include "../inc/jumptab.inc"
+           .include "../inc/geossym.inc"
+
+__sysremove:
+       sta r0L
+       stx r0H
+       jsr DeleteFile
+       txa
+       ldx #0
+       rts

diff --git a/libsrc/geos/file/sysrename.s b/libsrc/geos/file/sysrename.s
new file mode 100644 (file)
index 0000000..590ca9e
--- /dev/null
+++ b/libsrc/geos/file/sysrename.s
@@ -0,0 +1,24 @@
+
+;
+; Maciej 'YTM/Elysium' Witkowiak
+;
+; 19.07.2005
+
+; unsigned char __fastcall__ _sysrename (const char* oldname, const char* newname);
+
+           .export __sysrename
+           .import popax
+
+           .include "../inc/jumptab.inc"
+           .include "../inc/geossym.inc"
+
+__sysrename:
+       sta r0L
+       stx r0H
+       jsr popax
+       sta r6L
+       stx r6H
+       jsr RenameFile
+       txa
+       ldx #0
+       rts