* Marco Baringer (mb at bese.it) [050827 06:59]:
> (loop
> repeat 5
> do (call 'foo-bar))
If we had ucw:loop that translated this into
(labels ((theloop (n)
(when (> n 0)
(call 'foo-bar)
(theloop (1- n)))))
(theloop 5)))
everything would work great.
--larry