kurz/tests/test.qbl

//valid
//output: Hello, World!\n4242test2Falsetesttesttest

"Hello, World!\n" print 43 foo foo deq


// Dequeues, enqueues 42 and 17, prints the head
function any => int foo
{
	deq 42 17 print
}

"test2" print 1
check
print


function int => str check
{
	if
	{
		"True"
	}
	else
	{
		"False"
	}
}

// 3
// 3 3
// 3
// 3 1
// 2
// 2 "test"
// "test" 2

function int => whileFunction
{
	dup
	while
	{
		1 - "test" req print dup
	}
	deq
}

3 whileFunction