Import missing function on 32bit
authorLennart Kolmodin <kolmodin@dtek.chalmers.se>
Mon, 15 Oct 2007 05:14:10 +0000 (07:14 +0200)
committerLennart Kolmodin <kolmodin@dtek.chalmers.se>
Mon, 15 Oct 2007 05:14:10 +0000 (07:14 +0200)
src/Data/Binary/Builder.hs

index bf81b32..5ed59ee 100644 (file)
@@ -66,7 +66,7 @@ import qualified Data.ByteString.Lazy.Internal as L
 
 #if defined(__GLASGOW_HASKELL__) && !defined(__HADDOCK__)
 import GHC.Base
-import GHC.Word (Word32(..),Word16(..),Word64(..))
+import GHC.Word (Word32(..),Word16(..),Word64(..),uncheckedShiftRL64#)
 #endif
 
 ------------------------------------------------------------------------