mirror of
https://github.com/cc65/cc65.git
synced 2025-01-12 17:30:50 +00:00
added support for remove() and rename() standard functions
git-svn-id: svn://svn.cc65.org/cc65/trunk@3533 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
b393a52f97
commit
56420208c7
@ -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)
|
||||
|
||||
|
20
libsrc/geos/file/sysremove.s
Normal file
20
libsrc/geos/file/sysremove.s
Normal file
@ -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
|
24
libsrc/geos/file/sysrename.s
Normal file
24
libsrc/geos/file/sysrename.s
Normal file
@ -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
|
Loading…
x
Reference in New Issue
Block a user