X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fprelude%2FPrelRules.lhs;h=386335198ca81538bf643021227ebaf0023526fa;hb=8b08c15b8ace5a76e341939081fbb6ad2736ddd1;hp=07756704f6a7b44d0e9e4ed62eabd7102e803252;hpb=32995434659d9c3adb5e33d76a4a6c5daa5fc4a8;p=ghc-hetmet.git

diff --git a/compiler/prelude/PrelRules.lhs b/compiler/prelude/PrelRules.lhs
index 0775670..3863351 100644
--- a/compiler/prelude/PrelRules.lhs
+++ b/compiler/prelude/PrelRules.lhs
@@ -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