]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Record1.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 / Record1.scl
index fcfbf6a25d0d5016536bb0fb319853252344c970..244c95dca6b12eb906fc869bc52ca7f2e0703f9d 100644 (file)
@@ -1,9 +1,9 @@
-import "Prelude"\r
-\r
-data XYS = XYS { x :: Double, y :: Double, s :: String }\r
-\r
-len XYS {x = x, y = y} = sqrt (x*x + y*y)\r
-\r
-main = len (XYS { x = 4, y = 3, s = "Hello world!" })\r
--- \r
+import "Prelude"
+
+data XYS = XYS { x :: Double, y :: Double, s :: String }
+
+len XYS {x = x, y = y} = sqrt (x*x + y*y)
+
+main = len (XYS { x = 4, y = 3, s = "Hello world!" })
+-- 
 5.0
\ No newline at end of file