| 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 |