Fix build breakage.
authorSean <burton.seanr@gmail.com>
Mon, 2 Nov 2015 15:58:01 +0000 (15:58 +0000)
committerSean <burton.seanr@gmail.com>
Mon, 2 Nov 2015 16:02:56 +0000 (16:02 +0000)
Data/ByteString.hs

index 9086f82..22afdf0 100644 (file)
@@ -279,6 +279,11 @@ import GHC.Prim                 (Word#)
 import GHC.Base                 (build)
 import GHC.Word hiding (Word8)
 
+#if !(MIN_VERSION_BASE(4,7,0))
+finiteBitSize :: Bits a => a -> Int
+finiteBitSize = bitSize
+#endif
+
 -- -----------------------------------------------------------------------------
 -- Introducing and eliminating 'ByteString's