haskell/cryptonite
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

[number] rename generate into generateParams

Browse Source
This commit is contained in:
Vincent Hanquez 2015-05-23 09:15:42 +01:00
parent 27dacbfb21
commit cddac096cd
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
Crypto/Number/Generate.hs
View File

@ -7,7 +7,7 @@
module Crypto.Number.Generate module Crypto.Number.Generate
( GenTopPolicy(..) ( GenTopPolicy(..)
, generate , generateParams
, generateMax , generateMax
, generateBetween , generateBetween
, generateOfSize , generateOfSize
@ -41,12 +41,12 @@ data GenTopPolicy =
-- If @generateOdd is set to 'True', then the number generated -- If @generateOdd is set to 'True', then the number generated
-- is guaranteed to be odd. Otherwise it will be whatever is generated -- is guaranteed to be odd. Otherwise it will be whatever is generated
-- --
generate :: MonadRandom m generateParams :: MonadRandom m
=> Int -- ^ number of bits => Int -- ^ number of bits
-> Maybe GenTopPolicy -- ^ top bit policy -> Maybe GenTopPolicy -- ^ top bit policy
-> Bool -- ^ force the number to be odd -> Bool -- ^ force the number to be odd
-> m Integer -> m Integer
generate bits genTopPolicy generateOdd generateParams bits genTopPolicy generateOdd
| bits <= 0 = return 0 | bits <= 0 = return 0
| otherwise = os2ip . tweak <$> getRandomBytes bytes | otherwise = os2ip . tweak <$> getRandomBytes bytes
where where