import Control.Monad.ST.Lazy
import qualified Data.STRef as ST
+import Prelude
newSTRef :: a -> ST s (ST.STRef s a)
readSTRef :: ST.STRef s a -> ST s a
import Control.Exception (Exception, handleJust, throwTo, bracket)
import Data.Typeable
import Data.Unique (Unique, newUnique)
+import GHC.Num
-- An internal type that is thrown as a dynamic exception to
-- interrupt the running IO computation when the timeout has
ForeignFunctionInterface, UnliftedFFITypes,
DeriveDataTypeable, GeneralizedNewtypeDeriving,
FlexibleInstances, StandaloneDeriving,
- PatternGuards, EmptyDataDecls
+ PatternGuards, EmptyDataDecls, NoImplicitPrelude
if impl(ghc < 6.10)
-- PatternSignatures was deprecated in 6.10