]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/ImportRef.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 / ImportRef.scl
index 9fb6f62d2b206a90ad186c35618981a45c3b2299..17ce1ef2450b554d4b4d5c5ff71a64d191e70086 100644 (file)
@@ -1,18 +1,18 @@
-importJava "org.simantics.scl.runtime.procedure.Ref" where\r
-    data Ref a\r
-    \r
-    @JavaName "<init>"\r
-    ref :: a -> <Proc> (Ref a)\r
-    \r
-    @JavaName "value"\r
-    getRef :: Ref a -> <Proc> a\r
-    \r
-    @JavaName "<set>value"\r
-    (:=) :: Ref a -> a -> <Proc> ()\r
-\r
-main = do\r
-    r = ref (13 :: Integer)\r
-    r := (14 :: Integer)\r
-    getRef r\r
---\r
+importJava "org.simantics.scl.runtime.procedure.Ref" where
+    data Ref a
+    
+    @JavaName "<init>"
+    ref :: a -> <Proc> (Ref a)
+    
+    @JavaName "value"
+    getRef :: Ref a -> <Proc> a
+    
+    @JavaName "<set>value"
+    (:=) :: Ref a -> a -> <Proc> ()
+
+main = do
+    r = ref (13 :: Integer)
+    r := (14 :: Integer)
+    getRef r
+--
 14
\ No newline at end of file