11 Aug
2003
11 Aug
'03
10:27 a.m.
"Simon Marlow"
I submit that unsafeInterleaveIO hasn't worked on Hugs since at least July 2000
Can't you implement it like this: unsafeInterleaveIO io = return (unsafePerformIO io)
Indeed, in the base package, System.IO.Unsafe has the following definition for nhc98, which amounts to the same thing: unsafeInterleaveIO f = let x = unsafePerformIO f in return x Regards, Malcolm