Example 12. Built-In Substitution Symbol Functions in a Conditional Assembly Code Block

.fcnolist * *Double Add or Subtract * DBL .macro ABC, dsth, dstl, srch, srcl ; add or subtract double .if $$symcmp(ABC,"+") ADDS dstl, dstl, srcl ; add double ADC dsth, dsth, srch .elseif $$symcmp(ABC,"-") SUBS dstl, dstl, srcl ; subtract double SUBS dsth, dsth, srch .else .emsg "Incorrect Operator Parameter" .endif .endm *Macro Call DBL -, R4, R5, R6, R7