heptagon/test/good/t7.ept
2012-07-18 16:54:44 +02:00

19 lines
286 B
Plaintext

(* pour debugger
set arguments -v test/good/t7.ept *)
node f(x,z1:int) returns (o:int)
var last z: int;
last m: int;
r: int;
let
o = (-1);
r = 0 + pre o + 2;
z = last z + 2 + last m;
m = r + 2
tel
node main() returns (o:int)
let
o = f(0,0);
tel