X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=GHC%2FWeak.lhs;h=92e1eb89b039f59a0f6232e9271091e35bcdb2d8;hb=a223a71a0d40523d2fb3a6b84b5da37d9fc719b8;hp=2d9163e37f64e93cc1b2c1c6e3ed2ba4ee479cca;hpb=73c4a36a4f5140f4444feacfdafb466c6f940b26;p=ghc-base.git

diff --git a/GHC/Weak.lhs b/GHC/Weak.lhs
index 2d9163e..92e1eb8 100644
--- a/GHC/Weak.lhs
+++ b/GHC/Weak.lhs
@@ -1,6 +1,14 @@
 \begin{code}
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP
+           , NoImplicitPrelude
+           , BangPatterns
+           , MagicHash
+           , UnboxedTuples
+           , DeriveDataTypeable
+           , StandaloneDeriving
+  #-}
 {-# OPTIONS_HADDOCK hide #-}
+
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  GHC.Weak
@@ -20,7 +28,6 @@ module GHC.Weak where
 
 import GHC.Base
 import Data.Maybe
-import GHC.IOBase       ( IO(..), unIO )
 import Data.Typeable
 
 {-|