Adding tests
This commit is contained in:
parent
e0bbc838d5
commit
fd4dffef62
17
test/good/autohiera3.ept
Normal file
17
test/good/autohiera3.ept
Normal 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
15
test/good/contrenum.ept
Normal 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
|
||||||
|
|
Loading…
Reference in a new issue