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 / MonadSyntax2.scl

diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/MonadSyntax2.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/MonadSyntax2.scl
index 6244a6162fd1b5de2945ed8e529cb3ab0e336a70..3dcf472b958f92a34f0be9f3c51e1a823150484a 100644 (file)
--- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/MonadSyntax2.scl
+++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/MonadSyntax2.scl
@@ -1,12 +1,12 @@
-import "Prelude"\r
-\r
-a = [1, 2]\r
-b = [5, 6]\r
-\r
-main = do \r
-  x <- a\r
-  y <- b\r
-  return (x+y) \r
---\r
-7:3-7:9: Bind statements are allowed only in mdo-blocks.\r
+import "Prelude"
+
+a = [1, 2]
+b = [5, 6]
+
+main = do 
+  x <- a
+  y <- b
+  return (x+y) 
+--
+7:3-7:9: Bind statements are allowed only in mdo-blocks.
 8:3-8:9: Bind statements are allowed only in mdo-blocks.
\ No newline at end of file