project-m36-0.8.1: src/bin/ProjectM36/Client/Json.hs

{-# OPTIONS_GHC -fno-warn-orphans #-}
module ProjectM36.Client.Json where
import Data.Aeson
import ProjectM36.Server.RemoteCallTypes.Json ()
import ProjectM36.Client
import ProjectM36.TransactionGraph
import Control.Exception (IOException)

instance ToJSON EvaluatedNotification
instance FromJSON EvaluatedNotification

instance ToJSON ConnectionError

instance ToJSON IOException where
  toJSON err = object ["IOException" .= show err]

instance ToJSON MerkleValidationError