-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathlib.c
20 lines (20 loc) · 855 Bytes
/
lib.c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
const char *prelude = "fn print_i8(x: i8) do\n"
" found := i8\n"
" digit := i8\n"
"\n"
" digit = x / 100\n"
" if digit > 0 || found do\n"
" found = 1\n"
" send(.Console/write, digit + 48)\n"
" end\n"
" x = x - digit * 100\n"
"\n"
" digit = x / 10\n"
" if digit > 0 || found do\n"
" found = 1\n"
" send(.Console/write, digit + 48)\n"
" end\n"
" x = x - digit * 10\n"
"\n"
" send(.Console/write, x + 48)\n"
"end\n";