Skip to content

Commit

Permalink
Generate fewer examples in prop_createPlan.
Browse files Browse the repository at this point in the history
This makes the overall test suite run time more reasonable.
  • Loading branch information
jonathanknowles committed Apr 20, 2021
1 parent cd78eae commit c3651da
Showing 1 changed file with 2 additions and 2 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -145,12 +145,12 @@ instance Arbitrary (Giant ArgsForCreatePlan) where

prop_createPlan_small :: Blind (Small ArgsForCreatePlan) -> Property
prop_createPlan_small (Blind (Small args)) =
withMaxSuccess 1000 $
withMaxSuccess 100 $
prop_createPlan args

prop_createPlan_large :: Blind (Large ArgsForCreatePlan) -> Property
prop_createPlan_large (Blind (Large args)) =
withMaxSuccess 100 $
withMaxSuccess 10 $
prop_createPlan args

prop_createPlan_giant :: Blind (Giant ArgsForCreatePlan) -> Property
Expand Down

0 comments on commit c3651da

Please sign in to comment.