heptagon/test/good/auto2.ept
2011-05-26 15:56:59 +02:00

21 lines
320 B
Text

node count() returns (o : int)
let
o = 0 fby (o + 1);
tel
node f() returns(x,y : bool)
let
(x,y) = (true,false)
tel
node main() returns (c,c1 : bool)
let
automaton
state One
do (c,c1) = f()
until count() = 5 then Two
state Two
do (c,c1) = f()
until count() = 3 then One
end
tel