blob: 23c774bcf274696958b9e735a38cb603ea804c02 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
main :: () -> void {
a := "Hello world\n";
i := 0;
while i < 12 {
putc a[i];
i += 1;
}
};
print :: (value:[10]u8)->void{
println(23);
};
println :: ()->void{
putc '\n';
};
println :: (value:i64)->void{
print(value);
putc '\n';
};
println :: (value:u64)->void{
print(value);
putc '\n';
};
println :: (value:bool)->void{
print(value);
putc '\n';
};
print :: (value:i64)->void{
value := value;
a : [20]u8 = undefined;
i := 0;
while {
a[i] = '0' + @cast(value % 10,u8);
i += 1;
value /= 10;
value != 0;
} {}
while i > 0 {
putc a[i-1];
i -= 1;
}
};
print :: (value:u64)->void{
value := value;
a : [20]u8 = undefined;
i := 0;
while {
a[i] = '0' + @cast(value % 10,u8);
i += 1;
value /= 10;
value != 0;
} {}
while i > 0 {
putc a[i-1];
i -= 1;
}
};
print :: (value:bool)->void{
if value {
putc 't';
putc 'r';
putc 'u';
putc 'e';
}else{
putc 'f';
putc 'a';
putc 'l';
putc 's';
putc 'e';
}
};
|
