]> gerrit.simantics Code Review - simantics/platform.git/blob - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Void3.scl
Merge commit '876ede6'
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / Void3.scl
1 import "JavaBuiltin" as Java\r
2 \r
3 data Foo = Foo ()\r
4 \r
5 \r
6 ff = Foo ()\r
7 \r
8 gg () = 3 :: Integer\r
9 \r
10 main = gg (match ff with Foo a -> a)\r
11 --\r
12 3