Skipped reporting of device label values.

This commit is contained in:
Andrew Alderwick 2021-10-07 21:18:25 +01:00
parent 4d6fc06778
commit 0f9b03e0cb
1 changed files with 5 additions and 0 deletions

View File

@ -128,6 +128,10 @@
DUP2 ,asma-print-labels JSR DUP2 ,asma-print-labels JSR
( here ) ( here )
DUP2 #0004 ADD2 DUP2 #0004 ADD2
LDAk LIT 'A LTH ,&loop JCN
LDAk LIT 'Z GTH ,&loop JCN
POP2
,&skip-device-label JMP
&loop &loop
DUP2 INC2 SWP2 LDA DUP2 INC2 SWP2 LDA
DUP #00 EQU ,&end JCN DUP #00 EQU ,&end JCN
@ -141,6 +145,7 @@
( subtree ) ( subtree )
#0002 ADD2 ;asma-print-sublabels JSR2 #0002 ADD2 ;asma-print-sublabels JSR2
&skip-device-label
( right node ) ( right node )
#0002 ADD2 ,asma-print-labels JSR #0002 ADD2 ,asma-print-labels JSR
JMP2r JMP2r