nl/test_string.nl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

type int = i32;
type char = i8;
type string = ptr(char);

extern func void(int) putchar;

void f(char c) {
	putchar(c);
}

int main(int argc, ptr(string) argv) {
	string s = "kaas";
	ptr(i8) s2 = "kaas2";
	ptr(func void(char)) ptr1;
	ptr(func void(char)) ptr2;
	f((ptr1 == ptr2) + 'a');
	f('x');
	return 0;
}