diff options
Diffstat (limited to 'Serialization.hs')
-rw-r--r-- | Serialization.hs | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/Serialization.hs b/Serialization.hs new file mode 100644 index 0000000..6940550 --- /dev/null +++ b/Serialization.hs @@ -0,0 +1,15 @@ +module Serialization ( + module Data.Aeson, + Serialize, + Generic, + sumOptions +) where + +import GHC.Generics (Generic) +import Data.Serialize +import Data.Aeson +import qualified Data.Aeson.Types as Aeson + +-- | Nicer JSON encoding for sum types. +sumOptions :: Aeson.Options +sumOptions = defaultOptions { Aeson.sumEncoding = Aeson.ObjectWithSingleField } |