- remove references to PrelUnsafe(ST)
import Prelude
import PrelConc
import PrelST
-import PrelUnsafe ( unsafeInterleaveIO )
+import PrelIOBase ( unsafeInterleaveIO )
\end{code}
A channel is represented by two @MVar@s keeping track of the two ends
import Semaphore
import PrelConc
-import PrelUnsafe ( unsafeInterleaveIO )
import PrelIOBase
max_buff_size = 1
import PrelIOBase
import PrelHandle ( openFileEx, IOModeEx(..) )
import PrelST
-import PrelUnsafe
import PrelArr
import PrelGHC
import Ix
) where
import PrelArr
-import PrelUnsafeST
import PrelST
import PrelBase ( Eq(..), Int, Bool, ($), ()(..) )
import Monad