]> gerrit.simantics Code Review - simantics/platform.git/blob - bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/LocalDefinitions5.scl
Re-enabled Acorn transaction cancellation support for testing
[simantics/platform.git] / bundles / org.simantics.scl.compiler / tests / org / simantics / scl / compiler / tests / scl / LocalDefinitions5.scl
1 import "Prelude"\r
2 \r
3 data Foo = Foo Double Double\r
4 \r
5 a = Foo 1 2\r
6 \r
7 b = y\r
8   where\r
9     Foo x y = a\r
10     \r
11 main = show b\r
12 --\r
13 2.0