Adding tests

This commit is contained in:
Gwenaël Delaval 2015-09-04 17:33:49 +02:00
parent e0bbc838d5
commit fd4dffef62
2 changed files with 32 additions and 0 deletions

17
test/good/autohiera3.ept Normal file
View file

@ -0,0 +1,17 @@
node test(r,r1,e:bool) returns (st:int)
let
automaton
state S1 do
st=0;
until r then S2
state S2 do
automaton
state P1 do
st=1;
until r1 then P2
state P2 do
st=2;
end;
until e then S1
end
tel

15
test/good/contrenum.ept Normal file
View file

@ -0,0 +1,15 @@
type mode = Idle | Active
node f(x:bool) returns (y:bool)
contract
enforce (not y)
with (c:mode)
let
switch c
| Idle do y = false
| Active do y = true
end
tel