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

Spare a few bytes

Browse Source
This commit is contained in:
Colin Leroy-Mira
2025-05-26 18:03:12 +02:00
committed by Oliver Schmidt
parent e444f4c40e
commit f8c51ffd3d
2 changed files with 17 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
libsrc/apple2/extra/iobuf-0800.s
View File

@@ -54,18 +54,20 @@ iobuf_alloc:
rts
; Mark table entry as used
: lda #$FF
sta table,x
: dec table,x
; Convert table index to address hibyte
txa
asl
asl
clc
; Skip clearing carry, it can't be set as long as MAX_FDS*4 is
; less than 64.
.assert MAX_FDS*4 < $40, error
adc #>$0800
; Store address in "memptr"
ldy #$01
; (Y still equals 0 from popptr1)
iny
sta (ptr1),y
dey
tya
@@ -82,8 +84,7 @@ iobuf_free:
; Mark table entry as free
tax
lda #$00
sta table,x
inc table,x
rts
; ------------------------------------------------------------------------