inline fn putc(chr : int)
[[
	[i0:pop] syscall[ci:1]
]]

fn main() -> int
{
	putc('d');
	putc('e');
	putc('f');
}





main:
	bpget
	spget
	bpset

	; putc(int(100))
	push 100
	[i0:pop] syscall[ci:1]
	push 0
	drop

	; putc(int(101))
	push 101
	[i0:pop] syscall[ci:1]
	push 0
	drop

	; putc(int(102))
	push 102
	[i0:pop] syscall[ci:1]
	push 0
	drop

	bpget
	spset
	bpset
	ret