]> gerrit.simantics Code Review - simantics/platform.git/blob - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/ValueAsOperator.scl
(refs #7307) Added features field to SCL module header
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / ValueAsOperator.scl
1
2 data List a = Nil | Cons a (List a)
3
4 data Foo = Foo
5
6 main = Foo `Cons` (Foo `Cons` Nil)
7 --
8 (Cons Foo (Cons Foo Nil))