Re: [Chicken-users] newbie: questions about set-finalizer!

[felix winkelmann]

On Sat, Dec 20, 2008 at 4:04 PM, Alejandro Forero Cuervo
<address@hidden> wrote:
>
>> Please try attached patch. I have added it to trunk and the chicken-3
>> branch, and did some tests, but testing finalization is always somewhat
>> difficult.
>
> I tried the patch (on 3.4.0) and it did not work.
>
> Running in csi the original code in my report,
>
>  (define x (list 1 2 3))
>  (begin (set-finalizer! x (lambda (o) (format #t "Delete: ~A~%" o))) #t)
>  (define y (list 4 5 6))
>  (begin (set-finalizer! y (let ((p x)) (lambda (o) (format #t "Delete: ~A: 
> ~A~%" o p)))) #t)
>  (gc #t)
>  (set! x #f)
>  (gc #t)
>
> , still produces the "Delete (1 2 3)" message, which it shouldn't.
>

You're right. My bad. I'll try once more.


cheers,
felix