diff options
Diffstat (limited to 'tests/control_flow.nom')
| -rw-r--r-- | tests/control_flow.nom | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/control_flow.nom b/tests/control_flow.nom index 939d5ee..340bd7d 100644 --- a/tests/control_flow.nom +++ b/tests/control_flow.nom @@ -179,4 +179,13 @@ assume ..= 6 ..or barf "'result of %' failed" + +%t <- [1,[2,[[3],4],5,[[[6]]]]] +%flat <- [] +for % in recursive %t + if: (type of %) is "table" + for %2 in %: recurse % on %2 + ..else: add % to %flat +assume: (sorted %flat) = [1,2,3,4,5,6] + say "Control flow test passed." |