summaryrefslogtreecommitdiff
path: root/jni/ruby/benchmark/other-lang/fact.scm
diff options
context:
space:
mode:
authorJari Vetoniemi <jari.vetoniemi@indooratlas.com>2020-03-16 18:49:26 +0900
committerJari Vetoniemi <jari.vetoniemi@indooratlas.com>2020-03-30 00:39:06 +0900
commitfcbf63e62c627deae76c1b8cb8c0876c536ed811 (patch)
tree64cb17de3f41a2b6fef2368028fbd00349946994 /jni/ruby/benchmark/other-lang/fact.scm
Fresh start
Diffstat (limited to 'jni/ruby/benchmark/other-lang/fact.scm')
-rw-r--r--jni/ruby/benchmark/other-lang/fact.scm8
1 files changed, 8 insertions, 0 deletions
diff --git a/jni/ruby/benchmark/other-lang/fact.scm b/jni/ruby/benchmark/other-lang/fact.scm
new file mode 100644
index 0000000..c98a7fe
--- /dev/null
+++ b/jni/ruby/benchmark/other-lang/fact.scm
@@ -0,0 +1,8 @@
+(define (fact n)
+ (if (< n 2)
+ 1
+ (* n (fact (- n 1)))))
+
+(dotimes (i 10000)
+ (fact 100))
+