X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=bundles%2Forg.simantics.scl.compiler%2FsclTests%2FSCL%2FFunctions.sts;fp=bundles%2Forg.simantics.scl.compiler%2FsclTests%2FSCL%2FFunctions.sts;h=76348b876f6badb21d011501bd59a93d03c6887e;hp=0000000000000000000000000000000000000000;hb=969bd23cab98a79ca9101af33334000879fb60c5;hpb=866dba5cd5a3929bbeae85991796acb212338a08

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
index 000000000..76348b876
--- /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