Add Lazy instance for Gen

purescript · Jun 18, 2017 · 6235ecc · 6235ecc
1 parent 56eb222
commit 6235ecc
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/Test/QuickCheck/Gen.purs b/src/Test/QuickCheck/Gen.purs
@@ -39,6 +39,7 @@ import Control.Monad.Rec.Class (class MonadRec, Step(..), tailRecM)
 import Control.Monad.State (State, runState, evalState)
 import Control.Monad.State.Class (state, modify)
 import Control.Monad.Gen.Class (class MonadGen)
+import Control.Lazy (class Lazy)
 
 import Data.Array ((!!), length, zip, sortBy)
 import Data.Enum (class BoundedEnum, fromEnum, toEnum)
@@ -76,6 +77,7 @@ derive newtype instance bindGen :: Bind Gen
 derive newtype instance monadGen :: Monad Gen
 derive newtype instance altGen :: Alt Gen
 derive newtype instance monadRecGen :: MonadRec Gen
+derive newtype instance lazyGen :: Lazy (Gen a)
 
 instance monadGenGen :: MonadGen Gen where
   chooseInt = chooseInt