nl/string_index.nl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

extern func void(i32) putchar;
extern func u64(ptr(i8)) strlen;

i32 main() {
	ptr(i8) s = "kaas";
	ptr(i8) orig = s;
	s = s + strlen(s) - 1;
	i32 i = 0;
	while (i < strlen(orig)) {
		putchar(*(s - i));
		i = i + 1;
	}
	putchar('\n');
	return 0;
}