kurz/tests/while.qbl

22 lines
167 B
Plaintext
Raw Normal View History

2022-12-18 04:05:50 +01:00
//valid,10987654321falsefalse
//:END:
2022-12-14 11:46:47 +01:00
2022-12-14 20:39:51 +01:00
true while
2022-12-14 11:46:47 +01:00
{
2022-12-14 20:39:51 +01:00
false
2022-12-14 11:46:47 +01:00
}
2022-12-14 20:39:51 +01:00
10 0 dup > req
while
2022-12-14 11:46:47 +01:00
{
2022-12-14 20:39:51 +01:00
dup print
1 - 0 dup > req
2022-12-14 11:46:47 +01:00
}
2022-12-14 20:39:51 +01:00
deq
true true true while
{
false
}
2022-12-18 04:05:50 +01:00
print println