diff options
Diffstat (limited to 'gc-benchmarks/loop.scm')
-rw-r--r-- | gc-benchmarks/loop.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gc-benchmarks/loop.scm b/gc-benchmarks/loop.scm new file mode 100644 index 000000000..7e81e7a9e --- /dev/null +++ b/gc-benchmarks/loop.scm @@ -0,0 +1,4 @@ +(let loop ((i 10000000)) + (and (> i 0) + (loop (1- i)))) + |