heptagon/test/good/statics.ept
Léonard Gérard c4a926f489 Correct Mapfold !! Or at least much more than before.
Still not sure whether the notion of main_nodes is correct.
A parametrized node not used right in the module gets removed.
Is that the wanted behaviour ?
2010-08-24 11:07:05 +02:00

32 lines
459 B
Plaintext

(* Check manually *)
(* This test should only create two instances of f. *)
const c:int = 3
const k:int = 1
fun f<<n:int>>() returns (y:int)
let
y = n + 3 + c;
tel
fun g<<m:int>>() returns (y:int)
var x:int;
let
x = m + f<<2>>();
y = f<<m>>();
tel
fun i<<m:int>>() returns (o : int)
var x, y, z: int;
let
x = f<<2>>();
y = f<<1 + m>>();
z = f<<k + 1>>();
o = f<<m + k>>();
tel
fun h() returns (y:int)
let
y = c + g<<c>>() + i<<k>>();
tel