Permalink
Browse files

Build with older GHC

  • Loading branch information...
1 parent ea00e87 commit f7d6643d11523c0823f592cbe1d02322eb9481e1 @bos committed Oct 2, 2012
Showing with 5 additions and 0 deletions.
  1. +5 −0 Data/Hashable/SipHash.hs
View
5 Data/Hashable/SipHash.hs
@@ -144,3 +144,8 @@ peekLE64 p = do
(b1 `shiftL` 8) .|. b0
return (fromWord64 w)
#endif
+
+#if !MIN_VERSION_base(4,5,0)
+unsafeShiftL :: Word64 -> Int -> Word64
+unsafeShiftL = shiftL
+#endif

0 comments on commit f7d6643

Please sign in to comment.