On Thu, Aug 14, 2014 at 11:54 AM, Christian Höner zu Siederdissen <
[email protected]> wrote:

> go xs = unsafePerformIO $ do
>   forM_ xs $ cfun
>   return $ somethingUnhealthy
>

I wonder if this is your real problem. `unsafePerformIO` does some extra
locking; the FFI specifies a function `unsafeLocalState`, which in GHC is
`unsafeDupablePerformIO` which skips the extra locking.

-- 
brandon s allbery kf8nh                               sine nomine associates
[email protected]                                  [email protected]
unix, openafs, kerberos, infrastructure, xmonad        http://sinenomine.net
_______________________________________________
Glasgow-haskell-users mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/glasgow-haskell-users

Reply via email to