registry-aeson 0.3.0.0 → 0.3.1.0
raw patch · 3 files changed
+9/−9 lines, 3 filesdep ~textPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: text
API changes (from Hackage documentation)
Files
- registry-aeson.cabal +4/−4
- test/Test/Data/Registry/Aeson/DecoderSpec.hs +1/−1
- test/Test/Data/Registry/Aeson/RoundtripSpec.hs +4/−4
registry-aeson.cabal view
@@ -1,11 +1,11 @@ cabal-version: 1.12 --- This file has been generated from package.yaml by hpack version 0.35.0.+-- This file has been generated from package.yaml by hpack version 0.35.2. -- -- see: https://github.com/sol/hpack name: registry-aeson-version: 0.3.0.0+version: 0.3.1.0 synopsis: Aeson encoders / decoders description: This library provides encoders / decoders which can be easily customized for the Aeson format. category: Data@@ -55,7 +55,7 @@ , protolude ==0.3.* , registry >=0.4 && <1 , template-haskell >=2.13 && <3.0- , text ==1.*+ , text >=1 && <3 , transformers >=0.5 && <2 , unordered-containers >=0.2 && <1 , vector >=0.1 && <1@@ -107,7 +107,7 @@ , string-qq , tasty , template-haskell >=2.13 && <3.0- , text ==1.*+ , text >=1 && <3 , time , transformers >=0.5 && <2 , unordered-containers >=0.2 && <1
test/Test/Data/Registry/Aeson/DecoderSpec.hs view
@@ -64,7 +64,7 @@ checkErrors @Person "{'email':{'_email':123},'identifier':123}" "Cannot decode the type 'Person' >> 'email :: Email' >> '_email :: Text' >> parsing Text failed, expected String, but encountered Number" checkErrors @Team "{'name':'team1', 'members': [{'email':{'_email':'1'},'identifier':1}, {'email':{'_email':2},'identifier':2}], 'leaderName':'me'}"- "Cannot decode the type 'Team' >> 'members :: [] Person' >> 'email :: Email' >> '_email :: Text' >> parsing Text failed, expected String, but encountered Number"+ "Cannot decode the type 'Team' >> 'members :: List Person' >> 'email :: Email' >> '_email :: Text' >> parsing Text failed, expected String, but encountered Number" checkErrors @Team "{'name':'team1', 'members': [{'email':{'_email':'1'},'identifier':1}, {'email':{'_email':'2'},'identifier':2}], 'leaderName':123}" "Cannot decode the type 'Team' >> 'leaderName :: Maybe Text' >> parsing Text failed, expected String, but encountered Number"
test/Test/Data/Registry/Aeson/RoundtripSpec.hs view
@@ -82,8 +82,8 @@ roundtrip :: forall a. (Show a, Eq a, Typeable a) => PropertyT IO () roundtrip = withFrozenCallStack $ do- a <- forall @a- options <- forall @Options+ a <- for_all @a+ options <- for_all @Options let encoder = make @(Encoder a) (val options <: encoders) let decoder = make @(Decoder a) (val options <: decoders) let encoded = BL.fromStrict $ encodeByteString encoder a@@ -181,8 +181,8 @@ -- Generators -forall :: forall a. (Show a, Typeable a) => PropertyT IO a-forall = forAll $ make @(Gen a) generators+for_all :: forall a. (Show a, Typeable a) => PropertyT IO a+for_all = forAll $ make @(Gen a) generators generators = tweak @(Gen SumEncoding) (fmap adjustTaggedObject) $