test/ppindirect.asm

   1 ;Testname=test; Arguments=-E -o ppindirect.out; Files=ppindirect.out
   2
   3 ; Fun tests of the preprocessor indirection mode...
   4
   5 %assign foo1            11
   6 %assign foo11           1111
   7 %assign foo2            22
   8 %assign foo22           2222
   9 %assign foo3            33
  10 %assign foo33           3333
  11 %assign n               2
  12 foo%[foo%[n]]*100
  13 foo%[n]*100
  14 %assign foo%[foo%[n]]   foo%[foo%[n]]*100
  15 ;%assign foo%[n]                foo%[n]*100
  16
  17         foo1
  18         foo2
  19         foo3
  20         foo11
  21         foo22
  22         foo33
  23
  24 %define foo33bar        999999
  25         %[foo%[foo3]bar]
  26
  27 %assign bctr 0
  28 %macro bluttan 0
  29 %assign bctr bctr+1
  30 %assign bluttan%[bctr]  bctr
  31 %defstr bstr bluttan%[bctr]
  32         bluttan%[bctr]
  33         bstr
  34 %endmacro
  35
  36 %rep 20
  37         bluttan
  38 %endrep
  39 %rep 20
  40         bluttan%[bctr]
  41 %assign bctr bctr-1
  42 %endrep