descriptive 0.4.2 → 0.4.3
raw patch · 2 files changed
+9/−3 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- descriptive.cabal +1/−1
- src/Descriptive/JSON.hs +8/−2
descriptive.cabal view
@@ -1,5 +1,5 @@ name: descriptive-version: 0.4.2+version: 0.4.3 synopsis: Self-describing consumers/parsers; forms, cmd-line args, JSON, etc. description: Self-describing consumers/parsers. See the README.md for more information. It is currently EXPERIMENTAL. stability: Experimental
src/Descriptive/JSON.hs view
@@ -204,7 +204,10 @@ -> Consumer s Doc a label desc = wrap (\s d -> (Wrap doc (fst (d s)),s))- (\s _ p -> p s)+ (\s _ p ->+ case p s of+ (Failed e,s') -> (Failed (Wrap doc e),s')+ k -> k) where doc = Label desc -- | Wrap a consumer with some handy information.@@ -213,5 +216,8 @@ -> Consumer s Doc a info desc = wrap (\s d -> (Wrap doc (fst (d s)),s))- (\s _ p -> p s)+ (\s _ p ->+ case p s of+ (Failed e,s') -> (Failed (Wrap doc e),s')+ k -> k) where doc = Info desc