hw-excess 0.1.0.0 → 0.1.0.1

raw patch · 3 files changed

+9/−9 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• hw-excess.cabal +1/−1
• src/HaskellWorks/Data/Excess/MinMaxExcess0.hs +4/−4
• src/HaskellWorks/Data/Excess/MinMaxExcess1.hs +4/−4

@@ -1,5 +1,5 @@ name:                   hw-excess-version:                0.1.0.0+version:                0.1.0.1 synopsis:               Excess description:            Please see README.md homepage:               http://github.com/haskell-works/hw-excess#readme

@@ -86,28 +86,28 @@   {-# INLINE minMaxExcess0 #-}  instance MinMaxExcess0 (DVS.Vector Word8) where-  minMaxExcess0 = DVS.foldl gen (0, 0, 0)+  minMaxExcess0 = DVS.foldl' gen (0, 0, 0)     where gen :: (MinExcess, Excess, MaxExcess) -> Word8 -> (MinExcess, Excess, MaxExcess)           gen (minE, e, maxE) w = let (wMinE, wE, wMaxE) = minMaxExcess0 w  in                                   (minE `min` (wMinE + e), e + wE, maxE `max` (wMaxE + e))   {-# INLINE minMaxExcess0 #-}  instance MinMaxExcess0 (DVS.Vector Word16) where-  minMaxExcess0 = DVS.foldl gen (0, 0, 0)+  minMaxExcess0 = DVS.foldl' gen (0, 0, 0)     where gen :: (MinExcess, Excess, MaxExcess) -> Word16 -> (MinExcess, Excess, MaxExcess)           gen (minE, e, maxE) w = let (wMinE, wE, wMaxE) = minMaxExcess0 w  in                                   (minE `min` (wMinE + e), e + wE, maxE `max` (wMaxE + e))   {-# INLINE minMaxExcess0 #-}  instance MinMaxExcess0 (DVS.Vector Word32) where-  minMaxExcess0 = DVS.foldl gen (0, 0, 0)+  minMaxExcess0 = DVS.foldl' gen (0, 0, 0)     where gen :: (MinExcess, Excess, MaxExcess) -> Word32 -> (MinExcess, Excess, MaxExcess)           gen (minE, e, maxE) w = let (wMinE, wE, wMaxE) = minMaxExcess0 w  in                                   (minE `min` (wMinE + e), e + wE, maxE `max` (wMaxE + e))   {-# INLINE minMaxExcess0 #-}  instance MinMaxExcess0 (DVS.Vector Word64) where-  minMaxExcess0 = DVS.foldl gen (0, 0, 0)+  minMaxExcess0 = DVS.foldl' gen (0, 0, 0)     where gen :: (MinExcess, Excess, MaxExcess) -> Word64 -> (MinExcess, Excess, MaxExcess)           gen (minE, e, maxE) w = let (wMinE, wE, wMaxE) = minMaxExcess0 w  in                                   (minE `min` (wMinE + e), e + wE, maxE `max` (wMaxE + e))

@@ -86,28 +86,28 @@   {-# INLINE minMaxExcess1 #-}  instance MinMaxExcess1 (DVS.Vector Word8) where-  minMaxExcess1 = DVS.foldl gen (0, 0, 0)+  minMaxExcess1 = DVS.foldl' gen (0, 0, 0)     where gen :: (MinExcess, Excess, MaxExcess) -> Word8 -> (MinExcess, Excess, MaxExcess)           gen (minE, e, maxE) w = let (wMinE, wE, wMaxE) = minMaxExcess1 w  in                                   (minE `min` (wMinE + e), e + wE, maxE `max` (wMaxE + e))   {-# INLINE minMaxExcess1 #-}  instance MinMaxExcess1 (DVS.Vector Word16) where-  minMaxExcess1 = DVS.foldl gen (0, 0, 0)+  minMaxExcess1 = DVS.foldl' gen (0, 0, 0)     where gen :: (MinExcess, Excess, MaxExcess) -> Word16 -> (MinExcess, Excess, MaxExcess)           gen (minE, e, maxE) w = let (wMinE, wE, wMaxE) = minMaxExcess1 w  in                                   (minE `min` (wMinE + e), e + wE, maxE `max` (wMaxE + e))   {-# INLINE minMaxExcess1 #-}  instance MinMaxExcess1 (DVS.Vector Word32) where-  minMaxExcess1 = DVS.foldl gen (0, 0, 0)+  minMaxExcess1 = DVS.foldl' gen (0, 0, 0)     where gen :: (MinExcess, Excess, MaxExcess) -> Word32 -> (MinExcess, Excess, MaxExcess)           gen (minE, e, maxE) w = let (wMinE, wE, wMaxE) = minMaxExcess1 w  in                                   (minE `min` (wMinE + e), e + wE, maxE `max` (wMaxE + e))   {-# INLINE minMaxExcess1 #-}  instance MinMaxExcess1 (DVS.Vector Word64) where-  minMaxExcess1 = DVS.foldl gen (0, 0, 0)+  minMaxExcess1 = DVS.foldl' gen (0, 0, 0)     where gen :: (MinExcess, Excess, MaxExcess) -> Word64 -> (MinExcess, Excess, MaxExcess)           gen (minE, e, maxE) w = let (wMinE, wE, wMaxE) = minMaxExcess1 w  in                                   (minE `min` (wMinE + e), e + wE, maxE `max` (wMaxE + e))