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 15731a9 commit e7ec590
Showing 1 changed file with 2 additions and 2 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -144,12 +144,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 e7ec590

Please sign in to comment.