Initial revision
[binutils.git] / gas / testsuite / gasp / exp.asm
blob041608a818e72fd58b0ebcf8d1b17668917070ac
2 ; test all ops
4 a1 .EQU 4+10
5 a2 .EQU 4-10
6 a3 .EQU 4&10
7 a4 .EQU 4|2
8 a5 .EQU 4~2
9 a6 .EQU 4*10
10 a7 .EQU 40/10
11 a8 .EQU +7
12 a9 .EQU -7
13 a10 .EQU ~7
16 a1 a2 a3 a4 a5 a6 a7 a8 a9 a10
18 ; test the priorities
20 b1 .EQU 1|2~3&4+5-8*7/2
21 b2 .EQU (1|2~(3&(4+5-(8*(7/2)))))
22 b3 .EQU 10*2/3*4
23 b4 .EQU (((10*2)/3)*4)
24 b5 .EQU 10+2-3+4
25 b6 .EQU (((10+2)-3)+4)
27 b1 b2 b3 b4
29 ; test association
31 c1 .EQU -~3
32 c2 .EQU ~-3
33 c3 .EQU -(~3)
34 c4 .EQU ~(-3)
36 c1 c2 c3 c4
38 ; test rules for symbols
40 ok1 .EQU FOO
41 ok2 .EQU FOO+10
42 ok3 .EQU 10+FOO
43 ok4 .EQU FOO-10
45 ok1
46 ok2
47 ok3
48 ok4
50 ok5 .EQU FOO+3+4+5+6
51 ok6 .EQU FOO-BAR
53 ok5
54 ok6
56 bad1 .EQU FOO+FOO
57 bad2 .EQU FOO*2
58 bad3 .EQU FOO/2
59 bad4 .EQU FOO|2
60 bad5 .EQU FOO&2
61 bad6 .EQU FOO~2
62 bad7 .EQU FOO*2
64 ; test spacing
66 space1 .EQU 1 + 2 +3+FOO + 3
67 space2
69 ; from the SH manual
71 .DATA.L 1+(2-(3+(4-5))),1
73 .DATA.L -H'fffffff1+H'000000f0*H'00000010|H'000000f0&H'0000ffff,H'00000fff
75 .DATA.L -~-~H'0000000f,H'00
80 .END