]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/DoubleConversion.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 / DoubleConversion.scl
index 31e95edb30a69864452fe6ba2528f708f27f9cc6..889bb015157c15834a5bc2d42f5b95aafbf87125 100644 (file)
@@ -1,17 +1,17 @@
-import "Prelude"\r
-\r
-f :: Float\r
-f = 1.0\r
-\r
-d :: Double\r
-d = 1.0\r
-\r
-d2f :: Float\r
-d2f = fromDouble d\r
-\r
-f2d :: Double\r
-f2d = toDouble f\r
-\r
-main = show (d+f2d, f+d2f)\r
---\r
+import "Prelude"
+
+f :: Float
+f = 1.0
+
+d :: Double
+d = 1.0
+
+d2f :: Float
+d2f = fromDouble d
+
+f2d :: Double
+f2d = toDouble f
+
+main = show (d+f2d, f+d2f)
+--
 (2.0, 2.0)
\ No newline at end of file