| 1 | #include "alu.inc" |
| 2 | |
| 3 | .code |
| 4 | prolog |
| 5 | #define HMUL(N, I0, I1, V) ALU(N, , hmul, I0, I1, V) |
| 6 | #define UHMUL(N, I0, I1, V) ALU(N, _u, hmul, I0, I1, V) |
| 7 | HMUL(0, -2, -1, 0) |
| 8 | HMUL(1, 0, -1, 0) |
| 9 | HMUL(2, -1, 0, 0) |
| 10 | HMUL(3, 1, -1, -1) |
| 11 | #if __WORDSIZE == 32 |
| 12 | HMUL(4, 0x7ffff, 0x7ffff, 0x3f) |
| 13 | UHMUL(5, 0xffffff, 0xffffff, 0xffff) |
| 14 | HMUL(6, 0x80000000, -2, 1) |
| 15 | HMUL(7, 0x80000000, 2, -1) |
| 16 | HMUL(8, 0x80000001, 3, -2) |
| 17 | HMUL(9, 0x80000001, -3, 1) |
| 18 | #else |
| 19 | HMUL(4, 0x7ffffffff, 0x7ffffffff, 0x3f) |
| 20 | UHMUL(5, 0xffffffffff, 0xffffffffff, 0xffff) |
| 21 | HMUL(6, 0x8000000000000000, -2, 1) |
| 22 | HMUL(7, 0x8000000000000000, 2, -1) |
| 23 | HMUL(8, 0x8000000000000001, 3, -2) |
| 24 | HMUL(9, 0x8000000000000001, -3, 1) |
| 25 | #endif |
| 26 | prepare |
| 27 | pushargi ok |
| 28 | ellipsis |
| 29 | finishi @printf |
| 30 | ret |
| 31 | epilog |