composite-aeson-writeonly (empty) → 0.1.0.0
raw patch · 5 files changed
+87/−0 lines, 5 filesdep +aesondep +aeson-better-errorsdep +base
Dependencies added: aeson, aeson-better-errors, base, composite-aeson
Files
- ChangeLog.md +5/−0
- LICENSE +19/−0
- README.md +3/−0
- composite-aeson-writeonly.cabal +34/−0
- src/Composite/Aeson/WriteOnly.hs +26/−0
+ ChangeLog.md view
@@ -0,0 +1,5 @@+# Changelog for composite-aeson-writeonly++# (v0.1.0.0)++* Add writeonly indicators `WriteOnlyJsonField`, `noRead` and `writeOnlyJsonFormat`.
+ LICENSE view
@@ -0,0 +1,19 @@+Copyright (c) 2020 Daniel Firth++Permission is hereby granted, free of charge, to any person obtaining a copy+of this software and associated documentation files (the "Software"), to deal+in the Software without restriction, including without limitation the rights+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell+copies of the Software, and to permit persons to whom the Software is+furnished to do so, subject to the following conditions:++The above copyright notice and this permission notice shall be included in all+copies or substantial portions of the Software.++THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE+SOFTWARE.
+ README.md view
@@ -0,0 +1,3 @@+# composite-aeson-writeonly++WriteOnly indicators for composite-aeson.
+ composite-aeson-writeonly.cabal view
@@ -0,0 +1,34 @@+cabal-version: 1.12++-- This file has been generated from package.yaml by hpack version 0.34.2.+--+-- see: https://github.com/sol/hpack++name: composite-aeson-writeonly+version: 0.1.0.0+synopsis: WriteOnly indicators for composite-aeson.+description: WriteOnly indicators for composite-aeson.+category: Text+author: Daniel Firth+maintainer: dan.firth@homotopic.tech+copyright: 2020 Daniel Firth+license: MIT+license-file: LICENSE+build-type: Simple+extra-source-files:+ README.md+ ChangeLog.md++library+ exposed-modules:+ Composite.Aeson.WriteOnly+ other-modules:+ Paths_composite_aeson_writeonly+ hs-source-dirs:+ src+ build-depends:+ aeson+ , aeson-better-errors+ , base >=4.7 && <5+ , composite-aeson+ default-language: Haskell2010
+ src/Composite/Aeson/WriteOnly.hs view
@@ -0,0 +1,26 @@+{- |+ Module : Composite.Aeson.WriteOnly+ License : MIT+ Stability : experimental++Exports WriteOnly indicators for JsonProfunctor.+-}+module Composite.Aeson.WriteOnly (+ WriteOnlyJsonField+, noRead+, writeOnlyJsonFormat+) where++import Composite.Aeson+import Data.Aeson+import Data.Aeson.BetterErrors+import Data.Functor.Identity++data WriteOnlyJsonField = WriteOnlyJsonField+ deriving Show++noRead :: ParseT WriteOnlyJsonField Identity a+noRead = throwCustomError WriteOnlyJsonField++writeOnlyJsonFormat :: (a -> Value) -> JsonFormat e a+writeOnlyJsonFormat f = jsonFormatWithoutCustomError $ JsonFormat $ JsonProfunctor f noRead