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]