test(study-modules): add missing Arbitrary instance

2021-12-28 22:19:27 +01:00 · 2021-12-28 22:19:27 +01:00 · bbf822d63e
commit bbf822d63e
parent dbc5e99109
1 changed files with 4 additions and 0 deletions
--- a/test/ModelSpec.hs
+++ b/test/ModelSpec.hs
@ -198,6 +198,10 @@ instance Arbitrary VerpMode where
  arbitrary = genericArbitrary
  shrink = genericShrink

+instance Arbitrary StudyModule where
+  arbitrary = genericArbitrary
+  shrink = genericShrink
+

 spec :: Spec
 spec = do