]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Hashable1.scl
Migrated source code from Simantics SVN
[simantics/platform.git] / bundles / org.simantics.scl.compiler / tests / org / simantics / scl / compiler / tests / scl / Hashable1.scl
diff --git a/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Hashable1.scl b/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Hashable1.scl
new file mode 100644 (file)
index 0000000..dc72fb0
--- /dev/null
@@ -0,0 +1,7 @@
+import "Prelude"\r
+\r
+l :: [Integer]\r
+l = [1,2,3,4,5]\r
+main = hash l - foldl (\c x -> 31*c + x) 0 l\r
+--\r
+-1625180697
\ No newline at end of file