On Mon 30 Jan 2012 23:31, [email protected] (Ludovic Courtès) writes: > The ‘set-pointer-finalizer!’ procedure is harmful because it erases any > previously set finalizer. > > Said finalizer could come from a guardian: > > (define ptr (make-pointer 123)) > (define g (make-guardian)) > (g ptr) > (set-pointer-finalizer! ptr (dynamic-func "scm_is_pair" (dynamic-link))) > (set! ptr #f) > (gc) > > (g) ;; Should return PTR. > => #f
This has worked since 75ba64d6797f5857cc9885eb753126119a8c8b68. Andy -- http://wingolog.org/
