unsafeInterleaveIO

[Malcolm Wallace]

"Simon Marlow" <simonmar@microsoft.com> writes:

> > 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