heptagon/test/bad/bad_merge1.ept

7 lines
125 B
Plaintext
Raw Normal View History

2010-12-14 18:36:54 +01:00
type t = A | B
type tt = C
node t2bool(x: t) returns (b: bool)
let
b = merge x (A-> true) (B-> true) (C-> false)
tel