From 91b3fdc7b288bbbef430832c8841d68c81d49270 Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Mon, 16 Sep 2019 11:44:39 +0200 Subject: [PATCH] chore: fix tests --- src/Foundation.hs | 1 + test/FoundationSpec.hs | 4 ++++ 2 files changed, 5 insertions(+) diff --git a/src/Foundation.hs b/src/Foundation.hs index cf8f8d601..3f70dd564 100644 --- a/src/Foundation.hs +++ b/src/Foundation.hs @@ -157,6 +157,7 @@ deriving instance Generic ExamR deriving instance Generic CourseApplicationR deriving instance Generic AllocationR deriving instance Generic SchoolR +deriving instance Generic ExamOfficeR deriving instance Generic (Route UniWorX) -- | Convenient Type Synonyms: diff --git a/test/FoundationSpec.hs b/test/FoundationSpec.hs index b2f2c1fa5..2386c7ba6 100644 --- a/test/FoundationSpec.hs +++ b/test/FoundationSpec.hs @@ -60,6 +60,10 @@ instance Arbitrary AllocationR where arbitrary = genericArbitrary shrink = genericShrink +instance Arbitrary ExamOfficeR where + arbitrary = genericArbitrary + shrink = genericShrink + instance Arbitrary (Route UniWorX) where arbitrary = genericArbitrary shrink = genericShrink