heptagon/test/good/memalloc_clocks.ept

node f(c:bool) = (o:int)
var last t:int^100 = 1^100;
let
  t = merge c ((last t) when c) ([((last t) whenot c) with [0] = 0]);
  o = t[0];
tel

node main() returns (o:int)
var c:bool;
let
  c = true fby true fby false fby c;
  o = f(c);
tel
Better handling of clocks in memalloc - We can do a better allocation if we take into account 'when' in extvalues (test/good/memalloc_clocks.ept shows the improvement) - Fixed a bug with memalloc on records: if we translate: o = { a with .f = u } to o = a; o.f = u then we cannot share u and o.f 2012-06-20 09:17:13 +02:00			`node f(c:bool) = (o:int)`
			`var last t:int^100 = 1^100;`
			`let`
			`t = merge c ((last t) when c) ([((last t) whenot c) with [0] = 0]);`
			`o = t[0];`
Added main to several tests Added main to tests Added dependency statics -> statics2 in scripts 2012-07-17 17:57:04 +02:00			`tel`

			`node main() returns (o:int)`
			`var c:bool;`
			`let`
			`c = true fby true fby false fby c;`
			`o = f(c);`
			`tel`