json-schema 0.7.3.7 → 0.7.4.0

raw patch · 3 files changed

+14/−5 lines, 3 filesdep ~aesondep ~generic-derivingdep ~tasty

Dependency ranges changed: aeson, generic-deriving, tasty

Files

• CHANGELOG.md +6/−0
• json-schema.cabal +3/−3
• src/Data/JSON/Schema/Types.hs +5/−2

@@ -1,8 +1,14 @@ # Changelog +### 0.7.4.0++* Raise upper length limit of `UTCTime` since aeson-0.9 increased the precision.+* Add `JSONSchema Aeson.Value` instance.+ #### 0.7.3.7  * Allow `generic-deriving 1.8.*`+* Allow `vector 0.11.*`  #### 0.7.3.6 

@@ -1,5 +1,5 @@ name:                json-schema-version:             0.7.3.7+version:             0.7.4.0 synopsis:            Types and type classes for defining JSON schemas. description:         Types and type classes for defining JSON schemas.                      .@@ -44,7 +44,7 @@     , text >= 0.10 && < 1.3     , time >= 1.2 && < 1.6     , unordered-containers == 0.2.*-    , vector == 0.10.*+    , vector >= 0.10 && < 0.12   -- Data.Proxy.Proxy   if impl(ghc < 7.8)     build-depends: tagged >= 0.2 && < 0.9@@ -73,7 +73,7 @@     , tasty-hunit == 0.9.*     , tasty-th == 0.1.*     , text >= 0.10 && < 1.3-    , vector == 0.10.*+    , vector >= 0.10 && < 0.12   if impl(ghc < 7.8)     build-depends: tagged >= 0.2 && < 0.9   if impl(ghc < 7.6)

@@ -1,8 +1,8 @@ {-# LANGUAGE     FlexibleInstances   , OverloadedStrings-  , TypeSynonymInstances   , ScopedTypeVariables+  , TypeSynonymInstances   #-} -- | Types for defining JSON schemas. module Data.JSON.Schema.Types@@ -159,10 +159,13 @@   schema = Map . schema . fmap (head . H.elems)  instance JSONSchema UTCTime where-  schema _ = Value LengthBound { lowerLength = Just 20, upperLength = Just 24 }+  schema _ = Value LengthBound { lowerLength = Just 20, upperLength = Just 33 }  instance JSONSchema a => JSONSchema (S.Set a) where   schema = Array unboundedLength True . schema . fmap S.findMin++instance JSONSchema Aeson.Value where+  schema _ = Any  instance (JSONSchema a, JSONSchema b) => JSONSchema (a, b) where   schema s = Tuple