aboutsummaryrefslogtreecommitdiff
path: root/examples/fact.micro
diff options
context:
space:
mode:
authorJuan J. Martinez <jjm@usebox.net>2022-07-18 12:12:28 +0100
committerJuan J. Martinez <jjm@usebox.net>2022-07-18 12:12:28 +0100
commitb6b68929a7efb19962795211c58d52dd08249235 (patch)
treed3f3307382626d39f4b483db6d2a5b53acc28ab6 /examples/fact.micro
parentf7686379eb2fdc740b76a714f80435b71be9c24c (diff)
downloadmicro-lang-b6b68929a7efb19962795211c58d52dd08249235.tar.gz
micro-lang-b6b68929a7efb19962795211c58d52dd08249235.zip
Added examples
Diffstat (limited to 'examples/fact.micro')
-rw-r--r--examples/fact.micro15
1 files changed, 15 insertions, 0 deletions
diff --git a/examples/fact.micro b/examples/fact.micro
new file mode 100644
index 0000000..29b73c3
--- /dev/null
+++ b/examples/fact.micro
@@ -0,0 +1,15 @@
+//
+// Factorial, with recursive tail call optimization
+//
+
+def fact(n number, acc number) number {
+ if n == 1 {
+ return acc;
+ } else {
+ return fact(n - 1, acc * n);
+ }
+}
+
+
+println("fact 20: ", fact(20, 1));
+