1
0
mirror of https://github.com/cc65/cc65.git synced 2024-06-07 07:29:33 +00:00

Merge pull request #1742 from jedeoric/mkdir_fix_telestrat

Mkdir : fix registers calls
This commit is contained in:
Bob Andrews 2022-05-06 13:00:03 +02:00 committed by GitHub
commit 14c7ae6f0c
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

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