Added error message when label is redefined
This commit is contained in:
parent
511aa3c5a9
commit
a09c4fb841
|
@ -598,7 +598,10 @@ include projects/library/heap.tal
|
||||||
,&new-label JCN
|
,&new-label JCN
|
||||||
|
|
||||||
( label already exists )
|
( label already exists )
|
||||||
( FIXME check label address hasn't changed (label defined twice) )
|
LDA2k ;asma/addr LDA2 EQU2 ,&address-match JCN
|
||||||
|
;asma-msg-redefined ;asma/error STA2
|
||||||
|
|
||||||
|
&address-match
|
||||||
#01 JMP2r
|
#01 JMP2r
|
||||||
|
|
||||||
&new-label ( incoming-ptr* )
|
&new-label ( incoming-ptr* )
|
||||||
|
@ -817,6 +820,7 @@ include projects/library/heap.tal
|
||||||
@asma-msg-macro "Macro 20 "already 20 "exists 00
|
@asma-msg-macro "Macro 20 "already 20 "exists 00
|
||||||
@asma-msg-rewound "Memory 20 "overwrite 00
|
@asma-msg-rewound "Memory 20 "overwrite 00
|
||||||
@asma-msg-too-deep "Recursion 20 "level 20 "too 20 "deep 00
|
@asma-msg-too-deep "Recursion 20 "level 20 "too 20 "deep 00
|
||||||
|
@asma-msg-redefined "Label 20 "redefined 00
|
||||||
|
|
||||||
( trees )
|
( trees )
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue