Fixed record constructor resolving from namespaces
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / Record4.scl
1 // module Module
2 data Foo = Foo { x :: Integer }
3 --
4 import "Prelude"
5 import "Module" as M
6
7 f = M.Foo { x = 3 }
8 main = match f with
9     M.Foo { x } -> x
10 -- 
11 3