blob: 288ba905d03c5bd76460d7c2e37f9c5e1d3a3c00 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
#!/usr/bin/env nomsu -V2.5.4.3
#
Tests for the stuff defined in core/control_flow.nom
use "core"
%nums = []
%co = (..)
coroutine:
-> 4
-> 5
repeat 3 times: -> 6
for % in coroutine %co (add % to %nums)
assume (%nums == [4, 5, 6, 6, 6]) or barf "Coroutine iteration failed"
say "Coroutines test passed."
|
