Apple-2-SW/qasm
1
0
Fork 0
mirror of https://github.com/marketideas/qasm.git synced 2024-06-10 14:29:33 +00:00
Code Issues Projects Releases Wiki Activity

two more label length straglers

Browse Source
This commit is contained in:
Kelvin Sherlock 2020-05-25 18:32:17 -04:00
parent e743e2a6c4
commit f5f3846a6d
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/asm/asm.cond.s
View File

@ -1828,7 +1828,7 @@ macfind
sta lableptr+2 sta lableptr+2
stz ]offset stz ]offset
lda [lableptr] lda [lableptr]
and #$0f and #label_mask
sta ]len2 sta ]len2
sep $20 sep $20
ldx #$02 ;start at byte 2 ldx #$02 ;start at byte 2

2
src/asm/asm.dsk.s
View File

@ -694,7 +694,7 @@ writerel php ;must enter
ldy #$00 ldy #$00
stz :offset stz :offset
lda [lableptr] lda [lableptr]
and #$0F and #label_mask
bne :stalen bne :stalen
inc :main inc :main
jmp :loop jmp :loop