heptagon/test/good/t6.ept

24 lines
347 B
Plaintext
Raw Normal View History

2010-06-21 12:11:06 +02:00
node f(x,z:int) returns (o1,o2:int)
var o4:int;
let
switch (x = z)
| true do
o1 = 0 -> pre o1 + 2;
2011-05-23 14:04:11 +02:00
o2 = o4 + 1;
o4 = 3
| false do
o1 = 4;
2011-05-23 14:04:11 +02:00
o2 = 5;
o4 = 5
2010-06-21 12:11:06 +02:00
end;
tel
2012-07-18 16:54:44 +02:00
node main() returns (o1,o2:int)
var x,z:int;
let
x = 0 fby 1 fby 2 fby x;
z = 1 fby 2 fby z;
(o1,o2) = f(x,z);
tel