Commit | Line | Data |
---|---|---|
4a71579b PC |
1 | #include "alu.inc" |
2 | ||
3 | .code | |
4 | prolog | |
5 | ||
6 | #define NEG(N, I, V) UN(N, neg, I, V) | |
7 | ||
8 | NEG(0, 0, 0) | |
9 | #if __WORDSIZE == 32 | |
10 | NEG(1, 1, 0xffffffff) | |
11 | NEG(2, 0xffffffff, 1) | |
12 | NEG(3, 0x80000000, 0x80000000) | |
13 | NEG(4, 0x7fffffff, 0x80000001) | |
14 | NEG(5, 0x80000001, 0x7fffffff) | |
15 | #else | |
16 | NEG(1, 1, 0xffffffffffffffff) | |
17 | NEG(2, 0xffffffff, 0xffffffff00000001) | |
18 | NEG(3, 0x80000000, 0xffffffff80000000) | |
19 | NEG(4, 0x7fffffff, 0xffffffff80000001) | |
20 | NEG(5, 0x80000001, 0xffffffff7fffffff) | |
21 | NEG(6, 0xffffffffffffffff, 1) | |
22 | NEG(7, 0x8000000000000000, 0x8000000000000000) | |
23 | NEG(8, 0x7fffffffffffffff, 0x8000000000000001) | |
24 | #endif | |
25 | ||
26 | #undef NEG | |
27 | #define NEG(N, T, I, V) FUN(N, T, neg, I, V) | |
28 | NEG(0, _f, 0.0, -0.0) | |
29 | NEG(1, _f, 0.5, -0.5) | |
30 | NEG(2, _f, $(1 / 0.0), $(-1.0 / 0)) | |
31 | NEG(3, _f, -1.25, 1.25) | |
32 | NEG(0, _d, 0.0, -0.0) | |
33 | NEG(1, _d, 0.5, -0.5) | |
34 | NEG(2, _d, $(1.0 / 0), $(-1 / 0.0)) | |
35 | NEG(3, _d, -1.25, 1.25) | |
36 | ||
37 | prepare | |
38 | pushargi ok | |
39 | ellipsis | |
40 | finishi @printf | |
41 | ret | |
42 | epilog |