]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/While2.scl
Merged changes from feature/scl to master.
[simantics/platform.git] / bundles / org.simantics.scl.compiler / tests / org / simantics / scl / compiler / tests / scl / While2.scl
diff --git a/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/While2.scl b/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/While2.scl
deleted file mode 100644 (file)
index 6567c22..0000000
+++ /dev/null
@@ -1,12 +0,0 @@
-import "Prelude" hiding (while)\r
-\r
-while :: Maybe Boolean -> Maybe a -> Maybe ()\r
-while condM bodyM = mdo\r
-    cond <- condM\r
-    if cond \r
-    then bodyM >> while condM bodyM\r
-    else return ()\r
-\r
-main = "FOO"\r
---\r
-FOO
\ No newline at end of file