Migrated source code from Simantics SVN

[simantics/platform.git] / bundles / org.simantics.scl.compiler / sclTests / SCL / Functions.sts

diff --git a/bundles/org.simantics.scl.compiler/sclTests/SCL/Functions.sts b/bundles/org.simantics.scl.compiler/sclTests/SCL/Functions.sts
new file mode 100644 (file)
index 0000000..76348b8
--- /dev/null
+++ b/bundles/org.simantics.scl.compiler/sclTests/SCL/Functions.sts
@@ -0,0 +1,20 @@
+> id x = x
+> id 2
+2
+> id "Hello!"
+"Hello!"
+
+> id = \x -> x
+> id 2
+2
+
+> fib 0 = 1
+> fib 1 = 1
+> fib n = fib (n-1) + fib (n-2)
+
+> fib 2
+2
+> fib 3
+3
+> fib 4
+5
\ No newline at end of file