kurz/tests/while.qbl

//valid,10987654321falsefalse
//:END:

true while
{
	false
}

10 0 dup > req
// true 10
while
{
	// i
	dup intToStr req print
	1 - 0 dup > req
}
deq

function bool => str boolToStr
{
	if
	{
		"true"
	}
	else
	{
		"false"
	}
}

true true true while
{
	false
}
boolToStr boolToStr print println
Improved the test system 2022-12-18 04:05:50 +01:00			`//valid,10987654321falsefalse`
			`//:END:`
Add and update tests 2022-12-14 11:46:47 +01:00
Introduce boolean types 2022-12-14 20:39:51 +01:00			`true while`
Add and update tests 2022-12-14 11:46:47 +01:00			`{`
Introduce boolean types 2022-12-14 20:39:51 +01:00			`false`
Add and update tests 2022-12-14 11:46:47 +01:00			`}`

Introduce boolean types 2022-12-14 20:39:51 +01:00			`10 0 dup > req`
Remove the "any" type 2022-12-31 16:09:55 +01:00			`// true 10`
Introduce boolean types 2022-12-14 20:39:51 +01:00			`while`
Add and update tests 2022-12-14 11:46:47 +01:00			`{`
Remove the "any" type 2022-12-31 16:09:55 +01:00			`// i`
			`dup intToStr req print`
Introduce boolean types 2022-12-14 20:39:51 +01:00			`1 - 0 dup > req`
Add and update tests 2022-12-14 11:46:47 +01:00			`}`
Introduce boolean types 2022-12-14 20:39:51 +01:00			`deq`

Remove the "any" type 2022-12-31 16:09:55 +01:00			`function bool => str boolToStr`
			`{`
			`if`
			`{`
			`"true"`
			`}`
			`else`
			`{`
			`"false"`
			`}`
			`}`

Introduce boolean types 2022-12-14 20:39:51 +01:00			`true true true while`
			`{`
			`false`
			`}`
Remove the "any" type 2022-12-31 16:09:55 +01:00			`boolToStr boolToStr print println`