Hello Neil,

Wednesday, May 2, 2007, 7:00:05 PM, you wrote:
> {-# NOINLINE wrapIO #-}
> wrapIO x = unsafePerformIO (x >>= return)

-fno-cse ? it's usual company for unsafePerformIO+NOINLINE :)


-- 
Best regards,
 Bulat                            mailto:[EMAIL PROTECTED]

_______________________________________________
Glasgow-haskell-users mailing list
Glasgow-haskell-users@haskell.org
http://www.haskell.org/mailman/listinfo/glasgow-haskell-users

Reply via email to