SRFI-9: Set the `record-constructor' slot of the RTD.
[bpt/guile.git] / gc-benchmarks / loop.scm
CommitLineData
8da56ffc
LC
1(let loop ((i 10000000))
2 (and (> i 0)
3 (loop (1- i))))
4