1 * Subsripted substitution symbols 2 ADDX .macro ABC 3 .var TMP 4 .asg :ABC(1):,TMP 5 .if $symcmp(TMP,"#") == 0 6 ADD ABC,A 7 .else 8 .emsg "Bad macro parameter 'ABC'" 9 .endif 10 .endm 11 ADDX *AR1 ; should produce an error msg 12 .end 13
