Re: [Chicken-users] with-output-to-file broken in 4.8.0.3

[Mario Domenech Goulart]

On Tue, 02 Jul 2013 21:56:01 +0400 Aleksej Saushev <address@hidden> wrote:

> $ csi
>
> CHICKEN
> (c) 2008-2013, The Chicken Team
> (c) 2000-2007, Felix L. Winkelmann
> Version 4.8.0.3 (stability/4.8.0) (rev 091c3d9)
> netbsd-unix-gnu-x86 [ manyargs dload ptables ]
> compiled 2013-03-12 on aeryn.xorinia.dim (Darwin)
>
> ; loading /home/asau/.csirc ...
> ; loading /usr/pkg/lib/chicken/6/srfi-1.import.so ...
> ; loading library srfi-1 ...
> #;1> (let loop ((n 10)) (if (= n 0) #t (loop (- n 1))))
> #t
> #;2> (with-output-to-file "/tmp/test" (let loop ((n 10)) (if (= n 0) #t (loop 
> (- n 1)))))
>
> Error: (call-with-values) bad argument type: #t
>
>       Call history:
>
>       <eval>    (= n 0)
>       <eval>    (loop (- n 1))
>       <eval>    (- n 1)
>       <eval>    (= n 0)
>       <eval>    (loop (- n 1))
>       <eval>    (- n 1)
>       <eval>    (= n 0)
>       <eval>    (loop (- n 1))
>       <eval>    (- n 1)
>       <eval>    (= n 0)
>       <eval>    (loop (- n 1))
>       <eval>    (- n 1)
>       <eval>    (= n 0)
>       <eval>    (loop (- n 1))
>       <eval>    (- n 1)
>       <eval>    (= n 0)       <--
>
>
> ???

with-output-to-file expects a thunk as second argument.

Best wishes.
Mario
-- 
http://parenteses.org/mario