heptagon/test/async/lent.ept


node g () returns (y : int)
let
  y = 3
tel

node f (x : int; c : bool) returns (z : int)
let
  z = merge c (true -> (0 fby (g(z when true(c))))) (false -> 0)
tel
Decade alpha1 On the road to beta is the new Minils AST, for now : * Heptagon and Obc AST changes, * Java code generation, * Recursives Qualnames, * Various bug fixes, * Added partial application for iterators, For instance: ... = map<<n>> (f<<se>>)((t1, t1'))(t2, t3) is translated to: for(int i =...) ... = f(t1, t1', t2[i], t3[i]) 2011-01-05 15:51:55 +01:00
			`node g () returns (y : int)`
			`let`
			`y = 3`
			`tel`

			`node f (x : int; c : bool) returns (z : int)`
			`let`
			`z = merge c (true -> (0 fby (g(z when true(c))))) (false -> 0)`
			`tel`