remove undefined ref
This commit is contained in:
parent
5e799b381a
commit
89bdbd7cb0
|
@ -82,7 +82,7 @@
|
||||||
LDAk #03 EQU ;do-literal JCN2
|
LDAk #03 EQU ;do-literal JCN2
|
||||||
LDAk #04 EQU ;do-or JCN2
|
LDAk #04 EQU ;do-or JCN2
|
||||||
LDAk #05 EQU ;do-or JCN2 ( same code as the or case )
|
LDAk #05 EQU ;do-or JCN2 ( same code as the or case )
|
||||||
LDAk ;emit-byte JSR2 ;unknown-node-type ;error! JSR2
|
;unknown-node-type ;error! JSR2
|
||||||
|
|
||||||
( used when we hit a dead-end during matching. )
|
( used when we hit a dead-end during matching. )
|
||||||
( )
|
( )
|
||||||
|
@ -447,7 +447,7 @@
|
||||||
&!2 LDAk #03 NEQ ,&!3 JCN #0002 ADD2 ;set-next-addr JSR2 JMP2r
|
&!2 LDAk #03 NEQ ,&!3 JCN #0002 ADD2 ;set-next-addr JSR2 JMP2r
|
||||||
&!3 LDAk #04 NEQ ,&!4 JCN INC2 ;set-next-addr JSR2 JMP2r
|
&!3 LDAk #04 NEQ ,&!4 JCN INC2 ;set-next-addr JSR2 JMP2r
|
||||||
&!4 LDAk #05 NEQ ,&!5 JCN #0003 ADD2 ;set-next-addr JSR2 JMP2r
|
&!4 LDAk #05 NEQ ,&!5 JCN #0003 ADD2 ;set-next-addr JSR2 JMP2r
|
||||||
&!5 LDAk ;emit-byte JSR2 ;unknown-node-type ;error! JSR2
|
&!5 ;unknown-node-type ;error! JSR2
|
||||||
|
|
||||||
@set-next-or-addr ( target* addr* -> )
|
@set-next-or-addr ( target* addr* -> )
|
||||||
LDA2k #0000 EQU2 ( target addr addr=0? ) ,&is-zero JCN
|
LDA2k #0000 EQU2 ( target addr addr=0? ) ,&is-zero JCN
|
||||||
|
|
Loading…
Reference in New Issue