on master help sign in
Support hspec >= 2.9 in servant-swagger tests
commit256cec566f603c6c66947fa91026d5e0e0a9068a authorMaxim Koltsov <kolmax94@gmail.com> dateTue 22 Mar 2022, 22:42 (5 years ago) parentced5f1a
2 files changed+9−9
servant-swagger/src/Servant/Swagger.hs+3−3 servant-swagger/src/Servant/Swagger/Internal/Test.hs+6−6
servant-swagger/src/Servant/Swagger.hs+3−3
@@ -160,11 +160,11 @@ import Servant.Swagger.Internal.Orphans ()
160160-- >>> instance Arbitrary UserId where arbitrary = UserId <$> arbitrary
161161-- >>> hspec $ validateEveryToJSON (Proxy :: Proxy UserAPI)
162162-- <BLANKLINE>
163−-- [User]
163+-- [User]...
164164-- ...
165−-- User
165+-- User...
166166-- ...
167−-- UserId
167+-- UserId...
168168-- ...
169169-- Finished in ... seconds
170170-- 3 examples, 0 failures
servant-swagger/src/Servant/Swagger/Internal/Test.hs+6−6
@@ -53,10 +53,10 @@ import Servant.Swagger.Internal.TypeLevel
5353--
5454-- >>> hspec $ context "ToJSON matches ToSchema" $ validateEveryToJSON (Proxy :: Proxy UserAPI)
5555-- <BLANKLINE>
56−-- ToJSON matches ToSchema
57−-- User
56+-- ToJSON matches ToSchema...
57+-- User...
5858-- ...
59−-- UserId
59+-- UserId...
6060-- ...
6161-- Finished in ... seconds
6262-- 2 examples, 0 failures
@@ -118,11 +118,11 @@ validateEveryToJSONWithPatternChecker checker _ = props
118118-- :}
119119-- <BLANKLINE>
120120-- read . show == id
121−-- Bool
121+-- Bool...
122122-- ...
123−-- Int
123+-- Int...
124124-- ...
125−-- [Char]
125+-- [Char]...
126126-- ...
127127-- Finished in ... seconds
128128-- 3 examples, 0 failures