import sys

alloc(length Int) -> Pointer {
	x := sys.mmap(0, length+8, 0x0004, 0x3000)

	if x < 0x1000 {
		return x
	}

	store(x, 8, length)
	return x + 8
}