heptagon/test/good/t.ept

17 lines
250 B
Text
Raw Normal View History

2011-05-23 09:24:57 +02:00
node count() returns (o : int)
let
o = 0 fby 1;
tel
node main() returns (c : int)
let
automaton
state One
do c = count ()
until count() = 5 then Two
state Two
do c = count ()
until count() = 3 then One
end
tel