Yuval Langer <yuval.lan...@gmail.com> writes:

> diff --git a/doc/ref/srfi-modules.texi b/doc/ref/srfi-modules.texi
> index d77bc1c90..1373409f0 100644
> --- a/doc/ref/srfi-modules.texi
> +++ b/doc/ref/srfi-modules.texi
> @@ -3367,8 +3367,9 @@ The second syntax can be used to create anonymous 
> recursive functions:
>  
>  @lisp
>    guile> (define tmp (rec (display-n item n)
> -                       (if (positive? n)
> -                           (begin (display n) (display-n (- n 1))))))
> +                       (when (positive? n)
> +                           (display item)
> +                           (display-n item (- n 1)))))
>    guile> (tmp 42 3)
>    424242
>    guile>

Looks good overall -- strictly speaking, might need a (newline) in there
if we want the output to match (or the output could be changed).

-- 
Rob Browning
rlb @defaultvalue.org and @debian.org
GPG as of 2011-07-10 E6A9 DA3C C9FD 1FF8 C676 D2C4 C0F0 39E9 ED1B 597A
GPG as of 2002-11-03 14DD 432F AE39 534D B592 F9A0 25C8 D377 8C7E 73A4



Reply via email to