Fixed multiple issues causing dangling references to discarded queries

[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / Macros3.scl

diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros3.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros3.scl
index ec1571dc02000138ec5c901f9e2e6a544cbe01cb..cb6e24fda7b07a261c2c3c623cfdd6de955bfb71 100644 (file)
--- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros3.scl
+++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Macros3.scl
@@ -1,16 +1,16 @@
-import "JavaBuiltin" as Java\r
-\r
-@JavaType "java.util.Collection"\r
-data Collection a\r
-\r
-@macro\r
-collectionToList :: Collection a -> [a]\r
-collectionToList = Java.unsafeCoerce\r
-\r
-singleton :: a -> Collection a\r
-singleton = Java.staticMethod "java.util.Collections.singletonList"\r
-\r
-main :: [Integer]\r
-main = collectionToList (singleton 15)\r
---\r
+import "JavaBuiltin" as Java
+
+@JavaType "java.util.Collection"
+data Collection a
+
+@macro
+collectionToList :: Collection a -> [a]
+collectionToList = Java.unsafeCoerce
+
+singleton :: a -> Collection a
+singleton = Java.staticMethod "java.util.Collections.singletonList"
+
+main :: [Integer]
+main = collectionToList (singleton 15)
+--
 [15]
\ No newline at end of file