path: root/tests/programs/doublefree.zc

memdebug on;
unchecked fn main()
{
	let p = new(1);
	free(p);
	free(p);
	put_s("ok\n");
	return 0;
}