]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - tests/org.simantics.scl.compiler.tests/src/org/simantics/scl/compiler/tests/scl/Tuples.scl
Fixed all line endings of the repository
[simantics/platform.git] / tests / org.simantics.scl.compiler.tests / src / org / simantics / scl / compiler / tests / scl / Tuples.scl
index 5f70e4bea921000ca8e981f810beb46aaaf5796f..bda65742cf263da5cde76a959f16dad52ca5a9ee 100644 (file)
@@ -1,18 +1,18 @@
-id0 () = ()\r
-\r
-id0A :: () -> ()\r
-id0A () = ()\r
-\r
-id2 (a,b) = (a,b)\r
-\r
-id2A :: (a,b) -> (a,b)\r
-id2A (a,b) = (a,b)\r
-\r
-id3 (a,b,c) = (a,b,c)\r
-\r
-id3A :: (a,b,c) -> (a,b,c)\r
-id3A (a,b,c) = (a,b,c)\r
-\r
-main = id3 (1 :: Integer,id0 (),3 :: Integer)\r
---\r
+id0 () = ()
+
+id0A :: () -> ()
+id0A () = ()
+
+id2 (a,b) = (a,b)
+
+id2A :: (a,b) -> (a,b)
+id2A (a,b) = (a,b)
+
+id3 (a,b,c) = (a,b,c)
+
+id3A :: (a,b,c) -> (a,b,c)
+id3A (a,b,c) = (a,b,c)
+
+main = id3 (1 :: Integer,id0 (),3 :: Integer)
+--
 (1,(),3)
\ No newline at end of file