tests/programs/growone.zc


1
2
3
4
5
6
7
8
9

// one block bigger than the initial heap: the machine grows, and the block is usable
fn main() {
	let a = new(400000);
	a[0] = 5;
	a[399999] = 7;
	put_n(a[0] + a[399999]); put_c(' ');
	put_n(heap_size() >= 400000); put_c(10);
	return 0;
}