Remove an unused import

[ghc-base.git] / GHC / Exts.hs

diff --git a/GHC/Exts.hs b/GHC/Exts.hs
index 2baf420..bc36771 100644 (file)
--- a/GHC/Exts.hs
+++ b/GHC/Exts.hs
@@ -15,9 +15,13 @@
 module GHC.Exts
        (
         -- * Representations of some basic types
-        Int(..),Word(..),Float(..),Double(..),Integer(..),Char(..),
+        Int(..),Word(..),Float(..),Double(..),
+        Char(..),
         Ptr(..), FunPtr(..),
 
+        -- * The maximum tuple size
+        maxTupleSize,
+
         -- * Primitive operations
         module GHC.Prim,
         shiftL#, shiftRL#, iShiftL#, iShiftRA#, iShiftRL#,
@@ -47,12 +51,15 @@ import GHC.Prim
 import GHC.Base
 import GHC.Word
 import GHC.Int
-import GHC.Num
 import GHC.Float
 import GHC.Ptr
 import Data.String
 import Data.List
 
+-- XXX This should really be in Data.Tuple, where the definitions are
+maxTupleSize :: Int
+maxTupleSize = 62
+
 -- | The 'Down' type allows you to reverse sort order conveniently.  A value of type
 -- @'Down' a@ contains a value of type @a@ (represented as @'Down' a@).
 -- If @a@ has an @'Ord'@ instance associated with it then comparing two