heptagon/test/good/t11.ept

13 lines
171 B
Text
Raw Normal View History

2010-06-21 12:11:06 +02:00
(* Unary operators *)
node f(x:bool;y:int) returns (z:int;t:bool)
let
z = ~- y;
t = not x;
tel
node g(a:bool;b:int) returns (z:int;t:bool)
let
(z,t) = f(a,b);
tel