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

23 lines
290 B
Plaintext

(* pour debugger
set arguments -v test/good/t10.ept *)
node f(x:int) returns (y:int)
let
y = 2*x;
tel
node g(x:int) returns (y:int)
let
y = 3*x;
tel
node h(x1,x2:int) returns (y:int)
let
y = f(x1) + g(x2)
tel
node main() returns (y:int)
let
y = h(5,7);
tel