preproc: unify token-pasting code
[nasm/perl-rewrite.git] / test / weirdpaste.asm
blob46bfa90a2a10ecf7412161e28f7c4a2d58747ca2
1 ;Testname=preproc; Arguments=-E; Files=stdout stderr
2 ;Testname=bin; Arguments=-fbin -oweirdpaste.bin; Files=stdout stderr weirdpaste.bin
4 %define foo xyzzy
5 %define bar 1e+10
7 %define xyzzy1e 15
9 %macro dx 2
10 %assign xx %1%2
11 dw xx
12 %endmacro
14 dx foo, bar
16 %macro df 2
17 %assign xy __float32__(%1e+%2)
18 dd xy
19 dd %1e+%2
20 %endmacro
22 df 1, 36
23 df 33, 20
24 df 0, 2
25 df 1.2, 5
28 %define N 1e%++%+ 5
29 dd N, 1e+5