On Tue, May 28, 2013 at 2:06 AM, Jim Ursetto <[email protected]> wrote: > > On May 27, 2013, at 4:14 PM, Michele La Monaca <[email protected]> > wrote: > >> So writing down the options, we have: >> >> (let* loop ((i (random N)) (ch (string-ref buf i))) >> (do-something) >> (if (some-condition-is-true) >> (loop (+ i 1) >> (string-ref buf (+ i 1))))) >> >> vs. >> >> (let ((start (random N))) >> (let loop ((i start) (ch (string-ref buf start))) >> (do-something) >> (if (some-condition-is-true) >> (loop (+ i 1) >> (string-ref buf (+ i 1)))))) >> >> vs. >> >> (let ((ch '())) >> (let loop ((i (random N))) >> (set! ch (string-ref buf i)) >> (do-something) >> (if (some-condition-is-true) >> (loop (+ i 1))))) > > > Why not > > (let loop ((i (random N))) > (let ((ch (string-ref buf i))) > (do-something) > (if (some-condition-is-true) > (loop (+ i 1))))) >
Yes, sure. Thanks for spotting the omission. _______________________________________________ Chicken-users mailing list [email protected] https://lists.nongnu.org/mailman/listinfo/chicken-users
