Optimize branches in the evaluator
[bpt/guile.git] / gc-benchmarks / loop.scm
CommitLineData
8da56ffc
LC
1(let loop ((i 10000000))
2 (and (> i 0)
3 (loop (1- i))))
4