]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Effects1.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 / Effects1.scl
index 11a3303d413bc60ab7cb5b9235d319aaf23445b0..386dbb82bbc6e606f823ea188a725793cc2dad42 100644 (file)
@@ -1,18 +1,18 @@
-import "JavaBuiltin" as Java\r
-\r
-importJava "java.util.regex.Pattern" where\r
-    data Pattern\r
-\r
-    compile :: String -> Pattern\r
-    matcher :: Pattern -> String -> <Proc> Matcher\r
-\r
-importJava "java.util.regex.Matcher" where\r
-    data Matcher\r
-\r
-    matches :: Matcher -> <Proc> Boolean\r
-\r
-doMatch pattern text = matches (matcher pattern text)\r
-\r
-main = doMatch (compile ".*xxx.*") "fffxxooxxxlll"\r
---\r
+import "JavaBuiltin" as Java
+
+importJava "java.util.regex.Pattern" where
+    data Pattern
+
+    compile :: String -> Pattern
+    matcher :: Pattern -> String -> <Proc> Matcher
+
+importJava "java.util.regex.Matcher" where
+    data Matcher
+
+    matches :: Matcher -> <Proc> Boolean
+
+doMatch pattern text = matches (matcher pattern text)
+
+main = doMatch (compile ".*xxx.*") "fffxxooxxxlll"
+--
 true
\ No newline at end of file