diff --git a/test/Model/TypesSpec.hs b/test/Model/TypesSpec.hs index 24f5bc4d2..ed98ad9b5 100644 --- a/test/Model/TypesSpec.hs +++ b/test/Model/TypesSpec.hs @@ -363,7 +363,7 @@ instance Arbitrary SemVer.Version where <*> fmap getNonNegative arbitrary <*> fmap getNonNegative arbitrary <*> arbitrary - <*> arbitrary + <*> mempty -- Ord SemVer.Version ignores Metadata, so the Ord properties don't hold instance Arbitrary SemVer.Identifier where arbitrary = -- oneof