make QC run more tests

This commit is contained in:
Hongrui Fang 2022-11-12 00:03:02 +08:00
parent bcb147a716
commit 7056644bd7

View file

@ -291,7 +291,7 @@ props =
] ]
where where
go :: QuickCheckTests -> QuickCheckTests go :: QuickCheckTests -> QuickCheckTests
go = min 2000 go = max 20_000
loudEval :: loudEval ::
forall (p :: S -> Type). forall (p :: S -> Type).