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

Apple2: -5 bytes on open()

Browse Source
This commit is contained in:
Colin Leroy-Mira
2025-10-25 11:45:59 +02:00
committed by Oliver Schmidt
parent 707e317bb8
commit 3b8531a422
1 changed files with 2 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
libsrc/apple2/open.s
View File

@@ -68,8 +68,7 @@ errno: jsr incsp4 ; Preserves A
jmp ___directerrno jmp ___directerrno
; Save fdtab slot ; Save fdtab slot
found: tya found: sty tmp2
pha
; Alloc I/O buffer ; Alloc I/O buffer
lda #<(fdtab + FD::BUFFER) lda #<(fdtab + FD::BUFFER)
@@ -81,15 +80,7 @@ found: tya
jsr pushax ; Preserves A jsr pushax ; Preserves A
ldx #>$0400 ldx #>$0400
jsr iobuf_alloc jsr iobuf_alloc
tay ; Save errno code bne errno ; Check for error
; Restore fdtab slot
pla
sta tmp2 ; Save fdtab slot
; Check for error
tya ; Restore errno code
bne errno
; Get and save flags ; Get and save flags
jsr popax jsr popax