Re-enabled Acorn transaction cancellation support for testing

[simantics/platform.git] / bundles / org.simantics.scl.compiler / tests / org / simantics / scl / compiler / tests / scl / Void3.scl

import "JavaBuiltin" as Java\r
\r
data Foo = Foo ()\r
\r
\r
ff = Foo ()\r
\r
gg () = 3 :: Integer\r
\r
main = gg (match ff with Foo a -> a)\r
--\r
3