git.iko.soy/typeable/bloodhound
on master help sign in
Travis-driven-development
commit8a8492dfdd1629fa251613083bce5af60b1cc85b authorMichael Xavier <michael@michaelxavier.net> dateWed 18 Nov 2015, 15:52 (11 years ago) parent8f7ca41
2 files changed+3−3
src/Database/Bloodhound/Types.hs+1−1 tests/tests.hs+2−2
src/Database/Bloodhound/Types.hs+1−1
@@ -1342,7 +1342,7 @@ data ZeroTermsQuery = ZeroTermsNone
13421342data RangeExecution = RangeExecutionIndex
13431343 | RangeExecutionFielddata deriving (Eq, Show, Generic, Typeable)
13441344
1345−newtype Regexp = Regexp Text deriving (Eq, Show, Generic, FromJSON)
1345+newtype Regexp = Regexp Text deriving (Eq, Show, Generic, Typeable, FromJSON)
13461346
13471347data RegexpFlags = AllRegexpFlags
13481348 | NoRegexpFlags
tests/tests.hs+2−2
@@ -485,7 +485,7 @@ instance Arbitrary a => Arbitrary (NonEmpty a) where
485485arbitraryScore :: Gen Score
486486arbitraryScore = fmap getPositive <$> arbitrary
487487
488−instance Arbitrary a => Arbitrary (Hit a) where
488+instance (Arbitrary a, Typeable a) => Arbitrary (Hit a) where
489489 arbitrary = Hit <$> arbitrary
490490 <*> arbitrary
491491 <*> arbitrary
@@ -495,7 +495,7 @@ instance Arbitrary a => Arbitrary (Hit a) where
495495 shrink = genericShrink
496496
497497
498−instance Arbitrary a => Arbitrary (SearchHits a) where
498+instance (Arbitrary a, Typeable a) => Arbitrary (SearchHits a) where
499499 arbitrary = reduceSize $ do
500500 tot <- getPositive <$> arbitrary
501501 score <- arbitraryScore