cardano-wallet-core-2022.7.1: The Wallet Backend for a Cardano node.
Copyright © 2018-2022 IOHK
License Apache-2.0
Safe Haskell None
Language Haskell2010

Cardano.Wallet.Api.Types.SchemaMetadata

Description

A wrapper around TxMetadata to allow different JSON codecs. (ADP-1596) see https://github.com/input-output-hk/cardano-node/blob/master/cardano-api/src/Cardano/Api/TxMetadata.hs

Synopsis

Documentation

data TxMetadataSchema Source #

A tag to select the json codec

Constructors

TxMetadataNoSchema
TxMetadataDetailedSchema

Instances

Instances details
Eq TxMetadataSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

Methods

(==) :: TxMetadataSchema -> TxMetadataSchema -> Bool Source #

(/=) :: TxMetadataSchema -> TxMetadataSchema -> Bool Source #

Show TxMetadataSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

Methods

showsPrec :: Int -> TxMetadataSchema -> ShowS Source #

show :: TxMetadataSchema -> String Source #

showList :: [ TxMetadataSchema ] -> ShowS Source #

Generic TxMetadataSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

Associated Types

type Rep TxMetadataSchema :: Type -> Type Source #

Methods

from :: TxMetadataSchema -> Rep TxMetadataSchema x Source #

to :: Rep TxMetadataSchema x -> TxMetadataSchema Source #

NFData TxMetadataSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

Methods

rnf :: TxMetadataSchema -> () Source #

type Rep TxMetadataSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

type Rep TxMetadataSchema = D1 (' MetaData "TxMetadataSchema" "Cardano.Wallet.Api.Types.SchemaMetadata" "cardano-wallet-core-2022.7.1-AGKhlyz9liLKN3QqZD1gj" ' False ) ( C1 (' MetaCons "TxMetadataNoSchema" ' PrefixI ' False ) ( U1 :: Type -> Type ) :+: C1 (' MetaCons "TxMetadataDetailedSchema" ' PrefixI ' False ) ( U1 :: Type -> Type ))

data TxMetadataWithSchema Source #

A wrapper to drive the json codec of metadata

Constructors

TxMetadataWithSchema

Fields

Instances

Instances details
Eq TxMetadataWithSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

Methods

(==) :: TxMetadataWithSchema -> TxMetadataWithSchema -> Bool Source #

(/=) :: TxMetadataWithSchema -> TxMetadataWithSchema -> Bool Source #

Show TxMetadataWithSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

Methods

showsPrec :: Int -> TxMetadataWithSchema -> ShowS Source #

show :: TxMetadataWithSchema -> String Source #

showList :: [ TxMetadataWithSchema ] -> ShowS Source #

Generic TxMetadataWithSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

Associated Types

type Rep TxMetadataWithSchema :: Type -> Type Source #

Methods

from :: TxMetadataWithSchema -> Rep TxMetadataWithSchema x Source #

to :: Rep TxMetadataWithSchema x -> TxMetadataWithSchema Source #

NFData TxMetadataWithSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

Methods

rnf :: TxMetadataWithSchema -> () Source #

ToJSON TxMetadataWithSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

Methods

toJSON :: TxMetadataWithSchema -> Value Source #

toEncoding :: TxMetadataWithSchema -> Encoding Source #

toJSONList :: [ TxMetadataWithSchema ] -> Value Source #

toEncodingList :: [ TxMetadataWithSchema ] -> Encoding Source #

FromJSON TxMetadataWithSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

Methods

parseJSON :: Value -> Parser TxMetadataWithSchema Source #

parseJSONList :: Value -> Parser [ TxMetadataWithSchema ] Source #

type Rep TxMetadataWithSchema Source #
Instance details

Defined in Cardano.Wallet.Api.Types.SchemaMetadata

type Rep TxMetadataWithSchema = D1 (' MetaData "TxMetadataWithSchema" "Cardano.Wallet.Api.Types.SchemaMetadata" "cardano-wallet-core-2022.7.1-AGKhlyz9liLKN3QqZD1gj" ' False ) ( C1 (' MetaCons "TxMetadataWithSchema" ' PrefixI ' True ) ( S1 (' MetaSel (' Just "txMetadataWithSchema_schema") ' NoSourceUnpackedness ' NoSourceStrictness ' DecidedStrict ) ( Rec0 TxMetadataSchema ) :*: S1 (' MetaSel (' Just "txMetadataWithSchema_metadata") ' NoSourceUnpackedness ' NoSourceStrictness ' DecidedStrict ) ( Rec0 TxMetadata )))

parseSimpleMetadataFlag :: Bool -> TxMetadataSchema Source #

Parses a Boolean "simple-metadata" API flag. 

toSimpleMetadataFlag . parseSimpleMetadataFlag == id
parseSimpleMetadataFlag . toSimpleMetadataFlag == id

toSimpleMetadataFlag :: TxMetadataSchema -> Bool Source #

Produces a Boolean "simple-metadata" API flag. 

toSimpleMetadataFlag . parseSimpleMetadataFlag == id
parseSimpleMetadataFlag . toSimpleMetadataFlag == id

detailedMetadata :: TxMetadata -> TxMetadataWithSchema Source #

noSchemaMetadata :: TxMetadata -> TxMetadataWithSchema Source #