(opctest) Added missing label
This commit is contained in:
parent
cd619a7548
commit
ff9502815c
|
@ -129,7 +129,7 @@ BRK
|
||||||
|
|
||||||
LDA2k JSR2 DUP ?&pass
|
LDA2k JSR2 DUP ?&pass
|
||||||
;Dict/missed pstr
|
;Dict/missed pstr
|
||||||
[ LIT2 &name $2 ] pstr/
|
[ LIT2 &name $2 ] pstr
|
||||||
[ LIT2 "# 18 ] DEO
|
[ LIT2 "# 18 ] DEO
|
||||||
[ LIT2 "a -id ] LDZ ADD #18 DEO
|
[ LIT2 "a -id ] LDZ ADD #18 DEO
|
||||||
#0a18 DEO
|
#0a18 DEO
|
||||||
|
@ -150,7 +150,7 @@ JMP2r
|
||||||
DUP2 LDA
|
DUP2 LDA
|
||||||
DUP ?{ POP2 JMP2r }
|
DUP ?{ POP2 JMP2r }
|
||||||
#18 DEO
|
#18 DEO
|
||||||
INC2 !&pstr
|
INC2 !pstr
|
||||||
|
|
||||||
@tests
|
@tests
|
||||||
=op-equ [
|
=op-equ [
|
||||||
|
|
Loading…
Reference in New Issue