On Fri, Sep 27, 2002 at 12:25:31PM +0100, Simon Marlow wrote:
> Then I'll reformulate my question as a patch. Enclosed is a
> proof-of-concept patch that implements Haskell finalizers in Hugs, which
> works on some simple tests that I've run. There's nothing particularly
> clever going on - I'm just suspending execution of the finalizers until
> the next call to eval().
It seems to have problems if more than one finalizer is pending, probably
because runIO() calls eval():
t = do
sequence_ (map f [1..30])
performGC
where f n = do
p <- mallocBytes 64
newForeignPtr p $ do
free p
putStrLn ("finalize " ++ show n)
_______________________________________________
FFI mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/ffi
