@@ 234,14 234,13 @@ JMP2r
SWP2
( literals )
- LDAk LIT "# NEQ ,&no-lit JCN
- INC2k LDA LIT "_ NEQ ,&no-lit JCN
- DUP2 ;slen JSR2 #0003 NEQ2 ,&no-byte JCN
- OVR2 ;is-litbyte JSR2 ,&pass JCN
- &no-byte
- DUP2 ;slen JSR2 #0005 NEQ2 ,&no-short JCN
- OVR2 ;is-litshort JSR2 ,&pass JCN
- &no-short
+ LDA2k LIT "# LIT "_ NEQ2 ,&no-lit JCN
+ DUP2 ;slen JSR2 #0003 NEQ2 ,&no-byte JCN
+ OVR2 ;is-litbyte JSR2 ,&pass JCN
+ &no-byte
+ DUP2 ;slen JSR2 #0005 NEQ2 ,&no-short JCN
+ OVR2 ;is-litshort JSR2 ,&pass JCN
+ &no-short
&no-lit
( references )
( a ) OVR2 LDA LIT ". EQU STH