Merge commit '876ede6'
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / Void1.scl
1 importJava "java.util.List" where\r
2     data List a\r
3     \r
4     @JavaName add\r
5     addList :: List a -> a -> <Proc> Boolean\r
6 \r
7 importJava "java.util.ArrayList" where\r
8     @JavaName "<init>"\r
9     newList :: () -> <Proc> (List a)\r
10 \r
11 main = do\r
12     l = newList ()\r
13     addList l (3 :: Integer)\r
14     l\r
15 --\r
16 [3]