X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=tests%2Forg.simantics.scl.compiler.tests%2Fsrc%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Ftests%2Fscl%2FMatching2.scl;h=9ac245f9fc6c612bfffef758b7c39d28c3932e0a;hb=6573b29e111ea03c3fa88bf1565d47d0fc4faabd;hp=c71b98bf8053de2fb03b89438f4d78c78f3c8ff0;hpb=f8576d4d2b3b30d76db552d624fc9f087b8940bd;p=simantics%2Fplatform.git

diff --git a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Matching2.scl b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Matching2.scl
index c71b98bf8..9ac245f9f 100644
--- a/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Matching2.scl
+++ b/tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Matching2.scl
@@ -1,9 +1,9 @@
-
-main = match (5 :: Integer) with
-  (1 :: Integer) -> "wrong"
-  (2 :: Integer) -> "wrong"
-  (5 :: Integer) -> "right"
-  (6 :: Integer) -> "wrong"
-  _ -> "wrong"
---
+
+main = match (5 :: Integer) with
+  (1 :: Integer) -> "wrong"
+  (2 :: Integer) -> "wrong"
+  (5 :: Integer) -> "right"
+  (6 :: Integer) -> "wrong"
+  _ -> "wrong"
+--
 right
\ No newline at end of file