fix(buzbee): fix garbled register transfer

This commit is contained in:
2025-10-15 17:47:50 -05:00
parent 1ebd112da5
commit 0c4055d685

View File

@@ -317,7 +317,8 @@ RUNIF
beq NOTOK@ beq NOTOK@
ldx #0 ; Counting up from zero ldx #0 ; Counting up from zero
lda BBVAR.tokens ; Load token lda BBVAR.tokens ; Load token
tfr a,b ; Get the index in D tfr a,d ; Get the index in D
clra
asld ; Cheaply << to get *2, pointer size asld ; Cheaply << to get *2, pointer size
tfr d,x ; Move to X so we can use indexed mode with the offset tfr d,x ; Move to X so we can use indexed mode with the offset
jmp [IFPTRTBL,x] ; Select IF jmp [IFPTRTBL,x] ; Select IF