Remove redundant superclass in MonadRandom

Reported by @frasertweedale
2020-02-14 06:53:15 +01:00 · 2020-02-14 06:53:15 +01:00 · 43a9967b1d
commit 43a9967b1d
parent 86470d5563
1 changed files with 1 additions and 1 deletions
--- a/Crypto/Random/Types.hs
+++ b/Crypto/Random/Types.hs
@ -17,7 +17,7 @@ import Crypto.Random.Entropy
 import Crypto.Internal.ByteArray

 -- | A monad constraint that allows to generate random bytes
-class (Functor m, Monad m) => MonadRandom m where
+class Monad m => MonadRandom m where
    getRandomBytes :: ByteArray byteArray => Int -> m byteArray

 -- | A Deterministic Random Generator (DRG) class