restore compilation with 5.04
[ghc-hetmet.git] / compiler / prelude / PrelRules.lhs
index 0775670..3863351 100644 (file)
@@ -45,7 +45,8 @@ import Outputable
 import FastString
 import StaticFlags      ( opt_SimplExcessPrecision )
 
-import Data.Bits as Bits       ( Bits(..) )
+import Data.Bits as Bits       ( Bits(..), shiftL, shiftR )
+       -- shiftL and shiftR were not always methods of Bits
 #if __GLASGOW_HASKELL__ >= 500
 import Data.Word       ( Word )
 #else