import Foreign.Storable ( Storable(sizeOf) )
#ifdef __GLASGOW_HASKELL__
-import GHC.Exception ( bracket )
import GHC.IOBase
import GHC.Real
import GHC.Ptr
import GHC.Err
import GHC.Base
-#elsif defined(__HUGS__)
-import Control.Exception ( bracket )
-#else
+#elif defined(__NHC__)
import System.IO ( bracket )
+#else
+import Control.Exception ( bracket )
#endif