basement 0.0.9 → 0.0.10
raw patch · 2 files changed
+4/−3 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- Basement/Bits.hs +3/−2
- basement.cabal +1/−1
Basement/Bits.hs view
@@ -338,11 +338,12 @@ countLeadingZeros (W# w#) = CountOf $ wordToInt (W# (clz64# w#)) countTrailingZeros (W# w#) = CountOf $ wordToInt (W# (ctz64# w#)) #else+instance FiniteBitsOps Word where numberOfBits _ = 32 rotateL (W# x#) (CountOf (I# i#)) | isTrue# (i'# ==# 0#) = W# x#- | otherwise = W# (narrow32Word# ((x# `uncheckedShiftL#` i'#) `or#`- (x# `uncheckedShiftRL#` (32# -# i'#))))+ | otherwise = W# ((x# `uncheckedShiftL#` i'#) `or#`+ (x# `uncheckedShiftRL#` (32# -# i'#))) where !i'# = word2Int# (int2Word# i# `and#` 31##) rotateR (W# x#) (CountOf (I# i#))
basement.cabal view
@@ -1,5 +1,5 @@ name: basement-version: 0.0.9+version: 0.0.10 synopsis: Foundation scrap box of array & string description: Foundation most basic primitives without any dependencies license: BSD3