Apple2: factorize MLI pathname setting (up to -22 bytes)

This commit is contained in:
Colin Leroy-Mira
2025-10-25 13:45:31 +02:00
committed by Oliver Schmidt
parent 850accee3a
commit 9390e5c2ce
7 changed files with 40 additions and 25 deletions

View File

@@ -5,7 +5,7 @@
;
.export __sysmkdir
.import pushname_tos, popname
.import pushname_tos, popname, mli_set_pathname_tos
.import addysp, popax
.include "zeropage.inc"
@@ -22,10 +22,7 @@ __sysmkdir:
bne oserr
; Set pushed name
lda c_sp
ldx c_sp+1
sta mliparam + MLI::CREATE::PATHNAME
stx mliparam + MLI::CREATE::PATHNAME+1
jsr mli_set_pathname_tos
; Set all other parameters from template
ldx #(MLI::CREATE::CREATE_TIME+1) - (MLI::CREATE::PATHNAME+1) - 1