Merge pull request #47 from idontgetoutmuch/randomgen-annotate

Add MINIMAL annotation to RandomGen
haskell · May 19, 2020 · a3b09d2 · a3b09d2
2 parents 85a0a4d + 2270866
commit a3b09d2
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/System/Random.hs b/System/Random.hs
@@ -262,6 +262,7 @@ mutableByteArrayContentsCompat :: MutableByteArray s -> Ptr Word8
 {-# DEPRECATED next "Use genWord32[R] or genWord64[R]" #-}
 {-# DEPRECATED genRange "Use genWord32[R] or genWord64[R]" #-}
 class RandomGen g where
+  {-# MINIMAL (next,genRange)|((genWord32|genWord32R),(genWord64|genWord64R)) #-}
   -- |The 'next' operation returns an 'Int' that is uniformly
   -- distributed in the range returned by 'genRange' (including both
   -- end points), and a new generator. Using 'next' is inefficient as