dbfee00a |
1 | define mp-print |
2 | call (void)fputs("$arg0 = ", stdout) |
3 | if $arg0 == 0 |
4 | call (void)fputs("(null)", stdout) |
5 | else |
6 | call (void)mp_writefile($arg0, stdout, 10) |
7 | end |
8 | call (void)putchar('\n') |
9 | end |
10 | |
11 | define mp-printr |
12 | call (void)fputs("$arg0 = ", stdout) |
13 | if $arg0 == 0 |
14 | call (void)fputs("(null)", stdout) |
15 | else |
16 | if $arg1 == 16 |
17 | call (void)fputs("0x", stdout) |
18 | else |
19 | if $arg1 == 8 |
20 | call (void)fputs("0", stdout) |
21 | else |
22 | if $arg1 != 10 |
23 | call (void)fputs("$arg1", stdout) |
24 | end |
25 | end |
26 | end |
27 | call (void)mp_writefile($arg0, stdout, $arg1) |
28 | end |
29 | call (void)putchar('\n') |
30 | end |
31 | |
32 | document mp-print |
33 | Print a Catacomb MP as a base-10 integer to stdout. |
34 | end |