heptagon/test/good/t10.ept

23 lines
290 B
Text
Raw Permalink Normal View History

2010-06-21 12:11:06 +02:00
(* 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
2012-07-18 16:54:44 +02:00
node main() returns (y:int)
let
y = h(5,7);
tel