Re: [Chicken-users] Named let*

[Jim Ursetto]

On May 27, 2013, at 4:14 PM, Michele La Monaca <address@hidden> 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)))))