One thing that has been requested is for the assembler to allow duplicate EQU definitions provided that the value is the same. However, this is not difficult to implement as a macro, for example as follows:
Macro Define a value, tolerating duplicate
&name #equ &value
aif (not d'&name).notdup Skip if not already defined
dc 0sl2(&name-(&value),(&value)-&name) Ensure same value
mexit ,
.notdup anop ,
&name equ &value
mexit ,
Mend
Jonathan Scott, HLASM
IBM Hursley, UK
