bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

fix mkdir

Browse Source
This commit is contained in:
jede
2022-05-05 22:43:06 +02:00
parent b8f7167dcd
commit 348ea815b0
1 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
libsrc/telestrat/sysmkdir.s
View File

@@ -3,6 +3,8 @@
; ;
; unsigned char _sysmkdir (const char* name, ...); ; unsigned char _sysmkdir (const char* name, ...);
; ;
; This routine only works with Orix
.export __sysmkdir .export __sysmkdir
.import addysp, popax .import addysp, popax
@@ -10,7 +12,6 @@
.include "telestrat.inc" .include "telestrat.inc"
.include "zeropage.inc" .include "zeropage.inc"
__sysmkdir: __sysmkdir:
; Throw away all parameters except the name ; Throw away all parameters except the name
dey dey
@@ -20,11 +21,13 @@ __sysmkdir:
; Get name ; Get name
jsr popax jsr popax
stx tmp1
ldy tmp1
ldx #$00 ; X register is used to set if all folders must be created
; Call telemon primitive ; Call telemon primitive
BRK_TELEMON(XMKDIR) BRK_TELEMON(XMKDIR)
rts rts