Fix warnings in ghc-prim modules
authorIan Lynagh <igloo@earth.li>
Tue, 24 Jun 2008 12:26:18 +0000 (12:26 +0000)
committerIan Lynagh <igloo@earth.li>
Tue, 24 Jun 2008 12:26:18 +0000 (12:26 +0000)
GHC/Bool.hs
GHC/IntWord32.hs
GHC/IntWord64.hs
GHC/Ordering.hs

index c4389a4..39cb5e1 100644 (file)
@@ -4,7 +4,7 @@
 module GHC.Bool where
 
 -- We need Inl etc behind the scenes for the Bool definition
-import GHC.Generics
+import GHC.Generics ()
 
 default ()
 
index 7eac21b..af4a391 100644 (file)
@@ -24,11 +24,10 @@ module GHC.IntWord32 (
 #endif
  ) where
 
+#if WORD_SIZE_IN_BITS < 32
 import GHC.Bool
 import GHC.Prim
 
-#if WORD_SIZE_IN_BITS < 32
-
 foreign import unsafe "stg_eqWord32"      eqWord32#      :: Word32# -> Word32# -> Bool
 foreign import unsafe "stg_neWord32"      neWord32#      :: Word32# -> Word32# -> Bool
 foreign import unsafe "stg_ltWord32"      ltWord32#      :: Word32# -> Word32# -> Bool
index 29f353c..1facda4 100644 (file)
@@ -24,11 +24,10 @@ module GHC.IntWord64 (
 #endif
  ) where
 
+#if WORD_SIZE_IN_BITS < 64
 import GHC.Bool
 import GHC.Prim
 
-#if WORD_SIZE_IN_BITS < 64
-
 foreign import ccall unsafe "hs_eqWord64"    eqWord64#      :: Word64# -> Word64# -> Bool
 foreign import ccall unsafe "hs_neWord64"    neWord64#      :: Word64# -> Word64# -> Bool
 foreign import ccall unsafe "hs_ltWord64"    ltWord64#      :: Word64# -> Word64# -> Bool
index acd92a1..ebc1e23 100644 (file)
@@ -4,7 +4,7 @@
 module GHC.Ordering where
 
 -- We need Inl etc behind the scenes for the Ordering definition
-import GHC.Generics
+import GHC.Generics ()
 
 default ()