On 7/7/07, Lukas Mai <[EMAIL PROTECTED]> wrote:

If I understand this correctly, spin should be written as:

spin = do
    block $ do
        (t, _) <- accept s
        unblock (forkIO $ doStuff t) `finally` sClose t
    spin


I think the `finally` portion should be done in the forked process context.
Otherwise once the process is forked, the socket gets closed by the parent
process. Something more along the lines of:

unblock (forkIO $ doStuff t `finally` sClose t)

--
Rich

JID: [EMAIL PROTECTED]
AIM: rnezzy
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to