monadcryptorandom 0.4 → 0.4.1
raw patch · 2 files changed
+3/−3 lines, 2 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Control.Monad.CryptoRandom: class CRandom a
+ Control.Monad.CryptoRandom: class CRandom a where crandoms g = case crandom g of { Left _ -> [] Right (a, g') -> a : crandoms g' }
- Control.Monad.CryptoRandom: class CRandomR a
+ Control.Monad.CryptoRandom: class CRandomR a where crandomRs r g = case crandomR r g of { Left _ -> [] Right (a, g') -> a : crandomRs r g' }
Files
Control/Monad/CryptoRandom.hs view
@@ -162,8 +162,8 @@ in case offset of Left err -> Left err Right (bs, g') ->- let res = fromIntegral $ fromIntegral low + (bs2i bs .&. mask)- in if res > high then go g' else Right (res, g')+ let res = fromIntegral low + (bs2i bs .&. mask)+ in if res > fromIntegral high then go g' else Right (fromIntegral res, g') {-# INLINE crandomR_Num #-} wrap :: (Monad m, ContainsGenError e, Error e) => (g -> Either GenError (a,g)) -> CRandT g e m a
monadcryptorandom.cabal view
@@ -1,5 +1,5 @@ name: monadcryptorandom-version: 0.4+version: 0.4.1 license: BSD3 license-file: LICENSE copyright: Thomas DuBuisson <thomas.dubuisson@gmail.com>