From 3ab80e36423207a276e8e242498d2f0f5cbbe084 Mon Sep 17 00:00:00 2001 From: Input Output HK Date: Tue, 8 Jun 2021 06:27:12 +0000 Subject: [PATCH] Deployed haddocks --- .../Test-Cardano-Api-Metadata.html | 2 +- cardano-api-test/cardano-api-test.haddock | Bin 1174 -> 1204 bytes cardano-api-test/doc-index.html | 2 +- cardano-api-test/doc-index.json | 2 +- .../src/Test.Cardano.Api.Metadata.html | 841 ++-- .../src/Test.Cardano.Api.Typed.Gen.html | 698 ++-- .../src/Test.Tasty.Hedgehog.Group.html | 24 +- cardano-api/Cardano-Api-Address.html | 2 +- cardano-api/Cardano-Api-Byron.html | 2 +- cardano-api/Cardano-Api-Certificate.html | 2 +- cardano-api/Cardano-Api-Eras.html | 2 +- cardano-api/Cardano-Api-Error.html | 2 +- cardano-api/Cardano-Api-HasTypeProxy.html | 2 +- cardano-api/Cardano-Api-Hash.html | 2 +- cardano-api/Cardano-Api-Key.html | 2 +- cardano-api/Cardano-Api-KeysByron.html | 2 +- cardano-api/Cardano-Api-KeysPraos.html | 2 +- cardano-api/Cardano-Api-KeysShelley.html | 2 +- .../Cardano-Api-OperationalCertificate.html | 2 +- .../Cardano-Api-ProtocolParameters.html | 2 +- cardano-api/Cardano-Api-Script.html | 2 +- cardano-api/Cardano-Api-ScriptData.html | 2 +- cardano-api/Cardano-Api-SerialiseCBOR.html | 2 +- .../Cardano-Api-SerialiseTextEnvelope.html | 2 +- cardano-api/Cardano-Api-Shelley.html | 4 +- cardano-api/Cardano-Api-SpecialByron.html | 2 +- .../Cardano-Api-StakePoolMetadata.html | 2 +- cardano-api/Cardano-Api-Tx.html | 2 +- cardano-api/Cardano-Api-TxBody.html | 2 +- cardano-api/Cardano-Api-TxMetadata.html | 12 +- cardano-api/Cardano-Api-Value.html | 2 +- cardano-api/Cardano-Api.html | 18 +- cardano-api/cardano-api.haddock | Bin 135600 -> 135678 bytes cardano-api/doc-index-All.html | 2 +- cardano-api/doc-index-F.html | 2 +- cardano-api/doc-index-T.html | 2 +- cardano-api/doc-index.json | 2 +- cardano-api/src/Cardano.Api.Address.html | 674 ++-- cardano-api/src/Cardano.Api.Block.html | 488 +-- cardano-api/src/Cardano.Api.Certificate.html | 456 +-- .../src/Cardano.Api.Crypto.Ed25519Bip32.html | 218 +- cardano-api/src/Cardano.Api.Eras.html | 160 +- cardano-api/src/Cardano.Api.Error.html | 80 +- cardano-api/src/Cardano.Api.Fees.html | 236 +- .../src/Cardano.Api.GenesisParameters.html | 50 +- cardano-api/src/Cardano.Api.HasTypeProxy.html | 10 +- cardano-api/src/Cardano.Api.Hash.html | 16 +- cardano-api/src/Cardano.Api.IPC.html | 582 +-- cardano-api/src/Cardano.Api.Key.html | 76 +- cardano-api/src/Cardano.Api.KeysByron.html | 342 +- cardano-api/src/Cardano.Api.KeysPraos.html | 306 +- cardano-api/src/Cardano.Api.KeysShelley.html | 1654 ++++---- cardano-api/src/Cardano.Api.LedgerState.html | 1228 +++--- cardano-api/src/Cardano.Api.Modes.html | 102 +- cardano-api/src/Cardano.Api.NetworkId.html | 34 +- .../Cardano.Api.OperationalCertificate.html | 190 +- cardano-api/src/Cardano.Api.Orphans.html | 958 ++--- .../src/Cardano.Api.Protocol.Byron.html | 6 +- .../src/Cardano.Api.Protocol.Cardano.html | 6 +- .../src/Cardano.Api.Protocol.Types.html | 110 +- .../src/Cardano.Api.ProtocolParameters.html | 1592 ++++---- cardano-api/src/Cardano.Api.Query.html | 734 ++-- cardano-api/src/Cardano.Api.Script.html | 1554 ++++---- cardano-api/src/Cardano.Api.ScriptData.html | 778 ++-- .../src/Cardano.Api.SerialiseBech32.html | 266 +- .../src/Cardano.Api.SerialiseCBOR.html | 20 +- .../src/Cardano.Api.SerialiseJSON.html | 68 +- cardano-api/src/Cardano.Api.SerialiseRaw.html | 86 +- .../Cardano.Api.SerialiseTextEnvelope.html | 466 +-- .../src/Cardano.Api.Shelley.Genesis.html | 16 +- cardano-api/src/Cardano.Api.Shelley.html | 218 +- cardano-api/src/Cardano.Api.SpecialByron.html | 286 +- .../src/Cardano.Api.StakePoolMetadata.html | 158 +- cardano-api/src/Cardano.Api.Tx.html | 1466 +++---- cardano-api/src/Cardano.Api.TxBody.html | 3534 ++++++++--------- cardano-api/src/Cardano.Api.TxInMode.html | 240 +- cardano-api/src/Cardano.Api.TxMetadata.html | 1895 ++++----- .../src/Cardano.Api.TxSubmit.ErrorRender.html | 124 +- .../src/Cardano.Api.TxSubmit.Types.html | 58 +- cardano-api/src/Cardano.Api.Utils.html | 34 +- cardano-api/src/Cardano.Api.Value.html | 662 +-- .../src/Cardano.CLI.Byron.Commands.html | 10 +- .../src/Cardano.CLI.Byron.Delegation.html | 206 +- .../src/Cardano.CLI.Byron.Genesis.html | 336 +- cardano-cli/src/Cardano.CLI.Byron.Key.html | 150 +- cardano-cli/src/Cardano.CLI.Byron.Legacy.html | 54 +- .../src/Cardano.CLI.Byron.Parsers.html | 398 +- cardano-cli/src/Cardano.CLI.Byron.Query.html | 38 +- cardano-cli/src/Cardano.CLI.Byron.Run.html | 638 +-- cardano-cli/src/Cardano.CLI.Byron.Tx.html | 394 +- .../src/Cardano.CLI.Byron.UpdateProposal.html | 154 +- cardano-cli/src/Cardano.CLI.Byron.Vote.html | 144 +- cardano-cli/src/Cardano.CLI.Environment.html | 24 +- cardano-cli/src/Cardano.CLI.Helpers.html | 154 +- .../src/Cardano.CLI.Mary.RenderValue.html | 98 +- .../src/Cardano.CLI.Mary.TxOutParser.html | 34 +- .../src/Cardano.CLI.Mary.ValueParser.html | 200 +- cardano-cli/src/Cardano.CLI.Parsers.html | 16 +- cardano-cli/src/Cardano.CLI.Run.Friendly.html | 294 +- cardano-cli/src/Cardano.CLI.Run.html | 78 +- .../src/Cardano.CLI.Shelley.Commands.html | 198 +- cardano-cli/src/Cardano.CLI.Shelley.Key.html | 718 ++-- .../src/Cardano.CLI.Shelley.Orphans.html | 60 +- .../src/Cardano.CLI.Shelley.Parsers.html | 1494 +++---- .../Cardano.CLI.Shelley.Run.Address.Info.html | 80 +- .../src/Cardano.CLI.Shelley.Run.Address.html | 438 +- .../src/Cardano.CLI.Shelley.Run.Genesis.html | 2424 +++++------ .../Cardano.CLI.Shelley.Run.Governance.html | 312 +- .../src/Cardano.CLI.Shelley.Run.Key.html | 1088 ++--- .../src/Cardano.CLI.Shelley.Run.Node.html | 444 +-- .../src/Cardano.CLI.Shelley.Run.Pool.html | 346 +- .../src/Cardano.CLI.Shelley.Run.Query.html | 2064 +++++----- .../Cardano.CLI.Shelley.Run.StakeAddress.html | 320 +- .../src/Cardano.CLI.Shelley.Run.TextView.html | 66 +- .../Cardano.CLI.Shelley.Run.Transaction.html | 2370 +++++------ cardano-cli/src/Cardano.CLI.Shelley.Run.html | 188 +- .../src/Cardano.CLI.Shelley.Script.html | 98 +- cardano-cli/src/Cardano.CLI.TopHandler.html | 80 +- cardano-cli/src/Cardano.CLI.Types.html | 188 +- cardano-cli/src/Paths_cardano_cli.html | 14 +- .../src/Cardano.Chairman.Commands.Run.html | 98 +- .../Cardano.Chairman.Commands.Version.html | 4 +- .../src/Cardano.Chairman.html | 852 ++-- .../src/Paths_cardano_node_chairman.html | 14 +- cardano-node-chairman/src/Test.Process.html | 24 +- cardano-node-chairman/src/Testnet.Byron.html | 360 +- .../src/Testnet.ByronShelley.html | 960 ++--- cardano-node-chairman/src/Testnet.Conf.html | 48 +- cardano-node-chairman/src/Testnet.List.html | 22 +- .../src/Testnet.Shelley.html | 722 ++-- .../Cardano.Node.Configuration.Logging.html | 560 +-- .../src/Cardano.Node.Configuration.POM.html | 578 +-- .../Cardano.Node.Configuration.Socket.html | 306 +- .../Cardano.Node.Configuration.Topology.html | 208 +- .../src/Cardano.Node.Handlers.Shutdown.html | 230 +- .../src/Cardano.Node.Handlers.TopLevel.html | 80 +- cardano-node/src/Cardano.Node.Orphans.html | 44 +- cardano-node/src/Cardano.Node.Parsers.html | 128 +- .../src/Cardano.Node.Protocol.Alonzo.html | 32 +- .../src/Cardano.Node.Protocol.Byron.html | 236 +- .../src/Cardano.Node.Protocol.Cardano.html | 218 +- .../src/Cardano.Node.Protocol.Shelley.html | 368 +- .../src/Cardano.Node.Protocol.Types.html | 34 +- cardano-node/src/Cardano.Node.Protocol.html | 70 +- cardano-node/src/Cardano.Node.Run.html | 790 ++-- cardano-node/src/Cardano.Node.STM.html | 80 +- cardano-node/src/Cardano.Node.Types.html | 534 +-- cardano-node/src/Cardano.Tracing.Config.html | 442 +-- .../src/Cardano.Tracing.Constraints.html | 34 +- .../src/Cardano.Tracing.ConvertTxId.html | 38 +- cardano-node/src/Cardano.Tracing.Kernel.html | 74 +- cardano-node/src/Cardano.Tracing.Metrics.html | 242 +- ...Cardano.Tracing.OrphanInstances.Byron.html | 292 +- ...ardano.Tracing.OrphanInstances.Common.html | 134 +- ...ano.Tracing.OrphanInstances.Consensus.html | 2518 ++++++------ ...dano.Tracing.OrphanInstances.HardFork.html | 520 +-- ...rdano.Tracing.OrphanInstances.Network.html | 1530 +++---- ...rdano.Tracing.OrphanInstances.Shelley.html | 2062 +++++----- cardano-node/src/Cardano.Tracing.Peer.html | 242 +- cardano-node/src/Cardano.Tracing.Queries.html | 112 +- cardano-node/src/Cardano.Tracing.Render.html | 192 +- cardano-node/src/Cardano.Tracing.Tracers.html | 2598 ++++++------ cardano-node/src/Main.html | 84 +- cardano-node/src/Paths_cardano_node.html | 14 +- doc-index-All.html | 2 +- doc-index-F.html | 2 +- doc-index-G.html | 2 +- doc-index-T.html | 2 +- doc-index.json | 38 +- 169 files changed, 29557 insertions(+), 29519 deletions(-) diff --git a/cardano-api-test/Test-Cardano-Api-Metadata.html b/cardano-api-test/Test-Cardano-Api-Metadata.html index e2c433c8445..a3c53a116ce 100644 --- a/cardano-api-test/Test-Cardano-Api-Metadata.html +++ b/cardano-api-test/Test-Cardano-Api-Metadata.html @@ -1 +1 @@ -Test.Cardano.Api.Metadata
cardano-api-test-1.24.0
Safe HaskellNone
LanguageHaskell2010

Test.Cardano.Api.Metadata

Documentation

tests ∷ TestTree Source #

genTxMetadata ∷ Gen TxMetadata Source #

\ No newline at end of file +Test.Cardano.Api.Metadata
cardano-api-test-1.24.0
Safe HaskellNone
LanguageHaskell2010

Test.Cardano.Api.Metadata

\ No newline at end of file diff --git a/cardano-api-test/cardano-api-test.haddock b/cardano-api-test/cardano-api-test.haddock index 3d607b62a1a50be4ea19d0d17cadc9265a9a7adb..eb06f7420952c21f82a6f4ce5d4cd3ceb1cd72e3 100644 GIT binary patch delta 198 zcmbQnxrI~i+}F(+Dhv!vdJGJVz48n|k`c&b0%B$$o+y_gE62dV3}gd^!GMv)FF!Ap zk&#gW$Xz;dz9RQ=paMoFW@aEU@uVViFeBf@x2lZtlZ6?rC;Kx>8Oceru*%Bu3rLHJ zinFnEaB=f+3JS>xi%3fF@<}l;0L@`!U;$djzzQPRfW+ikjICS@%nV8l$|}sNYLiu% f+J%MEQ}aS9d{avjQxZ!O!xD2!Q#Y?>dd&y`M+hK{ delta 189 zcmdnOIgL~9+}F(+Dhv!v$_xyQ?Q#r2k`c&b0%B$c2Ih%!8InL6C(_ z3PA3{iHj9E4+9l4GBGhRPCT#3?90eI@v|zU++;~cYaeD7RyKAHPA+a9UOs*SK_Oug zQ894|NhxU=S!re#8CgDlDNzwIpcQuEI@M^SV06E&>52# WFt)NPDKo36PS$5?-+YqkH6sA(I2oP* diff --git a/cardano-api-test/doc-index.html b/cardano-api-test/doc-index.html index 8531ee7aba2..b090c79974a 100644 --- a/cardano-api-test/doc-index.html +++ b/cardano-api-test/doc-index.html @@ -1 +1 @@ -cardano-api-test-1.24.0 (Index)
cardano-api-test-1.24.0
\ No newline at end of file +cardano-api-test-1.24.0 (Index)
cardano-api-test-1.24.0
\ No newline at end of file diff --git a/cardano-api-test/doc-index.json b/cardano-api-test/doc-index.json index 8933208cb4f..a725080e1c1 100644 --- a/cardano-api-test/doc-index.json +++ b/cardano-api-test/doc-index.json @@ -1 +1 @@ -[{"display_html":"fromGroup ∷ Group → TestTree","name":"fromGroup","module":"Test.Tasty.Hedgehog.Group","link":"Test-Tasty-Hedgehog-Group.html#v:fromGroup"},{"display_html":"tests ∷ TestTree","name":"tests","module":"Test.Cardano.Api.Metadata","link":"Test-Cardano-Api-Metadata.html#v:tests"},{"display_html":"genTxMetadata ∷ Gen TxMetadata","name":"genTxMetadata","module":"Test.Cardano.Api.Metadata","link":"Test-Cardano-Api-Metadata.html#v:genTxMetadata"},{"display_html":"genAddressByron ∷ Gen (Address ByronAddr)","name":"genAddressByron","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genAddressByron"},{"display_html":"genAddressShelley ∷ Gen (Address ShelleyAddr)","name":"genAddressShelley","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genAddressShelley"},{"display_html":"genMaybePraosNonce ∷ Gen (Maybe PraosNonce)","name":"genMaybePraosNonce","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genMaybePraosNonce"},{"display_html":"genProtocolParameters ∷ Gen ProtocolParameters","name":"genProtocolParameters","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genProtocolParameters"},{"display_html":"genValueNestedRep ∷ Gen ValueNestedRep","name":"genValueNestedRep","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genValueNestedRep"},{"display_html":"genValueNestedBundle ∷ Gen ValueNestedBundle","name":"genValueNestedBundle","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genValueNestedBundle"},{"display_html":"genByronKeyWitness ∷ Gen (KeyWitness ByronEra)","name":"genByronKeyWitness","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genByronKeyWitness"},{"display_html":"genTxId ∷ Gen TxId","name":"genTxId","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genTxId"},{"display_html":"genTxIn ∷ Gen TxIn","name":"genTxIn","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genTxIn"},{"display_html":"genTxOut ∷ CardanoEra era → Gen (TxOut era)","name":"genTxOut","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genTxOut"},{"display_html":"genScript ∷ ScriptLanguage lang → Gen (Script lang)","name":"genScript","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genScript"},{"display_html":"genSimpleScript ∷ SimpleScriptVersion lang → Gen (SimpleScript lang)","name":"genSimpleScript","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genSimpleScript"},{"display_html":"genPlutusScript ∷ PlutusScriptVersion lang → Gen (PlutusScript lang)","name":"genPlutusScript","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genPlutusScript"},{"display_html":"genScriptInAnyLang ∷ Gen ScriptInAnyLang","name":"genScriptInAnyLang","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genScriptInAnyLang"},{"display_html":"genScriptInEra ∷ CardanoEra era → Gen (ScriptInEra era)","name":"genScriptInEra","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genScriptInEra"},{"display_html":"genScriptHash ∷ Gen ScriptHash","name":"genScriptHash","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genScriptHash"},{"display_html":"genScriptData ∷ Gen ScriptData","name":"genScriptData","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genScriptData"},{"display_html":"genOperationalCertificate ∷ Gen OperationalCertificate","name":"genOperationalCertificate","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genOperationalCertificate"},{"display_html":"genOperationalCertificateIssueCounter ∷ Gen OperationalCertificateIssueCounter","name":"genOperationalCertificateIssueCounter","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genOperationalCertificateIssueCounter"},{"display_html":"genShelleyWitness ∷ IsShelleyBasedEra era ⇒ CardanoEra era → Gen (KeyWitness era)","name":"genShelleyWitness","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genShelleyWitness"},{"display_html":"genSigningKey ∷ Key keyrole ⇒ AsType keyrole → Gen (SigningKey keyrole)","name":"genSigningKey","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genSigningKey"},{"display_html":"genStakeAddress ∷ Gen StakeAddress","name":"genStakeAddress","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genStakeAddress"},{"display_html":"genTx ∷ ∀ era. CardanoEra era → Gen (Tx era)","name":"genTx","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genTx"},{"display_html":"genTxBody ∷ CardanoEra era → Gen (TxBody era)","name":"genTxBody","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genTxBody"},{"display_html":"genValue ∷ Gen AssetId → Gen Quantity → Gen Value","name":"genValue","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genValue"},{"display_html":"genValueDefault ∷ Gen Value","name":"genValueDefault","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genValueDefault"},{"display_html":"genVerificationKey ∷ Key keyrole ⇒ AsType keyrole → Gen (VerificationKey keyrole)","name":"genVerificationKey","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genVerificationKey"}] \ No newline at end of file +[{"display_html":"fromGroup ∷ Group → TestTree","name":"fromGroup","module":"Test.Tasty.Hedgehog.Group","link":"Test-Tasty-Hedgehog-Group.html#v:fromGroup"},{"display_html":"tests ∷ TestTree","name":"tests","module":"Test.Cardano.Api.Metadata","link":"Test-Cardano-Api-Metadata.html#v:tests"},{"display_html":"genTxMetadata ∷ Gen TxMetadata","name":"genTxMetadata","module":"Test.Cardano.Api.Metadata","link":"Test-Cardano-Api-Metadata.html#v:genTxMetadata"},{"display_html":"genTxMetadataValue ∷ Gen TxMetadataValue","name":"genTxMetadataValue","module":"Test.Cardano.Api.Metadata","link":"Test-Cardano-Api-Metadata.html#v:genTxMetadataValue"},{"display_html":"genAddressByron ∷ Gen (Address ByronAddr)","name":"genAddressByron","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genAddressByron"},{"display_html":"genAddressShelley ∷ Gen (Address ShelleyAddr)","name":"genAddressShelley","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genAddressShelley"},{"display_html":"genMaybePraosNonce ∷ Gen (Maybe PraosNonce)","name":"genMaybePraosNonce","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genMaybePraosNonce"},{"display_html":"genProtocolParameters ∷ Gen ProtocolParameters","name":"genProtocolParameters","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genProtocolParameters"},{"display_html":"genValueNestedRep ∷ Gen ValueNestedRep","name":"genValueNestedRep","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genValueNestedRep"},{"display_html":"genValueNestedBundle ∷ Gen ValueNestedBundle","name":"genValueNestedBundle","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genValueNestedBundle"},{"display_html":"genByronKeyWitness ∷ Gen (KeyWitness ByronEra)","name":"genByronKeyWitness","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genByronKeyWitness"},{"display_html":"genTxId ∷ Gen TxId","name":"genTxId","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genTxId"},{"display_html":"genTxIn ∷ Gen TxIn","name":"genTxIn","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genTxIn"},{"display_html":"genTxOut ∷ CardanoEra era → Gen (TxOut era)","name":"genTxOut","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genTxOut"},{"display_html":"genScript ∷ ScriptLanguage lang → Gen (Script lang)","name":"genScript","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genScript"},{"display_html":"genSimpleScript ∷ SimpleScriptVersion lang → Gen (SimpleScript lang)","name":"genSimpleScript","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genSimpleScript"},{"display_html":"genPlutusScript ∷ PlutusScriptVersion lang → Gen (PlutusScript lang)","name":"genPlutusScript","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genPlutusScript"},{"display_html":"genScriptInAnyLang ∷ Gen ScriptInAnyLang","name":"genScriptInAnyLang","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genScriptInAnyLang"},{"display_html":"genScriptInEra ∷ CardanoEra era → Gen (ScriptInEra era)","name":"genScriptInEra","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genScriptInEra"},{"display_html":"genScriptHash ∷ Gen ScriptHash","name":"genScriptHash","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genScriptHash"},{"display_html":"genScriptData ∷ Gen ScriptData","name":"genScriptData","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genScriptData"},{"display_html":"genOperationalCertificate ∷ Gen OperationalCertificate","name":"genOperationalCertificate","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genOperationalCertificate"},{"display_html":"genOperationalCertificateIssueCounter ∷ Gen OperationalCertificateIssueCounter","name":"genOperationalCertificateIssueCounter","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genOperationalCertificateIssueCounter"},{"display_html":"genShelleyWitness ∷ IsShelleyBasedEra era ⇒ CardanoEra era → Gen (KeyWitness era)","name":"genShelleyWitness","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genShelleyWitness"},{"display_html":"genSigningKey ∷ Key keyrole ⇒ AsType keyrole → Gen (SigningKey keyrole)","name":"genSigningKey","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genSigningKey"},{"display_html":"genStakeAddress ∷ Gen StakeAddress","name":"genStakeAddress","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genStakeAddress"},{"display_html":"genTx ∷ ∀ era. CardanoEra era → Gen (Tx era)","name":"genTx","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genTx"},{"display_html":"genTxBody ∷ CardanoEra era → Gen (TxBody era)","name":"genTxBody","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genTxBody"},{"display_html":"genValue ∷ Gen AssetId → Gen Quantity → Gen Value","name":"genValue","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genValue"},{"display_html":"genValueDefault ∷ Gen Value","name":"genValueDefault","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genValueDefault"},{"display_html":"genVerificationKey ∷ Key keyrole ⇒ AsType keyrole → Gen (VerificationKey keyrole)","name":"genVerificationKey","module":"Test.Cardano.Api.Typed.Gen","link":"Test-Cardano-Api-Typed-Gen.html#v:genVerificationKey"}] \ No newline at end of file diff --git a/cardano-api-test/src/Test.Cardano.Api.Metadata.html b/cardano-api-test/src/Test.Cardano.Api.Metadata.html index 8688b0695ef..5bffff9d0be 100644 --- a/cardano-api-test/src/Test.Cardano.Api.Metadata.html +++ b/cardano-api-test/src/Test.Cardano.Api.Metadata.html @@ -3,168 +3,169 @@ module Test.Cardano.Api.Metadata ( tests , genTxMetadata - ) where - -import Cardano.Prelude - -import Cardano.Api - -import Data.Aeson (ToJSON (..)) -import qualified Data.Aeson as Aeson -import qualified Data.ByteString as BS -import qualified Data.ByteString.Base16 as Base16 -import qualified Data.Map.Strict as Map -import qualified Data.Text as Text -import qualified Data.Text.Encoding as Text - -import Hedgehog (Gen, Property, discover, property, (===)) -import qualified Hedgehog -import qualified Hedgehog.Gen as Gen -import qualified Hedgehog.Internal.Gen as Gen -import qualified Hedgehog.Range as Range -import Test.Tasty (TestTree) -import Test.Tasty.Hedgehog.Group (fromGroup) - + , genTxMetadataValue + ) where + +import Cardano.Prelude + +import Cardano.Api + +import Data.Aeson (ToJSON (..)) +import qualified Data.Aeson as Aeson +import qualified Data.ByteString as BS +import qualified Data.ByteString.Base16 as Base16 +import qualified Data.Map.Strict as Map +import qualified Data.Text as Text +import qualified Data.Text.Encoding as Text + +import Hedgehog (Gen, Property, discover, property, (===)) +import qualified Hedgehog +import qualified Hedgehog.Gen as Gen +import qualified Hedgehog.Internal.Gen as Gen +import qualified Hedgehog.Range as Range +import Test.Tasty (TestTree) +import Test.Tasty.Hedgehog.Group (fromGroup) --- ---------------------------------------------------------------------------- --- Golden / unit tests --- - -prop_golden_1 :: Property -prop_golden_1 :: Property + +-- ---------------------------------------------------------------------------- +-- Golden / unit tests +-- + +prop_golden_1 :: Property +prop_golden_1 :: Property prop_golden_1 = ByteString -> TxMetadata -> Property matchMetadata - ByteString + ByteString "{\"0\": 1}" - (Map Word64 TxMetadataValue -> TxMetadata + (Map Word64 TxMetadataValue -> TxMetadata TxMetadata ([(Word64, TxMetadataValue)] -> Map Word64 TxMetadataValue forall k a. Ord k => [(k, a)] -> Map k a Map.fromList [(Word64 0, Integer -> TxMetadataValue TxMetaNumber Integer 1)])) - -prop_golden_2 :: Property -prop_golden_2 :: Property + +prop_golden_2 :: Property +prop_golden_2 :: Property prop_golden_2 = ByteString -> TxMetadata -> Property matchMetadata - ByteString + ByteString "{\"0\": \"deadbeef\"}" - (Word64 -> TxMetadataValue -> TxMetadata + (Word64 -> TxMetadataValue -> TxMetadata txMetadataSingleton Word64 0 (Text -> TxMetadataValue TxMetaText Text "deadbeef")) - -prop_golden_3 :: Property -prop_golden_3 :: Property + +prop_golden_3 :: Property +prop_golden_3 :: Property prop_golden_3 = ByteString -> TxMetadata -> Property matchMetadata - ByteString + ByteString "{\"0\": \"0xDEADBEEF\"}" - (Word64 -> TxMetadataValue -> TxMetadata + (Word64 -> TxMetadataValue -> TxMetadata txMetadataSingleton Word64 0 (Text -> TxMetadataValue TxMetaText Text "0xDEADBEEF")) - -prop_golden_4 :: Property -prop_golden_4 :: Property + +prop_golden_4 :: Property +prop_golden_4 :: Property prop_golden_4 = ByteString -> TxMetadata -> Property matchMetadata - ByteString + ByteString "{\"0\": \"0xdeadbeef\"}" - (Word64 -> TxMetadataValue -> TxMetadata + (Word64 -> TxMetadataValue -> TxMetadata txMetadataSingleton Word64 0 (ByteString -> TxMetadataValue TxMetaBytes ByteString "\xde\xad\xbe\xef")) - -prop_golden_5 :: Property -prop_golden_5 :: Property + +prop_golden_5 :: Property +prop_golden_5 :: Property prop_golden_5 = ByteString -> TxMetadata -> Property matchMetadata - ByteString + ByteString "{\"0\": [] }" - (Word64 -> TxMetadataValue -> TxMetadata + (Word64 -> TxMetadataValue -> TxMetadata txMetadataSingleton Word64 0 ([TxMetadataValue] -> TxMetadataValue TxMetaList [])) - -prop_golden_6 :: Property -prop_golden_6 :: Property + +prop_golden_6 :: Property +prop_golden_6 :: Property prop_golden_6 = ByteString -> TxMetadata -> Property matchMetadata - ByteString + ByteString "{\"0\": [1, \"a\", \"0x42\"] }" - (Word64 -> TxMetadataValue -> TxMetadata + (Word64 -> TxMetadataValue -> TxMetadata txMetadataSingleton Word64 0 - ([TxMetadataValue] -> TxMetadataValue + ([TxMetadataValue] -> TxMetadataValue TxMetaList [Integer -> TxMetadataValue TxMetaNumber Integer 1 - ,Text -> TxMetadataValue + ,Text -> TxMetadataValue TxMetaText Text "a" - ,ByteString -> TxMetadataValue + ,ByteString -> TxMetadataValue TxMetaBytes ByteString "\x42"])) - -prop_golden_7 :: Property -prop_golden_7 :: Property + +prop_golden_7 :: Property +prop_golden_7 :: Property prop_golden_7 = ByteString -> TxMetadata -> Property matchMetadata - ByteString + ByteString "{\"0\": {} }" - (Word64 -> TxMetadataValue -> TxMetadata + (Word64 -> TxMetadataValue -> TxMetadata txMetadataSingleton Word64 0 ([(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue TxMetaMap [])) - -prop_golden_8 :: Property -prop_golden_8 :: Property + +prop_golden_8 :: Property +prop_golden_8 :: Property prop_golden_8 = ByteString -> TxMetadata -> Property matchMetadata - ByteString + ByteString "{\"0\": { \"0x41\": \"0x42\", \"1\": 2, \"a\" : \"b\" }}" - (Word64 -> TxMetadataValue -> TxMetadata + (Word64 -> TxMetadataValue -> TxMetadata txMetadataSingleton Word64 0 - ([(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue + ([(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue TxMetaMap [(ByteString -> TxMetadataValue TxMetaBytes ByteString "\x41", ByteString -> TxMetadataValue TxMetaBytes ByteString "\x42") - ,(Integer -> TxMetadataValue + ,(Integer -> TxMetadataValue TxMetaNumber Integer 1, Integer -> TxMetadataValue TxMetaNumber Integer 2) - ,(Text -> TxMetadataValue + ,(Text -> TxMetadataValue TxMetaText Text "a", Text -> TxMetadataValue TxMetaText Text "b")])) - -txMetadataSingleton :: Word64 -> TxMetadataValue -> TxMetadata -txMetadataSingleton :: Word64 -> TxMetadataValue -> TxMetadata -txMetadataSingleton Word64 -n TxMetadataValue -v = Map Word64 TxMetadataValue -> TxMetadata + +txMetadataSingleton :: Word64 -> TxMetadataValue -> TxMetadata +txMetadataSingleton :: Word64 -> TxMetadataValue -> TxMetadata +txMetadataSingleton Word64 +n TxMetadataValue +v = Map Word64 TxMetadataValue -> TxMetadata TxMetadata ([(Word64, TxMetadataValue)] -> Map Word64 TxMetadataValue forall k a. Ord k => [(k, a)] -> Map k a Map.fromList [(Word64 -n, TxMetadataValue -v)]) - -matchMetadata :: ByteString -> TxMetadata -> Property -matchMetadata :: ByteString -> TxMetadata -> Property -matchMetadata ByteString -jsonStr TxMetadata -metadata = - TestLimit -> Property -> Property +n, TxMetadataValue +v)]) + +matchMetadata :: ByteString -> TxMetadata -> Property +matchMetadata :: ByteString -> TxMetadata -> Property +matchMetadata ByteString +jsonStr TxMetadata +metadata = + TestLimit -> Property -> Property Hedgehog.withTests TestLimit 1 (Property -> Property) -> Property -> Property forall a b. (a -> b) -> a -> b @@ -177,27 +178,27 @@ Hedgehog.test (TestT IO () -> PropertyT IO ()) -> TestT IO () -> PropertyT IO () forall a b. (a -> b) -> a -> b $ - case ByteString -> Maybe Value + case ByteString -> Maybe Value forall a. FromJSON a => ByteString -> Maybe a Aeson.decodeStrict' ByteString -jsonStr of - Maybe Value +jsonStr of + Maybe Value Nothing -> TestT IO () forall (m :: * -> *) a. (MonadTest m, HasCallStack) => m a Hedgehog.failure - Just Value -json -> do - Value -> TestT IO () + Just Value +json -> do + Value -> TestT IO () forall (m :: * -> *) a. (MonadTest m, Show a, HasCallStack) => a -> m () Hedgehog.annotateShow Value -json - TxMetadataJsonSchema +json + TxMetadataJsonSchema -> Value -> Either TxMetadataJsonError TxMetadata metadataFromJson TxMetadataJsonSchema TxMetadataJsonNoSchema Value -json Either TxMetadataJsonError TxMetadata +json Either TxMetadataJsonError TxMetadata -> Either TxMetadataJsonError TxMetadata -> TestT IO () forall (m :: * -> *) a. (MonadTest m, Eq a, Show a, HasCallStack) => @@ -205,39 +206,39 @@ === TxMetadata -> Either TxMetadataJsonError TxMetadata forall a b. b -> Either a b Right TxMetadata -metadata - +metadata --- ---------------------------------------------------------------------------- --- Round trip properties --- - --- | Any JSON (within the supported subset) can be converted to tx metadata and --- back, to give the same original JSON. --- --- This uses the \"no schema\" mapping. Note that with this mapping it is /not/ --- the case that any tx metadata can be converted to JSON and back to give the --- original value. --- -prop_noschema_json_roundtrip_via_metadata :: Property -prop_noschema_json_roundtrip_via_metadata :: Property + +-- ---------------------------------------------------------------------------- +-- Round trip properties +-- + +-- | Any JSON (within the supported subset) can be converted to tx metadata and +-- back, to give the same original JSON. +-- +-- This uses the \"no schema\" mapping. Note that with this mapping it is /not/ +-- the case that any tx metadata can be converted to JSON and back to give the +-- original value. +-- +prop_noschema_json_roundtrip_via_metadata :: Property +prop_noschema_json_roundtrip_via_metadata :: Property prop_noschema_json_roundtrip_via_metadata = HasCallStack => PropertyT IO () -> Property PropertyT IO () -> Property Hedgehog.property (PropertyT IO () -> Property) -> PropertyT IO () -> Property forall a b. (a -> b) -> a -> b $ do - Value -json <- Gen Value -> PropertyT IO Value + Value +json <- Gen Value -> PropertyT IO Value forall (m :: * -> *) a. (Monad m, Show a, HasCallStack) => Gen a -> PropertyT m a Hedgehog.forAll (TxMetadataJsonSchema -> Gen Value genJsonForTxMetadata TxMetadataJsonSchema TxMetadataJsonNoSchema) - Value -> Either TxMetadataJsonError Value + Value -> Either TxMetadataJsonError Value forall a b. b -> Either a b Right Value -json Either TxMetadataJsonError Value +json Either TxMetadataJsonError Value -> Either TxMetadataJsonError Value -> PropertyT IO () forall (m :: * -> *) a. (MonadTest m, Eq a, Show a, HasCallStack) => @@ -249,7 +250,7 @@ fmap (TxMetadataJsonSchema -> TxMetadata -> Value metadataToJson TxMetadataJsonSchema TxMetadataJsonNoSchema) - (Either TxMetadataJsonError TxMetadata + (Either TxMetadataJsonError TxMetadata -> Either TxMetadataJsonError Value) -> (Value -> Either TxMetadataJsonError TxMetadata) -> Value @@ -261,30 +262,30 @@ -> Value -> Either TxMetadataJsonError TxMetadata metadataFromJson TxMetadataJsonSchema TxMetadataJsonNoSchema) Value -json - --- | Any JSON (fitting the detailed schema) can be converted to tx metadata and --- back, to give the same original JSON. --- -prop_schema_json_roundtrip_via_metadata :: Property -prop_schema_json_roundtrip_via_metadata :: Property +json + +-- | Any JSON (fitting the detailed schema) can be converted to tx metadata and +-- back, to give the same original JSON. +-- +prop_schema_json_roundtrip_via_metadata :: Property +prop_schema_json_roundtrip_via_metadata :: Property prop_schema_json_roundtrip_via_metadata = HasCallStack => PropertyT IO () -> Property PropertyT IO () -> Property Hedgehog.property (PropertyT IO () -> Property) -> PropertyT IO () -> Property forall a b. (a -> b) -> a -> b $ do - Value -json <- Gen Value -> PropertyT IO Value + Value +json <- Gen Value -> PropertyT IO Value forall (m :: * -> *) a. (Monad m, Show a, HasCallStack) => Gen a -> PropertyT m a Hedgehog.forAll (TxMetadataJsonSchema -> Gen Value genJsonForTxMetadata TxMetadataJsonSchema TxMetadataJsonDetailedSchema) - Value -> Either TxMetadataJsonError Value + Value -> Either TxMetadataJsonError Value forall a b. b -> Either a b Right Value -json Either TxMetadataJsonError Value +json Either TxMetadataJsonError Value -> Either TxMetadataJsonError Value -> PropertyT IO () forall (m :: * -> *) a. (MonadTest m, Eq a, Show a, HasCallStack) => @@ -296,7 +297,7 @@ fmap (TxMetadataJsonSchema -> TxMetadata -> Value metadataToJson TxMetadataJsonSchema TxMetadataJsonDetailedSchema) - (Either TxMetadataJsonError TxMetadata + (Either TxMetadataJsonError TxMetadata -> Either TxMetadataJsonError Value) -> (Value -> Either TxMetadataJsonError TxMetadata) -> Value @@ -308,30 +309,30 @@ -> Value -> Either TxMetadataJsonError TxMetadata metadataFromJson TxMetadataJsonSchema TxMetadataJsonDetailedSchema) Value -json - +json --- | Any tx metadata can be converted to JSON (using the detailed schema) and --- back, to give the same original tx metadata. --- -prop_metadata_roundtrip_via_schema_json :: Property -prop_metadata_roundtrip_via_schema_json :: Property + +-- | Any tx metadata can be converted to JSON (using the detailed schema) and +-- back, to give the same original tx metadata. +-- +prop_metadata_roundtrip_via_schema_json :: Property +prop_metadata_roundtrip_via_schema_json :: Property prop_metadata_roundtrip_via_schema_json = HasCallStack => PropertyT IO () -> Property PropertyT IO () -> Property Hedgehog.property (PropertyT IO () -> Property) -> PropertyT IO () -> Property forall a b. (a -> b) -> a -> b $ do - TxMetadata -md <- Gen TxMetadata -> PropertyT IO TxMetadata + TxMetadata +md <- Gen TxMetadata -> PropertyT IO TxMetadata forall (m :: * -> *) a. (Monad m, Show a, HasCallStack) => Gen a -> PropertyT m a Hedgehog.forAll Gen TxMetadata genTxMetadata - TxMetadata -> Either TxMetadataJsonError TxMetadata + TxMetadata -> Either TxMetadataJsonError TxMetadata forall a b. b -> Either a b Right TxMetadata -md Either TxMetadataJsonError TxMetadata +md Either TxMetadataJsonError TxMetadata -> Either TxMetadataJsonError TxMetadata -> PropertyT IO () forall (m :: * -> *) a. (MonadTest m, Eq a, Show a, HasCallStack) => @@ -340,7 +341,7 @@ -> Value -> Either TxMetadataJsonError TxMetadata metadataFromJson TxMetadataJsonSchema TxMetadataJsonDetailedSchema - (Value -> Either TxMetadataJsonError TxMetadata) + (Value -> Either TxMetadataJsonError TxMetadata) -> (TxMetadata -> Value) -> TxMetadata -> Either TxMetadataJsonError TxMetadata @@ -350,29 +351,29 @@ . TxMetadataJsonSchema -> TxMetadata -> Value metadataToJson TxMetadataJsonSchema TxMetadataJsonDetailedSchema) TxMetadata -md - +md --- ---------------------------------------------------------------------------- --- Generators --- - -genJsonForTxMetadata :: TxMetadataJsonSchema -> Gen Aeson.Value -genJsonForTxMetadata :: TxMetadataJsonSchema -> Gen Value -genJsonForTxMetadata TxMetadataJsonSchema -mapping = - (Size -> Gen Value) -> Gen Value + +-- ---------------------------------------------------------------------------- +-- Generators +-- + +genJsonForTxMetadata :: TxMetadataJsonSchema -> Gen Aeson.Value +genJsonForTxMetadata :: TxMetadataJsonSchema -> Gen Value +genJsonForTxMetadata TxMetadataJsonSchema +mapping = + (Size -> Gen Value) -> Gen Value forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> Gen Value) -> Gen Value) -> (Size -> Gen Value) -> Gen Value forall a b. (a -> b) -> a -> b -$ \Size -sz -> - [Pair] -> Value +$ \Size +sz -> + [Pair] -> Value Aeson.object ([Pair] -> Value) -> GenT Identity [Pair] -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> - Range Int -> GenT Identity Pair -> GenT Identity [Pair] + Range Int -> GenT Identity Pair -> GenT Identity [Pair] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int forall a. Integral a => a -> a -> Range a @@ -380,8 +381,8 @@ 0 (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Size -sz)) - ((,) (Text -> Value -> Pair) +sz)) + ((,) (Text -> Value -> Pair) -> GenT Identity Text -> GenT Identity (Value -> Pair) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> (String -> Text @@ -398,52 +399,52 @@ Gen.word64 Range Word64 forall a. (Bounded a, Num a) => Range a Range.constantBounded) - GenT Identity (Value -> Pair) -> Gen Value -> GenT Identity Pair + GenT Identity (Value -> Pair) -> Gen Value -> GenT Identity Pair forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> TxMetadataJsonSchema -> Gen Value genJsonForTxMetadataValue TxMetadataJsonSchema -mapping) - -genJsonForTxMetadataValue :: TxMetadataJsonSchema -> Gen Aeson.Value -genJsonForTxMetadataValue :: TxMetadataJsonSchema -> Gen Value +mapping) + +genJsonForTxMetadataValue :: TxMetadataJsonSchema -> Gen Aeson.Value +genJsonForTxMetadataValue :: TxMetadataJsonSchema -> Gen Value genJsonForTxMetadataValue TxMetadataJsonSchema TxMetadataJsonNoSchema = Gen Value -genJsonValue - where - genJsonValue :: Gen Aeson.Value - genJsonValue :: Gen Value -genJsonValue = - (Size -> Gen Value) -> Gen Value +genJsonValue + where + genJsonValue :: Gen Aeson.Value + genJsonValue :: Gen Value +genJsonValue = + (Size -> Gen Value) -> Gen Value forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> Gen Value) -> Gen Value) -> (Size -> Gen Value) -> Gen Value forall a b. (a -> b) -> a -> b -$ \Size -sz -> - [(Int, Gen Value)] -> Gen Value +$ \Size +sz -> + [(Int, Gen Value)] -> Gen Value forall (m :: * -> *) a. MonadGen m => [(Int, m a)] -> m a Gen.frequency - [ (Int + [ (Int 1, Integer -> Value forall a. ToJSON a => a -> Value Aeson.toJSON (Integer -> Value) -> GenT Identity Integer -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity Integer -genJsonNumber) - , (Int +genJsonNumber) + , (Int 2, Text -> Value forall a. ToJSON a => a -> Value Aeson.toJSON (Text -> Value) -> GenT Identity Text -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity Text -genJsonText) - , (Size -> Int +genJsonText) + , (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral (Size -> Size forall a. Num a => a -> a signum Size -sz), - [Value] -> Value +sz), + [Value] -> Value forall a. ToJSON a => a -> Value Aeson.toJSON ([Value] -> Value) -> GenT Identity [Value] -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -453,14 +454,14 @@ forall a. Integral a => a -> a -> a `div` Size 2) GenT Identity [Value] -genJsonList) - , (Size -> Int +genJsonList) + , (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral (Size -> Size forall a. Num a => a -> a signum Size -sz), - [Pair] -> Value +sz), + [Pair] -> Value Aeson.object ([Pair] -> Value) -> GenT Identity [Pair] -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> (Size -> Size) -> GenT Identity [Pair] -> GenT Identity [Pair] @@ -469,55 +470,55 @@ forall a. Integral a => a -> a -> a `div` Size 2) GenT Identity [Pair] -genJsonMap) - ] - - genJsonNumber :: Gen Integer - genJsonNumber :: GenT Identity Integer -genJsonNumber = Range Integer -> GenT Identity Integer +genJsonMap) + ] + + genJsonNumber :: Gen Integer + genJsonNumber :: GenT Identity Integer +genJsonNumber = Range Integer -> GenT Identity Integer forall (m :: * -> *) a. (MonadGen m, Integral a) => Range a -> m a Gen.integral - (Integer -> Integer -> Range Integer + (Integer -> Integer -> Range Integer forall a. Integral a => a -> a -> Range a Range.linear - (-Word64 -> Integer + (-Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) :: Integer) - ( Word64 -> Integer + ( Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) :: Integer)) - - genJsonText :: Gen Text - genJsonText :: GenT Identity Text -genJsonText = [GenT Identity Text] -> GenT Identity Text + + genJsonText :: Gen Text + genJsonText :: GenT Identity Text +genJsonText = [GenT Identity Text] -> GenT Identity Text forall (m :: * -> *) a. MonadGen m => [m a] -> m a Gen.choice - [ (Text -> Bool) -> GenT Identity Text -> GenT Identity Text + [ (Text -> Bool) -> GenT Identity Text -> GenT Identity Text forall (m :: * -> *) a. MonadGen m => (a -> Bool) -> m a -> m a Gen.ensure Text -> Bool -validText (Int -> GenT Identity Text +validText (Int -> GenT Identity Text forall (f :: * -> *). MonadGen f => Int -> f Text -genText Int +genText Int 64) - , (Text -> Bool) -> GenT Identity Text -> GenT Identity Text + , (Text -> Bool) -> GenT Identity Text -> GenT Identity Text forall (m :: * -> *) a. MonadGen m => (a -> Bool) -> m a -> m a Gen.ensure Text -> Bool -validText ((Text -bytesPrefix Text -> Text -> Text +validText ((Text +bytesPrefix Text -> Text -> Text forall a. Semigroup a => a -> a -> a <>) (Text -> Text) -> GenT Identity Text -> GenT Identity Text forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Int -> GenT Identity Text forall (f :: * -> *). MonadGen f => Int -> f Text -genText Int +genText Int 62) - , GenT Identity Text -genBytes - , String -> Text + , GenT Identity Text +genBytes + , String -> Text Text.pack (String -> Text) -> (Integer -> String) -> Integer -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -527,24 +528,24 @@ show (Integer -> Text) -> GenT Identity Integer -> GenT Identity Text forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity Integer -genJsonNumber - ] - where - validText :: Text -> Bool -validText Text -t = ByteString -> Int +genJsonNumber + ] + where + validText :: Text -> Bool +validText Text +t = ByteString -> Int BS.length (Text -> ByteString Text.encodeUtf8 Text -t) Int -> Int -> Bool +t) Int -> Int -> Bool forall a. Ord a => a -> a -> Bool <= Int 64 - bytesPrefix :: Text -bytesPrefix = Text + bytesPrefix :: Text +bytesPrefix = Text "0x" - genText :: Int -> f Text -genText Int -sz = String -> Text + genText :: Int -> f Text +genText Int +sz = String -> Text Text.pack (String -> Text) -> f String -> f Text forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Range Int -> f Char -> f String @@ -553,34 +554,34 @@ forall a. Integral a => a -> a -> Range a Range.linear Int 0 Int -sz) f Char +sz) f Char forall (m :: * -> *). MonadGen m => m Char Gen.alphaNum - genBytes :: GenT Identity Text -genBytes = (Text -bytesPrefix Text -> Text -> Text + genBytes :: GenT Identity Text +genBytes = (Text +bytesPrefix Text -> Text -> Text forall a. Semigroup a => a -> a -> a <>) - (Text -> Text) -> ([Word8] -> Text) -> [Word8] -> Text + (Text -> Text) -> ([Word8] -> Text) -> [Word8] -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c . ByteString -> Text Text.decodeUtf8 - (ByteString -> Text) -> ([Word8] -> ByteString) -> [Word8] -> Text + (ByteString -> Text) -> ([Word8] -> ByteString) -> [Word8] -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c . ByteString -> ByteString Base16.encode - (ByteString -> ByteString) + (ByteString -> ByteString) -> ([Word8] -> ByteString) -> [Word8] -> ByteString forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c . [Word8] -> ByteString BS.pack - ([Word8] -> Text) -> GenT Identity [Word8] -> GenT Identity Text + ([Word8] -> Text) -> GenT Identity [Word8] -> GenT Identity Text forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Range Int -> GenT Identity Word8 -> GenT Identity [Word8] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] @@ -589,22 +590,22 @@ Range.linear Int 0 Int 64) - (Range Word8 -> GenT Identity Word8 + (Range Word8 -> GenT Identity Word8 forall (m :: * -> *). MonadGen m => Range Word8 -> m Word8 Gen.word8 Range Word8 forall a. (Bounded a, Num a) => Range a Range.constantBounded) - - genJsonList :: Gen [Aeson.Value] - genJsonList :: GenT Identity [Value] -genJsonList = (Size -> GenT Identity [Value]) -> GenT Identity [Value] + + genJsonList :: Gen [Aeson.Value] + genJsonList :: GenT Identity [Value] +genJsonList = (Size -> GenT Identity [Value]) -> GenT Identity [Value] forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> GenT Identity [Value]) -> GenT Identity [Value]) -> (Size -> GenT Identity [Value]) -> GenT Identity [Value] forall a b. (a -> b) -> a -> b -$ \Size -sz -> - Range Int -> Gen Value -> GenT Identity [Value] +$ \Size +sz -> + Range Int -> Gen Value -> GenT Identity [Value] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int forall a. Integral a => a -> a -> Range a @@ -612,19 +613,19 @@ 0 (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Size -sz)) Gen Value -genJsonValue - - genJsonMap :: Gen [(Text, Aeson.Value)] - genJsonMap :: GenT Identity [Pair] -genJsonMap = (Size -> GenT Identity [Pair]) -> GenT Identity [Pair] +sz)) Gen Value +genJsonValue + + genJsonMap :: Gen [(Text, Aeson.Value)] + genJsonMap :: GenT Identity [Pair] +genJsonMap = (Size -> GenT Identity [Pair]) -> GenT Identity [Pair] forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> GenT Identity [Pair]) -> GenT Identity [Pair]) -> (Size -> GenT Identity [Pair]) -> GenT Identity [Pair] forall a b. (a -> b) -> a -> b -$ \Size -sz -> - Range Int -> GenT Identity Pair -> GenT Identity [Pair] +$ \Size +sz -> + Range Int -> GenT Identity Pair -> GenT Identity [Pair] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int forall a. Integral a => a -> a -> Range a @@ -632,153 +633,153 @@ 0 (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Size -sz)) (GenT Identity Pair -> GenT Identity [Pair]) +sz)) (GenT Identity Pair -> GenT Identity [Pair]) -> GenT Identity Pair -> GenT Identity [Pair] forall a b. (a -> b) -> a -> b $ - (,) (Text -> Value -> Pair) + (,) (Text -> Value -> Pair) -> GenT Identity Text -> GenT Identity (Value -> Pair) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity Text -genJsonText GenT Identity (Value -> Pair) -> Gen Value -> GenT Identity Pair +genJsonText GenT Identity (Value -> Pair) -> Gen Value -> GenT Identity Pair forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Gen Value -genJsonValue - +genJsonValue -genJsonForTxMetadataValue TxMetadataJsonSchema + +genJsonForTxMetadataValue TxMetadataJsonSchema TxMetadataJsonDetailedSchema = Gen Value -genJsonValue - where - genJsonValue :: Gen Aeson.Value - genJsonValue :: Gen Value -genJsonValue = - (Size -> Gen Value) -> Gen Value +genJsonValue + where + genJsonValue :: Gen Aeson.Value + genJsonValue :: Gen Value +genJsonValue = + (Size -> Gen Value) -> Gen Value forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> Gen Value) -> Gen Value) -> (Size -> Gen Value) -> Gen Value forall a b. (a -> b) -> a -> b -$ \Size -sz -> - [(Int, Gen Value)] -> Gen Value +$ \Size +sz -> + [(Int, Gen Value)] -> Gen Value forall (m :: * -> *) a. MonadGen m => [(Int, m a)] -> m a Gen.frequency - [ (Int + [ (Int 1, Text -> Value -> Value -singleFieldObject Text +singleFieldObject Text "int" (Value -> Value) -> Gen Value -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Gen Value -genJsonNumber) - , (Int +genJsonNumber) + , (Int 1, Text -> Value -> Value -singleFieldObject Text +singleFieldObject Text "bytes" (Value -> Value) -> Gen Value -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Gen Value -genJsonBytes) - , (Int +genJsonBytes) + , (Int 1, Text -> Value -> Value -singleFieldObject Text +singleFieldObject Text "string" (Value -> Value) -> Gen Value -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Gen Value -genJsonText) - , (Size -> Int +genJsonText) + , (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral (Size -> Size forall a. Num a => a -> a signum Size -sz), - Text -> Value -> Value -singleFieldObject Text +sz), + Text -> Value -> Value +singleFieldObject Text "list" (Value -> Value) -> Gen Value -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> - (Size -> Size) -> Gen Value -> Gen Value + (Size -> Size) -> Gen Value -> Gen Value forall (m :: * -> *) a. MonadGen m => (Size -> Size) -> m a -> m a Gen.scale (Size -> Size -> Size forall a. Integral a => a -> a -> a `div` Size 2) Gen Value -genJsonList) - , (Size -> Int +genJsonList) + , (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral (Size -> Size forall a. Num a => a -> a signum Size -sz), - Text -> Value -> Value -singleFieldObject Text +sz), + Text -> Value -> Value +singleFieldObject Text "map" (Value -> Value) -> Gen Value -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> - (Size -> Size) -> Gen Value -> Gen Value + (Size -> Size) -> Gen Value -> Gen Value forall (m :: * -> *) a. MonadGen m => (Size -> Size) -> m a -> m a Gen.scale (Size -> Size -> Size forall a. Integral a => a -> a -> a `div` Size 2) Gen Value -genJsonMap) - ] - - singleFieldObject :: Text -> Value -> Value -singleFieldObject Text -name Value -v = [Pair] -> Value +genJsonMap) + ] + + singleFieldObject :: Text -> Value -> Value +singleFieldObject Text +name Value +v = [Pair] -> Value Aeson.object [(Text -name, Value -v)] - - genJsonNumber :: Gen Aeson.Value - genJsonNumber :: Gen Value -genJsonNumber = Integer -> Value +name, Value +v)] + + genJsonNumber :: Gen Aeson.Value + genJsonNumber :: Gen Value +genJsonNumber = Integer -> Value forall a. ToJSON a => a -> Value toJSON (Integer -> Value) -> GenT Identity Integer -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> - Range Integer -> GenT Identity Integer + Range Integer -> GenT Identity Integer forall (m :: * -> *) a. (MonadGen m, Integral a) => Range a -> m a Gen.integral - (Integer -> Integer -> Range Integer + (Integer -> Integer -> Range Integer forall a. Integral a => a -> a -> Range a Range.linear - (-Word64 -> Integer + (-Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) :: Integer) - ( Word64 -> Integer + ( Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) :: Integer)) - - genJsonBytes :: Gen Aeson.Value - genJsonBytes :: Gen Value -genJsonBytes = Text -> Value + + genJsonBytes :: Gen Aeson.Value + genJsonBytes :: Gen Value +genJsonBytes = Text -> Value forall a. ToJSON a => a -> Value toJSON - (Text -> Value) -> ([Word8] -> Text) -> [Word8] -> Value + (Text -> Value) -> ([Word8] -> Text) -> [Word8] -> Value forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c . ByteString -> Text Text.decodeLatin1 - (ByteString -> Text) -> ([Word8] -> ByteString) -> [Word8] -> Text + (ByteString -> Text) -> ([Word8] -> ByteString) -> [Word8] -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c . ByteString -> ByteString Base16.encode - (ByteString -> ByteString) + (ByteString -> ByteString) -> ([Word8] -> ByteString) -> [Word8] -> ByteString forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c . [Word8] -> ByteString BS.pack - ([Word8] -> Value) -> GenT Identity [Word8] -> Gen Value + ([Word8] -> Value) -> GenT Identity [Word8] -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Range Int -> GenT Identity Word8 -> GenT Identity [Word8] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] @@ -787,15 +788,15 @@ Range.linear Int 0 Int 64) - (Range Word8 -> GenT Identity Word8 + (Range Word8 -> GenT Identity Word8 forall (m :: * -> *). MonadGen m => Range Word8 -> m Word8 Gen.word8 Range Word8 forall a. (Bounded a, Num a) => Range a Range.constantBounded) - - genJsonText :: Gen Aeson.Value - genJsonText :: Gen Value -genJsonText = (Text -> Value) -> GenT Identity Text -> Gen Value + + genJsonText :: Gen Aeson.Value + genJsonText :: Gen Value +genJsonText = (Text -> Value) -> GenT Identity Text -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap Text -> Value forall a. ToJSON a => a -> Value @@ -803,14 +804,14 @@ -> GenT Identity Text -> Gen Value forall a b. (a -> b) -> a -> b $ - (Text -> Bool) -> GenT Identity Text -> GenT Identity Text + (Text -> Bool) -> GenT Identity Text -> GenT Identity Text forall (m :: * -> *) a. MonadGen m => (a -> Bool) -> m a -> m a Gen.ensure Text -> Bool -validText (GenT Identity Text -> GenT Identity Text) +validText (GenT Identity Text -> GenT Identity Text) -> GenT Identity Text -> GenT Identity Text forall a b. (a -> b) -> a -> b $ - String -> Text + String -> Text Text.pack (String -> Text) -> GenT Identity String -> GenT Identity Text forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Range Int -> GenT Identity Char -> GenT Identity String @@ -822,20 +823,20 @@ 64) GenT Identity Char forall (m :: * -> *). MonadGen m => m Char Gen.alphaNum - where - validText :: Text -> Bool -validText Text -t = ByteString -> Int + where + validText :: Text -> Bool +validText Text +t = ByteString -> Int BS.length (Text -> ByteString Text.encodeUtf8 Text -t) Int -> Int -> Bool +t) Int -> Int -> Bool forall a. Ord a => a -> a -> Bool <= Int 64 - - genJsonList :: Gen Aeson.Value - genJsonList :: Gen Value -genJsonList = ([Value] -> Value) -> GenT Identity [Value] -> Gen Value + + genJsonList :: Gen Aeson.Value + genJsonList :: Gen Value +genJsonList = ([Value] -> Value) -> GenT Identity [Value] -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap [Value] -> Value forall a. ToJSON a => a -> Value @@ -843,14 +844,14 @@ -> GenT Identity [Value] -> Gen Value forall a b. (a -> b) -> a -> b $ - (Size -> GenT Identity [Value]) -> GenT Identity [Value] + (Size -> GenT Identity [Value]) -> GenT Identity [Value] forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> GenT Identity [Value]) -> GenT Identity [Value]) -> (Size -> GenT Identity [Value]) -> GenT Identity [Value] forall a b. (a -> b) -> a -> b -$ \Size -sz -> - Range Int -> Gen Value -> GenT Identity [Value] +$ \Size +sz -> + Range Int -> Gen Value -> GenT Identity [Value] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int forall a. Integral a => a -> a -> Range a @@ -858,12 +859,12 @@ 0 (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Size -sz)) Gen Value -genJsonValue - - genJsonMap :: Gen Aeson.Value - genJsonMap :: Gen Value -genJsonMap = ([Value] -> Value) -> GenT Identity [Value] -> Gen Value +sz)) Gen Value +genJsonValue + + genJsonMap :: Gen Aeson.Value + genJsonMap :: Gen Value +genJsonMap = ([Value] -> Value) -> GenT Identity [Value] -> Gen Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap [Value] -> Value forall a. ToJSON a => a -> Value @@ -871,14 +872,14 @@ -> GenT Identity [Value] -> Gen Value forall a b. (a -> b) -> a -> b $ - (Size -> GenT Identity [Value]) -> GenT Identity [Value] + (Size -> GenT Identity [Value]) -> GenT Identity [Value] forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> GenT Identity [Value]) -> GenT Identity [Value]) -> (Size -> GenT Identity [Value]) -> GenT Identity [Value] forall a b. (a -> b) -> a -> b -$ \Size -sz -> - Range Int -> Gen Value -> GenT Identity [Value] +$ \Size +sz -> + Range Int -> Gen Value -> GenT Identity [Value] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int forall a. Integral a => a -> a -> Range a @@ -886,43 +887,43 @@ 0 (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Size -sz)) (Gen Value -> GenT Identity [Value]) +sz)) (Gen Value -> GenT Identity [Value]) -> Gen Value -> GenT Identity [Value] forall a b. (a -> b) -> a -> b $ - Value -> Value -> Value -mkKVPair (Value -> Value -> Value) + Value -> Value -> Value +mkKVPair (Value -> Value -> Value) -> Gen Value -> GenT Identity (Value -> Value) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Gen Value -genJsonValue GenT Identity (Value -> Value) -> Gen Value -> Gen Value +genJsonValue GenT Identity (Value -> Value) -> Gen Value -> Gen Value forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Gen Value -genJsonValue - where - mkKVPair :: Aeson.Value -> Aeson.Value -> Aeson.Value - mkKVPair :: Value -> Value -> Value -mkKVPair Value -k Value -v = [Pair] -> Value +genJsonValue + where + mkKVPair :: Aeson.Value -> Aeson.Value -> Aeson.Value + mkKVPair :: Value -> Value -> Value +mkKVPair Value +k Value +v = [Pair] -> Value Aeson.object [ (Text "k", Value -k), (Text +k), (Text "v", Value -v) ] - +v) ] -genTxMetadata :: Gen TxMetadata -genTxMetadata :: Gen TxMetadata + +genTxMetadata :: Gen TxMetadata +genTxMetadata :: Gen TxMetadata genTxMetadata = - (Size -> Gen TxMetadata) -> Gen TxMetadata + (Size -> Gen TxMetadata) -> Gen TxMetadata forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> Gen TxMetadata) -> Gen TxMetadata) -> (Size -> Gen TxMetadata) -> Gen TxMetadata forall a b. (a -> b) -> a -> b -$ \Size -sz -> - Map Word64 TxMetadataValue -> TxMetadata +$ \Size +sz -> + Map Word64 TxMetadataValue -> TxMetadata TxMetadata (Map Word64 TxMetadataValue -> TxMetadata) -> ([(Word64, TxMetadataValue)] -> Map Word64 TxMetadataValue) -> [(Word64, TxMetadataValue)] @@ -936,7 +937,7 @@ -> GenT Identity [(Word64, TxMetadataValue)] -> Gen TxMetadata forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> - Range Int + Range Int -> GenT Identity (Word64, TxMetadataValue) -> GenT Identity [(Word64, TxMetadataValue)] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] @@ -946,8 +947,8 @@ 0 (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Size -sz)) - ((,) (Word64 -> TxMetadataValue -> (Word64, TxMetadataValue)) +sz)) + ((,) (Word64 -> TxMetadataValue -> (Word64, TxMetadataValue)) -> GenT Identity Word64 -> GenT Identity (TxMetadataValue -> (Word64, TxMetadataValue)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -956,17 +957,17 @@ Gen.word64 Range Word64 forall a. (Bounded a, Num a) => Range a Range.constantBounded - GenT Identity (TxMetadataValue -> (Word64, TxMetadataValue)) + GenT Identity (TxMetadataValue -> (Word64, TxMetadataValue)) -> GenT Identity TxMetadataValue -> GenT Identity (Word64, TxMetadataValue) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> GenT Identity TxMetadataValue genTxMetadataValue) - -genTxMetadataValue :: Gen TxMetadataValue -genTxMetadataValue :: GenT Identity TxMetadataValue + +genTxMetadataValue :: Gen TxMetadataValue +genTxMetadataValue :: GenT Identity TxMetadataValue genTxMetadataValue = - (Size -> GenT Identity TxMetadataValue) + (Size -> GenT Identity TxMetadataValue) -> GenT Identity TxMetadataValue forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> GenT Identity TxMetadataValue) @@ -974,40 +975,40 @@ -> (Size -> GenT Identity TxMetadataValue) -> GenT Identity TxMetadataValue forall a b. (a -> b) -> a -> b -$ \Size -sz -> - [(Int, GenT Identity TxMetadataValue)] +$ \Size +sz -> + [(Int, GenT Identity TxMetadataValue)] -> GenT Identity TxMetadataValue forall (m :: * -> *) a. MonadGen m => [(Int, m a)] -> m a Gen.frequency - [ (Int + [ (Int 1, Integer -> TxMetadataValue TxMetaNumber (Integer -> TxMetadataValue) -> GenT Identity Integer -> GenT Identity TxMetadataValue forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity Integer -genTxMetaNumber) - , (Int +genTxMetaNumber) + , (Int 1, ByteString -> TxMetadataValue TxMetaBytes (ByteString -> TxMetadataValue) -> GenT Identity ByteString -> GenT Identity TxMetadataValue forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity ByteString -genTxMetaBytes) - , (Int +genTxMetaBytes) + , (Int 1, Text -> TxMetadataValue TxMetaText (Text -> TxMetadataValue) -> GenT Identity Text -> GenT Identity TxMetadataValue forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity Text -genTxMetaText) - , (Size -> Int +genTxMetaText) + , (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral (Size -> Size forall a. Num a => a -> a signum Size -sz), - [TxMetadataValue] -> TxMetadataValue +sz), + [TxMetadataValue] -> TxMetadataValue TxMetaList ([TxMetadataValue] -> TxMetadataValue) -> GenT Identity [TxMetadataValue] -> GenT Identity TxMetadataValue forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -1019,14 +1020,14 @@ forall a. Integral a => a -> a -> a `div` Size 2) GenT Identity [TxMetadataValue] -genTxMetaList) - , (Size -> Int +genTxMetaList) + , (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral (Size -> Size forall a. Num a => a -> a signum Size -sz), - [(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue +sz), + [(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue TxMetaMap ([(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue) -> GenT Identity [(TxMetadataValue, TxMetadataValue)] -> GenT Identity TxMetadataValue @@ -1039,31 +1040,31 @@ forall a. Integral a => a -> a -> a `div` Size 2) GenT Identity [(TxMetadataValue, TxMetadataValue)] -genTxMetaMap) - ] - where - genTxMetaNumber :: Gen Integer - genTxMetaNumber :: GenT Identity Integer -genTxMetaNumber = Range Integer -> GenT Identity Integer +genTxMetaMap) + ] + where + genTxMetaNumber :: Gen Integer + genTxMetaNumber :: GenT Identity Integer +genTxMetaNumber = Range Integer -> GenT Identity Integer forall (m :: * -> *) a. (MonadGen m, Integral a) => Range a -> m a Gen.integral - (Integer -> Integer -> Range Integer + (Integer -> Integer -> Range Integer forall a. Integral a => a -> a -> Range a Range.linear - (-Word64 -> Integer + (-Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) :: Integer) - ( Word64 -> Integer + ( Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) :: Integer)) - - genTxMetaBytes :: Gen ByteString - genTxMetaBytes :: GenT Identity ByteString -genTxMetaBytes = [Word8] -> ByteString + + genTxMetaBytes :: Gen ByteString + genTxMetaBytes :: GenT Identity ByteString +genTxMetaBytes = [Word8] -> ByteString BS.pack ([Word8] -> ByteString) -> GenT Identity [Word8] -> GenT Identity ByteString forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -1074,15 +1075,15 @@ Range.linear Int 0 Int 64) - (Range Word8 -> GenT Identity Word8 + (Range Word8 -> GenT Identity Word8 forall (m :: * -> *). MonadGen m => Range Word8 -> m Word8 Gen.word8 Range Word8 forall a. (Bounded a, Num a) => Range a Range.constantBounded) - - genTxMetaText :: Gen Text - genTxMetaText :: GenT Identity Text -genTxMetaText = String -> Text + + genTxMetaText :: Gen Text + genTxMetaText :: GenT Identity Text +genTxMetaText = String -> Text Text.pack (String -> Text) -> GenT Identity String -> GenT Identity Text forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Range Int -> GenT Identity Char -> GenT Identity String @@ -1094,10 +1095,10 @@ 64) GenT Identity Char forall (m :: * -> *). MonadGen m => m Char Gen.alphaNum - - genTxMetaList :: Gen [TxMetadataValue] - genTxMetaList :: GenT Identity [TxMetadataValue] -genTxMetaList = (Size -> GenT Identity [TxMetadataValue]) + + genTxMetaList :: Gen [TxMetadataValue] + genTxMetaList :: GenT Identity [TxMetadataValue] +genTxMetaList = (Size -> GenT Identity [TxMetadataValue]) -> GenT Identity [TxMetadataValue] forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> GenT Identity [TxMetadataValue]) @@ -1105,9 +1106,9 @@ -> (Size -> GenT Identity [TxMetadataValue]) -> GenT Identity [TxMetadataValue] forall a b. (a -> b) -> a -> b -$ \Size -sz -> - Range Int +$ \Size +sz -> + Range Int -> GenT Identity TxMetadataValue -> GenT Identity [TxMetadataValue] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int @@ -1116,13 +1117,13 @@ 0 (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Size -sz)) - GenT Identity TxMetadataValue +sz)) + GenT Identity TxMetadataValue genTxMetadataValue - - genTxMetaMap :: Gen [(TxMetadataValue, TxMetadataValue)] - genTxMetaMap :: GenT Identity [(TxMetadataValue, TxMetadataValue)] -genTxMetaMap = (Size -> GenT Identity [(TxMetadataValue, TxMetadataValue)]) + + genTxMetaMap :: Gen [(TxMetadataValue, TxMetadataValue)] + genTxMetaMap :: GenT Identity [(TxMetadataValue, TxMetadataValue)] +genTxMetaMap = (Size -> GenT Identity [(TxMetadataValue, TxMetadataValue)]) -> GenT Identity [(TxMetadataValue, TxMetadataValue)] forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> GenT Identity [(TxMetadataValue, TxMetadataValue)]) @@ -1130,9 +1131,9 @@ -> (Size -> GenT Identity [(TxMetadataValue, TxMetadataValue)]) -> GenT Identity [(TxMetadataValue, TxMetadataValue)] forall a b. (a -> b) -> a -> b -$ \Size -sz -> - Range Int +$ \Size +sz -> + Range Int -> GenT Identity (TxMetadataValue, TxMetadataValue) -> GenT Identity [(TxMetadataValue, TxMetadataValue)] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] @@ -1142,13 +1143,13 @@ 0 (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Size -sz)) (GenT Identity (TxMetadataValue, TxMetadataValue) +sz)) (GenT Identity (TxMetadataValue, TxMetadataValue) -> GenT Identity [(TxMetadataValue, TxMetadataValue)]) -> GenT Identity (TxMetadataValue, TxMetadataValue) -> GenT Identity [(TxMetadataValue, TxMetadataValue)] forall a b. (a -> b) -> a -> b $ - (,) (TxMetadataValue + (,) (TxMetadataValue -> TxMetadataValue -> (TxMetadataValue, TxMetadataValue)) -> GenT Identity TxMetadataValue -> GenT @@ -1162,14 +1163,14 @@ forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> GenT Identity TxMetadataValue genTxMetadataValue - --- ---------------------------------------------------------------------------- --- Automagically collecting all the tests --- - -tests :: TestTree -tests :: TestTree + +-- ---------------------------------------------------------------------------- +-- Automagically collecting all the tests +-- + +tests :: TestTree +tests :: TestTree tests = Group -> TestTree fromGroup String [(PropertyName, Property)] @@ -1189,4 +1190,4 @@ prop_golden_2 :: Property prop_golden_1 :: Property $$discover - \ No newline at end of file + \ No newline at end of file diff --git a/cardano-api-test/src/Test.Cardano.Api.Typed.Gen.html b/cardano-api-test/src/Test.Cardano.Api.Typed.Gen.html index c4632a70afe..7f3536fc807 100644 --- a/cardano-api-test/src/Test.Cardano.Api.Typed.Gen.html +++ b/cardano-api-test/src/Test.Cardano.Api.Typed.Gen.html @@ -145,44 +145,44 @@ -- SimpleScript generators -- -genScript :: ScriptLanguage lang -> Gen (Script lang) +genScript :: ScriptLanguage lang -> Gen (Script lang) genScript :: ScriptLanguage lang -> Gen (Script lang) -genScript (SimpleScriptLanguage SimpleScriptVersion lang -lang) = +genScript (SimpleScriptLanguage SimpleScriptVersion lang +lang) = SimpleScriptVersion lang -> SimpleScript lang -> Script lang forall lang. SimpleScriptVersion lang -> SimpleScript lang -> Script lang SimpleScript SimpleScriptVersion lang -lang (SimpleScript lang -> Script lang) +lang (SimpleScript lang -> Script lang) -> GenT Identity (SimpleScript lang) -> Gen (Script lang) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> SimpleScriptVersion lang -> GenT Identity (SimpleScript lang) forall lang. SimpleScriptVersion lang -> Gen (SimpleScript lang) genSimpleScript SimpleScriptVersion lang -lang -genScript (PlutusScriptLanguage PlutusScriptVersion lang -lang) = +lang +genScript (PlutusScriptLanguage PlutusScriptVersion lang +lang) = PlutusScriptVersion lang -> PlutusScript lang -> Script lang forall lang. PlutusScriptVersion lang -> PlutusScript lang -> Script lang PlutusScript PlutusScriptVersion lang -lang (PlutusScript lang -> Script lang) +lang (PlutusScript lang -> Script lang) -> GenT Identity (PlutusScript lang) -> Gen (Script lang) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> PlutusScriptVersion lang -> GenT Identity (PlutusScript lang) forall lang. PlutusScriptVersion lang -> Gen (PlutusScript lang) genPlutusScript PlutusScriptVersion lang -lang +lang -genSimpleScript :: SimpleScriptVersion lang -> Gen (SimpleScript lang) +genSimpleScript :: SimpleScriptVersion lang -> Gen (SimpleScript lang) genSimpleScript :: SimpleScriptVersion lang -> Gen (SimpleScript lang) -genSimpleScript SimpleScriptVersion lang -lang = +genSimpleScript SimpleScriptVersion lang +lang = Gen (SimpleScript lang) -genTerm +genTerm where - genTerm :: Gen (SimpleScript lang) -genTerm = ([Gen (SimpleScript lang)] -> Gen (SimpleScript lang)) + genTerm :: Gen (SimpleScript lang) +genTerm = ([Gen (SimpleScript lang)] -> Gen (SimpleScript lang)) -> [Gen (SimpleScript lang)] -> [Gen (SimpleScript lang)] -> Gen (SimpleScript lang) @@ -192,12 +192,12 @@ Gen.recursive [Gen (SimpleScript lang)] -> Gen (SimpleScript lang) forall (m :: * -> *) a. MonadGen m => [m a] -> m a Gen.choice [Gen (SimpleScript lang)] -nonRecursive [Gen (SimpleScript lang)] -recursive +nonRecursive [Gen (SimpleScript lang)] +recursive -- Non-recursive generators - nonRecursive :: [Gen (SimpleScript lang)] -nonRecursive = + nonRecursive :: [Gen (SimpleScript lang)] +nonRecursive = (Hash PaymentKey -> SimpleScript lang forall lang. Hash PaymentKey -> SimpleScript lang RequireSignature (Hash PaymentKey -> SimpleScript lang) @@ -229,19 +229,19 @@ : [ TimeLocksSupported lang -> SlotNo -> SimpleScript lang forall lang. TimeLocksSupported lang -> SlotNo -> SimpleScript lang RequireTimeBefore TimeLocksSupported lang -supported (SlotNo -> SimpleScript lang) +supported (SlotNo -> SimpleScript lang) -> GenT Identity SlotNo -> Gen (SimpleScript lang) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity SlotNo genSlotNo - | TimeLocksSupported lang -supported <- Maybe (TimeLocksSupported lang) -> [TimeLocksSupported lang] + | TimeLocksSupported lang +supported <- Maybe (TimeLocksSupported lang) -> [TimeLocksSupported lang] forall a. Maybe a -> [a] maybeToList (SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) forall lang. SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) timeLocksSupported SimpleScriptVersion lang -lang) ] +lang) ] [Gen (SimpleScript lang)] -> [Gen (SimpleScript lang)] -> [Gen (SimpleScript lang)] @@ -249,23 +249,23 @@ ++ [ TimeLocksSupported lang -> SlotNo -> SimpleScript lang forall lang. TimeLocksSupported lang -> SlotNo -> SimpleScript lang RequireTimeAfter TimeLocksSupported lang -supported (SlotNo -> SimpleScript lang) +supported (SlotNo -> SimpleScript lang) -> GenT Identity SlotNo -> Gen (SimpleScript lang) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity SlotNo genSlotNo - | TimeLocksSupported lang -supported <- Maybe (TimeLocksSupported lang) -> [TimeLocksSupported lang] + | TimeLocksSupported lang +supported <- Maybe (TimeLocksSupported lang) -> [TimeLocksSupported lang] forall a. Maybe a -> [a] maybeToList (SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) forall lang. SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) timeLocksSupported SimpleScriptVersion lang -lang) ] +lang) ] -- Recursive generators - recursive :: [Gen (SimpleScript lang)] -recursive = + recursive :: [Gen (SimpleScript lang)] +recursive = [ [SimpleScript lang] -> SimpleScript lang forall lang. [SimpleScript lang] -> SimpleScript lang RequireAllOf ([SimpleScript lang] -> SimpleScript lang) @@ -279,7 +279,7 @@ Range.linear Int 0 Int 10) Gen (SimpleScript lang) -genTerm +genTerm , [SimpleScript lang] -> SimpleScript lang forall lang. [SimpleScript lang] -> SimpleScript lang @@ -294,10 +294,10 @@ Range.linear Int 0 Int 10) Gen (SimpleScript lang) -genTerm +genTerm - , do [SimpleScript lang] -ts <- Range Int + , do [SimpleScript lang] +ts <- Range Int -> Gen (SimpleScript lang) -> GenT Identity [SimpleScript lang] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int @@ -305,9 +305,9 @@ Range.linear Int 0 Int 10) Gen (SimpleScript lang) -genTerm - Int -m <- Range Int -> GenT Identity Int +genTerm + Int +m <- Range Int -> GenT Identity Int forall (m :: * -> *) a. (MonadGen m, Integral a) => Range a -> m a Gen.integral (Int -> Int -> Range Int forall a. a -> a -> Range a @@ -315,17 +315,17 @@ 0 ([SimpleScript lang] -> Int forall a. HasLength a => a -> Int length [SimpleScript lang] -ts)) +ts)) SimpleScript lang -> Gen (SimpleScript lang) forall (m :: * -> *) a. Monad m => a -> m a return (Int -> [SimpleScript lang] -> SimpleScript lang forall lang. Int -> [SimpleScript lang] -> SimpleScript lang RequireMOf Int -m [SimpleScript lang] -ts) +m [SimpleScript lang] +ts) ] -genPlutusScript :: PlutusScriptVersion lang -> Gen (PlutusScript lang) +genPlutusScript :: PlutusScriptVersion lang -> Gen (PlutusScript lang) genPlutusScript :: PlutusScriptVersion lang -> Gen (PlutusScript lang) genPlutusScript PlutusScriptVersion lang _ = @@ -367,13 +367,13 @@ ScriptDataNumber (Integer -> ScriptData) -> GenT Identity Integer -> Gen ScriptData forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity Integer -genInteger +genInteger , ByteString -> ScriptData ScriptDataBytes (ByteString -> ScriptData) -> GenT Identity ByteString -> Gen ScriptData forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity ByteString -genByteString +genByteString ] -- The Gen.recursive combinator calls these with the size halved [ Integer -> [ScriptData] -> ScriptData @@ -382,29 +382,29 @@ -> GenT Identity ([ScriptData] -> ScriptData) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity Integer -genInteger +genInteger GenT Identity ([ScriptData] -> ScriptData) -> GenT Identity [ScriptData] -> Gen ScriptData forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> GenT Identity [ScriptData] -genScriptDataList +genScriptDataList , [ScriptData] -> ScriptData ScriptDataList ([ScriptData] -> ScriptData) -> GenT Identity [ScriptData] -> Gen ScriptData forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity [ScriptData] -genScriptDataList +genScriptDataList , [(ScriptData, ScriptData)] -> ScriptData ScriptDataMap ([(ScriptData, ScriptData)] -> ScriptData) -> GenT Identity [(ScriptData, ScriptData)] -> Gen ScriptData forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity [(ScriptData, ScriptData)] -genScriptDataMap +genScriptDataMap ] where - genInteger :: Gen Integer - genInteger :: GenT Identity Integer -genInteger = Range Integer -> GenT Identity Integer + genInteger :: Gen Integer + genInteger :: GenT Identity Integer +genInteger = Range Integer -> GenT Identity Integer forall (m :: * -> *) a. (MonadGen m, Integral a) => Range a -> m a Gen.integral (Integer -> Integer -> Range Integer @@ -421,9 +421,9 @@ forall a. Bounded a => a maxBound :: Word64) :: Integer)) - genByteString :: Gen ByteString - genByteString :: GenT Identity ByteString -genByteString = [Word8] -> ByteString + genByteString :: Gen ByteString + genByteString :: GenT Identity ByteString +genByteString = [Word8] -> ByteString BS.pack ([Word8] -> ByteString) -> GenT Identity [Word8] -> GenT Identity ByteString forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -440,9 +440,9 @@ forall a. (Bounded a, Num a) => Range a Range.constantBounded) - genScriptDataList :: Gen [ScriptData] - genScriptDataList :: GenT Identity [ScriptData] -genScriptDataList = + genScriptDataList :: Gen [ScriptData] + genScriptDataList :: GenT Identity [ScriptData] +genScriptDataList = (Size -> GenT Identity [ScriptData]) -> GenT Identity [ScriptData] forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a Gen.sized ((Size -> GenT Identity [ScriptData]) @@ -450,8 +450,8 @@ -> (Size -> GenT Identity [ScriptData]) -> GenT Identity [ScriptData] forall a b. (a -> b) -> a -> b -$ \Size -sz -> +$ \Size +sz -> Range Int -> Gen ScriptData -> GenT Identity [ScriptData] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int @@ -460,12 +460,12 @@ 0 (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Size -sz)) Gen ScriptData +sz)) Gen ScriptData genScriptData - genScriptDataMap :: Gen [(ScriptData, ScriptData)] - genScriptDataMap :: GenT Identity [(ScriptData, ScriptData)] -genScriptDataMap = + genScriptDataMap :: Gen [(ScriptData, ScriptData)] + genScriptDataMap :: GenT Identity [(ScriptData, ScriptData)] +genScriptDataMap = (Size -> GenT Identity [(ScriptData, ScriptData)]) -> GenT Identity [(ScriptData, ScriptData)] forall (m :: * -> *) a. MonadGen m => (Size -> m a) -> m a @@ -474,8 +474,8 @@ -> (Size -> GenT Identity [(ScriptData, ScriptData)]) -> GenT Identity [(ScriptData, ScriptData)] forall a b. (a -> b) -> a -> b -$ \Size -sz -> +$ \Size +sz -> Range Int -> GenT Identity (ScriptData, ScriptData) -> GenT Identity [(ScriptData, ScriptData)] @@ -486,7 +486,7 @@ 0 (Size -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Size -sz)) (GenT Identity (ScriptData, ScriptData) +sz)) (GenT Identity (ScriptData, ScriptData) -> GenT Identity [(ScriptData, ScriptData)]) -> GenT Identity (ScriptData, ScriptData) -> GenT Identity [(ScriptData, ScriptData)] @@ -517,24 +517,24 @@ [ ScriptLanguage lang -> Script lang -> ScriptInAnyLang forall lang. ScriptLanguage lang -> Script lang -> ScriptInAnyLang ScriptInAnyLang ScriptLanguage lang -lang (Script lang -> ScriptInAnyLang) +lang (Script lang -> ScriptInAnyLang) -> GenT Identity (Script lang) -> Gen ScriptInAnyLang forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> ScriptLanguage lang -> GenT Identity (Script lang) forall lang. ScriptLanguage lang -> Gen (Script lang) genScript ScriptLanguage lang -lang - | AnyScriptLanguage ScriptLanguage lang -lang <- [AnyScriptLanguage +lang + | AnyScriptLanguage ScriptLanguage lang +lang <- [AnyScriptLanguage forall a. Bounded a => a minBound..AnyScriptLanguage forall a. Bounded a => a maxBound] ] -genScriptInEra :: CardanoEra era -> Gen (ScriptInEra era) +genScriptInEra :: CardanoEra era -> Gen (ScriptInEra era) genScriptInEra :: CardanoEra era -> Gen (ScriptInEra era) -genScriptInEra CardanoEra era -era = +genScriptInEra CardanoEra era +era = [Gen (ScriptInEra era)] -> Gen (ScriptInEra era) forall (m :: * -> *) a. MonadGen m => [m a] -> m a Gen.choice @@ -542,42 +542,42 @@ forall lang era. ScriptLanguageInEra lang era -> Script lang -> ScriptInEra era ScriptInEra ScriptLanguageInEra lang era -langInEra (Script lang -> ScriptInEra era) +langInEra (Script lang -> ScriptInEra era) -> GenT Identity (Script lang) -> Gen (ScriptInEra era) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> ScriptLanguage lang -> GenT Identity (Script lang) forall lang. ScriptLanguage lang -> Gen (Script lang) genScript ScriptLanguage lang -lang - | AnyScriptLanguage ScriptLanguage lang -lang <- [AnyScriptLanguage +lang + | AnyScriptLanguage ScriptLanguage lang +lang <- [AnyScriptLanguage forall a. Bounded a => a minBound..AnyScriptLanguage forall a. Bounded a => a maxBound] - , Just ScriptLanguageInEra lang era -langInEra <- [CardanoEra era + , Just ScriptLanguageInEra lang era +langInEra <- [CardanoEra era -> ScriptLanguage lang -> Maybe (ScriptLanguageInEra lang era) forall era lang. CardanoEra era -> ScriptLanguage lang -> Maybe (ScriptLanguageInEra lang era) scriptLanguageSupportedInEra CardanoEra era -era ScriptLanguage lang -lang] ] +era ScriptLanguage lang +lang] ] genScriptHash :: Gen ScriptHash genScriptHash :: Gen ScriptHash genScriptHash = do ScriptInAnyLang ScriptLanguage lang -_ Script lang -script <- Gen ScriptInAnyLang +_ Script lang +script <- Gen ScriptInAnyLang genScriptInAnyLang ScriptHash -> Gen ScriptHash forall (m :: * -> *) a. Monad m => a -> m a return (Script lang -> ScriptHash forall lang. Script lang -> ScriptHash hashScript Script lang -script) +script) ---------------------------------------------------------------------------- @@ -645,14 +645,14 @@ Gen.element [ String -> PolicyId forall a. IsString a => String -> a fromString (Char -x Char -> String -> String +x Char -> String -> String forall a. a -> [a] -> [a] : Int -> Char -> String forall a. Int -> a -> [a] replicate Int 55 Char -'0') | Char -x <- [Char +'0') | Char +x <- [Char 'a'..Char 'c'] ]) @@ -687,15 +687,15 @@ genQuantity :: Range Integer -> Gen Quantity genQuantity :: Range Integer -> Gen Quantity -genQuantity Range Integer -range = Integer -> Quantity +genQuantity Range Integer +range = Integer -> Quantity forall a. Num a => Integer -> a fromInteger (Integer -> Quantity) -> GenT Identity Integer -> Gen Quantity forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Range Integer -> GenT Identity Integer forall (m :: * -> *) a. (MonadGen m, Integral a) => Range a -> m a Gen.integral Range Integer -range +range -- | Generate a positive or negative quantity. genSignedQuantity :: Gen Quantity @@ -719,9 +719,9 @@ genValue :: Gen AssetId -> Gen Quantity -> Gen Value genValue :: Gen AssetId -> Gen Quantity -> Gen Value -genValue Gen AssetId -genAId Gen Quantity -genQuant = +genValue Gen AssetId +genAId Gen Quantity +genQuant = [(AssetId, Quantity)] -> Value valueFromList ([(AssetId, Quantity)] -> Value) -> GenT Identity [(AssetId, Quantity)] -> Gen Value @@ -740,11 +740,11 @@ -> Gen AssetId -> GenT Identity (Quantity -> (AssetId, Quantity)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Gen AssetId -genAId GenT Identity (Quantity -> (AssetId, Quantity)) +genAId GenT Identity (Quantity -> (AssetId, Quantity)) -> Gen Quantity -> GenT Identity (AssetId, Quantity) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Gen Quantity -genQuant) +genQuant) -- | Generate a 'Value' with any asset ID and a positive or negative quantity. genValueDefault :: Gen Value @@ -760,12 +760,12 @@ genValueForMinting :: Gen Value genValueForMinting = Gen AssetId -> Gen Quantity -> Gen Value genValue Gen AssetId -genAssetIdNoAda Gen Quantity +genAssetIdNoAda Gen Quantity genSignedQuantity where - genAssetIdNoAda :: Gen AssetId - genAssetIdNoAda :: Gen AssetId -genAssetIdNoAda = PolicyId -> AssetName -> AssetId + genAssetIdNoAda :: Gen AssetId + genAssetIdNoAda :: Gen AssetId +genAssetIdNoAda = PolicyId -> AssetName -> AssetId AssetId (PolicyId -> AssetName -> AssetId) -> Gen PolicyId -> GenT Identity (AssetName -> AssetId) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -922,16 +922,16 @@ Identity (OperationalCertificate, OperationalCertificateIssueCounter) genOperationalCertificateWithCounter = do - VerificationKey KesKey -kesVKey <- AsType KesKey -> Gen (VerificationKey KesKey) + VerificationKey KesKey +kesVKey <- AsType KesKey -> Gen (VerificationKey KesKey) forall keyrole. Key keyrole => AsType keyrole -> Gen (VerificationKey keyrole) genVerificationKey AsType KesKey AsKesKey - Either + Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) -stkPoolOrGenDelExtSign <- GenT Identity (SigningKey StakePoolKey) +stkPoolOrGenDelExtSign <- GenT Identity (SigningKey StakePoolKey) -> GenT Identity (SigningKey GenesisDelegateExtendedKey) -> GenT Identity @@ -952,11 +952,11 @@ AsType keyrole -> Gen (SigningKey keyrole) genSigningKey AsType GenesisDelegateExtendedKey AsGenesisDelegateExtendedKey) - KESPeriod -kesP <- Gen KESPeriod + KESPeriod +kesP <- Gen KESPeriod genKESPeriod - Word64 -c <- Range Word64 -> GenT Identity Word64 + Word64 +c <- Range Word64 -> GenT Identity Word64 forall (m :: * -> *) a. (MonadGen m, Integral a) => Range a -> m a Gen.integral (Range Word64 -> GenT Identity Word64) -> Range Word64 -> GenT Identity Word64 @@ -966,8 +966,8 @@ Range.linear Word64 0 Word64 1000 - let stakePoolVer :: VerificationKey StakePoolKey -stakePoolVer = (SigningKey StakePoolKey -> VerificationKey StakePoolKey) + let stakePoolVer :: VerificationKey StakePoolKey +stakePoolVer = (SigningKey StakePoolKey -> VerificationKey StakePoolKey) -> (SigningKey GenesisDelegateExtendedKey -> VerificationKey StakePoolKey) -> Either @@ -980,7 +980,7 @@ SigningKey keyrole -> VerificationKey keyrole getVerificationKey (VerificationKey GenesisDelegateExtendedKey -> VerificationKey StakePoolKey -convert (VerificationKey GenesisDelegateExtendedKey +convert (VerificationKey GenesisDelegateExtendedKey -> VerificationKey StakePoolKey) -> (SigningKey GenesisDelegateExtendedKey -> VerificationKey GenesisDelegateExtendedKey) @@ -996,14 +996,14 @@ SigningKey keyrole -> VerificationKey keyrole getVerificationKey) Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) -stkPoolOrGenDelExtSign - iCounter :: OperationalCertificateIssueCounter -iCounter = Word64 +stkPoolOrGenDelExtSign + iCounter :: OperationalCertificateIssueCounter +iCounter = Word64 -> VerificationKey StakePoolKey -> OperationalCertificateIssueCounter OperationalCertificateIssueCounter Word64 -c VerificationKey StakePoolKey -stakePoolVer +c VerificationKey StakePoolKey +stakePoolVer case VerificationKey KesKey -> Either @@ -1014,15 +1014,15 @@ OperationalCertIssueError (OperationalCertificate, OperationalCertificateIssueCounter) issueOperationalCertificate VerificationKey KesKey -kesVKey Either +kesVKey Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) -stkPoolOrGenDelExtSign KESPeriod -kesP OperationalCertificateIssueCounter -iCounter of +stkPoolOrGenDelExtSign KESPeriod +kesP OperationalCertificateIssueCounter +iCounter of -- This case should be impossible as we clearly derive the verification -- key from the generated signing key. - Left OperationalCertIssueError -err -> String + Left OperationalCertIssueError +err -> String -> GenT Identity (OperationalCertificate, OperationalCertificateIssueCounter) @@ -1039,21 +1039,21 @@ $ OperationalCertIssueError -> String forall e. Error e => e -> String displayError OperationalCertIssueError -err - Right (OperationalCertificate, OperationalCertificateIssueCounter) -pair -> (OperationalCertificate, OperationalCertificateIssueCounter) +err + Right (OperationalCertificate, OperationalCertificateIssueCounter) +pair -> (OperationalCertificate, OperationalCertificateIssueCounter) -> GenT Identity (OperationalCertificate, OperationalCertificateIssueCounter) forall (m :: * -> *) a. Monad m => a -> m a return (OperationalCertificate, OperationalCertificateIssueCounter) -pair +pair where - convert :: VerificationKey GenesisDelegateExtendedKey + convert :: VerificationKey GenesisDelegateExtendedKey -> VerificationKey StakePoolKey - convert :: VerificationKey GenesisDelegateExtendedKey + convert :: VerificationKey GenesisDelegateExtendedKey -> VerificationKey StakePoolKey -convert = (VerificationKey GenesisDelegateKey -> VerificationKey StakePoolKey +convert = (VerificationKey GenesisDelegateKey -> VerificationKey StakePoolKey forall keyroleA keyroleB. CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB @@ -1081,8 +1081,8 @@ genPaymentCredential :: Gen PaymentCredential genPaymentCredential :: GenT Identity PaymentCredential genPaymentCredential = do - VerificationKey PaymentKey -vKey <- AsType PaymentKey -> GenT Identity (VerificationKey PaymentKey) + VerificationKey PaymentKey +vKey <- AsType PaymentKey -> GenT Identity (VerificationKey PaymentKey) forall keyrole. Key keyrole => AsType keyrole -> Gen (VerificationKey keyrole) @@ -1106,37 +1106,37 @@ Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey PaymentKey -vKey +vKey -genSigningKey :: Key keyrole => AsType keyrole -> Gen (SigningKey keyrole) +genSigningKey :: Key keyrole => AsType keyrole -> Gen (SigningKey keyrole) genSigningKey :: AsType keyrole -> Gen (SigningKey keyrole) -genSigningKey AsType keyrole -roletoken = do - Seed -seed <- Int -> Gen Seed +genSigningKey AsType keyrole +roletoken = do + Seed +seed <- Int -> Gen Seed genSeed (Word -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Word -seedSize) - let sk :: SigningKey keyrole -sk = AsType keyrole -> Seed -> SigningKey keyrole +seedSize) + let sk :: SigningKey keyrole +sk = AsType keyrole -> Seed -> SigningKey keyrole forall keyrole. Key keyrole => AsType keyrole -> Seed -> SigningKey keyrole deterministicSigningKey AsType keyrole -roletoken Seed -seed +roletoken Seed +seed SigningKey keyrole -> Gen (SigningKey keyrole) forall (m :: * -> *) a. Monad m => a -> m a return SigningKey keyrole -sk +sk where - seedSize :: Word - seedSize :: Word -seedSize = AsType keyrole -> Word + seedSize :: Word + seedSize :: Word +seedSize = AsType keyrole -> Word forall keyrole. Key keyrole => AsType keyrole -> Word deterministicSigningKeySeedSize AsType keyrole -roletoken +roletoken genStakeAddress :: Gen StakeAddress genStakeAddress :: Gen StakeAddress @@ -1177,8 +1177,8 @@ genStakeCredential :: Gen StakeCredential genStakeCredential :: GenT Identity StakeCredential genStakeCredential = do - VerificationKey StakeKey -vKey <- AsType StakeKey -> Gen (VerificationKey StakeKey) + VerificationKey StakeKey +vKey <- AsType StakeKey -> Gen (VerificationKey StakeKey) forall keyrole. Key keyrole => AsType keyrole -> Gen (VerificationKey keyrole) @@ -1202,13 +1202,13 @@ Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakeKey -vKey +vKey genTxBodyShelley :: Gen (TxBody ShelleyEra) genTxBodyShelley :: Gen (TxBody ShelleyEra) genTxBodyShelley = do - Either (TxBodyError ShelleyEra) (TxBody ShelleyEra) -res <- TxBodyContent BuildTx ShelleyEra + Either (TxBodyError ShelleyEra) (TxBody ShelleyEra) +res <- TxBodyContent BuildTx ShelleyEra -> Either (TxBodyError ShelleyEra) (TxBody ShelleyEra) forall era. IsCardanoEra era => @@ -1225,19 +1225,19 @@ genTxBodyContent CardanoEra ShelleyEra ShelleyEra case Either (TxBodyError ShelleyEra) (TxBody ShelleyEra) -res of - Left TxBodyError ShelleyEra -err -> String -> Gen (TxBody ShelleyEra) +res of + Left TxBodyError ShelleyEra +err -> String -> Gen (TxBody ShelleyEra) forall (m :: * -> *) a. MonadFail m => String -> m a fail (TxBodyError ShelleyEra -> String forall a b. (Show a, ConvertText String b) => a -> b show TxBodyError ShelleyEra -err) -- TODO: Render function for TxBodyError - Right TxBody ShelleyEra -txBody -> TxBody ShelleyEra -> Gen (TxBody ShelleyEra) +err) -- TODO: Render function for TxBodyError + Right TxBody ShelleyEra +txBody -> TxBody ShelleyEra -> Gen (TxBody ShelleyEra) forall (f :: * -> *) a. Applicative f => a -> f a pure TxBody ShelleyEra -txBody +txBody genByronTxOut :: Gen (TxOut ByronEra) genByronTxOut :: Gen (TxOut ByronEra) @@ -1384,8 +1384,8 @@ genTxBodyByron :: Gen (TxBody ByronEra) genTxBodyByron :: Gen (TxBody ByronEra) genTxBodyByron = do - Either (TxBodyError ByronEra) (TxBody ByronEra) -res <- TxBodyContent BuildTx ByronEra + Either (TxBodyError ByronEra) (TxBody ByronEra) +res <- TxBodyContent BuildTx ByronEra -> Either (TxBodyError ByronEra) (TxBody ByronEra) forall era. IsCardanoEra era => @@ -1401,19 +1401,19 @@ genTxBodyContent CardanoEra ByronEra ByronEra case Either (TxBodyError ByronEra) (TxBody ByronEra) -res of - Left TxBodyError ByronEra -err -> String -> Gen (TxBody ByronEra) +res of + Left TxBodyError ByronEra +err -> String -> Gen (TxBody ByronEra) forall (m :: * -> *) a. MonadFail m => String -> m a fail (TxBodyError ByronEra -> String forall a b. (Show a, ConvertText String b) => a -> b show TxBodyError ByronEra -err) - Right TxBody ByronEra -txBody -> TxBody ByronEra -> Gen (TxBody ByronEra) +err) + Right TxBody ByronEra +txBody -> TxBody ByronEra -> Gen (TxBody ByronEra) forall (f :: * -> *) a. Applicative f => a -> f a pure TxBody ByronEra -txBody +txBody genTxIn :: Gen TxIn genTxIn :: Gen TxIn @@ -1449,12 +1449,12 @@ forall a. (Bounded a, Num a) => Range a Range.constantBounded -genTxOutValue :: CardanoEra era -> Gen (TxOutValue era) +genTxOutValue :: CardanoEra era -> Gen (TxOutValue era) genTxOutValue :: CardanoEra era -> Gen (TxOutValue era) -genTxOutValue CardanoEra era -era = +genTxOutValue CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> OnlyAdaSupportedInEra ByronEra -> Lovelace -> TxOutValue ByronEra forall era. OnlyAdaSupportedInEra era -> Lovelace -> TxOutValue era @@ -1503,12 +1503,12 @@ <$> Gen Value genValueForTxOut -genTxOut :: CardanoEra era -> Gen (TxOut era) +genTxOut :: CardanoEra era -> Gen (TxOut era) genTxOut :: CardanoEra era -> Gen (TxOut era) -genTxOut CardanoEra era -era = +genTxOut CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> Gen (TxOut era) Gen (TxOut ByronEra) @@ -1603,7 +1603,7 @@ <*> CardanoEra era -> GenT Identity (TxOutValue era) forall era. CardanoEra era -> Gen (TxOutValue era) genTxOutValue CardanoEra era -era +era GenT Identity (TxOutDatumHash era -> TxOut era) -> GenT Identity (TxOutDatumHash era) -> Gen (TxOut era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b @@ -1642,7 +1642,7 @@ <*> CardanoEra era -> GenT Identity (TxOutValue era) forall era. CardanoEra era -> Gen (TxOutValue era) genTxOutValue CardanoEra era -era +era GenT Identity (TxOutDatumHash era -> TxOut era) -> GenT Identity (TxOutDatumHash era) -> Gen (TxOut era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b @@ -1658,12 +1658,12 @@ genSlotNo -- TODO: Accept a range for generating ttl. -genTxValidityLowerBound :: CardanoEra era -> Gen (TxValidityLowerBound era) +genTxValidityLowerBound :: CardanoEra era -> Gen (TxValidityLowerBound era) genTxValidityLowerBound :: CardanoEra era -> Gen (TxValidityLowerBound era) -genTxValidityLowerBound CardanoEra era -era = +genTxValidityLowerBound CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> TxValidityLowerBound era -> Gen (TxValidityLowerBound era) forall (f :: * -> *) a. Applicative f => a -> f a @@ -1709,12 +1709,12 @@ "genTxValidityLowerBound: Alonzo not implemented yet " -- TODO: Accept a range for generating ttl. -genTxValidityUpperBound :: CardanoEra era -> Gen (TxValidityUpperBound era) +genTxValidityUpperBound :: CardanoEra era -> Gen (TxValidityUpperBound era) genTxValidityUpperBound :: CardanoEra era -> Gen (TxValidityUpperBound era) -genTxValidityUpperBound CardanoEra era -era = +genTxValidityUpperBound CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> TxValidityUpperBound ByronEra -> GenT Identity (TxValidityUpperBound ByronEra) @@ -1770,13 +1770,13 @@ panic Text "genTxValidityUpperBound: Alonzo not implemented yet " -genTxValidityRange - :: CardanoEra era - -> Gen (TxValidityLowerBound era, TxValidityUpperBound era) +genTxValidityRange + :: CardanoEra era + -> Gen (TxValidityLowerBound era, TxValidityUpperBound era) genTxValidityRange :: CardanoEra era -> Gen (TxValidityLowerBound era, TxValidityUpperBound era) -genTxValidityRange CardanoEra era -era = +genTxValidityRange CardanoEra era +era = (,) (TxValidityLowerBound era -> TxValidityUpperBound era @@ -1790,7 +1790,7 @@ <$> CardanoEra era -> GenT Identity (TxValidityLowerBound era) forall era. CardanoEra era -> Gen (TxValidityLowerBound era) genTxValidityLowerBound CardanoEra era -era +era GenT Identity (TxValidityUpperBound era @@ -1801,14 +1801,14 @@ <*> CardanoEra era -> GenT Identity (TxValidityUpperBound era) forall era. CardanoEra era -> Gen (TxValidityUpperBound era) genTxValidityUpperBound CardanoEra era -era +era -genTxMetadataInEra :: CardanoEra era -> Gen (TxMetadataInEra era) +genTxMetadataInEra :: CardanoEra era -> Gen (TxMetadataInEra era) genTxMetadataInEra :: CardanoEra era -> Gen (TxMetadataInEra era) -genTxMetadataInEra CardanoEra era -era = +genTxMetadataInEra CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> TxMetadataInEra era -> Gen (TxMetadataInEra era) forall (f :: * -> *) a. Applicative f => a -> f a @@ -1892,12 +1892,12 @@ panic Text "genTxMetadataInEra: Alonzo not implemented yet" -genTxAuxScripts :: CardanoEra era -> Gen (TxAuxScripts era) +genTxAuxScripts :: CardanoEra era -> Gen (TxAuxScripts era) genTxAuxScripts :: CardanoEra era -> Gen (TxAuxScripts era) -genTxAuxScripts CardanoEra era -era = +genTxAuxScripts CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> TxAuxScripts era -> Gen (TxAuxScripts era) forall (f :: * -> *) a. Applicative f => a -> f a @@ -1966,12 +1966,12 @@ panic Text "genTxAuxScripts: Alonzo not implemented yet" -genTxWithdrawals :: CardanoEra era -> Gen (TxWithdrawals BuildTx era) +genTxWithdrawals :: CardanoEra era -> Gen (TxWithdrawals BuildTx era) genTxWithdrawals :: CardanoEra era -> Gen (TxWithdrawals BuildTx era) -genTxWithdrawals CardanoEra era -era = +genTxWithdrawals CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> TxWithdrawals BuildTx era -> Gen (TxWithdrawals BuildTx era) forall (f :: * -> *) a. Applicative f => a -> f a @@ -2074,12 +2074,12 @@ panic Text "genTxWithdrawals: Alonzo not implemented yet" -genTxCertificates :: CardanoEra era -> Gen (TxCertificates BuildTx era) +genTxCertificates :: CardanoEra era -> Gen (TxCertificates BuildTx era) genTxCertificates :: CardanoEra era -> Gen (TxCertificates BuildTx era) -genTxCertificates CardanoEra era -era = +genTxCertificates CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> TxCertificates BuildTx era -> Gen (TxCertificates BuildTx era) forall (f :: * -> *) a. Applicative f => a -> f a @@ -2224,12 +2224,12 @@ panic Text "genTxCertificates: Alonzo not implemented yet" -genTxUpdateProposal :: CardanoEra era -> Gen (TxUpdateProposal era) +genTxUpdateProposal :: CardanoEra era -> Gen (TxUpdateProposal era) genTxUpdateProposal :: CardanoEra era -> Gen (TxUpdateProposal era) -genTxUpdateProposal CardanoEra era -era = +genTxUpdateProposal CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> TxUpdateProposal era -> Gen (TxUpdateProposal era) forall (f :: * -> *) a. Applicative f => a -> f a @@ -2258,7 +2258,7 @@ -> UpdateProposal -> TxUpdateProposal era TxUpdateProposal UpdateProposalSupportedInEra ShelleyEra UpdateProposalInShelleyEra UpdateProposal -emptyUpdateProposal) -- TODO: Generate proposals +emptyUpdateProposal) -- TODO: Generate proposals ] CardanoEra era AllegraEra -> @@ -2282,7 +2282,7 @@ -> UpdateProposal -> TxUpdateProposal era TxUpdateProposal UpdateProposalSupportedInEra AllegraEra UpdateProposalInAllegraEra UpdateProposal -emptyUpdateProposal) -- TODO: Generate proposals +emptyUpdateProposal) -- TODO: Generate proposals ] CardanoEra era MaryEra -> @@ -2306,7 +2306,7 @@ -> UpdateProposal -> TxUpdateProposal era TxUpdateProposal UpdateProposalSupportedInEra MaryEra UpdateProposalInMaryEra UpdateProposal -emptyUpdateProposal) -- TODO: Generate proposals +emptyUpdateProposal) -- TODO: Generate proposals ] CardanoEra era AlonzoEra -> Text -> Gen (TxUpdateProposal era) @@ -2314,9 +2314,9 @@ panic Text "genTxUpdateProposal: Alonzo not implemented yet" where - emptyUpdateProposal :: UpdateProposal - emptyUpdateProposal :: UpdateProposal -emptyUpdateProposal = Map (Hash GenesisKey) ProtocolParametersUpdate + emptyUpdateProposal :: UpdateProposal + emptyUpdateProposal :: UpdateProposal +emptyUpdateProposal = Map (Hash GenesisKey) ProtocolParametersUpdate -> EpochNo -> UpdateProposal UpdateProposal Map (Hash GenesisKey) ProtocolParametersUpdate forall k a. Map k a @@ -2324,12 +2324,12 @@ EpochNo Word64 0) -genTxMintValue :: CardanoEra era -> Gen (TxMintValue BuildTx era) +genTxMintValue :: CardanoEra era -> Gen (TxMintValue BuildTx era) genTxMintValue :: CardanoEra era -> Gen (TxMintValue BuildTx era) -genTxMintValue CardanoEra era -era = +genTxMintValue CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> TxMintValue BuildTx era -> Gen (TxMintValue BuildTx era) forall (f :: * -> *) a. Applicative f => a -> f a @@ -2416,12 +2416,12 @@ "genTxMintValue: Alonzo not implemented yet" -genTxBodyContent :: CardanoEra era -> Gen (TxBodyContent BuildTx era) +genTxBodyContent :: CardanoEra era -> Gen (TxBodyContent BuildTx era) genTxBodyContent :: CardanoEra era -> Gen (TxBodyContent BuildTx era) -genTxBodyContent CardanoEra era -era = do - [TxIn] -trxIns <- Range Int -> Gen TxIn -> GenT Identity [TxIn] +genTxBodyContent CardanoEra era +era = do + [TxIn] +trxIns <- Range Int -> Gen TxIn -> GenT Identity [TxIn] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int forall a. a -> a -> Range a @@ -2429,8 +2429,8 @@ 1 Int 10) Gen TxIn genTxIn - [TxOut era] -trxOuts <- Range Int -> GenT Identity (TxOut era) -> GenT Identity [TxOut era] + [TxOut era] +trxOuts <- Range Int -> GenT Identity (TxOut era) -> GenT Identity [TxOut era] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int forall a. a -> a -> Range a @@ -2439,56 +2439,56 @@ 10) (CardanoEra era -> GenT Identity (TxOut era) forall era. CardanoEra era -> Gen (TxOut era) genTxOut CardanoEra era -era) - TxFee era -fee <- CardanoEra era -> Gen (TxFee era) +era) + TxFee era +fee <- CardanoEra era -> Gen (TxFee era) forall era. CardanoEra era -> Gen (TxFee era) genTxFee CardanoEra era -era - (TxValidityLowerBound era, TxValidityUpperBound era) -validityRange <- CardanoEra era +era + (TxValidityLowerBound era, TxValidityUpperBound era) +validityRange <- CardanoEra era -> Gen (TxValidityLowerBound era, TxValidityUpperBound era) forall era. CardanoEra era -> Gen (TxValidityLowerBound era, TxValidityUpperBound era) genTxValidityRange CardanoEra era -era - TxMetadataInEra era -txMd <- CardanoEra era -> Gen (TxMetadataInEra era) +era + TxMetadataInEra era +txMd <- CardanoEra era -> Gen (TxMetadataInEra era) forall era. CardanoEra era -> Gen (TxMetadataInEra era) genTxMetadataInEra CardanoEra era -era - TxAuxScripts era -auxScripts <- CardanoEra era -> Gen (TxAuxScripts era) +era + TxAuxScripts era +auxScripts <- CardanoEra era -> Gen (TxAuxScripts era) forall era. CardanoEra era -> Gen (TxAuxScripts era) genTxAuxScripts CardanoEra era -era - Maybe ProtocolParameters -mpparams <- GenT Identity ProtocolParameters +era + Maybe ProtocolParameters +mpparams <- GenT Identity ProtocolParameters -> GenT Identity (Maybe ProtocolParameters) forall (m :: * -> *) a. MonadGen m => m a -> m (Maybe a) Gen.maybe GenT Identity ProtocolParameters genProtocolParameters - TxWithdrawals BuildTx era -withdrawals <- CardanoEra era -> Gen (TxWithdrawals BuildTx era) + TxWithdrawals BuildTx era +withdrawals <- CardanoEra era -> Gen (TxWithdrawals BuildTx era) forall era. CardanoEra era -> Gen (TxWithdrawals BuildTx era) genTxWithdrawals CardanoEra era -era - TxCertificates BuildTx era -certs <- CardanoEra era -> Gen (TxCertificates BuildTx era) +era + TxCertificates BuildTx era +certs <- CardanoEra era -> Gen (TxCertificates BuildTx era) forall era. CardanoEra era -> Gen (TxCertificates BuildTx era) genTxCertificates CardanoEra era -era - TxUpdateProposal era -updateProposal <- CardanoEra era -> Gen (TxUpdateProposal era) +era + TxUpdateProposal era +updateProposal <- CardanoEra era -> Gen (TxUpdateProposal era) forall era. CardanoEra era -> Gen (TxUpdateProposal era) genTxUpdateProposal CardanoEra era -era - TxMintValue BuildTx era -mintValue <- CardanoEra era -> Gen (TxMintValue BuildTx era) +era + TxMintValue BuildTx era +mintValue <- CardanoEra era -> Gen (TxMintValue BuildTx era) forall era. CardanoEra era -> Gen (TxMintValue BuildTx era) genTxMintValue CardanoEra era -era +era TxBodyContent BuildTx era -> Gen (TxBodyContent BuildTx era) forall (f :: * -> *) a. Applicative f => a -> f a @@ -2523,26 +2523,26 @@ forall witctx era. KeyWitnessInCtx witctx -> Witness witctx era KeyWitness KeyWitnessInCtx WitCtxTxIn KeyWitnessForSpending)) [TxIn] -trxIns +trxIns , txInsCollateral :: TxInsCollateral era txInsCollateral = TxInsCollateral era forall era. TxInsCollateral era TxInsCollateralNone --TODO: Alonzo era: Generate collateral inputs. , txOuts :: [TxOut era] txOuts = [TxOut era] -trxOuts +trxOuts , txFee :: TxFee era txFee = TxFee era -fee +fee , txValidityRange :: (TxValidityLowerBound era, TxValidityUpperBound era) txValidityRange = (TxValidityLowerBound era, TxValidityUpperBound era) -validityRange +validityRange , txMetadata :: TxMetadataInEra era txMetadata = TxMetadataInEra era -txMd +txMd , txAuxScripts :: TxAuxScripts era txAuxScripts = TxAuxScripts era -auxScripts +auxScripts , txAuxScriptData :: TxAuxScriptData era txAuxScriptData = TxAuxScriptData era forall era. TxAuxScriptData era @@ -2556,27 +2556,27 @@ -> BuildTxWith BuildTx (Maybe ProtocolParameters) forall a. a -> BuildTxWith BuildTx a BuildTxWith Maybe ProtocolParameters -mpparams +mpparams , txWithdrawals :: TxWithdrawals BuildTx era txWithdrawals = TxWithdrawals BuildTx era -withdrawals +withdrawals , txCertificates :: TxCertificates BuildTx era txCertificates = TxCertificates BuildTx era -certs +certs , txUpdateProposal :: TxUpdateProposal era txUpdateProposal = TxUpdateProposal era -updateProposal +updateProposal , txMintValue :: TxMintValue BuildTx era txMintValue = TxMintValue BuildTx era -mintValue +mintValue } -genTxFee :: CardanoEra era -> Gen (TxFee era) +genTxFee :: CardanoEra era -> Gen (TxFee era) genTxFee :: CardanoEra era -> Gen (TxFee era) -genTxFee CardanoEra era -era = +genTxFee CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> TxFee ByronEra -> GenT Identity (TxFee ByronEra) forall (f :: * -> *) a. Applicative f => a -> f a @@ -2617,12 +2617,12 @@ panic Text "genTxFee: Alonzo not implemented yet" -genTxBody :: CardanoEra era -> Gen (TxBody era) +genTxBody :: CardanoEra era -> Gen (TxBody era) genTxBody :: CardanoEra era -> Gen (TxBody era) -genTxBody CardanoEra era -era = +genTxBody CardanoEra era +era = case CardanoEra era -era of +era of CardanoEra era ByronEra -> Gen (TxBody era) Gen (TxBody ByronEra) @@ -2633,8 +2633,8 @@ genTxBodyShelley CardanoEra era AllegraEra -> do - Either (TxBodyError AllegraEra) (TxBody AllegraEra) -res <- TxBodyContent BuildTx AllegraEra + Either (TxBodyError AllegraEra) (TxBody AllegraEra) +res <- TxBodyContent BuildTx AllegraEra -> Either (TxBodyError AllegraEra) (TxBody AllegraEra) forall era. IsCardanoEra era => @@ -2651,23 +2651,23 @@ genTxBodyContent CardanoEra AllegraEra AllegraEra case Either (TxBodyError AllegraEra) (TxBody AllegraEra) -res of - Left TxBodyError AllegraEra -err -> String -> Gen (TxBody era) +res of + Left TxBodyError AllegraEra +err -> String -> Gen (TxBody era) forall (m :: * -> *) a. MonadFail m => String -> m a fail (TxBodyError AllegraEra -> String forall a b. (Show a, ConvertText String b) => a -> b show TxBodyError AllegraEra -err) -- TODO: Render function for TxBodyError - Right TxBody AllegraEra -txBody -> TxBody AllegraEra -> GenT Identity (TxBody AllegraEra) +err) -- TODO: Render function for TxBodyError + Right TxBody AllegraEra +txBody -> TxBody AllegraEra -> GenT Identity (TxBody AllegraEra) forall (f :: * -> *) a. Applicative f => a -> f a pure TxBody AllegraEra -txBody +txBody CardanoEra era MaryEra -> do - Either (TxBodyError MaryEra) (TxBody MaryEra) -res <- TxBodyContent BuildTx MaryEra + Either (TxBodyError MaryEra) (TxBody MaryEra) +res <- TxBodyContent BuildTx MaryEra -> Either (TxBodyError MaryEra) (TxBody MaryEra) forall era. IsCardanoEra era => @@ -2682,29 +2682,29 @@ genTxBodyContent CardanoEra MaryEra MaryEra case Either (TxBodyError MaryEra) (TxBody MaryEra) -res of - Left TxBodyError MaryEra -err -> String -> Gen (TxBody era) +res of + Left TxBodyError MaryEra +err -> String -> Gen (TxBody era) forall (m :: * -> *) a. MonadFail m => String -> m a fail (TxBodyError MaryEra -> String forall a b. (Show a, ConvertText String b) => a -> b show TxBodyError MaryEra -err) -- TODO: Render function for TxBodyError - Right TxBody MaryEra -txBody -> TxBody MaryEra -> GenT Identity (TxBody MaryEra) +err) -- TODO: Render function for TxBodyError + Right TxBody MaryEra +txBody -> TxBody MaryEra -> GenT Identity (TxBody MaryEra) forall (f :: * -> *) a. Applicative f => a -> f a pure TxBody MaryEra -txBody +txBody CardanoEra era AlonzoEra -> Text -> Gen (TxBody era) forall a. HasCallStack => Text -> a panic Text "genTxBody: Alonzo not implemented yet" -genTx :: forall era. CardanoEra era -> Gen (Tx era) +genTx :: forall era. CardanoEra era -> Gen (Tx era) genTx :: CardanoEra era -> Gen (Tx era) -genTx CardanoEra era -era = +genTx CardanoEra era +era = [KeyWitness era] -> TxBody era -> Tx era forall era. [KeyWitness era] -> TxBody era -> Tx era makeSignedTransaction @@ -2713,20 +2713,20 @@ -> GenT Identity (TxBody era -> Tx era) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> GenT Identity [KeyWitness era] -genWitnessList +genWitnessList GenT Identity (TxBody era -> Tx era) -> GenT Identity (TxBody era) -> Gen (Tx era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> CardanoEra era -> GenT Identity (TxBody era) forall era. CardanoEra era -> Gen (TxBody era) genTxBody CardanoEra era -era +era where - genWitnessList :: Gen [KeyWitness era] - genWitnessList :: GenT Identity [KeyWitness era] -genWitnessList = + genWitnessList :: Gen [KeyWitness era] + genWitnessList :: GenT Identity [KeyWitness era] +genWitnessList = case CardanoEra era -era of +era of CardanoEra era ByronEra -> Range Int -> GenT Identity (KeyWitness ByronEra) @@ -2741,26 +2741,26 @@ CardanoEra era ShelleyEra -> GenT Identity [KeyWitness era] IsShelleyBasedEra era => GenT Identity [KeyWitness era] -genShelleyBasedWitnessList +genShelleyBasedWitnessList CardanoEra era AllegraEra -> GenT Identity [KeyWitness era] IsShelleyBasedEra era => GenT Identity [KeyWitness era] -genShelleyBasedWitnessList +genShelleyBasedWitnessList CardanoEra era MaryEra -> GenT Identity [KeyWitness era] IsShelleyBasedEra era => GenT Identity [KeyWitness era] -genShelleyBasedWitnessList +genShelleyBasedWitnessList CardanoEra era AlonzoEra -> Text -> GenT Identity [KeyWitness era] forall a. HasCallStack => Text -> a panic Text "genTx: Alonzo not implemented yet" - genShelleyBasedWitnessList :: IsShelleyBasedEra era => Gen [KeyWitness era] - genShelleyBasedWitnessList :: GenT Identity [KeyWitness era] -genShelleyBasedWitnessList = do - [KeyWitness era] -bsWits <- Range Int + genShelleyBasedWitnessList :: IsShelleyBasedEra era => Gen [KeyWitness era] + genShelleyBasedWitnessList :: GenT Identity [KeyWitness era] +genShelleyBasedWitnessList = do + [KeyWitness era] +bsWits <- Range Int -> GenT Identity (KeyWitness era) -> GenT Identity [KeyWitness era] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int @@ -2772,9 +2772,9 @@ IsShelleyBasedEra era => CardanoEra era -> Gen (KeyWitness era) genShelleyBootstrapWitness CardanoEra era -era) - [KeyWitness era] -keyWits <- Range Int +era) + [KeyWitness era] +keyWits <- Range Int -> GenT Identity (KeyWitness era) -> GenT Identity [KeyWitness era] forall (m :: * -> *) a. MonadGen m => Range Int -> m a -> m [a] Gen.list (Int -> Int -> Range Int @@ -2786,22 +2786,22 @@ IsShelleyBasedEra era => CardanoEra era -> Gen (KeyWitness era) genShelleyKeyWitness CardanoEra era -era) +era) [KeyWitness era] -> GenT Identity [KeyWitness era] forall (m :: * -> *) a. Monad m => a -> m a return ([KeyWitness era] -> GenT Identity [KeyWitness era]) -> [KeyWitness era] -> GenT Identity [KeyWitness era] forall a b. (a -> b) -> a -> b $ [KeyWitness era] -bsWits [KeyWitness era] -> [KeyWitness era] -> [KeyWitness era] +bsWits [KeyWitness era] -> [KeyWitness era] -> [KeyWitness era] forall a. [a] -> [a] -> [a] ++ [KeyWitness era] -keyWits +keyWits -genVerificationKey :: Key keyrole => AsType keyrole -> Gen (VerificationKey keyrole) +genVerificationKey :: Key keyrole => AsType keyrole -> Gen (VerificationKey keyrole) genVerificationKey :: AsType keyrole -> Gen (VerificationKey keyrole) -genVerificationKey AsType keyrole -roletoken = SigningKey keyrole -> VerificationKey keyrole +genVerificationKey AsType keyrole +roletoken = SigningKey keyrole -> VerificationKey keyrole forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole @@ -2814,18 +2814,18 @@ Key keyrole => AsType keyrole -> Gen (SigningKey keyrole) genSigningKey AsType keyrole -roletoken +roletoken genByronKeyWitness :: Gen (KeyWitness ByronEra) genByronKeyWitness :: GenT Identity (KeyWitness ByronEra) genByronKeyWitness = do - ProtocolMagicId -pmId <- Gen ProtocolMagicId + ProtocolMagicId +pmId <- Gen ProtocolMagicId genProtocolMagicId - TxInWitness -txinWitness <- ProtocolMagicId -> Gen TxInWitness + TxInWitness +txinWitness <- ProtocolMagicId -> Gen TxInWitness genVKWitness ProtocolMagicId -pmId +pmId KeyWitness ByronEra -> GenT Identity (KeyWitness ByronEra) forall (m :: * -> *) a. Monad m => a -> m a return (KeyWitness ByronEra -> GenT Identity (KeyWitness ByronEra)) @@ -2833,7 +2833,7 @@ forall a b. (a -> b) -> a -> b $ TxInWitness -> KeyWitness ByronEra ByronKeyWitness TxInWitness -txinWitness +txinWitness genWitnessNetworkIdOrByronAddress :: Gen WitnessNetworkIdOrByronAddress genWitnessNetworkIdOrByronAddress :: Gen WitnessNetworkIdOrByronAddress @@ -2856,13 +2856,13 @@ genAddressByron ] -genShelleyBootstrapWitness - :: IsShelleyBasedEra era - => CardanoEra era - -> Gen (KeyWitness era) +genShelleyBootstrapWitness + :: IsShelleyBasedEra era + => CardanoEra era + -> Gen (KeyWitness era) genShelleyBootstrapWitness :: CardanoEra era -> Gen (KeyWitness era) -genShelleyBootstrapWitness CardanoEra era -era = +genShelleyBootstrapWitness CardanoEra era +era = WitnessNetworkIdOrByronAddress -> TxBody era -> SigningKey ByronKey -> KeyWitness era forall era. @@ -2885,7 +2885,7 @@ <*> CardanoEra era -> GenT Identity (TxBody era) forall era. CardanoEra era -> Gen (TxBody era) genTxBody CardanoEra era -era +era GenT Identity (SigningKey ByronKey -> KeyWitness era) -> GenT Identity (SigningKey ByronKey) -> Gen (KeyWitness era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b @@ -2896,13 +2896,13 @@ genSigningKey AsType ByronKey AsByronKey -genShelleyKeyWitness - :: IsShelleyBasedEra era - => CardanoEra era - -> Gen (KeyWitness era) +genShelleyKeyWitness + :: IsShelleyBasedEra era + => CardanoEra era + -> Gen (KeyWitness era) genShelleyKeyWitness :: CardanoEra era -> Gen (KeyWitness era) -genShelleyKeyWitness CardanoEra era -era = +genShelleyKeyWitness CardanoEra era +era = TxBody era -> ShelleyWitnessSigningKey -> KeyWitness era forall era. IsShelleyBasedEra era => @@ -2915,20 +2915,20 @@ <$> CardanoEra era -> GenT Identity (TxBody era) forall era. CardanoEra era -> Gen (TxBody era) genTxBody CardanoEra era -era +era GenT Identity (ShelleyWitnessSigningKey -> KeyWitness era) -> GenT Identity ShelleyWitnessSigningKey -> Gen (KeyWitness era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> GenT Identity ShelleyWitnessSigningKey genShelleyWitnessSigningKey -genShelleyWitness - :: IsShelleyBasedEra era - => CardanoEra era - -> Gen (KeyWitness era) +genShelleyWitness + :: IsShelleyBasedEra era + => CardanoEra era + -> Gen (KeyWitness era) genShelleyWitness :: CardanoEra era -> Gen (KeyWitness era) -genShelleyWitness CardanoEra era -era = +genShelleyWitness CardanoEra era +era = [Gen (KeyWitness era)] -> Gen (KeyWitness era) forall (m :: * -> *) a. MonadGen m => [m a] -> m a Gen.choice @@ -2937,13 +2937,13 @@ IsShelleyBasedEra era => CardanoEra era -> Gen (KeyWitness era) genShelleyKeyWitness CardanoEra era -era +era , CardanoEra era -> Gen (KeyWitness era) forall era. IsShelleyBasedEra era => CardanoEra era -> Gen (KeyWitness era) genShelleyBootstrapWitness CardanoEra era -era +era ] genShelleyWitnessSigningKey :: Gen ShelleyWitnessSigningKey @@ -3024,8 +3024,8 @@ genSeed :: Int -> Gen Crypto.Seed genSeed :: Int -> Gen Seed -genSeed Int -n = ByteString -> Seed +genSeed Int +n = ByteString -> Seed Crypto.mkSeedFromBytes (ByteString -> Seed) -> GenT Identity ByteString -> Gen Seed forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Range Int -> GenT Identity ByteString @@ -3033,7 +3033,7 @@ Gen.bytes (Int -> Range Int forall a. a -> Range a Range.singleton Int -n) +n) genNat :: Gen Natural genNat :: Gen Natural diff --git a/cardano-api-test/src/Test.Tasty.Hedgehog.Group.html b/cardano-api-test/src/Test.Tasty.Hedgehog.Group.html index feea02b4892..2d84963a637 100644 --- a/cardano-api-test/src/Test.Tasty.Hedgehog.Group.html +++ b/cardano-api-test/src/Test.Tasty.Hedgehog.Group.html @@ -12,32 +12,32 @@ fromGroup :: Group -> TestTree fromGroup :: Group -> TestTree -fromGroup Group -group = +fromGroup Group +group = TestName -> [TestTree] -> TestTree testGroup (GroupName -> TestName unGroupName (GroupName -> TestName) -> GroupName -> TestName forall a b. (a -> b) -> a -> b $ Group -> GroupName groupName Group -group) ([TestTree] -> TestTree) -> [TestTree] -> TestTree +group) ([TestTree] -> TestTree) -> [TestTree] -> TestTree forall a b. (a -> b) -> a -> b $ ((PropertyName, Property) -> TestTree) -> [(PropertyName, Property)] -> [TestTree] forall a b. (a -> b) -> [a] -> [b] map (PropertyName, Property) -> TestTree -mkTestTree (Group -> [(PropertyName, Property)] +mkTestTree (Group -> [(PropertyName, Property)] groupProperties Group -group) +group) where - mkTestTree :: (PropertyName, Property) -> TestTree - mkTestTree :: (PropertyName, Property) -> TestTree -mkTestTree (PropertyName -propName, Property -prop) = TestName -> Property -> TestTree + mkTestTree :: (PropertyName, Property) -> TestTree + mkTestTree :: (PropertyName, Property) -> TestTree +mkTestTree (PropertyName +propName, Property +prop) = TestName -> Property -> TestTree testProperty (PropertyName -> TestName unPropertyName PropertyName -propName) Property -prop +propName) Property +prop \ No newline at end of file diff --git a/cardano-api/Cardano-Api-Address.html b/cardano-api/Cardano-Api-Address.html index ab3683dc7a3..ebea797e8f9 100644 --- a/cardano-api/Cardano-Api-Address.html +++ b/cardano-api/Cardano-Api-Address.html @@ -20,4 +20,4 @@ key (VerificationKey StakeKey).

This is a type level tag, used with other interfaces like Key.

Instances

Instances details
HasTypeProxy StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakeExtendedKey Source #

Methods

proxyToAsType ∷ Proxy StakeExtendedKey → AsType StakeExtendedKey Source #

Key StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey StakeExtendedKey Source #

data SigningKey StakeExtendedKey Source #

Methods

getVerificationKey ∷ SigningKey StakeExtendedKey → VerificationKey StakeExtendedKey Source #

deterministicSigningKey ∷ AsType StakeExtendedKey → Seed → SigningKey StakeExtendedKey Source #

deterministicSigningKeySeedSize ∷ AsType StakeExtendedKey → Word Source #

verificationKeyHash ∷ VerificationKey StakeExtendedKey → Hash StakeExtendedKey Source #

CastVerificationKeyRole StakeExtendedKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castVerificationKey ∷ VerificationKey StakeExtendedKey → VerificationKey StakeKey Source #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

(/=) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeExtendedKey → ShowS #

show ∷ VerificationKey StakeExtendedKey → String #

showList ∷ [VerificationKey StakeExtendedKey] → ShowS #

Show (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeExtendedKey → ShowS #

show ∷ SigningKey StakeExtendedKey → String #

showList ∷ [SigningKey StakeExtendedKey] → ShowS #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeExtendedKey #

IsString (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeExtendedKey #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeExtendedKey) #

label ∷ Proxy (SigningKey StakeExtendedKey) → Text #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeExtendedKey] → Size #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Either DecoderError (SigningKey StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Maybe (VerificationKey StakeExtendedKey) Source #

SerialiseAsRawBytes (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Maybe (SigningKey StakeExtendedKey) Source #

HasTextEnvelope (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeExtendedKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeExtendedKey) → [Text] Source #

data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype VerificationKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeExtendedKey = StakeExtendedVerificationKey XPub
newtype SigningKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeExtendedKey = StakeExtendedSigningKey XPrv

Internal conversion functions

toShelleyAddr ∷ AddressInEra era → Addr StandardCrypto Source #

toShelleyStakeAddr ∷ StakeAddress → RewardAcnt StandardCrypto Source #

toShelleyStakeCredential ∷ StakeCredential → StakeCredential StandardCrypto Source #

fromShelleyAddr ∷ IsShelleyBasedEra era ⇒ Addr StandardCrypto → AddressInEra era Source #

fromShelleyPaymentCredential ∷ PaymentCredential StandardCrypto → PaymentCredential Source #

fromShelleyStakeAddr ∷ RewardAcnt StandardCrypto → StakeAddress Source #

fromShelleyStakeCredential ∷ StakeCredential StandardCrypto → StakeCredential Source #

fromShelleyStakeReference ∷ StakeReference StandardCrypto → StakeAddressReference Source #

Serialising addresses

class HasTypeProxy addr ⇒ SerialiseAddress addr where Source #

Address serialisation uses different serialisation formats for different kinds of addresses, so it needs its own class.

In particular, Byron addresses are typically formatted in base 58, while Shelley addresses (payment and stake) are formatted using Bech32.

Methods

serialiseAddress ∷ addr → Text Source #

deserialiseAddress ∷ AsType addr → Text → Maybe addr Source #

Instances

Instances details
SerialiseAddress StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseAddress ∷ StakeAddress → Text Source #

deserialiseAddress ∷ AsType StakeAddress → Text → Maybe StakeAddress Source #

SerialiseAddress AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseAddress ∷ AddressAny → Text Source #

deserialiseAddress ∷ AsType AddressAny → Text → Maybe AddressAny Source #

IsCardanoEra era ⇒ SerialiseAddress (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseAddress ∷ AddressInEra era → Text Source #

deserialiseAddress ∷ AsType (AddressInEra era) → Text → Maybe (AddressInEra era) Source #

SerialiseAddress (Address ShelleyAddr) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseAddress ∷ Address ShelleyAddr → Text Source #

deserialiseAddress ∷ AsType (Address ShelleyAddr) → Text → Maybe (Address ShelleyAddr) Source #

SerialiseAddress (Address ByronAddr) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseAddress ∷ Address ByronAddr → Text Source #

deserialiseAddress ∷ AsType (Address ByronAddr) → Text → Maybe (Address ByronAddr) Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-Byron.html b/cardano-api/Cardano-Api-Byron.html index 8c9666f77bb..536bb267a17 100644 --- a/cardano-api/Cardano-Api-Byron.html +++ b/cardano-api/Cardano-Api-Byron.html @@ -16,7 +16,7 @@ the result will not consist of a derivation path. If that is required, specify a WitnessByronAddress value instead.

WitnessByronAddress !(Address ByronAddr)

Byron address.

If this value is used in the construction of a Shelley bootstrap witness, both the network ID and derivation path will be extracted from the - address and used in the construction of the witness.

Errors

class Show e ⇒ Error e where Source #

Methods

displayError ∷ e → String Source #

Instances

Instances details
Error () Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ () → String Source #

Error JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

displayError ∷ JsonDecodeError → String Source #

Error TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

displayError ∷ TextEnvelopeError → String Source #

Error TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonSchemaError → String Source #

Error TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonError → String Source #

Error TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataRangeError → String Source #

Error Bech32DecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseBech32

Methods

displayError ∷ Bech32DecodeError → String Source #

Error ScriptDataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonSchemaError → String Source #

Error ScriptDataJsonError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonError → String Source #

Error ScriptDataRangeError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataRangeError → String Source #

Error StakePoolMetadataValidationError Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

displayError ∷ StakePoolMetadataValidationError → String Source #

Error OperationalCertIssueError Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

displayError ∷ OperationalCertIssueError → String Source #

Error e ⇒ Error (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ FileError e → String Source #

Error (TxBodyError era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

displayError ∷ TxBodyError era → String Source #

data FileError e Source #

Constructors

FileError FilePath e 
FileErrorTempFile 

Fields

FileIOError FilePath IOException 

Instances

Instances details
Show e ⇒ Show (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

showsPrec ∷ Int → FileError e → ShowS #

show ∷ FileError e → String #

showList ∷ [FileError e] → ShowS #

Error e ⇒ Error (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ FileError e → String Source #

Low level protocol interaction with a Cardano node

data LocalNodeConnectInfo mode Source #

Constructors

LocalNodeConnectInfo (ConsensusModeParams mode) NetworkId FilePath 

data ByronMode Source #

The Byron-only consensus mode consists of only the Byron era.

This was used on the mainnet before the deployment of the multi-era + address and used in the construction of the witness.

Errors

class Show e ⇒ Error e where Source #

Methods

displayError ∷ e → String Source #

Instances

Instances details
Error () Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ () → String Source #

Error JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

displayError ∷ JsonDecodeError → String Source #

Error TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

displayError ∷ TextEnvelopeError → String Source #

Error TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonSchemaError → String Source #

Error TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonError → String Source #

Error TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataRangeError → String Source #

Error Bech32DecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseBech32

Methods

displayError ∷ Bech32DecodeError → String Source #

Error ScriptDataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonSchemaError → String Source #

Error ScriptDataJsonError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonError → String Source #

Error ScriptDataRangeError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataRangeError → String Source #

Error StakePoolMetadataValidationError Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

displayError ∷ StakePoolMetadataValidationError → String Source #

Error OperationalCertIssueError Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

displayError ∷ OperationalCertIssueError → String Source #

Error e ⇒ Error (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ FileError e → String Source #

Error (TxBodyError era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

displayError ∷ TxBodyError era → String Source #

data FileError e Source #

Constructors

FileError FilePath e 
FileErrorTempFile 

Fields

FileIOError FilePath IOException 

Instances

Instances details
Show e ⇒ Show (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

showsPrec ∷ Int → FileError e → ShowS #

show ∷ FileError e → String #

showList ∷ [FileError e] → ShowS #

Error e ⇒ Error (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ FileError e → String Source #

Low level protocol interaction with a Cardano node

data LocalNodeConnectInfo mode Source #

Constructors

LocalNodeConnectInfo (ConsensusModeParams mode) NetworkId FilePath 

data ByronMode Source #

The Byron-only consensus mode consists of only the Byron era.

This was used on the mainnet before the deployment of the multi-era CardanoMode. It is now of little practical use, though it illustrates how a single-era consensus mode works. It may be sensible to remove this at some stage.

data ConsensusMode mode where Source #

This GADT provides a value-level representation of all the consensus modes. diff --git a/cardano-api/Cardano-Api-Certificate.html b/cardano-api/Cardano-Api-Certificate.html index 794af77b0f8..72960157bda 100644 --- a/cardano-api/Cardano-Api-Certificate.html +++ b/cardano-api/Cardano-Api-Certificate.html @@ -4,4 +4,4 @@ a mapping of stake credentials to lovelace.

SendToReservesMIR Lovelace

Use SendToReservesMIR to make the target of a MIRCertificate the reserves pot.

SendToTreasuryMIR Lovelace

Use SendToTreasuryMIR to make the target of a MIRCertificate the treasury pot.

Instances

Instances details
Eq MIRTarget Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

(==) ∷ MIRTarget → MIRTarget → Bool #

(/=) ∷ MIRTarget → MIRTarget → Bool #

Show MIRTarget Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

showsPrec ∷ Int → MIRTarget → ShowS #

show ∷ MIRTarget → String #

showList ∷ [MIRTarget] → ShowS #

Internal conversion functions

toShelleyCertificate ∷ Certificate → DCert StandardCrypto Source #

fromShelleyCertificate ∷ DCert StandardCrypto → Certificate Source #

toShelleyPoolParams ∷ StakePoolParameters → PoolParams StandardCrypto Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-Eras.html b/cardano-api/Cardano-Api-Eras.html index e185d207307..b3bcf343298 100644 --- a/cardano-api/Cardano-Api-Eras.html +++ b/cardano-api/Cardano-Api-Eras.html @@ -23,4 +23,4 @@ the current Shelley-based eras.

This way of factoring the eras is useful because in many cases the major differences are between the Byron and Shelley-based eras, and the Shelley-based eras can often be treated uniformly.

Constructors

LegacyByronEra ∷ CardanoEraStyle ByronEra 
ShelleyBasedEra ∷ IsShelleyBasedEra era ⇒ ShelleyBasedEra era → CardanoEraStyle era 

Instances

Instances details
Eq (CardanoEraStyle era) Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

(==) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

(/=) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

Ord (CardanoEraStyle era) Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

compare ∷ CardanoEraStyle era → CardanoEraStyle era → Ordering #

(<) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

(<=) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

(>) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

(>=) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

max ∷ CardanoEraStyle era → CardanoEraStyle era → CardanoEraStyle era #

min ∷ CardanoEraStyle era → CardanoEraStyle era → CardanoEraStyle era #

Show (CardanoEraStyle era) Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

showsPrec ∷ Int → CardanoEraStyle era → ShowS #

show ∷ CardanoEraStyle era → String #

showList ∷ [CardanoEraStyle era] → ShowS #

cardanoEraStyle ∷ CardanoEra era → CardanoEraStyle era Source #

The CardanoEraStyle for a CardanoEra.

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-Error.html b/cardano-api/Cardano-Api-Error.html index e6fa4a5886c..648619c5c9e 100644 --- a/cardano-api/Cardano-Api-Error.html +++ b/cardano-api/Cardano-Api-Error.html @@ -1,2 +1,2 @@ -Cardano.Api.Error
cardano-api-1.27.0
Safe HaskellSafe-Inferred
LanguageHaskell2010

Cardano.Api.Error

Description

Class of errors used in the Api.

Documentation

class Show e ⇒ Error e where Source #

Methods

displayError ∷ e → String Source #

Instances

Instances details
Error () Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ () → String Source #

Error JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

displayError ∷ JsonDecodeError → String Source #

Error TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

displayError ∷ TextEnvelopeError → String Source #

Error TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonSchemaError → String Source #

Error TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonError → String Source #

Error TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataRangeError → String Source #

Error Bech32DecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseBech32

Methods

displayError ∷ Bech32DecodeError → String Source #

Error ScriptDataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonSchemaError → String Source #

Error ScriptDataJsonError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonError → String Source #

Error ScriptDataRangeError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataRangeError → String Source #

Error StakePoolMetadataValidationError Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

displayError ∷ StakePoolMetadataValidationError → String Source #

Error OperationalCertIssueError Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

displayError ∷ OperationalCertIssueError → String Source #

Error e ⇒ Error (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ FileError e → String Source #

Error (TxBodyError era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

displayError ∷ TxBodyError era → String Source #

throwErrorAsException ∷ Error e ⇒ e → IO a Source #

The preferred approach is to use Except or ExceptT, but you can if +Cardano.Api.Error

cardano-api-1.27.0
Safe HaskellSafe-Inferred
LanguageHaskell2010

Cardano.Api.Error

Description

Class of errors used in the Api.

Documentation

class Show e ⇒ Error e where Source #

Methods

displayError ∷ e → String Source #

Instances

Instances details
Error () Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ () → String Source #

Error JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

displayError ∷ JsonDecodeError → String Source #

Error TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

displayError ∷ TextEnvelopeError → String Source #

Error TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonSchemaError → String Source #

Error TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonError → String Source #

Error TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataRangeError → String Source #

Error Bech32DecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseBech32

Methods

displayError ∷ Bech32DecodeError → String Source #

Error ScriptDataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonSchemaError → String Source #

Error ScriptDataJsonError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonError → String Source #

Error ScriptDataRangeError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataRangeError → String Source #

Error StakePoolMetadataValidationError Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

displayError ∷ StakePoolMetadataValidationError → String Source #

Error OperationalCertIssueError Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

displayError ∷ OperationalCertIssueError → String Source #

Error e ⇒ Error (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ FileError e → String Source #

Error (TxBodyError era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

displayError ∷ TxBodyError era → String Source #

throwErrorAsException ∷ Error e ⇒ e → IO a Source #

The preferred approach is to use Except or ExceptT, but you can if necessary use IO exceptions.

data ErrorAsException where Source #

Constructors

ErrorAsException ∷ Error e ⇒ e → ErrorAsException 

Instances

Instances details
Show ErrorAsException Source # 
Instance details

Defined in Cardano.Api.Error

Methods

showsPrec ∷ Int → ErrorAsException → ShowS #

show ∷ ErrorAsException → String #

showList ∷ [ErrorAsException] → ShowS #

Exception ErrorAsException Source # 
Instance details

Defined in Cardano.Api.Error

Methods

toException ∷ ErrorAsException → SomeException #

fromException ∷ SomeException → Maybe ErrorAsException #

displayException ∷ ErrorAsException → String #

data FileError e Source #

Constructors

FileError FilePath e 
FileErrorTempFile 

Fields

FileIOError FilePath IOException 

Instances

Instances details
Show e ⇒ Show (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

showsPrec ∷ Int → FileError e → ShowS #

show ∷ FileError e → String #

showList ∷ [FileError e] → ShowS #

Error e ⇒ Error (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ FileError e → String Source #

\ No newline at end of file diff --git a/cardano-api/Cardano-Api-HasTypeProxy.html b/cardano-api/Cardano-Api-HasTypeProxy.html index b8516ae1d98..fa6b4e6d225 100644 --- a/cardano-api/Cardano-Api-HasTypeProxy.html +++ b/cardano-api/Cardano-Api-HasTypeProxy.html @@ -1,5 +1,5 @@ Cardano.Api.HasTypeProxy
cardano-api-1.27.0
Safe HaskellSafe-Inferred
LanguageHaskell2010

Cardano.Api.HasTypeProxy

Synopsis

Documentation

class HasTypeProxy t where Source #

Associated Types

data AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Methods

proxyToAsType ∷ Proxy t → AsType t Source #

Instances

Instances details
HasTypeProxy AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AlonzoEra Source #

Methods

proxyToAsType ∷ Proxy AlonzoEra → AsType AlonzoEra Source #

HasTypeProxy MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType MaryEra Source #

Methods

proxyToAsType ∷ Proxy MaryEra → AsType MaryEra Source #

HasTypeProxy AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AllegraEra Source #

Methods

proxyToAsType ∷ Proxy AllegraEra → AsType AllegraEra Source #

HasTypeProxy ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ShelleyEra Source #

Methods

proxyToAsType ∷ Proxy ShelleyEra → AsType ShelleyEra Source #

HasTypeProxy ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ByronEra Source #

Methods

proxyToAsType ∷ Proxy ByronEra → AsType ByronEra Source #

HasTypeProxy TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Associated Types

data AsType TextEnvelope Source #

Methods

proxyToAsType ∷ Proxy TextEnvelope → AsType TextEnvelope Source #

HasTypeProxy TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Associated Types

data AsType TxMetadata Source #

Methods

proxyToAsType ∷ Proxy TxMetadata → AsType TxMetadata Source #

HasTypeProxy StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakePoolKey Source #

Methods

proxyToAsType ∷ Proxy StakePoolKey → AsType StakePoolKey Source #

HasTypeProxy GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisUTxOKey Source #

Methods

proxyToAsType ∷ Proxy GenesisUTxOKey → AsType GenesisUTxOKey Source #

HasTypeProxy GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisDelegateExtendedKey Source #

Methods

proxyToAsType ∷ Proxy GenesisDelegateExtendedKey → AsType GenesisDelegateExtendedKey Source #

HasTypeProxy GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisDelegateKey Source #

Methods

proxyToAsType ∷ Proxy GenesisDelegateKey → AsType GenesisDelegateKey Source #

HasTypeProxy GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisExtendedKey Source #

Methods

proxyToAsType ∷ Proxy GenesisExtendedKey → AsType GenesisExtendedKey Source #

HasTypeProxy GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisKey Source #

Methods

proxyToAsType ∷ Proxy GenesisKey → AsType GenesisKey Source #

HasTypeProxy StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakeExtendedKey Source #

Methods

proxyToAsType ∷ Proxy StakeExtendedKey → AsType StakeExtendedKey Source #

HasTypeProxy StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakeKey Source #

Methods

proxyToAsType ∷ Proxy StakeKey → AsType StakeKey Source #

HasTypeProxy PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType PaymentExtendedKey Source #

Methods

proxyToAsType ∷ Proxy PaymentExtendedKey → AsType PaymentExtendedKey Source #

HasTypeProxy PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType PaymentKey Source #

Methods

proxyToAsType ∷ Proxy PaymentKey → AsType PaymentKey Source #

HasTypeProxy ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

Associated Types

data AsType ScriptData Source #

Methods

proxyToAsType ∷ Proxy ScriptData → AsType ScriptData Source #

HasTypeProxy ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptHash Source #

Methods

proxyToAsType ∷ Proxy ScriptHash → AsType ScriptHash Source #

HasTypeProxy ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptInAnyLang Source #

Methods

proxyToAsType ∷ Proxy ScriptInAnyLang → AsType ScriptInAnyLang Source #

HasTypeProxy SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType SimpleScriptV2 Source #

Methods

proxyToAsType ∷ Proxy SimpleScriptV2 → AsType SimpleScriptV2 Source #

HasTypeProxy SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType SimpleScriptV1 Source #

Methods

proxyToAsType ∷ Proxy SimpleScriptV1 → AsType SimpleScriptV1 Source #

HasTypeProxy ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data AsType ByronKeyLegacy Source #

Methods

proxyToAsType ∷ Proxy ByronKeyLegacy → AsType ByronKeyLegacy Source #

HasTypeProxy ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data AsType ByronKey Source #

Methods

proxyToAsType ∷ Proxy ByronKey → AsType ByronKey Source #

HasTypeProxy ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Associated Types

data AsType ByronVote Source #

Methods

proxyToAsType ∷ Proxy ByronVote → AsType ByronVote Source #

HasTypeProxy ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Associated Types

data AsType ByronUpdateProposal Source #

Methods

proxyToAsType ∷ Proxy ByronUpdateProposal → AsType ByronUpdateProposal Source #

HasTypeProxy VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data AsType VrfKey Source #

Methods

proxyToAsType ∷ Proxy VrfKey → AsType VrfKey Source #

HasTypeProxy KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data AsType KesKey Source #

Methods

proxyToAsType ∷ Proxy KesKey → AsType KesKey Source #

HasTypeProxy StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Associated Types

data AsType StakePoolMetadata Source #

Methods

proxyToAsType ∷ Proxy StakePoolMetadata → AsType StakePoolMetadata Source #

HasTypeProxy StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType StakeAddress Source #

Methods

proxyToAsType ∷ Proxy StakeAddress → AsType StakeAddress Source #

HasTypeProxy AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType AddressAny Source #

Methods

proxyToAsType ∷ Proxy AddressAny → AsType AddressAny Source #

HasTypeProxy ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType ShelleyAddr Source #

Methods

proxyToAsType ∷ Proxy ShelleyAddr → AsType ShelleyAddr Source #

HasTypeProxy ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType ByronAddr Source #

Methods

proxyToAsType ∷ Proxy ByronAddr → AsType ByronAddr Source #

HasTypeProxy AssetName Source # 
Instance details

Defined in Cardano.Api.Value

Associated Types

data AsType AssetName Source #

Methods

proxyToAsType ∷ Proxy AssetName → AsType AssetName Source #

HasTypeProxy PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

Associated Types

data AsType PolicyId Source #

Methods

proxyToAsType ∷ Proxy PolicyId → AsType PolicyId Source #

HasTypeProxy UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Associated Types

data AsType UpdateProposal Source #

Methods

proxyToAsType ∷ Proxy UpdateProposal → AsType UpdateProposal Source #

HasTypeProxy Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Associated Types

data AsType Certificate Source #

Methods

proxyToAsType ∷ Proxy Certificate → AsType Certificate Source #

HasTypeProxy TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

data AsType TxId Source #

Methods

proxyToAsType ∷ Proxy TxId → AsType TxId Source #

HasTypeProxy BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

Associated Types

data AsType BlockHeader Source #

Methods

proxyToAsType ∷ Proxy BlockHeader → AsType BlockHeader Source #

HasTypeProxy OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Associated Types

data AsType OperationalCertificateIssueCounter Source #

Methods

proxyToAsType ∷ Proxy OperationalCertificateIssueCounter → AsType OperationalCertificateIssueCounter Source #

HasTypeProxy OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Associated Types

data AsType OperationalCertificate Source #

Methods

proxyToAsType ∷ Proxy OperationalCertificate → AsType OperationalCertificate Source #

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

HasTypeProxy a ⇒ HasTypeProxy (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (VerificationKey a) Source #

Methods

proxyToAsType ∷ Proxy (VerificationKey a) → AsType (VerificationKey a) Source #

HasTypeProxy a ⇒ HasTypeProxy (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (SigningKey a) Source #

Methods

proxyToAsType ∷ Proxy (SigningKey a) → AsType (SigningKey a) Source #

HasTypeProxy lang ⇒ HasTypeProxy (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (PlutusScript lang) Source #

Methods

proxyToAsType ∷ Proxy (PlutusScript lang) → AsType (PlutusScript lang) Source #

HasTypeProxy lang ⇒ HasTypeProxy (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (SimpleScript lang) Source #

Methods

proxyToAsType ∷ Proxy (SimpleScript lang) → AsType (SimpleScript lang) Source #

HasTypeProxy era ⇒ HasTypeProxy (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (ScriptInEra era) Source #

Methods

proxyToAsType ∷ Proxy (ScriptInEra era) → AsType (ScriptInEra era) Source #

HasTypeProxy lang ⇒ HasTypeProxy (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (Script lang) Source #

Methods

proxyToAsType ∷ Proxy (Script lang) → AsType (Script lang) Source #

HasTypeProxy era ⇒ HasTypeProxy (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType (AddressInEra era) Source #

Methods

proxyToAsType ∷ Proxy (AddressInEra era) → AsType (AddressInEra era) Source #

HasTypeProxy addrtype ⇒ HasTypeProxy (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType (Address addrtype) Source #

Methods

proxyToAsType ∷ Proxy (Address addrtype) → AsType (Address addrtype) Source #

HasTypeProxy era ⇒ HasTypeProxy (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

data AsType (TxBody era) Source #

Methods

proxyToAsType ∷ Proxy (TxBody era) → AsType (TxBody era) Source #

HasTypeProxy era ⇒ HasTypeProxy (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (KeyWitness era) Source #

Methods

proxyToAsType ∷ Proxy (KeyWitness era) → AsType (KeyWitness era) Source #

HasTypeProxy era ⇒ HasTypeProxy (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (Tx era) Source #

Methods

proxyToAsType ∷ Proxy (Tx era) → AsType (Tx era) Source #

data Proxy (t ∷ k) #

Proxy is a type that holds no data, but has a phantom parameter of + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Methods

proxyToAsType ∷ Proxy t → AsType t Source #

Instances

Instances details
HasTypeProxy AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AlonzoEra Source #

Methods

proxyToAsType ∷ Proxy AlonzoEra → AsType AlonzoEra Source #

HasTypeProxy MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType MaryEra Source #

Methods

proxyToAsType ∷ Proxy MaryEra → AsType MaryEra Source #

HasTypeProxy AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AllegraEra Source #

Methods

proxyToAsType ∷ Proxy AllegraEra → AsType AllegraEra Source #

HasTypeProxy ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ShelleyEra Source #

Methods

proxyToAsType ∷ Proxy ShelleyEra → AsType ShelleyEra Source #

HasTypeProxy ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ByronEra Source #

Methods

proxyToAsType ∷ Proxy ByronEra → AsType ByronEra Source #

HasTypeProxy TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Associated Types

data AsType TextEnvelope Source #

Methods

proxyToAsType ∷ Proxy TextEnvelope → AsType TextEnvelope Source #

HasTypeProxy TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Associated Types

data AsType TxMetadata Source #

Methods

proxyToAsType ∷ Proxy TxMetadata → AsType TxMetadata Source #

HasTypeProxy StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakePoolKey Source #

Methods

proxyToAsType ∷ Proxy StakePoolKey → AsType StakePoolKey Source #

HasTypeProxy GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisUTxOKey Source #

Methods

proxyToAsType ∷ Proxy GenesisUTxOKey → AsType GenesisUTxOKey Source #

HasTypeProxy GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisDelegateExtendedKey Source #

Methods

proxyToAsType ∷ Proxy GenesisDelegateExtendedKey → AsType GenesisDelegateExtendedKey Source #

HasTypeProxy GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisDelegateKey Source #

Methods

proxyToAsType ∷ Proxy GenesisDelegateKey → AsType GenesisDelegateKey Source #

HasTypeProxy GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisExtendedKey Source #

Methods

proxyToAsType ∷ Proxy GenesisExtendedKey → AsType GenesisExtendedKey Source #

HasTypeProxy GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisKey Source #

Methods

proxyToAsType ∷ Proxy GenesisKey → AsType GenesisKey Source #

HasTypeProxy StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakeExtendedKey Source #

Methods

proxyToAsType ∷ Proxy StakeExtendedKey → AsType StakeExtendedKey Source #

HasTypeProxy StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakeKey Source #

Methods

proxyToAsType ∷ Proxy StakeKey → AsType StakeKey Source #

HasTypeProxy PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType PaymentExtendedKey Source #

Methods

proxyToAsType ∷ Proxy PaymentExtendedKey → AsType PaymentExtendedKey Source #

HasTypeProxy PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType PaymentKey Source #

Methods

proxyToAsType ∷ Proxy PaymentKey → AsType PaymentKey Source #

HasTypeProxy ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

Associated Types

data AsType ScriptData Source #

Methods

proxyToAsType ∷ Proxy ScriptData → AsType ScriptData Source #

HasTypeProxy ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptHash Source #

Methods

proxyToAsType ∷ Proxy ScriptHash → AsType ScriptHash Source #

HasTypeProxy ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptInAnyLang Source #

Methods

proxyToAsType ∷ Proxy ScriptInAnyLang → AsType ScriptInAnyLang Source #

HasTypeProxy SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType SimpleScriptV2 Source #

Methods

proxyToAsType ∷ Proxy SimpleScriptV2 → AsType SimpleScriptV2 Source #

HasTypeProxy SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType SimpleScriptV1 Source #

Methods

proxyToAsType ∷ Proxy SimpleScriptV1 → AsType SimpleScriptV1 Source #

HasTypeProxy ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data AsType ByronKeyLegacy Source #

Methods

proxyToAsType ∷ Proxy ByronKeyLegacy → AsType ByronKeyLegacy Source #

HasTypeProxy ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data AsType ByronKey Source #

Methods

proxyToAsType ∷ Proxy ByronKey → AsType ByronKey Source #

HasTypeProxy ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Associated Types

data AsType ByronVote Source #

Methods

proxyToAsType ∷ Proxy ByronVote → AsType ByronVote Source #

HasTypeProxy ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Associated Types

data AsType ByronUpdateProposal Source #

Methods

proxyToAsType ∷ Proxy ByronUpdateProposal → AsType ByronUpdateProposal Source #

HasTypeProxy VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data AsType VrfKey Source #

Methods

proxyToAsType ∷ Proxy VrfKey → AsType VrfKey Source #

HasTypeProxy KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data AsType KesKey Source #

Methods

proxyToAsType ∷ Proxy KesKey → AsType KesKey Source #

HasTypeProxy StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Associated Types

data AsType StakePoolMetadata Source #

Methods

proxyToAsType ∷ Proxy StakePoolMetadata → AsType StakePoolMetadata Source #

HasTypeProxy StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType StakeAddress Source #

Methods

proxyToAsType ∷ Proxy StakeAddress → AsType StakeAddress Source #

HasTypeProxy AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType AddressAny Source #

Methods

proxyToAsType ∷ Proxy AddressAny → AsType AddressAny Source #

HasTypeProxy ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType ShelleyAddr Source #

Methods

proxyToAsType ∷ Proxy ShelleyAddr → AsType ShelleyAddr Source #

HasTypeProxy ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType ByronAddr Source #

Methods

proxyToAsType ∷ Proxy ByronAddr → AsType ByronAddr Source #

HasTypeProxy AssetName Source # 
Instance details

Defined in Cardano.Api.Value

Associated Types

data AsType AssetName Source #

Methods

proxyToAsType ∷ Proxy AssetName → AsType AssetName Source #

HasTypeProxy PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

Associated Types

data AsType PolicyId Source #

Methods

proxyToAsType ∷ Proxy PolicyId → AsType PolicyId Source #

HasTypeProxy UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Associated Types

data AsType UpdateProposal Source #

Methods

proxyToAsType ∷ Proxy UpdateProposal → AsType UpdateProposal Source #

HasTypeProxy Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Associated Types

data AsType Certificate Source #

Methods

proxyToAsType ∷ Proxy Certificate → AsType Certificate Source #

HasTypeProxy TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

data AsType TxId Source #

Methods

proxyToAsType ∷ Proxy TxId → AsType TxId Source #

HasTypeProxy BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

Associated Types

data AsType BlockHeader Source #

Methods

proxyToAsType ∷ Proxy BlockHeader → AsType BlockHeader Source #

HasTypeProxy OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Associated Types

data AsType OperationalCertificateIssueCounter Source #

Methods

proxyToAsType ∷ Proxy OperationalCertificateIssueCounter → AsType OperationalCertificateIssueCounter Source #

HasTypeProxy OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Associated Types

data AsType OperationalCertificate Source #

Methods

proxyToAsType ∷ Proxy OperationalCertificate → AsType OperationalCertificate Source #

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

HasTypeProxy a ⇒ HasTypeProxy (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (VerificationKey a) Source #

Methods

proxyToAsType ∷ Proxy (VerificationKey a) → AsType (VerificationKey a) Source #

HasTypeProxy a ⇒ HasTypeProxy (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (SigningKey a) Source #

Methods

proxyToAsType ∷ Proxy (SigningKey a) → AsType (SigningKey a) Source #

HasTypeProxy lang ⇒ HasTypeProxy (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (PlutusScript lang) Source #

Methods

proxyToAsType ∷ Proxy (PlutusScript lang) → AsType (PlutusScript lang) Source #

HasTypeProxy lang ⇒ HasTypeProxy (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (SimpleScript lang) Source #

Methods

proxyToAsType ∷ Proxy (SimpleScript lang) → AsType (SimpleScript lang) Source #

HasTypeProxy era ⇒ HasTypeProxy (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (ScriptInEra era) Source #

Methods

proxyToAsType ∷ Proxy (ScriptInEra era) → AsType (ScriptInEra era) Source #

HasTypeProxy lang ⇒ HasTypeProxy (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (Script lang) Source #

Methods

proxyToAsType ∷ Proxy (Script lang) → AsType (Script lang) Source #

HasTypeProxy era ⇒ HasTypeProxy (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType (AddressInEra era) Source #

Methods

proxyToAsType ∷ Proxy (AddressInEra era) → AsType (AddressInEra era) Source #

HasTypeProxy addrtype ⇒ HasTypeProxy (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType (Address addrtype) Source #

Methods

proxyToAsType ∷ Proxy (Address addrtype) → AsType (Address addrtype) Source #

HasTypeProxy era ⇒ HasTypeProxy (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

data AsType (TxBody era) Source #

Methods

proxyToAsType ∷ Proxy (TxBody era) → AsType (TxBody era) Source #

HasTypeProxy era ⇒ HasTypeProxy (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (KeyWitness era) Source #

Methods

proxyToAsType ∷ Proxy (KeyWitness era) → AsType (KeyWitness era) Source #

HasTypeProxy era ⇒ HasTypeProxy (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (Tx era) Source #

Methods

proxyToAsType ∷ Proxy (Tx era) → AsType (Tx era) Source #

data Proxy (t ∷ k) #

Proxy is a type that holds no data, but has a phantom parameter of arbitrary type (or even kind). Its use is to provide type information, even though there is no value available of that type (or it may be too costly to create one).

Historically, Proxy :: Proxy a is a safer alternative to the diff --git a/cardano-api/Cardano-Api-Hash.html b/cardano-api/Cardano-Api-Hash.html index a73d9b3e74e..adb825101a5 100644 --- a/cardano-api/Cardano-Api-Hash.html +++ b/cardano-api/Cardano-Api-Hash.html @@ -1,4 +1,4 @@ Cardano.Api.Hash

cardano-api-1.27.0
Safe HaskellSafe-Inferred
LanguageHaskell2010

Cardano.Api.Hash

Synopsis

Documentation

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. The different eras do use different types, but it's all the same underlying representation.

Instance details

Defined in Cardano.Api.Block

newtype Hash BlockHeader = HeaderHash ShortByteString
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)

class CastHash roleA roleB where Source #

Methods

castHash ∷ Hash roleA → Hash roleB Source #

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-Key.html b/cardano-api/Cardano-Api-Key.html index cabecbc75f9..27e2c38a299 100644 --- a/cardano-api/Cardano-Api-Key.html +++ b/cardano-api/Cardano-Api-Key.html @@ -4,4 +4,4 @@ serialising.

Associated Types

data VerificationKey keyrole ∷ Type Source #

The type of cryptographic verification key, for each key role.

data SigningKey keyrole ∷ Type Source #

The type of cryptographic signing key, for each key role.

Methods

getVerificationKey ∷ SigningKey keyrole → VerificationKey keyrole Source #

Get the corresponding verification key from a signing key.

deterministicSigningKey ∷ AsType keyrole → Seed → SigningKey keyrole Source #

Generate a SigningKey deterministically, given a Seed. The required size of the seed is given by deterministicSigningKeySeedSize.

deterministicSigningKeySeedSize ∷ AsType keyrole → Word Source #

verificationKeyHash ∷ VerificationKey keyrole → Hash keyrole Source #

Instances

Instances details
Key StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey StakePoolKey Source #

data SigningKey StakePoolKey Source #

Methods

getVerificationKey ∷ SigningKey StakePoolKey → VerificationKey StakePoolKey Source #

deterministicSigningKey ∷ AsType StakePoolKey → Seed → SigningKey StakePoolKey Source #

deterministicSigningKeySeedSize ∷ AsType StakePoolKey → Word Source #

verificationKeyHash ∷ VerificationKey StakePoolKey → Hash StakePoolKey Source #

Key GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisUTxOKey Source #

data SigningKey GenesisUTxOKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisUTxOKey → VerificationKey GenesisUTxOKey Source #

deterministicSigningKey ∷ AsType GenesisUTxOKey → Seed → SigningKey GenesisUTxOKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisUTxOKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisUTxOKey → Hash GenesisUTxOKey Source #

Key GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisDelegateExtendedKey Source #

data SigningKey GenesisDelegateExtendedKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey Source #

deterministicSigningKey ∷ AsType GenesisDelegateExtendedKey → Seed → SigningKey GenesisDelegateExtendedKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisDelegateExtendedKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey Source #

Key GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisDelegateKey Source #

data SigningKey GenesisDelegateKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisDelegateKey → VerificationKey GenesisDelegateKey Source #

deterministicSigningKey ∷ AsType GenesisDelegateKey → Seed → SigningKey GenesisDelegateKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisDelegateKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisDelegateKey → Hash GenesisDelegateKey Source #

Key GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisExtendedKey Source #

data SigningKey GenesisExtendedKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisExtendedKey → VerificationKey GenesisExtendedKey Source #

deterministicSigningKey ∷ AsType GenesisExtendedKey → Seed → SigningKey GenesisExtendedKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisExtendedKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisExtendedKey → Hash GenesisExtendedKey Source #

Key GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisKey Source #

data SigningKey GenesisKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisKey → VerificationKey GenesisKey Source #

deterministicSigningKey ∷ AsType GenesisKey → Seed → SigningKey GenesisKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisKey → Hash GenesisKey Source #

Key StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey StakeExtendedKey Source #

data SigningKey StakeExtendedKey Source #

Methods

getVerificationKey ∷ SigningKey StakeExtendedKey → VerificationKey StakeExtendedKey Source #

deterministicSigningKey ∷ AsType StakeExtendedKey → Seed → SigningKey StakeExtendedKey Source #

deterministicSigningKeySeedSize ∷ AsType StakeExtendedKey → Word Source #

verificationKeyHash ∷ VerificationKey StakeExtendedKey → Hash StakeExtendedKey Source #

Key StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey StakeKey Source #

data SigningKey StakeKey Source #

Methods

getVerificationKey ∷ SigningKey StakeKey → VerificationKey StakeKey Source #

deterministicSigningKey ∷ AsType StakeKey → Seed → SigningKey StakeKey Source #

deterministicSigningKeySeedSize ∷ AsType StakeKey → Word Source #

verificationKeyHash ∷ VerificationKey StakeKey → Hash StakeKey Source #

Key PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey PaymentExtendedKey Source #

data SigningKey PaymentExtendedKey Source #

Methods

getVerificationKey ∷ SigningKey PaymentExtendedKey → VerificationKey PaymentExtendedKey Source #

deterministicSigningKey ∷ AsType PaymentExtendedKey → Seed → SigningKey PaymentExtendedKey Source #

deterministicSigningKeySeedSize ∷ AsType PaymentExtendedKey → Word Source #

verificationKeyHash ∷ VerificationKey PaymentExtendedKey → Hash PaymentExtendedKey Source #

Key PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey PaymentKey Source #

data SigningKey PaymentKey Source #

Methods

getVerificationKey ∷ SigningKey PaymentKey → VerificationKey PaymentKey Source #

deterministicSigningKey ∷ AsType PaymentKey → Seed → SigningKey PaymentKey Source #

deterministicSigningKeySeedSize ∷ AsType PaymentKey → Word Source #

verificationKeyHash ∷ VerificationKey PaymentKey → Hash PaymentKey Source #

Key ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data VerificationKey ByronKeyLegacy Source #

data SigningKey ByronKeyLegacy Source #

Methods

getVerificationKey ∷ SigningKey ByronKeyLegacy → VerificationKey ByronKeyLegacy Source #

deterministicSigningKey ∷ AsType ByronKeyLegacy → Seed → SigningKey ByronKeyLegacy Source #

deterministicSigningKeySeedSize ∷ AsType ByronKeyLegacy → Word Source #

verificationKeyHash ∷ VerificationKey ByronKeyLegacy → Hash ByronKeyLegacy Source #

Key ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data VerificationKey ByronKey Source #

data SigningKey ByronKey Source #

Methods

getVerificationKey ∷ SigningKey ByronKey → VerificationKey ByronKey Source #

deterministicSigningKey ∷ AsType ByronKey → Seed → SigningKey ByronKey Source #

deterministicSigningKeySeedSize ∷ AsType ByronKey → Word Source #

verificationKeyHash ∷ VerificationKey ByronKey → Hash ByronKey Source #

Key VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data VerificationKey VrfKey Source #

data SigningKey VrfKey Source #

Methods

getVerificationKey ∷ SigningKey VrfKey → VerificationKey VrfKey Source #

deterministicSigningKey ∷ AsType VrfKey → Seed → SigningKey VrfKey Source #

deterministicSigningKeySeedSize ∷ AsType VrfKey → Word Source #

verificationKeyHash ∷ VerificationKey VrfKey → Hash VrfKey Source #

Key KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data VerificationKey KesKey Source #

data SigningKey KesKey Source #

Methods

getVerificationKey ∷ SigningKey KesKey → VerificationKey KesKey Source #

deterministicSigningKey ∷ AsType KesKey → Seed → SigningKey KesKey Source #

deterministicSigningKeySeedSize ∷ AsType KesKey → Word Source #

verificationKeyHash ∷ VerificationKey KesKey → Hash KesKey Source #

generateSigningKey ∷ Key keyrole ⇒ AsType keyrole → IO (SigningKey keyrole) Source #

Generate a SigningKey using a seed from operating system entropy.

class CastVerificationKeyRole keyroleA keyroleB where Source #

Some key roles share the same representation and it is sometimes legitimate to change the role of a key.

Methods

castVerificationKey ∷ VerificationKey keyroleA → VerificationKey keyroleB Source #

Change the role of a VerificationKey, if the representation permits.

Instances

Instances details
CastVerificationKeyRole GenesisUTxOKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castVerificationKey ∷ VerificationKey GenesisUTxOKey → VerificationKey PaymentKey Source #

CastVerificationKeyRole GenesisDelegateExtendedKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castVerificationKey ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateKey Source #

CastVerificationKeyRole GenesisDelegateKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castVerificationKey ∷ VerificationKey GenesisDelegateKey → VerificationKey StakePoolKey Source #

CastVerificationKeyRole GenesisExtendedKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castVerificationKey ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisKey Source #

CastVerificationKeyRole StakeExtendedKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castVerificationKey ∷ VerificationKey StakeExtendedKey → VerificationKey StakeKey Source #

CastVerificationKeyRole PaymentExtendedKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castVerificationKey ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentKey Source #

CastVerificationKeyRole ByronKeyLegacy ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

castVerificationKey ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKey Source #

CastVerificationKeyRole ByronKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

castVerificationKey ∷ VerificationKey ByronKey → VerificationKey PaymentExtendedKey Source #

CastVerificationKeyRole ByronKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

castVerificationKey ∷ VerificationKey ByronKey → VerificationKey PaymentKey Source #

class CastSigningKeyRole keyroleA keyroleB where Source #

Methods

castSigningKey ∷ SigningKey keyroleA → SigningKey keyroleB Source #

Change the role of a SigningKey, if the representation permits.

Instances

Instances details
CastSigningKeyRole GenesisUTxOKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castSigningKey ∷ SigningKey GenesisUTxOKey → SigningKey PaymentKey Source #

CastSigningKeyRole GenesisDelegateKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castSigningKey ∷ SigningKey GenesisDelegateKey → SigningKey StakePoolKey Source #

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-KeysByron.html b/cardano-api/Cardano-Api-KeysByron.html index 21c0d9ce706..9d59f87b6c8 100644 --- a/cardano-api/Cardano-Api-KeysByron.html +++ b/cardano-api/Cardano-Api-KeysByron.html @@ -3,6 +3,6 @@ The inclusion of the chaincode is a design mistake but one that cannot be corrected for the Byron era. The Shelley era PaymentKeys do not include a chaincode. It is safe to use a zero or random chaincode for new Byron keys.

This is a type level tag, used with other interfaces like Key.

Instances

Instances details
HasTypeProxy ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data AsType ByronKey Source #

Methods

proxyToAsType ∷ Proxy ByronKey → AsType ByronKey Source #

Key ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data VerificationKey ByronKey Source #

data SigningKey ByronKey Source #

Methods

getVerificationKey ∷ SigningKey ByronKey → VerificationKey ByronKey Source #

deterministicSigningKey ∷ AsType ByronKey → Seed → SigningKey ByronKey Source #

deterministicSigningKeySeedSize ∷ AsType ByronKey → Word Source #

verificationKeyHash ∷ VerificationKey ByronKey → Hash ByronKey Source #

IsByronKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

byronKeyFormat ∷ ByronKeyFormat ByronKey Source #

CastVerificationKeyRole ByronKeyLegacy ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

castVerificationKey ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKey Source #

CastVerificationKeyRole ByronKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

castVerificationKey ∷ VerificationKey ByronKey → VerificationKey PaymentExtendedKey Source #

CastVerificationKeyRole ByronKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

castVerificationKey ∷ VerificationKey ByronKey → VerificationKey PaymentKey Source #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

(/=) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKey → ShowS #

show ∷ VerificationKey ByronKey → String #

showList ∷ [VerificationKey ByronKey] → ShowS #

Show (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKey → ShowS #

show ∷ SigningKey ByronKey → String #

showList ∷ [SigningKey ByronKey] → ShowS #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKey #

IsString (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKey #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKey) #

label ∷ Proxy (SigningKey ByronKey) → Text #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKey] → Size #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKey) → ByteString → Either DecoderError (SigningKey ByronKey) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKey) → ByteString → Maybe (VerificationKey ByronKey) Source #

SerialiseAsRawBytes (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKey) → ByteString → Maybe (SigningKey ByronKey) Source #

HasTextEnvelope (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKey → TextEnvelopeDescr Source #

data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype VerificationKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKey = ByronVerificationKey VerificationKey
newtype SigningKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKey = ByronSigningKey SigningKey

data ByronKeyLegacy Source #

Instances

Instances details
HasTypeProxy ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data AsType ByronKeyLegacy Source #

Methods

proxyToAsType ∷ Proxy ByronKeyLegacy → AsType ByronKeyLegacy Source #

Key ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data VerificationKey ByronKeyLegacy Source #

data SigningKey ByronKeyLegacy Source #

Methods

getVerificationKey ∷ SigningKey ByronKeyLegacy → VerificationKey ByronKeyLegacy Source #

deterministicSigningKey ∷ AsType ByronKeyLegacy → Seed → SigningKey ByronKeyLegacy Source #

deterministicSigningKeySeedSize ∷ AsType ByronKeyLegacy → Word Source #

verificationKeyHash ∷ VerificationKey ByronKeyLegacy → Hash ByronKeyLegacy Source #

IsByronKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

byronKeyFormat ∷ ByronKeyFormat ByronKeyLegacy Source #

CastVerificationKeyRole ByronKeyLegacy ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

castVerificationKey ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKey Source #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

(/=) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKeyLegacy → ShowS #

show ∷ VerificationKey ByronKeyLegacy → String #

showList ∷ [VerificationKey ByronKeyLegacy] → ShowS #

Show (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKeyLegacy → ShowS #

show ∷ SigningKey ByronKeyLegacy → String #

showList ∷ [SigningKey ByronKeyLegacy] → ShowS #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKeyLegacy #

IsString (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKeyLegacy #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKeyLegacy) #

label ∷ Proxy (SigningKey ByronKeyLegacy) → Text #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKeyLegacy] → Size #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Either DecoderError (SigningKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Maybe (VerificationKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Maybe (SigningKey ByronKeyLegacy) Source #

HasTextEnvelope (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKeyLegacy → TextEnvelopeDescr Source #

data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype VerificationKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKeyLegacy = ByronVerificationKeyLegacy VerificationKey
newtype SigningKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKeyLegacy = ByronSigningKeyLegacy SigningKey

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family VerificationKey keyrole ∷ Type Source #

The type of cryptographic verification key, for each key role.

Instances

Instances details
Eq (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

(/=) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

Eq (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

(/=) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

Eq (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

Eq (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

Eq (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

Eq (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

(/=) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

Eq (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

(/=) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

Eq (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

(/=) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

Eq (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

(/=) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

Eq (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

(/=) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

Eq (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

(/=) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

Eq (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

(/=) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

Eq (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

(/=) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

Eq (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

(/=) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

Show (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakePoolKey → ShowS #

show ∷ VerificationKey StakePoolKey → String #

showList ∷ [VerificationKey StakePoolKey] → ShowS #

Show (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisUTxOKey → ShowS #

show ∷ VerificationKey GenesisUTxOKey → String #

showList ∷ [VerificationKey GenesisUTxOKey] → ShowS #

Show (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateExtendedKey → ShowS #

show ∷ VerificationKey GenesisDelegateExtendedKey → String #

showList ∷ [VerificationKey GenesisDelegateExtendedKey] → ShowS #

Show (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateKey → ShowS #

show ∷ VerificationKey GenesisDelegateKey → String #

showList ∷ [VerificationKey GenesisDelegateKey] → ShowS #

Show (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisExtendedKey → ShowS #

show ∷ VerificationKey GenesisExtendedKey → String #

showList ∷ [VerificationKey GenesisExtendedKey] → ShowS #

Show (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisKey → ShowS #

show ∷ VerificationKey GenesisKey → String #

showList ∷ [VerificationKey GenesisKey] → ShowS #

Show (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeExtendedKey → ShowS #

show ∷ VerificationKey StakeExtendedKey → String #

showList ∷ [VerificationKey StakeExtendedKey] → ShowS #

Show (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeKey → ShowS #

show ∷ VerificationKey StakeKey → String #

showList ∷ [VerificationKey StakeKey] → ShowS #

Show (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentExtendedKey → ShowS #

show ∷ VerificationKey PaymentExtendedKey → String #

showList ∷ [VerificationKey PaymentExtendedKey] → ShowS #

Show (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentKey → ShowS #

show ∷ VerificationKey PaymentKey → String #

showList ∷ [VerificationKey PaymentKey] → ShowS #

Show (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKeyLegacy → ShowS #

show ∷ VerificationKey ByronKeyLegacy → String #

showList ∷ [VerificationKey ByronKeyLegacy] → ShowS #

Show (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKey → ShowS #

show ∷ VerificationKey ByronKey → String #

showList ∷ [VerificationKey ByronKey] → ShowS #

Show (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey VrfKey → ShowS #

show ∷ VerificationKey VrfKey → String #

showList ∷ [VerificationKey VrfKey] → ShowS #

Show (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey KesKey → ShowS #

show ∷ VerificationKey KesKey → String #

showList ∷ [VerificationKey KesKey] → ShowS #

IsString (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakePoolKey #

IsString (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisUTxOKey #

IsString (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateExtendedKey #

IsString (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateKey #

IsString (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisExtendedKey #

IsString (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisKey #

IsString (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeExtendedKey #

IsString (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeKey #

IsString (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentExtendedKey #

IsString (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentKey #

IsString (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKeyLegacy #

IsString (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKey #

IsString (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey VrfKey #

IsString (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey KesKey #

FromCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakePoolKey) #

label ∷ Proxy (VerificationKey StakePoolKey) → Text #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateKey) #

label ∷ Proxy (VerificationKey GenesisDelegateKey) → Text #

FromCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisExtendedKey) #

label ∷ Proxy (VerificationKey GenesisExtendedKey) → Text #

FromCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisKey) #

label ∷ Proxy (VerificationKey GenesisKey) → Text #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeKey) #

label ∷ Proxy (VerificationKey StakeKey) → Text #

FromCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentExtendedKey) #

label ∷ Proxy (VerificationKey PaymentExtendedKey) → Text #

FromCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentKey) #

label ∷ Proxy (VerificationKey PaymentKey) → Text #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

ToCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakePoolKey] → Size #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateKey] → Size #

ToCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisExtendedKey] → Size #

ToCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisKey] → Size #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeKey] → Size #

ToCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentExtendedKey] → Size #

ToCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentKey] → Size #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (VerificationKey a) Source #

Methods

proxyToAsType ∷ Proxy (VerificationKey a) → AsType (VerificationKey a) Source #

SerialiseAsCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakePoolKey) → ByteString → Either DecoderError (VerificationKey StakePoolKey) Source #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateKey) Source #

SerialiseAsCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisKey) → ByteString → Either DecoderError (VerificationKey GenesisKey) Source #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeKey) → ByteString → Either DecoderError (VerificationKey StakeKey) Source #

SerialiseAsCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Either DecoderError (VerificationKey PaymentExtendedKey) Source #

SerialiseAsCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentKey) → ByteString → Either DecoderError (VerificationKey PaymentKey) Source #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsRawBytes (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakePoolKey) → ByteString → Maybe (VerificationKey StakePoolKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Maybe (VerificationKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Maybe (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Maybe (VerificationKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Maybe (VerificationKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisKey) → ByteString → Maybe (VerificationKey GenesisKey) Source #

SerialiseAsRawBytes (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Maybe (VerificationKey StakeExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeKey) → ByteString → Maybe (VerificationKey StakeKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Maybe (VerificationKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentKey) → ByteString → Maybe (VerificationKey PaymentKey) Source #

SerialiseAsRawBytes (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Maybe (VerificationKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKey) → ByteString → Maybe (VerificationKey ByronKey) Source #

SerialiseAsRawBytes (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey VrfKey) → ByteString → Maybe (VerificationKey VrfKey) Source #

SerialiseAsRawBytes (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey KesKey) → ByteString → Maybe (VerificationKey KesKey) Source #

HasTextEnvelope (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey VrfKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey KesKey) → [Text] Source #

newtype VerificationKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakePoolKey = StakePoolVerificationKey (VKey 'StakePool StandardCrypto)
newtype VerificationKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisUTxOKey = GenesisUTxOVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateExtendedKey = GenesisDelegateExtendedVerificationKey XPub
newtype VerificationKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateKey = GenesisDelegateVerificationKey (VKey 'GenesisDelegate StandardCrypto)
newtype VerificationKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisExtendedKey = GenesisExtendedVerificationKey XPub
newtype VerificationKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisKey = GenesisVerificationKey (VKey 'Genesis StandardCrypto)
newtype VerificationKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeExtendedKey = StakeExtendedVerificationKey XPub
newtype VerificationKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeKey = StakeVerificationKey (VKey 'Staking StandardCrypto)
newtype VerificationKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentExtendedKey = PaymentExtendedVerificationKey XPub
newtype VerificationKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentKey = PaymentVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKeyLegacy = ByronVerificationKeyLegacy VerificationKey
newtype VerificationKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKey = ByronVerificationKey VerificationKey
newtype VerificationKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey VrfKey = VrfVerificationKey (VerKeyVRF StandardCrypto)
newtype VerificationKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey KesKey = KesVerificationKey (VerKeyKES StandardCrypto)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)

data family SigningKey keyrole ∷ Type Source #

The type of cryptographic signing key, for each key role.

Instances

Instances details
Show (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakePoolKey → ShowS #

show ∷ SigningKey StakePoolKey → String #

showList ∷ [SigningKey StakePoolKey] → ShowS #

Show (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisUTxOKey → ShowS #

show ∷ SigningKey GenesisUTxOKey → String #

showList ∷ [SigningKey GenesisUTxOKey] → ShowS #

Show (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateExtendedKey → ShowS #

show ∷ SigningKey GenesisDelegateExtendedKey → String #

showList ∷ [SigningKey GenesisDelegateExtendedKey] → ShowS #

Show (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateKey → ShowS #

show ∷ SigningKey GenesisDelegateKey → String #

showList ∷ [SigningKey GenesisDelegateKey] → ShowS #

Show (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisExtendedKey → ShowS #

show ∷ SigningKey GenesisExtendedKey → String #

showList ∷ [SigningKey GenesisExtendedKey] → ShowS #

Show (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisKey → ShowS #

show ∷ SigningKey GenesisKey → String #

showList ∷ [SigningKey GenesisKey] → ShowS #

Show (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeExtendedKey → ShowS #

show ∷ SigningKey StakeExtendedKey → String #

showList ∷ [SigningKey StakeExtendedKey] → ShowS #

Show (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeKey → ShowS #

show ∷ SigningKey StakeKey → String #

showList ∷ [SigningKey StakeKey] → ShowS #

Show (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey PaymentExtendedKey → ShowS #

show ∷ SigningKey PaymentExtendedKey → String #

showList ∷ [SigningKey PaymentExtendedKey] → ShowS #

Show (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey PaymentKey → ShowS #

show ∷ SigningKey PaymentKey → String #

showList ∷ [SigningKey PaymentKey] → ShowS #

Show (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKeyLegacy → ShowS #

show ∷ SigningKey ByronKeyLegacy → String #

showList ∷ [SigningKey ByronKeyLegacy] → ShowS #

Show (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKey → ShowS #

show ∷ SigningKey ByronKey → String #

showList ∷ [SigningKey ByronKey] → ShowS #

Show (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey VrfKey → ShowS #

show ∷ SigningKey VrfKey → String #

showList ∷ [SigningKey VrfKey] → ShowS #

Show (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey KesKey → ShowS #

show ∷ SigningKey KesKey → String #

showList ∷ [SigningKey KesKey] → ShowS #

IsString (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakePoolKey #

IsString (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisUTxOKey #

IsString (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateExtendedKey #

IsString (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateKey #

IsString (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisExtendedKey #

IsString (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisKey #

IsString (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeExtendedKey #

IsString (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeKey #

IsString (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey PaymentExtendedKey #

IsString (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey PaymentKey #

IsString (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKeyLegacy #

IsString (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKey #

IsString (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey VrfKey #

IsString (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey KesKey #

FromCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakePoolKey) #

label ∷ Proxy (SigningKey StakePoolKey) → Text #

FromCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisUTxOKey) #

label ∷ Proxy (SigningKey GenesisUTxOKey) → Text #

FromCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateExtendedKey) #

label ∷ Proxy (SigningKey GenesisDelegateExtendedKey) → Text #

FromCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateKey) #

label ∷ Proxy (SigningKey GenesisDelegateKey) → Text #

FromCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisExtendedKey) #

label ∷ Proxy (SigningKey GenesisExtendedKey) → Text #

FromCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisKey) #

label ∷ Proxy (SigningKey GenesisKey) → Text #

FromCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeExtendedKey) #

label ∷ Proxy (SigningKey StakeExtendedKey) → Text #

FromCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeKey) #

label ∷ Proxy (SigningKey StakeKey) → Text #

FromCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentExtendedKey) #

label ∷ Proxy (SigningKey PaymentExtendedKey) → Text #

FromCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentKey) #

label ∷ Proxy (SigningKey PaymentKey) → Text #

FromCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKeyLegacy) #

label ∷ Proxy (SigningKey ByronKeyLegacy) → Text #

FromCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKey) #

label ∷ Proxy (SigningKey ByronKey) → Text #

FromCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey VrfKey) #

label ∷ Proxy (SigningKey VrfKey) → Text #

FromCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey KesKey) #

label ∷ Proxy (SigningKey KesKey) → Text #

ToCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakePoolKey] → Size #

ToCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisUTxOKey] → Size #

ToCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateExtendedKey] → Size #

ToCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateKey] → Size #

ToCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisExtendedKey] → Size #

ToCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisKey] → Size #

ToCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeExtendedKey] → Size #

ToCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeKey] → Size #

ToCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentExtendedKey] → Size #

ToCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentKey] → Size #

ToCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKeyLegacy] → Size #

ToCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKey] → Size #

ToCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey VrfKey] → Size #

ToCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (SigningKey a) Source #

Methods

proxyToAsType ∷ Proxy (SigningKey a) → AsType (SigningKey a) Source #

SerialiseAsCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakePoolKey) → ByteString → Either DecoderError (SigningKey StakePoolKey) Source #

SerialiseAsCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Either DecoderError (SigningKey GenesisUTxOKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateKey) Source #

SerialiseAsCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisKey) → ByteString → Either DecoderError (SigningKey GenesisKey) Source #

SerialiseAsCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Either DecoderError (SigningKey StakeExtendedKey) Source #

SerialiseAsCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeKey) → ByteString → Either DecoderError (SigningKey StakeKey) Source #

SerialiseAsCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Either DecoderError (SigningKey PaymentExtendedKey) Source #

SerialiseAsCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentKey) → ByteString → Either DecoderError (SigningKey PaymentKey) Source #

SerialiseAsCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Either DecoderError (SigningKey ByronKeyLegacy) Source #

SerialiseAsCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKey) → ByteString → Either DecoderError (SigningKey ByronKey) Source #

SerialiseAsCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey VrfKey) → ByteString → Either DecoderError (SigningKey VrfKey) Source #

SerialiseAsCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey KesKey) → ByteString → Either DecoderError (SigningKey KesKey) Source #

SerialiseAsRawBytes (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakePoolKey) → ByteString → Maybe (SigningKey StakePoolKey) Source #

SerialiseAsRawBytes (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Maybe (SigningKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Maybe (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Maybe (SigningKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Maybe (SigningKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisKey) → ByteString → Maybe (SigningKey GenesisKey) Source #

SerialiseAsRawBytes (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Maybe (SigningKey StakeExtendedKey) Source #

SerialiseAsRawBytes (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeKey) → ByteString → Maybe (SigningKey StakeKey) Source #

SerialiseAsRawBytes (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Maybe (SigningKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey PaymentKey) → ByteString → Maybe (SigningKey PaymentKey) Source #

SerialiseAsRawBytes (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Maybe (SigningKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKey) → ByteString → Maybe (SigningKey ByronKey) Source #

SerialiseAsRawBytes (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey VrfKey) → ByteString → Maybe (SigningKey VrfKey) Source #

SerialiseAsRawBytes (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey KesKey) → ByteString → Maybe (SigningKey KesKey) Source #

HasTextEnvelope (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey VrfKey) → [Text] Source #

SerialiseAsBech32 (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey KesKey) → [Text] Source #

newtype SigningKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakePoolKey = StakePoolSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisUTxOKey = GenesisUTxOSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateExtendedKey = GenesisDelegateExtendedSigningKey XPrv
newtype SigningKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateKey = GenesisDelegateSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisExtendedKey = GenesisExtendedSigningKey XPrv
newtype SigningKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisKey = GenesisSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeExtendedKey = StakeExtendedSigningKey XPrv
newtype SigningKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeKey = StakeSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey PaymentExtendedKey = PaymentExtendedSigningKey XPrv
newtype SigningKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey PaymentKey = PaymentSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKeyLegacy = ByronSigningKeyLegacy SigningKey
newtype SigningKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKey = ByronSigningKey SigningKey
newtype SigningKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey VrfKey = VrfSigningKey (SignKeyVRF StandardCrypto)
newtype SigningKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey KesKey = KesSigningKey (SignKeyKES StandardCrypto)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family VerificationKey keyrole ∷ Type Source #

The type of cryptographic verification key, for each key role.

Instances

Instances details
Eq (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

(/=) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

Eq (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

(/=) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

Eq (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

Eq (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

Eq (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

Eq (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

(/=) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

Eq (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

(/=) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

Eq (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

(/=) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

Eq (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

(/=) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

Eq (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

(/=) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

Eq (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

(/=) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

Eq (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

(/=) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

Eq (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

(/=) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

Eq (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

(/=) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

Show (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakePoolKey → ShowS #

show ∷ VerificationKey StakePoolKey → String #

showList ∷ [VerificationKey StakePoolKey] → ShowS #

Show (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisUTxOKey → ShowS #

show ∷ VerificationKey GenesisUTxOKey → String #

showList ∷ [VerificationKey GenesisUTxOKey] → ShowS #

Show (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateExtendedKey → ShowS #

show ∷ VerificationKey GenesisDelegateExtendedKey → String #

showList ∷ [VerificationKey GenesisDelegateExtendedKey] → ShowS #

Show (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateKey → ShowS #

show ∷ VerificationKey GenesisDelegateKey → String #

showList ∷ [VerificationKey GenesisDelegateKey] → ShowS #

Show (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisExtendedKey → ShowS #

show ∷ VerificationKey GenesisExtendedKey → String #

showList ∷ [VerificationKey GenesisExtendedKey] → ShowS #

Show (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisKey → ShowS #

show ∷ VerificationKey GenesisKey → String #

showList ∷ [VerificationKey GenesisKey] → ShowS #

Show (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeExtendedKey → ShowS #

show ∷ VerificationKey StakeExtendedKey → String #

showList ∷ [VerificationKey StakeExtendedKey] → ShowS #

Show (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeKey → ShowS #

show ∷ VerificationKey StakeKey → String #

showList ∷ [VerificationKey StakeKey] → ShowS #

Show (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentExtendedKey → ShowS #

show ∷ VerificationKey PaymentExtendedKey → String #

showList ∷ [VerificationKey PaymentExtendedKey] → ShowS #

Show (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentKey → ShowS #

show ∷ VerificationKey PaymentKey → String #

showList ∷ [VerificationKey PaymentKey] → ShowS #

Show (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKeyLegacy → ShowS #

show ∷ VerificationKey ByronKeyLegacy → String #

showList ∷ [VerificationKey ByronKeyLegacy] → ShowS #

Show (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKey → ShowS #

show ∷ VerificationKey ByronKey → String #

showList ∷ [VerificationKey ByronKey] → ShowS #

Show (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey VrfKey → ShowS #

show ∷ VerificationKey VrfKey → String #

showList ∷ [VerificationKey VrfKey] → ShowS #

Show (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey KesKey → ShowS #

show ∷ VerificationKey KesKey → String #

showList ∷ [VerificationKey KesKey] → ShowS #

IsString (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakePoolKey #

IsString (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisUTxOKey #

IsString (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateExtendedKey #

IsString (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateKey #

IsString (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisExtendedKey #

IsString (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisKey #

IsString (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeExtendedKey #

IsString (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeKey #

IsString (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentExtendedKey #

IsString (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentKey #

IsString (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKeyLegacy #

IsString (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKey #

IsString (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey VrfKey #

IsString (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey KesKey #

FromCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakePoolKey) #

label ∷ Proxy (VerificationKey StakePoolKey) → Text #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateKey) #

label ∷ Proxy (VerificationKey GenesisDelegateKey) → Text #

FromCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisExtendedKey) #

label ∷ Proxy (VerificationKey GenesisExtendedKey) → Text #

FromCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisKey) #

label ∷ Proxy (VerificationKey GenesisKey) → Text #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeKey) #

label ∷ Proxy (VerificationKey StakeKey) → Text #

FromCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentExtendedKey) #

label ∷ Proxy (VerificationKey PaymentExtendedKey) → Text #

FromCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentKey) #

label ∷ Proxy (VerificationKey PaymentKey) → Text #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

ToCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakePoolKey] → Size #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateKey] → Size #

ToCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisExtendedKey] → Size #

ToCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisKey] → Size #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeKey] → Size #

ToCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentExtendedKey] → Size #

ToCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentKey] → Size #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (VerificationKey a) Source #

Methods

proxyToAsType ∷ Proxy (VerificationKey a) → AsType (VerificationKey a) Source #

SerialiseAsCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakePoolKey) → ByteString → Either DecoderError (VerificationKey StakePoolKey) Source #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateKey) Source #

SerialiseAsCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisKey) → ByteString → Either DecoderError (VerificationKey GenesisKey) Source #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeKey) → ByteString → Either DecoderError (VerificationKey StakeKey) Source #

SerialiseAsCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Either DecoderError (VerificationKey PaymentExtendedKey) Source #

SerialiseAsCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentKey) → ByteString → Either DecoderError (VerificationKey PaymentKey) Source #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsRawBytes (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakePoolKey) → ByteString → Maybe (VerificationKey StakePoolKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Maybe (VerificationKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Maybe (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Maybe (VerificationKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Maybe (VerificationKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisKey) → ByteString → Maybe (VerificationKey GenesisKey) Source #

SerialiseAsRawBytes (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Maybe (VerificationKey StakeExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeKey) → ByteString → Maybe (VerificationKey StakeKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Maybe (VerificationKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentKey) → ByteString → Maybe (VerificationKey PaymentKey) Source #

SerialiseAsRawBytes (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Maybe (VerificationKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKey) → ByteString → Maybe (VerificationKey ByronKey) Source #

SerialiseAsRawBytes (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey VrfKey) → ByteString → Maybe (VerificationKey VrfKey) Source #

SerialiseAsRawBytes (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey KesKey) → ByteString → Maybe (VerificationKey KesKey) Source #

HasTextEnvelope (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey VrfKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey KesKey) → [Text] Source #

newtype VerificationKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakePoolKey = StakePoolVerificationKey (VKey 'StakePool StandardCrypto)
newtype VerificationKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisUTxOKey = GenesisUTxOVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateExtendedKey = GenesisDelegateExtendedVerificationKey XPub
newtype VerificationKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateKey = GenesisDelegateVerificationKey (VKey 'GenesisDelegate StandardCrypto)
newtype VerificationKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisExtendedKey = GenesisExtendedVerificationKey XPub
newtype VerificationKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisKey = GenesisVerificationKey (VKey 'Genesis StandardCrypto)
newtype VerificationKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeExtendedKey = StakeExtendedVerificationKey XPub
newtype VerificationKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeKey = StakeVerificationKey (VKey 'Staking StandardCrypto)
newtype VerificationKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentExtendedKey = PaymentExtendedVerificationKey XPub
newtype VerificationKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentKey = PaymentVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKeyLegacy = ByronVerificationKeyLegacy VerificationKey
newtype VerificationKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKey = ByronVerificationKey VerificationKey
newtype VerificationKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey VrfKey = VrfVerificationKey (VerKeyVRF StandardCrypto)
newtype VerificationKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey KesKey = KesVerificationKey (VerKeyKES StandardCrypto)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)

data family SigningKey keyrole ∷ Type Source #

The type of cryptographic signing key, for each key role.

Instances

Instances details
Show (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakePoolKey → ShowS #

show ∷ SigningKey StakePoolKey → String #

showList ∷ [SigningKey StakePoolKey] → ShowS #

Show (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisUTxOKey → ShowS #

show ∷ SigningKey GenesisUTxOKey → String #

showList ∷ [SigningKey GenesisUTxOKey] → ShowS #

Show (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateExtendedKey → ShowS #

show ∷ SigningKey GenesisDelegateExtendedKey → String #

showList ∷ [SigningKey GenesisDelegateExtendedKey] → ShowS #

Show (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateKey → ShowS #

show ∷ SigningKey GenesisDelegateKey → String #

showList ∷ [SigningKey GenesisDelegateKey] → ShowS #

Show (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisExtendedKey → ShowS #

show ∷ SigningKey GenesisExtendedKey → String #

showList ∷ [SigningKey GenesisExtendedKey] → ShowS #

Show (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisKey → ShowS #

show ∷ SigningKey GenesisKey → String #

showList ∷ [SigningKey GenesisKey] → ShowS #

Show (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeExtendedKey → ShowS #

show ∷ SigningKey StakeExtendedKey → String #

showList ∷ [SigningKey StakeExtendedKey] → ShowS #

Show (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeKey → ShowS #

show ∷ SigningKey StakeKey → String #

showList ∷ [SigningKey StakeKey] → ShowS #

Show (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey PaymentExtendedKey → ShowS #

show ∷ SigningKey PaymentExtendedKey → String #

showList ∷ [SigningKey PaymentExtendedKey] → ShowS #

Show (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey PaymentKey → ShowS #

show ∷ SigningKey PaymentKey → String #

showList ∷ [SigningKey PaymentKey] → ShowS #

Show (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKeyLegacy → ShowS #

show ∷ SigningKey ByronKeyLegacy → String #

showList ∷ [SigningKey ByronKeyLegacy] → ShowS #

Show (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKey → ShowS #

show ∷ SigningKey ByronKey → String #

showList ∷ [SigningKey ByronKey] → ShowS #

Show (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey VrfKey → ShowS #

show ∷ SigningKey VrfKey → String #

showList ∷ [SigningKey VrfKey] → ShowS #

Show (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey KesKey → ShowS #

show ∷ SigningKey KesKey → String #

showList ∷ [SigningKey KesKey] → ShowS #

IsString (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakePoolKey #

IsString (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisUTxOKey #

IsString (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateExtendedKey #

IsString (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateKey #

IsString (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisExtendedKey #

IsString (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisKey #

IsString (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeExtendedKey #

IsString (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeKey #

IsString (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey PaymentExtendedKey #

IsString (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey PaymentKey #

IsString (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKeyLegacy #

IsString (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKey #

IsString (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey VrfKey #

IsString (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey KesKey #

FromCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakePoolKey) #

label ∷ Proxy (SigningKey StakePoolKey) → Text #

FromCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisUTxOKey) #

label ∷ Proxy (SigningKey GenesisUTxOKey) → Text #

FromCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateExtendedKey) #

label ∷ Proxy (SigningKey GenesisDelegateExtendedKey) → Text #

FromCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateKey) #

label ∷ Proxy (SigningKey GenesisDelegateKey) → Text #

FromCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisExtendedKey) #

label ∷ Proxy (SigningKey GenesisExtendedKey) → Text #

FromCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisKey) #

label ∷ Proxy (SigningKey GenesisKey) → Text #

FromCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeExtendedKey) #

label ∷ Proxy (SigningKey StakeExtendedKey) → Text #

FromCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeKey) #

label ∷ Proxy (SigningKey StakeKey) → Text #

FromCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentExtendedKey) #

label ∷ Proxy (SigningKey PaymentExtendedKey) → Text #

FromCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentKey) #

label ∷ Proxy (SigningKey PaymentKey) → Text #

FromCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKeyLegacy) #

label ∷ Proxy (SigningKey ByronKeyLegacy) → Text #

FromCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKey) #

label ∷ Proxy (SigningKey ByronKey) → Text #

FromCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey VrfKey) #

label ∷ Proxy (SigningKey VrfKey) → Text #

FromCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey KesKey) #

label ∷ Proxy (SigningKey KesKey) → Text #

ToCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakePoolKey] → Size #

ToCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisUTxOKey] → Size #

ToCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateExtendedKey] → Size #

ToCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateKey] → Size #

ToCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisExtendedKey] → Size #

ToCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisKey] → Size #

ToCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeExtendedKey] → Size #

ToCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeKey] → Size #

ToCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentExtendedKey] → Size #

ToCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentKey] → Size #

ToCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKeyLegacy] → Size #

ToCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKey] → Size #

ToCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey VrfKey] → Size #

ToCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (SigningKey a) Source #

Methods

proxyToAsType ∷ Proxy (SigningKey a) → AsType (SigningKey a) Source #

SerialiseAsCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakePoolKey) → ByteString → Either DecoderError (SigningKey StakePoolKey) Source #

SerialiseAsCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Either DecoderError (SigningKey GenesisUTxOKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateKey) Source #

SerialiseAsCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisKey) → ByteString → Either DecoderError (SigningKey GenesisKey) Source #

SerialiseAsCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Either DecoderError (SigningKey StakeExtendedKey) Source #

SerialiseAsCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeKey) → ByteString → Either DecoderError (SigningKey StakeKey) Source #

SerialiseAsCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Either DecoderError (SigningKey PaymentExtendedKey) Source #

SerialiseAsCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentKey) → ByteString → Either DecoderError (SigningKey PaymentKey) Source #

SerialiseAsCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Either DecoderError (SigningKey ByronKeyLegacy) Source #

SerialiseAsCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKey) → ByteString → Either DecoderError (SigningKey ByronKey) Source #

SerialiseAsCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey VrfKey) → ByteString → Either DecoderError (SigningKey VrfKey) Source #

SerialiseAsCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey KesKey) → ByteString → Either DecoderError (SigningKey KesKey) Source #

SerialiseAsRawBytes (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakePoolKey) → ByteString → Maybe (SigningKey StakePoolKey) Source #

SerialiseAsRawBytes (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Maybe (SigningKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Maybe (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Maybe (SigningKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Maybe (SigningKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisKey) → ByteString → Maybe (SigningKey GenesisKey) Source #

SerialiseAsRawBytes (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Maybe (SigningKey StakeExtendedKey) Source #

SerialiseAsRawBytes (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeKey) → ByteString → Maybe (SigningKey StakeKey) Source #

SerialiseAsRawBytes (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Maybe (SigningKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey PaymentKey) → ByteString → Maybe (SigningKey PaymentKey) Source #

SerialiseAsRawBytes (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Maybe (SigningKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKey) → ByteString → Maybe (SigningKey ByronKey) Source #

SerialiseAsRawBytes (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey VrfKey) → ByteString → Maybe (SigningKey VrfKey) Source #

SerialiseAsRawBytes (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey KesKey) → ByteString → Maybe (SigningKey KesKey) Source #

HasTextEnvelope (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey VrfKey) → [Text] Source #

SerialiseAsBech32 (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey KesKey) → [Text] Source #

newtype SigningKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakePoolKey = StakePoolSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisUTxOKey = GenesisUTxOSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateExtendedKey = GenesisDelegateExtendedSigningKey XPrv
newtype SigningKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateKey = GenesisDelegateSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisExtendedKey = GenesisExtendedSigningKey XPrv
newtype SigningKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisKey = GenesisSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeExtendedKey = StakeExtendedSigningKey XPrv
newtype SigningKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeKey = StakeSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey PaymentExtendedKey = PaymentExtendedSigningKey XPrv
newtype SigningKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey PaymentKey = PaymentSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKeyLegacy = ByronSigningKeyLegacy SigningKey
newtype SigningKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKey = ByronSigningKey SigningKey
newtype SigningKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey VrfKey = VrfSigningKey (SignKeyVRF StandardCrypto)
newtype SigningKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey KesKey = KesSigningKey (SignKeyKES StandardCrypto)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. The different eras do use different types, but it's all the same underlying representation.

Instance details

Defined in Cardano.Api.Block

newtype Hash BlockHeader = HeaderHash ShortByteString
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)

Legacy format

class IsByronKey key where Source #

Methods

byronKeyFormat ∷ ByronKeyFormat key Source #

Instances

Instances details
IsByronKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

byronKeyFormat ∷ ByronKeyFormat ByronKeyLegacy Source #

IsByronKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

byronKeyFormat ∷ ByronKeyFormat ByronKey Source #

data ByronKeyFormat key where Source #

Constructors

ByronLegacyKeyFormat ∷ ByronKeyFormat ByronKeyLegacy 
ByronModernKeyFormat ∷ ByronKeyFormat ByronKey 

data SomeByronSigningKey Source #

Constructors

AByronSigningKeyLegacy (SigningKey ByronKeyLegacy) 
AByronSigningKey (SigningKey ByronKey) 

toByronSigningKey ∷ SomeByronSigningKey → SigningKey Source #

\ No newline at end of file diff --git a/cardano-api/Cardano-Api-KeysPraos.html b/cardano-api/Cardano-Api-KeysPraos.html index caf656c7aaa..fdde6deffe4 100644 --- a/cardano-api/Cardano-Api-KeysPraos.html +++ b/cardano-api/Cardano-Api-KeysPraos.html @@ -1,4 +1,4 @@ Cardano.Api.KeysPraos
cardano-api-1.27.0
Safe HaskellNone
LanguageHaskell2010

Cardano.Api.KeysPraos

Description

Praos consensus key types and their Key class instances

Synopsis

Key types

data KesKey Source #

Instances

Instances details
HasTypeProxy KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data AsType KesKey Source #

Methods

proxyToAsType ∷ Proxy KesKey → AsType KesKey Source #

Key KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data VerificationKey KesKey Source #

data SigningKey KesKey Source #

Methods

getVerificationKey ∷ SigningKey KesKey → VerificationKey KesKey Source #

deterministicSigningKey ∷ AsType KesKey → Seed → SigningKey KesKey Source #

deterministicSigningKeySeedSize ∷ AsType KesKey → Word Source #

verificationKeyHash ∷ VerificationKey KesKey → Hash KesKey Source #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

(/=) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey KesKey → ShowS #

show ∷ VerificationKey KesKey → String #

showList ∷ [VerificationKey KesKey] → ShowS #

Show (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey KesKey → ShowS #

show ∷ SigningKey KesKey → String #

showList ∷ [SigningKey KesKey] → ShowS #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

IsString (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey KesKey #

IsString (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey KesKey #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

FromCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey KesKey) #

label ∷ Proxy (SigningKey KesKey) → Text #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

ToCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey KesKey] → Size #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey KesKey) → ByteString → Either DecoderError (SigningKey KesKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey KesKey) → ByteString → Maybe (VerificationKey KesKey) Source #

SerialiseAsRawBytes (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey KesKey) → ByteString → Maybe (SigningKey KesKey) Source #

HasTextEnvelope (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey KesKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey KesKey) → [Text] Source #

SerialiseAsBech32 (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey KesKey) → [Text] Source #

data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype VerificationKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey KesKey = KesVerificationKey (VerKeyKES StandardCrypto)
newtype SigningKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey KesKey = KesSigningKey (SignKeyKES StandardCrypto)

data VrfKey Source #

Instances

Instances details
HasTypeProxy VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data AsType VrfKey Source #

Methods

proxyToAsType ∷ Proxy VrfKey → AsType VrfKey Source #

Key VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data VerificationKey VrfKey Source #

data SigningKey VrfKey Source #

Methods

getVerificationKey ∷ SigningKey VrfKey → VerificationKey VrfKey Source #

deterministicSigningKey ∷ AsType VrfKey → Seed → SigningKey VrfKey Source #

deterministicSigningKeySeedSize ∷ AsType VrfKey → Word Source #

verificationKeyHash ∷ VerificationKey VrfKey → Hash VrfKey Source #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

(/=) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey VrfKey → ShowS #

show ∷ VerificationKey VrfKey → String #

showList ∷ [VerificationKey VrfKey] → ShowS #

Show (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey VrfKey → ShowS #

show ∷ SigningKey VrfKey → String #

showList ∷ [SigningKey VrfKey] → ShowS #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey VrfKey #

IsString (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey VrfKey #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey VrfKey) #

label ∷ Proxy (SigningKey VrfKey) → Text #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey VrfKey] → Size #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey VrfKey) → ByteString → Either DecoderError (SigningKey VrfKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey VrfKey) → ByteString → Maybe (VerificationKey VrfKey) Source #

SerialiseAsRawBytes (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey VrfKey) → ByteString → Maybe (SigningKey VrfKey) Source #

HasTextEnvelope (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey VrfKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey VrfKey) → [Text] Source #

SerialiseAsBech32 (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey VrfKey) → [Text] Source #

data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype VerificationKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey VrfKey = VrfVerificationKey (VerKeyVRF StandardCrypto)
newtype SigningKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey VrfKey = VrfSigningKey (SignKeyVRF StandardCrypto)

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. The different eras do use different types, but it's all the same underlying representation.

Instance details

Defined in Cardano.Api.Block

newtype Hash BlockHeader = HeaderHash ShortByteString
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)

data family VerificationKey keyrole ∷ Type Source #

The type of cryptographic verification key, for each key role.

Instances

Instances details
Eq (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

(/=) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

Eq (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

(/=) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

Eq (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

Eq (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

Eq (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

Eq (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

(/=) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

Eq (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

(/=) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

Eq (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

(/=) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

Eq (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

(/=) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

Eq (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

(/=) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

Eq (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

(/=) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

Eq (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

(/=) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

Eq (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

(/=) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

Eq (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

(/=) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

Show (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakePoolKey → ShowS #

show ∷ VerificationKey StakePoolKey → String #

showList ∷ [VerificationKey StakePoolKey] → ShowS #

Show (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisUTxOKey → ShowS #

show ∷ VerificationKey GenesisUTxOKey → String #

showList ∷ [VerificationKey GenesisUTxOKey] → ShowS #

Show (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateExtendedKey → ShowS #

show ∷ VerificationKey GenesisDelegateExtendedKey → String #

showList ∷ [VerificationKey GenesisDelegateExtendedKey] → ShowS #

Show (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateKey → ShowS #

show ∷ VerificationKey GenesisDelegateKey → String #

showList ∷ [VerificationKey GenesisDelegateKey] → ShowS #

Show (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisExtendedKey → ShowS #

show ∷ VerificationKey GenesisExtendedKey → String #

showList ∷ [VerificationKey GenesisExtendedKey] → ShowS #

Show (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisKey → ShowS #

show ∷ VerificationKey GenesisKey → String #

showList ∷ [VerificationKey GenesisKey] → ShowS #

Show (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeExtendedKey → ShowS #

show ∷ VerificationKey StakeExtendedKey → String #

showList ∷ [VerificationKey StakeExtendedKey] → ShowS #

Show (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeKey → ShowS #

show ∷ VerificationKey StakeKey → String #

showList ∷ [VerificationKey StakeKey] → ShowS #

Show (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentExtendedKey → ShowS #

show ∷ VerificationKey PaymentExtendedKey → String #

showList ∷ [VerificationKey PaymentExtendedKey] → ShowS #

Show (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentKey → ShowS #

show ∷ VerificationKey PaymentKey → String #

showList ∷ [VerificationKey PaymentKey] → ShowS #

Show (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKeyLegacy → ShowS #

show ∷ VerificationKey ByronKeyLegacy → String #

showList ∷ [VerificationKey ByronKeyLegacy] → ShowS #

Show (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKey → ShowS #

show ∷ VerificationKey ByronKey → String #

showList ∷ [VerificationKey ByronKey] → ShowS #

Show (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey VrfKey → ShowS #

show ∷ VerificationKey VrfKey → String #

showList ∷ [VerificationKey VrfKey] → ShowS #

Show (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey KesKey → ShowS #

show ∷ VerificationKey KesKey → String #

showList ∷ [VerificationKey KesKey] → ShowS #

IsString (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakePoolKey #

IsString (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisUTxOKey #

IsString (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateExtendedKey #

IsString (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateKey #

IsString (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisExtendedKey #

IsString (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisKey #

IsString (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeExtendedKey #

IsString (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeKey #

IsString (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentExtendedKey #

IsString (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentKey #

IsString (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKeyLegacy #

IsString (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKey #

IsString (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey VrfKey #

IsString (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey KesKey #

FromCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakePoolKey) #

label ∷ Proxy (VerificationKey StakePoolKey) → Text #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateKey) #

label ∷ Proxy (VerificationKey GenesisDelegateKey) → Text #

FromCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisExtendedKey) #

label ∷ Proxy (VerificationKey GenesisExtendedKey) → Text #

FromCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisKey) #

label ∷ Proxy (VerificationKey GenesisKey) → Text #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeKey) #

label ∷ Proxy (VerificationKey StakeKey) → Text #

FromCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentExtendedKey) #

label ∷ Proxy (VerificationKey PaymentExtendedKey) → Text #

FromCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentKey) #

label ∷ Proxy (VerificationKey PaymentKey) → Text #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

ToCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakePoolKey] → Size #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateKey] → Size #

ToCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisExtendedKey] → Size #

ToCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisKey] → Size #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeKey] → Size #

ToCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentExtendedKey] → Size #

ToCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentKey] → Size #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (VerificationKey a) Source #

Methods

proxyToAsType ∷ Proxy (VerificationKey a) → AsType (VerificationKey a) Source #

SerialiseAsCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakePoolKey) → ByteString → Either DecoderError (VerificationKey StakePoolKey) Source #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateKey) Source #

SerialiseAsCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisKey) → ByteString → Either DecoderError (VerificationKey GenesisKey) Source #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeKey) → ByteString → Either DecoderError (VerificationKey StakeKey) Source #

SerialiseAsCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Either DecoderError (VerificationKey PaymentExtendedKey) Source #

SerialiseAsCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentKey) → ByteString → Either DecoderError (VerificationKey PaymentKey) Source #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsRawBytes (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakePoolKey) → ByteString → Maybe (VerificationKey StakePoolKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Maybe (VerificationKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Maybe (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Maybe (VerificationKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Maybe (VerificationKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisKey) → ByteString → Maybe (VerificationKey GenesisKey) Source #

SerialiseAsRawBytes (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Maybe (VerificationKey StakeExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeKey) → ByteString → Maybe (VerificationKey StakeKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Maybe (VerificationKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentKey) → ByteString → Maybe (VerificationKey PaymentKey) Source #

SerialiseAsRawBytes (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Maybe (VerificationKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKey) → ByteString → Maybe (VerificationKey ByronKey) Source #

SerialiseAsRawBytes (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey VrfKey) → ByteString → Maybe (VerificationKey VrfKey) Source #

SerialiseAsRawBytes (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey KesKey) → ByteString → Maybe (VerificationKey KesKey) Source #

HasTextEnvelope (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey VrfKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey KesKey) → [Text] Source #

newtype VerificationKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakePoolKey = StakePoolVerificationKey (VKey 'StakePool StandardCrypto)
newtype VerificationKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisUTxOKey = GenesisUTxOVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateExtendedKey = GenesisDelegateExtendedVerificationKey XPub
newtype VerificationKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateKey = GenesisDelegateVerificationKey (VKey 'GenesisDelegate StandardCrypto)
newtype VerificationKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisExtendedKey = GenesisExtendedVerificationKey XPub
newtype VerificationKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisKey = GenesisVerificationKey (VKey 'Genesis StandardCrypto)
newtype VerificationKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeExtendedKey = StakeExtendedVerificationKey XPub
newtype VerificationKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeKey = StakeVerificationKey (VKey 'Staking StandardCrypto)
newtype VerificationKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentExtendedKey = PaymentExtendedVerificationKey XPub
newtype VerificationKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentKey = PaymentVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKeyLegacy = ByronVerificationKeyLegacy VerificationKey
newtype VerificationKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKey = ByronVerificationKey VerificationKey
newtype VerificationKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey VrfKey = VrfVerificationKey (VerKeyVRF StandardCrypto)
newtype VerificationKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey KesKey = KesVerificationKey (VerKeyKES StandardCrypto)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)

data family SigningKey keyrole ∷ Type Source #

The type of cryptographic signing key, for each key role.

Instances

Instances details
Show (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakePoolKey → ShowS #

show ∷ SigningKey StakePoolKey → String #

showList ∷ [SigningKey StakePoolKey] → ShowS #

Show (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisUTxOKey → ShowS #

show ∷ SigningKey GenesisUTxOKey → String #

showList ∷ [SigningKey GenesisUTxOKey] → ShowS #

Show (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateExtendedKey → ShowS #

show ∷ SigningKey GenesisDelegateExtendedKey → String #

showList ∷ [SigningKey GenesisDelegateExtendedKey] → ShowS #

Show (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateKey → ShowS #

show ∷ SigningKey GenesisDelegateKey → String #

showList ∷ [SigningKey GenesisDelegateKey] → ShowS #

Show (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisExtendedKey → ShowS #

show ∷ SigningKey GenesisExtendedKey → String #

showList ∷ [SigningKey GenesisExtendedKey] → ShowS #

Show (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisKey → ShowS #

show ∷ SigningKey GenesisKey → String #

showList ∷ [SigningKey GenesisKey] → ShowS #

Show (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeExtendedKey → ShowS #

show ∷ SigningKey StakeExtendedKey → String #

showList ∷ [SigningKey StakeExtendedKey] → ShowS #

Show (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeKey → ShowS #

show ∷ SigningKey StakeKey → String #

showList ∷ [SigningKey StakeKey] → ShowS #

Show (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey PaymentExtendedKey → ShowS #

show ∷ SigningKey PaymentExtendedKey → String #

showList ∷ [SigningKey PaymentExtendedKey] → ShowS #

Show (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey PaymentKey → ShowS #

show ∷ SigningKey PaymentKey → String #

showList ∷ [SigningKey PaymentKey] → ShowS #

Show (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKeyLegacy → ShowS #

show ∷ SigningKey ByronKeyLegacy → String #

showList ∷ [SigningKey ByronKeyLegacy] → ShowS #

Show (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKey → ShowS #

show ∷ SigningKey ByronKey → String #

showList ∷ [SigningKey ByronKey] → ShowS #

Show (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey VrfKey → ShowS #

show ∷ SigningKey VrfKey → String #

showList ∷ [SigningKey VrfKey] → ShowS #

Show (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey KesKey → ShowS #

show ∷ SigningKey KesKey → String #

showList ∷ [SigningKey KesKey] → ShowS #

IsString (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakePoolKey #

IsString (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisUTxOKey #

IsString (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateExtendedKey #

IsString (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateKey #

IsString (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisExtendedKey #

IsString (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisKey #

IsString (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeExtendedKey #

IsString (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeKey #

IsString (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey PaymentExtendedKey #

IsString (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey PaymentKey #

IsString (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKeyLegacy #

IsString (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKey #

IsString (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey VrfKey #

IsString (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey KesKey #

FromCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakePoolKey) #

label ∷ Proxy (SigningKey StakePoolKey) → Text #

FromCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisUTxOKey) #

label ∷ Proxy (SigningKey GenesisUTxOKey) → Text #

FromCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateExtendedKey) #

label ∷ Proxy (SigningKey GenesisDelegateExtendedKey) → Text #

FromCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateKey) #

label ∷ Proxy (SigningKey GenesisDelegateKey) → Text #

FromCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisExtendedKey) #

label ∷ Proxy (SigningKey GenesisExtendedKey) → Text #

FromCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisKey) #

label ∷ Proxy (SigningKey GenesisKey) → Text #

FromCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeExtendedKey) #

label ∷ Proxy (SigningKey StakeExtendedKey) → Text #

FromCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeKey) #

label ∷ Proxy (SigningKey StakeKey) → Text #

FromCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentExtendedKey) #

label ∷ Proxy (SigningKey PaymentExtendedKey) → Text #

FromCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentKey) #

label ∷ Proxy (SigningKey PaymentKey) → Text #

FromCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKeyLegacy) #

label ∷ Proxy (SigningKey ByronKeyLegacy) → Text #

FromCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKey) #

label ∷ Proxy (SigningKey ByronKey) → Text #

FromCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey VrfKey) #

label ∷ Proxy (SigningKey VrfKey) → Text #

FromCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey KesKey) #

label ∷ Proxy (SigningKey KesKey) → Text #

ToCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakePoolKey] → Size #

ToCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisUTxOKey] → Size #

ToCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateExtendedKey] → Size #

ToCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateKey] → Size #

ToCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisExtendedKey] → Size #

ToCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisKey] → Size #

ToCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeExtendedKey] → Size #

ToCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeKey] → Size #

ToCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentExtendedKey] → Size #

ToCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentKey] → Size #

ToCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKeyLegacy] → Size #

ToCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKey] → Size #

ToCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey VrfKey] → Size #

ToCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (SigningKey a) Source #

Methods

proxyToAsType ∷ Proxy (SigningKey a) → AsType (SigningKey a) Source #

SerialiseAsCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakePoolKey) → ByteString → Either DecoderError (SigningKey StakePoolKey) Source #

SerialiseAsCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Either DecoderError (SigningKey GenesisUTxOKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateKey) Source #

SerialiseAsCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisKey) → ByteString → Either DecoderError (SigningKey GenesisKey) Source #

SerialiseAsCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Either DecoderError (SigningKey StakeExtendedKey) Source #

SerialiseAsCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeKey) → ByteString → Either DecoderError (SigningKey StakeKey) Source #

SerialiseAsCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Either DecoderError (SigningKey PaymentExtendedKey) Source #

SerialiseAsCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentKey) → ByteString → Either DecoderError (SigningKey PaymentKey) Source #

SerialiseAsCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Either DecoderError (SigningKey ByronKeyLegacy) Source #

SerialiseAsCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKey) → ByteString → Either DecoderError (SigningKey ByronKey) Source #

SerialiseAsCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey VrfKey) → ByteString → Either DecoderError (SigningKey VrfKey) Source #

SerialiseAsCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey KesKey) → ByteString → Either DecoderError (SigningKey KesKey) Source #

SerialiseAsRawBytes (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakePoolKey) → ByteString → Maybe (SigningKey StakePoolKey) Source #

SerialiseAsRawBytes (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Maybe (SigningKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Maybe (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Maybe (SigningKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Maybe (SigningKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisKey) → ByteString → Maybe (SigningKey GenesisKey) Source #

SerialiseAsRawBytes (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Maybe (SigningKey StakeExtendedKey) Source #

SerialiseAsRawBytes (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeKey) → ByteString → Maybe (SigningKey StakeKey) Source #

SerialiseAsRawBytes (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Maybe (SigningKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey PaymentKey) → ByteString → Maybe (SigningKey PaymentKey) Source #

SerialiseAsRawBytes (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Maybe (SigningKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKey) → ByteString → Maybe (SigningKey ByronKey) Source #

SerialiseAsRawBytes (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey VrfKey) → ByteString → Maybe (SigningKey VrfKey) Source #

SerialiseAsRawBytes (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey KesKey) → ByteString → Maybe (SigningKey KesKey) Source #

HasTextEnvelope (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey VrfKey) → [Text] Source #

SerialiseAsBech32 (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey KesKey) → [Text] Source #

newtype SigningKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakePoolKey = StakePoolSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisUTxOKey = GenesisUTxOSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateExtendedKey = GenesisDelegateExtendedSigningKey XPrv
newtype SigningKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateKey = GenesisDelegateSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisExtendedKey = GenesisExtendedSigningKey XPrv
newtype SigningKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisKey = GenesisSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeExtendedKey = StakeExtendedSigningKey XPrv
newtype SigningKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeKey = StakeSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey PaymentExtendedKey = PaymentExtendedSigningKey XPrv
newtype SigningKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey PaymentKey = PaymentSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKeyLegacy = ByronSigningKeyLegacy SigningKey
newtype SigningKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKey = ByronSigningKey SigningKey
newtype SigningKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey VrfKey = VrfSigningKey (SignKeyVRF StandardCrypto)
newtype SigningKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey KesKey = KesSigningKey (SignKeyKES StandardCrypto)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-KeysShelley.html b/cardano-api/Cardano-Api-KeysShelley.html index 158715e3770..2eb74cc548c 100644 --- a/cardano-api/Cardano-Api-KeysShelley.html +++ b/cardano-api/Cardano-Api-KeysShelley.html @@ -22,6 +22,6 @@ case for the signing keys. The signing keys can be used to witness transactions directly, with verification via their non-extended verification key (VerificationKey GenesisKey).

This is a type level tag, used with other interfaces like Key.

Instances

Instances details
HasTypeProxy GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisDelegateExtendedKey Source #

Methods

proxyToAsType ∷ Proxy GenesisDelegateExtendedKey → AsType GenesisDelegateExtendedKey Source #

Key GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisDelegateExtendedKey Source #

data SigningKey GenesisDelegateExtendedKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey Source #

deterministicSigningKey ∷ AsType GenesisDelegateExtendedKey → Seed → SigningKey GenesisDelegateExtendedKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisDelegateExtendedKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey Source #

CastVerificationKeyRole GenesisDelegateExtendedKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castVerificationKey ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateKey Source #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateExtendedKey → ShowS #

show ∷ VerificationKey GenesisDelegateExtendedKey → String #

showList ∷ [VerificationKey GenesisDelegateExtendedKey] → ShowS #

Show (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateExtendedKey → ShowS #

show ∷ SigningKey GenesisDelegateExtendedKey → String #

showList ∷ [SigningKey GenesisDelegateExtendedKey] → ShowS #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateExtendedKey #

IsString (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateExtendedKey #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateExtendedKey) #

label ∷ Proxy (SigningKey GenesisDelegateExtendedKey) → Text #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateExtendedKey] → Size #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Maybe (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Maybe (SigningKey GenesisDelegateExtendedKey) Source #

HasTextEnvelope (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype VerificationKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateExtendedKey = GenesisDelegateExtendedVerificationKey XPub
newtype SigningKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateExtendedKey = GenesisDelegateExtendedSigningKey XPrv

data GenesisUTxOKey Source #

Instances

Instances details
HasTypeProxy GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisUTxOKey Source #

Methods

proxyToAsType ∷ Proxy GenesisUTxOKey → AsType GenesisUTxOKey Source #

Key GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisUTxOKey Source #

data SigningKey GenesisUTxOKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisUTxOKey → VerificationKey GenesisUTxOKey Source #

deterministicSigningKey ∷ AsType GenesisUTxOKey → Seed → SigningKey GenesisUTxOKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisUTxOKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisUTxOKey → Hash GenesisUTxOKey Source #

CastSigningKeyRole GenesisUTxOKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castSigningKey ∷ SigningKey GenesisUTxOKey → SigningKey PaymentKey Source #

CastVerificationKeyRole GenesisUTxOKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

castVerificationKey ∷ VerificationKey GenesisUTxOKey → VerificationKey PaymentKey Source #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

(/=) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisUTxOKey → ShowS #

show ∷ VerificationKey GenesisUTxOKey → String #

showList ∷ [VerificationKey GenesisUTxOKey] → ShowS #

Show (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisUTxOKey → ShowS #

show ∷ SigningKey GenesisUTxOKey → String #

showList ∷ [SigningKey GenesisUTxOKey] → ShowS #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisUTxOKey #

IsString (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisUTxOKey #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisUTxOKey) #

label ∷ Proxy (SigningKey GenesisUTxOKey) → Text #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisUTxOKey] → Size #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Either DecoderError (SigningKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Maybe (VerificationKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Maybe (SigningKey GenesisUTxOKey) Source #

HasTextEnvelope (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisUTxOKey → TextEnvelopeDescr Source #

data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype VerificationKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisUTxOKey = GenesisUTxOVerificationKey (VKey 'Payment StandardCrypto)
newtype SigningKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisUTxOKey = GenesisUTxOSigningKey (SignKeyDSIGN StandardCrypto)

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family VerificationKey keyrole ∷ Type Source #

The type of cryptographic verification key, for each key role.

Instances

Instances details
Eq (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

(/=) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

Eq (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

(/=) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

Eq (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

Eq (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

Eq (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

Eq (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

(/=) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

Eq (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

(/=) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

Eq (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

(/=) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

Eq (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

(/=) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

Eq (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

(/=) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

Eq (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

(/=) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

Eq (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

(/=) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

Eq (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

(/=) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

Eq (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

(/=) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

Show (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakePoolKey → ShowS #

show ∷ VerificationKey StakePoolKey → String #

showList ∷ [VerificationKey StakePoolKey] → ShowS #

Show (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisUTxOKey → ShowS #

show ∷ VerificationKey GenesisUTxOKey → String #

showList ∷ [VerificationKey GenesisUTxOKey] → ShowS #

Show (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateExtendedKey → ShowS #

show ∷ VerificationKey GenesisDelegateExtendedKey → String #

showList ∷ [VerificationKey GenesisDelegateExtendedKey] → ShowS #

Show (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateKey → ShowS #

show ∷ VerificationKey GenesisDelegateKey → String #

showList ∷ [VerificationKey GenesisDelegateKey] → ShowS #

Show (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisExtendedKey → ShowS #

show ∷ VerificationKey GenesisExtendedKey → String #

showList ∷ [VerificationKey GenesisExtendedKey] → ShowS #

Show (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisKey → ShowS #

show ∷ VerificationKey GenesisKey → String #

showList ∷ [VerificationKey GenesisKey] → ShowS #

Show (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeExtendedKey → ShowS #

show ∷ VerificationKey StakeExtendedKey → String #

showList ∷ [VerificationKey StakeExtendedKey] → ShowS #

Show (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeKey → ShowS #

show ∷ VerificationKey StakeKey → String #

showList ∷ [VerificationKey StakeKey] → ShowS #

Show (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentExtendedKey → ShowS #

show ∷ VerificationKey PaymentExtendedKey → String #

showList ∷ [VerificationKey PaymentExtendedKey] → ShowS #

Show (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentKey → ShowS #

show ∷ VerificationKey PaymentKey → String #

showList ∷ [VerificationKey PaymentKey] → ShowS #

Show (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKeyLegacy → ShowS #

show ∷ VerificationKey ByronKeyLegacy → String #

showList ∷ [VerificationKey ByronKeyLegacy] → ShowS #

Show (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKey → ShowS #

show ∷ VerificationKey ByronKey → String #

showList ∷ [VerificationKey ByronKey] → ShowS #

Show (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey VrfKey → ShowS #

show ∷ VerificationKey VrfKey → String #

showList ∷ [VerificationKey VrfKey] → ShowS #

Show (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey KesKey → ShowS #

show ∷ VerificationKey KesKey → String #

showList ∷ [VerificationKey KesKey] → ShowS #

IsString (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakePoolKey #

IsString (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisUTxOKey #

IsString (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateExtendedKey #

IsString (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateKey #

IsString (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisExtendedKey #

IsString (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisKey #

IsString (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeExtendedKey #

IsString (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeKey #

IsString (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentExtendedKey #

IsString (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentKey #

IsString (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKeyLegacy #

IsString (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKey #

IsString (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey VrfKey #

IsString (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey KesKey #

FromCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakePoolKey) #

label ∷ Proxy (VerificationKey StakePoolKey) → Text #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateKey) #

label ∷ Proxy (VerificationKey GenesisDelegateKey) → Text #

FromCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisExtendedKey) #

label ∷ Proxy (VerificationKey GenesisExtendedKey) → Text #

FromCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisKey) #

label ∷ Proxy (VerificationKey GenesisKey) → Text #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeKey) #

label ∷ Proxy (VerificationKey StakeKey) → Text #

FromCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentExtendedKey) #

label ∷ Proxy (VerificationKey PaymentExtendedKey) → Text #

FromCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentKey) #

label ∷ Proxy (VerificationKey PaymentKey) → Text #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

ToCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakePoolKey] → Size #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateKey] → Size #

ToCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisExtendedKey] → Size #

ToCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisKey] → Size #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeKey] → Size #

ToCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentExtendedKey] → Size #

ToCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentKey] → Size #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (VerificationKey a) Source #

Methods

proxyToAsType ∷ Proxy (VerificationKey a) → AsType (VerificationKey a) Source #

SerialiseAsCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakePoolKey) → ByteString → Either DecoderError (VerificationKey StakePoolKey) Source #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateKey) Source #

SerialiseAsCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisKey) → ByteString → Either DecoderError (VerificationKey GenesisKey) Source #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeKey) → ByteString → Either DecoderError (VerificationKey StakeKey) Source #

SerialiseAsCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Either DecoderError (VerificationKey PaymentExtendedKey) Source #

SerialiseAsCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentKey) → ByteString → Either DecoderError (VerificationKey PaymentKey) Source #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsRawBytes (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakePoolKey) → ByteString → Maybe (VerificationKey StakePoolKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Maybe (VerificationKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Maybe (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Maybe (VerificationKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Maybe (VerificationKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisKey) → ByteString → Maybe (VerificationKey GenesisKey) Source #

SerialiseAsRawBytes (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Maybe (VerificationKey StakeExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeKey) → ByteString → Maybe (VerificationKey StakeKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Maybe (VerificationKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentKey) → ByteString → Maybe (VerificationKey PaymentKey) Source #

SerialiseAsRawBytes (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Maybe (VerificationKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKey) → ByteString → Maybe (VerificationKey ByronKey) Source #

SerialiseAsRawBytes (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey VrfKey) → ByteString → Maybe (VerificationKey VrfKey) Source #

SerialiseAsRawBytes (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey KesKey) → ByteString → Maybe (VerificationKey KesKey) Source #

HasTextEnvelope (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey VrfKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey KesKey) → [Text] Source #

newtype VerificationKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakePoolKey = StakePoolVerificationKey (VKey 'StakePool StandardCrypto)
newtype VerificationKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisUTxOKey = GenesisUTxOVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateExtendedKey = GenesisDelegateExtendedVerificationKey XPub
newtype VerificationKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateKey = GenesisDelegateVerificationKey (VKey 'GenesisDelegate StandardCrypto)
newtype VerificationKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisExtendedKey = GenesisExtendedVerificationKey XPub
newtype VerificationKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisKey = GenesisVerificationKey (VKey 'Genesis StandardCrypto)
newtype VerificationKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeExtendedKey = StakeExtendedVerificationKey XPub
newtype VerificationKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeKey = StakeVerificationKey (VKey 'Staking StandardCrypto)
newtype VerificationKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentExtendedKey = PaymentExtendedVerificationKey XPub
newtype VerificationKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentKey = PaymentVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKeyLegacy = ByronVerificationKeyLegacy VerificationKey
newtype VerificationKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKey = ByronVerificationKey VerificationKey
newtype VerificationKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey VrfKey = VrfVerificationKey (VerKeyVRF StandardCrypto)
newtype VerificationKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey KesKey = KesVerificationKey (VerKeyKES StandardCrypto)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)

data family SigningKey keyrole ∷ Type Source #

The type of cryptographic signing key, for each key role.

Instances

Instances details
Show (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakePoolKey → ShowS #

show ∷ SigningKey StakePoolKey → String #

showList ∷ [SigningKey StakePoolKey] → ShowS #

Show (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisUTxOKey → ShowS #

show ∷ SigningKey GenesisUTxOKey → String #

showList ∷ [SigningKey GenesisUTxOKey] → ShowS #

Show (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateExtendedKey → ShowS #

show ∷ SigningKey GenesisDelegateExtendedKey → String #

showList ∷ [SigningKey GenesisDelegateExtendedKey] → ShowS #

Show (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateKey → ShowS #

show ∷ SigningKey GenesisDelegateKey → String #

showList ∷ [SigningKey GenesisDelegateKey] → ShowS #

Show (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisExtendedKey → ShowS #

show ∷ SigningKey GenesisExtendedKey → String #

showList ∷ [SigningKey GenesisExtendedKey] → ShowS #

Show (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisKey → ShowS #

show ∷ SigningKey GenesisKey → String #

showList ∷ [SigningKey GenesisKey] → ShowS #

Show (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeExtendedKey → ShowS #

show ∷ SigningKey StakeExtendedKey → String #

showList ∷ [SigningKey StakeExtendedKey] → ShowS #

Show (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeKey → ShowS #

show ∷ SigningKey StakeKey → String #

showList ∷ [SigningKey StakeKey] → ShowS #

Show (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey PaymentExtendedKey → ShowS #

show ∷ SigningKey PaymentExtendedKey → String #

showList ∷ [SigningKey PaymentExtendedKey] → ShowS #

Show (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey PaymentKey → ShowS #

show ∷ SigningKey PaymentKey → String #

showList ∷ [SigningKey PaymentKey] → ShowS #

Show (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKeyLegacy → ShowS #

show ∷ SigningKey ByronKeyLegacy → String #

showList ∷ [SigningKey ByronKeyLegacy] → ShowS #

Show (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKey → ShowS #

show ∷ SigningKey ByronKey → String #

showList ∷ [SigningKey ByronKey] → ShowS #

Show (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey VrfKey → ShowS #

show ∷ SigningKey VrfKey → String #

showList ∷ [SigningKey VrfKey] → ShowS #

Show (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey KesKey → ShowS #

show ∷ SigningKey KesKey → String #

showList ∷ [SigningKey KesKey] → ShowS #

IsString (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakePoolKey #

IsString (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisUTxOKey #

IsString (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateExtendedKey #

IsString (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateKey #

IsString (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisExtendedKey #

IsString (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisKey #

IsString (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeExtendedKey #

IsString (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeKey #

IsString (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey PaymentExtendedKey #

IsString (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey PaymentKey #

IsString (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKeyLegacy #

IsString (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKey #

IsString (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey VrfKey #

IsString (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey KesKey #

FromCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakePoolKey) #

label ∷ Proxy (SigningKey StakePoolKey) → Text #

FromCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisUTxOKey) #

label ∷ Proxy (SigningKey GenesisUTxOKey) → Text #

FromCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateExtendedKey) #

label ∷ Proxy (SigningKey GenesisDelegateExtendedKey) → Text #

FromCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateKey) #

label ∷ Proxy (SigningKey GenesisDelegateKey) → Text #

FromCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisExtendedKey) #

label ∷ Proxy (SigningKey GenesisExtendedKey) → Text #

FromCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisKey) #

label ∷ Proxy (SigningKey GenesisKey) → Text #

FromCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeExtendedKey) #

label ∷ Proxy (SigningKey StakeExtendedKey) → Text #

FromCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeKey) #

label ∷ Proxy (SigningKey StakeKey) → Text #

FromCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentExtendedKey) #

label ∷ Proxy (SigningKey PaymentExtendedKey) → Text #

FromCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentKey) #

label ∷ Proxy (SigningKey PaymentKey) → Text #

FromCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKeyLegacy) #

label ∷ Proxy (SigningKey ByronKeyLegacy) → Text #

FromCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKey) #

label ∷ Proxy (SigningKey ByronKey) → Text #

FromCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey VrfKey) #

label ∷ Proxy (SigningKey VrfKey) → Text #

FromCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey KesKey) #

label ∷ Proxy (SigningKey KesKey) → Text #

ToCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakePoolKey] → Size #

ToCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisUTxOKey] → Size #

ToCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateExtendedKey] → Size #

ToCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateKey] → Size #

ToCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisExtendedKey] → Size #

ToCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisKey] → Size #

ToCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeExtendedKey] → Size #

ToCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeKey] → Size #

ToCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentExtendedKey] → Size #

ToCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentKey] → Size #

ToCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKeyLegacy] → Size #

ToCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKey] → Size #

ToCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey VrfKey] → Size #

ToCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (SigningKey a) Source #

Methods

proxyToAsType ∷ Proxy (SigningKey a) → AsType (SigningKey a) Source #

SerialiseAsCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakePoolKey) → ByteString → Either DecoderError (SigningKey StakePoolKey) Source #

SerialiseAsCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Either DecoderError (SigningKey GenesisUTxOKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateKey) Source #

SerialiseAsCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisKey) → ByteString → Either DecoderError (SigningKey GenesisKey) Source #

SerialiseAsCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Either DecoderError (SigningKey StakeExtendedKey) Source #

SerialiseAsCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeKey) → ByteString → Either DecoderError (SigningKey StakeKey) Source #

SerialiseAsCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Either DecoderError (SigningKey PaymentExtendedKey) Source #

SerialiseAsCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentKey) → ByteString → Either DecoderError (SigningKey PaymentKey) Source #

SerialiseAsCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Either DecoderError (SigningKey ByronKeyLegacy) Source #

SerialiseAsCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKey) → ByteString → Either DecoderError (SigningKey ByronKey) Source #

SerialiseAsCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey VrfKey) → ByteString → Either DecoderError (SigningKey VrfKey) Source #

SerialiseAsCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey KesKey) → ByteString → Either DecoderError (SigningKey KesKey) Source #

SerialiseAsRawBytes (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakePoolKey) → ByteString → Maybe (SigningKey StakePoolKey) Source #

SerialiseAsRawBytes (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Maybe (SigningKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Maybe (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Maybe (SigningKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Maybe (SigningKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisKey) → ByteString → Maybe (SigningKey GenesisKey) Source #

SerialiseAsRawBytes (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Maybe (SigningKey StakeExtendedKey) Source #

SerialiseAsRawBytes (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeKey) → ByteString → Maybe (SigningKey StakeKey) Source #

SerialiseAsRawBytes (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Maybe (SigningKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey PaymentKey) → ByteString → Maybe (SigningKey PaymentKey) Source #

SerialiseAsRawBytes (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Maybe (SigningKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKey) → ByteString → Maybe (SigningKey ByronKey) Source #

SerialiseAsRawBytes (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey VrfKey) → ByteString → Maybe (SigningKey VrfKey) Source #

SerialiseAsRawBytes (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey KesKey) → ByteString → Maybe (SigningKey KesKey) Source #

HasTextEnvelope (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey VrfKey) → [Text] Source #

SerialiseAsBech32 (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey KesKey) → [Text] Source #

newtype SigningKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakePoolKey = StakePoolSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisUTxOKey = GenesisUTxOSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateExtendedKey = GenesisDelegateExtendedSigningKey XPrv
newtype SigningKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateKey = GenesisDelegateSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisExtendedKey = GenesisExtendedSigningKey XPrv
newtype SigningKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisKey = GenesisSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeExtendedKey = StakeExtendedSigningKey XPrv
newtype SigningKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeKey = StakeSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey PaymentExtendedKey = PaymentExtendedSigningKey XPrv
newtype SigningKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey PaymentKey = PaymentSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKeyLegacy = ByronSigningKeyLegacy SigningKey
newtype SigningKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKey = ByronSigningKey SigningKey
newtype SigningKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey VrfKey = VrfSigningKey (SignKeyVRF StandardCrypto)
newtype SigningKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey KesKey = KesSigningKey (SignKeyKES StandardCrypto)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family VerificationKey keyrole ∷ Type Source #

The type of cryptographic verification key, for each key role.

Instances

Instances details
Eq (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

(/=) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

Eq (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

(/=) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

Eq (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

Eq (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

Eq (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

Eq (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

(/=) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

Eq (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

(/=) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

Eq (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

(/=) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

Eq (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

(/=) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

Eq (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

(/=) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

Eq (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

(/=) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

Eq (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

(/=) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

Eq (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

(/=) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

Eq (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

(/=) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

Show (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakePoolKey → ShowS #

show ∷ VerificationKey StakePoolKey → String #

showList ∷ [VerificationKey StakePoolKey] → ShowS #

Show (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisUTxOKey → ShowS #

show ∷ VerificationKey GenesisUTxOKey → String #

showList ∷ [VerificationKey GenesisUTxOKey] → ShowS #

Show (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateExtendedKey → ShowS #

show ∷ VerificationKey GenesisDelegateExtendedKey → String #

showList ∷ [VerificationKey GenesisDelegateExtendedKey] → ShowS #

Show (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateKey → ShowS #

show ∷ VerificationKey GenesisDelegateKey → String #

showList ∷ [VerificationKey GenesisDelegateKey] → ShowS #

Show (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisExtendedKey → ShowS #

show ∷ VerificationKey GenesisExtendedKey → String #

showList ∷ [VerificationKey GenesisExtendedKey] → ShowS #

Show (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisKey → ShowS #

show ∷ VerificationKey GenesisKey → String #

showList ∷ [VerificationKey GenesisKey] → ShowS #

Show (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeExtendedKey → ShowS #

show ∷ VerificationKey StakeExtendedKey → String #

showList ∷ [VerificationKey StakeExtendedKey] → ShowS #

Show (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeKey → ShowS #

show ∷ VerificationKey StakeKey → String #

showList ∷ [VerificationKey StakeKey] → ShowS #

Show (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentExtendedKey → ShowS #

show ∷ VerificationKey PaymentExtendedKey → String #

showList ∷ [VerificationKey PaymentExtendedKey] → ShowS #

Show (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentKey → ShowS #

show ∷ VerificationKey PaymentKey → String #

showList ∷ [VerificationKey PaymentKey] → ShowS #

Show (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKeyLegacy → ShowS #

show ∷ VerificationKey ByronKeyLegacy → String #

showList ∷ [VerificationKey ByronKeyLegacy] → ShowS #

Show (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKey → ShowS #

show ∷ VerificationKey ByronKey → String #

showList ∷ [VerificationKey ByronKey] → ShowS #

Show (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey VrfKey → ShowS #

show ∷ VerificationKey VrfKey → String #

showList ∷ [VerificationKey VrfKey] → ShowS #

Show (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey KesKey → ShowS #

show ∷ VerificationKey KesKey → String #

showList ∷ [VerificationKey KesKey] → ShowS #

IsString (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakePoolKey #

IsString (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisUTxOKey #

IsString (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateExtendedKey #

IsString (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateKey #

IsString (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisExtendedKey #

IsString (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisKey #

IsString (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeExtendedKey #

IsString (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeKey #

IsString (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentExtendedKey #

IsString (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentKey #

IsString (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKeyLegacy #

IsString (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKey #

IsString (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey VrfKey #

IsString (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey KesKey #

FromCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakePoolKey) #

label ∷ Proxy (VerificationKey StakePoolKey) → Text #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateKey) #

label ∷ Proxy (VerificationKey GenesisDelegateKey) → Text #

FromCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisExtendedKey) #

label ∷ Proxy (VerificationKey GenesisExtendedKey) → Text #

FromCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisKey) #

label ∷ Proxy (VerificationKey GenesisKey) → Text #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeKey) #

label ∷ Proxy (VerificationKey StakeKey) → Text #

FromCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentExtendedKey) #

label ∷ Proxy (VerificationKey PaymentExtendedKey) → Text #

FromCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentKey) #

label ∷ Proxy (VerificationKey PaymentKey) → Text #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

ToCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakePoolKey] → Size #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateKey] → Size #

ToCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisExtendedKey] → Size #

ToCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisKey] → Size #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeKey] → Size #

ToCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentExtendedKey] → Size #

ToCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentKey] → Size #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (VerificationKey a) Source #

Methods

proxyToAsType ∷ Proxy (VerificationKey a) → AsType (VerificationKey a) Source #

SerialiseAsCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakePoolKey) → ByteString → Either DecoderError (VerificationKey StakePoolKey) Source #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateKey) Source #

SerialiseAsCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisKey) → ByteString → Either DecoderError (VerificationKey GenesisKey) Source #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeKey) → ByteString → Either DecoderError (VerificationKey StakeKey) Source #

SerialiseAsCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Either DecoderError (VerificationKey PaymentExtendedKey) Source #

SerialiseAsCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentKey) → ByteString → Either DecoderError (VerificationKey PaymentKey) Source #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsRawBytes (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakePoolKey) → ByteString → Maybe (VerificationKey StakePoolKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Maybe (VerificationKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Maybe (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Maybe (VerificationKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Maybe (VerificationKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisKey) → ByteString → Maybe (VerificationKey GenesisKey) Source #

SerialiseAsRawBytes (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Maybe (VerificationKey StakeExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeKey) → ByteString → Maybe (VerificationKey StakeKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Maybe (VerificationKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentKey) → ByteString → Maybe (VerificationKey PaymentKey) Source #

SerialiseAsRawBytes (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Maybe (VerificationKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKey) → ByteString → Maybe (VerificationKey ByronKey) Source #

SerialiseAsRawBytes (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey VrfKey) → ByteString → Maybe (VerificationKey VrfKey) Source #

SerialiseAsRawBytes (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey KesKey) → ByteString → Maybe (VerificationKey KesKey) Source #

HasTextEnvelope (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey VrfKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey KesKey) → [Text] Source #

newtype VerificationKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakePoolKey = StakePoolVerificationKey (VKey 'StakePool StandardCrypto)
newtype VerificationKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisUTxOKey = GenesisUTxOVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateExtendedKey = GenesisDelegateExtendedVerificationKey XPub
newtype VerificationKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateKey = GenesisDelegateVerificationKey (VKey 'GenesisDelegate StandardCrypto)
newtype VerificationKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisExtendedKey = GenesisExtendedVerificationKey XPub
newtype VerificationKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisKey = GenesisVerificationKey (VKey 'Genesis StandardCrypto)
newtype VerificationKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeExtendedKey = StakeExtendedVerificationKey XPub
newtype VerificationKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeKey = StakeVerificationKey (VKey 'Staking StandardCrypto)
newtype VerificationKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentExtendedKey = PaymentExtendedVerificationKey XPub
newtype VerificationKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentKey = PaymentVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKeyLegacy = ByronVerificationKeyLegacy VerificationKey
newtype VerificationKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKey = ByronVerificationKey VerificationKey
newtype VerificationKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey VrfKey = VrfVerificationKey (VerKeyVRF StandardCrypto)
newtype VerificationKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey KesKey = KesVerificationKey (VerKeyKES StandardCrypto)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)

data family SigningKey keyrole ∷ Type Source #

The type of cryptographic signing key, for each key role.

Instances

Instances details
Show (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakePoolKey → ShowS #

show ∷ SigningKey StakePoolKey → String #

showList ∷ [SigningKey StakePoolKey] → ShowS #

Show (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisUTxOKey → ShowS #

show ∷ SigningKey GenesisUTxOKey → String #

showList ∷ [SigningKey GenesisUTxOKey] → ShowS #

Show (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateExtendedKey → ShowS #

show ∷ SigningKey GenesisDelegateExtendedKey → String #

showList ∷ [SigningKey GenesisDelegateExtendedKey] → ShowS #

Show (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisDelegateKey → ShowS #

show ∷ SigningKey GenesisDelegateKey → String #

showList ∷ [SigningKey GenesisDelegateKey] → ShowS #

Show (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisExtendedKey → ShowS #

show ∷ SigningKey GenesisExtendedKey → String #

showList ∷ [SigningKey GenesisExtendedKey] → ShowS #

Show (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey GenesisKey → ShowS #

show ∷ SigningKey GenesisKey → String #

showList ∷ [SigningKey GenesisKey] → ShowS #

Show (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeExtendedKey → ShowS #

show ∷ SigningKey StakeExtendedKey → String #

showList ∷ [SigningKey StakeExtendedKey] → ShowS #

Show (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey StakeKey → ShowS #

show ∷ SigningKey StakeKey → String #

showList ∷ [SigningKey StakeKey] → ShowS #

Show (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey PaymentExtendedKey → ShowS #

show ∷ SigningKey PaymentExtendedKey → String #

showList ∷ [SigningKey PaymentExtendedKey] → ShowS #

Show (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → SigningKey PaymentKey → ShowS #

show ∷ SigningKey PaymentKey → String #

showList ∷ [SigningKey PaymentKey] → ShowS #

Show (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKeyLegacy → ShowS #

show ∷ SigningKey ByronKeyLegacy → String #

showList ∷ [SigningKey ByronKeyLegacy] → ShowS #

Show (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → SigningKey ByronKey → ShowS #

show ∷ SigningKey ByronKey → String #

showList ∷ [SigningKey ByronKey] → ShowS #

Show (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey VrfKey → ShowS #

show ∷ SigningKey VrfKey → String #

showList ∷ [SigningKey VrfKey] → ShowS #

Show (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → SigningKey KesKey → ShowS #

show ∷ SigningKey KesKey → String #

showList ∷ [SigningKey KesKey] → ShowS #

IsString (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakePoolKey #

IsString (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisUTxOKey #

IsString (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateExtendedKey #

IsString (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisDelegateKey #

IsString (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisExtendedKey #

IsString (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey GenesisKey #

IsString (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeExtendedKey #

IsString (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey StakeKey #

IsString (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey PaymentExtendedKey #

IsString (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → SigningKey PaymentKey #

IsString (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKeyLegacy #

IsString (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → SigningKey ByronKey #

IsString (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey VrfKey #

IsString (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → SigningKey KesKey #

FromCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakePoolKey) #

label ∷ Proxy (SigningKey StakePoolKey) → Text #

FromCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisUTxOKey) #

label ∷ Proxy (SigningKey GenesisUTxOKey) → Text #

FromCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateExtendedKey) #

label ∷ Proxy (SigningKey GenesisDelegateExtendedKey) → Text #

FromCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateKey) #

label ∷ Proxy (SigningKey GenesisDelegateKey) → Text #

FromCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisExtendedKey) #

label ∷ Proxy (SigningKey GenesisExtendedKey) → Text #

FromCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisKey) #

label ∷ Proxy (SigningKey GenesisKey) → Text #

FromCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeExtendedKey) #

label ∷ Proxy (SigningKey StakeExtendedKey) → Text #

FromCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeKey) #

label ∷ Proxy (SigningKey StakeKey) → Text #

FromCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentExtendedKey) #

label ∷ Proxy (SigningKey PaymentExtendedKey) → Text #

FromCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentKey) #

label ∷ Proxy (SigningKey PaymentKey) → Text #

FromCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKeyLegacy) #

label ∷ Proxy (SigningKey ByronKeyLegacy) → Text #

FromCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKey) #

label ∷ Proxy (SigningKey ByronKey) → Text #

FromCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey VrfKey) #

label ∷ Proxy (SigningKey VrfKey) → Text #

FromCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey KesKey) #

label ∷ Proxy (SigningKey KesKey) → Text #

ToCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakePoolKey] → Size #

ToCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisUTxOKey] → Size #

ToCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateExtendedKey] → Size #

ToCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateKey] → Size #

ToCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisExtendedKey] → Size #

ToCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisKey] → Size #

ToCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeExtendedKey] → Size #

ToCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeKey] → Size #

ToCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentExtendedKey] → Size #

ToCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentKey] → Size #

ToCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKeyLegacy] → Size #

ToCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKey] → Size #

ToCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey VrfKey] → Size #

ToCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (SigningKey a) Source #

Methods

proxyToAsType ∷ Proxy (SigningKey a) → AsType (SigningKey a) Source #

SerialiseAsCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakePoolKey) → ByteString → Either DecoderError (SigningKey StakePoolKey) Source #

SerialiseAsCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Either DecoderError (SigningKey GenesisUTxOKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateKey) Source #

SerialiseAsCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisKey) → ByteString → Either DecoderError (SigningKey GenesisKey) Source #

SerialiseAsCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Either DecoderError (SigningKey StakeExtendedKey) Source #

SerialiseAsCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeKey) → ByteString → Either DecoderError (SigningKey StakeKey) Source #

SerialiseAsCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Either DecoderError (SigningKey PaymentExtendedKey) Source #

SerialiseAsCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentKey) → ByteString → Either DecoderError (SigningKey PaymentKey) Source #

SerialiseAsCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Either DecoderError (SigningKey ByronKeyLegacy) Source #

SerialiseAsCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKey) → ByteString → Either DecoderError (SigningKey ByronKey) Source #

SerialiseAsCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey VrfKey) → ByteString → Either DecoderError (SigningKey VrfKey) Source #

SerialiseAsCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey KesKey) → ByteString → Either DecoderError (SigningKey KesKey) Source #

SerialiseAsRawBytes (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakePoolKey) → ByteString → Maybe (SigningKey StakePoolKey) Source #

SerialiseAsRawBytes (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Maybe (SigningKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Maybe (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Maybe (SigningKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Maybe (SigningKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey GenesisKey) → ByteString → Maybe (SigningKey GenesisKey) Source #

SerialiseAsRawBytes (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Maybe (SigningKey StakeExtendedKey) Source #

SerialiseAsRawBytes (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey StakeKey) → ByteString → Maybe (SigningKey StakeKey) Source #

SerialiseAsRawBytes (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Maybe (SigningKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey PaymentKey) → ByteString → Maybe (SigningKey PaymentKey) Source #

SerialiseAsRawBytes (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Maybe (SigningKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey ByronKey) → ByteString → Maybe (SigningKey ByronKey) Source #

SerialiseAsRawBytes (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey VrfKey) → ByteString → Maybe (SigningKey VrfKey) Source #

SerialiseAsRawBytes (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ SigningKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (SigningKey KesKey) → ByteString → Maybe (SigningKey KesKey) Source #

HasTextEnvelope (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (SigningKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (SigningKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (SigningKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ SigningKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey VrfKey) → [Text] Source #

SerialiseAsBech32 (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey KesKey) → [Text] Source #

newtype SigningKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakePoolKey = StakePoolSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisUTxOKey = GenesisUTxOSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateExtendedKey = GenesisDelegateExtendedSigningKey XPrv
newtype SigningKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisDelegateKey = GenesisDelegateSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisExtendedKey = GenesisExtendedSigningKey XPrv
newtype SigningKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey GenesisKey = GenesisSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeExtendedKey = StakeExtendedSigningKey XPrv
newtype SigningKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey StakeKey = StakeSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey PaymentExtendedKey = PaymentExtendedSigningKey XPrv
newtype SigningKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype SigningKey PaymentKey = PaymentSigningKey (SignKeyDSIGN StandardCrypto)
newtype SigningKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKeyLegacy = ByronSigningKeyLegacy SigningKey
newtype SigningKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype SigningKey ByronKey = ByronSigningKey SigningKey
newtype SigningKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey VrfKey = VrfSigningKey (SignKeyVRF StandardCrypto)
newtype SigningKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype SigningKey KesKey = KesSigningKey (SignKeyKES StandardCrypto)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. The different eras do use different types, but it's all the same underlying representation.

Instance details

Defined in Cardano.Api.Block

newtype Hash BlockHeader = HeaderHash ShortByteString
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-OperationalCertificate.html b/cardano-api/Cardano-Api-OperationalCertificate.html index 5872f0acf8d..53cc82bc419 100644 --- a/cardano-api/Cardano-Api-OperationalCertificate.html +++ b/cardano-api/Cardano-Api-OperationalCertificate.html @@ -1,4 +1,4 @@ Cardano.Api.OperationalCertificate
cardano-api-1.27.0
Safe HaskellNone
LanguageHaskell2010

Cardano.Api.OperationalCertificate

Description

Operational certificates

Documentation

data OperationalCertificate Source #

Constructors

OperationalCertificate !(OCert StandardCrypto) !(VerificationKey StakePoolKey) 

Instances

Instances details
Eq OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

(==) ∷ OperationalCertificate → OperationalCertificate → Bool #

(/=) ∷ OperationalCertificate → OperationalCertificate → Bool #

Show OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

showsPrec ∷ Int → OperationalCertificate → ShowS #

show ∷ OperationalCertificate → String #

showList ∷ [OperationalCertificate] → ShowS #

FromCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

fromCBOR ∷ Decoder s OperationalCertificate #

label ∷ Proxy OperationalCertificate → Text #

ToCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

toCBOR ∷ OperationalCertificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy OperationalCertificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OperationalCertificate] → Size #

HasTypeProxy OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Associated Types

data AsType OperationalCertificate Source #

Methods

proxyToAsType ∷ Proxy OperationalCertificate → AsType OperationalCertificate Source #

SerialiseAsCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

serialiseToCBOR ∷ OperationalCertificate → ByteString Source #

deserialiseFromCBOR ∷ AsType OperationalCertificate → ByteString → Either DecoderError OperationalCertificate Source #

HasTextEnvelope OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

textEnvelopeType ∷ AsType OperationalCertificate → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ OperationalCertificate → TextEnvelopeDescr Source #

data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate

data OperationalCertificateIssueCounter Source #

Constructors

OperationalCertificateIssueCounter !Word64 !(VerificationKey StakePoolKey) 

Instances

Instances details
Eq OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

(==) ∷ OperationalCertificateIssueCounter → OperationalCertificateIssueCounter → Bool #

(/=) ∷ OperationalCertificateIssueCounter → OperationalCertificateIssueCounter → Bool #

Show OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

showsPrec ∷ Int → OperationalCertificateIssueCounter → ShowS #

show ∷ OperationalCertificateIssueCounter → String #

showList ∷ [OperationalCertificateIssueCounter] → ShowS #

FromCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

fromCBOR ∷ Decoder s OperationalCertificateIssueCounter #

label ∷ Proxy OperationalCertificateIssueCounter → Text #

ToCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

toCBOR ∷ OperationalCertificateIssueCounter → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy OperationalCertificateIssueCounter → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OperationalCertificateIssueCounter] → Size #

HasTypeProxy OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Associated Types

data AsType OperationalCertificateIssueCounter Source #

Methods

proxyToAsType ∷ Proxy OperationalCertificateIssueCounter → AsType OperationalCertificateIssueCounter Source #

SerialiseAsCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

serialiseToCBOR ∷ OperationalCertificateIssueCounter → ByteString Source #

deserialiseFromCBOR ∷ AsType OperationalCertificateIssueCounter → ByteString → Either DecoderError OperationalCertificateIssueCounter Source #

HasTextEnvelope OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

textEnvelopeType ∷ AsType OperationalCertificateIssueCounter → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ OperationalCertificateIssueCounter → TextEnvelopeDescr Source #

data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter

newtype KESPeriod #

Constructors

KESPeriod 

Fields

Instances

Instances details
Eq KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

(==) ∷ KESPeriod → KESPeriod → Bool #

(/=) ∷ KESPeriod → KESPeriod → Bool #

Ord KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

compare ∷ KESPeriod → KESPeriod → Ordering #

(<) ∷ KESPeriod → KESPeriod → Bool #

(<=) ∷ KESPeriod → KESPeriod → Bool #

(>) ∷ KESPeriod → KESPeriod → Bool #

(>=) ∷ KESPeriod → KESPeriod → Bool #

max ∷ KESPeriod → KESPeriod → KESPeriod #

min ∷ KESPeriod → KESPeriod → KESPeriod #

Show KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

showsPrec ∷ Int → KESPeriod → ShowS #

show ∷ KESPeriod → String #

showList ∷ [KESPeriod] → ShowS #

Generic KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Associated Types

type Rep KESPeriod ∷ Type → Type #

Methods

from ∷ KESPeriod → Rep KESPeriod x #

to ∷ Rep KESPeriod x → KESPeriod #

NoThunks KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

noThunks ∷ Context → KESPeriod → IO (Maybe ThunkInfo)

wNoThunks ∷ Context → KESPeriod → IO (Maybe ThunkInfo)

showTypeOf ∷ Proxy KESPeriod → String

FromCBOR KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

fromCBOR ∷ Decoder s KESPeriod #

label ∷ Proxy KESPeriod → Text #

ToCBOR KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

toCBOR ∷ KESPeriod → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy KESPeriod → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KESPeriod] → Size #

type Rep KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

type Rep KESPeriod = D1 ('MetaData "KESPeriod" "Shelley.Spec.Ledger.OCert" "shelley-spec-ledger-0.1.0.0-5200540b5a4373a509e8a9e3f84574eb3d76f987cdafd3ae43bd007ae51d446e" 'True) (C1 ('MetaCons "KESPeriod" 'PrefixI 'True) (S1 ('MetaSel ('Just "unKESPeriod") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Word)))

data OperationalCertIssueError Source #

Constructors

OperationalCertKeyMismatch (VerificationKey StakePoolKey) (VerificationKey StakePoolKey)

The stake pool verification key expected for the OperationalCertificateIssueCounter does not match the signing key supplied for signing.

Order: pool vkey expected, pool skey supplied

Instances

Instances details
Show OperationalCertIssueError Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

showsPrec ∷ Int → OperationalCertIssueError → ShowS #

show ∷ OperationalCertIssueError → String #

showList ∷ [OperationalCertIssueError] → ShowS #

Error OperationalCertIssueError Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

displayError ∷ OperationalCertIssueError → String Source #

issueOperationalCertificate ∷ VerificationKey KesKey → Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) → KESPeriod → OperationalCertificateIssueCounter → Either OperationalCertIssueError (OperationalCertificate, OperationalCertificateIssueCounter) Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-ProtocolParameters.html b/cardano-api/Cardano-Api-ProtocolParameters.html index b03820fea14..57bc15755d2 100644 --- a/cardano-api/Cardano-Api-ProtocolParameters.html +++ b/cardano-api/Cardano-Api-ProtocolParameters.html @@ -48,4 +48,4 @@ execution units per transaction or per block.

Constructors

ExecutionUnits 

Fields

Instances

Instances details
Eq ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

(==) ∷ ExecutionUnits → ExecutionUnits → Bool #

(/=) ∷ ExecutionUnits → ExecutionUnits → Bool #

Show ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

showsPrec ∷ Int → ExecutionUnits → ShowS #

show ∷ ExecutionUnits → String #

showList ∷ [ExecutionUnits] → ShowS #

FromJSON ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

parseJSON ∷ Value → Parser ExecutionUnits #

parseJSONList ∷ Value → Parser [ExecutionUnits] #

ToJSON ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toJSON ∷ ExecutionUnits → Value #

toEncoding ∷ ExecutionUnits → Encoding #

toJSONList ∷ [ExecutionUnits] → Value #

toEncodingList ∷ [ExecutionUnits] → Encoding #

data ExecutionUnitPrices Source #

The prices in Lovelace for ExecutionUnits.

These are used to determine the fee for the use of a script within a transaction, based on the ExecutionUnits needed by the use of the script.

Constructors

ExecutionUnitPrices 

Fields

Instances

Instances details
Eq ExecutionUnitPrices Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

(==) ∷ ExecutionUnitPrices → ExecutionUnitPrices → Bool #

(/=) ∷ ExecutionUnitPrices → ExecutionUnitPrices → Bool #

Show ExecutionUnitPrices Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

showsPrec ∷ Int → ExecutionUnitPrices → ShowS #

show ∷ ExecutionUnitPrices → String #

showList ∷ [ExecutionUnitPrices] → ShowS #

FromJSON ExecutionUnitPrices Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

parseJSON ∷ Value → Parser ExecutionUnitPrices #

parseJSONList ∷ Value → Parser [ExecutionUnitPrices] #

ToJSON ExecutionUnitPrices Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

toJSON ∷ ExecutionUnitPrices → Value #

toEncoding ∷ ExecutionUnitPrices → Encoding #

toJSONList ∷ [ExecutionUnitPrices] → Value #

toEncodingList ∷ [ExecutionUnitPrices] → Encoding #

newtype CostModel Source #

Constructors

CostModel (Map Text Integer) 

Instances

Instances details
Eq CostModel Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

(==) ∷ CostModel → CostModel → Bool #

(/=) ∷ CostModel → CostModel → Bool #

Show CostModel Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

showsPrec ∷ Int → CostModel → ShowS #

show ∷ CostModel → String #

showList ∷ [CostModel] → ShowS #

FromJSON CostModel Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

parseJSON ∷ Value → Parser CostModel #

parseJSONList ∷ Value → Parser [CostModel] #

ToJSON CostModel Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

toJSON ∷ CostModel → Value #

toEncoding ∷ CostModel → Encoding #

toJSONList ∷ [CostModel] → Value #

toEncodingList ∷ [CostModel] → Encoding #

validateCostModel ∷ PlutusScriptVersion lang → CostModel → Either InvalidCostModel () Source #

Update proposals to change the protocol paramaters

data UpdateProposal Source #

Constructors

UpdateProposal !(Map (Hash GenesisKey) ProtocolParametersUpdate) !EpochNo 

Instances

Instances details
Eq UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

(==) ∷ UpdateProposal → UpdateProposal → Bool #

(/=) ∷ UpdateProposal → UpdateProposal → Bool #

Show UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

showsPrec ∷ Int → UpdateProposal → ShowS #

show ∷ UpdateProposal → String #

showList ∷ [UpdateProposal] → ShowS #

HasTypeProxy UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Associated Types

data AsType UpdateProposal Source #

Methods

proxyToAsType ∷ Proxy UpdateProposal → AsType UpdateProposal Source #

SerialiseAsCBOR UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

serialiseToCBOR ∷ UpdateProposal → ByteString Source #

deserialiseFromCBOR ∷ AsType UpdateProposal → ByteString → Either DecoderError UpdateProposal Source #

HasTextEnvelope UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

textEnvelopeType ∷ AsType UpdateProposal → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ UpdateProposal → TextEnvelopeDescr Source #

data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal

makeShelleyUpdateProposal ∷ ProtocolParametersUpdate → [Hash GenesisKey] → EpochNo → UpdateProposal Source #

Internal conversion functions

toLedgerUpdate ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → UpdateProposal → Update ledgerera Source #

fromLedgerUpdate ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → Update ledgerera → UpdateProposal Source #

toLedgerProposedPPUpdates ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → Map (Hash GenesisKey) ProtocolParametersUpdate → ProposedPPUpdates ledgerera Source #

fromLedgerProposedPPUpdates ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → ProposedPPUpdates ledgerera → Map (Hash GenesisKey) ProtocolParametersUpdate Source #

toLedgerPParams ∷ ShelleyBasedEra era → ProtocolParameters → PParams (ShelleyLedgerEra era) Source #

fromLedgerPParams ∷ ShelleyBasedEra era → PParams (ShelleyLedgerEra era) → ProtocolParameters Source #

fromShelleyPParams ∷ PParams ledgerera → ProtocolParameters Source #

toAlonzoPrices ∷ ExecutionUnitPrices → Prices Source #

fromAlonzoPrices ∷ Prices → ExecutionUnitPrices Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-Script.html b/cardano-api/Cardano-Api-Script.html index a22572f6200..0d80547b7dc 100644 --- a/cardano-api/Cardano-Api-Script.html +++ b/cardano-api/Cardano-Api-Script.html @@ -32,6 +32,6 @@ hash where we don't want things to be era-parametrised.

Constructors

ScriptHash (ScriptHash StandardCrypto) 

Instances

Instances details
Eq ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

(==) ∷ ScriptHash → ScriptHash → Bool #

(/=) ∷ ScriptHash → ScriptHash → Bool #

Ord ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

compare ∷ ScriptHash → ScriptHash → Ordering #

(<) ∷ ScriptHash → ScriptHash → Bool #

(<=) ∷ ScriptHash → ScriptHash → Bool #

(>) ∷ ScriptHash → ScriptHash → Bool #

(>=) ∷ ScriptHash → ScriptHash → Bool #

max ∷ ScriptHash → ScriptHash → ScriptHash #

min ∷ ScriptHash → ScriptHash → ScriptHash #

Show ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

showsPrec ∷ Int → ScriptHash → ShowS #

show ∷ ScriptHash → String #

showList ∷ [ScriptHash] → ShowS #

IsString ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

fromString ∷ String → ScriptHash #

HasTypeProxy ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptHash Source #

Methods

proxyToAsType ∷ Proxy ScriptHash → AsType ScriptHash Source #

SerialiseAsRawBytes ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToRawBytes ∷ ScriptHash → ByteString Source #

deserialiseFromRawBytes ∷ AsType ScriptHash → ByteString → Maybe ScriptHash Source #

data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash

hashScript ∷ Script lang → ScriptHash Source #

Internal conversion functions

toShelleyScript ∷ ScriptInEra era → Script (ShelleyLedgerEra era) Source #

fromShelleyBasedScript ∷ ShelleyBasedEra era → Script (ShelleyLedgerEra era) → ScriptInEra era Source #

toShelleyMultiSig ∷ SimpleScript SimpleScriptV1 → MultiSig StandardCrypto Source #

Conversion for the MultiSig language used by the Shelley era.

fromShelleyMultiSig ∷ MultiSig StandardCrypto → SimpleScript lang Source #

Conversion for the MultiSig language used by the Shelley era.

toAllegraTimelock ∷ ∀ lang. SimpleScript lang → Timelock StandardCrypto Source #

Conversion for the Timelock language that is shared between the Allegra and Mary eras.

fromAllegraTimelock ∷ TimeLocksSupported lang → Timelock StandardCrypto → SimpleScript lang Source #

Conversion for the Timelock language that is shared between the Allegra and Mary eras.

toAlonzoExUnits ∷ ExecutionUnits → ExUnits Source #

fromAlonzoExUnits ∷ ExUnits → ExecutionUnits Source #

toShelleyScriptHash ∷ ScriptHash → ScriptHash StandardCrypto Source #

fromShelleyScriptHash ∷ ScriptHash StandardCrypto → ScriptHash Source #

toPlutusData ∷ ScriptData → Data Source #

fromPlutusData ∷ Data → ScriptData Source #

toAlonzoData ∷ ScriptData → Data ledgerera Source #

fromAlonzoData ∷ Data ledgerera → ScriptData Source #

toAlonzoLanguage ∷ AnyPlutusScriptVersion → Language Source #

fromAlonzoLanguage ∷ Language → AnyPlutusScriptVersion Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. The different eras do use different types, but it's all the same underlying representation.

Instance details

Defined in Cardano.Api.Block

newtype Hash BlockHeader = HeaderHash ShortByteString
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-ScriptData.html b/cardano-api/Cardano-Api-ScriptData.html index d2862d75efa..eae6059810c 100644 --- a/cardano-api/Cardano-Api-ScriptData.html +++ b/cardano-api/Cardano-Api-ScriptData.html @@ -32,6 +32,6 @@ subset for the chosen mapping. See ScriptDataJsonSchema for the details.

scriptDataToJson ∷ ScriptDataJsonSchema → ScriptData → Value Source #

Convert a script data value into JSON , using the given choice of mapping between JSON and script data.

This conversion is total but is not necessarily invertible. See ScriptDataJsonSchema for the details.

data ScriptDataJsonError Source #

Constructors

ScriptDataJsonSchemaError !Value !ScriptDataJsonSchemaError 
ScriptDataRangeError !Value !ScriptDataRangeError 

Instances

Instances details
Eq ScriptDataJsonError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ ScriptDataJsonError → ScriptDataJsonError → Bool #

(/=) ∷ ScriptDataJsonError → ScriptDataJsonError → Bool #

Show ScriptDataJsonError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → ScriptDataJsonError → ShowS #

show ∷ ScriptDataJsonError → String #

showList ∷ [ScriptDataJsonError] → ShowS #

Error ScriptDataJsonError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonError → String Source #

data ScriptDataJsonSchemaError Source #

Constructors

ScriptDataJsonNullNotAllowed 
ScriptDataJsonBoolNotAllowed 
ScriptDataJsonNumberNotInteger !Double 
ScriptDataJsonNotObject !Value 
ScriptDataJsonBadObject ![(Text, Value)] 
ScriptDataJsonBadMapPair !Value 
ScriptDataJsonTypeMismatch !Text !Value 

Instances

Instances details
Eq ScriptDataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ ScriptDataJsonSchemaError → ScriptDataJsonSchemaError → Bool #

(/=) ∷ ScriptDataJsonSchemaError → ScriptDataJsonSchemaError → Bool #

Show ScriptDataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → ScriptDataJsonSchemaError → ShowS #

show ∷ ScriptDataJsonSchemaError → String #

showList ∷ [ScriptDataJsonSchemaError] → ShowS #

Error ScriptDataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonSchemaError → String Source #

Internal conversion functions

toPlutusData ∷ ScriptData → Data Source #

fromPlutusData ∷ Data → ScriptData Source #

toAlonzoData ∷ ScriptData → Data ledgerera Source #

fromAlonzoData ∷ Data ledgerera → ScriptData Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. The different eras do use different types, but it's all the same underlying representation.

Instance details

Defined in Cardano.Api.Block

newtype Hash BlockHeader = HeaderHash ShortByteString
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-SerialiseCBOR.html b/cardano-api/Cardano-Api-SerialiseCBOR.html index 3bf61c753f1..4854799ea8a 100644 --- a/cardano-api/Cardano-Api-SerialiseCBOR.html +++ b/cardano-api/Cardano-Api-SerialiseCBOR.html @@ -1 +1 @@ -Cardano.Api.SerialiseCBOR
cardano-api-1.27.0
Safe HaskellNone
LanguageHaskell2010

Cardano.Api.SerialiseCBOR

Description

CBOR serialisation

Documentation

class HasTypeProxy a ⇒ SerialiseAsCBOR a where Source #

Minimal complete definition

Nothing

Methods

serialiseToCBOR ∷ a → ByteString Source #

default serialiseToCBOR ∷ ToCBOR a ⇒ a → ByteString Source #

deserialiseFromCBOR ∷ AsType a → ByteString → Either DecoderError a Source #

default deserialiseFromCBOR ∷ FromCBOR a ⇒ AsType a → ByteString → Either DecoderError a Source #

Instances

Instances details
SerialiseAsCBOR TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

serialiseToCBOR ∷ TxMetadata → ByteString Source #

deserialiseFromCBOR ∷ AsType TxMetadata → ByteString → Either DecoderError TxMetadata Source #

SerialiseAsCBOR UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

serialiseToCBOR ∷ UpdateProposal → ByteString Source #

deserialiseFromCBOR ∷ AsType UpdateProposal → ByteString → Either DecoderError UpdateProposal Source #

SerialiseAsCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

serialiseToCBOR ∷ Certificate → ByteString Source #

deserialiseFromCBOR ∷ AsType Certificate → ByteString → Either DecoderError Certificate Source #

SerialiseAsCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

serialiseToCBOR ∷ OperationalCertificateIssueCounter → ByteString Source #

deserialiseFromCBOR ∷ AsType OperationalCertificateIssueCounter → ByteString → Either DecoderError OperationalCertificateIssueCounter Source #

SerialiseAsCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

serialiseToCBOR ∷ OperationalCertificate → ByteString Source #

deserialiseFromCBOR ∷ AsType OperationalCertificate → ByteString → Either DecoderError OperationalCertificate Source #

SerialiseAsCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakePoolKey) → ByteString → Either DecoderError (VerificationKey StakePoolKey) Source #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateKey) Source #

SerialiseAsCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisKey) → ByteString → Either DecoderError (VerificationKey GenesisKey) Source #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeKey) → ByteString → Either DecoderError (VerificationKey StakeKey) Source #

SerialiseAsCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Either DecoderError (VerificationKey PaymentExtendedKey) Source #

SerialiseAsCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentKey) → ByteString → Either DecoderError (VerificationKey PaymentKey) Source #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakePoolKey) → ByteString → Either DecoderError (SigningKey StakePoolKey) Source #

SerialiseAsCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Either DecoderError (SigningKey GenesisUTxOKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateKey) Source #

SerialiseAsCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisKey) → ByteString → Either DecoderError (SigningKey GenesisKey) Source #

SerialiseAsCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Either DecoderError (SigningKey StakeExtendedKey) Source #

SerialiseAsCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeKey) → ByteString → Either DecoderError (SigningKey StakeKey) Source #

SerialiseAsCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Either DecoderError (SigningKey PaymentExtendedKey) Source #

SerialiseAsCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentKey) → ByteString → Either DecoderError (SigningKey PaymentKey) Source #

SerialiseAsCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Either DecoderError (SigningKey ByronKeyLegacy) Source #

SerialiseAsCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKey) → ByteString → Either DecoderError (SigningKey ByronKey) Source #

SerialiseAsCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey VrfKey) → ByteString → Either DecoderError (SigningKey VrfKey) Source #

SerialiseAsCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey KesKey) → ByteString → Either DecoderError (SigningKey KesKey) Source #

(HasTypeProxy lang, Typeable lang) ⇒ SerialiseAsCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToCBOR ∷ PlutusScript lang → ByteString Source #

deserialiseFromCBOR ∷ AsType (PlutusScript lang) → ByteString → Either DecoderError (PlutusScript lang) Source #

IsScriptLanguage lang ⇒ SerialiseAsCBOR (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToCBOR ∷ Script lang → ByteString Source #

deserialiseFromCBOR ∷ AsType (Script lang) → ByteString → Either DecoderError (Script lang) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

serialiseToCBOR ∷ TxBody era → ByteString Source #

deserialiseFromCBOR ∷ AsType (TxBody era) → ByteString → Either DecoderError (TxBody era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ KeyWitness era → ByteString Source #

deserialiseFromCBOR ∷ AsType (KeyWitness era) → ByteString → Either DecoderError (KeyWitness era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ Tx era → ByteString Source #

deserialiseFromCBOR ∷ AsType (Tx era) → ByteString → Either DecoderError (Tx era) Source #

class Typeable a ⇒ FromCBOR a where #

Minimal complete definition

fromCBOR

Methods

fromCBOR ∷ Decoder s a #

label ∷ Proxy a → Text #

Instances

Instances details
FromCBOR Bool 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Bool #

label ∷ Proxy Bool → Text #

FromCBOR Float 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Float #

label ∷ Proxy Float → Text #

FromCBOR Int 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int #

label ∷ Proxy Int → Text #

FromCBOR Int32 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int32 #

label ∷ Proxy Int32 → Text #

FromCBOR Int64 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int64 #

label ∷ Proxy Int64 → Text #

FromCBOR Integer 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Integer #

label ∷ Proxy Integer → Text #

FromCBOR Natural 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Natural #

label ∷ Proxy Natural → Text #

FromCBOR Word 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word #

label ∷ Proxy Word → Text #

FromCBOR Word8 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word8 #

label ∷ Proxy Word8 → Text #

FromCBOR Word16 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word16 #

label ∷ Proxy Word16 → Text #

FromCBOR Word32 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word32 #

label ∷ Proxy Word32 → Text #

FromCBOR Word64 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word64 #

label ∷ Proxy Word64 → Text #

FromCBOR () 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s () #

label ∷ Proxy () → Text #

FromCBOR ByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s ByteString #

label ∷ Proxy ByteString → Text #

FromCBOR ShortByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s ShortByteString #

label ∷ Proxy ShortByteString → Text #

FromCBOR Nano 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Nano #

label ∷ Proxy Nano → Text #

FromCBOR Pico 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Pico #

label ∷ Proxy Pico → Text #

FromCBOR Void 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Void #

label ∷ Proxy Void → Text #

FromCBOR Text 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Text #

label ∷ Proxy Text → Text #

FromCBOR UTCTime 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s UTCTime #

label ∷ Proxy UTCTime → Text #

FromCBOR NominalDiffTime 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s NominalDiffTime #

label ∷ Proxy NominalDiffTime → Text #

FromCBOR BlockNo 
Instance details

Defined in Cardano.Slotting.Block

Methods

fromCBOR ∷ Decoder s BlockNo #

label ∷ Proxy BlockNo → Text #

FromCBOR LByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s LByteString #

label ∷ Proxy LByteString → Text #

FromCBOR EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s EpochNo #

label ∷ Proxy EpochNo → Text #

FromCBOR SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s SlotNo #

label ∷ Proxy SlotNo → Text #

FromCBOR Raw 
Instance details

Defined in Cardano.Binary.Raw

Methods

fromCBOR ∷ Decoder s Raw #

label ∷ Proxy Raw → Text #

FromCBOR Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s Coin #

label ∷ Proxy Coin → Text #

FromCBOR UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s UnitInterval #

label ∷ Proxy UnitInterval → Text #

FromCBOR ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s ProtVer #

label ∷ Proxy ProtVer → Text #

FromCBOR AlonzoGenesis 
Instance details

Defined in Cardano.Ledger.Alonzo.Genesis

Methods

fromCBOR ∷ Decoder s AlonzoGenesis #

label ∷ Proxy AlonzoGenesis → Text #

FromCBOR Language 
Instance details

Defined in Cardano.Ledger.Alonzo.Language

Methods

fromCBOR ∷ Decoder s Language #

label ∷ Proxy Language → Text #

FromCBOR CostModel 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s CostModel #

label ∷ Proxy CostModel → Text #

FromCBOR Prices 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s Prices #

label ∷ Proxy Prices → Text #

FromCBOR ExUnits 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s ExUnits #

label ∷ Proxy ExUnits → Text #

FromCBOR Metadatum 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

fromCBOR ∷ Decoder s Metadatum #

label ∷ Proxy Metadatum → Text #

FromCBOR AssetName 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s AssetName #

label ∷ Proxy AssetName → Text #

FromCBOR Likelihood 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s Likelihood #

label ∷ Proxy Likelihood → Text #

FromCBOR Ptr 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

fromCBOR ∷ Decoder s Ptr #

label ∷ Proxy Ptr → Text #

FromCBOR Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Nonce #

label ∷ Proxy Nonce → Text #

FromCBOR Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s Desirability #

label ∷ Proxy Desirability → Text #

FromCBOR StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s StakePoolRelay #

label ∷ Proxy StakePoolRelay → Text #

FromCBOR PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s PoolMetadata #

label ∷ Proxy PoolMetadata → Text #

FromCBOR Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Network #

label ∷ Proxy Network → Text #

FromCBOR ValidityInterval 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s ValidityInterval #

label ∷ Proxy ValidityInterval → Text #

FromCBOR ByronHash 
Instance details

Defined in Ouroboros.Consensus.Byron.Ledger.Block

Methods

fromCBOR ∷ Decoder s ByronHash #

label ∷ Proxy ByronHash → Text #

FromCBOR EpochAndSlotCount 
Instance details

Defined in Cardano.Chain.Slotting.EpochAndSlotCount

Methods

fromCBOR ∷ Decoder s EpochAndSlotCount #

label ∷ Proxy EpochAndSlotCount → Text #

FromCBOR EpochNumber 
Instance details

Defined in Cardano.Chain.Slotting.EpochNumber

Methods

fromCBOR ∷ Decoder s EpochNumber #

label ∷ Proxy EpochNumber → Text #

FromCBOR EpochSlots 
Instance details

Defined in Cardano.Chain.Slotting.EpochSlots

Methods

fromCBOR ∷ Decoder s EpochSlots #

label ∷ Proxy EpochSlots → Text #

FromCBOR SlotCount 
Instance details

Defined in Cardano.Chain.Slotting.SlotCount

Methods

fromCBOR ∷ Decoder s SlotCount #

label ∷ Proxy SlotCount → Text #

FromCBOR SlotNumber 
Instance details

Defined in Cardano.Chain.Slotting.SlotNumber

Methods

fromCBOR ∷ Decoder s SlotNumber #

label ∷ Proxy SlotNumber → Text #

FromCBOR Config 
Instance details

Defined in Cardano.Chain.Genesis.Config

Methods

fromCBOR ∷ Decoder s Config #

label ∷ Proxy Config → Text #

FromCBOR GenesisNonAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.NonAvvmBalances

Methods

fromCBOR ∷ Decoder s GenesisNonAvvmBalances #

label ∷ Proxy GenesisNonAvvmBalances → Text #

FromCBOR GenesisDelegation 
Instance details

Defined in Cardano.Chain.Genesis.Delegation

Methods

fromCBOR ∷ Decoder s GenesisDelegation #

label ∷ Proxy GenesisDelegation → Text #

FromCBOR GenesisKeyHashes 
Instance details

Defined in Cardano.Chain.Genesis.KeyHashes

Methods

fromCBOR ∷ Decoder s GenesisKeyHashes #

label ∷ Proxy GenesisKeyHashes → Text #

FromCBOR CompactAddress 
Instance details

Defined in Cardano.Chain.Common.Compact

Methods

fromCBOR ∷ Decoder s CompactAddress #

label ∷ Proxy CompactAddress → Text #

FromCBOR RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

fromCBOR ∷ Decoder s RequiresNetworkMagic #

label ∷ Proxy RequiresNetworkMagic → Text #

FromCBOR GenesisAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.AvvmBalances

Methods

fromCBOR ∷ Decoder s GenesisAvvmBalances #

label ∷ Proxy GenesisAvvmBalances → Text #

FromCBOR ProtocolParameters 
Instance details

Defined in Cardano.Chain.Update.ProtocolParameters

Methods

fromCBOR ∷ Decoder s ProtocolParameters #

label ∷ Proxy ProtocolParameters → Text #

FromCBOR ProtocolVersion 
Instance details

Defined in Cardano.Chain.Update.ProtocolVersion

Methods

fromCBOR ∷ Decoder s ProtocolVersion #

label ∷ Proxy ProtocolVersion → Text #

FromCBOR ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

fromCBOR ∷ Decoder s ProtocolMagicId #

label ∷ Proxy ProtocolMagicId → Text #

FromCBOR Certificate 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

fromCBOR ∷ Decoder s Certificate #

label ∷ Proxy Certificate → Text #

FromCBOR SigningKey 
Instance details

Defined in Cardano.Crypto.Signing.SigningKey

Methods

fromCBOR ∷ Decoder s SigningKey #

label ∷ Proxy SigningKey → Text #

FromCBOR SoftwareVersion 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

fromCBOR ∷ Decoder s SoftwareVersion #

label ∷ Proxy SoftwareVersion → Text #

FromCBOR VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

fromCBOR ∷ Decoder s VerificationKey #

label ∷ Proxy VerificationKey → Text #

FromCBOR KeyHash 
Instance details

Defined in Cardano.Chain.Common.KeyHash

Methods

fromCBOR ∷ Decoder s KeyHash #

label ∷ Proxy KeyHash → Text #

FromCBOR GenesisHash 
Instance details

Defined in Cardano.Chain.Genesis.Hash

Methods

fromCBOR ∷ Decoder s GenesisHash #

label ∷ Proxy GenesisHash → Text #

FromCBOR CandidateProtocolUpdate 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s CandidateProtocolUpdate #

label ∷ Proxy CandidateProtocolUpdate → Text #

FromCBOR Endorsement 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s Endorsement #

label ∷ Proxy Endorsement → Text #

FromCBOR ApplyMempoolPayloadErr 
Instance details

Defined in Cardano.Chain.Byron.API.Mempool

Methods

fromCBOR ∷ Decoder s ApplyMempoolPayloadErr #

label ∷ Proxy ApplyMempoolPayloadErr → Text #

FromCBOR Tx 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s Tx #

label ∷ Proxy Tx → Text #

FromCBOR Proposal 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s Proposal #

label ∷ Proxy Proposal → Text #

FromCBOR Vote 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

fromCBOR ∷ Decoder s Vote #

label ∷ Proxy Vote → Text #

FromCBOR ChainValidationState 
Instance details

Defined in Cardano.Chain.Block.Validation

Methods

fromCBOR ∷ Decoder s ChainValidationState #

label ∷ Proxy ChainValidationState → Text #

FromCBOR Map 
Instance details

Defined in Cardano.Chain.Delegation.Map

Methods

fromCBOR ∷ Decoder s Map #

label ∷ Proxy Map → Text #

FromCBOR ScheduledDelegation 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s ScheduledDelegation #

label ∷ Proxy ScheduledDelegation → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR UTxO 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

fromCBOR ∷ Decoder s UTxO #

label ∷ Proxy UTxO → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR ToSign 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s ToSign #

label ∷ Proxy ToSign → Text #

FromCBOR CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

fromCBOR ∷ Decoder s CompactRedeemVerificationKey #

label ∷ Proxy CompactRedeemVerificationKey → Text #

FromCBOR Lovelace 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

fromCBOR ∷ Decoder s Lovelace #

label ∷ Proxy Lovelace → Text #

FromCBOR SystemStart 
Instance details

Defined in Cardano.Slotting.Time

Methods

fromCBOR ∷ Decoder s SystemStart #

label ∷ Proxy SystemStart → Text #

FromCBOR Point 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s Point #

label ∷ Proxy Point → Text #

FromCBOR Proof 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s Proof #

label ∷ Proxy Proof → Text #

FromCBOR SignKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s SignKey #

label ∷ Proxy SignKey → Text #

FromCBOR VerKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s VerKey #

label ∷ Proxy VerKey → Text #

FromCBOR RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

fromCBOR ∷ Decoder s RedeemVerificationKey #

label ∷ Proxy RedeemVerificationKey → Text #

FromCBOR RedeemSigningKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.SigningKey

Methods

fromCBOR ∷ Decoder s RedeemSigningKey #

label ∷ Proxy RedeemSigningKey → Text #

FromCBOR IsValidating 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s IsValidating #

label ∷ Proxy IsValidating → Text #

FromCBOR Tag 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s Tag #

label ∷ Proxy Tag → Text #

FromCBOR ChainDifficulty 
Instance details

Defined in Cardano.Chain.Common.ChainDifficulty

Methods

fromCBOR ∷ Decoder s ChainDifficulty #

label ∷ Proxy ChainDifficulty → Text #

FromCBOR Proof 
Instance details

Defined in Cardano.Chain.Block.Proof

Methods

fromCBOR ∷ Decoder s Proof #

label ∷ Proxy Proof → Text #

FromCBOR SscPayload 
Instance details

Defined in Cardano.Chain.Ssc

Methods

fromCBOR ∷ Decoder s SscPayload #

label ∷ Proxy SscPayload → Text #

FromCBOR ProposalBody 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s ProposalBody #

label ∷ Proxy ProposalBody → Text #

FromCBOR TxInWitness 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

fromCBOR ∷ Decoder s TxInWitness #

label ∷ Proxy TxInWitness → Text #

FromCBOR Body 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

fromCBOR ∷ Decoder s Body #

label ∷ Proxy Body → Text #

FromCBOR TxPayload 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

fromCBOR ∷ Decoder s TxPayload #

label ∷ Proxy TxPayload → Text #

FromCBOR Payload 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

fromCBOR ∷ Decoder s Payload #

label ∷ Proxy Payload → Text #

FromCBOR Payload 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

fromCBOR ∷ Decoder s Payload #

label ∷ Proxy Payload → Text #

FromCBOR BlockSignature 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s BlockSignature #

label ∷ Proxy BlockSignature → Text #

FromCBOR TxProof 
Instance details

Defined in Cardano.Chain.UTxO.TxProof

Methods

fromCBOR ∷ Decoder s TxProof #

label ∷ Proxy TxProof → Text #

FromCBOR SscProof 
Instance details

Defined in Cardano.Chain.Ssc

Methods

fromCBOR ∷ Decoder s SscProof #

label ∷ Proxy SscProof → Text #

FromCBOR CompactTxIn 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxIn #

label ∷ Proxy CompactTxIn → Text #

FromCBOR CompactTxOut 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxOut #

label ∷ Proxy CompactTxOut → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Interface

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR UTxOValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

fromCBOR ∷ Decoder s UTxOValidationError #

label ∷ Proxy UTxOValidationError → Text #

FromCBOR BlockCount 
Instance details

Defined in Cardano.Chain.Common.BlockCount

Methods

fromCBOR ∷ Decoder s BlockCount #

label ∷ Proxy BlockCount → Text #

FromCBOR UTxOConfiguration 
Instance details

Defined in Cardano.Chain.UTxO.UTxOConfiguration

Methods

fromCBOR ∷ Decoder s UTxOConfiguration #

label ∷ Proxy UTxOConfiguration → Text #

FromCBOR ApplicationName 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

fromCBOR ∷ Decoder s ApplicationName #

label ∷ Proxy ApplicationName → Text #

FromCBOR ApplicationVersion 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s ApplicationVersion #

label ∷ Proxy ApplicationVersion → Text #

FromCBOR ProtocolUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s ProtocolUpdateProposal #

label ∷ Proxy ProtocolUpdateProposal → Text #

FromCBOR SoftwareUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s SoftwareUpdateProposal #

label ∷ Proxy SoftwareUpdateProposal → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR HDAddressPayload 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

fromCBOR ∷ Decoder s HDAddressPayload #

label ∷ Proxy HDAddressPayload → Text #

FromCBOR NetworkMagic 
Instance details

Defined in Cardano.Chain.Common.NetworkMagic

Methods

fromCBOR ∷ Decoder s NetworkMagic #

label ∷ Proxy NetworkMagic → Text #

FromCBOR AddrSpendingData 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

fromCBOR ∷ Decoder s AddrSpendingData #

label ∷ Proxy AddrSpendingData → Text #

FromCBOR AddrType 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

fromCBOR ∷ Decoder s AddrType #

label ∷ Proxy AddrType → Text #

FromCBOR Address 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

fromCBOR ∷ Decoder s Address #

label ∷ Proxy Address → Text #

FromCBOR Address' 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

fromCBOR ∷ Decoder s Address' #

label ∷ Proxy Address' → Text #

FromCBOR LovelaceError 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

fromCBOR ∷ Decoder s LovelaceError #

label ∷ Proxy LovelaceError → Text #

FromCBOR LovelacePortion 
Instance details

Defined in Cardano.Chain.Common.LovelacePortion

Methods

fromCBOR ∷ Decoder s LovelacePortion #

label ∷ Proxy LovelacePortion → Text #

FromCBOR TxFeePolicy 
Instance details

Defined in Cardano.Chain.Common.TxFeePolicy

Methods

fromCBOR ∷ Decoder s TxFeePolicy #

label ∷ Proxy TxFeePolicy → Text #

FromCBOR TxSizeLinear 
Instance details

Defined in Cardano.Chain.Common.TxSizeLinear

Methods

fromCBOR ∷ Decoder s TxSizeLinear #

label ∷ Proxy TxSizeLinear → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Activation

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR GenesisData 
Instance details

Defined in Cardano.Chain.Genesis.Data

Methods

fromCBOR ∷ Decoder s GenesisData #

label ∷ Proxy GenesisData → Text #

FromCBOR CompactTxId 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxId #

label ∷ Proxy CompactTxId → Text #

FromCBOR TxIn 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s TxIn #

label ∷ Proxy TxIn → Text #

FromCBOR TxOut 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s TxOut #

label ∷ Proxy TxOut → Text #

FromCBOR TxAux 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

fromCBOR ∷ Decoder s TxAux #

label ∷ Proxy TxAux → Text #

FromCBOR TxSigData 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

fromCBOR ∷ Decoder s TxSigData #

label ∷ Proxy TxSigData → Text #

FromCBOR UTxOError 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

fromCBOR ∷ Decoder s UTxOError #

label ∷ Proxy UTxOError → Text #

FromCBOR ApplicationNameError 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

fromCBOR ∷ Decoder s ApplicationNameError #

label ∷ Proxy ApplicationNameError → Text #

FromCBOR InstallerHash 
Instance details

Defined in Cardano.Chain.Update.InstallerHash

Methods

fromCBOR ∷ Decoder s InstallerHash #

label ∷ Proxy InstallerHash → Text #

FromCBOR SystemTag 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

fromCBOR ∷ Decoder s SystemTag #

label ∷ Proxy SystemTag → Text #

FromCBOR ProtocolParametersUpdate 
Instance details

Defined in Cardano.Chain.Update.ProtocolParametersUpdate

Methods

fromCBOR ∷ Decoder s ProtocolParametersUpdate #

label ∷ Proxy ProtocolParametersUpdate → Text #

FromCBOR SoftforkRule 
Instance details

Defined in Cardano.Chain.Update.SoftforkRule

Methods

fromCBOR ∷ Decoder s SoftforkRule #

label ∷ Proxy SoftforkRule → Text #

FromCBOR SoftwareVersionError 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

fromCBOR ∷ Decoder s SoftwareVersionError #

label ∷ Proxy SoftwareVersionError → Text #

FromCBOR SystemTagError 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

fromCBOR ∷ Decoder s SystemTagError #

label ∷ Proxy SystemTagError → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Voting

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Adopted 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s Adopted #

label ∷ Proxy Adopted → Text #

FromCBOR ActiveSlotCoeff 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s ActiveSlotCoeff #

label ∷ Proxy ActiveSlotCoeff → Text #

FromCBOR DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s DnsName #

label ∷ Proxy DnsName → Text #

FromCBOR Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Port #

label ∷ Proxy Port → Text #

FromCBOR Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Url #

label ∷ Proxy Url → Text #

FromCBOR DeltaCoin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s DeltaCoin #

label ∷ Proxy DeltaCoin → Text #

FromCBOR TicknState 
Instance details

Defined in Shelley.Spec.Ledger.STS.Tickn

Methods

fromCBOR ∷ Decoder s TicknState #

label ∷ Proxy TicknState → Text #

FromCBOR ChainCode 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

fromCBOR ∷ Decoder s ChainCode #

label ∷ Proxy ChainCode → Text #

FromCBOR AccountState 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s AccountState #

label ∷ Proxy AccountState → Text #

FromCBOR LogWeight 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s LogWeight #

label ∷ Proxy LogWeight → Text #

FromCBOR MIRPot 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s MIRPot #

label ∷ Proxy MIRPot → Text #

FromCBOR KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

fromCBOR ∷ Decoder s KESPeriod #

label ∷ Proxy KESPeriod → Text #

FromCBOR PerformanceEstimate 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s PerformanceEstimate #

label ∷ Proxy PerformanceEstimate → Text #

FromCBOR RewardType 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s RewardType #

label ∷ Proxy RewardType → Text #

FromCBOR VotingPeriod 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

fromCBOR ∷ Decoder s VotingPeriod #

label ∷ Proxy VotingPeriod → Text #

FromCBOR TxValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

fromCBOR ∷ Decoder s TxValidationError #

label ∷ Proxy TxValidationError → Text #

FromCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

fromCBOR ∷ Decoder s Certificate #

label ∷ Proxy Certificate → Text #

FromCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

fromCBOR ∷ Decoder s OperationalCertificateIssueCounter #

label ∷ Proxy OperationalCertificateIssueCounter → Text #

FromCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

fromCBOR ∷ Decoder s OperationalCertificate #

label ∷ Proxy OperationalCertificate → Text #

FromCBOR a ⇒ FromCBOR [a] 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s [a] #

label ∷ Proxy [a] → Text #

FromCBOR a ⇒ FromCBOR (Maybe a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Maybe a) #

label ∷ Proxy (Maybe a) → Text #

(Integral a, FromCBOR a) ⇒ FromCBOR (Ratio a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Ratio a) #

label ∷ Proxy (Ratio a) → Text #

(Ord a, FromCBOR a) ⇒ FromCBOR (Set a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Set a) #

label ∷ Proxy (Set a) → Text #

FromCBOR a ⇒ FromCBOR (NonEmpty a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (NonEmpty a) #

label ∷ Proxy (NonEmpty a) → Text #

(Serialise t, Typeable t) ⇒ FromCBOR (WithOrigin t) 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s (WithOrigin t) #

label ∷ Proxy (WithOrigin t) → Text #

FromCBOR a ⇒ FromCBOR (Vector a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Vector a) #

label ∷ Proxy (Vector a) → Text #

(Era era, Ord (Script era), FromCBOR (Annotator (Script era)), Script era ~ Script era) ⇒ FromCBOR (Annotator (AuxiliaryData era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryData era)) #

label ∷ Proxy (Annotator (AuxiliaryData era)) → Text #

(FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Script era)), FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (Witnesses era)), ToCBOR (AuxiliaryData era), ToCBOR (Script era), ToCBOR (TxBody era), ToCBOR (Witnesses era), ValidateScript era, Script era ~ Script era, Era era) ⇒ FromCBOR (Annotator (TxSeq era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxSeq

Methods

fromCBOR ∷ Decoder s (Annotator (TxSeq era)) #

label ∷ Proxy (Annotator (TxSeq era)) → Text #

(Era era, ValidateScript era, Script era ~ Script era) ⇒ FromCBOR (Annotator (TxWitness era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (TxWitness era)) #

label ∷ Proxy (Annotator (TxWitness era)) → Text #

(Typeable t, FromCBOR (Annotator t)) ⇒ FromCBOR (Annotator (MemoBytes t)) 
Instance details

Defined in Data.MemoBytes

Methods

fromCBOR ∷ Decoder s (Annotator (MemoBytes t)) #

label ∷ Proxy (Annotator (MemoBytes t)) → Text #

(Era era, ToCBOR (Data era), ToCBOR (Script era), Typeable (Script era), ValidateScript era, Script era ~ Script era) ⇒ FromCBOR (Annotator (TxWitnessRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (TxWitnessRaw era)) #

label ∷ Proxy (Annotator (TxWitnessRaw era)) → Text #

(Typeable era, FromCBOR (Annotator (Script era)), ValidateScript era) ⇒ FromCBOR (Annotator (WitnessSetHKD Identity era)) 
Instance details

Defined in Shelley.Spec.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessSetHKD Identity era)) #

label ∷ Proxy (Annotator (WitnessSetHKD Identity era)) → Text #

(BlockAnn era, Typeable era) ⇒ FromCBOR (Annotator (TxSeq era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (TxSeq era)) #

label ∷ Proxy (Annotator (TxSeq era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (Timelock crypto)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s (Annotator (Timelock crypto)) #

label ∷ Proxy (Annotator (Timelock crypto)) → Text #

(Era era, FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Witnesses era))) ⇒ FromCBOR (Annotator (Tx era)) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (Tx era)) #

label ∷ Proxy (Annotator (Tx era)) → Text #

(Era era, FromCBOR (TxOut era), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

(Era era, FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Witnesses era))) ⇒ FromCBOR (Annotator (TxRaw era)) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (TxRaw era)) #

label ∷ Proxy (Annotator (TxRaw era)) → Text #

FamsFrom era ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), SerialisableData (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (MultiSig crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (MultiSig crypto)) #

label ∷ Proxy (Annotator (MultiSig crypto)) → Text #

Typeable era ⇒ FromCBOR (Annotator (Metadata era)) 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

fromCBOR ∷ Decoder s (Annotator (Metadata era)) #

label ∷ Proxy (Annotator (Metadata era)) → Text #

(Era era, AnnotatedData (Script era)) ⇒ FromCBOR (Annotator (AuxiliaryData era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryData era)) #

label ∷ Proxy (Annotator (AuxiliaryData era)) → Text #

FamsFrom era ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

(Crypto (Crypto era), Typeable (Crypto era), Typeable era) ⇒ FromCBOR (Annotator (Script era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (Script era)) #

label ∷ Proxy (Annotator (Script era)) → Text #

Typeable era ⇒ FromCBOR (Annotator (Data era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (Data era)) #

label ∷ Proxy (Annotator (Data era)) → Text #

(Era era, Ord (Script era), FromCBOR (Annotator (Script era)), Script era ~ Script era) ⇒ FromCBOR (Annotator (AuxiliaryDataRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryDataRaw era)) #

label ∷ Proxy (Annotator (AuxiliaryDataRaw era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (TimelockRaw crypto)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s (Annotator (TimelockRaw crypto)) #

label ∷ Proxy (Annotator (TimelockRaw crypto)) → Text #

(Era era, AnnotatedData (Script era)) ⇒ FromCBOR (Annotator (AuxiliaryDataRaw era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryDataRaw era)) #

label ∷ Proxy (Annotator (AuxiliaryDataRaw era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (BHeader crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (BHeader crypto)) #

label ∷ Proxy (Annotator (BHeader crypto)) → Text #

(BlockAnn era, ValidateScript era, SupportsSegWit era, FromCBOR (Annotator (TxSeq era))) ⇒ FromCBOR (Annotator (Block era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (Block era)) #

label ∷ Proxy (Annotator (Block era)) → Text #

(Typeable kr, Crypto crypto) ⇒ FromCBOR (Annotator (WitVKey kr crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (WitVKey kr crypto)) #

label ∷ Proxy (Annotator (WitVKey kr crypto)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (BootstrapWitness crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

fromCBOR ∷ Decoder s (Annotator (BootstrapWitness crypto)) #

label ∷ Proxy (Annotator (BootstrapWitness crypto)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (MultiSigRaw crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (MultiSigRaw crypto)) #

label ∷ Proxy (Annotator (MultiSigRaw crypto)) → Text #

ShelleyBasedEra era ⇒ FromCBOR (Annotator (Header (ShelleyBlock era))) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (Annotator (Header (ShelleyBlock era))) #

label ∷ Proxy (Annotator (Header (ShelleyBlock era))) → Text #

ShelleyBasedEra era ⇒ FromCBOR (Annotator (ShelleyBlock era)) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (Annotator (ShelleyBlock era)) #

label ∷ Proxy (Annotator (ShelleyBlock era)) → Text #

Era era ⇒ FromCBOR (Annotator (RedeemersRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (RedeemersRaw era)) #

label ∷ Proxy (Annotator (RedeemersRaw era)) → Text #

Era era ⇒ FromCBOR (Annotator (WitnessPPData era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessPPData era)) #

label ∷ Proxy (Annotator (WitnessPPData era)) → Text #

Era era ⇒ FromCBOR (Annotator (Redeemers era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (Redeemers era)) #

label ∷ Proxy (Annotator (Redeemers era)) → Text #

Era era ⇒ FromCBOR (Annotator (WitnessPPDataRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessPPDataRaw era)) #

label ∷ Proxy (Annotator (WitnessPPDataRaw era)) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

(Era era, BlockAnn era, ValidateScript era, TxSeq era ~ TxSeq era) ⇒ FromCBOR (Annotator (LaxBlock era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (LaxBlock era)) #

label ∷ Proxy (Annotator (LaxBlock era)) → Text #

(TransTxBody FromCBOR era, ToCBOR (PParamsDelta era), Era era) ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

FromCBOR (SigDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (SigDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (SigDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed25519DSIGN) #

label ∷ Proxy (SigDSIGN Ed25519DSIGN) → Text #

FromCBOR (SigDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (SigDSIGN MockDSIGN) #

label ∷ Proxy (SigDSIGN MockDSIGN) → Text #

FromCBOR (SigDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed448DSIGN) #

label ∷ Proxy (SigDSIGN Ed448DSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed25519DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed25519DSIGN) → Text #

FromCBOR (SignKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN MockDSIGN) #

label ∷ Proxy (SignKeyDSIGN MockDSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed448DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed448DSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed25519DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed25519DSIGN) → Text #

FromCBOR (VerKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN MockDSIGN) #

label ∷ Proxy (VerKeyDSIGN MockDSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed448DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed448DSIGN) → Text #

Crypto crypto ⇒ FromCBOR (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

fromCBOR ∷ Decoder s (ScriptHash crypto) #

label ∷ Proxy (ScriptHash crypto) → Text #

FromCBOR a ⇒ FromCBOR (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

fromCBOR ∷ Decoder s (StrictMaybe a) #

label ∷ Proxy (StrictMaybe a) → Text #

Crypto crypto ⇒ FromCBOR (AuxiliaryDataHash crypto) 
Instance details

Defined in Cardano.Ledger.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (AuxiliaryDataHash crypto) #

label ∷ Proxy (AuxiliaryDataHash crypto) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (PPUPState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (PPUPState era) #

label ∷ Proxy (PPUPState era) → Text #

Crypto crypto ⇒ FromCBOR (Value crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (Value crypto) #

label ∷ Proxy (Value crypto) → Text #

Era era ⇒ FromCBOR (PParamsUpdate era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (PParamsUpdate era) #

label ∷ Proxy (PParamsUpdate era) → Text #

Era era ⇒ FromCBOR (PParams era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (PParams era) #

label ∷ Proxy (PParams era) → Text #

(Era era, TransTxOut DecodeNonNegative era, Show (Value era)) ⇒ FromCBOR (TxOut era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxOut era) #

label ∷ Proxy (TxOut era) → Text #

Era era ⇒ FromCBOR (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (PParams era) #

label ∷ Proxy (PParams era) → Text #

Era era ⇒ FromCBOR (PParamsUpdate era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (PParamsUpdate era) #

label ∷ Proxy (PParamsUpdate era) → Text #

FamsFrom era ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

(FromCBOR (PParams era), TransValue FromCBOR era, HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era), FromCBOR (TxOut era), FromCBOR (State (EraRule "PPUP" era)), Era era) ⇒ FromCBOR (EpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (EpochState era) #

label ∷ Proxy (EpochState era) → Text #

(Era era, HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era), FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (State (EraRule "PPUP" era))) ⇒ FromCBOR (LedgerState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (LedgerState era) #

label ∷ Proxy (LedgerState era) → Text #

(TransValue FromCBOR era, FromCBOR (State (EraRule "PPUP" era)), FromCBOR (TxOut era), HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era)) ⇒ FromCBOR (UTxOState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (UTxOState era) #

label ∷ Proxy (UTxOState era) → Text #

Crypto crypto ⇒ FromCBOR (DPState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (DPState crypto) #

label ∷ Proxy (DPState crypto) → Text #

(Era era, FromCBOR (PParams era), FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (State (EraRule "PPUP" era))) ⇒ FromCBOR (NewEpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (NewEpochState era) #

label ∷ Proxy (NewEpochState era) → Text #

Crypto crypto ⇒ FromCBOR (TxIn crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxIn crypto) #

label ∷ Proxy (TxIn crypto) → Text #

Crypto crypto ⇒ FromCBOR (CompactAddr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.CompactAddr

Methods

fromCBOR ∷ Decoder s (CompactAddr crypto) #

label ∷ Proxy (CompactAddr crypto) → Text #

Crypto crypto ⇒ FromCBOR (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (BlocksMade crypto) #

label ∷ Proxy (BlocksMade crypto) → Text #

Crypto crypto ⇒ FromCBOR (SnapShots crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (SnapShots crypto) #

label ∷ Proxy (SnapShots crypto) → Text #

Crypto crypto ⇒ FromCBOR (NonMyopic crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s (NonMyopic crypto) #

label ∷ Proxy (NonMyopic crypto) → Text #

Crypto crypto ⇒ FromCBOR (PulsingRewUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (PulsingRewUpdate crypto) #

label ∷ Proxy (PulsingRewUpdate crypto) → Text #

Crypto crypto ⇒ FromCBOR (PoolDistr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

fromCBOR ∷ Decoder s (PoolDistr crypto) #

label ∷ Proxy (PoolDistr crypto) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (ProposedPPUpdates era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (ProposedPPUpdates era) #

label ∷ Proxy (ProposedPPUpdates era) → Text #

Era era ⇒ FromCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

fromCBOR ∷ Decoder s (ShelleyGenesis era) #

label ∷ Proxy (ShelleyGenesis era) → Text #

Crypto crypto ⇒ FromCBOR (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (GenDelegPair crypto) #

label ∷ Proxy (GenDelegPair crypto) → Text #

Crypto crypto ⇒ FromCBOR (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

fromCBOR ∷ Decoder s (Addr crypto) #

label ∷ Proxy (Addr crypto) → Text #

Crypto crypto ⇒ FromCBOR (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

fromCBOR ∷ Decoder s (ShelleyGenesisStaking crypto) #

label ∷ Proxy (ShelleyGenesisStaking crypto) → Text #

FromCBOR (CompactForm Coin) 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s (CompactForm Coin) #

label ∷ Proxy (CompactForm Coin) → Text #

Crypto crypto ⇒ FromCBOR (CompactForm (Value crypto)) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (CompactForm (Value crypto)) #

label ∷ Proxy (CompactForm (Value crypto)) → Text #

(FromCBOR (TxOut era), Era era) ⇒ FromCBOR (UTxO era) 
Instance details

Defined in Shelley.Spec.Ledger.UTxO

Methods

fromCBOR ∷ Decoder s (UTxO era) #

label ∷ Proxy (UTxO era) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (Update era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (Update era) #

label ∷ Proxy (Update era) → Text #

(Era era, DecodeNonNegative (Value era), Show (Value era), Compactible (Value era)) ⇒ FromCBOR (TxOut era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (TxOut era) #

label ∷ Proxy (TxOut era) → Text #

Crypto crypto ⇒ FromCBOR (PolicyID crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (PolicyID crypto) #

label ∷ Proxy (PolicyID crypto) → Text #

(ShelleyBased era, FromCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ FromCBOR (ApplyTxError era) 
Instance details

Defined in Shelley.Spec.Ledger.API.Mempool

Methods

fromCBOR ∷ Decoder s (ApplyTxError era) #

label ∷ Proxy (ApplyTxError era) → Text #

(FromCBOR (PredicateFailure (EraRule "DELEGS" era)), FromCBOR (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ FromCBOR (LedgerPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledger

Methods

fromCBOR ∷ Decoder s (LedgerPredicateFailure era) #

label ∷ Proxy (LedgerPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "DELPL" era)), Typeable (Script era)) ⇒ FromCBOR (DelegsPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delegs

Methods

fromCBOR ∷ Decoder s (DelegsPredicateFailure era) #

label ∷ Proxy (DelegsPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "POOL" era)), FromCBOR (PredicateFailure (EraRule "DELEG" era)), Typeable (Script era)) ⇒ FromCBOR (DelplPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delpl

Methods

fromCBOR ∷ Decoder s (DelplPredicateFailure era) #

label ∷ Proxy (DelplPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (PState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (PState crypto) #

label ∷ Proxy (PState crypto) → Text #

Crypto crypto ⇒ FromCBOR (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (PoolParams crypto) #

label ∷ Proxy (PoolParams crypto) → Text #

Crypto crypto ⇒ FromCBOR (InstantaneousRewards crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (InstantaneousRewards crypto) #

label ∷ Proxy (InstantaneousRewards crypto) → Text #

Crypto crypto ⇒ FromCBOR (SnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (SnapShot crypto) #

label ∷ Proxy (SnapShot crypto) → Text #

Crypto crypto ⇒ FromCBOR (ChainDepState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.API.Protocol

Methods

fromCBOR ∷ Decoder s (ChainDepState crypto) #

label ∷ Proxy (ChainDepState crypto) → Text #

Crypto crypto ⇒ FromCBOR (FutureGenDeleg crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (FutureGenDeleg crypto) #

label ∷ Proxy (FutureGenDeleg crypto) → Text #

Crypto crypto ⇒ FromCBOR (DState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (DState crypto) #

label ∷ Proxy (DState crypto) → Text #

Crypto crypto ⇒ FromCBOR (IndividualPoolStake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

fromCBOR ∷ Decoder s (IndividualPoolStake crypto) #

label ∷ Proxy (IndividualPoolStake crypto) → Text #

(TransValue FromCBOR era, TransUTxO FromCBOR era, DecodeNonNegative (Value era), Show (Value era), FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Rules.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (Script era), Typeable (AuxiliaryData era)) ⇒ FromCBOR (UtxowPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxow

Methods

fromCBOR ∷ Decoder s (UtxowPredicateFailure era) #

label ∷ Proxy (UtxowPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s (RewardProvenance crypto) #

label ∷ Proxy (RewardProvenance crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s (RewardProvenancePool crypto) #

label ∷ Proxy (RewardProvenancePool crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

fromCBOR ∷ Decoder s (RewardAcnt crypto) #

label ∷ Proxy (RewardAcnt crypto) → Text #

Crypto crypto ⇒ FromCBOR (TxId crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxId crypto) #

label ∷ Proxy (TxId crypto) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (SigKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (SigKES (SingleKES d)) #

label ∷ Proxy (SigKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (SigKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (SigKES (SumKES h d)) #

label ∷ Proxy (SigKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (SigKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (SigKES (MockKES t)) #

label ∷ Proxy (SigKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (SigKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (SigKES (SimpleKES d t)) #

label ∷ Proxy (SigKES (SimpleKES d t)) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (VerKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SingleKES d)) #

label ∷ Proxy (VerKeyKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (VerKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SumKES h d)) #

label ∷ Proxy (VerKeyKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (VerKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyKES (MockKES t)) #

label ∷ Proxy (VerKeyKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (VerKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SimpleKES d t)) #

label ∷ Proxy (VerKeyKES (SimpleKES d t)) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (SignKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SingleKES d)) #

label ∷ Proxy (SignKeyKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (SignKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SumKES h d)) #

label ∷ Proxy (SignKeyKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (SignKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyKES (MockKES t)) #

label ∷ Proxy (SignKeyKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (SignKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SimpleKES d t)) #

label ∷ Proxy (SignKeyKES (SimpleKES d t)) → Text #

Crypto c ⇒ FromCBOR (ShelleyHash c) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (ShelleyHash c) #

label ∷ Proxy (ShelleyHash c) → Text #

Era era ⇒ FromCBOR (CompactGenesis era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Config

Methods

fromCBOR ∷ Decoder s (CompactGenesis era) #

label ∷ Proxy (CompactGenesis era) → Text #

FromCBOR (ATxAux ByteSpan) 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

fromCBOR ∷ Decoder s (ATxAux ByteSpan) #

label ∷ Proxy (ATxAux ByteSpan) → Text #

FromCBOR (ACertificate ByteSpan) 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

fromCBOR ∷ Decoder s (ACertificate ByteSpan) #

label ∷ Proxy (ACertificate ByteSpan) → Text #

FromCBOR (AProposal ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s (AProposal ByteSpan) #

label ∷ Proxy (AProposal ByteSpan) → Text #

FromCBOR (AVote ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

fromCBOR ∷ Decoder s (AVote ByteSpan) #

label ∷ Proxy (AVote ByteSpan) → Text #

Crypto crypto ⇒ FromCBOR (BHBody crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (BHBody crypto) #

label ∷ Proxy (BHBody crypto) → Text #

Crypto crypto ⇒ FromCBOR (PrevHash crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (PrevHash crypto) #

label ∷ Proxy (PrevHash crypto) → Text #

Crypto crypto ⇒ FromCBOR (HashHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (HashHeader crypto) #

label ∷ Proxy (HashHeader crypto) → Text #

Crypto crypto ⇒ FromCBOR (PrtclState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Prtcl

Methods

fromCBOR ∷ Decoder s (PrtclState crypto) #

label ∷ Proxy (PrtclState crypto) → Text #

Typeable v ⇒ FromCBOR (OutputVRF v) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

fromCBOR ∷ Decoder s (OutputVRF v) #

label ∷ Proxy (OutputVRF v) → Text #

FromCBOR (CertVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (CertVRF PraosVRF) #

label ∷ Proxy (CertVRF PraosVRF) → Text #

FromCBOR (CertVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (CertVRF MockVRF) #

label ∷ Proxy (CertVRF MockVRF) → Text #

FromCBOR (CertVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (CertVRF SimpleVRF) #

label ∷ Proxy (CertVRF SimpleVRF) → Text #

FromCBOR (SignKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (SignKeyVRF PraosVRF) #

label ∷ Proxy (SignKeyVRF PraosVRF) → Text #

FromCBOR (SignKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyVRF MockVRF) #

label ∷ Proxy (SignKeyVRF MockVRF) → Text #

FromCBOR (SignKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (SignKeyVRF SimpleVRF) #

label ∷ Proxy (SignKeyVRF SimpleVRF) → Text #

FromCBOR (VerKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (VerKeyVRF PraosVRF) #

label ∷ Proxy (VerKeyVRF PraosVRF) → Text #

FromCBOR (VerKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyVRF MockVRF) #

label ∷ Proxy (VerKeyVRF MockVRF) → Text #

FromCBOR (VerKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (VerKeyVRF SimpleVRF) #

label ∷ Proxy (VerKeyVRF SimpleVRF) → Text #

Typeable a ⇒ FromCBOR (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

fromCBOR ∷ Decoder s (RedeemSignature a) #

label ∷ Proxy (RedeemSignature a) → Text #

Typeable a ⇒ FromCBOR (Signature a) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

fromCBOR ∷ Decoder s (Signature a) #

label ∷ Proxy (Signature a) → Text #

Typeable era ⇒ FromCBOR (LangDepView era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (LangDepView era) #

label ∷ Proxy (LangDepView era) → Text #

Crypto crypto ⇒ FromCBOR (CollectError crypto) 
Instance details

Defined in Cardano.Ledger.Alonzo.PlutusScriptApi

Methods

fromCBOR ∷ Decoder s (CollectError crypto) #

label ∷ Proxy (CollectError crypto) → Text #

(Typeable c, Crypto c) ⇒ FromCBOR (ScriptPurpose c) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (ScriptPurpose c) #

label ∷ Proxy (ScriptPurpose c) → Text #

Crypto crypto ⇒ FromCBOR (Wdrl crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Wdrl crypto) #

label ∷ Proxy (Wdrl crypto) → Text #

Crypto crypto ⇒ FromCBOR (DCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (DCert crypto) #

label ∷ Proxy (DCert crypto) → Text #

(Typeable era, FromCBOR (BbodyPredicateFailure era)) ⇒ FromCBOR (AlonzoBbodyPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Bbody

Methods

fromCBOR ∷ Decoder s (AlonzoBbodyPredFail era) #

label ∷ Proxy (AlonzoBbodyPredFail era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (Script era), Typeable (AuxiliaryData era)) ⇒ FromCBOR (AlonzoPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxow

Methods

fromCBOR ∷ Decoder s (AlonzoPredFail era) #

label ∷ Proxy (AlonzoPredFail era) → Text #

Crypto crypto ⇒ FromCBOR (GenDelegs crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (GenDelegs crypto) #

label ∷ Proxy (GenDelegs crypto) → Text #

(Era era, FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (PredicateFailure (EraRule "UTXOS" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxosPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxos

Methods

fromCBOR ∷ Decoder s (UtxosPredicateFailure era) #

label ∷ Proxy (UtxosPredicateFailure era) → Text #

Era era ⇒ FromCBOR (PpupPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

fromCBOR ∷ Decoder s (PpupPredicateFailure era) #

label ∷ Proxy (PpupPredicateFailure era) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

FromCBOR (ABody ByteSpan) 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

fromCBOR ∷ Decoder s (ABody ByteSpan) #

label ∷ Proxy (ABody ByteSpan) → Text #

FromCBOR (APayload ByteSpan) 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

fromCBOR ∷ Decoder s (APayload ByteSpan) #

label ∷ Proxy (APayload ByteSpan) → Text #

FromCBOR (ABlockSignature ByteSpan) 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s (ABlockSignature ByteSpan) #

label ∷ Proxy (ABlockSignature ByteSpan) → Text #

FromCBOR (ATxPayload ByteSpan) 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

fromCBOR ∷ Decoder s (ATxPayload ByteSpan) #

label ∷ Proxy (ATxPayload ByteSpan) → Text #

FromCBOR (APayload ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

fromCBOR ∷ Decoder s (APayload ByteSpan) #

label ∷ Proxy (APayload ByteSpan) → Text #

FromCBOR (Attributes ()) 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

fromCBOR ∷ Decoder s (Attributes ()) #

label ∷ Proxy (Attributes ()) → Text #

FromCBOR (Attributes AddrAttributes) 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

fromCBOR ∷ Decoder s (Attributes AddrAttributes) #

label ∷ Proxy (Attributes AddrAttributes) → Text #

FromCBOR a ⇒ FromCBOR (MerkleRoot a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

fromCBOR ∷ Decoder s (MerkleRoot a) #

label ∷ Proxy (MerkleRoot a) → Text #

(FromCBOR a, ToCBOR a) ⇒ FromCBOR (MerkleTree a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

fromCBOR ∷ Decoder s (MerkleTree a) #

label ∷ Proxy (MerkleTree a) → Text #

FromCBOR n ⇒ FromCBOR (TooLarge n) 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s (TooLarge n) #

label ∷ Proxy (TooLarge n) → Text #

Crypto crypto ⇒ FromCBOR (CompactValue crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (CompactValue crypto) #

label ∷ Proxy (CompactValue crypto) → Text #

Crypto crypto ⇒ FromCBOR (LastAppliedBlock crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (LastAppliedBlock crypto) #

label ∷ Proxy (LastAppliedBlock crypto) → Text #

(FromCBORGroup a, ToCBORGroup a) ⇒ FromCBOR (CBORGroup a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

fromCBOR ∷ Decoder s (CBORGroup a) #

label ∷ Proxy (CBORGroup a) → Text #

Crypto crypto ⇒ FromCBOR (MIRCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (MIRCert crypto) #

label ∷ Proxy (MIRCert crypto) → Text #

Crypto crypto ⇒ FromCBOR (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (StakeCreds crypto) #

label ∷ Proxy (StakeCreds crypto) → Text #

Crypto crypto ⇒ FromCBOR (Stake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (Stake crypto) #

label ∷ Proxy (Stake crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardSnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardSnapShot crypto) #

label ∷ Proxy (RewardSnapShot crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardUpdate crypto) #

label ∷ Proxy (RewardUpdate crypto) → Text #

Crypto c ⇒ FromCBOR (RewardAns c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardAns c) #

label ∷ Proxy (RewardAns c) → Text #

Crypto c ⇒ FromCBOR (Pulser c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (Pulser c) #

label ∷ Proxy (Pulser c) → Text #

Crypto crypto ⇒ FromCBOR (OBftSlot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OverlaySchedule

Methods

fromCBOR ∷ Decoder s (OBftSlot crypto) #

label ∷ Proxy (OBftSlot crypto) → Text #

Crypto crypto ⇒ FromCBOR (FreeVars crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (FreeVars crypto) #

label ∷ Proxy (FreeVars crypto) → Text #

Crypto crypto ⇒ FromCBOR (Reward crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s (Reward crypto) #

label ∷ Proxy (Reward crypto) → Text #

(Era era, Typeable (Script era)) ⇒ FromCBOR (DelegPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Deleg

Methods

fromCBOR ∷ Decoder s (DelegPredicateFailure era) #

label ∷ Proxy (DelegPredicateFailure era) → Text #

Era era ⇒ FromCBOR (PoolPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Pool

Methods

fromCBOR ∷ Decoder s (PoolPredicateFailure era) #

label ∷ Proxy (PoolPredicateFailure era) → Text #

(ShelleyBased era, FromCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ FromCBOR (LedgersPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledgers

Methods

fromCBOR ∷ Decoder s (LedgersPredicateFailure era) #

label ∷ Proxy (LedgersPredicateFailure era) → Text #

(TransValue FromCBOR era, TransUTxO FromCBOR era, DecodeNonNegative (Value era), Show (Value era), FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (MIRTarget crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (MIRTarget crypto) #

label ∷ Proxy (MIRTarget crypto) → Text #

(FromCBOR (TxOut era), Era era, FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

FromCBOR a ⇒ FromCBOR (CborSeq a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

fromCBOR ∷ Decoder s (CborSeq a) #

label ∷ Proxy (CborSeq a) → Text #

FromCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakePoolKey) #

label ∷ Proxy (VerificationKey StakePoolKey) → Text #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateKey) #

label ∷ Proxy (VerificationKey GenesisDelegateKey) → Text #

FromCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisExtendedKey) #

label ∷ Proxy (VerificationKey GenesisExtendedKey) → Text #

FromCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisKey) #

label ∷ Proxy (VerificationKey GenesisKey) → Text #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeKey) #

label ∷ Proxy (VerificationKey StakeKey) → Text #

FromCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentExtendedKey) #

label ∷ Proxy (VerificationKey PaymentExtendedKey) → Text #

FromCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentKey) #

label ∷ Proxy (VerificationKey PaymentKey) → Text #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

FromCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakePoolKey) #

label ∷ Proxy (SigningKey StakePoolKey) → Text #

FromCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisUTxOKey) #

label ∷ Proxy (SigningKey GenesisUTxOKey) → Text #

FromCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateExtendedKey) #

label ∷ Proxy (SigningKey GenesisDelegateExtendedKey) → Text #

FromCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateKey) #

label ∷ Proxy (SigningKey GenesisDelegateKey) → Text #

FromCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisExtendedKey) #

label ∷ Proxy (SigningKey GenesisExtendedKey) → Text #

FromCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisKey) #

label ∷ Proxy (SigningKey GenesisKey) → Text #

FromCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeExtendedKey) #

label ∷ Proxy (SigningKey StakeExtendedKey) → Text #

FromCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeKey) #

label ∷ Proxy (SigningKey StakeKey) → Text #

FromCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentExtendedKey) #

label ∷ Proxy (SigningKey PaymentExtendedKey) → Text #

FromCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentKey) #

label ∷ Proxy (SigningKey PaymentKey) → Text #

FromCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKeyLegacy) #

label ∷ Proxy (SigningKey ByronKeyLegacy) → Text #

FromCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKey) #

label ∷ Proxy (SigningKey ByronKey) → Text #

FromCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey VrfKey) #

label ∷ Proxy (SigningKey VrfKey) → Text #

FromCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey KesKey) #

label ∷ Proxy (SigningKey KesKey) → Text #

Typeable lang ⇒ FromCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

fromCBOR ∷ Decoder s (PlutusScript lang) #

label ∷ Proxy (PlutusScript lang) → Text #

(Typeable era, TransLedgerState FromCBOR (ShelleyLedgerEra era)) ⇒ FromCBOR (DebugLedgerState era) Source # 
Instance details

Defined in Cardano.Api.Query

Methods

fromCBOR ∷ Decoder s (DebugLedgerState era) #

label ∷ Proxy (DebugLedgerState era) → Text #

(FromCBOR a, FromCBOR b) ⇒ FromCBOR (Either a b) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Either a b) #

label ∷ Proxy (Either a b) → Text #

(FromCBOR a, FromCBOR b) ⇒ FromCBOR (a, b) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b) #

label ∷ Proxy (a, b) → Text #

(Ord k, FromCBOR k, FromCBOR v) ⇒ FromCBOR (Map k v) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Map k v) #

label ∷ Proxy (Map k v) → Text #

(HashAlgorithm h, Typeable a) ⇒ FromCBOR (Hash h a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

fromCBOR ∷ Decoder s (Hash h a) #

label ∷ Proxy (Hash h a) → Text #

(Crypto crypto, Typeable disc) ⇒ FromCBOR (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (KeyHash disc crypto) #

label ∷ Proxy (KeyHash disc crypto) → Text #

(Typeable index, Crypto c) ⇒ FromCBOR (SafeHash c index) 
Instance details

Defined in Cardano.Ledger.SafeHash

Methods

fromCBOR ∷ Decoder s (SafeHash c index) #

label ∷ Proxy (SafeHash c index) → Text #

(Typeable kr, Crypto crypto) ⇒ FromCBOR (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

fromCBOR ∷ Decoder s (Credential kr crypto) #

label ∷ Proxy (Credential kr crypto) → Text #

(Typeable algo, Typeable a, HashAlgorithm algo) ⇒ FromCBOR (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

fromCBOR ∷ Decoder s (AbstractHash algo a) #

label ∷ Proxy (AbstractHash algo a) → Text #

(Crypto crypto, Typeable kd) ⇒ FromCBOR (VKey kd crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (VKey kd crypto) #

label ∷ Proxy (VKey kd crypto) → Text #

(VRFAlgorithm v, Typeable a) ⇒ FromCBOR (CertifiedVRF v a) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

fromCBOR ∷ Decoder s (CertifiedVRF v a) #

label ∷ Proxy (CertifiedVRF v a) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c) ⇒ FromCBOR (a, b, c) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c) #

label ∷ Proxy (a, b, c) → Text #

(Typeable s, FromCBOR a) ⇒ FromCBOR (Tagged s a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s0 (Tagged s a) #

label ∷ Proxy (Tagged s a) → Text #

(Ord a, Ord b, FromCBOR a, FromCBOR b) ⇒ FromCBOR (BiMap b a b) 
Instance details

Defined in Control.Iterate.SetAlgebra

Methods

fromCBOR ∷ Decoder s (BiMap b a b) #

label ∷ Proxy (BiMap b a b) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d) ⇒ FromCBOR (a, b, c, d) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d) #

label ∷ Proxy (a, b, c, d) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d, FromCBOR e) ⇒ FromCBOR (a, b, c, d, e) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d, e) #

label ∷ Proxy (a, b, c, d, e) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d, FromCBOR e, FromCBOR f, FromCBOR g) ⇒ FromCBOR (a, b, c, d, e, f, g) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d, e, f, g) #

label ∷ Proxy (a, b, c, d, e, f, g) → Text #

class Typeable a ⇒ ToCBOR a where #

Minimal complete definition

toCBOR

Methods

toCBOR ∷ a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy a → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [a] → Size #

Instances

Instances details
ToCBOR Bool 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Bool → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Bool → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Bool] → Size #

ToCBOR Float 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Float → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Float → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Float] → Size #

ToCBOR Int 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int] → Size #

ToCBOR Int32 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int32 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int32 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int32] → Size #

ToCBOR Int64 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int64 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int64 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int64] → Size #

ToCBOR Integer 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Integer → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Integer → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Integer] → Size #

ToCBOR Natural 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Natural → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Natural → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Natural] → Size #

ToCBOR Word 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word] → Size #

ToCBOR Word8 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word8 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word8 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word8] → Size #

ToCBOR Word16 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word16 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word16 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word16] → Size #

ToCBOR Word32 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word32 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word32 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word32] → Size #

ToCBOR Word64 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word64 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word64 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word64] → Size #

ToCBOR () 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ () → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy () → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [()] → Size #

ToCBOR ByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByteString] → Size #

ToCBOR ShortByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ShortByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ShortByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShortByteString] → Size #

ToCBOR ByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByteString] → Size #

ToCBOR Nano 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Nano → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Nano → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Nano] → Size #

ToCBOR Pico 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Pico → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Pico → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Pico] → Size #

ToCBOR Void 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Void → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Void → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Void] → Size #

ToCBOR Text 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Text → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Text → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Text] → Size #

ToCBOR UTCTime 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ UTCTime → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTCTime → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTCTime] → Size #

ToCBOR NominalDiffTime 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ NominalDiffTime → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy NominalDiffTime → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NominalDiffTime] → Size #

ToCBOR BlockNo 
Instance details

Defined in Cardano.Slotting.Block

Methods

toCBOR ∷ BlockNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockNo] → Size #

ToCBOR EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ EpochNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochNo] → Size #

ToCBOR SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ SlotNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotNo] → Size #

ToCBOR Raw 
Instance details

Defined in Cardano.Binary.Raw

Methods

toCBOR ∷ Raw → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Raw → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Raw] → Size #

ToCBOR Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ Coin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Coin → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Coin] → Size #

ToCBOR UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ UnitInterval → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UnitInterval → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UnitInterval] → Size #

ToCBOR ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ ProtVer → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtVer → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtVer] → Size #

ToCBOR AlonzoGenesis 
Instance details

Defined in Cardano.Ledger.Alonzo.Genesis

Methods

toCBOR ∷ AlonzoGenesis → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AlonzoGenesis → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoGenesis] → Size #

ToCBOR Language 
Instance details

Defined in Cardano.Ledger.Alonzo.Language

Methods

toCBOR ∷ Language → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Language → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Language] → Size #

ToCBOR CostModel 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ CostModel → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CostModel → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CostModel] → Size #

ToCBOR Prices 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Prices → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Prices → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Prices] → Size #

ToCBOR ExUnits 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ ExUnits → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ExUnits → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ExUnits] → Size #

ToCBOR Metadatum 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

toCBOR ∷ Metadatum → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Metadatum → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Metadatum] → Size #

ToCBOR AssetName 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ AssetName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AssetName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AssetName] → Size #

ToCBOR Likelihood 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ Likelihood → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Likelihood → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Likelihood] → Size #

ToCBOR Ptr 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ Ptr → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Ptr → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Ptr] → Size #

ToCBOR Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Nonce → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Nonce → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Nonce] → Size #

ToCBOR Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ Desirability → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Desirability → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Desirability] → Size #

ToCBOR StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ StakePoolRelay → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy StakePoolRelay → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StakePoolRelay] → Size #

ToCBOR PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ PoolMetadata → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy PoolMetadata → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolMetadata] → Size #

ToCBOR Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Network → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Network → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Network] → Size #

ToCBOR ValidityInterval 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

toCBOR ∷ ValidityInterval → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ValidityInterval → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ValidityInterval] → Size #

ToCBOR ByronHash 
Instance details

Defined in Ouroboros.Consensus.Byron.Ledger.Block

Methods

toCBOR ∷ ByronHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByronHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByronHash] → Size #

ToCBOR EpochAndSlotCount 
Instance details

Defined in Cardano.Chain.Slotting.EpochAndSlotCount

Methods

toCBOR ∷ EpochAndSlotCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochAndSlotCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochAndSlotCount] → Size #

ToCBOR EpochNumber 
Instance details

Defined in Cardano.Chain.Slotting.EpochNumber

Methods

toCBOR ∷ EpochNumber → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochNumber → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochNumber] → Size #

ToCBOR EpochSlots 
Instance details

Defined in Cardano.Chain.Slotting.EpochSlots

Methods

toCBOR ∷ EpochSlots → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochSlots → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochSlots] → Size #

ToCBOR SlotCount 
Instance details

Defined in Cardano.Chain.Slotting.SlotCount

Methods

toCBOR ∷ SlotCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotCount] → Size #

ToCBOR SlotNumber 
Instance details

Defined in Cardano.Chain.Slotting.SlotNumber

Methods

toCBOR ∷ SlotNumber → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotNumber → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotNumber] → Size #

ToCBOR Config 
Instance details

Defined in Cardano.Chain.Genesis.Config

Methods

toCBOR ∷ Config → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Config → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Config] → Size #

ToCBOR GenesisNonAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.NonAvvmBalances

Methods

toCBOR ∷ GenesisNonAvvmBalances → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisNonAvvmBalances → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisNonAvvmBalances] → Size #

ToCBOR GenesisDelegation 
Instance details

Defined in Cardano.Chain.Genesis.Delegation

Methods

toCBOR ∷ GenesisDelegation → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisDelegation → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisDelegation] → Size #

ToCBOR GenesisKeyHashes 
Instance details

Defined in Cardano.Chain.Genesis.KeyHashes

Methods

toCBOR ∷ GenesisKeyHashes → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisKeyHashes → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisKeyHashes] → Size #

ToCBOR CompactAddress 
Instance details

Defined in Cardano.Chain.Common.Compact

Methods

toCBOR ∷ CompactAddress → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactAddress → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactAddress] → Size #

ToCBOR RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toCBOR ∷ RequiresNetworkMagic → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RequiresNetworkMagic → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RequiresNetworkMagic] → Size #

ToCBOR GenesisAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.AvvmBalances

Methods

toCBOR ∷ GenesisAvvmBalances → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisAvvmBalances → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisAvvmBalances] → Size #

ToCBOR ProtocolParameters 
Instance details

Defined in Cardano.Chain.Update.ProtocolParameters

Methods

toCBOR ∷ ProtocolParameters → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolParameters → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolParameters] → Size #

ToCBOR ProtocolVersion 
Instance details

Defined in Cardano.Chain.Update.ProtocolVersion

Methods

toCBOR ∷ ProtocolVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolVersion] → Size #

ToCBOR ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toCBOR ∷ ProtocolMagicId → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolMagicId → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolMagicId] → Size #

ToCBOR Certificate 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

toCBOR ∷ Certificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Certificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Certificate] → Size #

ToCBOR SigningKey 
Instance details

Defined in Cardano.Crypto.Signing.SigningKey

Methods

toCBOR ∷ SigningKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SigningKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey] → Size #

ToCBOR SoftwareVersion 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

toCBOR ∷ SoftwareVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareVersion] → Size #

ToCBOR VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

toCBOR ∷ VerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey] → Size #

ToCBOR KeyHash 
Instance details

Defined in Cardano.Chain.Common.KeyHash

Methods

toCBOR ∷ KeyHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy KeyHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KeyHash] → Size #

ToCBOR GenesisHash 
Instance details

Defined in Cardano.Chain.Genesis.Hash

Methods

toCBOR ∷ GenesisHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisHash] → Size #

ToCBOR CandidateProtocolUpdate 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ CandidateProtocolUpdate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CandidateProtocolUpdate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CandidateProtocolUpdate] → Size #

ToCBOR Endorsement 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ Endorsement → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Endorsement → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Endorsement] → Size #

ToCBOR ApplyMempoolPayloadErr 
Instance details

Defined in Cardano.Chain.Byron.API.Mempool

Methods

toCBOR ∷ ApplyMempoolPayloadErr → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplyMempoolPayloadErr → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplyMempoolPayloadErr] → Size #

ToCBOR Tx 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ Tx → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Tx → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tx] → Size #

ToCBOR Proposal 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toCBOR ∷ Proposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proposal] → Size #

ToCBOR Vote 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

toCBOR ∷ Vote → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Vote → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Vote] → Size #

ToCBOR ChainValidationState 
Instance details

Defined in Cardano.Chain.Block.Validation

Methods

toCBOR ∷ ChainValidationState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainValidationState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainValidationState] → Size #

ToCBOR Map 
Instance details

Defined in Cardano.Chain.Delegation.Map

Methods

toCBOR ∷ Map → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Map → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Map] → Size #

ToCBOR ScheduledDelegation 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ ScheduledDelegation → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ScheduledDelegation → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScheduledDelegation] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR UTxO 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

toCBOR ∷ UTxO → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxO → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxO] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR ToSign 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toCBOR ∷ ToSign → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ToSign → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ToSign] → Size #

ToCBOR CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

toCBOR ∷ CompactRedeemVerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactRedeemVerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactRedeemVerificationKey] → Size #

ToCBOR Lovelace 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

toCBOR ∷ Lovelace → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Lovelace → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Lovelace] → Size #

ToCBOR SystemStart 
Instance details

Defined in Cardano.Slotting.Time

Methods

toCBOR ∷ SystemStart → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemStart → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemStart] → Size #

ToCBOR Point 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ Point → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Point → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Point] → Size #

ToCBOR Proof 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ Proof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proof] → Size #

ToCBOR SignKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ SignKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SignKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKey] → Size #

ToCBOR VerKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ VerKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VerKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKey] → Size #

ToCBOR RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

toCBOR ∷ RedeemVerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RedeemVerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemVerificationKey] → Size #

ToCBOR RedeemSigningKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.SigningKey

Methods

toCBOR ∷ RedeemSigningKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RedeemSigningKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemSigningKey] → Size #

ToCBOR IsValidating 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ IsValidating → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy IsValidating → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [IsValidating] → Size #

ToCBOR Tag 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Tag → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Tag → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tag] → Size #

ToCBOR ChainDifficulty 
Instance details

Defined in Cardano.Chain.Common.ChainDifficulty

Methods

toCBOR ∷ ChainDifficulty → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainDifficulty → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainDifficulty] → Size #

ToCBOR Proof 
Instance details

Defined in Cardano.Chain.Block.Proof

Methods

toCBOR ∷ Proof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proof] → Size #

ToCBOR SscPayload 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toCBOR ∷ SscPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SscPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SscPayload] → Size #

ToCBOR ProposalBody 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toCBOR ∷ ProposalBody → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProposalBody → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProposalBody] → Size #

ToCBOR TxInWitness 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toCBOR ∷ TxInWitness → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxInWitness → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxInWitness] → Size #

ToCBOR Body 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

toCBOR ∷ Body → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Body → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Body] → Size #

ToCBOR TxPayload 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

toCBOR ∷ TxPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxPayload] → Size #

ToCBOR Payload 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

toCBOR ∷ Payload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Payload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Payload] → Size #

ToCBOR Payload 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

toCBOR ∷ Payload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Payload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Payload] → Size #

ToCBOR BlockSignature 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toCBOR ∷ BlockSignature → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockSignature → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockSignature] → Size #

ToCBOR TxProof 
Instance details

Defined in Cardano.Chain.UTxO.TxProof

Methods

toCBOR ∷ TxProof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxProof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxProof] → Size #

ToCBOR SscProof 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toCBOR ∷ SscProof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SscProof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SscProof] → Size #

ToCBOR CompactTxIn 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxIn → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxIn → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxIn] → Size #

ToCBOR CompactTxOut 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxOut → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxOut → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxOut] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Interface

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR UTxOValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

toCBOR ∷ UTxOValidationError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOValidationError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOValidationError] → Size #

ToCBOR BlockCount 
Instance details

Defined in Cardano.Chain.Common.BlockCount

Methods

toCBOR ∷ BlockCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockCount] → Size #

ToCBOR UTxOConfiguration 
Instance details

Defined in Cardano.Chain.UTxO.UTxOConfiguration

Methods

toCBOR ∷ UTxOConfiguration → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOConfiguration → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOConfiguration] → Size #

ToCBOR ApplicationName 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

toCBOR ∷ ApplicationName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationName] → Size #

ToCBOR ApplicationVersion 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ ApplicationVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationVersion] → Size #

ToCBOR ProtocolUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ ProtocolUpdateProposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolUpdateProposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolUpdateProposal] → Size #

ToCBOR SoftwareUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ SoftwareUpdateProposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareUpdateProposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareUpdateProposal] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR HDAddressPayload 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toCBOR ∷ HDAddressPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy HDAddressPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [HDAddressPayload] → Size #

ToCBOR NetworkMagic 
Instance details

Defined in Cardano.Chain.Common.NetworkMagic

Methods

toCBOR ∷ NetworkMagic → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy NetworkMagic → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NetworkMagic] → Size #

ToCBOR AddrSpendingData 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

toCBOR ∷ AddrSpendingData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AddrSpendingData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AddrSpendingData] → Size #

ToCBOR AddrType 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

toCBOR ∷ AddrType → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AddrType → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AddrType] → Size #

ToCBOR Address 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

toCBOR ∷ Address → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Address → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Address] → Size #

ToCBOR Address' 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

toCBOR ∷ Address' → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Address' → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Address'] → Size #

ToCBOR LovelaceError 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

toCBOR ∷ LovelaceError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LovelaceError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LovelaceError] → Size #

ToCBOR LovelacePortion 
Instance details

Defined in Cardano.Chain.Common.LovelacePortion

Methods

toCBOR ∷ LovelacePortion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LovelacePortion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LovelacePortion] → Size #

ToCBOR TxFeePolicy 
Instance details

Defined in Cardano.Chain.Common.TxFeePolicy

Methods

toCBOR ∷ TxFeePolicy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxFeePolicy → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxFeePolicy] → Size #

ToCBOR TxSizeLinear 
Instance details

Defined in Cardano.Chain.Common.TxSizeLinear

Methods

toCBOR ∷ TxSizeLinear → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxSizeLinear → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxSizeLinear] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Activation

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR GenesisData 
Instance details

Defined in Cardano.Chain.Genesis.Data

Methods

toCBOR ∷ GenesisData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisData] → Size #

ToCBOR CompactTxId 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxId → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxId → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxId] → Size #

ToCBOR TxIn 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ TxIn → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxIn → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxIn] → Size #

ToCBOR TxOut 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ TxOut → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxOut → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut] → Size #

ToCBOR TxAux 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

toCBOR ∷ TxAux → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxAux → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxAux] → Size #

ToCBOR TxSigData 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toCBOR ∷ TxSigData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxSigData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxSigData] → Size #

ToCBOR UTxOError 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

toCBOR ∷ UTxOError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOError] → Size #

ToCBOR ApplicationNameError 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

toCBOR ∷ ApplicationNameError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationNameError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationNameError] → Size #

ToCBOR InstallerHash 
Instance details

Defined in Cardano.Chain.Update.InstallerHash

Methods

toCBOR ∷ InstallerHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy InstallerHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [InstallerHash] → Size #

ToCBOR SystemTag 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

toCBOR ∷ SystemTag → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemTag → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemTag] → Size #

ToCBOR ProtocolParametersUpdate 
Instance details

Defined in Cardano.Chain.Update.ProtocolParametersUpdate

Methods

toCBOR ∷ ProtocolParametersUpdate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolParametersUpdate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolParametersUpdate] → Size #

ToCBOR SoftforkRule 
Instance details

Defined in Cardano.Chain.Update.SoftforkRule

Methods

toCBOR ∷ SoftforkRule → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftforkRule → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftforkRule] → Size #

ToCBOR SoftwareVersionError 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

toCBOR ∷ SoftwareVersionError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareVersionError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareVersionError] → Size #

ToCBOR SystemTagError 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

toCBOR ∷ SystemTagError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemTagError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemTagError] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Voting

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Adopted 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ Adopted → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Adopted → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Adopted] → Size #

ToCBOR ActiveSlotCoeff 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ ActiveSlotCoeff → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ActiveSlotCoeff → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ActiveSlotCoeff] → Size #

ToCBOR DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ DnsName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy DnsName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DnsName] → Size #

ToCBOR Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Port → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Port → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Port] → Size #

ToCBOR Seed 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Seed → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Seed → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Seed] → Size #

ToCBOR Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Url → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Url → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Url] → Size #

ToCBOR DeltaCoin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ DeltaCoin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy DeltaCoin → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DeltaCoin] → Size #

ToCBOR TicknState 
Instance details

Defined in Shelley.Spec.Ledger.STS.Tickn

Methods

toCBOR ∷ TicknState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TicknState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TicknState] → Size #

ToCBOR ChainCode 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

toCBOR ∷ ChainCode → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainCode → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainCode] → Size #

ToCBOR AccountState 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ AccountState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AccountState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AccountState] → Size #

ToCBOR LogWeight 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ LogWeight → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LogWeight → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LogWeight] → Size #

ToCBOR MIRPot 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRPot → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy MIRPot → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRPot] → Size #

ToCBOR KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

toCBOR ∷ KESPeriod → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy KESPeriod → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KESPeriod] → Size #

ToCBOR PerformanceEstimate 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ PerformanceEstimate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy PerformanceEstimate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PerformanceEstimate] → Size #

ToCBOR RewardType 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ RewardType → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RewardType → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardType] → Size #

ToCBOR VotingPeriod 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

toCBOR ∷ VotingPeriod → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VotingPeriod → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VotingPeriod] → Size #

ToCBOR SizeOfPoolOwners 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ SizeOfPoolOwners → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SizeOfPoolOwners → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SizeOfPoolOwners] → Size #

ToCBOR SizeOfPoolRelays 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ SizeOfPoolRelays → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SizeOfPoolRelays → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SizeOfPoolRelays] → Size #

ToCBOR TxValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

toCBOR ∷ TxValidationError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxValidationError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxValidationError] → Size #

ToCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

toCBOR ∷ Certificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Certificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Certificate] → Size #

ToCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

toCBOR ∷ OperationalCertificateIssueCounter → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy OperationalCertificateIssueCounter → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OperationalCertificateIssueCounter] → Size #

ToCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

toCBOR ∷ OperationalCertificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy OperationalCertificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OperationalCertificate] → Size #

ToCBOR a ⇒ ToCBOR [a] 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ [a] → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [a] → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [[a]] → Size #

ToCBOR a ⇒ ToCBOR (Maybe a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Maybe a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Maybe a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Maybe a] → Size #

ToCBOR a ⇒ ToCBOR (Ratio a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Ratio a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Ratio a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Ratio a] → Size #

(Ord a, ToCBOR a) ⇒ ToCBOR (Set a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Set a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Set a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Set a] → Size #

ToCBOR a ⇒ ToCBOR (NonEmpty a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ NonEmpty a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NonEmpty a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NonEmpty a] → Size #

(Serialise t, Typeable t) ⇒ ToCBOR (WithOrigin t) 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ WithOrigin t → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (WithOrigin t) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [WithOrigin t] → Size #

ToCBOR a ⇒ ToCBOR (Vector a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Vector a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Vector a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Vector a] → Size #

Typeable xs ⇒ ToCBOR (LengthOf xs) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ LengthOf xs → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LengthOf xs) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LengthOf xs] → Size #

ToCBOR (SigDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ SigDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (SigDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ SigDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed25519DSIGN] → Size #

ToCBOR (SigDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ SigDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN MockDSIGN] → Size #

ToCBOR (SigDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ SigDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed448DSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ SignKeyDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ SignKeyDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed25519DSIGN] → Size #

ToCBOR (SignKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ SignKeyDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN MockDSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ SignKeyDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed448DSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ VerKeyDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ VerKeyDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed25519DSIGN] → Size #

ToCBOR (VerKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ VerKeyDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN MockDSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ VerKeyDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed448DSIGN] → Size #

Crypto crypto ⇒ ToCBOR (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

toCBOR ∷ ScriptHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ScriptHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScriptHash crypto] → Size #

ToCBOR a ⇒ ToCBOR (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

toCBOR ∷ StrictMaybe a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (StrictMaybe a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StrictMaybe a] → Size #

Crypto crypto ⇒ ToCBOR (AuxiliaryDataHash crypto) 
Instance details

Defined in Cardano.Ledger.AuxiliaryData

Methods

toCBOR ∷ AuxiliaryDataHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryDataHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryDataHash crypto] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (PPUPState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ PPUPState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PPUPState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PPUPState era] → Size #

Crypto crypto ⇒ ToCBOR (Value crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ Value crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Value crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Value crypto] → Size #

Typeable era ⇒ ToCBOR (AuxiliaryData era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ AuxiliaryData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryData era] → Size #

Era era ⇒ ToCBOR (PParamsUpdate era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ PParamsUpdate era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParamsUpdate era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParamsUpdate era] → Size #

Era era ⇒ ToCBOR (PParams era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ PParams era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParams era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParams era] → Size #

Typeable era ⇒ ToCBOR (TxWitness era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

toCBOR ∷ TxWitness era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxWitness era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxWitness era] → Size #

Typeable t ⇒ ToCBOR (MemoBytes t) 
Instance details

Defined in Data.MemoBytes

Methods

toCBOR ∷ MemoBytes t → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (MemoBytes t) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [MemoBytes t] → Size #

(Era era, TransTxOut ToCBOR era) ⇒ ToCBOR (TxOut era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxOut era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxOut era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut era] → Size #

Era era ⇒ ToCBOR (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ PParams era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParams era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParams era] → Size #

Era era ⇒ ToCBOR (PParamsUpdate era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ PParamsUpdate era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParamsUpdate era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParamsUpdate era] → Size #

Typeable crypto ⇒ ToCBOR (Timelock crypto) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

toCBOR ∷ Timelock crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Timelock crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Timelock crypto] → Size #

Typeable era ⇒ ToCBOR (Tx era) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

toCBOR ∷ Tx era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Tx era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tx era] → Size #

Era era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

Typeable era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

Typeable crypto ⇒ ToCBOR (MultiSig crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

toCBOR ∷ MultiSig crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MultiSig crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MultiSig crypto] → Size #

Typeable era ⇒ ToCBOR (Metadata era) 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

toCBOR ∷ Metadata era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Metadata era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Metadata era] → Size #

TransEpoch ToCBOR era ⇒ ToCBOR (EpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ EpochState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (EpochState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochState era] → Size #

(Era era, TransLedgerState ToCBOR era) ⇒ ToCBOR (LedgerState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ LedgerState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgerState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgerState era] → Size #

TransUTxOState ToCBOR era ⇒ ToCBOR (UTxOState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ UTxOState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UTxOState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOState era] → Size #

Crypto crypto ⇒ ToCBOR (DPState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ DPState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DPState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DPState crypto] → Size #

(Typeable era, TransEpoch ToCBOR era) ⇒ ToCBOR (NewEpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ NewEpochState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NewEpochState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NewEpochState era] → Size #

Crypto crypto ⇒ ToCBOR (TxIn crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxIn crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxIn crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxIn crypto] → Size #

Crypto crypto ⇒ ToCBOR (CompactAddr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.CompactAddr

Methods

toCBOR ∷ CompactAddr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactAddr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactAddr crypto] → Size #

Crypto crypto ⇒ ToCBOR (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ BlocksMade crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BlocksMade crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlocksMade crypto] → Size #

Crypto crypto ⇒ ToCBOR (SnapShots crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ SnapShots crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SnapShots crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SnapShots crypto] → Size #

Crypto crypto ⇒ ToCBOR (NonMyopic crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ NonMyopic crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NonMyopic crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NonMyopic crypto] → Size #

Crypto crypto ⇒ ToCBOR (PulsingRewUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ PulsingRewUpdate crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PulsingRewUpdate crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PulsingRewUpdate crypto] → Size #

Crypto crypto ⇒ ToCBOR (PoolDistr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

toCBOR ∷ PoolDistr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolDistr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolDistr crypto] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (ProposedPPUpdates era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ ProposedPPUpdates era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ProposedPPUpdates era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProposedPPUpdates era] → Size #

Era era ⇒ ToCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toCBOR ∷ ShelleyGenesis era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGenesis era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGenesis era] → Size #

Crypto crypto ⇒ ToCBOR (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ GenDelegPair crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenDelegPair crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenDelegPair crypto] → Size #

Crypto crypto ⇒ ToCBOR (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toCBOR ∷ Addr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Addr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Addr crypto] → Size #

Crypto crypto ⇒ ToCBOR (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toCBOR ∷ ShelleyGenesisStaking crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGenesisStaking crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGenesisStaking crypto] → Size #

ToCBOR (CompactForm Coin) 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ CompactForm Coin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactForm Coin) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactForm Coin] → Size #

Crypto crypto ⇒ ToCBOR (CompactForm (Value crypto)) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ CompactForm (Value crypto) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactForm (Value crypto)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactForm (Value crypto)] → Size #

(Era era, ToCBOR (TxOut era)) ⇒ ToCBOR (UTxO era) 
Instance details

Defined in Shelley.Spec.Ledger.UTxO

Methods

toCBOR ∷ UTxO era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UTxO era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxO era] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (Update era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ Update era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Update era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Update era] → Size #

Typeable era ⇒ ToCBOR (AuxiliaryData era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

toCBOR ∷ AuxiliaryData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryData era] → Size #

Typeable era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

(Era era, Compactible (Value era)) ⇒ ToCBOR (TxOut era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

toCBOR ∷ TxOut era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxOut era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut era] → Size #

(Typeable (Crypto era), Typeable era) ⇒ ToCBOR (Script era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Script era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Script era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Script era] → Size #

Typeable era ⇒ ToCBOR (Data era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ Data era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Data era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Data era] → Size #

(Typeable era, Ord (Script era), Script era ~ Script era, ToCBOR (Script era), Typeable (Crypto era)) ⇒ ToCBOR (AuxiliaryDataRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ AuxiliaryDataRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryDataRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryDataRaw era] → Size #

Crypto crypto ⇒ ToCBOR (PolicyID crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ PolicyID crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PolicyID crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PolicyID crypto] → Size #

Crypto crypto ⇒ ToCBOR (BHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ BHeader crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BHeader crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BHeader crypto] → Size #

Era era ⇒ ToCBOR (Block era) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ Block era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Block era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Block era] → Size #

(ShelleyBased era, ToCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ ToCBOR (ApplyTxError era) 
Instance details

Defined in Shelley.Spec.Ledger.API.Mempool

Methods

toCBOR ∷ ApplyTxError era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ApplyTxError era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplyTxError era] → Size #

(ToCBOR (PredicateFailure (EraRule "DELEGS" era)), ToCBOR (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ ToCBOR (LedgerPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledger

Methods

toCBOR ∷ LedgerPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgerPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgerPredicateFailure era] → Size #

(Era era, Typeable (Script era), ToCBOR (PredicateFailure (EraRule "DELPL" era))) ⇒ ToCBOR (DelegsPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delegs

Methods

toCBOR ∷ DelegsPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelegsPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelegsPredicateFailure era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "POOL" era)), ToCBOR (PredicateFailure (EraRule "DELEG" era)), Typeable (Script era)) ⇒ ToCBOR (DelplPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delpl

Methods

toCBOR ∷ DelplPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelplPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelplPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (PState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ PState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PState crypto] → Size #

Crypto crypto ⇒ ToCBOR (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ PoolParams crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolParams crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolParams crypto] → Size #

Crypto crypto ⇒ ToCBOR (InstantaneousRewards crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ InstantaneousRewards crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (InstantaneousRewards crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [InstantaneousRewards crypto] → Size #

Crypto crypto ⇒ ToCBOR (SnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ SnapShot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SnapShot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SnapShot crypto] → Size #

Crypto crypto ⇒ ToCBOR (ChainDepState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.API.Protocol

Methods

toCBOR ∷ ChainDepState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ChainDepState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainDepState crypto] → Size #

Crypto crypto ⇒ ToCBOR (FutureGenDeleg crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ FutureGenDeleg crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (FutureGenDeleg crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [FutureGenDeleg crypto] → Size #

Crypto crypto ⇒ ToCBOR (DState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ DState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DState crypto] → Size #

Crypto crypto ⇒ ToCBOR (IndividualPoolStake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

toCBOR ∷ IndividualPoolStake crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (IndividualPoolStake crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [IndividualPoolStake crypto] → Size #

(TransValue ToCBOR era, TransUTxOState ToCBOR era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Rules.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), ToCBOR (PredicateFailure (EraRule "UTXO" era))) ⇒ ToCBOR (UtxowPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxow

Methods

toCBOR ∷ UtxowPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxowPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxowPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ RewardProvenance crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardProvenance crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardProvenance crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ RewardProvenancePool crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardProvenancePool crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardProvenancePool crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toCBOR ∷ RewardAcnt crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardAcnt crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardAcnt crypto] → Size #

Crypto crypto ⇒ ToCBOR (TxId crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxId crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxId crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxId crypto] → Size #

Crypto crypto ⇒ ToCBOR (BootstrapWitness crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

toCBOR ∷ BootstrapWitness crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BootstrapWitness crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BootstrapWitness crypto] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (SigKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ SigKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (SigKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ SigKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (SigKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ SigKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SigKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SigKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (SigKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ SigKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SigKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SigKES (SimpleKES d t)] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (VerKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ VerKeyKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (VerKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ VerKeyKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (VerKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ VerKeyKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (VerKeyKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [VerKeyKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (VerKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ VerKeyKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (VerKeyKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [VerKeyKES (SimpleKES d t)] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (SignKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ SignKeyKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (SignKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ SignKeyKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (SignKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ SignKeyKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SignKeyKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SignKeyKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (SignKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ SignKeyKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SignKeyKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SignKeyKES (SimpleKES d t)] → Size #

ShelleyBasedEra era ⇒ ToCBOR (Header (ShelleyBlock era)) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ Header (ShelleyBlock era) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Header (ShelleyBlock era)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Header (ShelleyBlock era)] → Size #

ShelleyBasedEra era ⇒ ToCBOR (ShelleyBlock era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ ShelleyBlock era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyBlock era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyBlock era] → Size #

Crypto c ⇒ ToCBOR (ShelleyHash c) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ ShelleyHash c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyHash c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyHash c] → Size #

Era era ⇒ ToCBOR (CompactGenesis era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Config

Methods

toCBOR ∷ CompactGenesis era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactGenesis era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactGenesis era] → Size #

Crypto crypto ⇒ ToCBOR (BHBody crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ BHBody crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BHBody crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BHBody crypto] → Size #

Crypto crypto ⇒ ToCBOR (PrevHash crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ PrevHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PrevHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PrevHash crypto] → Size #

Crypto crypto ⇒ ToCBOR (OCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

toCBOR ∷ OCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OCert crypto] → Size #

Crypto crypto ⇒ ToCBOR (HashHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ HashHeader crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (HashHeader crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [HashHeader crypto] → Size #

Crypto crypto ⇒ ToCBOR (PrtclState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Prtcl

Methods

toCBOR ∷ PrtclState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PrtclState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PrtclState crypto] → Size #

Typeable v ⇒ ToCBOR (OutputVRF v) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

toCBOR ∷ OutputVRF v → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OutputVRF v) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OutputVRF v] → Size #

ToCBOR (CertVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ CertVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF PraosVRF] → Size #

ToCBOR (CertVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ CertVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF MockVRF] → Size #

ToCBOR (CertVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ CertVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF SimpleVRF] → Size #

ToCBOR (SignKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ SignKeyVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF PraosVRF] → Size #

ToCBOR (SignKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ SignKeyVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF MockVRF] → Size #

ToCBOR (SignKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ SignKeyVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF SimpleVRF] → Size #

ToCBOR (VerKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ VerKeyVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF PraosVRF] → Size #

ToCBOR (VerKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ VerKeyVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF MockVRF] → Size #

ToCBOR (VerKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ VerKeyVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF SimpleVRF] → Size #

Typeable a ⇒ ToCBOR (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

toCBOR ∷ RedeemSignature a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RedeemSignature a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemSignature a] → Size #

Typeable a ⇒ ToCBOR (Signature a) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

toCBOR ∷ Signature a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Signature a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Signature a] → Size #

Typeable era ⇒ ToCBOR (LangDepView era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ LangDepView era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LangDepView era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LangDepView era] → Size #

Crypto crypto ⇒ ToCBOR (CollectError crypto) 
Instance details

Defined in Cardano.Ledger.Alonzo.PlutusScriptApi

Methods

toCBOR ∷ CollectError crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CollectError crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CollectError crypto] → Size #

(Typeable c, Crypto c) ⇒ ToCBOR (ScriptPurpose c) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ ScriptPurpose c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ScriptPurpose c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScriptPurpose c] → Size #

Crypto crypto ⇒ ToCBOR (Wdrl crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ Wdrl crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Wdrl crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Wdrl crypto] → Size #

Crypto crypto ⇒ ToCBOR (DCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ DCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DCert crypto] → Size #

(Typeable era, ToCBOR (BbodyPredicateFailure era)) ⇒ ToCBOR (AlonzoBbodyPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Bbody

Methods

toCBOR ∷ AlonzoBbodyPredFail era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AlonzoBbodyPredFail era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoBbodyPredFail era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (AuxiliaryData era), Typeable (Script era), ToCBOR (Script era)) ⇒ ToCBOR (AlonzoPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxow

Methods

toCBOR ∷ AlonzoPredFail era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AlonzoPredFail era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoPredFail era] → Size #

Crypto crypto ⇒ ToCBOR (GenDelegs crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ GenDelegs crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenDelegs crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenDelegs crypto] → Size #

(Typeable era, Era era, ToCBOR (TxOut era), ToCBOR (Value era), ToCBOR (PredicateFailure (EraRule "UTXOS" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxosPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxos

Methods

toCBOR ∷ UtxosPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxosPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxosPredicateFailure era] → Size #

(Typeable era, Era era) ⇒ ToCBOR (PpupPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

toCBOR ∷ PpupPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PpupPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PpupPredicateFailure era] → Size #

Typeable era ⇒ ToCBOR (WitnessPPData era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ WitnessPPData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessPPData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessPPData era] → Size #

Typeable era ⇒ ToCBOR (Redeemers era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

toCBOR ∷ Redeemers era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Redeemers era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Redeemers era] → Size #

Era era ⇒ ToCBOR (WitnessPPDataRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ WitnessPPDataRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessPPDataRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessPPDataRaw era] → Size #

ToCBOR (Attributes ()) 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

toCBOR ∷ Attributes () → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Attributes ()) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Attributes ()] → Size #

ToCBOR (Attributes AddrAttributes) 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toCBOR ∷ Attributes AddrAttributes → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Attributes AddrAttributes) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Attributes AddrAttributes] → Size #

ToCBOR a ⇒ ToCBOR (MerkleRoot a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

toCBOR ∷ MerkleRoot a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MerkleRoot a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MerkleRoot a] → Size #

ToCBOR a ⇒ ToCBOR (MerkleTree a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

toCBOR ∷ MerkleTree a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MerkleTree a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MerkleTree a] → Size #

ToCBOR n ⇒ ToCBOR (TooLarge n) 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ TooLarge n → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TooLarge n) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TooLarge n] → Size #

Crypto crypto ⇒ ToCBOR (CompactValue crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ CompactValue crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactValue crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactValue crypto] → Size #

Crypto crypto ⇒ ToCBOR (LastAppliedBlock crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ LastAppliedBlock crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LastAppliedBlock crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LastAppliedBlock crypto] → Size #

(Era era, Typeable era) ⇒ ToCBOR (LaxBlock era) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ LaxBlock era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LaxBlock era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LaxBlock era] → Size #

Crypto crypto ⇒ ToCBOR (GenesisCredential crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ GenesisCredential crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenesisCredential crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisCredential crypto] → Size #

ToCBORGroup a ⇒ ToCBOR (CBORGroup a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

toCBOR ∷ CBORGroup a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CBORGroup a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CBORGroup a] → Size #

Crypto crypto ⇒ ToCBOR (MIRCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MIRCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRCert crypto] → Size #

Crypto crypto ⇒ ToCBOR (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ StakeCreds crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (StakeCreds crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StakeCreds crypto] → Size #

Crypto crypto ⇒ ToCBOR (Stake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ Stake crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Stake crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Stake crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardSnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardSnapShot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardSnapShot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardSnapShot crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardUpdate crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardUpdate crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardUpdate crypto] → Size #

Crypto c ⇒ ToCBOR (RewardAns c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardAns c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardAns c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardAns c] → Size #

Crypto c ⇒ ToCBOR (Pulser c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ Pulser c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Pulser c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Pulser c] → Size #

Crypto crypto ⇒ ToCBOR (OBftSlot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OverlaySchedule

Methods

toCBOR ∷ OBftSlot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OBftSlot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OBftSlot crypto] → Size #

Crypto crypto ⇒ ToCBOR (FreeVars crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ FreeVars crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (FreeVars crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [FreeVars crypto] → Size #

Crypto crypto ⇒ ToCBOR (Reward crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ Reward crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Reward crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Reward crypto] → Size #

(Typeable era, Era era, Typeable (Script era)) ⇒ ToCBOR (DelegPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Deleg

Methods

toCBOR ∷ DelegPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelegPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelegPredicateFailure era] → Size #

(Typeable era, Era era) ⇒ ToCBOR (PoolPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Pool

Methods

toCBOR ∷ PoolPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolPredicateFailure era] → Size #

(ShelleyBased era, ToCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ ToCBOR (LedgersPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledgers

Methods

toCBOR ∷ LedgersPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgersPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgersPredicateFailure era] → Size #

(TransUTxOState ToCBOR era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (MIRTarget crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRTarget crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MIRTarget crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRTarget crypto] → Size #

(Era era, FromCBOR (PParamsDelta era), TransTxBody ToCBOR era) ⇒ ToCBOR (TxBodyRaw era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxBodyRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBodyRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBodyRaw era] → Size #

ToCBOR a ⇒ ToCBOR (CborSeq a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

toCBOR ∷ CborSeq a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CborSeq a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CborSeq a] → Size #

ToCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakePoolKey] → Size #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateKey] → Size #

ToCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisExtendedKey] → Size #

ToCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisKey] → Size #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeKey] → Size #

ToCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentExtendedKey] → Size #

ToCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentKey] → Size #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

ToCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakePoolKey] → Size #

ToCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisUTxOKey] → Size #

ToCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateExtendedKey] → Size #

ToCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateKey] → Size #

ToCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisExtendedKey] → Size #

ToCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisKey] → Size #

ToCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeExtendedKey] → Size #

ToCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeKey] → Size #

ToCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentExtendedKey] → Size #

ToCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentKey] → Size #

ToCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKeyLegacy] → Size #

ToCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKey] → Size #

ToCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey VrfKey] → Size #

ToCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey KesKey] → Size #

Typeable lang ⇒ ToCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toCBOR ∷ PlutusScript lang → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PlutusScript lang) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PlutusScript lang] → Size #

(ToCBOR a, ToCBOR b) ⇒ ToCBOR (Either a b) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Either a b → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Either a b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Either a b] → Size #

(ToCBOR a, ToCBOR b) ⇒ ToCBOR (a, b) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b)] → Size #

(Ord k, ToCBOR k, ToCBOR v) ⇒ ToCBOR (Map k v) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Map k v → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Map k v) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Map k v] → Size #

(HashAlgorithm h, Typeable a) ⇒ ToCBOR (Hash h a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

toCBOR ∷ Hash h a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Hash h a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Hash h a] → Size #

Era era ⇒ ToCBOR (WitnessSetHKD Identity era) 
Instance details

Defined in Shelley.Spec.Ledger.Tx

Methods

toCBOR ∷ WitnessSetHKD Identity era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessSetHKD Identity era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessSetHKD Identity era] → Size #

(Crypto crypto, Typeable disc) ⇒ ToCBOR (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ KeyHash disc crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (KeyHash disc crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KeyHash disc crypto] → Size #

(Typeable index, Crypto c) ⇒ ToCBOR (SafeHash c index) 
Instance details

Defined in Cardano.Ledger.SafeHash

Methods

toCBOR ∷ SafeHash c index → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SafeHash c index) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SafeHash c index] → Size #

(Typeable kr, Crypto crypto) ⇒ ToCBOR (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ Credential kr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Credential kr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Credential kr crypto] → Size #

(Typeable kr, Crypto crypto) ⇒ ToCBOR (WitVKey kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ WitVKey kr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitVKey kr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitVKey kr crypto] → Size #

(Typeable algo, Typeable a, HashAlgorithm algo) ⇒ ToCBOR (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

toCBOR ∷ AbstractHash algo a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AbstractHash algo a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AbstractHash algo a] → Size #

(Crypto crypto, Typeable kd) ⇒ ToCBOR (VKey kd crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ VKey kd crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VKey kd crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VKey kd crypto] → Size #

(VRFAlgorithm v, Typeable a) ⇒ ToCBOR (CertifiedVRF v a) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

toCBOR ∷ CertifiedVRF v a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertifiedVRF v a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertifiedVRF v a] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c) ⇒ ToCBOR (a, b, c) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c)] → Size #

(Typeable s, ToCBOR a) ⇒ ToCBOR (Tagged s a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Tagged s a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Tagged s a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tagged s a] → Size #

(Ord a, Ord b, ToCBOR a, ToCBOR b) ⇒ ToCBOR (BiMap b a b) 
Instance details

Defined in Control.Iterate.SetAlgebra

Methods

toCBOR ∷ BiMap b a b → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BiMap b a b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BiMap b a b] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d) ⇒ ToCBOR (a, b, c, d) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d)] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d, ToCBOR e) ⇒ ToCBOR (a, b, c, d, e) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d, e) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d, e) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d, e)] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d, ToCBOR e, ToCBOR f, ToCBOR g) ⇒ ToCBOR (a, b, c, d, e, f, g) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d, e, f, g) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d, e, f, g) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d, e, f, g)] → Size #

\ No newline at end of file +Cardano.Api.SerialiseCBOR
cardano-api-1.27.0
Safe HaskellNone
LanguageHaskell2010

Cardano.Api.SerialiseCBOR

Description

CBOR serialisation

Documentation

class HasTypeProxy a ⇒ SerialiseAsCBOR a where Source #

Minimal complete definition

Nothing

Methods

serialiseToCBOR ∷ a → ByteString Source #

default serialiseToCBOR ∷ ToCBOR a ⇒ a → ByteString Source #

deserialiseFromCBOR ∷ AsType a → ByteString → Either DecoderError a Source #

default deserialiseFromCBOR ∷ FromCBOR a ⇒ AsType a → ByteString → Either DecoderError a Source #

Instances

Instances details
SerialiseAsCBOR TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

serialiseToCBOR ∷ TxMetadata → ByteString Source #

deserialiseFromCBOR ∷ AsType TxMetadata → ByteString → Either DecoderError TxMetadata Source #

SerialiseAsCBOR UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

serialiseToCBOR ∷ UpdateProposal → ByteString Source #

deserialiseFromCBOR ∷ AsType UpdateProposal → ByteString → Either DecoderError UpdateProposal Source #

SerialiseAsCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

serialiseToCBOR ∷ Certificate → ByteString Source #

deserialiseFromCBOR ∷ AsType Certificate → ByteString → Either DecoderError Certificate Source #

SerialiseAsCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

serialiseToCBOR ∷ OperationalCertificateIssueCounter → ByteString Source #

deserialiseFromCBOR ∷ AsType OperationalCertificateIssueCounter → ByteString → Either DecoderError OperationalCertificateIssueCounter Source #

SerialiseAsCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

serialiseToCBOR ∷ OperationalCertificate → ByteString Source #

deserialiseFromCBOR ∷ AsType OperationalCertificate → ByteString → Either DecoderError OperationalCertificate Source #

SerialiseAsCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakePoolKey) → ByteString → Either DecoderError (VerificationKey StakePoolKey) Source #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateKey) Source #

SerialiseAsCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisKey) → ByteString → Either DecoderError (VerificationKey GenesisKey) Source #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeKey) → ByteString → Either DecoderError (VerificationKey StakeKey) Source #

SerialiseAsCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Either DecoderError (VerificationKey PaymentExtendedKey) Source #

SerialiseAsCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentKey) → ByteString → Either DecoderError (VerificationKey PaymentKey) Source #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakePoolKey) → ByteString → Either DecoderError (SigningKey StakePoolKey) Source #

SerialiseAsCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Either DecoderError (SigningKey GenesisUTxOKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateKey) Source #

SerialiseAsCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisKey) → ByteString → Either DecoderError (SigningKey GenesisKey) Source #

SerialiseAsCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Either DecoderError (SigningKey StakeExtendedKey) Source #

SerialiseAsCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeKey) → ByteString → Either DecoderError (SigningKey StakeKey) Source #

SerialiseAsCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Either DecoderError (SigningKey PaymentExtendedKey) Source #

SerialiseAsCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentKey) → ByteString → Either DecoderError (SigningKey PaymentKey) Source #

SerialiseAsCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Either DecoderError (SigningKey ByronKeyLegacy) Source #

SerialiseAsCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKey) → ByteString → Either DecoderError (SigningKey ByronKey) Source #

SerialiseAsCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey VrfKey) → ByteString → Either DecoderError (SigningKey VrfKey) Source #

SerialiseAsCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey KesKey) → ByteString → Either DecoderError (SigningKey KesKey) Source #

(HasTypeProxy lang, Typeable lang) ⇒ SerialiseAsCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToCBOR ∷ PlutusScript lang → ByteString Source #

deserialiseFromCBOR ∷ AsType (PlutusScript lang) → ByteString → Either DecoderError (PlutusScript lang) Source #

IsScriptLanguage lang ⇒ SerialiseAsCBOR (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToCBOR ∷ Script lang → ByteString Source #

deserialiseFromCBOR ∷ AsType (Script lang) → ByteString → Either DecoderError (Script lang) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

serialiseToCBOR ∷ TxBody era → ByteString Source #

deserialiseFromCBOR ∷ AsType (TxBody era) → ByteString → Either DecoderError (TxBody era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ KeyWitness era → ByteString Source #

deserialiseFromCBOR ∷ AsType (KeyWitness era) → ByteString → Either DecoderError (KeyWitness era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ Tx era → ByteString Source #

deserialiseFromCBOR ∷ AsType (Tx era) → ByteString → Either DecoderError (Tx era) Source #

class Typeable a ⇒ FromCBOR a where #

Minimal complete definition

fromCBOR

Methods

fromCBOR ∷ Decoder s a #

label ∷ Proxy a → Text #

Instances

Instances details
FromCBOR Bool 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Bool #

label ∷ Proxy Bool → Text #

FromCBOR Float 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Float #

label ∷ Proxy Float → Text #

FromCBOR Int 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int #

label ∷ Proxy Int → Text #

FromCBOR Int32 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int32 #

label ∷ Proxy Int32 → Text #

FromCBOR Int64 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int64 #

label ∷ Proxy Int64 → Text #

FromCBOR Integer 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Integer #

label ∷ Proxy Integer → Text #

FromCBOR Natural 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Natural #

label ∷ Proxy Natural → Text #

FromCBOR Word 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word #

label ∷ Proxy Word → Text #

FromCBOR Word8 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word8 #

label ∷ Proxy Word8 → Text #

FromCBOR Word16 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word16 #

label ∷ Proxy Word16 → Text #

FromCBOR Word32 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word32 #

label ∷ Proxy Word32 → Text #

FromCBOR Word64 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word64 #

label ∷ Proxy Word64 → Text #

FromCBOR () 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s () #

label ∷ Proxy () → Text #

FromCBOR ByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s ByteString #

label ∷ Proxy ByteString → Text #

FromCBOR ShortByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s ShortByteString #

label ∷ Proxy ShortByteString → Text #

FromCBOR Nano 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Nano #

label ∷ Proxy Nano → Text #

FromCBOR Pico 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Pico #

label ∷ Proxy Pico → Text #

FromCBOR Void 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Void #

label ∷ Proxy Void → Text #

FromCBOR Text 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Text #

label ∷ Proxy Text → Text #

FromCBOR UTCTime 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s UTCTime #

label ∷ Proxy UTCTime → Text #

FromCBOR NominalDiffTime 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s NominalDiffTime #

label ∷ Proxy NominalDiffTime → Text #

FromCBOR BlockNo 
Instance details

Defined in Cardano.Slotting.Block

Methods

fromCBOR ∷ Decoder s BlockNo #

label ∷ Proxy BlockNo → Text #

FromCBOR LByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s LByteString #

label ∷ Proxy LByteString → Text #

FromCBOR EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s EpochNo #

label ∷ Proxy EpochNo → Text #

FromCBOR SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s SlotNo #

label ∷ Proxy SlotNo → Text #

FromCBOR Raw 
Instance details

Defined in Cardano.Binary.Raw

Methods

fromCBOR ∷ Decoder s Raw #

label ∷ Proxy Raw → Text #

FromCBOR Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s Coin #

label ∷ Proxy Coin → Text #

FromCBOR UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s UnitInterval #

label ∷ Proxy UnitInterval → Text #

FromCBOR ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s ProtVer #

label ∷ Proxy ProtVer → Text #

FromCBOR AlonzoGenesis 
Instance details

Defined in Cardano.Ledger.Alonzo.Genesis

Methods

fromCBOR ∷ Decoder s AlonzoGenesis #

label ∷ Proxy AlonzoGenesis → Text #

FromCBOR Language 
Instance details

Defined in Cardano.Ledger.Alonzo.Language

Methods

fromCBOR ∷ Decoder s Language #

label ∷ Proxy Language → Text #

FromCBOR CostModel 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s CostModel #

label ∷ Proxy CostModel → Text #

FromCBOR Prices 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s Prices #

label ∷ Proxy Prices → Text #

FromCBOR ExUnits 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s ExUnits #

label ∷ Proxy ExUnits → Text #

FromCBOR Metadatum 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

fromCBOR ∷ Decoder s Metadatum #

label ∷ Proxy Metadatum → Text #

FromCBOR AssetName 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s AssetName #

label ∷ Proxy AssetName → Text #

FromCBOR Likelihood 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s Likelihood #

label ∷ Proxy Likelihood → Text #

FromCBOR Ptr 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

fromCBOR ∷ Decoder s Ptr #

label ∷ Proxy Ptr → Text #

FromCBOR Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Nonce #

label ∷ Proxy Nonce → Text #

FromCBOR Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s Desirability #

label ∷ Proxy Desirability → Text #

FromCBOR StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s StakePoolRelay #

label ∷ Proxy StakePoolRelay → Text #

FromCBOR PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s PoolMetadata #

label ∷ Proxy PoolMetadata → Text #

FromCBOR Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Network #

label ∷ Proxy Network → Text #

FromCBOR ValidityInterval 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s ValidityInterval #

label ∷ Proxy ValidityInterval → Text #

FromCBOR ByronHash 
Instance details

Defined in Ouroboros.Consensus.Byron.Ledger.Block

Methods

fromCBOR ∷ Decoder s ByronHash #

label ∷ Proxy ByronHash → Text #

FromCBOR EpochAndSlotCount 
Instance details

Defined in Cardano.Chain.Slotting.EpochAndSlotCount

Methods

fromCBOR ∷ Decoder s EpochAndSlotCount #

label ∷ Proxy EpochAndSlotCount → Text #

FromCBOR EpochNumber 
Instance details

Defined in Cardano.Chain.Slotting.EpochNumber

Methods

fromCBOR ∷ Decoder s EpochNumber #

label ∷ Proxy EpochNumber → Text #

FromCBOR EpochSlots 
Instance details

Defined in Cardano.Chain.Slotting.EpochSlots

Methods

fromCBOR ∷ Decoder s EpochSlots #

label ∷ Proxy EpochSlots → Text #

FromCBOR SlotCount 
Instance details

Defined in Cardano.Chain.Slotting.SlotCount

Methods

fromCBOR ∷ Decoder s SlotCount #

label ∷ Proxy SlotCount → Text #

FromCBOR SlotNumber 
Instance details

Defined in Cardano.Chain.Slotting.SlotNumber

Methods

fromCBOR ∷ Decoder s SlotNumber #

label ∷ Proxy SlotNumber → Text #

FromCBOR Config 
Instance details

Defined in Cardano.Chain.Genesis.Config

Methods

fromCBOR ∷ Decoder s Config #

label ∷ Proxy Config → Text #

FromCBOR GenesisNonAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.NonAvvmBalances

Methods

fromCBOR ∷ Decoder s GenesisNonAvvmBalances #

label ∷ Proxy GenesisNonAvvmBalances → Text #

FromCBOR GenesisDelegation 
Instance details

Defined in Cardano.Chain.Genesis.Delegation

Methods

fromCBOR ∷ Decoder s GenesisDelegation #

label ∷ Proxy GenesisDelegation → Text #

FromCBOR GenesisKeyHashes 
Instance details

Defined in Cardano.Chain.Genesis.KeyHashes

Methods

fromCBOR ∷ Decoder s GenesisKeyHashes #

label ∷ Proxy GenesisKeyHashes → Text #

FromCBOR CompactAddress 
Instance details

Defined in Cardano.Chain.Common.Compact

Methods

fromCBOR ∷ Decoder s CompactAddress #

label ∷ Proxy CompactAddress → Text #

FromCBOR RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

fromCBOR ∷ Decoder s RequiresNetworkMagic #

label ∷ Proxy RequiresNetworkMagic → Text #

FromCBOR GenesisAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.AvvmBalances

Methods

fromCBOR ∷ Decoder s GenesisAvvmBalances #

label ∷ Proxy GenesisAvvmBalances → Text #

FromCBOR ProtocolParameters 
Instance details

Defined in Cardano.Chain.Update.ProtocolParameters

Methods

fromCBOR ∷ Decoder s ProtocolParameters #

label ∷ Proxy ProtocolParameters → Text #

FromCBOR ProtocolVersion 
Instance details

Defined in Cardano.Chain.Update.ProtocolVersion

Methods

fromCBOR ∷ Decoder s ProtocolVersion #

label ∷ Proxy ProtocolVersion → Text #

FromCBOR ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

fromCBOR ∷ Decoder s ProtocolMagicId #

label ∷ Proxy ProtocolMagicId → Text #

FromCBOR Certificate 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

fromCBOR ∷ Decoder s Certificate #

label ∷ Proxy Certificate → Text #

FromCBOR SigningKey 
Instance details

Defined in Cardano.Crypto.Signing.SigningKey

Methods

fromCBOR ∷ Decoder s SigningKey #

label ∷ Proxy SigningKey → Text #

FromCBOR SoftwareVersion 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

fromCBOR ∷ Decoder s SoftwareVersion #

label ∷ Proxy SoftwareVersion → Text #

FromCBOR VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

fromCBOR ∷ Decoder s VerificationKey #

label ∷ Proxy VerificationKey → Text #

FromCBOR KeyHash 
Instance details

Defined in Cardano.Chain.Common.KeyHash

Methods

fromCBOR ∷ Decoder s KeyHash #

label ∷ Proxy KeyHash → Text #

FromCBOR GenesisHash 
Instance details

Defined in Cardano.Chain.Genesis.Hash

Methods

fromCBOR ∷ Decoder s GenesisHash #

label ∷ Proxy GenesisHash → Text #

FromCBOR CandidateProtocolUpdate 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s CandidateProtocolUpdate #

label ∷ Proxy CandidateProtocolUpdate → Text #

FromCBOR Endorsement 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s Endorsement #

label ∷ Proxy Endorsement → Text #

FromCBOR ApplyMempoolPayloadErr 
Instance details

Defined in Cardano.Chain.Byron.API.Mempool

Methods

fromCBOR ∷ Decoder s ApplyMempoolPayloadErr #

label ∷ Proxy ApplyMempoolPayloadErr → Text #

FromCBOR Tx 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s Tx #

label ∷ Proxy Tx → Text #

FromCBOR Proposal 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s Proposal #

label ∷ Proxy Proposal → Text #

FromCBOR Vote 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

fromCBOR ∷ Decoder s Vote #

label ∷ Proxy Vote → Text #

FromCBOR ChainValidationState 
Instance details

Defined in Cardano.Chain.Block.Validation

Methods

fromCBOR ∷ Decoder s ChainValidationState #

label ∷ Proxy ChainValidationState → Text #

FromCBOR Map 
Instance details

Defined in Cardano.Chain.Delegation.Map

Methods

fromCBOR ∷ Decoder s Map #

label ∷ Proxy Map → Text #

FromCBOR ScheduledDelegation 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s ScheduledDelegation #

label ∷ Proxy ScheduledDelegation → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR UTxO 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

fromCBOR ∷ Decoder s UTxO #

label ∷ Proxy UTxO → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR ToSign 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s ToSign #

label ∷ Proxy ToSign → Text #

FromCBOR CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

fromCBOR ∷ Decoder s CompactRedeemVerificationKey #

label ∷ Proxy CompactRedeemVerificationKey → Text #

FromCBOR Lovelace 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

fromCBOR ∷ Decoder s Lovelace #

label ∷ Proxy Lovelace → Text #

FromCBOR SystemStart 
Instance details

Defined in Cardano.Slotting.Time

Methods

fromCBOR ∷ Decoder s SystemStart #

label ∷ Proxy SystemStart → Text #

FromCBOR Point 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s Point #

label ∷ Proxy Point → Text #

FromCBOR Proof 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s Proof #

label ∷ Proxy Proof → Text #

FromCBOR SignKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s SignKey #

label ∷ Proxy SignKey → Text #

FromCBOR VerKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s VerKey #

label ∷ Proxy VerKey → Text #

FromCBOR RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

fromCBOR ∷ Decoder s RedeemVerificationKey #

label ∷ Proxy RedeemVerificationKey → Text #

FromCBOR RedeemSigningKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.SigningKey

Methods

fromCBOR ∷ Decoder s RedeemSigningKey #

label ∷ Proxy RedeemSigningKey → Text #

FromCBOR IsValidating 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s IsValidating #

label ∷ Proxy IsValidating → Text #

FromCBOR Tag 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s Tag #

label ∷ Proxy Tag → Text #

FromCBOR ChainDifficulty 
Instance details

Defined in Cardano.Chain.Common.ChainDifficulty

Methods

fromCBOR ∷ Decoder s ChainDifficulty #

label ∷ Proxy ChainDifficulty → Text #

FromCBOR Proof 
Instance details

Defined in Cardano.Chain.Block.Proof

Methods

fromCBOR ∷ Decoder s Proof #

label ∷ Proxy Proof → Text #

FromCBOR SscPayload 
Instance details

Defined in Cardano.Chain.Ssc

Methods

fromCBOR ∷ Decoder s SscPayload #

label ∷ Proxy SscPayload → Text #

FromCBOR ProposalBody 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s ProposalBody #

label ∷ Proxy ProposalBody → Text #

FromCBOR TxInWitness 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

fromCBOR ∷ Decoder s TxInWitness #

label ∷ Proxy TxInWitness → Text #

FromCBOR Body 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

fromCBOR ∷ Decoder s Body #

label ∷ Proxy Body → Text #

FromCBOR TxPayload 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

fromCBOR ∷ Decoder s TxPayload #

label ∷ Proxy TxPayload → Text #

FromCBOR Payload 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

fromCBOR ∷ Decoder s Payload #

label ∷ Proxy Payload → Text #

FromCBOR Payload 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

fromCBOR ∷ Decoder s Payload #

label ∷ Proxy Payload → Text #

FromCBOR BlockSignature 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s BlockSignature #

label ∷ Proxy BlockSignature → Text #

FromCBOR TxProof 
Instance details

Defined in Cardano.Chain.UTxO.TxProof

Methods

fromCBOR ∷ Decoder s TxProof #

label ∷ Proxy TxProof → Text #

FromCBOR SscProof 
Instance details

Defined in Cardano.Chain.Ssc

Methods

fromCBOR ∷ Decoder s SscProof #

label ∷ Proxy SscProof → Text #

FromCBOR CompactTxIn 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxIn #

label ∷ Proxy CompactTxIn → Text #

FromCBOR CompactTxOut 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxOut #

label ∷ Proxy CompactTxOut → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Interface

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR UTxOValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

fromCBOR ∷ Decoder s UTxOValidationError #

label ∷ Proxy UTxOValidationError → Text #

FromCBOR BlockCount 
Instance details

Defined in Cardano.Chain.Common.BlockCount

Methods

fromCBOR ∷ Decoder s BlockCount #

label ∷ Proxy BlockCount → Text #

FromCBOR UTxOConfiguration 
Instance details

Defined in Cardano.Chain.UTxO.UTxOConfiguration

Methods

fromCBOR ∷ Decoder s UTxOConfiguration #

label ∷ Proxy UTxOConfiguration → Text #

FromCBOR ApplicationName 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

fromCBOR ∷ Decoder s ApplicationName #

label ∷ Proxy ApplicationName → Text #

FromCBOR ApplicationVersion 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s ApplicationVersion #

label ∷ Proxy ApplicationVersion → Text #

FromCBOR ProtocolUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s ProtocolUpdateProposal #

label ∷ Proxy ProtocolUpdateProposal → Text #

FromCBOR SoftwareUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s SoftwareUpdateProposal #

label ∷ Proxy SoftwareUpdateProposal → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR HDAddressPayload 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

fromCBOR ∷ Decoder s HDAddressPayload #

label ∷ Proxy HDAddressPayload → Text #

FromCBOR NetworkMagic 
Instance details

Defined in Cardano.Chain.Common.NetworkMagic

Methods

fromCBOR ∷ Decoder s NetworkMagic #

label ∷ Proxy NetworkMagic → Text #

FromCBOR AddrSpendingData 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

fromCBOR ∷ Decoder s AddrSpendingData #

label ∷ Proxy AddrSpendingData → Text #

FromCBOR AddrType 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

fromCBOR ∷ Decoder s AddrType #

label ∷ Proxy AddrType → Text #

FromCBOR Address 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

fromCBOR ∷ Decoder s Address #

label ∷ Proxy Address → Text #

FromCBOR Address' 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

fromCBOR ∷ Decoder s Address' #

label ∷ Proxy Address' → Text #

FromCBOR LovelaceError 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

fromCBOR ∷ Decoder s LovelaceError #

label ∷ Proxy LovelaceError → Text #

FromCBOR LovelacePortion 
Instance details

Defined in Cardano.Chain.Common.LovelacePortion

Methods

fromCBOR ∷ Decoder s LovelacePortion #

label ∷ Proxy LovelacePortion → Text #

FromCBOR TxFeePolicy 
Instance details

Defined in Cardano.Chain.Common.TxFeePolicy

Methods

fromCBOR ∷ Decoder s TxFeePolicy #

label ∷ Proxy TxFeePolicy → Text #

FromCBOR TxSizeLinear 
Instance details

Defined in Cardano.Chain.Common.TxSizeLinear

Methods

fromCBOR ∷ Decoder s TxSizeLinear #

label ∷ Proxy TxSizeLinear → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Activation

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR GenesisData 
Instance details

Defined in Cardano.Chain.Genesis.Data

Methods

fromCBOR ∷ Decoder s GenesisData #

label ∷ Proxy GenesisData → Text #

FromCBOR CompactTxId 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxId #

label ∷ Proxy CompactTxId → Text #

FromCBOR TxIn 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s TxIn #

label ∷ Proxy TxIn → Text #

FromCBOR TxOut 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s TxOut #

label ∷ Proxy TxOut → Text #

FromCBOR TxAux 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

fromCBOR ∷ Decoder s TxAux #

label ∷ Proxy TxAux → Text #

FromCBOR TxSigData 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

fromCBOR ∷ Decoder s TxSigData #

label ∷ Proxy TxSigData → Text #

FromCBOR UTxOError 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

fromCBOR ∷ Decoder s UTxOError #

label ∷ Proxy UTxOError → Text #

FromCBOR ApplicationNameError 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

fromCBOR ∷ Decoder s ApplicationNameError #

label ∷ Proxy ApplicationNameError → Text #

FromCBOR InstallerHash 
Instance details

Defined in Cardano.Chain.Update.InstallerHash

Methods

fromCBOR ∷ Decoder s InstallerHash #

label ∷ Proxy InstallerHash → Text #

FromCBOR SystemTag 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

fromCBOR ∷ Decoder s SystemTag #

label ∷ Proxy SystemTag → Text #

FromCBOR ProtocolParametersUpdate 
Instance details

Defined in Cardano.Chain.Update.ProtocolParametersUpdate

Methods

fromCBOR ∷ Decoder s ProtocolParametersUpdate #

label ∷ Proxy ProtocolParametersUpdate → Text #

FromCBOR SoftforkRule 
Instance details

Defined in Cardano.Chain.Update.SoftforkRule

Methods

fromCBOR ∷ Decoder s SoftforkRule #

label ∷ Proxy SoftforkRule → Text #

FromCBOR SoftwareVersionError 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

fromCBOR ∷ Decoder s SoftwareVersionError #

label ∷ Proxy SoftwareVersionError → Text #

FromCBOR SystemTagError 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

fromCBOR ∷ Decoder s SystemTagError #

label ∷ Proxy SystemTagError → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Voting

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Adopted 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s Adopted #

label ∷ Proxy Adopted → Text #

FromCBOR ActiveSlotCoeff 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s ActiveSlotCoeff #

label ∷ Proxy ActiveSlotCoeff → Text #

FromCBOR DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s DnsName #

label ∷ Proxy DnsName → Text #

FromCBOR Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Port #

label ∷ Proxy Port → Text #

FromCBOR Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Url #

label ∷ Proxy Url → Text #

FromCBOR DeltaCoin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s DeltaCoin #

label ∷ Proxy DeltaCoin → Text #

FromCBOR TicknState 
Instance details

Defined in Shelley.Spec.Ledger.STS.Tickn

Methods

fromCBOR ∷ Decoder s TicknState #

label ∷ Proxy TicknState → Text #

FromCBOR ChainCode 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

fromCBOR ∷ Decoder s ChainCode #

label ∷ Proxy ChainCode → Text #

FromCBOR AccountState 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s AccountState #

label ∷ Proxy AccountState → Text #

FromCBOR LogWeight 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s LogWeight #

label ∷ Proxy LogWeight → Text #

FromCBOR MIRPot 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s MIRPot #

label ∷ Proxy MIRPot → Text #

FromCBOR KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

fromCBOR ∷ Decoder s KESPeriod #

label ∷ Proxy KESPeriod → Text #

FromCBOR PerformanceEstimate 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s PerformanceEstimate #

label ∷ Proxy PerformanceEstimate → Text #

FromCBOR RewardType 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s RewardType #

label ∷ Proxy RewardType → Text #

FromCBOR VotingPeriod 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

fromCBOR ∷ Decoder s VotingPeriod #

label ∷ Proxy VotingPeriod → Text #

FromCBOR TxValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

fromCBOR ∷ Decoder s TxValidationError #

label ∷ Proxy TxValidationError → Text #

FromCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

fromCBOR ∷ Decoder s Certificate #

label ∷ Proxy Certificate → Text #

FromCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

fromCBOR ∷ Decoder s OperationalCertificateIssueCounter #

label ∷ Proxy OperationalCertificateIssueCounter → Text #

FromCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

fromCBOR ∷ Decoder s OperationalCertificate #

label ∷ Proxy OperationalCertificate → Text #

FromCBOR a ⇒ FromCBOR [a] 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s [a] #

label ∷ Proxy [a] → Text #

FromCBOR a ⇒ FromCBOR (Maybe a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Maybe a) #

label ∷ Proxy (Maybe a) → Text #

(Integral a, FromCBOR a) ⇒ FromCBOR (Ratio a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Ratio a) #

label ∷ Proxy (Ratio a) → Text #

(Ord a, FromCBOR a) ⇒ FromCBOR (Set a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Set a) #

label ∷ Proxy (Set a) → Text #

FromCBOR a ⇒ FromCBOR (NonEmpty a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (NonEmpty a) #

label ∷ Proxy (NonEmpty a) → Text #

(Serialise t, Typeable t) ⇒ FromCBOR (WithOrigin t) 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s (WithOrigin t) #

label ∷ Proxy (WithOrigin t) → Text #

FromCBOR a ⇒ FromCBOR (Vector a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Vector a) #

label ∷ Proxy (Vector a) → Text #

(Era era, Ord (Script era), FromCBOR (Annotator (Script era)), Script era ~ Script era) ⇒ FromCBOR (Annotator (AuxiliaryData era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryData era)) #

label ∷ Proxy (Annotator (AuxiliaryData era)) → Text #

(FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Script era)), FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (Witnesses era)), ToCBOR (AuxiliaryData era), ToCBOR (Script era), ToCBOR (TxBody era), ToCBOR (Witnesses era), ValidateScript era, Script era ~ Script era, Era era) ⇒ FromCBOR (Annotator (TxSeq era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxSeq

Methods

fromCBOR ∷ Decoder s (Annotator (TxSeq era)) #

label ∷ Proxy (Annotator (TxSeq era)) → Text #

(Era era, ValidateScript era, Script era ~ Script era) ⇒ FromCBOR (Annotator (TxWitness era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (TxWitness era)) #

label ∷ Proxy (Annotator (TxWitness era)) → Text #

(Typeable t, FromCBOR (Annotator t)) ⇒ FromCBOR (Annotator (MemoBytes t)) 
Instance details

Defined in Data.MemoBytes

Methods

fromCBOR ∷ Decoder s (Annotator (MemoBytes t)) #

label ∷ Proxy (Annotator (MemoBytes t)) → Text #

(Era era, ToCBOR (Data era), ToCBOR (Script era), Typeable (Script era), ValidateScript era, Script era ~ Script era) ⇒ FromCBOR (Annotator (TxWitnessRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (TxWitnessRaw era)) #

label ∷ Proxy (Annotator (TxWitnessRaw era)) → Text #

(Typeable era, FromCBOR (Annotator (Script era)), ValidateScript era) ⇒ FromCBOR (Annotator (WitnessSetHKD Identity era)) 
Instance details

Defined in Shelley.Spec.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessSetHKD Identity era)) #

label ∷ Proxy (Annotator (WitnessSetHKD Identity era)) → Text #

(BlockAnn era, Typeable era) ⇒ FromCBOR (Annotator (TxSeq era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (TxSeq era)) #

label ∷ Proxy (Annotator (TxSeq era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (Timelock crypto)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s (Annotator (Timelock crypto)) #

label ∷ Proxy (Annotator (Timelock crypto)) → Text #

(Era era, FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Witnesses era))) ⇒ FromCBOR (Annotator (Tx era)) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (Tx era)) #

label ∷ Proxy (Annotator (Tx era)) → Text #

(Era era, FromCBOR (TxOut era), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

(Era era, FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Witnesses era))) ⇒ FromCBOR (Annotator (TxRaw era)) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (TxRaw era)) #

label ∷ Proxy (Annotator (TxRaw era)) → Text #

FamsFrom era ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), SerialisableData (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (MultiSig crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (MultiSig crypto)) #

label ∷ Proxy (Annotator (MultiSig crypto)) → Text #

Typeable era ⇒ FromCBOR (Annotator (Metadata era)) 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

fromCBOR ∷ Decoder s (Annotator (Metadata era)) #

label ∷ Proxy (Annotator (Metadata era)) → Text #

(Era era, AnnotatedData (Script era)) ⇒ FromCBOR (Annotator (AuxiliaryData era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryData era)) #

label ∷ Proxy (Annotator (AuxiliaryData era)) → Text #

FamsFrom era ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

(Crypto (Crypto era), Typeable (Crypto era), Typeable era) ⇒ FromCBOR (Annotator (Script era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (Script era)) #

label ∷ Proxy (Annotator (Script era)) → Text #

Typeable era ⇒ FromCBOR (Annotator (Data era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (Data era)) #

label ∷ Proxy (Annotator (Data era)) → Text #

(Era era, Ord (Script era), FromCBOR (Annotator (Script era)), Script era ~ Script era) ⇒ FromCBOR (Annotator (AuxiliaryDataRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryDataRaw era)) #

label ∷ Proxy (Annotator (AuxiliaryDataRaw era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (TimelockRaw crypto)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s (Annotator (TimelockRaw crypto)) #

label ∷ Proxy (Annotator (TimelockRaw crypto)) → Text #

(Era era, AnnotatedData (Script era)) ⇒ FromCBOR (Annotator (AuxiliaryDataRaw era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryDataRaw era)) #

label ∷ Proxy (Annotator (AuxiliaryDataRaw era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (BHeader crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (BHeader crypto)) #

label ∷ Proxy (Annotator (BHeader crypto)) → Text #

(BlockAnn era, ValidateScript era, SupportsSegWit era, FromCBOR (Annotator (TxSeq era))) ⇒ FromCBOR (Annotator (Block era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (Block era)) #

label ∷ Proxy (Annotator (Block era)) → Text #

(Typeable kr, Crypto crypto) ⇒ FromCBOR (Annotator (WitVKey kr crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (WitVKey kr crypto)) #

label ∷ Proxy (Annotator (WitVKey kr crypto)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (BootstrapWitness crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

fromCBOR ∷ Decoder s (Annotator (BootstrapWitness crypto)) #

label ∷ Proxy (Annotator (BootstrapWitness crypto)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (MultiSigRaw crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (MultiSigRaw crypto)) #

label ∷ Proxy (Annotator (MultiSigRaw crypto)) → Text #

ShelleyBasedEra era ⇒ FromCBOR (Annotator (Header (ShelleyBlock era))) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (Annotator (Header (ShelleyBlock era))) #

label ∷ Proxy (Annotator (Header (ShelleyBlock era))) → Text #

ShelleyBasedEra era ⇒ FromCBOR (Annotator (ShelleyBlock era)) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (Annotator (ShelleyBlock era)) #

label ∷ Proxy (Annotator (ShelleyBlock era)) → Text #

Era era ⇒ FromCBOR (Annotator (RedeemersRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (RedeemersRaw era)) #

label ∷ Proxy (Annotator (RedeemersRaw era)) → Text #

Era era ⇒ FromCBOR (Annotator (WitnessPPData era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessPPData era)) #

label ∷ Proxy (Annotator (WitnessPPData era)) → Text #

Era era ⇒ FromCBOR (Annotator (Redeemers era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (Redeemers era)) #

label ∷ Proxy (Annotator (Redeemers era)) → Text #

Era era ⇒ FromCBOR (Annotator (WitnessPPDataRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessPPDataRaw era)) #

label ∷ Proxy (Annotator (WitnessPPDataRaw era)) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

(Era era, BlockAnn era, ValidateScript era, TxSeq era ~ TxSeq era) ⇒ FromCBOR (Annotator (LaxBlock era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (LaxBlock era)) #

label ∷ Proxy (Annotator (LaxBlock era)) → Text #

(TransTxBody FromCBOR era, ToCBOR (PParamsDelta era), Era era) ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

FromCBOR (SigDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (SigDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (SigDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed25519DSIGN) #

label ∷ Proxy (SigDSIGN Ed25519DSIGN) → Text #

FromCBOR (SigDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (SigDSIGN MockDSIGN) #

label ∷ Proxy (SigDSIGN MockDSIGN) → Text #

FromCBOR (SigDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed448DSIGN) #

label ∷ Proxy (SigDSIGN Ed448DSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed25519DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed25519DSIGN) → Text #

FromCBOR (SignKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN MockDSIGN) #

label ∷ Proxy (SignKeyDSIGN MockDSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed448DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed448DSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed25519DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed25519DSIGN) → Text #

FromCBOR (VerKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN MockDSIGN) #

label ∷ Proxy (VerKeyDSIGN MockDSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed448DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed448DSIGN) → Text #

Crypto crypto ⇒ FromCBOR (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

fromCBOR ∷ Decoder s (ScriptHash crypto) #

label ∷ Proxy (ScriptHash crypto) → Text #

FromCBOR a ⇒ FromCBOR (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

fromCBOR ∷ Decoder s (StrictMaybe a) #

label ∷ Proxy (StrictMaybe a) → Text #

Crypto crypto ⇒ FromCBOR (AuxiliaryDataHash crypto) 
Instance details

Defined in Cardano.Ledger.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (AuxiliaryDataHash crypto) #

label ∷ Proxy (AuxiliaryDataHash crypto) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (PPUPState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (PPUPState era) #

label ∷ Proxy (PPUPState era) → Text #

Crypto crypto ⇒ FromCBOR (Value crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (Value crypto) #

label ∷ Proxy (Value crypto) → Text #

Era era ⇒ FromCBOR (PParamsUpdate era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (PParamsUpdate era) #

label ∷ Proxy (PParamsUpdate era) → Text #

Era era ⇒ FromCBOR (PParams era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (PParams era) #

label ∷ Proxy (PParams era) → Text #

(Era era, TransTxOut DecodeNonNegative era, Show (Value era)) ⇒ FromCBOR (TxOut era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxOut era) #

label ∷ Proxy (TxOut era) → Text #

Era era ⇒ FromCBOR (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (PParams era) #

label ∷ Proxy (PParams era) → Text #

Era era ⇒ FromCBOR (PParamsUpdate era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (PParamsUpdate era) #

label ∷ Proxy (PParamsUpdate era) → Text #

FamsFrom era ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

(FromCBOR (PParams era), TransValue FromCBOR era, HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era), FromCBOR (TxOut era), FromCBOR (State (EraRule "PPUP" era)), Era era) ⇒ FromCBOR (EpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (EpochState era) #

label ∷ Proxy (EpochState era) → Text #

(Era era, HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era), FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (State (EraRule "PPUP" era))) ⇒ FromCBOR (LedgerState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (LedgerState era) #

label ∷ Proxy (LedgerState era) → Text #

(TransValue FromCBOR era, FromCBOR (State (EraRule "PPUP" era)), FromCBOR (TxOut era), HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era)) ⇒ FromCBOR (UTxOState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (UTxOState era) #

label ∷ Proxy (UTxOState era) → Text #

Crypto crypto ⇒ FromCBOR (DPState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (DPState crypto) #

label ∷ Proxy (DPState crypto) → Text #

(Era era, FromCBOR (PParams era), FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (State (EraRule "PPUP" era))) ⇒ FromCBOR (NewEpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (NewEpochState era) #

label ∷ Proxy (NewEpochState era) → Text #

Crypto crypto ⇒ FromCBOR (TxIn crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxIn crypto) #

label ∷ Proxy (TxIn crypto) → Text #

Crypto crypto ⇒ FromCBOR (CompactAddr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.CompactAddr

Methods

fromCBOR ∷ Decoder s (CompactAddr crypto) #

label ∷ Proxy (CompactAddr crypto) → Text #

Crypto crypto ⇒ FromCBOR (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (BlocksMade crypto) #

label ∷ Proxy (BlocksMade crypto) → Text #

Crypto crypto ⇒ FromCBOR (SnapShots crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (SnapShots crypto) #

label ∷ Proxy (SnapShots crypto) → Text #

Crypto crypto ⇒ FromCBOR (NonMyopic crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s (NonMyopic crypto) #

label ∷ Proxy (NonMyopic crypto) → Text #

Crypto crypto ⇒ FromCBOR (PulsingRewUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (PulsingRewUpdate crypto) #

label ∷ Proxy (PulsingRewUpdate crypto) → Text #

Crypto crypto ⇒ FromCBOR (PoolDistr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

fromCBOR ∷ Decoder s (PoolDistr crypto) #

label ∷ Proxy (PoolDistr crypto) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (ProposedPPUpdates era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (ProposedPPUpdates era) #

label ∷ Proxy (ProposedPPUpdates era) → Text #

Era era ⇒ FromCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

fromCBOR ∷ Decoder s (ShelleyGenesis era) #

label ∷ Proxy (ShelleyGenesis era) → Text #

Crypto crypto ⇒ FromCBOR (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (GenDelegPair crypto) #

label ∷ Proxy (GenDelegPair crypto) → Text #

Crypto crypto ⇒ FromCBOR (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

fromCBOR ∷ Decoder s (Addr crypto) #

label ∷ Proxy (Addr crypto) → Text #

Crypto crypto ⇒ FromCBOR (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

fromCBOR ∷ Decoder s (ShelleyGenesisStaking crypto) #

label ∷ Proxy (ShelleyGenesisStaking crypto) → Text #

FromCBOR (CompactForm Coin) 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s (CompactForm Coin) #

label ∷ Proxy (CompactForm Coin) → Text #

Crypto crypto ⇒ FromCBOR (CompactForm (Value crypto)) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (CompactForm (Value crypto)) #

label ∷ Proxy (CompactForm (Value crypto)) → Text #

(FromCBOR (TxOut era), Era era) ⇒ FromCBOR (UTxO era) 
Instance details

Defined in Shelley.Spec.Ledger.UTxO

Methods

fromCBOR ∷ Decoder s (UTxO era) #

label ∷ Proxy (UTxO era) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (Update era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (Update era) #

label ∷ Proxy (Update era) → Text #

(Era era, DecodeNonNegative (Value era), Show (Value era), Compactible (Value era)) ⇒ FromCBOR (TxOut era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (TxOut era) #

label ∷ Proxy (TxOut era) → Text #

Crypto crypto ⇒ FromCBOR (PolicyID crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (PolicyID crypto) #

label ∷ Proxy (PolicyID crypto) → Text #

(ShelleyBased era, FromCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ FromCBOR (ApplyTxError era) 
Instance details

Defined in Shelley.Spec.Ledger.API.Mempool

Methods

fromCBOR ∷ Decoder s (ApplyTxError era) #

label ∷ Proxy (ApplyTxError era) → Text #

(FromCBOR (PredicateFailure (EraRule "DELEGS" era)), FromCBOR (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ FromCBOR (LedgerPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledger

Methods

fromCBOR ∷ Decoder s (LedgerPredicateFailure era) #

label ∷ Proxy (LedgerPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "DELPL" era)), Typeable (Script era)) ⇒ FromCBOR (DelegsPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delegs

Methods

fromCBOR ∷ Decoder s (DelegsPredicateFailure era) #

label ∷ Proxy (DelegsPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "POOL" era)), FromCBOR (PredicateFailure (EraRule "DELEG" era)), Typeable (Script era)) ⇒ FromCBOR (DelplPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delpl

Methods

fromCBOR ∷ Decoder s (DelplPredicateFailure era) #

label ∷ Proxy (DelplPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (PState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (PState crypto) #

label ∷ Proxy (PState crypto) → Text #

Crypto crypto ⇒ FromCBOR (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (PoolParams crypto) #

label ∷ Proxy (PoolParams crypto) → Text #

Crypto crypto ⇒ FromCBOR (InstantaneousRewards crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (InstantaneousRewards crypto) #

label ∷ Proxy (InstantaneousRewards crypto) → Text #

Crypto crypto ⇒ FromCBOR (SnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (SnapShot crypto) #

label ∷ Proxy (SnapShot crypto) → Text #

Crypto crypto ⇒ FromCBOR (ChainDepState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.API.Protocol

Methods

fromCBOR ∷ Decoder s (ChainDepState crypto) #

label ∷ Proxy (ChainDepState crypto) → Text #

Crypto crypto ⇒ FromCBOR (FutureGenDeleg crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (FutureGenDeleg crypto) #

label ∷ Proxy (FutureGenDeleg crypto) → Text #

Crypto crypto ⇒ FromCBOR (DState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (DState crypto) #

label ∷ Proxy (DState crypto) → Text #

Crypto crypto ⇒ FromCBOR (IndividualPoolStake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

fromCBOR ∷ Decoder s (IndividualPoolStake crypto) #

label ∷ Proxy (IndividualPoolStake crypto) → Text #

(TransValue FromCBOR era, TransUTxO FromCBOR era, DecodeNonNegative (Value era), Show (Value era), FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Rules.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (Script era), Typeable (AuxiliaryData era)) ⇒ FromCBOR (UtxowPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxow

Methods

fromCBOR ∷ Decoder s (UtxowPredicateFailure era) #

label ∷ Proxy (UtxowPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s (RewardProvenance crypto) #

label ∷ Proxy (RewardProvenance crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s (RewardProvenancePool crypto) #

label ∷ Proxy (RewardProvenancePool crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

fromCBOR ∷ Decoder s (RewardAcnt crypto) #

label ∷ Proxy (RewardAcnt crypto) → Text #

Crypto crypto ⇒ FromCBOR (TxId crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxId crypto) #

label ∷ Proxy (TxId crypto) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (SigKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (SigKES (SingleKES d)) #

label ∷ Proxy (SigKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (SigKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (SigKES (SumKES h d)) #

label ∷ Proxy (SigKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (SigKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (SigKES (MockKES t)) #

label ∷ Proxy (SigKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (SigKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (SigKES (SimpleKES d t)) #

label ∷ Proxy (SigKES (SimpleKES d t)) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (VerKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SingleKES d)) #

label ∷ Proxy (VerKeyKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (VerKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SumKES h d)) #

label ∷ Proxy (VerKeyKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (VerKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyKES (MockKES t)) #

label ∷ Proxy (VerKeyKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (VerKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SimpleKES d t)) #

label ∷ Proxy (VerKeyKES (SimpleKES d t)) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (SignKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SingleKES d)) #

label ∷ Proxy (SignKeyKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (SignKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SumKES h d)) #

label ∷ Proxy (SignKeyKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (SignKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyKES (MockKES t)) #

label ∷ Proxy (SignKeyKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (SignKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SimpleKES d t)) #

label ∷ Proxy (SignKeyKES (SimpleKES d t)) → Text #

Crypto c ⇒ FromCBOR (ShelleyHash c) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (ShelleyHash c) #

label ∷ Proxy (ShelleyHash c) → Text #

Era era ⇒ FromCBOR (CompactGenesis era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Config

Methods

fromCBOR ∷ Decoder s (CompactGenesis era) #

label ∷ Proxy (CompactGenesis era) → Text #

FromCBOR (ATxAux ByteSpan) 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

fromCBOR ∷ Decoder s (ATxAux ByteSpan) #

label ∷ Proxy (ATxAux ByteSpan) → Text #

FromCBOR (ACertificate ByteSpan) 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

fromCBOR ∷ Decoder s (ACertificate ByteSpan) #

label ∷ Proxy (ACertificate ByteSpan) → Text #

FromCBOR (AProposal ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s (AProposal ByteSpan) #

label ∷ Proxy (AProposal ByteSpan) → Text #

FromCBOR (AVote ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

fromCBOR ∷ Decoder s (AVote ByteSpan) #

label ∷ Proxy (AVote ByteSpan) → Text #

Crypto crypto ⇒ FromCBOR (BHBody crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (BHBody crypto) #

label ∷ Proxy (BHBody crypto) → Text #

Crypto crypto ⇒ FromCBOR (PrevHash crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (PrevHash crypto) #

label ∷ Proxy (PrevHash crypto) → Text #

Crypto crypto ⇒ FromCBOR (HashHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (HashHeader crypto) #

label ∷ Proxy (HashHeader crypto) → Text #

Crypto crypto ⇒ FromCBOR (PrtclState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Prtcl

Methods

fromCBOR ∷ Decoder s (PrtclState crypto) #

label ∷ Proxy (PrtclState crypto) → Text #

Typeable v ⇒ FromCBOR (OutputVRF v) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

fromCBOR ∷ Decoder s (OutputVRF v) #

label ∷ Proxy (OutputVRF v) → Text #

FromCBOR (CertVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (CertVRF PraosVRF) #

label ∷ Proxy (CertVRF PraosVRF) → Text #

FromCBOR (CertVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (CertVRF MockVRF) #

label ∷ Proxy (CertVRF MockVRF) → Text #

FromCBOR (CertVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (CertVRF SimpleVRF) #

label ∷ Proxy (CertVRF SimpleVRF) → Text #

FromCBOR (SignKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (SignKeyVRF PraosVRF) #

label ∷ Proxy (SignKeyVRF PraosVRF) → Text #

FromCBOR (SignKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyVRF MockVRF) #

label ∷ Proxy (SignKeyVRF MockVRF) → Text #

FromCBOR (SignKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (SignKeyVRF SimpleVRF) #

label ∷ Proxy (SignKeyVRF SimpleVRF) → Text #

FromCBOR (VerKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (VerKeyVRF PraosVRF) #

label ∷ Proxy (VerKeyVRF PraosVRF) → Text #

FromCBOR (VerKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyVRF MockVRF) #

label ∷ Proxy (VerKeyVRF MockVRF) → Text #

FromCBOR (VerKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (VerKeyVRF SimpleVRF) #

label ∷ Proxy (VerKeyVRF SimpleVRF) → Text #

Typeable a ⇒ FromCBOR (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

fromCBOR ∷ Decoder s (RedeemSignature a) #

label ∷ Proxy (RedeemSignature a) → Text #

Typeable a ⇒ FromCBOR (Signature a) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

fromCBOR ∷ Decoder s (Signature a) #

label ∷ Proxy (Signature a) → Text #

Typeable era ⇒ FromCBOR (LangDepView era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (LangDepView era) #

label ∷ Proxy (LangDepView era) → Text #

Crypto crypto ⇒ FromCBOR (CollectError crypto) 
Instance details

Defined in Cardano.Ledger.Alonzo.PlutusScriptApi

Methods

fromCBOR ∷ Decoder s (CollectError crypto) #

label ∷ Proxy (CollectError crypto) → Text #

(Typeable c, Crypto c) ⇒ FromCBOR (ScriptPurpose c) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (ScriptPurpose c) #

label ∷ Proxy (ScriptPurpose c) → Text #

Crypto crypto ⇒ FromCBOR (Wdrl crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Wdrl crypto) #

label ∷ Proxy (Wdrl crypto) → Text #

Crypto crypto ⇒ FromCBOR (DCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (DCert crypto) #

label ∷ Proxy (DCert crypto) → Text #

(Typeable era, FromCBOR (BbodyPredicateFailure era)) ⇒ FromCBOR (AlonzoBbodyPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Bbody

Methods

fromCBOR ∷ Decoder s (AlonzoBbodyPredFail era) #

label ∷ Proxy (AlonzoBbodyPredFail era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (Script era), Typeable (AuxiliaryData era)) ⇒ FromCBOR (AlonzoPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxow

Methods

fromCBOR ∷ Decoder s (AlonzoPredFail era) #

label ∷ Proxy (AlonzoPredFail era) → Text #

Crypto crypto ⇒ FromCBOR (GenDelegs crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (GenDelegs crypto) #

label ∷ Proxy (GenDelegs crypto) → Text #

(Era era, FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (PredicateFailure (EraRule "UTXOS" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxosPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxos

Methods

fromCBOR ∷ Decoder s (UtxosPredicateFailure era) #

label ∷ Proxy (UtxosPredicateFailure era) → Text #

Era era ⇒ FromCBOR (PpupPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

fromCBOR ∷ Decoder s (PpupPredicateFailure era) #

label ∷ Proxy (PpupPredicateFailure era) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

FromCBOR (ABody ByteSpan) 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

fromCBOR ∷ Decoder s (ABody ByteSpan) #

label ∷ Proxy (ABody ByteSpan) → Text #

FromCBOR (APayload ByteSpan) 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

fromCBOR ∷ Decoder s (APayload ByteSpan) #

label ∷ Proxy (APayload ByteSpan) → Text #

FromCBOR (ABlockSignature ByteSpan) 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s (ABlockSignature ByteSpan) #

label ∷ Proxy (ABlockSignature ByteSpan) → Text #

FromCBOR (ATxPayload ByteSpan) 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

fromCBOR ∷ Decoder s (ATxPayload ByteSpan) #

label ∷ Proxy (ATxPayload ByteSpan) → Text #

FromCBOR (APayload ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

fromCBOR ∷ Decoder s (APayload ByteSpan) #

label ∷ Proxy (APayload ByteSpan) → Text #

FromCBOR (Attributes ()) 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

fromCBOR ∷ Decoder s (Attributes ()) #

label ∷ Proxy (Attributes ()) → Text #

FromCBOR (Attributes AddrAttributes) 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

fromCBOR ∷ Decoder s (Attributes AddrAttributes) #

label ∷ Proxy (Attributes AddrAttributes) → Text #

FromCBOR a ⇒ FromCBOR (MerkleRoot a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

fromCBOR ∷ Decoder s (MerkleRoot a) #

label ∷ Proxy (MerkleRoot a) → Text #

(FromCBOR a, ToCBOR a) ⇒ FromCBOR (MerkleTree a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

fromCBOR ∷ Decoder s (MerkleTree a) #

label ∷ Proxy (MerkleTree a) → Text #

FromCBOR n ⇒ FromCBOR (TooLarge n) 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s (TooLarge n) #

label ∷ Proxy (TooLarge n) → Text #

Crypto crypto ⇒ FromCBOR (CompactValue crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (CompactValue crypto) #

label ∷ Proxy (CompactValue crypto) → Text #

Crypto crypto ⇒ FromCBOR (LastAppliedBlock crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (LastAppliedBlock crypto) #

label ∷ Proxy (LastAppliedBlock crypto) → Text #

(FromCBORGroup a, ToCBORGroup a) ⇒ FromCBOR (CBORGroup a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

fromCBOR ∷ Decoder s (CBORGroup a) #

label ∷ Proxy (CBORGroup a) → Text #

Crypto crypto ⇒ FromCBOR (MIRCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (MIRCert crypto) #

label ∷ Proxy (MIRCert crypto) → Text #

Crypto crypto ⇒ FromCBOR (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (StakeCreds crypto) #

label ∷ Proxy (StakeCreds crypto) → Text #

Crypto crypto ⇒ FromCBOR (Stake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (Stake crypto) #

label ∷ Proxy (Stake crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardSnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardSnapShot crypto) #

label ∷ Proxy (RewardSnapShot crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardUpdate crypto) #

label ∷ Proxy (RewardUpdate crypto) → Text #

Crypto c ⇒ FromCBOR (RewardAns c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardAns c) #

label ∷ Proxy (RewardAns c) → Text #

Crypto c ⇒ FromCBOR (Pulser c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (Pulser c) #

label ∷ Proxy (Pulser c) → Text #

Crypto crypto ⇒ FromCBOR (OBftSlot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OverlaySchedule

Methods

fromCBOR ∷ Decoder s (OBftSlot crypto) #

label ∷ Proxy (OBftSlot crypto) → Text #

Crypto crypto ⇒ FromCBOR (FreeVars crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (FreeVars crypto) #

label ∷ Proxy (FreeVars crypto) → Text #

Crypto crypto ⇒ FromCBOR (Reward crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s (Reward crypto) #

label ∷ Proxy (Reward crypto) → Text #

(Era era, Typeable (Script era)) ⇒ FromCBOR (DelegPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Deleg

Methods

fromCBOR ∷ Decoder s (DelegPredicateFailure era) #

label ∷ Proxy (DelegPredicateFailure era) → Text #

Era era ⇒ FromCBOR (PoolPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Pool

Methods

fromCBOR ∷ Decoder s (PoolPredicateFailure era) #

label ∷ Proxy (PoolPredicateFailure era) → Text #

(ShelleyBased era, FromCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ FromCBOR (LedgersPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledgers

Methods

fromCBOR ∷ Decoder s (LedgersPredicateFailure era) #

label ∷ Proxy (LedgersPredicateFailure era) → Text #

(TransValue FromCBOR era, TransUTxO FromCBOR era, DecodeNonNegative (Value era), Show (Value era), FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (MIRTarget crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (MIRTarget crypto) #

label ∷ Proxy (MIRTarget crypto) → Text #

(FromCBOR (TxOut era), Era era, FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

FromCBOR a ⇒ FromCBOR (CborSeq a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

fromCBOR ∷ Decoder s (CborSeq a) #

label ∷ Proxy (CborSeq a) → Text #

FromCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakePoolKey) #

label ∷ Proxy (VerificationKey StakePoolKey) → Text #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateKey) #

label ∷ Proxy (VerificationKey GenesisDelegateKey) → Text #

FromCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisExtendedKey) #

label ∷ Proxy (VerificationKey GenesisExtendedKey) → Text #

FromCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisKey) #

label ∷ Proxy (VerificationKey GenesisKey) → Text #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeKey) #

label ∷ Proxy (VerificationKey StakeKey) → Text #

FromCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentExtendedKey) #

label ∷ Proxy (VerificationKey PaymentExtendedKey) → Text #

FromCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentKey) #

label ∷ Proxy (VerificationKey PaymentKey) → Text #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

FromCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakePoolKey) #

label ∷ Proxy (SigningKey StakePoolKey) → Text #

FromCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisUTxOKey) #

label ∷ Proxy (SigningKey GenesisUTxOKey) → Text #

FromCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateExtendedKey) #

label ∷ Proxy (SigningKey GenesisDelegateExtendedKey) → Text #

FromCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateKey) #

label ∷ Proxy (SigningKey GenesisDelegateKey) → Text #

FromCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisExtendedKey) #

label ∷ Proxy (SigningKey GenesisExtendedKey) → Text #

FromCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisKey) #

label ∷ Proxy (SigningKey GenesisKey) → Text #

FromCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeExtendedKey) #

label ∷ Proxy (SigningKey StakeExtendedKey) → Text #

FromCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeKey) #

label ∷ Proxy (SigningKey StakeKey) → Text #

FromCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentExtendedKey) #

label ∷ Proxy (SigningKey PaymentExtendedKey) → Text #

FromCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentKey) #

label ∷ Proxy (SigningKey PaymentKey) → Text #

FromCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKeyLegacy) #

label ∷ Proxy (SigningKey ByronKeyLegacy) → Text #

FromCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKey) #

label ∷ Proxy (SigningKey ByronKey) → Text #

FromCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey VrfKey) #

label ∷ Proxy (SigningKey VrfKey) → Text #

FromCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey KesKey) #

label ∷ Proxy (SigningKey KesKey) → Text #

Typeable lang ⇒ FromCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

fromCBOR ∷ Decoder s (PlutusScript lang) #

label ∷ Proxy (PlutusScript lang) → Text #

(Typeable era, TransLedgerState FromCBOR (ShelleyLedgerEra era)) ⇒ FromCBOR (DebugLedgerState era) Source # 
Instance details

Defined in Cardano.Api.Query

Methods

fromCBOR ∷ Decoder s (DebugLedgerState era) #

label ∷ Proxy (DebugLedgerState era) → Text #

(FromCBOR a, FromCBOR b) ⇒ FromCBOR (Either a b) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Either a b) #

label ∷ Proxy (Either a b) → Text #

(FromCBOR a, FromCBOR b) ⇒ FromCBOR (a, b) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b) #

label ∷ Proxy (a, b) → Text #

(Ord k, FromCBOR k, FromCBOR v) ⇒ FromCBOR (Map k v) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Map k v) #

label ∷ Proxy (Map k v) → Text #

(HashAlgorithm h, Typeable a) ⇒ FromCBOR (Hash h a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

fromCBOR ∷ Decoder s (Hash h a) #

label ∷ Proxy (Hash h a) → Text #

(Crypto crypto, Typeable disc) ⇒ FromCBOR (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (KeyHash disc crypto) #

label ∷ Proxy (KeyHash disc crypto) → Text #

(Typeable index, Crypto c) ⇒ FromCBOR (SafeHash c index) 
Instance details

Defined in Cardano.Ledger.SafeHash

Methods

fromCBOR ∷ Decoder s (SafeHash c index) #

label ∷ Proxy (SafeHash c index) → Text #

(Typeable kr, Crypto crypto) ⇒ FromCBOR (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

fromCBOR ∷ Decoder s (Credential kr crypto) #

label ∷ Proxy (Credential kr crypto) → Text #

(Typeable algo, Typeable a, HashAlgorithm algo) ⇒ FromCBOR (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

fromCBOR ∷ Decoder s (AbstractHash algo a) #

label ∷ Proxy (AbstractHash algo a) → Text #

(Crypto crypto, Typeable kd) ⇒ FromCBOR (VKey kd crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (VKey kd crypto) #

label ∷ Proxy (VKey kd crypto) → Text #

(VRFAlgorithm v, Typeable a) ⇒ FromCBOR (CertifiedVRF v a) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

fromCBOR ∷ Decoder s (CertifiedVRF v a) #

label ∷ Proxy (CertifiedVRF v a) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c) ⇒ FromCBOR (a, b, c) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c) #

label ∷ Proxy (a, b, c) → Text #

(Typeable s, FromCBOR a) ⇒ FromCBOR (Tagged s a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s0 (Tagged s a) #

label ∷ Proxy (Tagged s a) → Text #

(Ord a, Ord b, FromCBOR a, FromCBOR b) ⇒ FromCBOR (BiMap b a b) 
Instance details

Defined in Control.Iterate.SetAlgebra

Methods

fromCBOR ∷ Decoder s (BiMap b a b) #

label ∷ Proxy (BiMap b a b) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d) ⇒ FromCBOR (a, b, c, d) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d) #

label ∷ Proxy (a, b, c, d) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d, FromCBOR e) ⇒ FromCBOR (a, b, c, d, e) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d, e) #

label ∷ Proxy (a, b, c, d, e) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d, FromCBOR e, FromCBOR f, FromCBOR g) ⇒ FromCBOR (a, b, c, d, e, f, g) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d, e, f, g) #

label ∷ Proxy (a, b, c, d, e, f, g) → Text #

class Typeable a ⇒ ToCBOR a where #

Minimal complete definition

toCBOR

Methods

toCBOR ∷ a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy a → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [a] → Size #

Instances

Instances details
ToCBOR Bool 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Bool → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Bool → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Bool] → Size #

ToCBOR Float 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Float → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Float → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Float] → Size #

ToCBOR Int 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int] → Size #

ToCBOR Int32 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int32 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int32 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int32] → Size #

ToCBOR Int64 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int64 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int64 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int64] → Size #

ToCBOR Integer 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Integer → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Integer → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Integer] → Size #

ToCBOR Natural 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Natural → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Natural → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Natural] → Size #

ToCBOR Word 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word] → Size #

ToCBOR Word8 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word8 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word8 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word8] → Size #

ToCBOR Word16 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word16 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word16 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word16] → Size #

ToCBOR Word32 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word32 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word32 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word32] → Size #

ToCBOR Word64 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word64 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word64 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word64] → Size #

ToCBOR () 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ () → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy () → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [()] → Size #

ToCBOR ByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByteString] → Size #

ToCBOR ShortByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ShortByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ShortByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShortByteString] → Size #

ToCBOR ByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByteString] → Size #

ToCBOR Nano 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Nano → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Nano → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Nano] → Size #

ToCBOR Pico 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Pico → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Pico → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Pico] → Size #

ToCBOR Void 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Void → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Void → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Void] → Size #

ToCBOR Text 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Text → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Text → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Text] → Size #

ToCBOR UTCTime 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ UTCTime → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTCTime → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTCTime] → Size #

ToCBOR NominalDiffTime 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ NominalDiffTime → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy NominalDiffTime → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NominalDiffTime] → Size #

ToCBOR BlockNo 
Instance details

Defined in Cardano.Slotting.Block

Methods

toCBOR ∷ BlockNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockNo] → Size #

ToCBOR EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ EpochNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochNo] → Size #

ToCBOR SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ SlotNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotNo] → Size #

ToCBOR Raw 
Instance details

Defined in Cardano.Binary.Raw

Methods

toCBOR ∷ Raw → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Raw → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Raw] → Size #

ToCBOR Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ Coin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Coin → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Coin] → Size #

ToCBOR UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ UnitInterval → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UnitInterval → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UnitInterval] → Size #

ToCBOR ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ ProtVer → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtVer → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtVer] → Size #

ToCBOR AlonzoGenesis 
Instance details

Defined in Cardano.Ledger.Alonzo.Genesis

Methods

toCBOR ∷ AlonzoGenesis → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AlonzoGenesis → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoGenesis] → Size #

ToCBOR Language 
Instance details

Defined in Cardano.Ledger.Alonzo.Language

Methods

toCBOR ∷ Language → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Language → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Language] → Size #

ToCBOR CostModel 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ CostModel → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CostModel → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CostModel] → Size #

ToCBOR Prices 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Prices → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Prices → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Prices] → Size #

ToCBOR ExUnits 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ ExUnits → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ExUnits → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ExUnits] → Size #

ToCBOR Metadatum 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

toCBOR ∷ Metadatum → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Metadatum → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Metadatum] → Size #

ToCBOR AssetName 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ AssetName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AssetName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AssetName] → Size #

ToCBOR Likelihood 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ Likelihood → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Likelihood → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Likelihood] → Size #

ToCBOR Ptr 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ Ptr → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Ptr → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Ptr] → Size #

ToCBOR Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Nonce → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Nonce → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Nonce] → Size #

ToCBOR Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ Desirability → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Desirability → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Desirability] → Size #

ToCBOR StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ StakePoolRelay → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy StakePoolRelay → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StakePoolRelay] → Size #

ToCBOR PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ PoolMetadata → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy PoolMetadata → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolMetadata] → Size #

ToCBOR Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Network → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Network → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Network] → Size #

ToCBOR ValidityInterval 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

toCBOR ∷ ValidityInterval → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ValidityInterval → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ValidityInterval] → Size #

ToCBOR ByronHash 
Instance details

Defined in Ouroboros.Consensus.Byron.Ledger.Block

Methods

toCBOR ∷ ByronHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByronHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByronHash] → Size #

ToCBOR EpochAndSlotCount 
Instance details

Defined in Cardano.Chain.Slotting.EpochAndSlotCount

Methods

toCBOR ∷ EpochAndSlotCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochAndSlotCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochAndSlotCount] → Size #

ToCBOR EpochNumber 
Instance details

Defined in Cardano.Chain.Slotting.EpochNumber

Methods

toCBOR ∷ EpochNumber → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochNumber → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochNumber] → Size #

ToCBOR EpochSlots 
Instance details

Defined in Cardano.Chain.Slotting.EpochSlots

Methods

toCBOR ∷ EpochSlots → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochSlots → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochSlots] → Size #

ToCBOR SlotCount 
Instance details

Defined in Cardano.Chain.Slotting.SlotCount

Methods

toCBOR ∷ SlotCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotCount] → Size #

ToCBOR SlotNumber 
Instance details

Defined in Cardano.Chain.Slotting.SlotNumber

Methods

toCBOR ∷ SlotNumber → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotNumber → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotNumber] → Size #

ToCBOR Config 
Instance details

Defined in Cardano.Chain.Genesis.Config

Methods

toCBOR ∷ Config → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Config → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Config] → Size #

ToCBOR GenesisNonAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.NonAvvmBalances

Methods

toCBOR ∷ GenesisNonAvvmBalances → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisNonAvvmBalances → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisNonAvvmBalances] → Size #

ToCBOR GenesisDelegation 
Instance details

Defined in Cardano.Chain.Genesis.Delegation

Methods

toCBOR ∷ GenesisDelegation → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisDelegation → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisDelegation] → Size #

ToCBOR GenesisKeyHashes 
Instance details

Defined in Cardano.Chain.Genesis.KeyHashes

Methods

toCBOR ∷ GenesisKeyHashes → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisKeyHashes → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisKeyHashes] → Size #

ToCBOR CompactAddress 
Instance details

Defined in Cardano.Chain.Common.Compact

Methods

toCBOR ∷ CompactAddress → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactAddress → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactAddress] → Size #

ToCBOR RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toCBOR ∷ RequiresNetworkMagic → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RequiresNetworkMagic → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RequiresNetworkMagic] → Size #

ToCBOR GenesisAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.AvvmBalances

Methods

toCBOR ∷ GenesisAvvmBalances → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisAvvmBalances → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisAvvmBalances] → Size #

ToCBOR ProtocolParameters 
Instance details

Defined in Cardano.Chain.Update.ProtocolParameters

Methods

toCBOR ∷ ProtocolParameters → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolParameters → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolParameters] → Size #

ToCBOR ProtocolVersion 
Instance details

Defined in Cardano.Chain.Update.ProtocolVersion

Methods

toCBOR ∷ ProtocolVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolVersion] → Size #

ToCBOR ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toCBOR ∷ ProtocolMagicId → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolMagicId → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolMagicId] → Size #

ToCBOR Certificate 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

toCBOR ∷ Certificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Certificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Certificate] → Size #

ToCBOR SigningKey 
Instance details

Defined in Cardano.Crypto.Signing.SigningKey

Methods

toCBOR ∷ SigningKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SigningKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey] → Size #

ToCBOR SoftwareVersion 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

toCBOR ∷ SoftwareVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareVersion] → Size #

ToCBOR VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

toCBOR ∷ VerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey] → Size #

ToCBOR KeyHash 
Instance details

Defined in Cardano.Chain.Common.KeyHash

Methods

toCBOR ∷ KeyHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy KeyHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KeyHash] → Size #

ToCBOR GenesisHash 
Instance details

Defined in Cardano.Chain.Genesis.Hash

Methods

toCBOR ∷ GenesisHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisHash] → Size #

ToCBOR CandidateProtocolUpdate 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ CandidateProtocolUpdate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CandidateProtocolUpdate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CandidateProtocolUpdate] → Size #

ToCBOR Endorsement 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ Endorsement → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Endorsement → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Endorsement] → Size #

ToCBOR ApplyMempoolPayloadErr 
Instance details

Defined in Cardano.Chain.Byron.API.Mempool

Methods

toCBOR ∷ ApplyMempoolPayloadErr → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplyMempoolPayloadErr → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplyMempoolPayloadErr] → Size #

ToCBOR Tx 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ Tx → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Tx → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tx] → Size #

ToCBOR Proposal 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toCBOR ∷ Proposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proposal] → Size #

ToCBOR Vote 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

toCBOR ∷ Vote → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Vote → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Vote] → Size #

ToCBOR ChainValidationState 
Instance details

Defined in Cardano.Chain.Block.Validation

Methods

toCBOR ∷ ChainValidationState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainValidationState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainValidationState] → Size #

ToCBOR Map 
Instance details

Defined in Cardano.Chain.Delegation.Map

Methods

toCBOR ∷ Map → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Map → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Map] → Size #

ToCBOR ScheduledDelegation 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ ScheduledDelegation → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ScheduledDelegation → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScheduledDelegation] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR UTxO 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

toCBOR ∷ UTxO → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxO → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxO] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR ToSign 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toCBOR ∷ ToSign → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ToSign → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ToSign] → Size #

ToCBOR CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

toCBOR ∷ CompactRedeemVerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactRedeemVerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactRedeemVerificationKey] → Size #

ToCBOR Lovelace 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

toCBOR ∷ Lovelace → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Lovelace → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Lovelace] → Size #

ToCBOR SystemStart 
Instance details

Defined in Cardano.Slotting.Time

Methods

toCBOR ∷ SystemStart → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemStart → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemStart] → Size #

ToCBOR Point 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ Point → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Point → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Point] → Size #

ToCBOR Proof 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ Proof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proof] → Size #

ToCBOR SignKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ SignKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SignKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKey] → Size #

ToCBOR VerKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ VerKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VerKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKey] → Size #

ToCBOR RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

toCBOR ∷ RedeemVerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RedeemVerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemVerificationKey] → Size #

ToCBOR RedeemSigningKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.SigningKey

Methods

toCBOR ∷ RedeemSigningKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RedeemSigningKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemSigningKey] → Size #

ToCBOR IsValidating 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ IsValidating → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy IsValidating → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [IsValidating] → Size #

ToCBOR Tag 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Tag → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Tag → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tag] → Size #

ToCBOR ChainDifficulty 
Instance details

Defined in Cardano.Chain.Common.ChainDifficulty

Methods

toCBOR ∷ ChainDifficulty → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainDifficulty → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainDifficulty] → Size #

ToCBOR Proof 
Instance details

Defined in Cardano.Chain.Block.Proof

Methods

toCBOR ∷ Proof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proof] → Size #

ToCBOR SscPayload 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toCBOR ∷ SscPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SscPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SscPayload] → Size #

ToCBOR ProposalBody 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toCBOR ∷ ProposalBody → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProposalBody → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProposalBody] → Size #

ToCBOR TxInWitness 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toCBOR ∷ TxInWitness → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxInWitness → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxInWitness] → Size #

ToCBOR Body 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

toCBOR ∷ Body → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Body → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Body] → Size #

ToCBOR TxPayload 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

toCBOR ∷ TxPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxPayload] → Size #

ToCBOR Payload 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

toCBOR ∷ Payload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Payload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Payload] → Size #

ToCBOR Payload 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

toCBOR ∷ Payload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Payload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Payload] → Size #

ToCBOR BlockSignature 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toCBOR ∷ BlockSignature → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockSignature → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockSignature] → Size #

ToCBOR TxProof 
Instance details

Defined in Cardano.Chain.UTxO.TxProof

Methods

toCBOR ∷ TxProof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxProof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxProof] → Size #

ToCBOR SscProof 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toCBOR ∷ SscProof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SscProof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SscProof] → Size #

ToCBOR CompactTxIn 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxIn → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxIn → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxIn] → Size #

ToCBOR CompactTxOut 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxOut → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxOut → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxOut] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Interface

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR UTxOValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

toCBOR ∷ UTxOValidationError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOValidationError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOValidationError] → Size #

ToCBOR BlockCount 
Instance details

Defined in Cardano.Chain.Common.BlockCount

Methods

toCBOR ∷ BlockCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockCount] → Size #

ToCBOR UTxOConfiguration 
Instance details

Defined in Cardano.Chain.UTxO.UTxOConfiguration

Methods

toCBOR ∷ UTxOConfiguration → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOConfiguration → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOConfiguration] → Size #

ToCBOR ApplicationName 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

toCBOR ∷ ApplicationName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationName] → Size #

ToCBOR ApplicationVersion 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ ApplicationVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationVersion] → Size #

ToCBOR ProtocolUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ ProtocolUpdateProposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolUpdateProposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolUpdateProposal] → Size #

ToCBOR SoftwareUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ SoftwareUpdateProposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareUpdateProposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareUpdateProposal] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR HDAddressPayload 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toCBOR ∷ HDAddressPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy HDAddressPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [HDAddressPayload] → Size #

ToCBOR NetworkMagic 
Instance details

Defined in Cardano.Chain.Common.NetworkMagic

Methods

toCBOR ∷ NetworkMagic → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy NetworkMagic → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NetworkMagic] → Size #

ToCBOR AddrSpendingData 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

toCBOR ∷ AddrSpendingData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AddrSpendingData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AddrSpendingData] → Size #

ToCBOR AddrType 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

toCBOR ∷ AddrType → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AddrType → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AddrType] → Size #

ToCBOR Address 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

toCBOR ∷ Address → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Address → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Address] → Size #

ToCBOR Address' 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

toCBOR ∷ Address' → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Address' → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Address'] → Size #

ToCBOR LovelaceError 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

toCBOR ∷ LovelaceError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LovelaceError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LovelaceError] → Size #

ToCBOR LovelacePortion 
Instance details

Defined in Cardano.Chain.Common.LovelacePortion

Methods

toCBOR ∷ LovelacePortion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LovelacePortion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LovelacePortion] → Size #

ToCBOR TxFeePolicy 
Instance details

Defined in Cardano.Chain.Common.TxFeePolicy

Methods

toCBOR ∷ TxFeePolicy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxFeePolicy → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxFeePolicy] → Size #

ToCBOR TxSizeLinear 
Instance details

Defined in Cardano.Chain.Common.TxSizeLinear

Methods

toCBOR ∷ TxSizeLinear → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxSizeLinear → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxSizeLinear] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Activation

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR GenesisData 
Instance details

Defined in Cardano.Chain.Genesis.Data

Methods

toCBOR ∷ GenesisData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisData] → Size #

ToCBOR CompactTxId 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxId → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxId → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxId] → Size #

ToCBOR TxIn 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ TxIn → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxIn → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxIn] → Size #

ToCBOR TxOut 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ TxOut → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxOut → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut] → Size #

ToCBOR TxAux 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

toCBOR ∷ TxAux → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxAux → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxAux] → Size #

ToCBOR TxSigData 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toCBOR ∷ TxSigData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxSigData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxSigData] → Size #

ToCBOR UTxOError 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

toCBOR ∷ UTxOError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOError] → Size #

ToCBOR ApplicationNameError 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

toCBOR ∷ ApplicationNameError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationNameError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationNameError] → Size #

ToCBOR InstallerHash 
Instance details

Defined in Cardano.Chain.Update.InstallerHash

Methods

toCBOR ∷ InstallerHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy InstallerHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [InstallerHash] → Size #

ToCBOR SystemTag 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

toCBOR ∷ SystemTag → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemTag → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemTag] → Size #

ToCBOR ProtocolParametersUpdate 
Instance details

Defined in Cardano.Chain.Update.ProtocolParametersUpdate

Methods

toCBOR ∷ ProtocolParametersUpdate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolParametersUpdate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolParametersUpdate] → Size #

ToCBOR SoftforkRule 
Instance details

Defined in Cardano.Chain.Update.SoftforkRule

Methods

toCBOR ∷ SoftforkRule → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftforkRule → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftforkRule] → Size #

ToCBOR SoftwareVersionError 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

toCBOR ∷ SoftwareVersionError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareVersionError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareVersionError] → Size #

ToCBOR SystemTagError 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

toCBOR ∷ SystemTagError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemTagError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemTagError] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Voting

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Adopted 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ Adopted → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Adopted → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Adopted] → Size #

ToCBOR ActiveSlotCoeff 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ ActiveSlotCoeff → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ActiveSlotCoeff → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ActiveSlotCoeff] → Size #

ToCBOR DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ DnsName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy DnsName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DnsName] → Size #

ToCBOR Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Port → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Port → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Port] → Size #

ToCBOR Seed 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Seed → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Seed → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Seed] → Size #

ToCBOR Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Url → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Url → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Url] → Size #

ToCBOR DeltaCoin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ DeltaCoin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy DeltaCoin → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DeltaCoin] → Size #

ToCBOR TicknState 
Instance details

Defined in Shelley.Spec.Ledger.STS.Tickn

Methods

toCBOR ∷ TicknState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TicknState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TicknState] → Size #

ToCBOR ChainCode 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

toCBOR ∷ ChainCode → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainCode → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainCode] → Size #

ToCBOR AccountState 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ AccountState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AccountState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AccountState] → Size #

ToCBOR LogWeight 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ LogWeight → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LogWeight → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LogWeight] → Size #

ToCBOR MIRPot 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRPot → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy MIRPot → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRPot] → Size #

ToCBOR KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

toCBOR ∷ KESPeriod → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy KESPeriod → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KESPeriod] → Size #

ToCBOR PerformanceEstimate 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ PerformanceEstimate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy PerformanceEstimate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PerformanceEstimate] → Size #

ToCBOR RewardType 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ RewardType → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RewardType → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardType] → Size #

ToCBOR VotingPeriod 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

toCBOR ∷ VotingPeriod → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VotingPeriod → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VotingPeriod] → Size #

ToCBOR SizeOfPoolOwners 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ SizeOfPoolOwners → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SizeOfPoolOwners → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SizeOfPoolOwners] → Size #

ToCBOR SizeOfPoolRelays 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ SizeOfPoolRelays → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SizeOfPoolRelays → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SizeOfPoolRelays] → Size #

ToCBOR TxValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

toCBOR ∷ TxValidationError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxValidationError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxValidationError] → Size #

ToCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

toCBOR ∷ Certificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Certificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Certificate] → Size #

ToCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

toCBOR ∷ OperationalCertificateIssueCounter → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy OperationalCertificateIssueCounter → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OperationalCertificateIssueCounter] → Size #

ToCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

toCBOR ∷ OperationalCertificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy OperationalCertificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OperationalCertificate] → Size #

ToCBOR a ⇒ ToCBOR [a] 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ [a] → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [a] → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [[a]] → Size #

ToCBOR a ⇒ ToCBOR (Maybe a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Maybe a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Maybe a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Maybe a] → Size #

ToCBOR a ⇒ ToCBOR (Ratio a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Ratio a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Ratio a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Ratio a] → Size #

(Ord a, ToCBOR a) ⇒ ToCBOR (Set a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Set a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Set a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Set a] → Size #

ToCBOR a ⇒ ToCBOR (NonEmpty a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ NonEmpty a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NonEmpty a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NonEmpty a] → Size #

(Serialise t, Typeable t) ⇒ ToCBOR (WithOrigin t) 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ WithOrigin t → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (WithOrigin t) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [WithOrigin t] → Size #

ToCBOR a ⇒ ToCBOR (Vector a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Vector a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Vector a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Vector a] → Size #

Typeable xs ⇒ ToCBOR (LengthOf xs) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ LengthOf xs → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LengthOf xs) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LengthOf xs] → Size #

ToCBOR (SigDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ SigDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (SigDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ SigDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed25519DSIGN] → Size #

ToCBOR (SigDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ SigDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN MockDSIGN] → Size #

ToCBOR (SigDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ SigDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed448DSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ SignKeyDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ SignKeyDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed25519DSIGN] → Size #

ToCBOR (SignKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ SignKeyDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN MockDSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ SignKeyDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed448DSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ VerKeyDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ VerKeyDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed25519DSIGN] → Size #

ToCBOR (VerKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ VerKeyDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN MockDSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ VerKeyDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed448DSIGN] → Size #

Crypto crypto ⇒ ToCBOR (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

toCBOR ∷ ScriptHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ScriptHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScriptHash crypto] → Size #

ToCBOR a ⇒ ToCBOR (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

toCBOR ∷ StrictMaybe a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (StrictMaybe a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StrictMaybe a] → Size #

Crypto crypto ⇒ ToCBOR (AuxiliaryDataHash crypto) 
Instance details

Defined in Cardano.Ledger.AuxiliaryData

Methods

toCBOR ∷ AuxiliaryDataHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryDataHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryDataHash crypto] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (PPUPState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ PPUPState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PPUPState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PPUPState era] → Size #

Crypto crypto ⇒ ToCBOR (Value crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ Value crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Value crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Value crypto] → Size #

Typeable era ⇒ ToCBOR (AuxiliaryData era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ AuxiliaryData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryData era] → Size #

Era era ⇒ ToCBOR (PParamsUpdate era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ PParamsUpdate era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParamsUpdate era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParamsUpdate era] → Size #

Era era ⇒ ToCBOR (PParams era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ PParams era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParams era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParams era] → Size #

Typeable era ⇒ ToCBOR (TxWitness era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

toCBOR ∷ TxWitness era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxWitness era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxWitness era] → Size #

Typeable t ⇒ ToCBOR (MemoBytes t) 
Instance details

Defined in Data.MemoBytes

Methods

toCBOR ∷ MemoBytes t → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (MemoBytes t) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [MemoBytes t] → Size #

(Era era, TransTxOut ToCBOR era) ⇒ ToCBOR (TxOut era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxOut era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxOut era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut era] → Size #

Era era ⇒ ToCBOR (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ PParams era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParams era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParams era] → Size #

Era era ⇒ ToCBOR (PParamsUpdate era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ PParamsUpdate era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParamsUpdate era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParamsUpdate era] → Size #

Typeable crypto ⇒ ToCBOR (Timelock crypto) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

toCBOR ∷ Timelock crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Timelock crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Timelock crypto] → Size #

Typeable era ⇒ ToCBOR (Tx era) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

toCBOR ∷ Tx era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Tx era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tx era] → Size #

Era era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

Typeable era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

Typeable crypto ⇒ ToCBOR (MultiSig crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

toCBOR ∷ MultiSig crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MultiSig crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MultiSig crypto] → Size #

Typeable era ⇒ ToCBOR (Metadata era) 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

toCBOR ∷ Metadata era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Metadata era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Metadata era] → Size #

TransEpoch ToCBOR era ⇒ ToCBOR (EpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ EpochState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (EpochState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochState era] → Size #

(Era era, TransLedgerState ToCBOR era) ⇒ ToCBOR (LedgerState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ LedgerState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgerState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgerState era] → Size #

TransUTxOState ToCBOR era ⇒ ToCBOR (UTxOState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ UTxOState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UTxOState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOState era] → Size #

Crypto crypto ⇒ ToCBOR (DPState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ DPState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DPState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DPState crypto] → Size #

(Typeable era, TransEpoch ToCBOR era) ⇒ ToCBOR (NewEpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ NewEpochState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NewEpochState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NewEpochState era] → Size #

Crypto crypto ⇒ ToCBOR (TxIn crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxIn crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxIn crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxIn crypto] → Size #

Crypto crypto ⇒ ToCBOR (CompactAddr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.CompactAddr

Methods

toCBOR ∷ CompactAddr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactAddr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactAddr crypto] → Size #

Crypto crypto ⇒ ToCBOR (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ BlocksMade crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BlocksMade crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlocksMade crypto] → Size #

Crypto crypto ⇒ ToCBOR (SnapShots crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ SnapShots crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SnapShots crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SnapShots crypto] → Size #

Crypto crypto ⇒ ToCBOR (NonMyopic crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ NonMyopic crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NonMyopic crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NonMyopic crypto] → Size #

Crypto crypto ⇒ ToCBOR (PulsingRewUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ PulsingRewUpdate crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PulsingRewUpdate crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PulsingRewUpdate crypto] → Size #

Crypto crypto ⇒ ToCBOR (PoolDistr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

toCBOR ∷ PoolDistr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolDistr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolDistr crypto] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (ProposedPPUpdates era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ ProposedPPUpdates era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ProposedPPUpdates era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProposedPPUpdates era] → Size #

Era era ⇒ ToCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toCBOR ∷ ShelleyGenesis era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGenesis era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGenesis era] → Size #

Crypto crypto ⇒ ToCBOR (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ GenDelegPair crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenDelegPair crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenDelegPair crypto] → Size #

Crypto crypto ⇒ ToCBOR (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toCBOR ∷ Addr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Addr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Addr crypto] → Size #

Crypto crypto ⇒ ToCBOR (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toCBOR ∷ ShelleyGenesisStaking crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGenesisStaking crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGenesisStaking crypto] → Size #

ToCBOR (CompactForm Coin) 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ CompactForm Coin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactForm Coin) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactForm Coin] → Size #

Crypto crypto ⇒ ToCBOR (CompactForm (Value crypto)) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ CompactForm (Value crypto) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactForm (Value crypto)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactForm (Value crypto)] → Size #

(Era era, ToCBOR (TxOut era)) ⇒ ToCBOR (UTxO era) 
Instance details

Defined in Shelley.Spec.Ledger.UTxO

Methods

toCBOR ∷ UTxO era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UTxO era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxO era] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (Update era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ Update era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Update era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Update era] → Size #

Typeable era ⇒ ToCBOR (AuxiliaryData era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

toCBOR ∷ AuxiliaryData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryData era] → Size #

Typeable era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

(Era era, Compactible (Value era)) ⇒ ToCBOR (TxOut era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

toCBOR ∷ TxOut era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxOut era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut era] → Size #

(Typeable (Crypto era), Typeable era) ⇒ ToCBOR (Script era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Script era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Script era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Script era] → Size #

Typeable era ⇒ ToCBOR (Data era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ Data era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Data era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Data era] → Size #

(Typeable era, Ord (Script era), Script era ~ Script era, ToCBOR (Script era), Typeable (Crypto era)) ⇒ ToCBOR (AuxiliaryDataRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ AuxiliaryDataRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryDataRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryDataRaw era] → Size #

Crypto crypto ⇒ ToCBOR (PolicyID crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ PolicyID crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PolicyID crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PolicyID crypto] → Size #

Crypto crypto ⇒ ToCBOR (BHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ BHeader crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BHeader crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BHeader crypto] → Size #

Era era ⇒ ToCBOR (Block era) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ Block era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Block era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Block era] → Size #

(ShelleyBased era, ToCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ ToCBOR (ApplyTxError era) 
Instance details

Defined in Shelley.Spec.Ledger.API.Mempool

Methods

toCBOR ∷ ApplyTxError era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ApplyTxError era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplyTxError era] → Size #

(ToCBOR (PredicateFailure (EraRule "DELEGS" era)), ToCBOR (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ ToCBOR (LedgerPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledger

Methods

toCBOR ∷ LedgerPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgerPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgerPredicateFailure era] → Size #

(Era era, Typeable (Script era), ToCBOR (PredicateFailure (EraRule "DELPL" era))) ⇒ ToCBOR (DelegsPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delegs

Methods

toCBOR ∷ DelegsPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelegsPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelegsPredicateFailure era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "POOL" era)), ToCBOR (PredicateFailure (EraRule "DELEG" era)), Typeable (Script era)) ⇒ ToCBOR (DelplPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delpl

Methods

toCBOR ∷ DelplPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelplPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelplPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (PState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ PState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PState crypto] → Size #

Crypto crypto ⇒ ToCBOR (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ PoolParams crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolParams crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolParams crypto] → Size #

Crypto crypto ⇒ ToCBOR (InstantaneousRewards crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ InstantaneousRewards crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (InstantaneousRewards crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [InstantaneousRewards crypto] → Size #

Crypto crypto ⇒ ToCBOR (SnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ SnapShot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SnapShot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SnapShot crypto] → Size #

Crypto crypto ⇒ ToCBOR (ChainDepState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.API.Protocol

Methods

toCBOR ∷ ChainDepState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ChainDepState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainDepState crypto] → Size #

Crypto crypto ⇒ ToCBOR (FutureGenDeleg crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ FutureGenDeleg crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (FutureGenDeleg crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [FutureGenDeleg crypto] → Size #

Crypto crypto ⇒ ToCBOR (DState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ DState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DState crypto] → Size #

Crypto crypto ⇒ ToCBOR (IndividualPoolStake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

toCBOR ∷ IndividualPoolStake crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (IndividualPoolStake crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [IndividualPoolStake crypto] → Size #

(TransValue ToCBOR era, TransUTxOState ToCBOR era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Rules.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), ToCBOR (PredicateFailure (EraRule "UTXO" era))) ⇒ ToCBOR (UtxowPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxow

Methods

toCBOR ∷ UtxowPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxowPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxowPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ RewardProvenance crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardProvenance crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardProvenance crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ RewardProvenancePool crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardProvenancePool crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardProvenancePool crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toCBOR ∷ RewardAcnt crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardAcnt crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardAcnt crypto] → Size #

Crypto crypto ⇒ ToCBOR (TxId crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxId crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxId crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxId crypto] → Size #

Crypto crypto ⇒ ToCBOR (BootstrapWitness crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

toCBOR ∷ BootstrapWitness crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BootstrapWitness crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BootstrapWitness crypto] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (SigKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ SigKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (SigKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ SigKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (SigKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ SigKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SigKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SigKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (SigKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ SigKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SigKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SigKES (SimpleKES d t)] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (VerKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ VerKeyKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (VerKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ VerKeyKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (VerKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ VerKeyKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (VerKeyKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [VerKeyKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (VerKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ VerKeyKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (VerKeyKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [VerKeyKES (SimpleKES d t)] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (SignKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ SignKeyKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (SignKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ SignKeyKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (SignKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ SignKeyKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SignKeyKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SignKeyKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (SignKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ SignKeyKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SignKeyKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SignKeyKES (SimpleKES d t)] → Size #

ShelleyBasedEra era ⇒ ToCBOR (Header (ShelleyBlock era)) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ Header (ShelleyBlock era) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Header (ShelleyBlock era)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Header (ShelleyBlock era)] → Size #

ShelleyBasedEra era ⇒ ToCBOR (ShelleyBlock era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ ShelleyBlock era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyBlock era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyBlock era] → Size #

Crypto c ⇒ ToCBOR (ShelleyHash c) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ ShelleyHash c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyHash c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyHash c] → Size #

Era era ⇒ ToCBOR (CompactGenesis era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Config

Methods

toCBOR ∷ CompactGenesis era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactGenesis era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactGenesis era] → Size #

Crypto crypto ⇒ ToCBOR (BHBody crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ BHBody crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BHBody crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BHBody crypto] → Size #

Crypto crypto ⇒ ToCBOR (PrevHash crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ PrevHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PrevHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PrevHash crypto] → Size #

Crypto crypto ⇒ ToCBOR (OCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

toCBOR ∷ OCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OCert crypto] → Size #

Crypto crypto ⇒ ToCBOR (HashHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ HashHeader crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (HashHeader crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [HashHeader crypto] → Size #

Crypto crypto ⇒ ToCBOR (PrtclState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Prtcl

Methods

toCBOR ∷ PrtclState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PrtclState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PrtclState crypto] → Size #

Typeable v ⇒ ToCBOR (OutputVRF v) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

toCBOR ∷ OutputVRF v → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OutputVRF v) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OutputVRF v] → Size #

ToCBOR (CertVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ CertVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF PraosVRF] → Size #

ToCBOR (CertVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ CertVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF MockVRF] → Size #

ToCBOR (CertVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ CertVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF SimpleVRF] → Size #

ToCBOR (SignKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ SignKeyVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF PraosVRF] → Size #

ToCBOR (SignKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ SignKeyVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF MockVRF] → Size #

ToCBOR (SignKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ SignKeyVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF SimpleVRF] → Size #

ToCBOR (VerKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ VerKeyVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF PraosVRF] → Size #

ToCBOR (VerKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ VerKeyVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF MockVRF] → Size #

ToCBOR (VerKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ VerKeyVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF SimpleVRF] → Size #

Typeable a ⇒ ToCBOR (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

toCBOR ∷ RedeemSignature a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RedeemSignature a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemSignature a] → Size #

Typeable a ⇒ ToCBOR (Signature a) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

toCBOR ∷ Signature a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Signature a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Signature a] → Size #

Typeable era ⇒ ToCBOR (LangDepView era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ LangDepView era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LangDepView era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LangDepView era] → Size #

Crypto crypto ⇒ ToCBOR (CollectError crypto) 
Instance details

Defined in Cardano.Ledger.Alonzo.PlutusScriptApi

Methods

toCBOR ∷ CollectError crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CollectError crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CollectError crypto] → Size #

(Typeable c, Crypto c) ⇒ ToCBOR (ScriptPurpose c) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ ScriptPurpose c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ScriptPurpose c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScriptPurpose c] → Size #

Crypto crypto ⇒ ToCBOR (Wdrl crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ Wdrl crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Wdrl crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Wdrl crypto] → Size #

Crypto crypto ⇒ ToCBOR (DCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ DCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DCert crypto] → Size #

(Typeable era, ToCBOR (BbodyPredicateFailure era)) ⇒ ToCBOR (AlonzoBbodyPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Bbody

Methods

toCBOR ∷ AlonzoBbodyPredFail era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AlonzoBbodyPredFail era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoBbodyPredFail era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (AuxiliaryData era), Typeable (Script era), ToCBOR (Script era)) ⇒ ToCBOR (AlonzoPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxow

Methods

toCBOR ∷ AlonzoPredFail era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AlonzoPredFail era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoPredFail era] → Size #

Crypto crypto ⇒ ToCBOR (GenDelegs crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ GenDelegs crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenDelegs crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenDelegs crypto] → Size #

(Typeable era, Era era, ToCBOR (TxOut era), ToCBOR (Value era), ToCBOR (PredicateFailure (EraRule "UTXOS" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxosPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxos

Methods

toCBOR ∷ UtxosPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxosPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxosPredicateFailure era] → Size #

(Typeable era, Era era) ⇒ ToCBOR (PpupPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

toCBOR ∷ PpupPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PpupPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PpupPredicateFailure era] → Size #

Typeable era ⇒ ToCBOR (WitnessPPData era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ WitnessPPData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessPPData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessPPData era] → Size #

Typeable era ⇒ ToCBOR (Redeemers era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

toCBOR ∷ Redeemers era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Redeemers era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Redeemers era] → Size #

Era era ⇒ ToCBOR (WitnessPPDataRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ WitnessPPDataRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessPPDataRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessPPDataRaw era] → Size #

ToCBOR (Attributes ()) 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

toCBOR ∷ Attributes () → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Attributes ()) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Attributes ()] → Size #

ToCBOR (Attributes AddrAttributes) 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toCBOR ∷ Attributes AddrAttributes → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Attributes AddrAttributes) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Attributes AddrAttributes] → Size #

ToCBOR a ⇒ ToCBOR (MerkleRoot a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

toCBOR ∷ MerkleRoot a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MerkleRoot a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MerkleRoot a] → Size #

ToCBOR a ⇒ ToCBOR (MerkleTree a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

toCBOR ∷ MerkleTree a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MerkleTree a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MerkleTree a] → Size #

ToCBOR n ⇒ ToCBOR (TooLarge n) 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ TooLarge n → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TooLarge n) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TooLarge n] → Size #

Crypto crypto ⇒ ToCBOR (CompactValue crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ CompactValue crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactValue crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactValue crypto] → Size #

Crypto crypto ⇒ ToCBOR (LastAppliedBlock crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ LastAppliedBlock crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LastAppliedBlock crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LastAppliedBlock crypto] → Size #

(Era era, Typeable era) ⇒ ToCBOR (LaxBlock era) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ LaxBlock era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LaxBlock era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LaxBlock era] → Size #

Crypto crypto ⇒ ToCBOR (GenesisCredential crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ GenesisCredential crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenesisCredential crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisCredential crypto] → Size #

ToCBORGroup a ⇒ ToCBOR (CBORGroup a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

toCBOR ∷ CBORGroup a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CBORGroup a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CBORGroup a] → Size #

Crypto crypto ⇒ ToCBOR (MIRCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MIRCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRCert crypto] → Size #

Crypto crypto ⇒ ToCBOR (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ StakeCreds crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (StakeCreds crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StakeCreds crypto] → Size #

Crypto crypto ⇒ ToCBOR (Stake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ Stake crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Stake crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Stake crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardSnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardSnapShot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardSnapShot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardSnapShot crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardUpdate crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardUpdate crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardUpdate crypto] → Size #

Crypto c ⇒ ToCBOR (RewardAns c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardAns c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardAns c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardAns c] → Size #

Crypto c ⇒ ToCBOR (Pulser c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ Pulser c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Pulser c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Pulser c] → Size #

Crypto crypto ⇒ ToCBOR (OBftSlot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OverlaySchedule

Methods

toCBOR ∷ OBftSlot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OBftSlot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OBftSlot crypto] → Size #

Crypto crypto ⇒ ToCBOR (FreeVars crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ FreeVars crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (FreeVars crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [FreeVars crypto] → Size #

Crypto crypto ⇒ ToCBOR (Reward crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ Reward crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Reward crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Reward crypto] → Size #

(Typeable era, Era era, Typeable (Script era)) ⇒ ToCBOR (DelegPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Deleg

Methods

toCBOR ∷ DelegPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelegPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelegPredicateFailure era] → Size #

(Typeable era, Era era) ⇒ ToCBOR (PoolPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Pool

Methods

toCBOR ∷ PoolPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolPredicateFailure era] → Size #

(ShelleyBased era, ToCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ ToCBOR (LedgersPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledgers

Methods

toCBOR ∷ LedgersPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgersPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgersPredicateFailure era] → Size #

(TransUTxOState ToCBOR era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (MIRTarget crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRTarget crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MIRTarget crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRTarget crypto] → Size #

(Era era, FromCBOR (PParamsDelta era), TransTxBody ToCBOR era) ⇒ ToCBOR (TxBodyRaw era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxBodyRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBodyRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBodyRaw era] → Size #

ToCBOR a ⇒ ToCBOR (CborSeq a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

toCBOR ∷ CborSeq a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CborSeq a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CborSeq a] → Size #

ToCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakePoolKey] → Size #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateKey] → Size #

ToCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisExtendedKey] → Size #

ToCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisKey] → Size #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeKey] → Size #

ToCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentExtendedKey] → Size #

ToCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentKey] → Size #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

ToCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakePoolKey] → Size #

ToCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisUTxOKey] → Size #

ToCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateExtendedKey] → Size #

ToCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateKey] → Size #

ToCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisExtendedKey] → Size #

ToCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisKey] → Size #

ToCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeExtendedKey] → Size #

ToCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeKey] → Size #

ToCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentExtendedKey] → Size #

ToCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentKey] → Size #

ToCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKeyLegacy] → Size #

ToCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKey] → Size #

ToCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey VrfKey] → Size #

ToCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey KesKey] → Size #

Typeable lang ⇒ ToCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toCBOR ∷ PlutusScript lang → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PlutusScript lang) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PlutusScript lang] → Size #

(ToCBOR a, ToCBOR b) ⇒ ToCBOR (Either a b) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Either a b → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Either a b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Either a b] → Size #

(ToCBOR a, ToCBOR b) ⇒ ToCBOR (a, b) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b)] → Size #

(Ord k, ToCBOR k, ToCBOR v) ⇒ ToCBOR (Map k v) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Map k v → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Map k v) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Map k v] → Size #

(HashAlgorithm h, Typeable a) ⇒ ToCBOR (Hash h a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

toCBOR ∷ Hash h a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Hash h a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Hash h a] → Size #

Era era ⇒ ToCBOR (WitnessSetHKD Identity era) 
Instance details

Defined in Shelley.Spec.Ledger.Tx

Methods

toCBOR ∷ WitnessSetHKD Identity era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessSetHKD Identity era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessSetHKD Identity era] → Size #

(Crypto crypto, Typeable disc) ⇒ ToCBOR (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ KeyHash disc crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (KeyHash disc crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KeyHash disc crypto] → Size #

(Typeable index, Crypto c) ⇒ ToCBOR (SafeHash c index) 
Instance details

Defined in Cardano.Ledger.SafeHash

Methods

toCBOR ∷ SafeHash c index → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SafeHash c index) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SafeHash c index] → Size #

(Typeable kr, Crypto crypto) ⇒ ToCBOR (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ Credential kr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Credential kr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Credential kr crypto] → Size #

(Typeable kr, Crypto crypto) ⇒ ToCBOR (WitVKey kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ WitVKey kr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitVKey kr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitVKey kr crypto] → Size #

(Typeable algo, Typeable a, HashAlgorithm algo) ⇒ ToCBOR (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

toCBOR ∷ AbstractHash algo a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AbstractHash algo a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AbstractHash algo a] → Size #

(Crypto crypto, Typeable kd) ⇒ ToCBOR (VKey kd crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ VKey kd crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VKey kd crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VKey kd crypto] → Size #

(VRFAlgorithm v, Typeable a) ⇒ ToCBOR (CertifiedVRF v a) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

toCBOR ∷ CertifiedVRF v a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertifiedVRF v a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertifiedVRF v a] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c) ⇒ ToCBOR (a, b, c) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c)] → Size #

(Typeable s, ToCBOR a) ⇒ ToCBOR (Tagged s a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Tagged s a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Tagged s a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tagged s a] → Size #

(Ord a, Ord b, ToCBOR a, ToCBOR b) ⇒ ToCBOR (BiMap b a b) 
Instance details

Defined in Control.Iterate.SetAlgebra

Methods

toCBOR ∷ BiMap b a b → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BiMap b a b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BiMap b a b] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d) ⇒ ToCBOR (a, b, c, d) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d)] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d, ToCBOR e) ⇒ ToCBOR (a, b, c, d, e) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d, e) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d, e) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d, e)] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d, ToCBOR e, ToCBOR f, ToCBOR g) ⇒ ToCBOR (a, b, c, d, e, f, g) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d, e, f, g) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d, e, f, g) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d, e, f, g)] → Size #

\ No newline at end of file diff --git a/cardano-api/Cardano-Api-SerialiseTextEnvelope.html b/cardano-api/Cardano-Api-SerialiseTextEnvelope.html index cc76f6abbab..a67a255e226 100644 --- a/cardano-api/Cardano-Api-SerialiseTextEnvelope.html +++ b/cardano-api/Cardano-Api-SerialiseTextEnvelope.html @@ -3,4 +3,4 @@ to indicate the type of the encoded data. This is used as a sanity check and to help readers.

It also contains a "title" field which is free-form, and could be used to indicate the role or purpose to a reader.

Constructors

TextEnvelope 

Fields

Instances

Instances details
Eq TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelope → TextEnvelope → Bool #

(/=) ∷ TextEnvelope → TextEnvelope → Bool #

Show TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelope → ShowS #

show ∷ TextEnvelope → String #

showList ∷ [TextEnvelope] → ShowS #

FromJSON TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelope #

parseJSONList ∷ Value → Parser [TextEnvelope] #

ToJSON TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelope → Value #

toEncoding ∷ TextEnvelope → Encoding #

toJSONList ∷ [TextEnvelope] → Value #

toEncodingList ∷ [TextEnvelope] → Encoding #

HasTypeProxy TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Associated Types

data AsType TextEnvelope Source #

Methods

proxyToAsType ∷ Proxy TextEnvelope → AsType TextEnvelope Source #

data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope

newtype TextEnvelopeType Source #

Constructors

TextEnvelopeType String 

Instances

Instances details
Eq TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelopeType → TextEnvelopeType → Bool #

(/=) ∷ TextEnvelopeType → TextEnvelopeType → Bool #

Show TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelopeType → ShowS #

show ∷ TextEnvelopeType → String #

showList ∷ [TextEnvelopeType] → ShowS #

IsString TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

fromString ∷ String → TextEnvelopeType #

Semigroup TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(<>) ∷ TextEnvelopeType → TextEnvelopeType → TextEnvelopeType #

sconcat ∷ NonEmpty TextEnvelopeType → TextEnvelopeType #

stimes ∷ Integral b ⇒ b → TextEnvelopeType → TextEnvelopeType #

FromJSON TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelopeType #

parseJSONList ∷ Value → Parser [TextEnvelopeType] #

ToJSON TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelopeType → Value #

toEncoding ∷ TextEnvelopeType → Encoding #

toJSONList ∷ [TextEnvelopeType] → Value #

toEncodingList ∷ [TextEnvelopeType] → Encoding #

newtype TextEnvelopeDescr Source #

Constructors

TextEnvelopeDescr String 

Instances

Instances details
Eq TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelopeDescr → TextEnvelopeDescr → Bool #

(/=) ∷ TextEnvelopeDescr → TextEnvelopeDescr → Bool #

Show TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelopeDescr → ShowS #

show ∷ TextEnvelopeDescr → String #

showList ∷ [TextEnvelopeDescr] → ShowS #

IsString TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

fromString ∷ String → TextEnvelopeDescr #

Semigroup TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(<>) ∷ TextEnvelopeDescr → TextEnvelopeDescr → TextEnvelopeDescr #

sconcat ∷ NonEmpty TextEnvelopeDescr → TextEnvelopeDescr #

stimes ∷ Integral b ⇒ b → TextEnvelopeDescr → TextEnvelopeDescr #

FromJSON TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelopeDescr #

parseJSONList ∷ Value → Parser [TextEnvelopeDescr] #

ToJSON TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelopeDescr → Value #

toEncoding ∷ TextEnvelopeDescr → Encoding #

toJSONList ∷ [TextEnvelopeDescr] → Value #

toEncodingList ∷ [TextEnvelopeDescr] → Encoding #

textEnvelopeRawCBOR ∷ TextEnvelope → ByteString Source #

data TextEnvelopeError Source #

The errors that the pure TextEnvelope parsing/decoding functions can return.

Constructors

TextEnvelopeTypeError ![TextEnvelopeType] !TextEnvelopeType

expected, actual

TextEnvelopeDecodeError !DecoderError 
TextEnvelopeAesonDecodeError !String 

Instances

Instances details
Eq TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelopeError → TextEnvelopeError → Bool #

(/=) ∷ TextEnvelopeError → TextEnvelopeError → Bool #

Show TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelopeError → ShowS #

show ∷ TextEnvelopeError → String #

showList ∷ [TextEnvelopeError] → ShowS #

Error TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

displayError ∷ TextEnvelopeError → String Source #

serialiseToTextEnvelope ∷ ∀ a. HasTextEnvelope a ⇒ Maybe TextEnvelopeDescr → a → TextEnvelope Source #

deserialiseFromTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → TextEnvelope → Either TextEnvelopeError a Source #

readFileTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → FilePath → IO (Either (FileError TextEnvelopeError) a) Source #

writeFileTextEnvelope ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ()) Source #

writeFileTextEnvelopeWithOwnerPermissions ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ()) Source #

readTextEnvelopeFromFile ∷ FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope) Source #

readTextEnvelopeOfTypeFromFile ∷ TextEnvelopeType → FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope) Source #

Reading one of several key types

data FromSomeType (c ∷ Type → Constraint) b where Source #

Constructors

FromSomeType ∷ c a ⇒ AsType a → (a → b) → FromSomeType c b 

deserialiseFromTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → TextEnvelope → Either TextEnvelopeError b Source #

readFileTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → FilePath → IO (Either (FileError TextEnvelopeError) b) Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-Shelley.html b/cardano-api/Cardano-Api-Shelley.html index dd4ae53ab35..74d27984dbf 100644 --- a/cardano-api/Cardano-Api-Shelley.html +++ b/cardano-api/Cardano-Api-Shelley.html @@ -1,6 +1,6 @@ Cardano.Api.Shelley
cardano-api-1.27.0
Safe HaskellNone
LanguageHaskell2010

Cardano.Api.Shelley

Description

This module provides a library interface that is intended to be the complete API for Shelley covering everything, including - exposing constructors for the lower level types.

Synopsis

Documentation

module Cardano.Api

Genesis

data ShelleyGenesis era #

Constructors

ShelleyGenesis 

Fields

Instances

Instances details
Eq (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

(==) ∷ ShelleyGenesis era → ShelleyGenesis era → Bool #

(/=) ∷ ShelleyGenesis era → ShelleyGenesis era → Bool #

Show (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

showsPrec ∷ Int → ShelleyGenesis era → ShowS #

show ∷ ShelleyGenesis era → String #

showList ∷ [ShelleyGenesis era] → ShowS #

Generic (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Associated Types

type Rep (ShelleyGenesis era) ∷ Type → Type #

Methods

from ∷ ShelleyGenesis era → Rep (ShelleyGenesis era) x #

to ∷ Rep (ShelleyGenesis era) x → ShelleyGenesis era #

Era era ⇒ FromJSON (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

parseJSON ∷ Value → Parser (ShelleyGenesis era) #

parseJSONList ∷ Value → Parser [ShelleyGenesis era] #

Era era ⇒ NoThunks (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

noThunks ∷ Context → ShelleyGenesis era → IO (Maybe ThunkInfo)

wNoThunks ∷ Context → ShelleyGenesis era → IO (Maybe ThunkInfo)

showTypeOf ∷ Proxy (ShelleyGenesis era) → String

Era era ⇒ ToJSON (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toJSON ∷ ShelleyGenesis era → Value #

toEncoding ∷ ShelleyGenesis era → Encoding #

toJSONList ∷ [ShelleyGenesis era] → Value #

toEncodingList ∷ [ShelleyGenesis era] → Encoding #

Era era ⇒ FromCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

fromCBOR ∷ Decoder s (ShelleyGenesis era) #

label ∷ Proxy (ShelleyGenesis era) → Text #

Era era ⇒ ToCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toCBOR ∷ ShelleyGenesis era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGenesis era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGenesis era] → Size #

type Rep (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

type Rep (ShelleyGenesis era) = D1 ('MetaData "ShelleyGenesis" "Shelley.Spec.Ledger.Genesis" "shelley-spec-ledger-0.1.0.0-5200540b5a4373a509e8a9e3f84574eb3d76f987cdafd3ae43bd007ae51d446e" 'False) (C1 ('MetaCons "ShelleyGenesis" 'PrefixI 'True) (((S1 ('MetaSel ('Just "sgSystemStart") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 UTCTime) :*: (S1 ('MetaSel ('Just "sgNetworkMagic") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word32) :*: S1 ('MetaSel ('Just "sgNetworkId") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Network))) :*: ((S1 ('MetaSel ('Just "sgActiveSlotsCoeff") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Rational) :*: S1 ('MetaSel ('Just "sgSecurityParam") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word64)) :*: (S1 ('MetaSel ('Just "sgEpochLength") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 EpochSize) :*: S1 ('MetaSel ('Just "sgSlotsPerKESPeriod") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word64)))) :*: (((S1 ('MetaSel ('Just "sgMaxKESEvolutions") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word64) :*: S1 ('MetaSel ('Just "sgSlotLength") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 NominalDiffTime)) :*: (S1 ('MetaSel ('Just "sgUpdateQuorum") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word64) :*: S1 ('MetaSel ('Just "sgMaxLovelaceSupply") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word64))) :*: ((S1 ('MetaSel ('Just "sgProtocolParams") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (PParams era)) :*: S1 ('MetaSel ('Just "sgGenDelegs") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Map (KeyHash 'Genesis (Crypto era)) (GenDelegPair (Crypto era))))) :*: (S1 ('MetaSel ('Just "sgInitialFunds") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Map (Addr (Crypto era)) Coin)) :*: S1 ('MetaSel ('Just "sgStaking") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (ShelleyGenesisStaking (Crypto era))))))))
type TranslationError (AlonzoEra c) ShelleyGenesis 
Instance details

Defined in Cardano.Ledger.Alonzo.Translation

type TranslationError (AlonzoEra c) ShelleyGenesis = Void
type TranslationError (AllegraEra c) ShelleyGenesis 
Instance details

Defined in Cardano.Ledger.Allegra.Translation

type TranslationError (AllegraEra c) ShelleyGenesis = Void
type TranslationError (MaryEra c) ShelleyGenesis 
Instance details

Defined in Cardano.Ledger.Mary.Translation

type TranslationError (MaryEra c) ShelleyGenesis = Void

shelleyGenesisDefaults ∷ ShelleyGenesis crypto Source #

Some reasonable starting defaults for constructing a ShelleyGenesis.

You must override at least the following fields for this to be useful:

Synopsis

Documentation

module Cardano.Api

Genesis

data ShelleyGenesis era #

Constructors

ShelleyGenesis 

Fields

Instances

Instances details
Eq (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

(==) ∷ ShelleyGenesis era → ShelleyGenesis era → Bool #

(/=) ∷ ShelleyGenesis era → ShelleyGenesis era → Bool #

Show (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

showsPrec ∷ Int → ShelleyGenesis era → ShowS #

show ∷ ShelleyGenesis era → String #

showList ∷ [ShelleyGenesis era] → ShowS #

Generic (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Associated Types

type Rep (ShelleyGenesis era) ∷ Type → Type #

Methods

from ∷ ShelleyGenesis era → Rep (ShelleyGenesis era) x #

to ∷ Rep (ShelleyGenesis era) x → ShelleyGenesis era #

Era era ⇒ FromJSON (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

parseJSON ∷ Value → Parser (ShelleyGenesis era) #

parseJSONList ∷ Value → Parser [ShelleyGenesis era] #

Era era ⇒ NoThunks (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

noThunks ∷ Context → ShelleyGenesis era → IO (Maybe ThunkInfo)

wNoThunks ∷ Context → ShelleyGenesis era → IO (Maybe ThunkInfo)

showTypeOf ∷ Proxy (ShelleyGenesis era) → String

Era era ⇒ ToJSON (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toJSON ∷ ShelleyGenesis era → Value #

toEncoding ∷ ShelleyGenesis era → Encoding #

toJSONList ∷ [ShelleyGenesis era] → Value #

toEncodingList ∷ [ShelleyGenesis era] → Encoding #

Era era ⇒ FromCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

fromCBOR ∷ Decoder s (ShelleyGenesis era) #

label ∷ Proxy (ShelleyGenesis era) → Text #

Era era ⇒ ToCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toCBOR ∷ ShelleyGenesis era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGenesis era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGenesis era] → Size #

type Rep (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

type Rep (ShelleyGenesis era) = D1 ('MetaData "ShelleyGenesis" "Shelley.Spec.Ledger.Genesis" "shelley-spec-ledger-0.1.0.0-5200540b5a4373a509e8a9e3f84574eb3d76f987cdafd3ae43bd007ae51d446e" 'False) (C1 ('MetaCons "ShelleyGenesis" 'PrefixI 'True) (((S1 ('MetaSel ('Just "sgSystemStart") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 UTCTime) :*: (S1 ('MetaSel ('Just "sgNetworkMagic") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word32) :*: S1 ('MetaSel ('Just "sgNetworkId") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Network))) :*: ((S1 ('MetaSel ('Just "sgActiveSlotsCoeff") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 Rational) :*: S1 ('MetaSel ('Just "sgSecurityParam") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word64)) :*: (S1 ('MetaSel ('Just "sgEpochLength") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 EpochSize) :*: S1 ('MetaSel ('Just "sgSlotsPerKESPeriod") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word64)))) :*: (((S1 ('MetaSel ('Just "sgMaxKESEvolutions") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word64) :*: S1 ('MetaSel ('Just "sgSlotLength") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 NominalDiffTime)) :*: (S1 ('MetaSel ('Just "sgUpdateQuorum") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word64) :*: S1 ('MetaSel ('Just "sgMaxLovelaceSupply") 'NoSourceUnpackedness 'SourceStrict 'DecidedUnpack) (Rec0 Word64))) :*: ((S1 ('MetaSel ('Just "sgProtocolParams") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (PParams era)) :*: S1 ('MetaSel ('Just "sgGenDelegs") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Map (KeyHash 'Genesis (Crypto era)) (GenDelegPair (Crypto era))))) :*: (S1 ('MetaSel ('Just "sgInitialFunds") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Map (Addr (Crypto era)) Coin)) :*: S1 ('MetaSel ('Just "sgStaking") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (ShelleyGenesisStaking (Crypto era))))))))
type TranslationError (AlonzoEra c) ShelleyGenesis 
Instance details

Defined in Cardano.Ledger.Alonzo.Translation

type TranslationError (AlonzoEra c) ShelleyGenesis = Void
type TranslationError (AllegraEra c) ShelleyGenesis 
Instance details

Defined in Cardano.Ledger.Allegra.Translation

type TranslationError (AllegraEra c) ShelleyGenesis = Void
type TranslationError (MaryEra c) ShelleyGenesis 
Instance details

Defined in Cardano.Ledger.Mary.Translation

type TranslationError (MaryEra c) ShelleyGenesis = Void

shelleyGenesisDefaults ∷ ShelleyGenesis crypto Source #

Some reasonable starting defaults for constructing a ShelleyGenesis.

You must override at least the following fields for this to be useful:

Cryptographic key interface

Hashes

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. The different eras do use different types, but it's all the same underlying representation.

Instance details

Defined in Cardano.Api.Block

newtype Hash BlockHeader = HeaderHash ShortByteString
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)

Payment addresses

Constructing and inspecting Shelley payment addresses

data Address addrtype where Source #

Addresses are used as locations where assets live. The address determines @@ -13,7 +13,7 @@ (either Byron or Shelley). The AddressInEra type connects the address type with the era in which it is supported.

Constructors

ShelleyAddress ∷ Network → PaymentCredential StandardCrypto → StakeReference StandardCrypto → Address ShelleyAddr

Shelley addresses allow delegation. Shelley addresses were introduced in Shelley era and are thus supported from the Shelley era onwards

Instances

Instances details
Eq (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

(==) ∷ Address addrtype → Address addrtype → Bool #

(/=) ∷ Address addrtype → Address addrtype → Bool #

Ord (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

compare ∷ Address addrtype → Address addrtype → Ordering #

(<) ∷ Address addrtype → Address addrtype → Bool #

(<=) ∷ Address addrtype → Address addrtype → Bool #

(>) ∷ Address addrtype → Address addrtype → Bool #

(>=) ∷ Address addrtype → Address addrtype → Bool #

max ∷ Address addrtype → Address addrtype → Address addrtype #

min ∷ Address addrtype → Address addrtype → Address addrtype #

Show (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

showsPrec ∷ Int → Address addrtype → ShowS #

show ∷ Address addrtype → String #

showList ∷ [Address addrtype] → ShowS #

HasTypeProxy addrtype ⇒ HasTypeProxy (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType (Address addrtype) Source #

Methods

proxyToAsType ∷ Proxy (Address addrtype) → AsType (Address addrtype) Source #

SerialiseAsRawBytes (Address ShelleyAddr) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseToRawBytes ∷ Address ShelleyAddr → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Address ShelleyAddr) → ByteString → Maybe (Address ShelleyAddr) Source #

SerialiseAsRawBytes (Address ByronAddr) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseToRawBytes ∷ Address ByronAddr → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Address ByronAddr) → ByteString → Maybe (Address ByronAddr) Source #

SerialiseAsBech32 (Address ShelleyAddr) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

bech32PrefixFor ∷ Address ShelleyAddr → Text Source #

bech32PrefixesPermitted ∷ AsType (Address ShelleyAddr) → [Text] Source #

SerialiseAddress (Address ShelleyAddr) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseAddress ∷ Address ShelleyAddr → Text Source #

deserialiseAddress ∷ AsType (Address ShelleyAddr) → Text → Maybe (Address ShelleyAddr) Source #

SerialiseAddress (Address ByronAddr) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseAddress ∷ Address ByronAddr → Text Source #

deserialiseAddress ∷ AsType (Address ByronAddr) → Text → Maybe (Address ByronAddr) Source #

data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)

toShelleyAddr ∷ AddressInEra era → Addr StandardCrypto Source #

fromShelleyAddr ∷ IsShelleyBasedEra era ⇒ Addr StandardCrypto → AddressInEra era Source #

toShelleyStakeCredential ∷ StakeCredential → StakeCredential StandardCrypto Source #

fromShelleyStakeCredential ∷ StakeCredential StandardCrypto → StakeCredential Source #

data NetworkId Source #

Constructors

Mainnet 
Testnet !NetworkMagic 

Instances

Instances details
Eq NetworkId Source # 
Instance details

Defined in Cardano.Api.NetworkId

Methods

(==) ∷ NetworkId → NetworkId → Bool #

(/=) ∷ NetworkId → NetworkId → Bool #

Show NetworkId Source # 
Instance details

Defined in Cardano.Api.NetworkId

Methods

showsPrec ∷ Int → NetworkId → ShowS #

show ∷ NetworkId → String #

showList ∷ [NetworkId] → ShowS #

Stake addresses

data PaymentCredential Source #

Constructors

PaymentCredentialByKey (Hash PaymentKey) 
PaymentCredentialByScript ScriptHash 

Instances

Instances details
Eq PaymentCredential Source # 
Instance details

Defined in Cardano.Api.Address

Methods

(==) ∷ PaymentCredential → PaymentCredential → Bool #

(/=) ∷ PaymentCredential → PaymentCredential → Bool #

Ord PaymentCredential Source # 
Instance details

Defined in Cardano.Api.Address

Methods

compare ∷ PaymentCredential → PaymentCredential → Ordering #

(<) ∷ PaymentCredential → PaymentCredential → Bool #

(<=) ∷ PaymentCredential → PaymentCredential → Bool #

(>) ∷ PaymentCredential → PaymentCredential → Bool #

(>=) ∷ PaymentCredential → PaymentCredential → Bool #

max ∷ PaymentCredential → PaymentCredential → PaymentCredential #

min ∷ PaymentCredential → PaymentCredential → PaymentCredential #

Show PaymentCredential Source # 
Instance details

Defined in Cardano.Api.Address

Methods

showsPrec ∷ Int → PaymentCredential → ShowS #

show ∷ PaymentCredential → String #

showList ∷ [PaymentCredential] → ShowS #

data StakeAddress where Source #

Constructors

StakeAddress ∷ Network → StakeCredential StandardCrypto → StakeAddress 

Instances

Instances details
Eq StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Methods

(==) ∷ StakeAddress → StakeAddress → Bool #

(/=) ∷ StakeAddress → StakeAddress → Bool #

Ord StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Methods

compare ∷ StakeAddress → StakeAddress → Ordering #

(<) ∷ StakeAddress → StakeAddress → Bool #

(<=) ∷ StakeAddress → StakeAddress → Bool #

(>) ∷ StakeAddress → StakeAddress → Bool #

(>=) ∷ StakeAddress → StakeAddress → Bool #

max ∷ StakeAddress → StakeAddress → StakeAddress #

min ∷ StakeAddress → StakeAddress → StakeAddress #

Show StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Methods

showsPrec ∷ Int → StakeAddress → ShowS #

show ∷ StakeAddress → String #

showList ∷ [StakeAddress] → ShowS #

HasTypeProxy StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType StakeAddress Source #

Methods

proxyToAsType ∷ Proxy StakeAddress → AsType StakeAddress Source #

SerialiseAsRawBytes StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseToRawBytes ∷ StakeAddress → ByteString Source #

deserialiseFromRawBytes ∷ AsType StakeAddress → ByteString → Maybe StakeAddress Source #

SerialiseAsBech32 StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Methods

bech32PrefixFor ∷ StakeAddress → Text Source #

bech32PrefixesPermitted ∷ AsType StakeAddress → [Text] Source #

SerialiseAddress StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Methods

serialiseAddress ∷ StakeAddress → Text Source #

deserialiseAddress ∷ AsType StakeAddress → Text → Maybe StakeAddress Source #

data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress

data StakeAddressReference Source #

Constructors

StakeAddressByValue StakeCredential 
StakeAddressByPointer StakeAddressPointer 
NoStakeAddress 

Instances

Instances details
Eq StakeAddressReference Source # 
Instance details

Defined in Cardano.Api.Address

Methods

(==) ∷ StakeAddressReference → StakeAddressReference → Bool #

(/=) ∷ StakeAddressReference → StakeAddressReference → Bool #

Show StakeAddressReference Source # 
Instance details

Defined in Cardano.Api.Address

Methods

showsPrec ∷ Int → StakeAddressReference → ShowS #

show ∷ StakeAddressReference → String #

showList ∷ [StakeAddressReference] → ShowS #

data StakeCredential Source #

Constructors

StakeCredentialByKey (Hash StakeKey) 
StakeCredentialByScript ScriptHash 

Instances

Instances details
Eq StakeCredential Source # 
Instance details

Defined in Cardano.Api.Address

Methods

(==) ∷ StakeCredential → StakeCredential → Bool #

(/=) ∷ StakeCredential → StakeCredential → Bool #

Ord StakeCredential Source # 
Instance details

Defined in Cardano.Api.Address

Methods

compare ∷ StakeCredential → StakeCredential → Ordering #

(<) ∷ StakeCredential → StakeCredential → Bool #

(<=) ∷ StakeCredential → StakeCredential → Bool #

(>) ∷ StakeCredential → StakeCredential → Bool #

(>=) ∷ StakeCredential → StakeCredential → Bool #

max ∷ StakeCredential → StakeCredential → StakeCredential #

min ∷ StakeCredential → StakeCredential → StakeCredential #

Show StakeCredential Source # 
Instance details

Defined in Cardano.Api.Address

Methods

showsPrec ∷ Int → StakeCredential → ShowS #

show ∷ StakeCredential → String #

showList ∷ [StakeCredential] → ShowS #

toShelleyStakeAddr ∷ StakeAddress → RewardAcnt StandardCrypto Source #

fromShelleyStakeAddr ∷ RewardAcnt StandardCrypto → StakeAddress Source #

fromShelleyStakeReference ∷ StakeReference StandardCrypto → StakeAddressReference Source #

fromShelleyPaymentCredential ∷ PaymentCredential StandardCrypto → PaymentCredential Source #

Building transactions

Constructing and inspecting transactions

data TxBody era where Source #

Constructors

ShelleyTxBody ∷ ShelleyBasedEra era → TxBody (ShelleyLedgerEra era) → [Script (ShelleyLedgerEra era)] → TxBodyScriptData era → Maybe (AuxiliaryData (ShelleyLedgerEra era)) → TxBody era 

Instances

Instances details
Eq (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

(==) ∷ TxBody era → TxBody era → Bool #

(/=) ∷ TxBody era → TxBody era → Bool #

Show (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

showsPrec ∷ Int → TxBody era → ShowS #

show ∷ TxBody era → String #

showList ∷ [TxBody era] → ShowS #

HasTypeProxy era ⇒ HasTypeProxy (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

data AsType (TxBody era) Source #

Methods

proxyToAsType ∷ Proxy (TxBody era) → AsType (TxBody era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

serialiseToCBOR ∷ TxBody era → ByteString Source #

deserialiseFromCBOR ∷ AsType (TxBody era) → ByteString → Either DecoderError (TxBody era) Source #

IsCardanoEra era ⇒ HasTextEnvelope (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

textEnvelopeType ∷ AsType (TxBody era) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ TxBody era → TextEnvelopeDescr Source #

data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)

newtype TxId Source #

Constructors

TxId (Hash StandardCrypto EraIndependentTxBody) 

Instances

Instances details
Eq TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

(==) ∷ TxId → TxId → Bool #

(/=) ∷ TxId → TxId → Bool #

Ord TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

compare ∷ TxId → TxId → Ordering #

(<) ∷ TxId → TxId → Bool #

(<=) ∷ TxId → TxId → Bool #

(>) ∷ TxId → TxId → Bool #

(>=) ∷ TxId → TxId → Bool #

max ∷ TxId → TxId → TxId #

min ∷ TxId → TxId → TxId #

Show TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

showsPrec ∷ Int → TxId → ShowS #

show ∷ TxId → String #

showList ∷ [TxId] → ShowS #

IsString TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

fromString ∷ String → TxId #

ToJSON TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxId → Value #

toEncoding ∷ TxId → Encoding #

toJSONList ∷ [TxId] → Value #

toEncodingList ∷ [TxId] → Encoding #

HasTypeProxy TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

data AsType TxId Source #

Methods

proxyToAsType ∷ Proxy TxId → AsType TxId Source #

SerialiseAsRawBytes TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

serialiseToRawBytes ∷ TxId → ByteString Source #

deserialiseFromRawBytes ∷ AsType TxId → ByteString → Maybe TxId Source #

data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId

toShelleyTxId ∷ TxId → TxId StandardCrypto Source #

fromShelleyTxId ∷ TxId StandardCrypto → TxId Source #

data TxIn Source #

Constructors

TxIn TxId TxIx 

Instances

Instances details
Eq TxIn Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

(==) ∷ TxIn → TxIn → Bool #

(/=) ∷ TxIn → TxIn → Bool #

Ord TxIn Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

compare ∷ TxIn → TxIn → Ordering #

(<) ∷ TxIn → TxIn → Bool #

(<=) ∷ TxIn → TxIn → Bool #

(>) ∷ TxIn → TxIn → Bool #

(>=) ∷ TxIn → TxIn → Bool #

max ∷ TxIn → TxIn → TxIn #

min ∷ TxIn → TxIn → TxIn #

Show TxIn Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

showsPrec ∷ Int → TxIn → ShowS #

show ∷ TxIn → String #

showList ∷ [TxIn] → ShowS #

ToJSON TxIn Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxIn → Value #

toEncoding ∷ TxIn → Encoding #

toJSONList ∷ [TxIn] → Value #

toEncodingList ∷ [TxIn] → Encoding #

ToJSONKey TxIn Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSONKey ∷ ToJSONKeyFunction TxIn

toJSONKeyList ∷ ToJSONKeyFunction [TxIn]

toShelleyTxIn ∷ TxIn → TxIn StandardCrypto Source #

fromShelleyTxIn ∷ TxIn StandardCrypto → TxIn Source #

data TxOut era Source #

Constructors

TxOut (AddressInEra era) (TxOutValue era) (TxOutDatumHash era) 

Instances

Instances details
Eq (TxOut era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

(==) ∷ TxOut era → TxOut era → Bool #

(/=) ∷ TxOut era → TxOut era → Bool #

Show (TxOut era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

showsPrec ∷ Int → TxOut era → ShowS #

show ∷ TxOut era → String #

showList ∷ [TxOut era] → ShowS #

Generic (TxOut era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

type Rep (TxOut era) ∷ Type → Type #

Methods

from ∷ TxOut era → Rep (TxOut era) x #

to ∷ Rep (TxOut era) x → TxOut era #

IsCardanoEra era ⇒ ToJSON (TxOut era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxOut era → Value #

toEncoding ∷ TxOut era → Encoding #

toJSONList ∷ [TxOut era] → Value #

toEncodingList ∷ [TxOut era] → Encoding #

type Rep (TxOut era) Source # 
Instance details

Defined in Cardano.Api.TxBody

type Rep (TxOut era) = D1 ('MetaData "TxOut" "Cardano.Api.TxBody" "cardano-api-1.27.0-inplace" 'False) (C1 ('MetaCons "TxOut" 'PrefixI 'False) (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (AddressInEra era)) :*: (S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (TxOutValue era)) :*: S1 ('MetaSel ('Nothing ∷ Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (TxOutDatumHash era)))))

toShelleyTxOut ∷ ∀ era ledgerera. (ShelleyLedgerEra era ~ ledgerera, IsShelleyBasedEra era, ShelleyBased ledgerera) ⇒ TxOut era → TxOut ledgerera Source #

fromShelleyTxOut ∷ TxOut StandardShelley → TxOut ShelleyEra Source #

newtype TxIx Source #

Constructors

TxIx Word 

Instances

Instances details
Enum TxIx Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

succ ∷ TxIx → TxIx #

pred ∷ TxIx → TxIx #

toEnum ∷ Int → TxIx #

fromEnum ∷ TxIx → Int #

enumFrom ∷ TxIx → [TxIx] #

enumFromThen ∷ TxIx → TxIx → [TxIx] #

enumFromTo ∷ TxIx → TxIx → [TxIx] #

enumFromThenTo ∷ TxIx → TxIx → TxIx → [TxIx] #

Eq TxIx Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

(==) ∷ TxIx → TxIx → Bool #

(/=) ∷ TxIx → TxIx → Bool #

Ord TxIx Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

compare ∷ TxIx → TxIx → Ordering #

(<) ∷ TxIx → TxIx → Bool #

(<=) ∷ TxIx → TxIx → Bool #

(>) ∷ TxIx → TxIx → Bool #

(>=) ∷ TxIx → TxIx → Bool #

max ∷ TxIx → TxIx → TxIx #

min ∷ TxIx → TxIx → TxIx #

Show TxIx Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

showsPrec ∷ Int → TxIx → ShowS #

show ∷ TxIx → String #

showList ∷ [TxIx] → ShowS #

ToJSON TxIx Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxIx → Value #

toEncoding ∷ TxIx → Encoding #

toJSONList ∷ [TxIx] → Value #

toEncodingList ∷ [TxIx] → Encoding #

newtype Lovelace Source #

Constructors

Lovelace Integer 

Instances

Instances details
Enum Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

succ ∷ Lovelace → Lovelace #

pred ∷ Lovelace → Lovelace #

toEnum ∷ Int → Lovelace #

fromEnum ∷ Lovelace → Int #

enumFrom ∷ Lovelace → [Lovelace] #

enumFromThen ∷ Lovelace → Lovelace → [Lovelace] #

enumFromTo ∷ Lovelace → Lovelace → [Lovelace] #

enumFromThenTo ∷ Lovelace → Lovelace → Lovelace → [Lovelace] #

Eq Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

(==) ∷ Lovelace → Lovelace → Bool #

(/=) ∷ Lovelace → Lovelace → Bool #

Num Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

(+) ∷ Lovelace → Lovelace → Lovelace #

(-) ∷ Lovelace → Lovelace → Lovelace #

(*) ∷ Lovelace → Lovelace → Lovelace #

negate ∷ Lovelace → Lovelace #

abs ∷ Lovelace → Lovelace #

signum ∷ Lovelace → Lovelace #

fromInteger ∷ Integer → Lovelace #

Ord Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

compare ∷ Lovelace → Lovelace → Ordering #

(<) ∷ Lovelace → Lovelace → Bool #

(<=) ∷ Lovelace → Lovelace → Bool #

(>) ∷ Lovelace → Lovelace → Bool #

(>=) ∷ Lovelace → Lovelace → Bool #

max ∷ Lovelace → Lovelace → Lovelace #

min ∷ Lovelace → Lovelace → Lovelace #

Show Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

showsPrec ∷ Int → Lovelace → ShowS #

show ∷ Lovelace → String #

showList ∷ [Lovelace] → ShowS #

Semigroup Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

(<>) ∷ Lovelace → Lovelace → Lovelace #

sconcat ∷ NonEmpty Lovelace → Lovelace #

stimes ∷ Integral b ⇒ b → Lovelace → Lovelace #

Monoid Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

mempty ∷ Lovelace #

mappend ∷ Lovelace → Lovelace → Lovelace #

mconcat ∷ [Lovelace] → Lovelace #

FromJSON Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value → Parser Lovelace #

parseJSONList ∷ Value → Parser [Lovelace] #

ToJSON Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ Lovelace → Value #

toEncoding ∷ Lovelace → Encoding #

toJSONList ∷ [Lovelace] → Value #

toEncodingList ∷ [Lovelace] → Encoding #

toShelleyLovelace ∷ Lovelace → Coin Source #

fromShelleyLovelace ∷ Coin → Lovelace Source #

toMaryValue ∷ Value → Value StandardCrypto Source #

fromMaryValue ∷ Value StandardCrypto → Value Source #

calcMinimumDeposit ∷ Value → Lovelace → Lovelace Source #

Calculate cost of making a UTxO entry for a given Value and - mininimum UTxO value derived from the ProtocolParameters

Signing transactions

Creating transaction witnesses one by one, or all in one go.

data Tx era where Source #

Constructors

ShelleyTx ∷ ShelleyBasedEra era → Tx (ShelleyLedgerEra era) → Tx era 

Instances

Instances details
Eq (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

(==) ∷ Tx era → Tx era → Bool #

(/=) ∷ Tx era → Tx era → Bool #

Show (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

showsPrec ∷ Int → Tx era → ShowS #

show ∷ Tx era → String #

showList ∷ [Tx era] → ShowS #

HasTypeProxy era ⇒ HasTypeProxy (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (Tx era) Source #

Methods

proxyToAsType ∷ Proxy (Tx era) → AsType (Tx era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ Tx era → ByteString Source #

deserialiseFromCBOR ∷ AsType (Tx era) → ByteString → Either DecoderError (Tx era) Source #

IsCardanoEra era ⇒ HasTextEnvelope (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

textEnvelopeType ∷ AsType (Tx era) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ Tx era → TextEnvelopeDescr Source #

data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

Incremental signing and separate witnesses

data KeyWitness era where Source #

Constructors

ShelleyBootstrapWitness ∷ ShelleyBasedEra era → BootstrapWitness StandardCrypto → KeyWitness era 
ShelleyKeyWitness ∷ ShelleyBasedEra era → WitVKey Witness StandardCrypto → KeyWitness era 

Instances

Instances details
Eq (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

(==) ∷ KeyWitness era → KeyWitness era → Bool #

(/=) ∷ KeyWitness era → KeyWitness era → Bool #

Show (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

showsPrec ∷ Int → KeyWitness era → ShowS #

show ∷ KeyWitness era → String #

showList ∷ [KeyWitness era] → ShowS #

HasTypeProxy era ⇒ HasTypeProxy (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (KeyWitness era) Source #

Methods

proxyToAsType ∷ Proxy (KeyWitness era) → AsType (KeyWitness era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ KeyWitness era → ByteString Source #

deserialiseFromCBOR ∷ AsType (KeyWitness era) → ByteString → Either DecoderError (KeyWitness era) Source #

IsCardanoEra era ⇒ HasTextEnvelope (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

textEnvelopeType ∷ AsType (KeyWitness era) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ KeyWitness era → TextEnvelopeDescr Source #

data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)

data ShelleyWitnessSigningKey Source #

Constructors

WitnessPaymentKey (SigningKey PaymentKey) 
WitnessPaymentExtendedKey (SigningKey PaymentExtendedKey) 
WitnessStakeKey (SigningKey StakeKey) 
WitnessStakeExtendedKey (SigningKey StakeExtendedKey) 
WitnessStakePoolKey (SigningKey StakePoolKey) 
WitnessGenesisKey (SigningKey GenesisKey) 
WitnessGenesisExtendedKey (SigningKey GenesisExtendedKey) 
WitnessGenesisDelegateKey (SigningKey GenesisDelegateKey) 
WitnessGenesisDelegateExtendedKey (SigningKey GenesisDelegateExtendedKey) 

data ShelleySigningKey Source #

We support making key witnesses with both normal and extended signing keys.

getShelleyKeyWitnessVerificationKey ∷ ShelleySigningKey → VKey Witness StandardCrypto Source #

makeShelleySignature ∷ SignableRepresentation tosign ⇒ tosign → ShelleySigningKey → SignedDSIGN StandardCrypto tosign Source #

toShelleySigningKey ∷ ShelleyWitnessSigningKey → ShelleySigningKey Source #

Transaction metadata

Embedding additional structured data within transactions.

toShelleyMetadata ∷ Map Word64 TxMetadataValue → Map Word64 Metadatum Source #

fromShelleyMetadata ∷ Map Word64 Metadatum → Map Word64 TxMetadataValue Source #

Protocol parameters

data ProtocolParameters Source #

The values of the set of updateable protocol paramaters. At any + mininimum UTxO value derived from the ProtocolParameters

Signing transactions

Creating transaction witnesses one by one, or all in one go.

data Tx era where Source #

Constructors

ShelleyTx ∷ ShelleyBasedEra era → Tx (ShelleyLedgerEra era) → Tx era 

Instances

Instances details
Eq (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

(==) ∷ Tx era → Tx era → Bool #

(/=) ∷ Tx era → Tx era → Bool #

Show (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

showsPrec ∷ Int → Tx era → ShowS #

show ∷ Tx era → String #

showList ∷ [Tx era] → ShowS #

HasTypeProxy era ⇒ HasTypeProxy (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (Tx era) Source #

Methods

proxyToAsType ∷ Proxy (Tx era) → AsType (Tx era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ Tx era → ByteString Source #

deserialiseFromCBOR ∷ AsType (Tx era) → ByteString → Either DecoderError (Tx era) Source #

IsCardanoEra era ⇒ HasTextEnvelope (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

textEnvelopeType ∷ AsType (Tx era) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ Tx era → TextEnvelopeDescr Source #

data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

Incremental signing and separate witnesses

data KeyWitness era where Source #

Constructors

ShelleyBootstrapWitness ∷ ShelleyBasedEra era → BootstrapWitness StandardCrypto → KeyWitness era 
ShelleyKeyWitness ∷ ShelleyBasedEra era → WitVKey Witness StandardCrypto → KeyWitness era 

Instances

Instances details
Eq (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

(==) ∷ KeyWitness era → KeyWitness era → Bool #

(/=) ∷ KeyWitness era → KeyWitness era → Bool #

Show (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

showsPrec ∷ Int → KeyWitness era → ShowS #

show ∷ KeyWitness era → String #

showList ∷ [KeyWitness era] → ShowS #

HasTypeProxy era ⇒ HasTypeProxy (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (KeyWitness era) Source #

Methods

proxyToAsType ∷ Proxy (KeyWitness era) → AsType (KeyWitness era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ KeyWitness era → ByteString Source #

deserialiseFromCBOR ∷ AsType (KeyWitness era) → ByteString → Either DecoderError (KeyWitness era) Source #

IsCardanoEra era ⇒ HasTextEnvelope (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

textEnvelopeType ∷ AsType (KeyWitness era) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ KeyWitness era → TextEnvelopeDescr Source #

data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)

data ShelleyWitnessSigningKey Source #

Constructors

WitnessPaymentKey (SigningKey PaymentKey) 
WitnessPaymentExtendedKey (SigningKey PaymentExtendedKey) 
WitnessStakeKey (SigningKey StakeKey) 
WitnessStakeExtendedKey (SigningKey StakeExtendedKey) 
WitnessStakePoolKey (SigningKey StakePoolKey) 
WitnessGenesisKey (SigningKey GenesisKey) 
WitnessGenesisExtendedKey (SigningKey GenesisExtendedKey) 
WitnessGenesisDelegateKey (SigningKey GenesisDelegateKey) 
WitnessGenesisDelegateExtendedKey (SigningKey GenesisDelegateExtendedKey) 

data ShelleySigningKey Source #

We support making key witnesses with both normal and extended signing keys.

getShelleyKeyWitnessVerificationKey ∷ ShelleySigningKey → VKey Witness StandardCrypto Source #

makeShelleySignature ∷ SignableRepresentation tosign ⇒ tosign → ShelleySigningKey → SignedDSIGN StandardCrypto tosign Source #

toShelleySigningKey ∷ ShelleyWitnessSigningKey → ShelleySigningKey Source #

Transaction metadata

Embedding additional structured data within transactions.

toShelleyMetadata ∷ Map Word64 TxMetadataValue → Map Word64 Metadatum Source #

fromShelleyMetadata ∷ Map Word64 Metadatum → Map Word64 TxMetadataValue Source #

toShelleyMetadatum ∷ TxMetadataValue → Metadatum Source #

fromShelleyMetadatum ∷ Metadatum → TxMetadataValue Source #

Protocol parameters

data ProtocolParameters Source #

The values of the set of updateable protocol paramaters. At any particular point on the chain there is a current set of paramaters in use.

These paramaters can be updated (at epoch boundaries) via an UpdateProposal, which contains a ProtocolParametersUpdate.

The ProtocolParametersUpdate is essentially a diff for the ProtocolParameters.

There are also paramaters fixed in the Genesis file. See GenesisParameters.

Constructors

ProtocolParameters 

Fields

  • protocolParamProtocolVersion ∷ (Natural, Natural)

    Protocol version, major and minor. Updating the major version is diff --git a/cardano-api/Cardano-Api-SpecialByron.html b/cardano-api/Cardano-Api-SpecialByron.html index d77a72630e8..d9b3d5110e3 100644 --- a/cardano-api/Cardano-Api-SpecialByron.html +++ b/cardano-api/Cardano-Api-SpecialByron.html @@ -8,4 +8,4 @@ current softfork resolution threshold, this block version is adopted.

  • bPpuTxFeePolicy ∷ !(Maybe TxFeePolicy)

    Transaction fee policy represents a formula to compute the minimal allowed Fee for a transaction. Transactions with lesser fees won't be accepted.

  • bPpuUnlockStakeEpoch ∷ !(Maybe EpochNumber)

    This has been re-purposed for unlocking the OuroborosBFT logic in the software. Relevant: CDEC-610

Instances

Instances details
Show ByronProtocolParametersUpdate Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Methods

showsPrec ∷ Int → ByronProtocolParametersUpdate → ShowS #

show ∷ ByronProtocolParametersUpdate → String #

showList ∷ [ByronProtocolParametersUpdate] → ShowS #

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

makeProtocolParametersUpdate ∷ ByronProtocolParametersUpdate → ProtocolParametersUpdate Source #

toByronLedgerUpdateProposal ∷ ByronUpdateProposal → GenTx ByronBlock Source #

newtype ByronVote Source #

Byron era votes

Constructors

ByronVote 

Fields

Instances

Instances details
Eq ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Methods

(==) ∷ ByronVote → ByronVote → Bool #

(/=) ∷ ByronVote → ByronVote → Bool #

Show ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Methods

showsPrec ∷ Int → ByronVote → ShowS #

show ∷ ByronVote → String #

showList ∷ [ByronVote] → ShowS #

HasTypeProxy ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Associated Types

data AsType ByronVote Source #

Methods

proxyToAsType ∷ Proxy ByronVote → AsType ByronVote Source #

SerialiseAsRawBytes ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Methods

serialiseToRawBytes ∷ ByronVote → ByteString Source #

deserialiseFromRawBytes ∷ AsType ByronVote → ByteString → Maybe ByronVote Source #

data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote

makeByronUpdateProposal ∷ NetworkId → ProtocolVersion → SoftwareVersion → SystemTag → InstallerHash → SomeByronSigningKey → ByronProtocolParametersUpdate → ByronUpdateProposal Source #

makeByronVote ∷ NetworkId → SomeByronSigningKey → ByronUpdateProposal → Bool → ByronVote Source #

toByronLedgertoByronVote ∷ ByronVote → GenTx ByronBlock Source #

\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

makeProtocolParametersUpdate ∷ ByronProtocolParametersUpdate → ProtocolParametersUpdate Source #

toByronLedgerUpdateProposal ∷ ByronUpdateProposal → GenTx ByronBlock Source #

newtype ByronVote Source #

Byron era votes

Constructors

ByronVote 

Fields

Instances

Instances details
Eq ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Methods

(==) ∷ ByronVote → ByronVote → Bool #

(/=) ∷ ByronVote → ByronVote → Bool #

Show ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Methods

showsPrec ∷ Int → ByronVote → ShowS #

show ∷ ByronVote → String #

showList ∷ [ByronVote] → ShowS #

HasTypeProxy ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Associated Types

data AsType ByronVote Source #

Methods

proxyToAsType ∷ Proxy ByronVote → AsType ByronVote Source #

SerialiseAsRawBytes ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Methods

serialiseToRawBytes ∷ ByronVote → ByteString Source #

deserialiseFromRawBytes ∷ AsType ByronVote → ByteString → Maybe ByronVote Source #

data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote

makeByronUpdateProposal ∷ NetworkId → ProtocolVersion → SoftwareVersion → SystemTag → InstallerHash → SomeByronSigningKey → ByronProtocolParametersUpdate → ByronUpdateProposal Source #

makeByronVote ∷ NetworkId → SomeByronSigningKey → ByronUpdateProposal → Bool → ByronVote Source #

toByronLedgertoByronVote ∷ ByronVote → GenTx ByronBlock Source #

\ No newline at end of file diff --git a/cardano-api/Cardano-Api-StakePoolMetadata.html b/cardano-api/Cardano-Api-StakePoolMetadata.html index 8d10205156e..88dcd4a3aa2 100644 --- a/cardano-api/Cardano-Api-StakePoolMetadata.html +++ b/cardano-api/Cardano-Api-StakePoolMetadata.html @@ -3,6 +3,6 @@ n.b. the spec does not specify a character limit for this field.

Instances

Instances details
Eq StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ StakePoolMetadata → StakePoolMetadata → Bool #

(/=) ∷ StakePoolMetadata → StakePoolMetadata → Bool #

Show StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → StakePoolMetadata → ShowS #

show ∷ StakePoolMetadata → String #

showList ∷ [StakePoolMetadata] → ShowS #

FromJSON StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

parseJSON ∷ Value → Parser StakePoolMetadata #

parseJSONList ∷ Value → Parser [StakePoolMetadata] #

HasTypeProxy StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Associated Types

data AsType StakePoolMetadata Source #

Methods

proxyToAsType ∷ Proxy StakePoolMetadata → AsType StakePoolMetadata Source #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)

validateAndHashStakePoolMetadata ∷ ByteString → Either StakePoolMetadataValidationError (StakePoolMetadata, Hash StakePoolMetadata) Source #

Decode and validate the provided JSON-encoded bytes as StakePoolMetadata. Return the decoded metadata and the hash of the original bytes.

data StakePoolMetadataValidationError Source #

A stake pool metadata validation error.

Constructors

StakePoolMetadataJsonDecodeError !String 
StakePoolMetadataInvalidLengthError

The length of the JSON-encoded stake pool metadata exceeds the maximum.

Fields

  • !Int

    Maximum byte length.

  • !Int

    Actual byte length.

Instances

Instances details
Show StakePoolMetadataValidationError Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → StakePoolMetadataValidationError → ShowS #

show ∷ StakePoolMetadataValidationError → String #

showList ∷ [StakePoolMetadataValidationError] → ShowS #

Error StakePoolMetadataValidationError Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

displayError ∷ StakePoolMetadataValidationError → String Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

data family Hash keyrole ∷ Type Source #

Instances

Instances details
Eq (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(/=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

Eq (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(/=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

Eq (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(/=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

Eq (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(/=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

Eq (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(/=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

Eq (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(/=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

Eq (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(/=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

Eq (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash StakeKey → Hash StakeKey → Bool #

(/=) ∷ Hash StakeKey → Hash StakeKey → Bool #

Eq (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(/=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

Eq (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(/=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

Eq (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

(==) ∷ Hash ScriptData → Hash ScriptData → Bool #

(/=) ∷ Hash ScriptData → Hash ScriptData → Bool #

Eq (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(/=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

Eq (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ Hash ByronKey → Hash ByronKey → Bool #

(/=) ∷ Hash ByronKey → Hash ByronKey → Bool #

Eq (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash VrfKey → Hash VrfKey → Bool #

(/=) ∷ Hash VrfKey → Hash VrfKey → Bool #

Eq (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ Hash KesKey → Hash KesKey → Bool #

(/=) ∷ Hash KesKey → Hash KesKey → Bool #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Eq (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

(==) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(/=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

Ord (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakePoolKey → Hash StakePoolKey → Ordering #

(<) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(<=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

(>=) ∷ Hash StakePoolKey → Hash StakePoolKey → Bool #

max ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

min ∷ Hash StakePoolKey → Hash StakePoolKey → Hash StakePoolKey #

Ord (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Ordering #

(<) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(<=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

(>=) ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Bool #

max ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

min ∷ Hash GenesisUTxOKey → Hash GenesisUTxOKey → Hash GenesisUTxOKey #

Ord (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Ordering #

(<) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(<=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

(>=) ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Bool #

max ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

min ∷ Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey #

Ord (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Ordering #

(<) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(<=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

(>=) ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Bool #

max ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

min ∷ Hash GenesisDelegateKey → Hash GenesisDelegateKey → Hash GenesisDelegateKey #

Ord (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Ordering #

(<) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(<=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

(>=) ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Bool #

max ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

min ∷ Hash GenesisExtendedKey → Hash GenesisExtendedKey → Hash GenesisExtendedKey #

Ord (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash GenesisKey → Hash GenesisKey → Ordering #

(<) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(<=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

(>=) ∷ Hash GenesisKey → Hash GenesisKey → Bool #

max ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

min ∷ Hash GenesisKey → Hash GenesisKey → Hash GenesisKey #

Ord (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Ordering #

(<) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(<=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

(>=) ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Bool #

max ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

min ∷ Hash StakeExtendedKey → Hash StakeExtendedKey → Hash StakeExtendedKey #

Ord (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash StakeKey → Hash StakeKey → Ordering #

(<) ∷ Hash StakeKey → Hash StakeKey → Bool #

(<=) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>) ∷ Hash StakeKey → Hash StakeKey → Bool #

(>=) ∷ Hash StakeKey → Hash StakeKey → Bool #

max ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

min ∷ Hash StakeKey → Hash StakeKey → Hash StakeKey #

Ord (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Ordering #

(<) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(<=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

(>=) ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Bool #

max ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

min ∷ Hash PaymentExtendedKey → Hash PaymentExtendedKey → Hash PaymentExtendedKey #

Ord (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

compare ∷ Hash PaymentKey → Hash PaymentKey → Ordering #

(<) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(<=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

(>=) ∷ Hash PaymentKey → Hash PaymentKey → Bool #

max ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

min ∷ Hash PaymentKey → Hash PaymentKey → Hash PaymentKey #

Ord (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

compare ∷ Hash ScriptData → Hash ScriptData → Ordering #

(<) ∷ Hash ScriptData → Hash ScriptData → Bool #

(<=) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>) ∷ Hash ScriptData → Hash ScriptData → Bool #

(>=) ∷ Hash ScriptData → Hash ScriptData → Bool #

max ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

min ∷ Hash ScriptData → Hash ScriptData → Hash ScriptData #

Ord (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Ordering #

(<) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(<=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

(>=) ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Bool #

max ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

min ∷ Hash ByronKeyLegacy → Hash ByronKeyLegacy → Hash ByronKeyLegacy #

Ord (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

compare ∷ Hash ByronKey → Hash ByronKey → Ordering #

(<) ∷ Hash ByronKey → Hash ByronKey → Bool #

(<=) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>) ∷ Hash ByronKey → Hash ByronKey → Bool #

(>=) ∷ Hash ByronKey → Hash ByronKey → Bool #

max ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

min ∷ Hash ByronKey → Hash ByronKey → Hash ByronKey #

Ord (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash VrfKey → Hash VrfKey → Ordering #

(<) ∷ Hash VrfKey → Hash VrfKey → Bool #

(<=) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>) ∷ Hash VrfKey → Hash VrfKey → Bool #

(>=) ∷ Hash VrfKey → Hash VrfKey → Bool #

max ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

min ∷ Hash VrfKey → Hash VrfKey → Hash VrfKey #

Ord (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

compare ∷ Hash KesKey → Hash KesKey → Ordering #

(<) ∷ Hash KesKey → Hash KesKey → Bool #

(<=) ∷ Hash KesKey → Hash KesKey → Bool #

(>) ∷ Hash KesKey → Hash KesKey → Bool #

(>=) ∷ Hash KesKey → Hash KesKey → Bool #

max ∷ Hash KesKey → Hash KesKey → Hash KesKey #

min ∷ Hash KesKey → Hash KesKey → Hash KesKey #

Ord (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

compare ∷ Hash BlockHeader → Hash BlockHeader → Ordering #

(<) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(<=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

(>=) ∷ Hash BlockHeader → Hash BlockHeader → Bool #

max ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

min ∷ Hash BlockHeader → Hash BlockHeader → Hash BlockHeader #

Show (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakePoolKey → ShowS #

show ∷ Hash StakePoolKey → String #

showList ∷ [Hash StakePoolKey] → ShowS #

Show (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisUTxOKey → ShowS #

show ∷ Hash GenesisUTxOKey → String #

showList ∷ [Hash GenesisUTxOKey] → ShowS #

Show (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateExtendedKey → ShowS #

show ∷ Hash GenesisDelegateExtendedKey → String #

showList ∷ [Hash GenesisDelegateExtendedKey] → ShowS #

Show (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisDelegateKey → ShowS #

show ∷ Hash GenesisDelegateKey → String #

showList ∷ [Hash GenesisDelegateKey] → ShowS #

Show (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisExtendedKey → ShowS #

show ∷ Hash GenesisExtendedKey → String #

showList ∷ [Hash GenesisExtendedKey] → ShowS #

Show (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash GenesisKey → ShowS #

show ∷ Hash GenesisKey → String #

showList ∷ [Hash GenesisKey] → ShowS #

Show (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeExtendedKey → ShowS #

show ∷ Hash StakeExtendedKey → String #

showList ∷ [Hash StakeExtendedKey] → ShowS #

Show (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash StakeKey → ShowS #

show ∷ Hash StakeKey → String #

showList ∷ [Hash StakeKey] → ShowS #

Show (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentExtendedKey → ShowS #

show ∷ Hash PaymentExtendedKey → String #

showList ∷ [Hash PaymentExtendedKey] → ShowS #

Show (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → Hash PaymentKey → ShowS #

show ∷ Hash PaymentKey → String #

showList ∷ [Hash PaymentKey] → ShowS #

Show (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

showsPrec ∷ Int → Hash ScriptData → ShowS #

show ∷ Hash ScriptData → String #

showList ∷ [Hash ScriptData] → ShowS #

Show (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKeyLegacy → ShowS #

show ∷ Hash ByronKeyLegacy → String #

showList ∷ [Hash ByronKeyLegacy] → ShowS #

Show (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → Hash ByronKey → ShowS #

show ∷ Hash ByronKey → String #

showList ∷ [Hash ByronKey] → ShowS #

Show (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash VrfKey → ShowS #

show ∷ Hash VrfKey → String #

showList ∷ [Hash VrfKey] → ShowS #

Show (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → Hash KesKey → ShowS #

show ∷ Hash KesKey → String #

showList ∷ [Hash KesKey] → ShowS #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

Show (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

showsPrec ∷ Int → Hash BlockHeader → ShowS #

show ∷ Hash BlockHeader → String #

showList ∷ [Hash BlockHeader] → ShowS #

IsString (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakePoolKey #

IsString (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisUTxOKey #

IsString (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateExtendedKey #

IsString (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisDelegateKey #

IsString (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisExtendedKey #

IsString (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash GenesisKey #

IsString (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeExtendedKey #

IsString (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash StakeKey #

IsString (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentExtendedKey #

IsString (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → Hash PaymentKey #

IsString (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

fromString ∷ String → Hash ScriptData #

IsString (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKeyLegacy #

IsString (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → Hash ByronKey #

IsString (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash VrfKey #

IsString (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → Hash KesKey #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSONKey (Hash StakePoolKey) 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash StakePoolKey)

toJSONKeyList ∷ ToJSONKeyFunction [Hash StakePoolKey]

ToJSONKey (Hash ScriptData) 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSONKey ∷ ToJSONKeyFunction (Hash ScriptData)

toJSONKeyList ∷ ToJSONKeyFunction [Hash ScriptData]

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

SerialiseAsRawBytes (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolKey) → ByteString → Maybe (Hash StakePoolKey) Source #

SerialiseAsRawBytes (Hash GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisUTxOKey) → ByteString → Maybe (Hash GenesisUTxOKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateExtendedKey) → ByteString → Maybe (Hash GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisDelegateKey) → ByteString → Maybe (Hash GenesisDelegateKey) Source #

SerialiseAsRawBytes (Hash GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisExtendedKey) → ByteString → Maybe (Hash GenesisExtendedKey) Source #

SerialiseAsRawBytes (Hash GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash GenesisKey) → ByteString → Maybe (Hash GenesisKey) Source #

SerialiseAsRawBytes (Hash StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeExtendedKey) → ByteString → Maybe (Hash StakeExtendedKey) Source #

SerialiseAsRawBytes (Hash StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakeKey) → ByteString → Maybe (Hash StakeKey) Source #

SerialiseAsRawBytes (Hash PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentExtendedKey) → ByteString → Maybe (Hash PaymentExtendedKey) Source #

SerialiseAsRawBytes (Hash PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ Hash PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash PaymentKey) → ByteString → Maybe (Hash PaymentKey) Source #

SerialiseAsRawBytes (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

serialiseToRawBytes ∷ Hash ScriptData → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ScriptData) → ByteString → Maybe (Hash ScriptData) Source #

SerialiseAsRawBytes (Hash ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKeyLegacy) → ByteString → Maybe (Hash ByronKeyLegacy) Source #

SerialiseAsRawBytes (Hash ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ Hash ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash ByronKey) → ByteString → Maybe (Hash ByronKey) Source #

SerialiseAsRawBytes (Hash VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash VrfKey) → ByteString → Maybe (Hash VrfKey) Source #

SerialiseAsRawBytes (Hash KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ Hash KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash KesKey) → ByteString → Maybe (Hash KesKey) Source #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

SerialiseAsRawBytes (Hash BlockHeader) Source # 
Instance details

Defined in Cardano.Api.Block

Methods

serialiseToRawBytes ∷ Hash BlockHeader → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash BlockHeader) → ByteString → Maybe (Hash BlockHeader) Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

newtype Hash StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakePoolKey = StakePoolKeyHash (KeyHash 'StakePool StandardCrypto)
newtype Hash GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisUTxOKey = GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisDelegateKey = GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto)
newtype Hash GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisExtendedKey = GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash GenesisKey = GenesisKeyHash (KeyHash 'Genesis StandardCrypto)
newtype Hash StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeExtendedKey = StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash StakeKey = StakeKeyHash (KeyHash 'Staking StandardCrypto)
newtype Hash PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentExtendedKey = PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype Hash PaymentKey = PaymentKeyHash (KeyHash 'Payment StandardCrypto)
newtype Hash ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

newtype Hash ScriptData = ScriptDataHash (DataHash StandardCrypto)
newtype Hash ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKeyLegacy = ByronKeyHashLegacy KeyHash
newtype Hash ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype Hash ByronKey = ByronKeyHash KeyHash
newtype Hash VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash VrfKey = VrfKeyHash (Hash StandardCrypto (VerKeyVRF StandardCrypto))
newtype Hash KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype Hash KesKey = KesKeyHash (Hash StandardCrypto (VerKeyKES StandardCrypto))
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)
newtype Hash BlockHeader Source #

For now at least we use a fixed concrete hash type for all modes and era. The different eras do use different types, but it's all the same underlying representation.

Instance details

Defined in Cardano.Api.Block

newtype Hash BlockHeader = HeaderHash ShortByteString
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-Tx.html b/cardano-api/Cardano-Api-Tx.html index 600359abf38..bed1d78dd1e 100644 --- a/cardano-api/Cardano-Api-Tx.html +++ b/cardano-api/Cardano-Api-Tx.html @@ -4,4 +4,4 @@ specify a WitnessByronAddress value instead.

WitnessByronAddress !(Address ByronAddr)

Byron address.

If this value is used in the construction of a Shelley bootstrap witness, both the network ID and derivation path will be extracted from the address and used in the construction of the witness.

makeShelleyBootstrapWitness ∷ ∀ era. IsShelleyBasedEra era ⇒ WitnessNetworkIdOrByronAddress → TxBody era → SigningKey ByronKey → KeyWitness era Source #

makeShelleySignature ∷ SignableRepresentation tosign ⇒ tosign → ShelleySigningKey → SignedDSIGN StandardCrypto tosign Source #

getShelleyKeyWitnessVerificationKey ∷ ShelleySigningKey → VKey Witness StandardCrypto Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-TxBody.html b/cardano-api/Cardano-Api-TxBody.html index 1a975a91915..953604baf0e 100644 --- a/cardano-api/Cardano-Api-TxBody.html +++ b/cardano-api/Cardano-Api-TxBody.html @@ -30,4 +30,4 @@ transactions.

The Shelley and subsequent eras support such update proposals. They Byron era has a notion of an update proposal, but it is a standalone chain object and not embedded in a transaction.

Constructors

UpdateProposalInShelleyEra ∷ UpdateProposalSupportedInEra ShelleyEra 
UpdateProposalInAllegraEra ∷ UpdateProposalSupportedInEra AllegraEra 
UpdateProposalInMaryEra ∷ UpdateProposalSupportedInEra MaryEra 
UpdateProposalInAlonzoEra ∷ UpdateProposalSupportedInEra AlonzoEra 

Instances

Instances details
Eq (UpdateProposalSupportedInEra era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

(==) ∷ UpdateProposalSupportedInEra era → UpdateProposalSupportedInEra era → Bool #

(/=) ∷ UpdateProposalSupportedInEra era → UpdateProposalSupportedInEra era → Bool #

Show (UpdateProposalSupportedInEra era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

showsPrec ∷ Int → UpdateProposalSupportedInEra era → ShowS #

show ∷ UpdateProposalSupportedInEra era → String #

showList ∷ [UpdateProposalSupportedInEra era] → ShowS #

Feature availability functions

collateralSupportedInEra ∷ CardanoEra era → Maybe (CollateralSupportedInEra era) Source #

multiAssetSupportedInEra ∷ CardanoEra era → Either (OnlyAdaSupportedInEra era) (MultiAssetSupportedInEra era) Source #

txFeesExplicitInEra ∷ CardanoEra era → Either (TxFeesImplicitInEra era) (TxFeesExplicitInEra era) Source #

validityUpperBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityUpperBoundSupportedInEra era) Source #

validityNoUpperBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityNoUpperBoundSupportedInEra era) Source #

validityLowerBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityLowerBoundSupportedInEra era) Source #

txMetadataSupportedInEra ∷ CardanoEra era → Maybe (TxMetadataSupportedInEra era) Source #

auxScriptsSupportedInEra ∷ CardanoEra era → Maybe (AuxScriptsSupportedInEra era) Source #

extraKeyWitnessesSupportedInEra ∷ CardanoEra era → Maybe (TxExtraKeyWitnessesSupportedInEra era) Source #

scriptDataSupportedInEra ∷ CardanoEra era → Maybe (ScriptDataSupportedInEra era) Source #

withdrawalsSupportedInEra ∷ CardanoEra era → Maybe (WithdrawalsSupportedInEra era) Source #

certificatesSupportedInEra ∷ CardanoEra era → Maybe (CertificatesSupportedInEra era) Source #

updateProposalSupportedInEra ∷ CardanoEra era → Maybe (UpdateProposalSupportedInEra era) Source #

Internal conversion functions & types

toShelleyTxId ∷ TxId → TxId StandardCrypto Source #

toShelleyTxIn ∷ TxIn → TxIn StandardCrypto Source #

toShelleyTxOut ∷ ∀ era ledgerera. (ShelleyLedgerEra era ~ ledgerera, IsShelleyBasedEra era, ShelleyBased ledgerera) ⇒ TxOut era → TxOut ledgerera Source #

fromShelleyTxId ∷ TxId StandardCrypto → TxId Source #

fromShelleyTxIn ∷ TxIn StandardCrypto → TxIn Source #

fromShelleyTxOut ∷ TxOut StandardShelley → TxOut ShelleyEra Source #

fromTxOut ∷ ShelleyLedgerEra era ~ ledgerera ⇒ ShelleyBasedEra era → TxOut ledgerera → TxOut era Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

Conversion functions

fromByronTxIn ∷ TxIn → TxIn Source #

\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)

Conversion functions

fromByronTxIn ∷ TxIn → TxIn Source #

\ No newline at end of file diff --git a/cardano-api/Cardano-Api-TxMetadata.html b/cardano-api/Cardano-Api-TxMetadata.html index 3cf6b575165..ce8d2b2df64 100644 --- a/cardano-api/Cardano-Api-TxMetadata.html +++ b/cardano-api/Cardano-Api-TxMetadata.html @@ -1,8 +1,8 @@ -Cardano.Api.TxMetadata
cardano-api-1.27.0
Safe HaskellNone
LanguageHaskell2010

Cardano.Api.TxMetadata

Description

Metadata embedded in transactions

Synopsis

Types

newtype TxMetadata Source #

Constructors

TxMetadata (Map Word64 TxMetadataValue) 

Instances

Instances details
Eq TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadata → TxMetadata → Bool #

(/=) ∷ TxMetadata → TxMetadata → Bool #

Show TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadata → ShowS #

show ∷ TxMetadata → String #

showList ∷ [TxMetadata] → ShowS #

Semigroup TxMetadata Source #

Merge metadata maps. When there are clashing entries the left hand side - takes precedence.

Instance details

Defined in Cardano.Api.TxMetadata

Methods

(<>) ∷ TxMetadata → TxMetadata → TxMetadata #

sconcat ∷ NonEmpty TxMetadata → TxMetadata #

stimes ∷ Integral b ⇒ b → TxMetadata → TxMetadata #

Monoid TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

mempty ∷ TxMetadata #

mappend ∷ TxMetadata → TxMetadata → TxMetadata #

mconcat ∷ [TxMetadata] → TxMetadata #

HasTypeProxy TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Associated Types

data AsType TxMetadata Source #

Methods

proxyToAsType ∷ Proxy TxMetadata → AsType TxMetadata Source #

SerialiseAsCBOR TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

serialiseToCBOR ∷ TxMetadata → ByteString Source #

deserialiseFromCBOR ∷ AsType TxMetadata → ByteString → Either DecoderError TxMetadata Source #

data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata

Constructing metadata

data TxMetadataValue Source #

Constructors

TxMetaNumber Integer 
TxMetaBytes ByteString 
TxMetaText Text 
TxMetaList [TxMetadataValue] 
TxMetaMap [(TxMetadataValue, TxMetadataValue)] 

Instances

Instances details
Eq TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataValue → TxMetadataValue → Bool #

(/=) ∷ TxMetadataValue → TxMetadataValue → Bool #

Ord TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

compare ∷ TxMetadataValue → TxMetadataValue → Ordering #

(<) ∷ TxMetadataValue → TxMetadataValue → Bool #

(<=) ∷ TxMetadataValue → TxMetadataValue → Bool #

(>) ∷ TxMetadataValue → TxMetadataValue → Bool #

(>=) ∷ TxMetadataValue → TxMetadataValue → Bool #

max ∷ TxMetadataValue → TxMetadataValue → TxMetadataValue #

min ∷ TxMetadataValue → TxMetadataValue → TxMetadataValue #

Show TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataValue → ShowS #

show ∷ TxMetadataValue → String #

showList ∷ [TxMetadataValue] → ShowS #

makeTransactionMetadata ∷ Map Word64 TxMetadataValue → TxMetadata Source #

Validating metadata

validateTxMetadata ∷ TxMetadata → Either [(Word64, TxMetadataRangeError)] () Source #

Validate transaction metadata. This is for use with existing constructed +Cardano.Api.TxMetadata

cardano-api-1.27.0
Safe HaskellNone
LanguageHaskell2010

Cardano.Api.TxMetadata

Description

Metadata embedded in transactions

Synopsis

Types

newtype TxMetadata Source #

Constructors

TxMetadata (Map Word64 TxMetadataValue) 

Instances

Instances details
Eq TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadata → TxMetadata → Bool #

(/=) ∷ TxMetadata → TxMetadata → Bool #

Show TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadata → ShowS #

show ∷ TxMetadata → String #

showList ∷ [TxMetadata] → ShowS #

Semigroup TxMetadata Source #

Merge metadata maps. When there are clashing entries the left hand side + takes precedence.

Instance details

Defined in Cardano.Api.TxMetadata

Methods

(<>) ∷ TxMetadata → TxMetadata → TxMetadata #

sconcat ∷ NonEmpty TxMetadata → TxMetadata #

stimes ∷ Integral b ⇒ b → TxMetadata → TxMetadata #

Monoid TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

mempty ∷ TxMetadata #

mappend ∷ TxMetadata → TxMetadata → TxMetadata #

mconcat ∷ [TxMetadata] → TxMetadata #

HasTypeProxy TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Associated Types

data AsType TxMetadata Source #

Methods

proxyToAsType ∷ Proxy TxMetadata → AsType TxMetadata Source #

SerialiseAsCBOR TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

serialiseToCBOR ∷ TxMetadata → ByteString Source #

deserialiseFromCBOR ∷ AsType TxMetadata → ByteString → Either DecoderError TxMetadata Source #

data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata

Constructing metadata

data TxMetadataValue Source #

Constructors

TxMetaMap [(TxMetadataValue, TxMetadataValue)] 
TxMetaList [TxMetadataValue] 
TxMetaNumber Integer 
TxMetaBytes ByteString 
TxMetaText Text 

Instances

Instances details
Eq TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataValue → TxMetadataValue → Bool #

(/=) ∷ TxMetadataValue → TxMetadataValue → Bool #

Ord TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

compare ∷ TxMetadataValue → TxMetadataValue → Ordering #

(<) ∷ TxMetadataValue → TxMetadataValue → Bool #

(<=) ∷ TxMetadataValue → TxMetadataValue → Bool #

(>) ∷ TxMetadataValue → TxMetadataValue → Bool #

(>=) ∷ TxMetadataValue → TxMetadataValue → Bool #

max ∷ TxMetadataValue → TxMetadataValue → TxMetadataValue #

min ∷ TxMetadataValue → TxMetadataValue → TxMetadataValue #

Show TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataValue → ShowS #

show ∷ TxMetadataValue → String #

showList ∷ [TxMetadataValue] → ShowS #

makeTransactionMetadata ∷ Map Word64 TxMetadataValue → TxMetadata Source #

Validating metadata

validateTxMetadata ∷ TxMetadata → Either [(Word64, TxMetadataRangeError)] () Source #

Validate transaction metadata. This is for use with existing constructed metadata values, e.g. constructed manually or decoded from CBOR directly.

data TxMetadataRangeError Source #

An error in transaction metadata due to an out-of-range value.

Constructors

TxMetadataNumberOutOfRange !Integer

The number is outside the maximum range of -2^64-1 .. 2^64-1.

TxMetadataTextTooLong !Int

The length of a text string metadatum value exceeds the maximum of 64 bytes as UTF8.

TxMetadataBytesTooLong !Int

The length of a byte string metadatum value exceeds the maximum of - 64 bytes.

Instances

Instances details
Eq TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataRangeError → TxMetadataRangeError → Bool #

(/=) ∷ TxMetadataRangeError → TxMetadataRangeError → Bool #

Show TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataRangeError → ShowS #

show ∷ TxMetadataRangeError → String #

showList ∷ [TxMetadataRangeError] → ShowS #

Error TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataRangeError → String Source #

Converstion to/from JSON

data TxMetadataJsonSchema Source #

Tx metadata is similar to JSON but not exactly the same. It has some + 64 bytes.

Instances

Instances details
Eq TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataRangeError → TxMetadataRangeError → Bool #

(/=) ∷ TxMetadataRangeError → TxMetadataRangeError → Bool #

Show TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataRangeError → ShowS #

show ∷ TxMetadataRangeError → String #

showList ∷ [TxMetadataRangeError] → ShowS #

Error TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataRangeError → String Source #

Converstion to/from JSON

data TxMetadataJsonSchema Source #

Tx metadata is similar to JSON but not exactly the same. It has some deliberate limitations such as no support for floating point numbers or special forms for null or boolean values. It also has limitations on the length of strings. On the other hand, unlike JSON, it distinguishes between @@ -29,9 +29,9 @@ back without loss. That is we can round-trip the tx metadata via the JSON and also round-trip schema-compliant JSON via tx metadata.

Constructors

TxMetadataJsonNoSchema

Use the "no schema" mapping between JSON and tx metadata as described above.

TxMetadataJsonDetailedSchema

Use the "detailed schema" mapping between JSON and tx metadata as - described above.

Instances

Instances details
Eq TxMetadataJsonSchema Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonSchema → TxMetadataJsonSchema → Bool #

(/=) ∷ TxMetadataJsonSchema → TxMetadataJsonSchema → Bool #

Show TxMetadataJsonSchema Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonSchema → ShowS #

show ∷ TxMetadataJsonSchema → String #

showList ∷ [TxMetadataJsonSchema] → ShowS #

metadataFromJson ∷ TxMetadataJsonSchema → Value → Either TxMetadataJsonError TxMetadata Source #

Convert a value from JSON into tx metadata, using the given choice of + described above.

Instances

Instances details
Eq TxMetadataJsonSchema Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonSchema → TxMetadataJsonSchema → Bool #

(/=) ∷ TxMetadataJsonSchema → TxMetadataJsonSchema → Bool #

Show TxMetadataJsonSchema Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonSchema → ShowS #

show ∷ TxMetadataJsonSchema → String #

showList ∷ [TxMetadataJsonSchema] → ShowS #

metadataFromJson ∷ TxMetadataJsonSchema → Value → Either TxMetadataJsonError TxMetadata Source #

Convert a value from JSON into tx metadata, using the given choice of mapping between JSON and tx metadata.

This may fail with a conversion error if the JSON is outside the supported subset for the chosen mapping. See TxMetadataJsonSchema for the details.

metadataToJson ∷ TxMetadataJsonSchema → TxMetadata → Value Source #

Convert a tx metadata value into JSON , using the given choice of mapping between JSON and tx metadata.

This conversion is total but is not necessarily invertible. - See TxMetadataJsonSchema for the details.

metadataValueToJsonNoSchema ∷ TxMetadataValue → Value Source #

data TxMetadataJsonError Source #

Constructors

TxMetadataJsonToplevelNotMap 
TxMetadataJsonToplevelBadKey !Text 
TxMetadataJsonSchemaError !Word64 !Value !TxMetadataJsonSchemaError 
TxMetadataRangeError !Word64 !Value !TxMetadataRangeError 

Instances

Instances details
Eq TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonError → TxMetadataJsonError → Bool #

(/=) ∷ TxMetadataJsonError → TxMetadataJsonError → Bool #

Show TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonError → ShowS #

show ∷ TxMetadataJsonError → String #

showList ∷ [TxMetadataJsonError] → ShowS #

Error TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonError → String Source #

data TxMetadataJsonSchemaError Source #

Constructors

TxMetadataJsonNullNotAllowed 
TxMetadataJsonBoolNotAllowed 
TxMetadataJsonNumberNotInteger !Double 
TxMetadataJsonNotObject !Value 
TxMetadataJsonBadObject ![(Text, Value)] 
TxMetadataJsonBadMapPair !Value 
TxMetadataJsonTypeMismatch !Text !Value 

Instances

Instances details
Eq TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonSchemaError → TxMetadataJsonSchemaError → Bool #

(/=) ∷ TxMetadataJsonSchemaError → TxMetadataJsonSchemaError → Bool #

Show TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonSchemaError → ShowS #

show ∷ TxMetadataJsonSchemaError → String #

showList ∷ [TxMetadataJsonSchemaError] → ShowS #

Error TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonSchemaError → String Source #

Internal conversion functions

toShelleyMetadata ∷ Map Word64 TxMetadataValue → Map Word64 Metadatum Source #

fromShelleyMetadata ∷ Map Word64 Metadatum → Map Word64 TxMetadataValue Source #

Shared parsing utils

parseAll ∷ Parser a → Text → Maybe a Source #

pUnsigned ∷ Parser Integer Source #

pSigned ∷ Parser Integer Source #

pBytes ∷ Parser ByteString Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + See TxMetadataJsonSchema for the details.

metadataValueToJsonNoSchema ∷ TxMetadataValue → Value Source #

data TxMetadataJsonError Source #

Constructors

TxMetadataJsonToplevelNotMap 
TxMetadataJsonToplevelBadKey !Text 
TxMetadataJsonSchemaError !Word64 !Value !TxMetadataJsonSchemaError 
TxMetadataRangeError !Word64 !Value !TxMetadataRangeError 

Instances

Instances details
Eq TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonError → TxMetadataJsonError → Bool #

(/=) ∷ TxMetadataJsonError → TxMetadataJsonError → Bool #

Show TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonError → ShowS #

show ∷ TxMetadataJsonError → String #

showList ∷ [TxMetadataJsonError] → ShowS #

Error TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonError → String Source #

data TxMetadataJsonSchemaError Source #

Constructors

TxMetadataJsonNullNotAllowed 
TxMetadataJsonBoolNotAllowed 
TxMetadataJsonNumberNotInteger !Double 
TxMetadataJsonNotObject !Value 
TxMetadataJsonBadObject ![(Text, Value)] 
TxMetadataJsonBadMapPair !Value 
TxMetadataJsonTypeMismatch !Text !Value 

Instances

Instances details
Eq TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonSchemaError → TxMetadataJsonSchemaError → Bool #

(/=) ∷ TxMetadataJsonSchemaError → TxMetadataJsonSchemaError → Bool #

Show TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonSchemaError → ShowS #

show ∷ TxMetadataJsonSchemaError → String #

showList ∷ [TxMetadataJsonSchemaError] → ShowS #

Error TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonSchemaError → String Source #

Internal conversion functions

toShelleyMetadata ∷ Map Word64 TxMetadataValue → Map Word64 Metadatum Source #

fromShelleyMetadata ∷ Map Word64 Metadatum → Map Word64 TxMetadataValue Source #

toShelleyMetadatum ∷ TxMetadataValue → Metadatum Source #

fromShelleyMetadatum ∷ Metadatum → TxMetadataValue Source #

Shared parsing utils

parseAll ∷ Parser a → Text → Maybe a Source #

pUnsigned ∷ Parser Integer Source #

pSigned ∷ Parser Integer Source #

pBytes ∷ Parser ByteString Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api-Value.html b/cardano-api/Cardano-Api-Value.html index 0419ea12796..0858cec1cd2 100644 --- a/cardano-api/Cardano-Api-Value.html +++ b/cardano-api/Cardano-Api-Value.html @@ -4,4 +4,4 @@ ignoring other assets.

Alternative nested representation

newtype ValueNestedRep Source #

An alternative nested representation for Value that groups assets that share a PolicyId.

Constructors

ValueNestedRep [ValueNestedBundle] 

Instances

Instances details
Eq ValueNestedRep Source # 
Instance details

Defined in Cardano.Api.Value

Methods

(==) ∷ ValueNestedRep → ValueNestedRep → Bool #

(/=) ∷ ValueNestedRep → ValueNestedRep → Bool #

Ord ValueNestedRep Source # 
Instance details

Defined in Cardano.Api.Value

Methods

compare ∷ ValueNestedRep → ValueNestedRep → Ordering #

(<) ∷ ValueNestedRep → ValueNestedRep → Bool #

(<=) ∷ ValueNestedRep → ValueNestedRep → Bool #

(>) ∷ ValueNestedRep → ValueNestedRep → Bool #

(>=) ∷ ValueNestedRep → ValueNestedRep → Bool #

max ∷ ValueNestedRep → ValueNestedRep → ValueNestedRep #

min ∷ ValueNestedRep → ValueNestedRep → ValueNestedRep #

Show ValueNestedRep Source # 
Instance details

Defined in Cardano.Api.Value

Methods

showsPrec ∷ Int → ValueNestedRep → ShowS #

show ∷ ValueNestedRep → String #

showList ∷ [ValueNestedRep] → ShowS #

FromJSON ValueNestedRep Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value → Parser ValueNestedRep #

parseJSONList ∷ Value → Parser [ValueNestedRep] #

ToJSON ValueNestedRep Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ ValueNestedRep → Value #

toEncoding ∷ ValueNestedRep → Encoding #

toJSONList ∷ [ValueNestedRep] → Value #

toEncodingList ∷ [ValueNestedRep] → Encoding #

data ValueNestedBundle Source #

A bundle within a ValueNestedRep for a single PolicyId, or for the special case of ada.

Constructors

ValueNestedBundleAda Quantity 
ValueNestedBundle PolicyId (Map AssetName Quantity) 

Instances

Instances details
Eq ValueNestedBundle Source # 
Instance details

Defined in Cardano.Api.Value

Methods

(==) ∷ ValueNestedBundle → ValueNestedBundle → Bool #

(/=) ∷ ValueNestedBundle → ValueNestedBundle → Bool #

Ord ValueNestedBundle Source # 
Instance details

Defined in Cardano.Api.Value

Methods

compare ∷ ValueNestedBundle → ValueNestedBundle → Ordering #

(<) ∷ ValueNestedBundle → ValueNestedBundle → Bool #

(<=) ∷ ValueNestedBundle → ValueNestedBundle → Bool #

(>) ∷ ValueNestedBundle → ValueNestedBundle → Bool #

(>=) ∷ ValueNestedBundle → ValueNestedBundle → Bool #

max ∷ ValueNestedBundle → ValueNestedBundle → ValueNestedBundle #

min ∷ ValueNestedBundle → ValueNestedBundle → ValueNestedBundle #

Show ValueNestedBundle Source # 
Instance details

Defined in Cardano.Api.Value

Methods

showsPrec ∷ Int → ValueNestedBundle → ShowS #

show ∷ ValueNestedBundle → String #

showList ∷ [ValueNestedBundle] → ShowS #

valueToNestedRep ∷ Value → ValueNestedRep Source #

valueFromNestedRep ∷ ValueNestedRep → Value Source #

Internal conversion functions

toByronLovelace ∷ Lovelace → Maybe Lovelace Source #

fromByronLovelace ∷ Lovelace → Lovelace Source #

toShelleyLovelace ∷ Lovelace → Coin Source #

fromShelleyLovelace ∷ Coin → Lovelace Source #

fromShelleyDeltaLovelace ∷ DeltaCoin → Lovelace Source #

toMaryValue ∷ Value → Value StandardCrypto Source #

fromMaryValue ∷ Value StandardCrypto → Value Source #

Data family instances

data family AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Instances

Instances details
data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra
data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra
data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra
data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra
data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra
data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope
data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata
data AsType StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakePoolKey = AsStakePoolKey
data AsType GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisUTxOKey = AsGenesisUTxOKey
data AsType GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey
data AsType GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisDelegateKey = AsGenesisDelegateKey
data AsType GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisExtendedKey = AsGenesisExtendedKey
data AsType GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType GenesisKey = AsGenesisKey
data AsType StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeExtendedKey = AsStakeExtendedKey
data AsType StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType StakeKey = AsStakeKey
data AsType PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentExtendedKey = AsPaymentExtendedKey
data AsType PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

data AsType PaymentKey = AsPaymentKey
data AsType ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

data AsType ScriptData = AsScriptData
data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash
data AsType ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptInAnyLang = AsScriptInAnyLang
data AsType SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV2 = AsSimpleScriptV2
data AsType SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

data AsType SimpleScriptV1 = AsSimpleScriptV1
data AsType ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKeyLegacy = AsByronKeyLegacy
data AsType ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

data AsType ByronKey = AsByronKey
data AsType ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronVote = AsByronVote
data AsType ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

data AsType ByronUpdateProposal = AsByronUpdateProposal
data AsType VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType VrfKey = AsVrfKey
data AsType KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

data AsType KesKey = AsKesKey
data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
data AsType StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

data AsType StakeAddress = AsStakeAddress
data AsType AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

data AsType AddressAny = AsAddressAny
data AsType ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ShelleyAddr = AsShelleyAddr
data AsType ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

data AsType ByronAddr = AsByronAddr
data AsType AssetName Source # 
Instance details

Defined in Cardano.Api.Value

data AsType AssetName = AsAssetName
data AsType PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

data AsType PolicyId = AsPolicyId
data AsType UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

data AsType UpdateProposal = AsUpdateProposal
data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate
data AsType TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType TxId = AsTxId
data AsType BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

data AsType BlockHeader = AsBlockHeader
data AsType OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter
data AsType OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

data AsType OperationalCertificate = AsOperationalCertificate
data AsType (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

data AsType (Hash a) = AsHash (AsType a)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)
data AsType (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (SigningKey a) = AsSigningKey (AsType a)
data AsType (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (PlutusScript lang) = AsPlutusScript (AsType lang)
data AsType (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (SimpleScript lang) = AsSimpleScript (AsType lang)
data AsType (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (ScriptInEra era) = AsScriptInEra (AsType era)
data AsType (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

data AsType (Script lang) = AsScript (AsType lang)
data AsType (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (AddressInEra era) = AsAddressInEra (AsType era)
data AsType (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

data AsType (Address addrtype) = AsAddress (AsType addrtype)
data AsType (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

data AsType (TxBody era) = AsTxBody (AsType era)
data AsType (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (KeyWitness era) = AsKeyWitness (AsType era)
data AsType (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

data AsType (Tx era) = AsTx (AsType era)
\ No newline at end of file diff --git a/cardano-api/Cardano-Api.html b/cardano-api/Cardano-Api.html index 09d6ed3cdea..db4658b0d9d 100644 --- a/cardano-api/Cardano-Api.html +++ b/cardano-api/Cardano-Api.html @@ -3,7 +3,7 @@ constructors that reveal any lower level types.

In the interest of simplicity it glosses over some details of the system. Most simple tools should be able to work just using this interface, however you can go deeper and expose the types from the underlying libraries - using Cardano.Api.Byron or Cardano.Api.Shelley.

Synopsis

Eras

data ByronEra Source #

A type used as a tag to distinguish the Byron era.

Instances

Instances details
HasTypeProxy ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ByronEra Source #

Methods

proxyToAsType ∷ Proxy ByronEra → AsType ByronEra Source #

IsCardanoEra ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

cardanoEra ∷ CardanoEra ByronEra Source #

data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra

data ShelleyEra Source #

A type used as a tag to distinguish the Shelley era.

Instances

Instances details
HasTypeProxy ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ShelleyEra Source #

Methods

proxyToAsType ∷ Proxy ShelleyEra → AsType ShelleyEra Source #

IsShelleyBasedEra ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

shelleyBasedEra ∷ ShelleyBasedEra ShelleyEra Source #

IsCardanoEra ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

cardanoEra ∷ CardanoEra ShelleyEra Source #

data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra

data AllegraEra Source #

A type used as a tag to distinguish the Allegra era.

Instances

Instances details
HasTypeProxy AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AllegraEra Source #

Methods

proxyToAsType ∷ Proxy AllegraEra → AsType AllegraEra Source #

IsShelleyBasedEra AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

shelleyBasedEra ∷ ShelleyBasedEra AllegraEra Source #

IsCardanoEra AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

cardanoEra ∷ CardanoEra AllegraEra Source #

data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra

data MaryEra Source #

A type used as a tag to distinguish the Mary era.

Instances

Instances details
HasTypeProxy MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType MaryEra Source #

Methods

proxyToAsType ∷ Proxy MaryEra → AsType MaryEra Source #

IsShelleyBasedEra MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

shelleyBasedEra ∷ ShelleyBasedEra MaryEra Source #

IsCardanoEra MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

cardanoEra ∷ CardanoEra MaryEra Source #

data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra

data AlonzoEra Source #

A type used as a tag to distingush the Alonzo era.

Instances

Instances details
HasTypeProxy AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AlonzoEra Source #

Methods

proxyToAsType ∷ Proxy AlonzoEra → AsType AlonzoEra Source #

IsShelleyBasedEra AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

shelleyBasedEra ∷ ShelleyBasedEra AlonzoEra Source #

IsCardanoEra AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

cardanoEra ∷ CardanoEra AlonzoEra Source #

data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra

data CardanoEra era where Source #

This GADT provides a value-level representation of all the Cardano eras. + using Cardano.Api.Byron or Cardano.Api.Shelley.

Synopsis

Eras

data ByronEra Source #

A type used as a tag to distinguish the Byron era.

Instances

Instances details
HasTypeProxy ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ByronEra Source #

Methods

proxyToAsType ∷ Proxy ByronEra → AsType ByronEra Source #

IsCardanoEra ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

cardanoEra ∷ CardanoEra ByronEra Source #

data AsType ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ByronEra = AsByronEra

data ShelleyEra Source #

A type used as a tag to distinguish the Shelley era.

Instances

Instances details
HasTypeProxy ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ShelleyEra Source #

Methods

proxyToAsType ∷ Proxy ShelleyEra → AsType ShelleyEra Source #

IsShelleyBasedEra ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

shelleyBasedEra ∷ ShelleyBasedEra ShelleyEra Source #

IsCardanoEra ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

cardanoEra ∷ CardanoEra ShelleyEra Source #

data AsType ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType ShelleyEra = AsShelleyEra

data AllegraEra Source #

A type used as a tag to distinguish the Allegra era.

Instances

Instances details
HasTypeProxy AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AllegraEra Source #

Methods

proxyToAsType ∷ Proxy AllegraEra → AsType AllegraEra Source #

IsShelleyBasedEra AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

shelleyBasedEra ∷ ShelleyBasedEra AllegraEra Source #

IsCardanoEra AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

cardanoEra ∷ CardanoEra AllegraEra Source #

data AsType AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AllegraEra = AsAllegraEra

data MaryEra Source #

A type used as a tag to distinguish the Mary era.

Instances

Instances details
HasTypeProxy MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType MaryEra Source #

Methods

proxyToAsType ∷ Proxy MaryEra → AsType MaryEra Source #

IsShelleyBasedEra MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

shelleyBasedEra ∷ ShelleyBasedEra MaryEra Source #

IsCardanoEra MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

cardanoEra ∷ CardanoEra MaryEra Source #

data AsType MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType MaryEra = AsMaryEra

data AlonzoEra Source #

A type used as a tag to distingush the Alonzo era.

Instances

Instances details
HasTypeProxy AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AlonzoEra Source #

Methods

proxyToAsType ∷ Proxy AlonzoEra → AsType AlonzoEra Source #

IsShelleyBasedEra AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

shelleyBasedEra ∷ ShelleyBasedEra AlonzoEra Source #

IsCardanoEra AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

cardanoEra ∷ CardanoEra AlonzoEra Source #

data AsType AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

data AsType AlonzoEra = AsAlonzoEra

data CardanoEra era where Source #

This GADT provides a value-level representation of all the Cardano eras. This enables pattern matching on the era to allow them to be treated in a non-uniform way.

This can be used in combination with the IsCardanoEra class to get access to this value.

In combination this can often enable code that handles all eras, and does @@ -25,7 +25,7 @@ the current Shelley-based eras.

This way of factoring the eras is useful because in many cases the major differences are between the Byron and Shelley-based eras, and the Shelley-based eras can often be treated uniformly.

Constructors

LegacyByronEra ∷ CardanoEraStyle ByronEra 
ShelleyBasedEra ∷ IsShelleyBasedEra era ⇒ ShelleyBasedEra era → CardanoEraStyle era 

Instances

Instances details
Eq (CardanoEraStyle era) Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

(==) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

(/=) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

Ord (CardanoEraStyle era) Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

compare ∷ CardanoEraStyle era → CardanoEraStyle era → Ordering #

(<) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

(<=) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

(>) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

(>=) ∷ CardanoEraStyle era → CardanoEraStyle era → Bool #

max ∷ CardanoEraStyle era → CardanoEraStyle era → CardanoEraStyle era #

min ∷ CardanoEraStyle era → CardanoEraStyle era → CardanoEraStyle era #

Show (CardanoEraStyle era) Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

showsPrec ∷ Int → CardanoEraStyle era → ShowS #

show ∷ CardanoEraStyle era → String #

showList ∷ [CardanoEraStyle era] → ShowS #

cardanoEraStyle ∷ CardanoEra era → CardanoEraStyle era Source #

The CardanoEraStyle for a CardanoEra.

Deprecated

type Byron = ByronEra Source #

Deprecated: Use ByronEra or ByronAddr as appropriate

type Shelley = ShelleyEra Source #

Deprecated: Use ShelleyEra or ShelleyAddr as appropriate

type Allegra = AllegraEra Source #

Deprecated: Use AllegraEra instead

type Mary = MaryEra Source #

Deprecated: Use MaryEra instead

Type tags

class HasTypeProxy t where Source #

Associated Types

data AsType t Source #

A family of singleton types used in this API to indicate which type to - use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Methods

proxyToAsType ∷ Proxy t → AsType t Source #

Instances

Instances details
HasTypeProxy AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AlonzoEra Source #

Methods

proxyToAsType ∷ Proxy AlonzoEra → AsType AlonzoEra Source #

HasTypeProxy MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType MaryEra Source #

Methods

proxyToAsType ∷ Proxy MaryEra → AsType MaryEra Source #

HasTypeProxy AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AllegraEra Source #

Methods

proxyToAsType ∷ Proxy AllegraEra → AsType AllegraEra Source #

HasTypeProxy ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ShelleyEra Source #

Methods

proxyToAsType ∷ Proxy ShelleyEra → AsType ShelleyEra Source #

HasTypeProxy ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ByronEra Source #

Methods

proxyToAsType ∷ Proxy ByronEra → AsType ByronEra Source #

HasTypeProxy TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Associated Types

data AsType TextEnvelope Source #

Methods

proxyToAsType ∷ Proxy TextEnvelope → AsType TextEnvelope Source #

HasTypeProxy TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Associated Types

data AsType TxMetadata Source #

Methods

proxyToAsType ∷ Proxy TxMetadata → AsType TxMetadata Source #

HasTypeProxy StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakePoolKey Source #

Methods

proxyToAsType ∷ Proxy StakePoolKey → AsType StakePoolKey Source #

HasTypeProxy GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisUTxOKey Source #

Methods

proxyToAsType ∷ Proxy GenesisUTxOKey → AsType GenesisUTxOKey Source #

HasTypeProxy GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisDelegateExtendedKey Source #

Methods

proxyToAsType ∷ Proxy GenesisDelegateExtendedKey → AsType GenesisDelegateExtendedKey Source #

HasTypeProxy GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisDelegateKey Source #

Methods

proxyToAsType ∷ Proxy GenesisDelegateKey → AsType GenesisDelegateKey Source #

HasTypeProxy GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisExtendedKey Source #

Methods

proxyToAsType ∷ Proxy GenesisExtendedKey → AsType GenesisExtendedKey Source #

HasTypeProxy GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisKey Source #

Methods

proxyToAsType ∷ Proxy GenesisKey → AsType GenesisKey Source #

HasTypeProxy StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakeExtendedKey Source #

Methods

proxyToAsType ∷ Proxy StakeExtendedKey → AsType StakeExtendedKey Source #

HasTypeProxy StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakeKey Source #

Methods

proxyToAsType ∷ Proxy StakeKey → AsType StakeKey Source #

HasTypeProxy PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType PaymentExtendedKey Source #

Methods

proxyToAsType ∷ Proxy PaymentExtendedKey → AsType PaymentExtendedKey Source #

HasTypeProxy PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType PaymentKey Source #

Methods

proxyToAsType ∷ Proxy PaymentKey → AsType PaymentKey Source #

HasTypeProxy ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

Associated Types

data AsType ScriptData Source #

Methods

proxyToAsType ∷ Proxy ScriptData → AsType ScriptData Source #

HasTypeProxy ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptHash Source #

Methods

proxyToAsType ∷ Proxy ScriptHash → AsType ScriptHash Source #

HasTypeProxy ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptInAnyLang Source #

Methods

proxyToAsType ∷ Proxy ScriptInAnyLang → AsType ScriptInAnyLang Source #

HasTypeProxy SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType SimpleScriptV2 Source #

Methods

proxyToAsType ∷ Proxy SimpleScriptV2 → AsType SimpleScriptV2 Source #

HasTypeProxy SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType SimpleScriptV1 Source #

Methods

proxyToAsType ∷ Proxy SimpleScriptV1 → AsType SimpleScriptV1 Source #

HasTypeProxy ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data AsType ByronKeyLegacy Source #

Methods

proxyToAsType ∷ Proxy ByronKeyLegacy → AsType ByronKeyLegacy Source #

HasTypeProxy ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data AsType ByronKey Source #

Methods

proxyToAsType ∷ Proxy ByronKey → AsType ByronKey Source #

HasTypeProxy ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Associated Types

data AsType ByronVote Source #

Methods

proxyToAsType ∷ Proxy ByronVote → AsType ByronVote Source #

HasTypeProxy ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Associated Types

data AsType ByronUpdateProposal Source #

Methods

proxyToAsType ∷ Proxy ByronUpdateProposal → AsType ByronUpdateProposal Source #

HasTypeProxy VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data AsType VrfKey Source #

Methods

proxyToAsType ∷ Proxy VrfKey → AsType VrfKey Source #

HasTypeProxy KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data AsType KesKey Source #

Methods

proxyToAsType ∷ Proxy KesKey → AsType KesKey Source #

HasTypeProxy StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Associated Types

data AsType StakePoolMetadata Source #

Methods

proxyToAsType ∷ Proxy StakePoolMetadata → AsType StakePoolMetadata Source #

HasTypeProxy StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType StakeAddress Source #

Methods

proxyToAsType ∷ Proxy StakeAddress → AsType StakeAddress Source #

HasTypeProxy AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType AddressAny Source #

Methods

proxyToAsType ∷ Proxy AddressAny → AsType AddressAny Source #

HasTypeProxy ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType ShelleyAddr Source #

Methods

proxyToAsType ∷ Proxy ShelleyAddr → AsType ShelleyAddr Source #

HasTypeProxy ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType ByronAddr Source #

Methods

proxyToAsType ∷ Proxy ByronAddr → AsType ByronAddr Source #

HasTypeProxy AssetName Source # 
Instance details

Defined in Cardano.Api.Value

Associated Types

data AsType AssetName Source #

Methods

proxyToAsType ∷ Proxy AssetName → AsType AssetName Source #

HasTypeProxy PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

Associated Types

data AsType PolicyId Source #

Methods

proxyToAsType ∷ Proxy PolicyId → AsType PolicyId Source #

HasTypeProxy UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Associated Types

data AsType UpdateProposal Source #

Methods

proxyToAsType ∷ Proxy UpdateProposal → AsType UpdateProposal Source #

HasTypeProxy Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Associated Types

data AsType Certificate Source #

Methods

proxyToAsType ∷ Proxy Certificate → AsType Certificate Source #

HasTypeProxy TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

data AsType TxId Source #

Methods

proxyToAsType ∷ Proxy TxId → AsType TxId Source #

HasTypeProxy BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

Associated Types

data AsType BlockHeader Source #

Methods

proxyToAsType ∷ Proxy BlockHeader → AsType BlockHeader Source #

HasTypeProxy OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Associated Types

data AsType OperationalCertificateIssueCounter Source #

Methods

proxyToAsType ∷ Proxy OperationalCertificateIssueCounter → AsType OperationalCertificateIssueCounter Source #

HasTypeProxy OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Associated Types

data AsType OperationalCertificate Source #

Methods

proxyToAsType ∷ Proxy OperationalCertificate → AsType OperationalCertificate Source #

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

HasTypeProxy a ⇒ HasTypeProxy (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (VerificationKey a) Source #

Methods

proxyToAsType ∷ Proxy (VerificationKey a) → AsType (VerificationKey a) Source #

HasTypeProxy a ⇒ HasTypeProxy (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (SigningKey a) Source #

Methods

proxyToAsType ∷ Proxy (SigningKey a) → AsType (SigningKey a) Source #

HasTypeProxy lang ⇒ HasTypeProxy (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (PlutusScript lang) Source #

Methods

proxyToAsType ∷ Proxy (PlutusScript lang) → AsType (PlutusScript lang) Source #

HasTypeProxy lang ⇒ HasTypeProxy (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (SimpleScript lang) Source #

Methods

proxyToAsType ∷ Proxy (SimpleScript lang) → AsType (SimpleScript lang) Source #

HasTypeProxy era ⇒ HasTypeProxy (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (ScriptInEra era) Source #

Methods

proxyToAsType ∷ Proxy (ScriptInEra era) → AsType (ScriptInEra era) Source #

HasTypeProxy lang ⇒ HasTypeProxy (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (Script lang) Source #

Methods

proxyToAsType ∷ Proxy (Script lang) → AsType (Script lang) Source #

HasTypeProxy era ⇒ HasTypeProxy (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType (AddressInEra era) Source #

Methods

proxyToAsType ∷ Proxy (AddressInEra era) → AsType (AddressInEra era) Source #

HasTypeProxy addrtype ⇒ HasTypeProxy (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType (Address addrtype) Source #

Methods

proxyToAsType ∷ Proxy (Address addrtype) → AsType (Address addrtype) Source #

HasTypeProxy era ⇒ HasTypeProxy (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

data AsType (TxBody era) Source #

Methods

proxyToAsType ∷ Proxy (TxBody era) → AsType (TxBody era) Source #

HasTypeProxy era ⇒ HasTypeProxy (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (KeyWitness era) Source #

Methods

proxyToAsType ∷ Proxy (KeyWitness era) → AsType (KeyWitness era) Source #

HasTypeProxy era ⇒ HasTypeProxy (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (Tx era) Source #

Methods

proxyToAsType ∷ Proxy (Tx era) → AsType (Tx era) Source #

Cryptographic key interface

class (Eq (VerificationKey keyrole), Show (VerificationKey keyrole), SerialiseAsRawBytes (Hash keyrole), HasTextEnvelope (VerificationKey keyrole), HasTextEnvelope (SigningKey keyrole)) ⇒ Key keyrole Source #

An interface for cryptographic keys used for signatures with a SigningKey + use where it would otherwise be ambiguous or merely unclear.

Values of this type are passed to deserialisation functions for example.

Methods

proxyToAsType ∷ Proxy t → AsType t Source #

Instances

Instances details
HasTypeProxy AlonzoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AlonzoEra Source #

Methods

proxyToAsType ∷ Proxy AlonzoEra → AsType AlonzoEra Source #

HasTypeProxy MaryEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType MaryEra Source #

Methods

proxyToAsType ∷ Proxy MaryEra → AsType MaryEra Source #

HasTypeProxy AllegraEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType AllegraEra Source #

Methods

proxyToAsType ∷ Proxy AllegraEra → AsType AllegraEra Source #

HasTypeProxy ShelleyEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ShelleyEra Source #

Methods

proxyToAsType ∷ Proxy ShelleyEra → AsType ShelleyEra Source #

HasTypeProxy ByronEra Source # 
Instance details

Defined in Cardano.Api.Eras

Associated Types

data AsType ByronEra Source #

Methods

proxyToAsType ∷ Proxy ByronEra → AsType ByronEra Source #

HasTypeProxy TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Associated Types

data AsType TextEnvelope Source #

Methods

proxyToAsType ∷ Proxy TextEnvelope → AsType TextEnvelope Source #

HasTypeProxy TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Associated Types

data AsType TxMetadata Source #

Methods

proxyToAsType ∷ Proxy TxMetadata → AsType TxMetadata Source #

HasTypeProxy StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakePoolKey Source #

Methods

proxyToAsType ∷ Proxy StakePoolKey → AsType StakePoolKey Source #

HasTypeProxy GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisUTxOKey Source #

Methods

proxyToAsType ∷ Proxy GenesisUTxOKey → AsType GenesisUTxOKey Source #

HasTypeProxy GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisDelegateExtendedKey Source #

Methods

proxyToAsType ∷ Proxy GenesisDelegateExtendedKey → AsType GenesisDelegateExtendedKey Source #

HasTypeProxy GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisDelegateKey Source #

Methods

proxyToAsType ∷ Proxy GenesisDelegateKey → AsType GenesisDelegateKey Source #

HasTypeProxy GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisExtendedKey Source #

Methods

proxyToAsType ∷ Proxy GenesisExtendedKey → AsType GenesisExtendedKey Source #

HasTypeProxy GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType GenesisKey Source #

Methods

proxyToAsType ∷ Proxy GenesisKey → AsType GenesisKey Source #

HasTypeProxy StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakeExtendedKey Source #

Methods

proxyToAsType ∷ Proxy StakeExtendedKey → AsType StakeExtendedKey Source #

HasTypeProxy StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType StakeKey Source #

Methods

proxyToAsType ∷ Proxy StakeKey → AsType StakeKey Source #

HasTypeProxy PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType PaymentExtendedKey Source #

Methods

proxyToAsType ∷ Proxy PaymentExtendedKey → AsType PaymentExtendedKey Source #

HasTypeProxy PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data AsType PaymentKey Source #

Methods

proxyToAsType ∷ Proxy PaymentKey → AsType PaymentKey Source #

HasTypeProxy ScriptData Source # 
Instance details

Defined in Cardano.Api.ScriptData

Associated Types

data AsType ScriptData Source #

Methods

proxyToAsType ∷ Proxy ScriptData → AsType ScriptData Source #

HasTypeProxy ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptHash Source #

Methods

proxyToAsType ∷ Proxy ScriptHash → AsType ScriptHash Source #

HasTypeProxy ScriptInAnyLang Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptInAnyLang Source #

Methods

proxyToAsType ∷ Proxy ScriptInAnyLang → AsType ScriptInAnyLang Source #

HasTypeProxy SimpleScriptV2 Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType SimpleScriptV2 Source #

Methods

proxyToAsType ∷ Proxy SimpleScriptV2 → AsType SimpleScriptV2 Source #

HasTypeProxy SimpleScriptV1 Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType SimpleScriptV1 Source #

Methods

proxyToAsType ∷ Proxy SimpleScriptV1 → AsType SimpleScriptV1 Source #

HasTypeProxy ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data AsType ByronKeyLegacy Source #

Methods

proxyToAsType ∷ Proxy ByronKeyLegacy → AsType ByronKeyLegacy Source #

HasTypeProxy ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data AsType ByronKey Source #

Methods

proxyToAsType ∷ Proxy ByronKey → AsType ByronKey Source #

HasTypeProxy ByronVote Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Associated Types

data AsType ByronVote Source #

Methods

proxyToAsType ∷ Proxy ByronVote → AsType ByronVote Source #

HasTypeProxy ByronUpdateProposal Source # 
Instance details

Defined in Cardano.Api.SpecialByron

Associated Types

data AsType ByronUpdateProposal Source #

Methods

proxyToAsType ∷ Proxy ByronUpdateProposal → AsType ByronUpdateProposal Source #

HasTypeProxy VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data AsType VrfKey Source #

Methods

proxyToAsType ∷ Proxy VrfKey → AsType VrfKey Source #

HasTypeProxy KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data AsType KesKey Source #

Methods

proxyToAsType ∷ Proxy KesKey → AsType KesKey Source #

HasTypeProxy StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Associated Types

data AsType StakePoolMetadata Source #

Methods

proxyToAsType ∷ Proxy StakePoolMetadata → AsType StakePoolMetadata Source #

HasTypeProxy StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType StakeAddress Source #

Methods

proxyToAsType ∷ Proxy StakeAddress → AsType StakeAddress Source #

HasTypeProxy AddressAny Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType AddressAny Source #

Methods

proxyToAsType ∷ Proxy AddressAny → AsType AddressAny Source #

HasTypeProxy ShelleyAddr Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType ShelleyAddr Source #

Methods

proxyToAsType ∷ Proxy ShelleyAddr → AsType ShelleyAddr Source #

HasTypeProxy ByronAddr Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType ByronAddr Source #

Methods

proxyToAsType ∷ Proxy ByronAddr → AsType ByronAddr Source #

HasTypeProxy AssetName Source # 
Instance details

Defined in Cardano.Api.Value

Associated Types

data AsType AssetName Source #

Methods

proxyToAsType ∷ Proxy AssetName → AsType AssetName Source #

HasTypeProxy PolicyId Source # 
Instance details

Defined in Cardano.Api.Value

Associated Types

data AsType PolicyId Source #

Methods

proxyToAsType ∷ Proxy PolicyId → AsType PolicyId Source #

HasTypeProxy UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Associated Types

data AsType UpdateProposal Source #

Methods

proxyToAsType ∷ Proxy UpdateProposal → AsType UpdateProposal Source #

HasTypeProxy Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Associated Types

data AsType Certificate Source #

Methods

proxyToAsType ∷ Proxy Certificate → AsType Certificate Source #

HasTypeProxy TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

data AsType TxId Source #

Methods

proxyToAsType ∷ Proxy TxId → AsType TxId Source #

HasTypeProxy BlockHeader Source # 
Instance details

Defined in Cardano.Api.Block

Associated Types

data AsType BlockHeader Source #

Methods

proxyToAsType ∷ Proxy BlockHeader → AsType BlockHeader Source #

HasTypeProxy OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Associated Types

data AsType OperationalCertificateIssueCounter Source #

Methods

proxyToAsType ∷ Proxy OperationalCertificateIssueCounter → AsType OperationalCertificateIssueCounter Source #

HasTypeProxy OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Associated Types

data AsType OperationalCertificate Source #

Methods

proxyToAsType ∷ Proxy OperationalCertificate → AsType OperationalCertificate Source #

HasTypeProxy a ⇒ HasTypeProxy (Hash a) Source # 
Instance details

Defined in Cardano.Api.Hash

Associated Types

data AsType (Hash a) Source #

Methods

proxyToAsType ∷ Proxy (Hash a) → AsType (Hash a) Source #

HasTypeProxy a ⇒ HasTypeProxy (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (VerificationKey a) Source #

Methods

proxyToAsType ∷ Proxy (VerificationKey a) → AsType (VerificationKey a) Source #

HasTypeProxy a ⇒ HasTypeProxy (SigningKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (SigningKey a) Source #

Methods

proxyToAsType ∷ Proxy (SigningKey a) → AsType (SigningKey a) Source #

HasTypeProxy lang ⇒ HasTypeProxy (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (PlutusScript lang) Source #

Methods

proxyToAsType ∷ Proxy (PlutusScript lang) → AsType (PlutusScript lang) Source #

HasTypeProxy lang ⇒ HasTypeProxy (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (SimpleScript lang) Source #

Methods

proxyToAsType ∷ Proxy (SimpleScript lang) → AsType (SimpleScript lang) Source #

HasTypeProxy era ⇒ HasTypeProxy (ScriptInEra era) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (ScriptInEra era) Source #

Methods

proxyToAsType ∷ Proxy (ScriptInEra era) → AsType (ScriptInEra era) Source #

HasTypeProxy lang ⇒ HasTypeProxy (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType (Script lang) Source #

Methods

proxyToAsType ∷ Proxy (Script lang) → AsType (Script lang) Source #

HasTypeProxy era ⇒ HasTypeProxy (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType (AddressInEra era) Source #

Methods

proxyToAsType ∷ Proxy (AddressInEra era) → AsType (AddressInEra era) Source #

HasTypeProxy addrtype ⇒ HasTypeProxy (Address addrtype) Source # 
Instance details

Defined in Cardano.Api.Address

Associated Types

data AsType (Address addrtype) Source #

Methods

proxyToAsType ∷ Proxy (Address addrtype) → AsType (Address addrtype) Source #

HasTypeProxy era ⇒ HasTypeProxy (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Associated Types

data AsType (TxBody era) Source #

Methods

proxyToAsType ∷ Proxy (TxBody era) → AsType (TxBody era) Source #

HasTypeProxy era ⇒ HasTypeProxy (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (KeyWitness era) Source #

Methods

proxyToAsType ∷ Proxy (KeyWitness era) → AsType (KeyWitness era) Source #

HasTypeProxy era ⇒ HasTypeProxy (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Associated Types

data AsType (Tx era) Source #

Methods

proxyToAsType ∷ Proxy (Tx era) → AsType (Tx era) Source #

Cryptographic key interface

class (Eq (VerificationKey keyrole), Show (VerificationKey keyrole), SerialiseAsRawBytes (Hash keyrole), HasTextEnvelope (VerificationKey keyrole), HasTextEnvelope (SigningKey keyrole)) ⇒ Key keyrole Source #

An interface for cryptographic keys used for signatures with a SigningKey and a VerificationKey key.

This interface does not provide actual signing or verifying functions since this API is concerned with the management of keys: generating and serialising.

Minimal complete definition

getVerificationKey, deterministicSigningKey, deterministicSigningKeySeedSize, verificationKeyHash

Instances

Instances details
Key StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey StakePoolKey Source #

data SigningKey StakePoolKey Source #

Methods

getVerificationKey ∷ SigningKey StakePoolKey → VerificationKey StakePoolKey Source #

deterministicSigningKey ∷ AsType StakePoolKey → Seed → SigningKey StakePoolKey Source #

deterministicSigningKeySeedSize ∷ AsType StakePoolKey → Word Source #

verificationKeyHash ∷ VerificationKey StakePoolKey → Hash StakePoolKey Source #

Key GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisUTxOKey Source #

data SigningKey GenesisUTxOKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisUTxOKey → VerificationKey GenesisUTxOKey Source #

deterministicSigningKey ∷ AsType GenesisUTxOKey → Seed → SigningKey GenesisUTxOKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisUTxOKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisUTxOKey → Hash GenesisUTxOKey Source #

Key GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisDelegateExtendedKey Source #

data SigningKey GenesisDelegateExtendedKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey Source #

deterministicSigningKey ∷ AsType GenesisDelegateExtendedKey → Seed → SigningKey GenesisDelegateExtendedKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisDelegateExtendedKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisDelegateExtendedKey → Hash GenesisDelegateExtendedKey Source #

Key GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisDelegateKey Source #

data SigningKey GenesisDelegateKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisDelegateKey → VerificationKey GenesisDelegateKey Source #

deterministicSigningKey ∷ AsType GenesisDelegateKey → Seed → SigningKey GenesisDelegateKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisDelegateKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisDelegateKey → Hash GenesisDelegateKey Source #

Key GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisExtendedKey Source #

data SigningKey GenesisExtendedKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisExtendedKey → VerificationKey GenesisExtendedKey Source #

deterministicSigningKey ∷ AsType GenesisExtendedKey → Seed → SigningKey GenesisExtendedKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisExtendedKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisExtendedKey → Hash GenesisExtendedKey Source #

Key GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey GenesisKey Source #

data SigningKey GenesisKey Source #

Methods

getVerificationKey ∷ SigningKey GenesisKey → VerificationKey GenesisKey Source #

deterministicSigningKey ∷ AsType GenesisKey → Seed → SigningKey GenesisKey Source #

deterministicSigningKeySeedSize ∷ AsType GenesisKey → Word Source #

verificationKeyHash ∷ VerificationKey GenesisKey → Hash GenesisKey Source #

Key StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey StakeExtendedKey Source #

data SigningKey StakeExtendedKey Source #

Methods

getVerificationKey ∷ SigningKey StakeExtendedKey → VerificationKey StakeExtendedKey Source #

deterministicSigningKey ∷ AsType StakeExtendedKey → Seed → SigningKey StakeExtendedKey Source #

deterministicSigningKeySeedSize ∷ AsType StakeExtendedKey → Word Source #

verificationKeyHash ∷ VerificationKey StakeExtendedKey → Hash StakeExtendedKey Source #

Key StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey StakeKey Source #

data SigningKey StakeKey Source #

Methods

getVerificationKey ∷ SigningKey StakeKey → VerificationKey StakeKey Source #

deterministicSigningKey ∷ AsType StakeKey → Seed → SigningKey StakeKey Source #

deterministicSigningKeySeedSize ∷ AsType StakeKey → Word Source #

verificationKeyHash ∷ VerificationKey StakeKey → Hash StakeKey Source #

Key PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey PaymentExtendedKey Source #

data SigningKey PaymentExtendedKey Source #

Methods

getVerificationKey ∷ SigningKey PaymentExtendedKey → VerificationKey PaymentExtendedKey Source #

deterministicSigningKey ∷ AsType PaymentExtendedKey → Seed → SigningKey PaymentExtendedKey Source #

deterministicSigningKeySeedSize ∷ AsType PaymentExtendedKey → Word Source #

verificationKeyHash ∷ VerificationKey PaymentExtendedKey → Hash PaymentExtendedKey Source #

Key PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Associated Types

data VerificationKey PaymentKey Source #

data SigningKey PaymentKey Source #

Methods

getVerificationKey ∷ SigningKey PaymentKey → VerificationKey PaymentKey Source #

deterministicSigningKey ∷ AsType PaymentKey → Seed → SigningKey PaymentKey Source #

deterministicSigningKeySeedSize ∷ AsType PaymentKey → Word Source #

verificationKeyHash ∷ VerificationKey PaymentKey → Hash PaymentKey Source #

Key ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data VerificationKey ByronKeyLegacy Source #

data SigningKey ByronKeyLegacy Source #

Methods

getVerificationKey ∷ SigningKey ByronKeyLegacy → VerificationKey ByronKeyLegacy Source #

deterministicSigningKey ∷ AsType ByronKeyLegacy → Seed → SigningKey ByronKeyLegacy Source #

deterministicSigningKeySeedSize ∷ AsType ByronKeyLegacy → Word Source #

verificationKeyHash ∷ VerificationKey ByronKeyLegacy → Hash ByronKeyLegacy Source #

Key ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

Associated Types

data VerificationKey ByronKey Source #

data SigningKey ByronKey Source #

Methods

getVerificationKey ∷ SigningKey ByronKey → VerificationKey ByronKey Source #

deterministicSigningKey ∷ AsType ByronKey → Seed → SigningKey ByronKey Source #

deterministicSigningKeySeedSize ∷ AsType ByronKey → Word Source #

verificationKeyHash ∷ VerificationKey ByronKey → Hash ByronKey Source #

Key VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data VerificationKey VrfKey Source #

data SigningKey VrfKey Source #

Methods

getVerificationKey ∷ SigningKey VrfKey → VerificationKey VrfKey Source #

deterministicSigningKey ∷ AsType VrfKey → Seed → SigningKey VrfKey Source #

deterministicSigningKeySeedSize ∷ AsType VrfKey → Word Source #

verificationKeyHash ∷ VerificationKey VrfKey → Hash VrfKey Source #

Key KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Associated Types

data VerificationKey KesKey Source #

data SigningKey KesKey Source #

Methods

getVerificationKey ∷ SigningKey KesKey → VerificationKey KesKey Source #

deterministicSigningKey ∷ AsType KesKey → Seed → SigningKey KesKey Source #

deterministicSigningKeySeedSize ∷ AsType KesKey → Word Source #

verificationKeyHash ∷ VerificationKey KesKey → Hash KesKey Source #

data family VerificationKey keyrole ∷ Type Source #

The type of cryptographic verification key, for each key role.

Instances

Instances details
Eq (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

(/=) ∷ VerificationKey StakePoolKey → VerificationKey StakePoolKey → Bool #

Eq (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

(/=) ∷ VerificationKey GenesisUTxOKey → VerificationKey GenesisUTxOKey → Bool #

Eq (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateExtendedKey → VerificationKey GenesisDelegateExtendedKey → Bool #

Eq (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

(/=) ∷ VerificationKey GenesisDelegateKey → VerificationKey GenesisDelegateKey → Bool #

Eq (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

(/=) ∷ VerificationKey GenesisExtendedKey → VerificationKey GenesisExtendedKey → Bool #

Eq (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

(/=) ∷ VerificationKey GenesisKey → VerificationKey GenesisKey → Bool #

Eq (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

(/=) ∷ VerificationKey StakeExtendedKey → VerificationKey StakeExtendedKey → Bool #

Eq (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

(/=) ∷ VerificationKey StakeKey → VerificationKey StakeKey → Bool #

Eq (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

(/=) ∷ VerificationKey PaymentExtendedKey → VerificationKey PaymentExtendedKey → Bool #

Eq (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

(==) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

(/=) ∷ VerificationKey PaymentKey → VerificationKey PaymentKey → Bool #

Eq (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

(/=) ∷ VerificationKey ByronKeyLegacy → VerificationKey ByronKeyLegacy → Bool #

Eq (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

(==) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

(/=) ∷ VerificationKey ByronKey → VerificationKey ByronKey → Bool #

Eq (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

(/=) ∷ VerificationKey VrfKey → VerificationKey VrfKey → Bool #

Eq (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

(==) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

(/=) ∷ VerificationKey KesKey → VerificationKey KesKey → Bool #

Show (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakePoolKey → ShowS #

show ∷ VerificationKey StakePoolKey → String #

showList ∷ [VerificationKey StakePoolKey] → ShowS #

Show (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisUTxOKey → ShowS #

show ∷ VerificationKey GenesisUTxOKey → String #

showList ∷ [VerificationKey GenesisUTxOKey] → ShowS #

Show (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateExtendedKey → ShowS #

show ∷ VerificationKey GenesisDelegateExtendedKey → String #

showList ∷ [VerificationKey GenesisDelegateExtendedKey] → ShowS #

Show (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisDelegateKey → ShowS #

show ∷ VerificationKey GenesisDelegateKey → String #

showList ∷ [VerificationKey GenesisDelegateKey] → ShowS #

Show (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisExtendedKey → ShowS #

show ∷ VerificationKey GenesisExtendedKey → String #

showList ∷ [VerificationKey GenesisExtendedKey] → ShowS #

Show (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey GenesisKey → ShowS #

show ∷ VerificationKey GenesisKey → String #

showList ∷ [VerificationKey GenesisKey] → ShowS #

Show (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeExtendedKey → ShowS #

show ∷ VerificationKey StakeExtendedKey → String #

showList ∷ [VerificationKey StakeExtendedKey] → ShowS #

Show (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey StakeKey → ShowS #

show ∷ VerificationKey StakeKey → String #

showList ∷ [VerificationKey StakeKey] → ShowS #

Show (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentExtendedKey → ShowS #

show ∷ VerificationKey PaymentExtendedKey → String #

showList ∷ [VerificationKey PaymentExtendedKey] → ShowS #

Show (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

showsPrec ∷ Int → VerificationKey PaymentKey → ShowS #

show ∷ VerificationKey PaymentKey → String #

showList ∷ [VerificationKey PaymentKey] → ShowS #

Show (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKeyLegacy → ShowS #

show ∷ VerificationKey ByronKeyLegacy → String #

showList ∷ [VerificationKey ByronKeyLegacy] → ShowS #

Show (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

showsPrec ∷ Int → VerificationKey ByronKey → ShowS #

show ∷ VerificationKey ByronKey → String #

showList ∷ [VerificationKey ByronKey] → ShowS #

Show (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey VrfKey → ShowS #

show ∷ VerificationKey VrfKey → String #

showList ∷ [VerificationKey VrfKey] → ShowS #

Show (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

showsPrec ∷ Int → VerificationKey KesKey → ShowS #

show ∷ VerificationKey KesKey → String #

showList ∷ [VerificationKey KesKey] → ShowS #

IsString (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakePoolKey #

IsString (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisUTxOKey #

IsString (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateExtendedKey #

IsString (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisDelegateKey #

IsString (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisExtendedKey #

IsString (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey GenesisKey #

IsString (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeExtendedKey #

IsString (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey StakeKey #

IsString (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentExtendedKey #

IsString (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromString ∷ String → VerificationKey PaymentKey #

IsString (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKeyLegacy #

IsString (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromString ∷ String → VerificationKey ByronKey #

IsString (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey VrfKey #

IsString (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromString ∷ String → VerificationKey KesKey #

FromCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakePoolKey) #

label ∷ Proxy (VerificationKey StakePoolKey) → Text #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateKey) #

label ∷ Proxy (VerificationKey GenesisDelegateKey) → Text #

FromCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisExtendedKey) #

label ∷ Proxy (VerificationKey GenesisExtendedKey) → Text #

FromCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisKey) #

label ∷ Proxy (VerificationKey GenesisKey) → Text #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeKey) #

label ∷ Proxy (VerificationKey StakeKey) → Text #

FromCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentExtendedKey) #

label ∷ Proxy (VerificationKey PaymentExtendedKey) → Text #

FromCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentKey) #

label ∷ Proxy (VerificationKey PaymentKey) → Text #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

ToCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakePoolKey] → Size #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateKey] → Size #

ToCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisExtendedKey] → Size #

ToCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisKey] → Size #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeKey] → Size #

ToCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentExtendedKey] → Size #

ToCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentKey] → Size #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

HasTypeProxy a ⇒ HasTypeProxy (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

Associated Types

data AsType (VerificationKey a) Source #

Methods

proxyToAsType ∷ Proxy (VerificationKey a) → AsType (VerificationKey a) Source #

SerialiseAsCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakePoolKey) → ByteString → Either DecoderError (VerificationKey StakePoolKey) Source #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateKey) Source #

SerialiseAsCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisKey) → ByteString → Either DecoderError (VerificationKey GenesisKey) Source #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeKey) → ByteString → Either DecoderError (VerificationKey StakeKey) Source #

SerialiseAsCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Either DecoderError (VerificationKey PaymentExtendedKey) Source #

SerialiseAsCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentKey) → ByteString → Either DecoderError (VerificationKey PaymentKey) Source #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsRawBytes (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakePoolKey) → ByteString → Maybe (VerificationKey StakePoolKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Maybe (VerificationKey GenesisUTxOKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Maybe (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Maybe (VerificationKey GenesisDelegateKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Maybe (VerificationKey GenesisExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey GenesisKey) → ByteString → Maybe (VerificationKey GenesisKey) Source #

SerialiseAsRawBytes (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Maybe (VerificationKey StakeExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey StakeKey) → ByteString → Maybe (VerificationKey StakeKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Maybe (VerificationKey PaymentExtendedKey) Source #

SerialiseAsRawBytes (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToRawBytes ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey PaymentKey) → ByteString → Maybe (VerificationKey PaymentKey) Source #

SerialiseAsRawBytes (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Maybe (VerificationKey ByronKeyLegacy) Source #

SerialiseAsRawBytes (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToRawBytes ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey ByronKey) → ByteString → Maybe (VerificationKey ByronKey) Source #

SerialiseAsRawBytes (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey VrfKey) → ByteString → Maybe (VerificationKey VrfKey) Source #

SerialiseAsRawBytes (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToRawBytes ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromRawBytes ∷ AsType (VerificationKey KesKey) → ByteString → Maybe (VerificationKey KesKey) Source #

HasTextEnvelope (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakePoolKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakePoolKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisUTxOKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisUTxOKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisDelegateKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisDelegateKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey GenesisKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey GenesisKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey StakeKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey StakeKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentExtendedKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentExtendedKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

textEnvelopeType ∷ AsType (VerificationKey PaymentKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey PaymentKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKeyLegacy) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKeyLegacy → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

textEnvelopeType ∷ AsType (VerificationKey ByronKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey ByronKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey VrfKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey VrfKey → TextEnvelopeDescr Source #

HasTextEnvelope (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

textEnvelopeType ∷ AsType (VerificationKey KesKey) → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ VerificationKey KesKey → TextEnvelopeDescr Source #

SerialiseAsBech32 (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey VrfKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey KesKey) → [Text] Source #

newtype VerificationKey StakePoolKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakePoolKey = StakePoolVerificationKey (VKey 'StakePool StandardCrypto)
newtype VerificationKey GenesisUTxOKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisUTxOKey = GenesisUTxOVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey GenesisDelegateExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateExtendedKey = GenesisDelegateExtendedVerificationKey XPub
newtype VerificationKey GenesisDelegateKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisDelegateKey = GenesisDelegateVerificationKey (VKey 'GenesisDelegate StandardCrypto)
newtype VerificationKey GenesisExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisExtendedKey = GenesisExtendedVerificationKey XPub
newtype VerificationKey GenesisKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey GenesisKey = GenesisVerificationKey (VKey 'Genesis StandardCrypto)
newtype VerificationKey StakeExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeExtendedKey = StakeExtendedVerificationKey XPub
newtype VerificationKey StakeKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey StakeKey = StakeVerificationKey (VKey 'Staking StandardCrypto)
newtype VerificationKey PaymentExtendedKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentExtendedKey = PaymentExtendedVerificationKey XPub
newtype VerificationKey PaymentKey Source # 
Instance details

Defined in Cardano.Api.KeysShelley

newtype VerificationKey PaymentKey = PaymentVerificationKey (VKey 'Payment StandardCrypto)
newtype VerificationKey ByronKeyLegacy Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKeyLegacy = ByronVerificationKeyLegacy VerificationKey
newtype VerificationKey ByronKey Source # 
Instance details

Defined in Cardano.Api.KeysByron

newtype VerificationKey ByronKey = ByronVerificationKey VerificationKey
newtype VerificationKey VrfKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey VrfKey = VrfVerificationKey (VerKeyVRF StandardCrypto)
newtype VerificationKey KesKey Source # 
Instance details

Defined in Cardano.Api.KeysPraos

newtype VerificationKey KesKey = KesVerificationKey (VerKeyKES StandardCrypto)
data AsType (VerificationKey a) Source # 
Instance details

Defined in Cardano.Api.Key

data AsType (VerificationKey a) = AsVerificationKey (AsType a)

getVerificationKey ∷ Key keyrole ⇒ SigningKey keyrole → VerificationKey keyrole Source #

Get the corresponding verification key from a signing key.

verificationKeyHash ∷ Key keyrole ⇒ VerificationKey keyrole → Hash keyrole Source #

castVerificationKey ∷ CastVerificationKeyRole keyroleA keyroleB ⇒ VerificationKey keyroleA → VerificationKey keyroleB Source #

Change the role of a VerificationKey, if the representation permits.

castSigningKey ∷ CastSigningKeyRole keyroleA keyroleB ⇒ SigningKey keyroleA → SigningKey keyroleB Source #

Change the role of a SigningKey, if the representation permits.

Generating keys

generateSigningKey ∷ Key keyrole ⇒ AsType keyrole → IO (SigningKey keyrole) Source #

Generate a SigningKey using a seed from operating system entropy.

deterministicSigningKey ∷ Key keyrole ⇒ AsType keyrole → Seed → SigningKey keyrole Source #

Generate a SigningKey deterministically, given a Seed. The @@ -100,11 +100,11 @@ base transaction, plus the numbers of the additional components of the transaction that may be added.

So for example with wallet coin selection, the base transaction should contain all the things not subject to coin selection (such as script inputs, - metadata, withdrawals, certs etc)

Transaction metadata

Embedding additional structured data within transactions.

newtype TxMetadata Source #

Constructors

TxMetadata (Map Word64 TxMetadataValue) 

Instances

Instances details
Eq TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadata → TxMetadata → Bool #

(/=) ∷ TxMetadata → TxMetadata → Bool #

Show TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadata → ShowS #

show ∷ TxMetadata → String #

showList ∷ [TxMetadata] → ShowS #

Semigroup TxMetadata Source #

Merge metadata maps. When there are clashing entries the left hand side - takes precedence.

Instance details

Defined in Cardano.Api.TxMetadata

Methods

(<>) ∷ TxMetadata → TxMetadata → TxMetadata #

sconcat ∷ NonEmpty TxMetadata → TxMetadata #

stimes ∷ Integral b ⇒ b → TxMetadata → TxMetadata #

Monoid TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

mempty ∷ TxMetadata #

mappend ∷ TxMetadata → TxMetadata → TxMetadata #

mconcat ∷ [TxMetadata] → TxMetadata #

HasTypeProxy TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Associated Types

data AsType TxMetadata Source #

Methods

proxyToAsType ∷ Proxy TxMetadata → AsType TxMetadata Source #

SerialiseAsCBOR TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

serialiseToCBOR ∷ TxMetadata → ByteString Source #

deserialiseFromCBOR ∷ AsType TxMetadata → ByteString → Either DecoderError TxMetadata Source #

data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata

Constructing metadata

data TxMetadataValue Source #

Constructors

TxMetaNumber Integer 
TxMetaBytes ByteString 
TxMetaText Text 
TxMetaList [TxMetadataValue] 
TxMetaMap [(TxMetadataValue, TxMetadataValue)] 

Instances

Instances details
Eq TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataValue → TxMetadataValue → Bool #

(/=) ∷ TxMetadataValue → TxMetadataValue → Bool #

Ord TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

compare ∷ TxMetadataValue → TxMetadataValue → Ordering #

(<) ∷ TxMetadataValue → TxMetadataValue → Bool #

(<=) ∷ TxMetadataValue → TxMetadataValue → Bool #

(>) ∷ TxMetadataValue → TxMetadataValue → Bool #

(>=) ∷ TxMetadataValue → TxMetadataValue → Bool #

max ∷ TxMetadataValue → TxMetadataValue → TxMetadataValue #

min ∷ TxMetadataValue → TxMetadataValue → TxMetadataValue #

Show TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataValue → ShowS #

show ∷ TxMetadataValue → String #

showList ∷ [TxMetadataValue] → ShowS #

makeTransactionMetadata ∷ Map Word64 TxMetadataValue → TxMetadata Source #

Validating metadata

validateTxMetadata ∷ TxMetadata → Either [(Word64, TxMetadataRangeError)] () Source #

Validate transaction metadata. This is for use with existing constructed + metadata, withdrawals, certs etc)

Transaction metadata

Embedding additional structured data within transactions.

newtype TxMetadata Source #

Constructors

TxMetadata (Map Word64 TxMetadataValue) 

Instances

Instances details
Eq TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadata → TxMetadata → Bool #

(/=) ∷ TxMetadata → TxMetadata → Bool #

Show TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadata → ShowS #

show ∷ TxMetadata → String #

showList ∷ [TxMetadata] → ShowS #

Semigroup TxMetadata Source #

Merge metadata maps. When there are clashing entries the left hand side + takes precedence.

Instance details

Defined in Cardano.Api.TxMetadata

Methods

(<>) ∷ TxMetadata → TxMetadata → TxMetadata #

sconcat ∷ NonEmpty TxMetadata → TxMetadata #

stimes ∷ Integral b ⇒ b → TxMetadata → TxMetadata #

Monoid TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

mempty ∷ TxMetadata #

mappend ∷ TxMetadata → TxMetadata → TxMetadata #

mconcat ∷ [TxMetadata] → TxMetadata #

HasTypeProxy TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Associated Types

data AsType TxMetadata Source #

Methods

proxyToAsType ∷ Proxy TxMetadata → AsType TxMetadata Source #

SerialiseAsCBOR TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

serialiseToCBOR ∷ TxMetadata → ByteString Source #

deserialiseFromCBOR ∷ AsType TxMetadata → ByteString → Either DecoderError TxMetadata Source #

data AsType TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

data AsType TxMetadata = AsTxMetadata

Constructing metadata

data TxMetadataValue Source #

Constructors

TxMetaMap [(TxMetadataValue, TxMetadataValue)] 
TxMetaList [TxMetadataValue] 
TxMetaNumber Integer 
TxMetaBytes ByteString 
TxMetaText Text 

Instances

Instances details
Eq TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataValue → TxMetadataValue → Bool #

(/=) ∷ TxMetadataValue → TxMetadataValue → Bool #

Ord TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

compare ∷ TxMetadataValue → TxMetadataValue → Ordering #

(<) ∷ TxMetadataValue → TxMetadataValue → Bool #

(<=) ∷ TxMetadataValue → TxMetadataValue → Bool #

(>) ∷ TxMetadataValue → TxMetadataValue → Bool #

(>=) ∷ TxMetadataValue → TxMetadataValue → Bool #

max ∷ TxMetadataValue → TxMetadataValue → TxMetadataValue #

min ∷ TxMetadataValue → TxMetadataValue → TxMetadataValue #

Show TxMetadataValue Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataValue → ShowS #

show ∷ TxMetadataValue → String #

showList ∷ [TxMetadataValue] → ShowS #

makeTransactionMetadata ∷ Map Word64 TxMetadataValue → TxMetadata Source #

Validating metadata

validateTxMetadata ∷ TxMetadata → Either [(Word64, TxMetadataRangeError)] () Source #

Validate transaction metadata. This is for use with existing constructed metadata values, e.g. constructed manually or decoded from CBOR directly.

data TxMetadataRangeError Source #

An error in transaction metadata due to an out-of-range value.

Constructors

TxMetadataNumberOutOfRange !Integer

The number is outside the maximum range of -2^64-1 .. 2^64-1.

TxMetadataTextTooLong !Int

The length of a text string metadatum value exceeds the maximum of 64 bytes as UTF8.

TxMetadataBytesTooLong !Int

The length of a byte string metadatum value exceeds the maximum of - 64 bytes.

Instances

Instances details
Eq TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataRangeError → TxMetadataRangeError → Bool #

(/=) ∷ TxMetadataRangeError → TxMetadataRangeError → Bool #

Show TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataRangeError → ShowS #

show ∷ TxMetadataRangeError → String #

showList ∷ [TxMetadataRangeError] → ShowS #

Error TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataRangeError → String Source #

Converstion to/from JSON

data TxMetadataJsonSchema Source #

Tx metadata is similar to JSON but not exactly the same. It has some + 64 bytes.

Instances

Instances details
Eq TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataRangeError → TxMetadataRangeError → Bool #

(/=) ∷ TxMetadataRangeError → TxMetadataRangeError → Bool #

Show TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataRangeError → ShowS #

show ∷ TxMetadataRangeError → String #

showList ∷ [TxMetadataRangeError] → ShowS #

Error TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataRangeError → String Source #

Converstion to/from JSON

data TxMetadataJsonSchema Source #

Tx metadata is similar to JSON but not exactly the same. It has some deliberate limitations such as no support for floating point numbers or special forms for null or boolean values. It also has limitations on the length of strings. On the other hand, unlike JSON, it distinguishes between @@ -131,11 +131,11 @@ back without loss. That is we can round-trip the tx metadata via the JSON and also round-trip schema-compliant JSON via tx metadata.

Constructors

TxMetadataJsonNoSchema

Use the "no schema" mapping between JSON and tx metadata as described above.

TxMetadataJsonDetailedSchema

Use the "detailed schema" mapping between JSON and tx metadata as - described above.

Instances

Instances details
Eq TxMetadataJsonSchema Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonSchema → TxMetadataJsonSchema → Bool #

(/=) ∷ TxMetadataJsonSchema → TxMetadataJsonSchema → Bool #

Show TxMetadataJsonSchema Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonSchema → ShowS #

show ∷ TxMetadataJsonSchema → String #

showList ∷ [TxMetadataJsonSchema] → ShowS #

metadataFromJson ∷ TxMetadataJsonSchema → Value → Either TxMetadataJsonError TxMetadata Source #

Convert a value from JSON into tx metadata, using the given choice of + described above.

Instances

Instances details
Eq TxMetadataJsonSchema Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonSchema → TxMetadataJsonSchema → Bool #

(/=) ∷ TxMetadataJsonSchema → TxMetadataJsonSchema → Bool #

Show TxMetadataJsonSchema Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonSchema → ShowS #

show ∷ TxMetadataJsonSchema → String #

showList ∷ [TxMetadataJsonSchema] → ShowS #

metadataFromJson ∷ TxMetadataJsonSchema → Value → Either TxMetadataJsonError TxMetadata Source #

Convert a value from JSON into tx metadata, using the given choice of mapping between JSON and tx metadata.

This may fail with a conversion error if the JSON is outside the supported subset for the chosen mapping. See TxMetadataJsonSchema for the details.

metadataToJson ∷ TxMetadataJsonSchema → TxMetadata → Value Source #

Convert a tx metadata value into JSON , using the given choice of mapping between JSON and tx metadata.

This conversion is total but is not necessarily invertible. - See TxMetadataJsonSchema for the details.

metadataValueToJsonNoSchema ∷ TxMetadataValue → Value Source #

data TxMetadataJsonError Source #

Constructors

TxMetadataJsonToplevelNotMap 
TxMetadataJsonToplevelBadKey !Text 
TxMetadataJsonSchemaError !Word64 !Value !TxMetadataJsonSchemaError 
TxMetadataRangeError !Word64 !Value !TxMetadataRangeError 

Instances

Instances details
Eq TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonError → TxMetadataJsonError → Bool #

(/=) ∷ TxMetadataJsonError → TxMetadataJsonError → Bool #

Show TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonError → ShowS #

show ∷ TxMetadataJsonError → String #

showList ∷ [TxMetadataJsonError] → ShowS #

Error TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonError → String Source #

data TxMetadataJsonSchemaError Source #

Constructors

TxMetadataJsonNullNotAllowed 
TxMetadataJsonBoolNotAllowed 
TxMetadataJsonNumberNotInteger !Double 
TxMetadataJsonNotObject !Value 
TxMetadataJsonBadObject ![(Text, Value)] 
TxMetadataJsonBadMapPair !Value 
TxMetadataJsonTypeMismatch !Text !Value 

Instances

Instances details
Eq TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonSchemaError → TxMetadataJsonSchemaError → Bool #

(/=) ∷ TxMetadataJsonSchemaError → TxMetadataJsonSchemaError → Bool #

Show TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonSchemaError → ShowS #

show ∷ TxMetadataJsonSchemaError → String #

showList ∷ [TxMetadataJsonSchemaError] → ShowS #

Error TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonSchemaError → String Source #

Certificates

data Certificate Source #

Instances

Instances details
Eq Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

(==) ∷ Certificate → Certificate → Bool #

(/=) ∷ Certificate → Certificate → Bool #

Show Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

showsPrec ∷ Int → Certificate → ShowS #

show ∷ Certificate → String #

showList ∷ [Certificate] → ShowS #

FromCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

fromCBOR ∷ Decoder s Certificate #

label ∷ Proxy Certificate → Text #

ToCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

toCBOR ∷ Certificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Certificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Certificate] → Size #

HasTypeProxy Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Associated Types

data AsType Certificate Source #

Methods

proxyToAsType ∷ Proxy Certificate → AsType Certificate Source #

SerialiseAsCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

serialiseToCBOR ∷ Certificate → ByteString Source #

deserialiseFromCBOR ∷ AsType Certificate → ByteString → Either DecoderError Certificate Source #

HasTextEnvelope Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

textEnvelopeType ∷ AsType Certificate → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ Certificate → TextEnvelopeDescr Source #

data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate

Registering stake address and delegating

Certificates that are embedded in transactions for registering and + See TxMetadataJsonSchema for the details.

metadataValueToJsonNoSchema ∷ TxMetadataValue → Value Source #

data TxMetadataJsonError Source #

Constructors

TxMetadataJsonToplevelNotMap 
TxMetadataJsonToplevelBadKey !Text 
TxMetadataJsonSchemaError !Word64 !Value !TxMetadataJsonSchemaError 
TxMetadataRangeError !Word64 !Value !TxMetadataRangeError 

Instances

Instances details
Eq TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonError → TxMetadataJsonError → Bool #

(/=) ∷ TxMetadataJsonError → TxMetadataJsonError → Bool #

Show TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonError → ShowS #

show ∷ TxMetadataJsonError → String #

showList ∷ [TxMetadataJsonError] → ShowS #

Error TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonError → String Source #

data TxMetadataJsonSchemaError Source #

Constructors

TxMetadataJsonNullNotAllowed 
TxMetadataJsonBoolNotAllowed 
TxMetadataJsonNumberNotInteger !Double 
TxMetadataJsonNotObject !Value 
TxMetadataJsonBadObject ![(Text, Value)] 
TxMetadataJsonBadMapPair !Value 
TxMetadataJsonTypeMismatch !Text !Value 

Instances

Instances details
Eq TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

(==) ∷ TxMetadataJsonSchemaError → TxMetadataJsonSchemaError → Bool #

(/=) ∷ TxMetadataJsonSchemaError → TxMetadataJsonSchemaError → Bool #

Show TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

showsPrec ∷ Int → TxMetadataJsonSchemaError → ShowS #

show ∷ TxMetadataJsonSchemaError → String #

showList ∷ [TxMetadataJsonSchemaError] → ShowS #

Error TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonSchemaError → String Source #

Certificates

data Certificate Source #

Instances

Instances details
Eq Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

(==) ∷ Certificate → Certificate → Bool #

(/=) ∷ Certificate → Certificate → Bool #

Show Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

showsPrec ∷ Int → Certificate → ShowS #

show ∷ Certificate → String #

showList ∷ [Certificate] → ShowS #

FromCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

fromCBOR ∷ Decoder s Certificate #

label ∷ Proxy Certificate → Text #

ToCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

toCBOR ∷ Certificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Certificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Certificate] → Size #

HasTypeProxy Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Associated Types

data AsType Certificate Source #

Methods

proxyToAsType ∷ Proxy Certificate → AsType Certificate Source #

SerialiseAsCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

serialiseToCBOR ∷ Certificate → ByteString Source #

deserialiseFromCBOR ∷ AsType Certificate → ByteString → Either DecoderError Certificate Source #

HasTextEnvelope Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

textEnvelopeType ∷ AsType Certificate → TextEnvelopeType Source #

textEnvelopeDefaultDescr ∷ Certificate → TextEnvelopeDescr Source #

data AsType Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

data AsType Certificate = AsCertificate

Registering stake address and delegating

Certificates that are embedded in transactions for registering and unregistering stake address, and for setting the stake pool delegation choice for a stake address.

makeStakeAddressRegistrationCertificate ∷ StakeCredential → Certificate Source #

makeStakeAddressDeregistrationCertificate ∷ StakeCredential → Certificate Source #

makeStakeAddressDelegationCertificate ∷ StakeCredential → PoolId → Certificate Source #

Registering stake pools

Certificates that are embedded in transactions for registering and retiring stake pools. This includes updating the stake pool parameters.

makeStakePoolRegistrationCertificate ∷ StakePoolParameters → Certificate Source #

makeStakePoolRetirementCertificate ∷ PoolId → EpochNo → Certificate Source #

data StakePoolParameters Source #

Instances

Instances details
Eq StakePoolParameters Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

(==) ∷ StakePoolParameters → StakePoolParameters → Bool #

(/=) ∷ StakePoolParameters → StakePoolParameters → Bool #

Show StakePoolParameters Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

showsPrec ∷ Int → StakePoolParameters → ShowS #

show ∷ StakePoolParameters → String #

showList ∷ [StakePoolParameters] → ShowS #

data StakePoolRelay Source #

Instances

Instances details
Eq StakePoolRelay Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

(==) ∷ StakePoolRelay → StakePoolRelay → Bool #

(/=) ∷ StakePoolRelay → StakePoolRelay → Bool #

Show StakePoolRelay Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

showsPrec ∷ Int → StakePoolRelay → ShowS #

show ∷ StakePoolRelay → String #

showList ∷ [StakePoolRelay] → ShowS #

data StakePoolMetadataReference Source #

Instances

Instances details
Eq StakePoolMetadataReference Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

(==) ∷ StakePoolMetadataReference → StakePoolMetadataReference → Bool #

(/=) ∷ StakePoolMetadataReference → StakePoolMetadataReference → Bool #

Show StakePoolMetadataReference Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

showsPrec ∷ Int → StakePoolMetadataReference → ShowS #

show ∷ StakePoolMetadataReference → String #

showList ∷ [StakePoolMetadataReference] → ShowS #

Stake pool off-chain metadata

data StakePoolMetadata Source #

A representation of the required fields for off-chain stake pool metadata.

Instances

Instances details
Eq StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ StakePoolMetadata → StakePoolMetadata → Bool #

(/=) ∷ StakePoolMetadata → StakePoolMetadata → Bool #

Show StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → StakePoolMetadata → ShowS #

show ∷ StakePoolMetadata → String #

showList ∷ [StakePoolMetadata] → ShowS #

FromJSON StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

parseJSON ∷ Value → Parser StakePoolMetadata #

parseJSONList ∷ Value → Parser [StakePoolMetadata] #

HasTypeProxy StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Associated Types

data AsType StakePoolMetadata Source #

Methods

proxyToAsType ∷ Proxy StakePoolMetadata → AsType StakePoolMetadata Source #

Eq (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

(==) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

(/=) ∷ Hash StakePoolMetadata → Hash StakePoolMetadata → Bool #

Show (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

showsPrec ∷ Int → Hash StakePoolMetadata → ShowS #

show ∷ Hash StakePoolMetadata → String #

showList ∷ [Hash StakePoolMetadata] → ShowS #

SerialiseAsRawBytes (Hash StakePoolMetadata) Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

serialiseToRawBytes ∷ Hash StakePoolMetadata → ByteString Source #

deserialiseFromRawBytes ∷ AsType (Hash StakePoolMetadata) → ByteString → Maybe (Hash StakePoolMetadata) Source #

data AsType StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

data AsType StakePoolMetadata = AsStakePoolMetadata
newtype Hash StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

newtype Hash StakePoolMetadata = StakePoolMetadataHash (Hash StandardCrypto ByteString)

validateAndHashStakePoolMetadata ∷ ByteString → Either StakePoolMetadataValidationError (StakePoolMetadata, Hash StakePoolMetadata) Source #

Decode and validate the provided JSON-encoded bytes as StakePoolMetadata. @@ -203,7 +203,7 @@ execution.

Instances

Instances details
Eq ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

(==) ∷ ExecutionUnits → ExecutionUnits → Bool #

(/=) ∷ ExecutionUnits → ExecutionUnits → Bool #

Show ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

showsPrec ∷ Int → ExecutionUnits → ShowS #

show ∷ ExecutionUnits → String #

showList ∷ [ExecutionUnits] → ShowS #

FromJSON ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

parseJSON ∷ Value → Parser ExecutionUnits #

parseJSONList ∷ Value → Parser [ExecutionUnits] #

ToJSON ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toJSON ∷ ExecutionUnits → Value #

toEncoding ∷ ExecutionUnits → Encoding #

toJSONList ∷ [ExecutionUnits] → Value #

toEncodingList ∷ [ExecutionUnits] → Encoding #

Script addresses

Making addresses from scripts.

data ScriptHash Source #

We have this type separate from the Hash type to avoid the script hash type being parametrised by the era. The representation is era independent, and there are many places where we want to use a script - hash where we don't want things to be era-parametrised.

Instances

Instances details
Eq ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

(==) ∷ ScriptHash → ScriptHash → Bool #

(/=) ∷ ScriptHash → ScriptHash → Bool #

Ord ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

compare ∷ ScriptHash → ScriptHash → Ordering #

(<) ∷ ScriptHash → ScriptHash → Bool #

(<=) ∷ ScriptHash → ScriptHash → Bool #

(>) ∷ ScriptHash → ScriptHash → Bool #

(>=) ∷ ScriptHash → ScriptHash → Bool #

max ∷ ScriptHash → ScriptHash → ScriptHash #

min ∷ ScriptHash → ScriptHash → ScriptHash #

Show ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

showsPrec ∷ Int → ScriptHash → ShowS #

show ∷ ScriptHash → String #

showList ∷ [ScriptHash] → ShowS #

IsString ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

fromString ∷ String → ScriptHash #

HasTypeProxy ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptHash Source #

Methods

proxyToAsType ∷ Proxy ScriptHash → AsType ScriptHash Source #

SerialiseAsRawBytes ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToRawBytes ∷ ScriptHash → ByteString Source #

deserialiseFromRawBytes ∷ AsType ScriptHash → ByteString → Maybe ScriptHash Source #

data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash

hashScript ∷ Script lang → ScriptHash Source #

Serialisation

Support for serialising data in JSON, CBOR and text files.

CBOR

class HasTypeProxy a ⇒ SerialiseAsCBOR a Source #

Instances

Instances details
SerialiseAsCBOR TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

serialiseToCBOR ∷ TxMetadata → ByteString Source #

deserialiseFromCBOR ∷ AsType TxMetadata → ByteString → Either DecoderError TxMetadata Source #

SerialiseAsCBOR UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

serialiseToCBOR ∷ UpdateProposal → ByteString Source #

deserialiseFromCBOR ∷ AsType UpdateProposal → ByteString → Either DecoderError UpdateProposal Source #

SerialiseAsCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

serialiseToCBOR ∷ Certificate → ByteString Source #

deserialiseFromCBOR ∷ AsType Certificate → ByteString → Either DecoderError Certificate Source #

SerialiseAsCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

serialiseToCBOR ∷ OperationalCertificateIssueCounter → ByteString Source #

deserialiseFromCBOR ∷ AsType OperationalCertificateIssueCounter → ByteString → Either DecoderError OperationalCertificateIssueCounter Source #

SerialiseAsCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

serialiseToCBOR ∷ OperationalCertificate → ByteString Source #

deserialiseFromCBOR ∷ AsType OperationalCertificate → ByteString → Either DecoderError OperationalCertificate Source #

SerialiseAsCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakePoolKey) → ByteString → Either DecoderError (VerificationKey StakePoolKey) Source #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateKey) Source #

SerialiseAsCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisKey) → ByteString → Either DecoderError (VerificationKey GenesisKey) Source #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeKey) → ByteString → Either DecoderError (VerificationKey StakeKey) Source #

SerialiseAsCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Either DecoderError (VerificationKey PaymentExtendedKey) Source #

SerialiseAsCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentKey) → ByteString → Either DecoderError (VerificationKey PaymentKey) Source #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakePoolKey) → ByteString → Either DecoderError (SigningKey StakePoolKey) Source #

SerialiseAsCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Either DecoderError (SigningKey GenesisUTxOKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateKey) Source #

SerialiseAsCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisKey) → ByteString → Either DecoderError (SigningKey GenesisKey) Source #

SerialiseAsCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Either DecoderError (SigningKey StakeExtendedKey) Source #

SerialiseAsCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeKey) → ByteString → Either DecoderError (SigningKey StakeKey) Source #

SerialiseAsCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Either DecoderError (SigningKey PaymentExtendedKey) Source #

SerialiseAsCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentKey) → ByteString → Either DecoderError (SigningKey PaymentKey) Source #

SerialiseAsCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Either DecoderError (SigningKey ByronKeyLegacy) Source #

SerialiseAsCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKey) → ByteString → Either DecoderError (SigningKey ByronKey) Source #

SerialiseAsCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey VrfKey) → ByteString → Either DecoderError (SigningKey VrfKey) Source #

SerialiseAsCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey KesKey) → ByteString → Either DecoderError (SigningKey KesKey) Source #

(HasTypeProxy lang, Typeable lang) ⇒ SerialiseAsCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToCBOR ∷ PlutusScript lang → ByteString Source #

deserialiseFromCBOR ∷ AsType (PlutusScript lang) → ByteString → Either DecoderError (PlutusScript lang) Source #

IsScriptLanguage lang ⇒ SerialiseAsCBOR (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToCBOR ∷ Script lang → ByteString Source #

deserialiseFromCBOR ∷ AsType (Script lang) → ByteString → Either DecoderError (Script lang) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

serialiseToCBOR ∷ TxBody era → ByteString Source #

deserialiseFromCBOR ∷ AsType (TxBody era) → ByteString → Either DecoderError (TxBody era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ KeyWitness era → ByteString Source #

deserialiseFromCBOR ∷ AsType (KeyWitness era) → ByteString → Either DecoderError (KeyWitness era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ Tx era → ByteString Source #

deserialiseFromCBOR ∷ AsType (Tx era) → ByteString → Either DecoderError (Tx era) Source #

class Typeable a ⇒ ToCBOR a #

Minimal complete definition

toCBOR

Instances

Instances details
ToCBOR Bool 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Bool → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Bool → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Bool] → Size #

ToCBOR Float 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Float → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Float → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Float] → Size #

ToCBOR Int 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int] → Size #

ToCBOR Int32 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int32 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int32 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int32] → Size #

ToCBOR Int64 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int64 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int64 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int64] → Size #

ToCBOR Integer 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Integer → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Integer → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Integer] → Size #

ToCBOR Natural 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Natural → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Natural → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Natural] → Size #

ToCBOR Word 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word] → Size #

ToCBOR Word8 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word8 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word8 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word8] → Size #

ToCBOR Word16 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word16 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word16 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word16] → Size #

ToCBOR Word32 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word32 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word32 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word32] → Size #

ToCBOR Word64 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word64 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word64 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word64] → Size #

ToCBOR () 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ () → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy () → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [()] → Size #

ToCBOR ByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByteString] → Size #

ToCBOR ShortByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ShortByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ShortByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShortByteString] → Size #

ToCBOR ByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByteString] → Size #

ToCBOR Nano 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Nano → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Nano → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Nano] → Size #

ToCBOR Pico 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Pico → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Pico → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Pico] → Size #

ToCBOR Void 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Void → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Void → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Void] → Size #

ToCBOR Text 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Text → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Text → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Text] → Size #

ToCBOR UTCTime 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ UTCTime → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTCTime → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTCTime] → Size #

ToCBOR NominalDiffTime 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ NominalDiffTime → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy NominalDiffTime → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NominalDiffTime] → Size #

ToCBOR BlockNo 
Instance details

Defined in Cardano.Slotting.Block

Methods

toCBOR ∷ BlockNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockNo] → Size #

ToCBOR EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ EpochNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochNo] → Size #

ToCBOR SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ SlotNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotNo] → Size #

ToCBOR Raw 
Instance details

Defined in Cardano.Binary.Raw

Methods

toCBOR ∷ Raw → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Raw → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Raw] → Size #

ToCBOR Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ Coin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Coin → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Coin] → Size #

ToCBOR UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ UnitInterval → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UnitInterval → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UnitInterval] → Size #

ToCBOR ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ ProtVer → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtVer → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtVer] → Size #

ToCBOR AlonzoGenesis 
Instance details

Defined in Cardano.Ledger.Alonzo.Genesis

Methods

toCBOR ∷ AlonzoGenesis → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AlonzoGenesis → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoGenesis] → Size #

ToCBOR Language 
Instance details

Defined in Cardano.Ledger.Alonzo.Language

Methods

toCBOR ∷ Language → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Language → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Language] → Size #

ToCBOR CostModel 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ CostModel → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CostModel → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CostModel] → Size #

ToCBOR Prices 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Prices → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Prices → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Prices] → Size #

ToCBOR ExUnits 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ ExUnits → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ExUnits → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ExUnits] → Size #

ToCBOR Metadatum 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

toCBOR ∷ Metadatum → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Metadatum → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Metadatum] → Size #

ToCBOR AssetName 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ AssetName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AssetName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AssetName] → Size #

ToCBOR Likelihood 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ Likelihood → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Likelihood → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Likelihood] → Size #

ToCBOR Ptr 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ Ptr → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Ptr → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Ptr] → Size #

ToCBOR Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Nonce → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Nonce → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Nonce] → Size #

ToCBOR Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ Desirability → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Desirability → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Desirability] → Size #

ToCBOR StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ StakePoolRelay → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy StakePoolRelay → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StakePoolRelay] → Size #

ToCBOR PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ PoolMetadata → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy PoolMetadata → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolMetadata] → Size #

ToCBOR Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Network → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Network → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Network] → Size #

ToCBOR ValidityInterval 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

toCBOR ∷ ValidityInterval → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ValidityInterval → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ValidityInterval] → Size #

ToCBOR ByronHash 
Instance details

Defined in Ouroboros.Consensus.Byron.Ledger.Block

Methods

toCBOR ∷ ByronHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByronHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByronHash] → Size #

ToCBOR EpochAndSlotCount 
Instance details

Defined in Cardano.Chain.Slotting.EpochAndSlotCount

Methods

toCBOR ∷ EpochAndSlotCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochAndSlotCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochAndSlotCount] → Size #

ToCBOR EpochNumber 
Instance details

Defined in Cardano.Chain.Slotting.EpochNumber

Methods

toCBOR ∷ EpochNumber → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochNumber → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochNumber] → Size #

ToCBOR EpochSlots 
Instance details

Defined in Cardano.Chain.Slotting.EpochSlots

Methods

toCBOR ∷ EpochSlots → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochSlots → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochSlots] → Size #

ToCBOR SlotCount 
Instance details

Defined in Cardano.Chain.Slotting.SlotCount

Methods

toCBOR ∷ SlotCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotCount] → Size #

ToCBOR SlotNumber 
Instance details

Defined in Cardano.Chain.Slotting.SlotNumber

Methods

toCBOR ∷ SlotNumber → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotNumber → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotNumber] → Size #

ToCBOR Config 
Instance details

Defined in Cardano.Chain.Genesis.Config

Methods

toCBOR ∷ Config → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Config → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Config] → Size #

ToCBOR GenesisNonAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.NonAvvmBalances

Methods

toCBOR ∷ GenesisNonAvvmBalances → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisNonAvvmBalances → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisNonAvvmBalances] → Size #

ToCBOR GenesisDelegation 
Instance details

Defined in Cardano.Chain.Genesis.Delegation

Methods

toCBOR ∷ GenesisDelegation → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisDelegation → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisDelegation] → Size #

ToCBOR GenesisKeyHashes 
Instance details

Defined in Cardano.Chain.Genesis.KeyHashes

Methods

toCBOR ∷ GenesisKeyHashes → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisKeyHashes → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisKeyHashes] → Size #

ToCBOR CompactAddress 
Instance details

Defined in Cardano.Chain.Common.Compact

Methods

toCBOR ∷ CompactAddress → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactAddress → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactAddress] → Size #

ToCBOR RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toCBOR ∷ RequiresNetworkMagic → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RequiresNetworkMagic → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RequiresNetworkMagic] → Size #

ToCBOR GenesisAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.AvvmBalances

Methods

toCBOR ∷ GenesisAvvmBalances → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisAvvmBalances → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisAvvmBalances] → Size #

ToCBOR ProtocolParameters 
Instance details

Defined in Cardano.Chain.Update.ProtocolParameters

Methods

toCBOR ∷ ProtocolParameters → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolParameters → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolParameters] → Size #

ToCBOR ProtocolVersion 
Instance details

Defined in Cardano.Chain.Update.ProtocolVersion

Methods

toCBOR ∷ ProtocolVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolVersion] → Size #

ToCBOR ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toCBOR ∷ ProtocolMagicId → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolMagicId → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolMagicId] → Size #

ToCBOR Certificate 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

toCBOR ∷ Certificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Certificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Certificate] → Size #

ToCBOR SigningKey 
Instance details

Defined in Cardano.Crypto.Signing.SigningKey

Methods

toCBOR ∷ SigningKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SigningKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey] → Size #

ToCBOR SoftwareVersion 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

toCBOR ∷ SoftwareVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareVersion] → Size #

ToCBOR VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

toCBOR ∷ VerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey] → Size #

ToCBOR KeyHash 
Instance details

Defined in Cardano.Chain.Common.KeyHash

Methods

toCBOR ∷ KeyHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy KeyHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KeyHash] → Size #

ToCBOR GenesisHash 
Instance details

Defined in Cardano.Chain.Genesis.Hash

Methods

toCBOR ∷ GenesisHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisHash] → Size #

ToCBOR CandidateProtocolUpdate 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ CandidateProtocolUpdate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CandidateProtocolUpdate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CandidateProtocolUpdate] → Size #

ToCBOR Endorsement 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ Endorsement → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Endorsement → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Endorsement] → Size #

ToCBOR ApplyMempoolPayloadErr 
Instance details

Defined in Cardano.Chain.Byron.API.Mempool

Methods

toCBOR ∷ ApplyMempoolPayloadErr → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplyMempoolPayloadErr → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplyMempoolPayloadErr] → Size #

ToCBOR Tx 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ Tx → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Tx → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tx] → Size #

ToCBOR Proposal 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toCBOR ∷ Proposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proposal] → Size #

ToCBOR Vote 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

toCBOR ∷ Vote → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Vote → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Vote] → Size #

ToCBOR ChainValidationState 
Instance details

Defined in Cardano.Chain.Block.Validation

Methods

toCBOR ∷ ChainValidationState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainValidationState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainValidationState] → Size #

ToCBOR Map 
Instance details

Defined in Cardano.Chain.Delegation.Map

Methods

toCBOR ∷ Map → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Map → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Map] → Size #

ToCBOR ScheduledDelegation 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ ScheduledDelegation → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ScheduledDelegation → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScheduledDelegation] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR UTxO 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

toCBOR ∷ UTxO → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxO → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxO] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR ToSign 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toCBOR ∷ ToSign → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ToSign → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ToSign] → Size #

ToCBOR CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

toCBOR ∷ CompactRedeemVerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactRedeemVerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactRedeemVerificationKey] → Size #

ToCBOR Lovelace 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

toCBOR ∷ Lovelace → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Lovelace → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Lovelace] → Size #

ToCBOR SystemStart 
Instance details

Defined in Cardano.Slotting.Time

Methods

toCBOR ∷ SystemStart → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemStart → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemStart] → Size #

ToCBOR Point 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ Point → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Point → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Point] → Size #

ToCBOR Proof 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ Proof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proof] → Size #

ToCBOR SignKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ SignKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SignKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKey] → Size #

ToCBOR VerKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ VerKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VerKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKey] → Size #

ToCBOR RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

toCBOR ∷ RedeemVerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RedeemVerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemVerificationKey] → Size #

ToCBOR RedeemSigningKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.SigningKey

Methods

toCBOR ∷ RedeemSigningKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RedeemSigningKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemSigningKey] → Size #

ToCBOR IsValidating 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ IsValidating → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy IsValidating → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [IsValidating] → Size #

ToCBOR Tag 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Tag → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Tag → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tag] → Size #

ToCBOR ChainDifficulty 
Instance details

Defined in Cardano.Chain.Common.ChainDifficulty

Methods

toCBOR ∷ ChainDifficulty → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainDifficulty → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainDifficulty] → Size #

ToCBOR Proof 
Instance details

Defined in Cardano.Chain.Block.Proof

Methods

toCBOR ∷ Proof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proof] → Size #

ToCBOR SscPayload 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toCBOR ∷ SscPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SscPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SscPayload] → Size #

ToCBOR ProposalBody 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toCBOR ∷ ProposalBody → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProposalBody → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProposalBody] → Size #

ToCBOR TxInWitness 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toCBOR ∷ TxInWitness → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxInWitness → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxInWitness] → Size #

ToCBOR Body 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

toCBOR ∷ Body → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Body → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Body] → Size #

ToCBOR TxPayload 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

toCBOR ∷ TxPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxPayload] → Size #

ToCBOR Payload 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

toCBOR ∷ Payload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Payload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Payload] → Size #

ToCBOR Payload 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

toCBOR ∷ Payload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Payload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Payload] → Size #

ToCBOR BlockSignature 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toCBOR ∷ BlockSignature → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockSignature → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockSignature] → Size #

ToCBOR TxProof 
Instance details

Defined in Cardano.Chain.UTxO.TxProof

Methods

toCBOR ∷ TxProof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxProof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxProof] → Size #

ToCBOR SscProof 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toCBOR ∷ SscProof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SscProof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SscProof] → Size #

ToCBOR CompactTxIn 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxIn → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxIn → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxIn] → Size #

ToCBOR CompactTxOut 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxOut → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxOut → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxOut] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Interface

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR UTxOValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

toCBOR ∷ UTxOValidationError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOValidationError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOValidationError] → Size #

ToCBOR BlockCount 
Instance details

Defined in Cardano.Chain.Common.BlockCount

Methods

toCBOR ∷ BlockCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockCount] → Size #

ToCBOR UTxOConfiguration 
Instance details

Defined in Cardano.Chain.UTxO.UTxOConfiguration

Methods

toCBOR ∷ UTxOConfiguration → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOConfiguration → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOConfiguration] → Size #

ToCBOR ApplicationName 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

toCBOR ∷ ApplicationName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationName] → Size #

ToCBOR ApplicationVersion 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ ApplicationVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationVersion] → Size #

ToCBOR ProtocolUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ ProtocolUpdateProposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolUpdateProposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolUpdateProposal] → Size #

ToCBOR SoftwareUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ SoftwareUpdateProposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareUpdateProposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareUpdateProposal] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR HDAddressPayload 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toCBOR ∷ HDAddressPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy HDAddressPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [HDAddressPayload] → Size #

ToCBOR NetworkMagic 
Instance details

Defined in Cardano.Chain.Common.NetworkMagic

Methods

toCBOR ∷ NetworkMagic → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy NetworkMagic → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NetworkMagic] → Size #

ToCBOR AddrSpendingData 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

toCBOR ∷ AddrSpendingData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AddrSpendingData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AddrSpendingData] → Size #

ToCBOR AddrType 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

toCBOR ∷ AddrType → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AddrType → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AddrType] → Size #

ToCBOR Address 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

toCBOR ∷ Address → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Address → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Address] → Size #

ToCBOR Address' 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

toCBOR ∷ Address' → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Address' → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Address'] → Size #

ToCBOR LovelaceError 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

toCBOR ∷ LovelaceError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LovelaceError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LovelaceError] → Size #

ToCBOR LovelacePortion 
Instance details

Defined in Cardano.Chain.Common.LovelacePortion

Methods

toCBOR ∷ LovelacePortion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LovelacePortion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LovelacePortion] → Size #

ToCBOR TxFeePolicy 
Instance details

Defined in Cardano.Chain.Common.TxFeePolicy

Methods

toCBOR ∷ TxFeePolicy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxFeePolicy → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxFeePolicy] → Size #

ToCBOR TxSizeLinear 
Instance details

Defined in Cardano.Chain.Common.TxSizeLinear

Methods

toCBOR ∷ TxSizeLinear → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxSizeLinear → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxSizeLinear] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Activation

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR GenesisData 
Instance details

Defined in Cardano.Chain.Genesis.Data

Methods

toCBOR ∷ GenesisData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisData] → Size #

ToCBOR CompactTxId 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxId → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxId → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxId] → Size #

ToCBOR TxIn 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ TxIn → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxIn → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxIn] → Size #

ToCBOR TxOut 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ TxOut → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxOut → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut] → Size #

ToCBOR TxAux 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

toCBOR ∷ TxAux → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxAux → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxAux] → Size #

ToCBOR TxSigData 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toCBOR ∷ TxSigData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxSigData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxSigData] → Size #

ToCBOR UTxOError 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

toCBOR ∷ UTxOError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOError] → Size #

ToCBOR ApplicationNameError 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

toCBOR ∷ ApplicationNameError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationNameError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationNameError] → Size #

ToCBOR InstallerHash 
Instance details

Defined in Cardano.Chain.Update.InstallerHash

Methods

toCBOR ∷ InstallerHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy InstallerHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [InstallerHash] → Size #

ToCBOR SystemTag 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

toCBOR ∷ SystemTag → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemTag → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemTag] → Size #

ToCBOR ProtocolParametersUpdate 
Instance details

Defined in Cardano.Chain.Update.ProtocolParametersUpdate

Methods

toCBOR ∷ ProtocolParametersUpdate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolParametersUpdate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolParametersUpdate] → Size #

ToCBOR SoftforkRule 
Instance details

Defined in Cardano.Chain.Update.SoftforkRule

Methods

toCBOR ∷ SoftforkRule → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftforkRule → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftforkRule] → Size #

ToCBOR SoftwareVersionError 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

toCBOR ∷ SoftwareVersionError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareVersionError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareVersionError] → Size #

ToCBOR SystemTagError 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

toCBOR ∷ SystemTagError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemTagError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemTagError] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Voting

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Adopted 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ Adopted → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Adopted → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Adopted] → Size #

ToCBOR ActiveSlotCoeff 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ ActiveSlotCoeff → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ActiveSlotCoeff → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ActiveSlotCoeff] → Size #

ToCBOR DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ DnsName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy DnsName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DnsName] → Size #

ToCBOR Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Port → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Port → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Port] → Size #

ToCBOR Seed 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Seed → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Seed → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Seed] → Size #

ToCBOR Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Url → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Url → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Url] → Size #

ToCBOR DeltaCoin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ DeltaCoin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy DeltaCoin → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DeltaCoin] → Size #

ToCBOR TicknState 
Instance details

Defined in Shelley.Spec.Ledger.STS.Tickn

Methods

toCBOR ∷ TicknState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TicknState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TicknState] → Size #

ToCBOR ChainCode 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

toCBOR ∷ ChainCode → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainCode → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainCode] → Size #

ToCBOR AccountState 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ AccountState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AccountState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AccountState] → Size #

ToCBOR LogWeight 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ LogWeight → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LogWeight → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LogWeight] → Size #

ToCBOR MIRPot 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRPot → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy MIRPot → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRPot] → Size #

ToCBOR KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

toCBOR ∷ KESPeriod → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy KESPeriod → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KESPeriod] → Size #

ToCBOR PerformanceEstimate 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ PerformanceEstimate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy PerformanceEstimate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PerformanceEstimate] → Size #

ToCBOR RewardType 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ RewardType → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RewardType → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardType] → Size #

ToCBOR VotingPeriod 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

toCBOR ∷ VotingPeriod → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VotingPeriod → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VotingPeriod] → Size #

ToCBOR SizeOfPoolOwners 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ SizeOfPoolOwners → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SizeOfPoolOwners → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SizeOfPoolOwners] → Size #

ToCBOR SizeOfPoolRelays 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ SizeOfPoolRelays → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SizeOfPoolRelays → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SizeOfPoolRelays] → Size #

ToCBOR TxValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

toCBOR ∷ TxValidationError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxValidationError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxValidationError] → Size #

ToCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

toCBOR ∷ Certificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Certificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Certificate] → Size #

ToCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

toCBOR ∷ OperationalCertificateIssueCounter → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy OperationalCertificateIssueCounter → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OperationalCertificateIssueCounter] → Size #

ToCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

toCBOR ∷ OperationalCertificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy OperationalCertificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OperationalCertificate] → Size #

ToCBOR a ⇒ ToCBOR [a] 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ [a] → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [a] → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [[a]] → Size #

ToCBOR a ⇒ ToCBOR (Maybe a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Maybe a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Maybe a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Maybe a] → Size #

ToCBOR a ⇒ ToCBOR (Ratio a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Ratio a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Ratio a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Ratio a] → Size #

(Ord a, ToCBOR a) ⇒ ToCBOR (Set a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Set a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Set a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Set a] → Size #

ToCBOR a ⇒ ToCBOR (NonEmpty a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ NonEmpty a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NonEmpty a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NonEmpty a] → Size #

(Serialise t, Typeable t) ⇒ ToCBOR (WithOrigin t) 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ WithOrigin t → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (WithOrigin t) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [WithOrigin t] → Size #

ToCBOR a ⇒ ToCBOR (Vector a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Vector a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Vector a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Vector a] → Size #

Typeable xs ⇒ ToCBOR (LengthOf xs) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ LengthOf xs → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LengthOf xs) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LengthOf xs] → Size #

ToCBOR (SigDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ SigDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (SigDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ SigDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed25519DSIGN] → Size #

ToCBOR (SigDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ SigDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN MockDSIGN] → Size #

ToCBOR (SigDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ SigDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed448DSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ SignKeyDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ SignKeyDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed25519DSIGN] → Size #

ToCBOR (SignKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ SignKeyDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN MockDSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ SignKeyDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed448DSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ VerKeyDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ VerKeyDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed25519DSIGN] → Size #

ToCBOR (VerKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ VerKeyDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN MockDSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ VerKeyDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed448DSIGN] → Size #

Crypto crypto ⇒ ToCBOR (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

toCBOR ∷ ScriptHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ScriptHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScriptHash crypto] → Size #

ToCBOR a ⇒ ToCBOR (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

toCBOR ∷ StrictMaybe a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (StrictMaybe a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StrictMaybe a] → Size #

Crypto crypto ⇒ ToCBOR (AuxiliaryDataHash crypto) 
Instance details

Defined in Cardano.Ledger.AuxiliaryData

Methods

toCBOR ∷ AuxiliaryDataHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryDataHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryDataHash crypto] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (PPUPState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ PPUPState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PPUPState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PPUPState era] → Size #

Crypto crypto ⇒ ToCBOR (Value crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ Value crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Value crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Value crypto] → Size #

Typeable era ⇒ ToCBOR (AuxiliaryData era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ AuxiliaryData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryData era] → Size #

Era era ⇒ ToCBOR (PParamsUpdate era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ PParamsUpdate era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParamsUpdate era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParamsUpdate era] → Size #

Era era ⇒ ToCBOR (PParams era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ PParams era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParams era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParams era] → Size #

Typeable era ⇒ ToCBOR (TxWitness era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

toCBOR ∷ TxWitness era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxWitness era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxWitness era] → Size #

Typeable t ⇒ ToCBOR (MemoBytes t) 
Instance details

Defined in Data.MemoBytes

Methods

toCBOR ∷ MemoBytes t → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (MemoBytes t) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [MemoBytes t] → Size #

(Era era, TransTxOut ToCBOR era) ⇒ ToCBOR (TxOut era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxOut era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxOut era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut era] → Size #

Era era ⇒ ToCBOR (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ PParams era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParams era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParams era] → Size #

Era era ⇒ ToCBOR (PParamsUpdate era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ PParamsUpdate era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParamsUpdate era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParamsUpdate era] → Size #

Typeable crypto ⇒ ToCBOR (Timelock crypto) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

toCBOR ∷ Timelock crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Timelock crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Timelock crypto] → Size #

Typeable era ⇒ ToCBOR (Tx era) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

toCBOR ∷ Tx era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Tx era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tx era] → Size #

Era era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

Typeable era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

Typeable crypto ⇒ ToCBOR (MultiSig crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

toCBOR ∷ MultiSig crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MultiSig crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MultiSig crypto] → Size #

Typeable era ⇒ ToCBOR (Metadata era) 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

toCBOR ∷ Metadata era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Metadata era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Metadata era] → Size #

TransEpoch ToCBOR era ⇒ ToCBOR (EpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ EpochState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (EpochState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochState era] → Size #

(Era era, TransLedgerState ToCBOR era) ⇒ ToCBOR (LedgerState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ LedgerState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgerState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgerState era] → Size #

TransUTxOState ToCBOR era ⇒ ToCBOR (UTxOState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ UTxOState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UTxOState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOState era] → Size #

Crypto crypto ⇒ ToCBOR (DPState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ DPState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DPState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DPState crypto] → Size #

(Typeable era, TransEpoch ToCBOR era) ⇒ ToCBOR (NewEpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ NewEpochState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NewEpochState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NewEpochState era] → Size #

Crypto crypto ⇒ ToCBOR (TxIn crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxIn crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxIn crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxIn crypto] → Size #

Crypto crypto ⇒ ToCBOR (CompactAddr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.CompactAddr

Methods

toCBOR ∷ CompactAddr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactAddr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactAddr crypto] → Size #

Crypto crypto ⇒ ToCBOR (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ BlocksMade crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BlocksMade crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlocksMade crypto] → Size #

Crypto crypto ⇒ ToCBOR (SnapShots crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ SnapShots crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SnapShots crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SnapShots crypto] → Size #

Crypto crypto ⇒ ToCBOR (NonMyopic crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ NonMyopic crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NonMyopic crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NonMyopic crypto] → Size #

Crypto crypto ⇒ ToCBOR (PulsingRewUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ PulsingRewUpdate crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PulsingRewUpdate crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PulsingRewUpdate crypto] → Size #

Crypto crypto ⇒ ToCBOR (PoolDistr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

toCBOR ∷ PoolDistr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolDistr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolDistr crypto] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (ProposedPPUpdates era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ ProposedPPUpdates era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ProposedPPUpdates era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProposedPPUpdates era] → Size #

Era era ⇒ ToCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toCBOR ∷ ShelleyGenesis era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGenesis era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGenesis era] → Size #

Crypto crypto ⇒ ToCBOR (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ GenDelegPair crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenDelegPair crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenDelegPair crypto] → Size #

Crypto crypto ⇒ ToCBOR (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toCBOR ∷ Addr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Addr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Addr crypto] → Size #

Crypto crypto ⇒ ToCBOR (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toCBOR ∷ ShelleyGenesisStaking crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGenesisStaking crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGenesisStaking crypto] → Size #

ToCBOR (CompactForm Coin) 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ CompactForm Coin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactForm Coin) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactForm Coin] → Size #

Crypto crypto ⇒ ToCBOR (CompactForm (Value crypto)) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ CompactForm (Value crypto) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactForm (Value crypto)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactForm (Value crypto)] → Size #

(Era era, ToCBOR (TxOut era)) ⇒ ToCBOR (UTxO era) 
Instance details

Defined in Shelley.Spec.Ledger.UTxO

Methods

toCBOR ∷ UTxO era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UTxO era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxO era] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (Update era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ Update era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Update era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Update era] → Size #

Typeable era ⇒ ToCBOR (AuxiliaryData era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

toCBOR ∷ AuxiliaryData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryData era] → Size #

Typeable era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

(Era era, Compactible (Value era)) ⇒ ToCBOR (TxOut era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

toCBOR ∷ TxOut era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxOut era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut era] → Size #

(Typeable (Crypto era), Typeable era) ⇒ ToCBOR (Script era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Script era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Script era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Script era] → Size #

Typeable era ⇒ ToCBOR (Data era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ Data era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Data era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Data era] → Size #

(Typeable era, Ord (Script era), Script era ~ Script era, ToCBOR (Script era), Typeable (Crypto era)) ⇒ ToCBOR (AuxiliaryDataRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ AuxiliaryDataRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryDataRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryDataRaw era] → Size #

Crypto crypto ⇒ ToCBOR (PolicyID crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ PolicyID crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PolicyID crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PolicyID crypto] → Size #

Crypto crypto ⇒ ToCBOR (BHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ BHeader crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BHeader crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BHeader crypto] → Size #

Era era ⇒ ToCBOR (Block era) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ Block era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Block era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Block era] → Size #

(ShelleyBased era, ToCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ ToCBOR (ApplyTxError era) 
Instance details

Defined in Shelley.Spec.Ledger.API.Mempool

Methods

toCBOR ∷ ApplyTxError era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ApplyTxError era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplyTxError era] → Size #

(ToCBOR (PredicateFailure (EraRule "DELEGS" era)), ToCBOR (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ ToCBOR (LedgerPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledger

Methods

toCBOR ∷ LedgerPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgerPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgerPredicateFailure era] → Size #

(Era era, Typeable (Script era), ToCBOR (PredicateFailure (EraRule "DELPL" era))) ⇒ ToCBOR (DelegsPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delegs

Methods

toCBOR ∷ DelegsPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelegsPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelegsPredicateFailure era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "POOL" era)), ToCBOR (PredicateFailure (EraRule "DELEG" era)), Typeable (Script era)) ⇒ ToCBOR (DelplPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delpl

Methods

toCBOR ∷ DelplPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelplPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelplPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (PState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ PState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PState crypto] → Size #

Crypto crypto ⇒ ToCBOR (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ PoolParams crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolParams crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolParams crypto] → Size #

Crypto crypto ⇒ ToCBOR (InstantaneousRewards crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ InstantaneousRewards crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (InstantaneousRewards crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [InstantaneousRewards crypto] → Size #

Crypto crypto ⇒ ToCBOR (SnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ SnapShot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SnapShot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SnapShot crypto] → Size #

Crypto crypto ⇒ ToCBOR (ChainDepState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.API.Protocol

Methods

toCBOR ∷ ChainDepState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ChainDepState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainDepState crypto] → Size #

Crypto crypto ⇒ ToCBOR (FutureGenDeleg crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ FutureGenDeleg crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (FutureGenDeleg crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [FutureGenDeleg crypto] → Size #

Crypto crypto ⇒ ToCBOR (DState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ DState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DState crypto] → Size #

Crypto crypto ⇒ ToCBOR (IndividualPoolStake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

toCBOR ∷ IndividualPoolStake crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (IndividualPoolStake crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [IndividualPoolStake crypto] → Size #

(TransValue ToCBOR era, TransUTxOState ToCBOR era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Rules.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), ToCBOR (PredicateFailure (EraRule "UTXO" era))) ⇒ ToCBOR (UtxowPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxow

Methods

toCBOR ∷ UtxowPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxowPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxowPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ RewardProvenance crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardProvenance crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardProvenance crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ RewardProvenancePool crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardProvenancePool crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardProvenancePool crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toCBOR ∷ RewardAcnt crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardAcnt crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardAcnt crypto] → Size #

Crypto crypto ⇒ ToCBOR (TxId crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxId crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxId crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxId crypto] → Size #

Crypto crypto ⇒ ToCBOR (BootstrapWitness crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

toCBOR ∷ BootstrapWitness crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BootstrapWitness crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BootstrapWitness crypto] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (SigKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ SigKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (SigKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ SigKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (SigKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ SigKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SigKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SigKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (SigKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ SigKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SigKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SigKES (SimpleKES d t)] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (VerKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ VerKeyKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (VerKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ VerKeyKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (VerKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ VerKeyKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (VerKeyKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [VerKeyKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (VerKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ VerKeyKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (VerKeyKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [VerKeyKES (SimpleKES d t)] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (SignKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ SignKeyKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (SignKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ SignKeyKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (SignKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ SignKeyKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SignKeyKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SignKeyKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (SignKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ SignKeyKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SignKeyKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SignKeyKES (SimpleKES d t)] → Size #

ShelleyBasedEra era ⇒ ToCBOR (Header (ShelleyBlock era)) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ Header (ShelleyBlock era) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Header (ShelleyBlock era)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Header (ShelleyBlock era)] → Size #

ShelleyBasedEra era ⇒ ToCBOR (ShelleyBlock era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ ShelleyBlock era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyBlock era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyBlock era] → Size #

Crypto c ⇒ ToCBOR (ShelleyHash c) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ ShelleyHash c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyHash c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyHash c] → Size #

Era era ⇒ ToCBOR (CompactGenesis era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Config

Methods

toCBOR ∷ CompactGenesis era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactGenesis era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactGenesis era] → Size #

Crypto crypto ⇒ ToCBOR (BHBody crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ BHBody crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BHBody crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BHBody crypto] → Size #

Crypto crypto ⇒ ToCBOR (PrevHash crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ PrevHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PrevHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PrevHash crypto] → Size #

Crypto crypto ⇒ ToCBOR (OCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

toCBOR ∷ OCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OCert crypto] → Size #

Crypto crypto ⇒ ToCBOR (HashHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ HashHeader crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (HashHeader crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [HashHeader crypto] → Size #

Crypto crypto ⇒ ToCBOR (PrtclState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Prtcl

Methods

toCBOR ∷ PrtclState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PrtclState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PrtclState crypto] → Size #

Typeable v ⇒ ToCBOR (OutputVRF v) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

toCBOR ∷ OutputVRF v → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OutputVRF v) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OutputVRF v] → Size #

ToCBOR (CertVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ CertVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF PraosVRF] → Size #

ToCBOR (CertVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ CertVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF MockVRF] → Size #

ToCBOR (CertVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ CertVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF SimpleVRF] → Size #

ToCBOR (SignKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ SignKeyVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF PraosVRF] → Size #

ToCBOR (SignKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ SignKeyVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF MockVRF] → Size #

ToCBOR (SignKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ SignKeyVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF SimpleVRF] → Size #

ToCBOR (VerKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ VerKeyVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF PraosVRF] → Size #

ToCBOR (VerKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ VerKeyVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF MockVRF] → Size #

ToCBOR (VerKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ VerKeyVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF SimpleVRF] → Size #

Typeable a ⇒ ToCBOR (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

toCBOR ∷ RedeemSignature a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RedeemSignature a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemSignature a] → Size #

Typeable a ⇒ ToCBOR (Signature a) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

toCBOR ∷ Signature a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Signature a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Signature a] → Size #

Typeable era ⇒ ToCBOR (LangDepView era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ LangDepView era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LangDepView era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LangDepView era] → Size #

Crypto crypto ⇒ ToCBOR (CollectError crypto) 
Instance details

Defined in Cardano.Ledger.Alonzo.PlutusScriptApi

Methods

toCBOR ∷ CollectError crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CollectError crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CollectError crypto] → Size #

(Typeable c, Crypto c) ⇒ ToCBOR (ScriptPurpose c) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ ScriptPurpose c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ScriptPurpose c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScriptPurpose c] → Size #

Crypto crypto ⇒ ToCBOR (Wdrl crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ Wdrl crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Wdrl crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Wdrl crypto] → Size #

Crypto crypto ⇒ ToCBOR (DCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ DCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DCert crypto] → Size #

(Typeable era, ToCBOR (BbodyPredicateFailure era)) ⇒ ToCBOR (AlonzoBbodyPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Bbody

Methods

toCBOR ∷ AlonzoBbodyPredFail era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AlonzoBbodyPredFail era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoBbodyPredFail era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (AuxiliaryData era), Typeable (Script era), ToCBOR (Script era)) ⇒ ToCBOR (AlonzoPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxow

Methods

toCBOR ∷ AlonzoPredFail era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AlonzoPredFail era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoPredFail era] → Size #

Crypto crypto ⇒ ToCBOR (GenDelegs crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ GenDelegs crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenDelegs crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenDelegs crypto] → Size #

(Typeable era, Era era, ToCBOR (TxOut era), ToCBOR (Value era), ToCBOR (PredicateFailure (EraRule "UTXOS" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxosPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxos

Methods

toCBOR ∷ UtxosPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxosPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxosPredicateFailure era] → Size #

(Typeable era, Era era) ⇒ ToCBOR (PpupPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

toCBOR ∷ PpupPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PpupPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PpupPredicateFailure era] → Size #

Typeable era ⇒ ToCBOR (WitnessPPData era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ WitnessPPData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessPPData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessPPData era] → Size #

Typeable era ⇒ ToCBOR (Redeemers era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

toCBOR ∷ Redeemers era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Redeemers era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Redeemers era] → Size #

Era era ⇒ ToCBOR (WitnessPPDataRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ WitnessPPDataRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessPPDataRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessPPDataRaw era] → Size #

ToCBOR (Attributes ()) 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

toCBOR ∷ Attributes () → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Attributes ()) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Attributes ()] → Size #

ToCBOR (Attributes AddrAttributes) 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toCBOR ∷ Attributes AddrAttributes → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Attributes AddrAttributes) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Attributes AddrAttributes] → Size #

ToCBOR a ⇒ ToCBOR (MerkleRoot a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

toCBOR ∷ MerkleRoot a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MerkleRoot a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MerkleRoot a] → Size #

ToCBOR a ⇒ ToCBOR (MerkleTree a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

toCBOR ∷ MerkleTree a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MerkleTree a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MerkleTree a] → Size #

ToCBOR n ⇒ ToCBOR (TooLarge n) 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ TooLarge n → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TooLarge n) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TooLarge n] → Size #

Crypto crypto ⇒ ToCBOR (CompactValue crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ CompactValue crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactValue crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactValue crypto] → Size #

Crypto crypto ⇒ ToCBOR (LastAppliedBlock crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ LastAppliedBlock crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LastAppliedBlock crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LastAppliedBlock crypto] → Size #

(Era era, Typeable era) ⇒ ToCBOR (LaxBlock era) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ LaxBlock era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LaxBlock era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LaxBlock era] → Size #

Crypto crypto ⇒ ToCBOR (GenesisCredential crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ GenesisCredential crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenesisCredential crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisCredential crypto] → Size #

ToCBORGroup a ⇒ ToCBOR (CBORGroup a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

toCBOR ∷ CBORGroup a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CBORGroup a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CBORGroup a] → Size #

Crypto crypto ⇒ ToCBOR (MIRCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MIRCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRCert crypto] → Size #

Crypto crypto ⇒ ToCBOR (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ StakeCreds crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (StakeCreds crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StakeCreds crypto] → Size #

Crypto crypto ⇒ ToCBOR (Stake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ Stake crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Stake crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Stake crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardSnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardSnapShot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardSnapShot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardSnapShot crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardUpdate crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardUpdate crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardUpdate crypto] → Size #

Crypto c ⇒ ToCBOR (RewardAns c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardAns c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardAns c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardAns c] → Size #

Crypto c ⇒ ToCBOR (Pulser c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ Pulser c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Pulser c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Pulser c] → Size #

Crypto crypto ⇒ ToCBOR (OBftSlot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OverlaySchedule

Methods

toCBOR ∷ OBftSlot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OBftSlot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OBftSlot crypto] → Size #

Crypto crypto ⇒ ToCBOR (FreeVars crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ FreeVars crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (FreeVars crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [FreeVars crypto] → Size #

Crypto crypto ⇒ ToCBOR (Reward crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ Reward crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Reward crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Reward crypto] → Size #

(Typeable era, Era era, Typeable (Script era)) ⇒ ToCBOR (DelegPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Deleg

Methods

toCBOR ∷ DelegPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelegPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelegPredicateFailure era] → Size #

(Typeable era, Era era) ⇒ ToCBOR (PoolPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Pool

Methods

toCBOR ∷ PoolPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolPredicateFailure era] → Size #

(ShelleyBased era, ToCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ ToCBOR (LedgersPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledgers

Methods

toCBOR ∷ LedgersPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgersPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgersPredicateFailure era] → Size #

(TransUTxOState ToCBOR era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (MIRTarget crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRTarget crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MIRTarget crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRTarget crypto] → Size #

(Era era, FromCBOR (PParamsDelta era), TransTxBody ToCBOR era) ⇒ ToCBOR (TxBodyRaw era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxBodyRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBodyRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBodyRaw era] → Size #

ToCBOR a ⇒ ToCBOR (CborSeq a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

toCBOR ∷ CborSeq a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CborSeq a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CborSeq a] → Size #

ToCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakePoolKey] → Size #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateKey] → Size #

ToCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisExtendedKey] → Size #

ToCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisKey] → Size #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeKey] → Size #

ToCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentExtendedKey] → Size #

ToCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentKey] → Size #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

ToCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakePoolKey] → Size #

ToCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisUTxOKey] → Size #

ToCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateExtendedKey] → Size #

ToCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateKey] → Size #

ToCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisExtendedKey] → Size #

ToCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisKey] → Size #

ToCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeExtendedKey] → Size #

ToCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeKey] → Size #

ToCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentExtendedKey] → Size #

ToCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentKey] → Size #

ToCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKeyLegacy] → Size #

ToCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKey] → Size #

ToCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey VrfKey] → Size #

ToCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey KesKey] → Size #

Typeable lang ⇒ ToCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toCBOR ∷ PlutusScript lang → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PlutusScript lang) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PlutusScript lang] → Size #

(ToCBOR a, ToCBOR b) ⇒ ToCBOR (Either a b) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Either a b → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Either a b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Either a b] → Size #

(ToCBOR a, ToCBOR b) ⇒ ToCBOR (a, b) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b)] → Size #

(Ord k, ToCBOR k, ToCBOR v) ⇒ ToCBOR (Map k v) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Map k v → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Map k v) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Map k v] → Size #

(HashAlgorithm h, Typeable a) ⇒ ToCBOR (Hash h a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

toCBOR ∷ Hash h a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Hash h a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Hash h a] → Size #

Era era ⇒ ToCBOR (WitnessSetHKD Identity era) 
Instance details

Defined in Shelley.Spec.Ledger.Tx

Methods

toCBOR ∷ WitnessSetHKD Identity era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessSetHKD Identity era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessSetHKD Identity era] → Size #

(Crypto crypto, Typeable disc) ⇒ ToCBOR (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ KeyHash disc crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (KeyHash disc crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KeyHash disc crypto] → Size #

(Typeable index, Crypto c) ⇒ ToCBOR (SafeHash c index) 
Instance details

Defined in Cardano.Ledger.SafeHash

Methods

toCBOR ∷ SafeHash c index → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SafeHash c index) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SafeHash c index] → Size #

(Typeable kr, Crypto crypto) ⇒ ToCBOR (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ Credential kr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Credential kr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Credential kr crypto] → Size #

(Typeable kr, Crypto crypto) ⇒ ToCBOR (WitVKey kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ WitVKey kr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitVKey kr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitVKey kr crypto] → Size #

(Typeable algo, Typeable a, HashAlgorithm algo) ⇒ ToCBOR (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

toCBOR ∷ AbstractHash algo a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AbstractHash algo a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AbstractHash algo a] → Size #

(Crypto crypto, Typeable kd) ⇒ ToCBOR (VKey kd crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ VKey kd crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VKey kd crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VKey kd crypto] → Size #

(VRFAlgorithm v, Typeable a) ⇒ ToCBOR (CertifiedVRF v a) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

toCBOR ∷ CertifiedVRF v a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertifiedVRF v a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertifiedVRF v a] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c) ⇒ ToCBOR (a, b, c) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c)] → Size #

(Typeable s, ToCBOR a) ⇒ ToCBOR (Tagged s a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Tagged s a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Tagged s a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tagged s a] → Size #

(Ord a, Ord b, ToCBOR a, ToCBOR b) ⇒ ToCBOR (BiMap b a b) 
Instance details

Defined in Control.Iterate.SetAlgebra

Methods

toCBOR ∷ BiMap b a b → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BiMap b a b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BiMap b a b] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d) ⇒ ToCBOR (a, b, c, d) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d)] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d, ToCBOR e) ⇒ ToCBOR (a, b, c, d, e) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d, e) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d, e) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d, e)] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d, ToCBOR e, ToCBOR f, ToCBOR g) ⇒ ToCBOR (a, b, c, d, e, f, g) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d, e, f, g) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d, e, f, g) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d, e, f, g)] → Size #

class Typeable a ⇒ FromCBOR a #

Minimal complete definition

fromCBOR

Instances

Instances details
FromCBOR Bool 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Bool #

label ∷ Proxy Bool → Text #

FromCBOR Float 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Float #

label ∷ Proxy Float → Text #

FromCBOR Int 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int #

label ∷ Proxy Int → Text #

FromCBOR Int32 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int32 #

label ∷ Proxy Int32 → Text #

FromCBOR Int64 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int64 #

label ∷ Proxy Int64 → Text #

FromCBOR Integer 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Integer #

label ∷ Proxy Integer → Text #

FromCBOR Natural 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Natural #

label ∷ Proxy Natural → Text #

FromCBOR Word 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word #

label ∷ Proxy Word → Text #

FromCBOR Word8 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word8 #

label ∷ Proxy Word8 → Text #

FromCBOR Word16 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word16 #

label ∷ Proxy Word16 → Text #

FromCBOR Word32 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word32 #

label ∷ Proxy Word32 → Text #

FromCBOR Word64 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word64 #

label ∷ Proxy Word64 → Text #

FromCBOR () 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s () #

label ∷ Proxy () → Text #

FromCBOR ByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s ByteString #

label ∷ Proxy ByteString → Text #

FromCBOR ShortByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s ShortByteString #

label ∷ Proxy ShortByteString → Text #

FromCBOR Nano 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Nano #

label ∷ Proxy Nano → Text #

FromCBOR Pico 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Pico #

label ∷ Proxy Pico → Text #

FromCBOR Void 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Void #

label ∷ Proxy Void → Text #

FromCBOR Text 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Text #

label ∷ Proxy Text → Text #

FromCBOR UTCTime 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s UTCTime #

label ∷ Proxy UTCTime → Text #

FromCBOR NominalDiffTime 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s NominalDiffTime #

label ∷ Proxy NominalDiffTime → Text #

FromCBOR BlockNo 
Instance details

Defined in Cardano.Slotting.Block

Methods

fromCBOR ∷ Decoder s BlockNo #

label ∷ Proxy BlockNo → Text #

FromCBOR LByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s LByteString #

label ∷ Proxy LByteString → Text #

FromCBOR EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s EpochNo #

label ∷ Proxy EpochNo → Text #

FromCBOR SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s SlotNo #

label ∷ Proxy SlotNo → Text #

FromCBOR Raw 
Instance details

Defined in Cardano.Binary.Raw

Methods

fromCBOR ∷ Decoder s Raw #

label ∷ Proxy Raw → Text #

FromCBOR Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s Coin #

label ∷ Proxy Coin → Text #

FromCBOR UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s UnitInterval #

label ∷ Proxy UnitInterval → Text #

FromCBOR ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s ProtVer #

label ∷ Proxy ProtVer → Text #

FromCBOR AlonzoGenesis 
Instance details

Defined in Cardano.Ledger.Alonzo.Genesis

Methods

fromCBOR ∷ Decoder s AlonzoGenesis #

label ∷ Proxy AlonzoGenesis → Text #

FromCBOR Language 
Instance details

Defined in Cardano.Ledger.Alonzo.Language

Methods

fromCBOR ∷ Decoder s Language #

label ∷ Proxy Language → Text #

FromCBOR CostModel 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s CostModel #

label ∷ Proxy CostModel → Text #

FromCBOR Prices 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s Prices #

label ∷ Proxy Prices → Text #

FromCBOR ExUnits 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s ExUnits #

label ∷ Proxy ExUnits → Text #

FromCBOR Metadatum 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

fromCBOR ∷ Decoder s Metadatum #

label ∷ Proxy Metadatum → Text #

FromCBOR AssetName 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s AssetName #

label ∷ Proxy AssetName → Text #

FromCBOR Likelihood 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s Likelihood #

label ∷ Proxy Likelihood → Text #

FromCBOR Ptr 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

fromCBOR ∷ Decoder s Ptr #

label ∷ Proxy Ptr → Text #

FromCBOR Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Nonce #

label ∷ Proxy Nonce → Text #

FromCBOR Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s Desirability #

label ∷ Proxy Desirability → Text #

FromCBOR StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s StakePoolRelay #

label ∷ Proxy StakePoolRelay → Text #

FromCBOR PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s PoolMetadata #

label ∷ Proxy PoolMetadata → Text #

FromCBOR Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Network #

label ∷ Proxy Network → Text #

FromCBOR ValidityInterval 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s ValidityInterval #

label ∷ Proxy ValidityInterval → Text #

FromCBOR ByronHash 
Instance details

Defined in Ouroboros.Consensus.Byron.Ledger.Block

Methods

fromCBOR ∷ Decoder s ByronHash #

label ∷ Proxy ByronHash → Text #

FromCBOR EpochAndSlotCount 
Instance details

Defined in Cardano.Chain.Slotting.EpochAndSlotCount

Methods

fromCBOR ∷ Decoder s EpochAndSlotCount #

label ∷ Proxy EpochAndSlotCount → Text #

FromCBOR EpochNumber 
Instance details

Defined in Cardano.Chain.Slotting.EpochNumber

Methods

fromCBOR ∷ Decoder s EpochNumber #

label ∷ Proxy EpochNumber → Text #

FromCBOR EpochSlots 
Instance details

Defined in Cardano.Chain.Slotting.EpochSlots

Methods

fromCBOR ∷ Decoder s EpochSlots #

label ∷ Proxy EpochSlots → Text #

FromCBOR SlotCount 
Instance details

Defined in Cardano.Chain.Slotting.SlotCount

Methods

fromCBOR ∷ Decoder s SlotCount #

label ∷ Proxy SlotCount → Text #

FromCBOR SlotNumber 
Instance details

Defined in Cardano.Chain.Slotting.SlotNumber

Methods

fromCBOR ∷ Decoder s SlotNumber #

label ∷ Proxy SlotNumber → Text #

FromCBOR Config 
Instance details

Defined in Cardano.Chain.Genesis.Config

Methods

fromCBOR ∷ Decoder s Config #

label ∷ Proxy Config → Text #

FromCBOR GenesisNonAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.NonAvvmBalances

Methods

fromCBOR ∷ Decoder s GenesisNonAvvmBalances #

label ∷ Proxy GenesisNonAvvmBalances → Text #

FromCBOR GenesisDelegation 
Instance details

Defined in Cardano.Chain.Genesis.Delegation

Methods

fromCBOR ∷ Decoder s GenesisDelegation #

label ∷ Proxy GenesisDelegation → Text #

FromCBOR GenesisKeyHashes 
Instance details

Defined in Cardano.Chain.Genesis.KeyHashes

Methods

fromCBOR ∷ Decoder s GenesisKeyHashes #

label ∷ Proxy GenesisKeyHashes → Text #

FromCBOR CompactAddress 
Instance details

Defined in Cardano.Chain.Common.Compact

Methods

fromCBOR ∷ Decoder s CompactAddress #

label ∷ Proxy CompactAddress → Text #

FromCBOR RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

fromCBOR ∷ Decoder s RequiresNetworkMagic #

label ∷ Proxy RequiresNetworkMagic → Text #

FromCBOR GenesisAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.AvvmBalances

Methods

fromCBOR ∷ Decoder s GenesisAvvmBalances #

label ∷ Proxy GenesisAvvmBalances → Text #

FromCBOR ProtocolParameters 
Instance details

Defined in Cardano.Chain.Update.ProtocolParameters

Methods

fromCBOR ∷ Decoder s ProtocolParameters #

label ∷ Proxy ProtocolParameters → Text #

FromCBOR ProtocolVersion 
Instance details

Defined in Cardano.Chain.Update.ProtocolVersion

Methods

fromCBOR ∷ Decoder s ProtocolVersion #

label ∷ Proxy ProtocolVersion → Text #

FromCBOR ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

fromCBOR ∷ Decoder s ProtocolMagicId #

label ∷ Proxy ProtocolMagicId → Text #

FromCBOR Certificate 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

fromCBOR ∷ Decoder s Certificate #

label ∷ Proxy Certificate → Text #

FromCBOR SigningKey 
Instance details

Defined in Cardano.Crypto.Signing.SigningKey

Methods

fromCBOR ∷ Decoder s SigningKey #

label ∷ Proxy SigningKey → Text #

FromCBOR SoftwareVersion 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

fromCBOR ∷ Decoder s SoftwareVersion #

label ∷ Proxy SoftwareVersion → Text #

FromCBOR VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

fromCBOR ∷ Decoder s VerificationKey #

label ∷ Proxy VerificationKey → Text #

FromCBOR KeyHash 
Instance details

Defined in Cardano.Chain.Common.KeyHash

Methods

fromCBOR ∷ Decoder s KeyHash #

label ∷ Proxy KeyHash → Text #

FromCBOR GenesisHash 
Instance details

Defined in Cardano.Chain.Genesis.Hash

Methods

fromCBOR ∷ Decoder s GenesisHash #

label ∷ Proxy GenesisHash → Text #

FromCBOR CandidateProtocolUpdate 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s CandidateProtocolUpdate #

label ∷ Proxy CandidateProtocolUpdate → Text #

FromCBOR Endorsement 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s Endorsement #

label ∷ Proxy Endorsement → Text #

FromCBOR ApplyMempoolPayloadErr 
Instance details

Defined in Cardano.Chain.Byron.API.Mempool

Methods

fromCBOR ∷ Decoder s ApplyMempoolPayloadErr #

label ∷ Proxy ApplyMempoolPayloadErr → Text #

FromCBOR Tx 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s Tx #

label ∷ Proxy Tx → Text #

FromCBOR Proposal 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s Proposal #

label ∷ Proxy Proposal → Text #

FromCBOR Vote 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

fromCBOR ∷ Decoder s Vote #

label ∷ Proxy Vote → Text #

FromCBOR ChainValidationState 
Instance details

Defined in Cardano.Chain.Block.Validation

Methods

fromCBOR ∷ Decoder s ChainValidationState #

label ∷ Proxy ChainValidationState → Text #

FromCBOR Map 
Instance details

Defined in Cardano.Chain.Delegation.Map

Methods

fromCBOR ∷ Decoder s Map #

label ∷ Proxy Map → Text #

FromCBOR ScheduledDelegation 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s ScheduledDelegation #

label ∷ Proxy ScheduledDelegation → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR UTxO 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

fromCBOR ∷ Decoder s UTxO #

label ∷ Proxy UTxO → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR ToSign 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s ToSign #

label ∷ Proxy ToSign → Text #

FromCBOR CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

fromCBOR ∷ Decoder s CompactRedeemVerificationKey #

label ∷ Proxy CompactRedeemVerificationKey → Text #

FromCBOR Lovelace 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

fromCBOR ∷ Decoder s Lovelace #

label ∷ Proxy Lovelace → Text #

FromCBOR SystemStart 
Instance details

Defined in Cardano.Slotting.Time

Methods

fromCBOR ∷ Decoder s SystemStart #

label ∷ Proxy SystemStart → Text #

FromCBOR Point 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s Point #

label ∷ Proxy Point → Text #

FromCBOR Proof 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s Proof #

label ∷ Proxy Proof → Text #

FromCBOR SignKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s SignKey #

label ∷ Proxy SignKey → Text #

FromCBOR VerKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s VerKey #

label ∷ Proxy VerKey → Text #

FromCBOR RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

fromCBOR ∷ Decoder s RedeemVerificationKey #

label ∷ Proxy RedeemVerificationKey → Text #

FromCBOR RedeemSigningKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.SigningKey

Methods

fromCBOR ∷ Decoder s RedeemSigningKey #

label ∷ Proxy RedeemSigningKey → Text #

FromCBOR IsValidating 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s IsValidating #

label ∷ Proxy IsValidating → Text #

FromCBOR Tag 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s Tag #

label ∷ Proxy Tag → Text #

FromCBOR ChainDifficulty 
Instance details

Defined in Cardano.Chain.Common.ChainDifficulty

Methods

fromCBOR ∷ Decoder s ChainDifficulty #

label ∷ Proxy ChainDifficulty → Text #

FromCBOR Proof 
Instance details

Defined in Cardano.Chain.Block.Proof

Methods

fromCBOR ∷ Decoder s Proof #

label ∷ Proxy Proof → Text #

FromCBOR SscPayload 
Instance details

Defined in Cardano.Chain.Ssc

Methods

fromCBOR ∷ Decoder s SscPayload #

label ∷ Proxy SscPayload → Text #

FromCBOR ProposalBody 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s ProposalBody #

label ∷ Proxy ProposalBody → Text #

FromCBOR TxInWitness 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

fromCBOR ∷ Decoder s TxInWitness #

label ∷ Proxy TxInWitness → Text #

FromCBOR Body 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

fromCBOR ∷ Decoder s Body #

label ∷ Proxy Body → Text #

FromCBOR TxPayload 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

fromCBOR ∷ Decoder s TxPayload #

label ∷ Proxy TxPayload → Text #

FromCBOR Payload 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

fromCBOR ∷ Decoder s Payload #

label ∷ Proxy Payload → Text #

FromCBOR Payload 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

fromCBOR ∷ Decoder s Payload #

label ∷ Proxy Payload → Text #

FromCBOR BlockSignature 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s BlockSignature #

label ∷ Proxy BlockSignature → Text #

FromCBOR TxProof 
Instance details

Defined in Cardano.Chain.UTxO.TxProof

Methods

fromCBOR ∷ Decoder s TxProof #

label ∷ Proxy TxProof → Text #

FromCBOR SscProof 
Instance details

Defined in Cardano.Chain.Ssc

Methods

fromCBOR ∷ Decoder s SscProof #

label ∷ Proxy SscProof → Text #

FromCBOR CompactTxIn 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxIn #

label ∷ Proxy CompactTxIn → Text #

FromCBOR CompactTxOut 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxOut #

label ∷ Proxy CompactTxOut → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Interface

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR UTxOValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

fromCBOR ∷ Decoder s UTxOValidationError #

label ∷ Proxy UTxOValidationError → Text #

FromCBOR BlockCount 
Instance details

Defined in Cardano.Chain.Common.BlockCount

Methods

fromCBOR ∷ Decoder s BlockCount #

label ∷ Proxy BlockCount → Text #

FromCBOR UTxOConfiguration 
Instance details

Defined in Cardano.Chain.UTxO.UTxOConfiguration

Methods

fromCBOR ∷ Decoder s UTxOConfiguration #

label ∷ Proxy UTxOConfiguration → Text #

FromCBOR ApplicationName 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

fromCBOR ∷ Decoder s ApplicationName #

label ∷ Proxy ApplicationName → Text #

FromCBOR ApplicationVersion 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s ApplicationVersion #

label ∷ Proxy ApplicationVersion → Text #

FromCBOR ProtocolUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s ProtocolUpdateProposal #

label ∷ Proxy ProtocolUpdateProposal → Text #

FromCBOR SoftwareUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s SoftwareUpdateProposal #

label ∷ Proxy SoftwareUpdateProposal → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR HDAddressPayload 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

fromCBOR ∷ Decoder s HDAddressPayload #

label ∷ Proxy HDAddressPayload → Text #

FromCBOR NetworkMagic 
Instance details

Defined in Cardano.Chain.Common.NetworkMagic

Methods

fromCBOR ∷ Decoder s NetworkMagic #

label ∷ Proxy NetworkMagic → Text #

FromCBOR AddrSpendingData 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

fromCBOR ∷ Decoder s AddrSpendingData #

label ∷ Proxy AddrSpendingData → Text #

FromCBOR AddrType 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

fromCBOR ∷ Decoder s AddrType #

label ∷ Proxy AddrType → Text #

FromCBOR Address 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

fromCBOR ∷ Decoder s Address #

label ∷ Proxy Address → Text #

FromCBOR Address' 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

fromCBOR ∷ Decoder s Address' #

label ∷ Proxy Address' → Text #

FromCBOR LovelaceError 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

fromCBOR ∷ Decoder s LovelaceError #

label ∷ Proxy LovelaceError → Text #

FromCBOR LovelacePortion 
Instance details

Defined in Cardano.Chain.Common.LovelacePortion

Methods

fromCBOR ∷ Decoder s LovelacePortion #

label ∷ Proxy LovelacePortion → Text #

FromCBOR TxFeePolicy 
Instance details

Defined in Cardano.Chain.Common.TxFeePolicy

Methods

fromCBOR ∷ Decoder s TxFeePolicy #

label ∷ Proxy TxFeePolicy → Text #

FromCBOR TxSizeLinear 
Instance details

Defined in Cardano.Chain.Common.TxSizeLinear

Methods

fromCBOR ∷ Decoder s TxSizeLinear #

label ∷ Proxy TxSizeLinear → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Activation

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR GenesisData 
Instance details

Defined in Cardano.Chain.Genesis.Data

Methods

fromCBOR ∷ Decoder s GenesisData #

label ∷ Proxy GenesisData → Text #

FromCBOR CompactTxId 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxId #

label ∷ Proxy CompactTxId → Text #

FromCBOR TxIn 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s TxIn #

label ∷ Proxy TxIn → Text #

FromCBOR TxOut 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s TxOut #

label ∷ Proxy TxOut → Text #

FromCBOR TxAux 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

fromCBOR ∷ Decoder s TxAux #

label ∷ Proxy TxAux → Text #

FromCBOR TxSigData 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

fromCBOR ∷ Decoder s TxSigData #

label ∷ Proxy TxSigData → Text #

FromCBOR UTxOError 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

fromCBOR ∷ Decoder s UTxOError #

label ∷ Proxy UTxOError → Text #

FromCBOR ApplicationNameError 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

fromCBOR ∷ Decoder s ApplicationNameError #

label ∷ Proxy ApplicationNameError → Text #

FromCBOR InstallerHash 
Instance details

Defined in Cardano.Chain.Update.InstallerHash

Methods

fromCBOR ∷ Decoder s InstallerHash #

label ∷ Proxy InstallerHash → Text #

FromCBOR SystemTag 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

fromCBOR ∷ Decoder s SystemTag #

label ∷ Proxy SystemTag → Text #

FromCBOR ProtocolParametersUpdate 
Instance details

Defined in Cardano.Chain.Update.ProtocolParametersUpdate

Methods

fromCBOR ∷ Decoder s ProtocolParametersUpdate #

label ∷ Proxy ProtocolParametersUpdate → Text #

FromCBOR SoftforkRule 
Instance details

Defined in Cardano.Chain.Update.SoftforkRule

Methods

fromCBOR ∷ Decoder s SoftforkRule #

label ∷ Proxy SoftforkRule → Text #

FromCBOR SoftwareVersionError 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

fromCBOR ∷ Decoder s SoftwareVersionError #

label ∷ Proxy SoftwareVersionError → Text #

FromCBOR SystemTagError 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

fromCBOR ∷ Decoder s SystemTagError #

label ∷ Proxy SystemTagError → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Voting

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Adopted 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s Adopted #

label ∷ Proxy Adopted → Text #

FromCBOR ActiveSlotCoeff 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s ActiveSlotCoeff #

label ∷ Proxy ActiveSlotCoeff → Text #

FromCBOR DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s DnsName #

label ∷ Proxy DnsName → Text #

FromCBOR Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Port #

label ∷ Proxy Port → Text #

FromCBOR Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Url #

label ∷ Proxy Url → Text #

FromCBOR DeltaCoin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s DeltaCoin #

label ∷ Proxy DeltaCoin → Text #

FromCBOR TicknState 
Instance details

Defined in Shelley.Spec.Ledger.STS.Tickn

Methods

fromCBOR ∷ Decoder s TicknState #

label ∷ Proxy TicknState → Text #

FromCBOR ChainCode 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

fromCBOR ∷ Decoder s ChainCode #

label ∷ Proxy ChainCode → Text #

FromCBOR AccountState 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s AccountState #

label ∷ Proxy AccountState → Text #

FromCBOR LogWeight 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s LogWeight #

label ∷ Proxy LogWeight → Text #

FromCBOR MIRPot 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s MIRPot #

label ∷ Proxy MIRPot → Text #

FromCBOR KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

fromCBOR ∷ Decoder s KESPeriod #

label ∷ Proxy KESPeriod → Text #

FromCBOR PerformanceEstimate 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s PerformanceEstimate #

label ∷ Proxy PerformanceEstimate → Text #

FromCBOR RewardType 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s RewardType #

label ∷ Proxy RewardType → Text #

FromCBOR VotingPeriod 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

fromCBOR ∷ Decoder s VotingPeriod #

label ∷ Proxy VotingPeriod → Text #

FromCBOR TxValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

fromCBOR ∷ Decoder s TxValidationError #

label ∷ Proxy TxValidationError → Text #

FromCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

fromCBOR ∷ Decoder s Certificate #

label ∷ Proxy Certificate → Text #

FromCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

fromCBOR ∷ Decoder s OperationalCertificateIssueCounter #

label ∷ Proxy OperationalCertificateIssueCounter → Text #

FromCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

fromCBOR ∷ Decoder s OperationalCertificate #

label ∷ Proxy OperationalCertificate → Text #

FromCBOR a ⇒ FromCBOR [a] 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s [a] #

label ∷ Proxy [a] → Text #

FromCBOR a ⇒ FromCBOR (Maybe a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Maybe a) #

label ∷ Proxy (Maybe a) → Text #

(Integral a, FromCBOR a) ⇒ FromCBOR (Ratio a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Ratio a) #

label ∷ Proxy (Ratio a) → Text #

(Ord a, FromCBOR a) ⇒ FromCBOR (Set a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Set a) #

label ∷ Proxy (Set a) → Text #

FromCBOR a ⇒ FromCBOR (NonEmpty a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (NonEmpty a) #

label ∷ Proxy (NonEmpty a) → Text #

(Serialise t, Typeable t) ⇒ FromCBOR (WithOrigin t) 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s (WithOrigin t) #

label ∷ Proxy (WithOrigin t) → Text #

FromCBOR a ⇒ FromCBOR (Vector a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Vector a) #

label ∷ Proxy (Vector a) → Text #

(Era era, Ord (Script era), FromCBOR (Annotator (Script era)), Script era ~ Script era) ⇒ FromCBOR (Annotator (AuxiliaryData era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryData era)) #

label ∷ Proxy (Annotator (AuxiliaryData era)) → Text #

(FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Script era)), FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (Witnesses era)), ToCBOR (AuxiliaryData era), ToCBOR (Script era), ToCBOR (TxBody era), ToCBOR (Witnesses era), ValidateScript era, Script era ~ Script era, Era era) ⇒ FromCBOR (Annotator (TxSeq era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxSeq

Methods

fromCBOR ∷ Decoder s (Annotator (TxSeq era)) #

label ∷ Proxy (Annotator (TxSeq era)) → Text #

(Era era, ValidateScript era, Script era ~ Script era) ⇒ FromCBOR (Annotator (TxWitness era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (TxWitness era)) #

label ∷ Proxy (Annotator (TxWitness era)) → Text #

(Typeable t, FromCBOR (Annotator t)) ⇒ FromCBOR (Annotator (MemoBytes t)) 
Instance details

Defined in Data.MemoBytes

Methods

fromCBOR ∷ Decoder s (Annotator (MemoBytes t)) #

label ∷ Proxy (Annotator (MemoBytes t)) → Text #

(Era era, ToCBOR (Data era), ToCBOR (Script era), Typeable (Script era), ValidateScript era, Script era ~ Script era) ⇒ FromCBOR (Annotator (TxWitnessRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (TxWitnessRaw era)) #

label ∷ Proxy (Annotator (TxWitnessRaw era)) → Text #

(Typeable era, FromCBOR (Annotator (Script era)), ValidateScript era) ⇒ FromCBOR (Annotator (WitnessSetHKD Identity era)) 
Instance details

Defined in Shelley.Spec.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessSetHKD Identity era)) #

label ∷ Proxy (Annotator (WitnessSetHKD Identity era)) → Text #

(BlockAnn era, Typeable era) ⇒ FromCBOR (Annotator (TxSeq era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (TxSeq era)) #

label ∷ Proxy (Annotator (TxSeq era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (Timelock crypto)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s (Annotator (Timelock crypto)) #

label ∷ Proxy (Annotator (Timelock crypto)) → Text #

(Era era, FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Witnesses era))) ⇒ FromCBOR (Annotator (Tx era)) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (Tx era)) #

label ∷ Proxy (Annotator (Tx era)) → Text #

(Era era, FromCBOR (TxOut era), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

(Era era, FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Witnesses era))) ⇒ FromCBOR (Annotator (TxRaw era)) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (TxRaw era)) #

label ∷ Proxy (Annotator (TxRaw era)) → Text #

FamsFrom era ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), SerialisableData (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (MultiSig crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (MultiSig crypto)) #

label ∷ Proxy (Annotator (MultiSig crypto)) → Text #

Typeable era ⇒ FromCBOR (Annotator (Metadata era)) 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

fromCBOR ∷ Decoder s (Annotator (Metadata era)) #

label ∷ Proxy (Annotator (Metadata era)) → Text #

(Era era, AnnotatedData (Script era)) ⇒ FromCBOR (Annotator (AuxiliaryData era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryData era)) #

label ∷ Proxy (Annotator (AuxiliaryData era)) → Text #

FamsFrom era ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

(Crypto (Crypto era), Typeable (Crypto era), Typeable era) ⇒ FromCBOR (Annotator (Script era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (Script era)) #

label ∷ Proxy (Annotator (Script era)) → Text #

Typeable era ⇒ FromCBOR (Annotator (Data era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (Data era)) #

label ∷ Proxy (Annotator (Data era)) → Text #

(Era era, Ord (Script era), FromCBOR (Annotator (Script era)), Script era ~ Script era) ⇒ FromCBOR (Annotator (AuxiliaryDataRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryDataRaw era)) #

label ∷ Proxy (Annotator (AuxiliaryDataRaw era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (TimelockRaw crypto)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s (Annotator (TimelockRaw crypto)) #

label ∷ Proxy (Annotator (TimelockRaw crypto)) → Text #

(Era era, AnnotatedData (Script era)) ⇒ FromCBOR (Annotator (AuxiliaryDataRaw era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryDataRaw era)) #

label ∷ Proxy (Annotator (AuxiliaryDataRaw era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (BHeader crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (BHeader crypto)) #

label ∷ Proxy (Annotator (BHeader crypto)) → Text #

(BlockAnn era, ValidateScript era, SupportsSegWit era, FromCBOR (Annotator (TxSeq era))) ⇒ FromCBOR (Annotator (Block era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (Block era)) #

label ∷ Proxy (Annotator (Block era)) → Text #

(Typeable kr, Crypto crypto) ⇒ FromCBOR (Annotator (WitVKey kr crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (WitVKey kr crypto)) #

label ∷ Proxy (Annotator (WitVKey kr crypto)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (BootstrapWitness crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

fromCBOR ∷ Decoder s (Annotator (BootstrapWitness crypto)) #

label ∷ Proxy (Annotator (BootstrapWitness crypto)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (MultiSigRaw crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (MultiSigRaw crypto)) #

label ∷ Proxy (Annotator (MultiSigRaw crypto)) → Text #

ShelleyBasedEra era ⇒ FromCBOR (Annotator (Header (ShelleyBlock era))) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (Annotator (Header (ShelleyBlock era))) #

label ∷ Proxy (Annotator (Header (ShelleyBlock era))) → Text #

ShelleyBasedEra era ⇒ FromCBOR (Annotator (ShelleyBlock era)) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (Annotator (ShelleyBlock era)) #

label ∷ Proxy (Annotator (ShelleyBlock era)) → Text #

Era era ⇒ FromCBOR (Annotator (RedeemersRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (RedeemersRaw era)) #

label ∷ Proxy (Annotator (RedeemersRaw era)) → Text #

Era era ⇒ FromCBOR (Annotator (WitnessPPData era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessPPData era)) #

label ∷ Proxy (Annotator (WitnessPPData era)) → Text #

Era era ⇒ FromCBOR (Annotator (Redeemers era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (Redeemers era)) #

label ∷ Proxy (Annotator (Redeemers era)) → Text #

Era era ⇒ FromCBOR (Annotator (WitnessPPDataRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessPPDataRaw era)) #

label ∷ Proxy (Annotator (WitnessPPDataRaw era)) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

(Era era, BlockAnn era, ValidateScript era, TxSeq era ~ TxSeq era) ⇒ FromCBOR (Annotator (LaxBlock era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (LaxBlock era)) #

label ∷ Proxy (Annotator (LaxBlock era)) → Text #

(TransTxBody FromCBOR era, ToCBOR (PParamsDelta era), Era era) ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

FromCBOR (SigDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (SigDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (SigDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed25519DSIGN) #

label ∷ Proxy (SigDSIGN Ed25519DSIGN) → Text #

FromCBOR (SigDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (SigDSIGN MockDSIGN) #

label ∷ Proxy (SigDSIGN MockDSIGN) → Text #

FromCBOR (SigDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed448DSIGN) #

label ∷ Proxy (SigDSIGN Ed448DSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed25519DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed25519DSIGN) → Text #

FromCBOR (SignKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN MockDSIGN) #

label ∷ Proxy (SignKeyDSIGN MockDSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed448DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed448DSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed25519DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed25519DSIGN) → Text #

FromCBOR (VerKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN MockDSIGN) #

label ∷ Proxy (VerKeyDSIGN MockDSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed448DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed448DSIGN) → Text #

Crypto crypto ⇒ FromCBOR (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

fromCBOR ∷ Decoder s (ScriptHash crypto) #

label ∷ Proxy (ScriptHash crypto) → Text #

FromCBOR a ⇒ FromCBOR (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

fromCBOR ∷ Decoder s (StrictMaybe a) #

label ∷ Proxy (StrictMaybe a) → Text #

Crypto crypto ⇒ FromCBOR (AuxiliaryDataHash crypto) 
Instance details

Defined in Cardano.Ledger.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (AuxiliaryDataHash crypto) #

label ∷ Proxy (AuxiliaryDataHash crypto) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (PPUPState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (PPUPState era) #

label ∷ Proxy (PPUPState era) → Text #

Crypto crypto ⇒ FromCBOR (Value crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (Value crypto) #

label ∷ Proxy (Value crypto) → Text #

Era era ⇒ FromCBOR (PParamsUpdate era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (PParamsUpdate era) #

label ∷ Proxy (PParamsUpdate era) → Text #

Era era ⇒ FromCBOR (PParams era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (PParams era) #

label ∷ Proxy (PParams era) → Text #

(Era era, TransTxOut DecodeNonNegative era, Show (Value era)) ⇒ FromCBOR (TxOut era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxOut era) #

label ∷ Proxy (TxOut era) → Text #

Era era ⇒ FromCBOR (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (PParams era) #

label ∷ Proxy (PParams era) → Text #

Era era ⇒ FromCBOR (PParamsUpdate era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (PParamsUpdate era) #

label ∷ Proxy (PParamsUpdate era) → Text #

FamsFrom era ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

(FromCBOR (PParams era), TransValue FromCBOR era, HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era), FromCBOR (TxOut era), FromCBOR (State (EraRule "PPUP" era)), Era era) ⇒ FromCBOR (EpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (EpochState era) #

label ∷ Proxy (EpochState era) → Text #

(Era era, HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era), FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (State (EraRule "PPUP" era))) ⇒ FromCBOR (LedgerState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (LedgerState era) #

label ∷ Proxy (LedgerState era) → Text #

(TransValue FromCBOR era, FromCBOR (State (EraRule "PPUP" era)), FromCBOR (TxOut era), HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era)) ⇒ FromCBOR (UTxOState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (UTxOState era) #

label ∷ Proxy (UTxOState era) → Text #

Crypto crypto ⇒ FromCBOR (DPState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (DPState crypto) #

label ∷ Proxy (DPState crypto) → Text #

(Era era, FromCBOR (PParams era), FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (State (EraRule "PPUP" era))) ⇒ FromCBOR (NewEpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (NewEpochState era) #

label ∷ Proxy (NewEpochState era) → Text #

Crypto crypto ⇒ FromCBOR (TxIn crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxIn crypto) #

label ∷ Proxy (TxIn crypto) → Text #

Crypto crypto ⇒ FromCBOR (CompactAddr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.CompactAddr

Methods

fromCBOR ∷ Decoder s (CompactAddr crypto) #

label ∷ Proxy (CompactAddr crypto) → Text #

Crypto crypto ⇒ FromCBOR (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (BlocksMade crypto) #

label ∷ Proxy (BlocksMade crypto) → Text #

Crypto crypto ⇒ FromCBOR (SnapShots crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (SnapShots crypto) #

label ∷ Proxy (SnapShots crypto) → Text #

Crypto crypto ⇒ FromCBOR (NonMyopic crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s (NonMyopic crypto) #

label ∷ Proxy (NonMyopic crypto) → Text #

Crypto crypto ⇒ FromCBOR (PulsingRewUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (PulsingRewUpdate crypto) #

label ∷ Proxy (PulsingRewUpdate crypto) → Text #

Crypto crypto ⇒ FromCBOR (PoolDistr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

fromCBOR ∷ Decoder s (PoolDistr crypto) #

label ∷ Proxy (PoolDistr crypto) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (ProposedPPUpdates era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (ProposedPPUpdates era) #

label ∷ Proxy (ProposedPPUpdates era) → Text #

Era era ⇒ FromCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

fromCBOR ∷ Decoder s (ShelleyGenesis era) #

label ∷ Proxy (ShelleyGenesis era) → Text #

Crypto crypto ⇒ FromCBOR (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (GenDelegPair crypto) #

label ∷ Proxy (GenDelegPair crypto) → Text #

Crypto crypto ⇒ FromCBOR (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

fromCBOR ∷ Decoder s (Addr crypto) #

label ∷ Proxy (Addr crypto) → Text #

Crypto crypto ⇒ FromCBOR (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

fromCBOR ∷ Decoder s (ShelleyGenesisStaking crypto) #

label ∷ Proxy (ShelleyGenesisStaking crypto) → Text #

FromCBOR (CompactForm Coin) 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s (CompactForm Coin) #

label ∷ Proxy (CompactForm Coin) → Text #

Crypto crypto ⇒ FromCBOR (CompactForm (Value crypto)) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (CompactForm (Value crypto)) #

label ∷ Proxy (CompactForm (Value crypto)) → Text #

(FromCBOR (TxOut era), Era era) ⇒ FromCBOR (UTxO era) 
Instance details

Defined in Shelley.Spec.Ledger.UTxO

Methods

fromCBOR ∷ Decoder s (UTxO era) #

label ∷ Proxy (UTxO era) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (Update era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (Update era) #

label ∷ Proxy (Update era) → Text #

(Era era, DecodeNonNegative (Value era), Show (Value era), Compactible (Value era)) ⇒ FromCBOR (TxOut era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (TxOut era) #

label ∷ Proxy (TxOut era) → Text #

Crypto crypto ⇒ FromCBOR (PolicyID crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (PolicyID crypto) #

label ∷ Proxy (PolicyID crypto) → Text #

(ShelleyBased era, FromCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ FromCBOR (ApplyTxError era) 
Instance details

Defined in Shelley.Spec.Ledger.API.Mempool

Methods

fromCBOR ∷ Decoder s (ApplyTxError era) #

label ∷ Proxy (ApplyTxError era) → Text #

(FromCBOR (PredicateFailure (EraRule "DELEGS" era)), FromCBOR (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ FromCBOR (LedgerPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledger

Methods

fromCBOR ∷ Decoder s (LedgerPredicateFailure era) #

label ∷ Proxy (LedgerPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "DELPL" era)), Typeable (Script era)) ⇒ FromCBOR (DelegsPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delegs

Methods

fromCBOR ∷ Decoder s (DelegsPredicateFailure era) #

label ∷ Proxy (DelegsPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "POOL" era)), FromCBOR (PredicateFailure (EraRule "DELEG" era)), Typeable (Script era)) ⇒ FromCBOR (DelplPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delpl

Methods

fromCBOR ∷ Decoder s (DelplPredicateFailure era) #

label ∷ Proxy (DelplPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (PState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (PState crypto) #

label ∷ Proxy (PState crypto) → Text #

Crypto crypto ⇒ FromCBOR (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (PoolParams crypto) #

label ∷ Proxy (PoolParams crypto) → Text #

Crypto crypto ⇒ FromCBOR (InstantaneousRewards crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (InstantaneousRewards crypto) #

label ∷ Proxy (InstantaneousRewards crypto) → Text #

Crypto crypto ⇒ FromCBOR (SnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (SnapShot crypto) #

label ∷ Proxy (SnapShot crypto) → Text #

Crypto crypto ⇒ FromCBOR (ChainDepState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.API.Protocol

Methods

fromCBOR ∷ Decoder s (ChainDepState crypto) #

label ∷ Proxy (ChainDepState crypto) → Text #

Crypto crypto ⇒ FromCBOR (FutureGenDeleg crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (FutureGenDeleg crypto) #

label ∷ Proxy (FutureGenDeleg crypto) → Text #

Crypto crypto ⇒ FromCBOR (DState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (DState crypto) #

label ∷ Proxy (DState crypto) → Text #

Crypto crypto ⇒ FromCBOR (IndividualPoolStake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

fromCBOR ∷ Decoder s (IndividualPoolStake crypto) #

label ∷ Proxy (IndividualPoolStake crypto) → Text #

(TransValue FromCBOR era, TransUTxO FromCBOR era, DecodeNonNegative (Value era), Show (Value era), FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Rules.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (Script era), Typeable (AuxiliaryData era)) ⇒ FromCBOR (UtxowPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxow

Methods

fromCBOR ∷ Decoder s (UtxowPredicateFailure era) #

label ∷ Proxy (UtxowPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s (RewardProvenance crypto) #

label ∷ Proxy (RewardProvenance crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s (RewardProvenancePool crypto) #

label ∷ Proxy (RewardProvenancePool crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

fromCBOR ∷ Decoder s (RewardAcnt crypto) #

label ∷ Proxy (RewardAcnt crypto) → Text #

Crypto crypto ⇒ FromCBOR (TxId crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxId crypto) #

label ∷ Proxy (TxId crypto) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (SigKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (SigKES (SingleKES d)) #

label ∷ Proxy (SigKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (SigKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (SigKES (SumKES h d)) #

label ∷ Proxy (SigKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (SigKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (SigKES (MockKES t)) #

label ∷ Proxy (SigKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (SigKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (SigKES (SimpleKES d t)) #

label ∷ Proxy (SigKES (SimpleKES d t)) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (VerKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SingleKES d)) #

label ∷ Proxy (VerKeyKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (VerKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SumKES h d)) #

label ∷ Proxy (VerKeyKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (VerKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyKES (MockKES t)) #

label ∷ Proxy (VerKeyKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (VerKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SimpleKES d t)) #

label ∷ Proxy (VerKeyKES (SimpleKES d t)) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (SignKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SingleKES d)) #

label ∷ Proxy (SignKeyKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (SignKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SumKES h d)) #

label ∷ Proxy (SignKeyKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (SignKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyKES (MockKES t)) #

label ∷ Proxy (SignKeyKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (SignKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SimpleKES d t)) #

label ∷ Proxy (SignKeyKES (SimpleKES d t)) → Text #

Crypto c ⇒ FromCBOR (ShelleyHash c) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (ShelleyHash c) #

label ∷ Proxy (ShelleyHash c) → Text #

Era era ⇒ FromCBOR (CompactGenesis era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Config

Methods

fromCBOR ∷ Decoder s (CompactGenesis era) #

label ∷ Proxy (CompactGenesis era) → Text #

FromCBOR (ATxAux ByteSpan) 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

fromCBOR ∷ Decoder s (ATxAux ByteSpan) #

label ∷ Proxy (ATxAux ByteSpan) → Text #

FromCBOR (ACertificate ByteSpan) 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

fromCBOR ∷ Decoder s (ACertificate ByteSpan) #

label ∷ Proxy (ACertificate ByteSpan) → Text #

FromCBOR (AProposal ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s (AProposal ByteSpan) #

label ∷ Proxy (AProposal ByteSpan) → Text #

FromCBOR (AVote ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

fromCBOR ∷ Decoder s (AVote ByteSpan) #

label ∷ Proxy (AVote ByteSpan) → Text #

Crypto crypto ⇒ FromCBOR (BHBody crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (BHBody crypto) #

label ∷ Proxy (BHBody crypto) → Text #

Crypto crypto ⇒ FromCBOR (PrevHash crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (PrevHash crypto) #

label ∷ Proxy (PrevHash crypto) → Text #

Crypto crypto ⇒ FromCBOR (HashHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (HashHeader crypto) #

label ∷ Proxy (HashHeader crypto) → Text #

Crypto crypto ⇒ FromCBOR (PrtclState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Prtcl

Methods

fromCBOR ∷ Decoder s (PrtclState crypto) #

label ∷ Proxy (PrtclState crypto) → Text #

Typeable v ⇒ FromCBOR (OutputVRF v) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

fromCBOR ∷ Decoder s (OutputVRF v) #

label ∷ Proxy (OutputVRF v) → Text #

FromCBOR (CertVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (CertVRF PraosVRF) #

label ∷ Proxy (CertVRF PraosVRF) → Text #

FromCBOR (CertVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (CertVRF MockVRF) #

label ∷ Proxy (CertVRF MockVRF) → Text #

FromCBOR (CertVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (CertVRF SimpleVRF) #

label ∷ Proxy (CertVRF SimpleVRF) → Text #

FromCBOR (SignKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (SignKeyVRF PraosVRF) #

label ∷ Proxy (SignKeyVRF PraosVRF) → Text #

FromCBOR (SignKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyVRF MockVRF) #

label ∷ Proxy (SignKeyVRF MockVRF) → Text #

FromCBOR (SignKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (SignKeyVRF SimpleVRF) #

label ∷ Proxy (SignKeyVRF SimpleVRF) → Text #

FromCBOR (VerKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (VerKeyVRF PraosVRF) #

label ∷ Proxy (VerKeyVRF PraosVRF) → Text #

FromCBOR (VerKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyVRF MockVRF) #

label ∷ Proxy (VerKeyVRF MockVRF) → Text #

FromCBOR (VerKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (VerKeyVRF SimpleVRF) #

label ∷ Proxy (VerKeyVRF SimpleVRF) → Text #

Typeable a ⇒ FromCBOR (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

fromCBOR ∷ Decoder s (RedeemSignature a) #

label ∷ Proxy (RedeemSignature a) → Text #

Typeable a ⇒ FromCBOR (Signature a) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

fromCBOR ∷ Decoder s (Signature a) #

label ∷ Proxy (Signature a) → Text #

Typeable era ⇒ FromCBOR (LangDepView era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (LangDepView era) #

label ∷ Proxy (LangDepView era) → Text #

Crypto crypto ⇒ FromCBOR (CollectError crypto) 
Instance details

Defined in Cardano.Ledger.Alonzo.PlutusScriptApi

Methods

fromCBOR ∷ Decoder s (CollectError crypto) #

label ∷ Proxy (CollectError crypto) → Text #

(Typeable c, Crypto c) ⇒ FromCBOR (ScriptPurpose c) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (ScriptPurpose c) #

label ∷ Proxy (ScriptPurpose c) → Text #

Crypto crypto ⇒ FromCBOR (Wdrl crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Wdrl crypto) #

label ∷ Proxy (Wdrl crypto) → Text #

Crypto crypto ⇒ FromCBOR (DCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (DCert crypto) #

label ∷ Proxy (DCert crypto) → Text #

(Typeable era, FromCBOR (BbodyPredicateFailure era)) ⇒ FromCBOR (AlonzoBbodyPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Bbody

Methods

fromCBOR ∷ Decoder s (AlonzoBbodyPredFail era) #

label ∷ Proxy (AlonzoBbodyPredFail era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (Script era), Typeable (AuxiliaryData era)) ⇒ FromCBOR (AlonzoPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxow

Methods

fromCBOR ∷ Decoder s (AlonzoPredFail era) #

label ∷ Proxy (AlonzoPredFail era) → Text #

Crypto crypto ⇒ FromCBOR (GenDelegs crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (GenDelegs crypto) #

label ∷ Proxy (GenDelegs crypto) → Text #

(Era era, FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (PredicateFailure (EraRule "UTXOS" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxosPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxos

Methods

fromCBOR ∷ Decoder s (UtxosPredicateFailure era) #

label ∷ Proxy (UtxosPredicateFailure era) → Text #

Era era ⇒ FromCBOR (PpupPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

fromCBOR ∷ Decoder s (PpupPredicateFailure era) #

label ∷ Proxy (PpupPredicateFailure era) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

FromCBOR (ABody ByteSpan) 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

fromCBOR ∷ Decoder s (ABody ByteSpan) #

label ∷ Proxy (ABody ByteSpan) → Text #

FromCBOR (APayload ByteSpan) 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

fromCBOR ∷ Decoder s (APayload ByteSpan) #

label ∷ Proxy (APayload ByteSpan) → Text #

FromCBOR (ABlockSignature ByteSpan) 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s (ABlockSignature ByteSpan) #

label ∷ Proxy (ABlockSignature ByteSpan) → Text #

FromCBOR (ATxPayload ByteSpan) 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

fromCBOR ∷ Decoder s (ATxPayload ByteSpan) #

label ∷ Proxy (ATxPayload ByteSpan) → Text #

FromCBOR (APayload ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

fromCBOR ∷ Decoder s (APayload ByteSpan) #

label ∷ Proxy (APayload ByteSpan) → Text #

FromCBOR (Attributes ()) 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

fromCBOR ∷ Decoder s (Attributes ()) #

label ∷ Proxy (Attributes ()) → Text #

FromCBOR (Attributes AddrAttributes) 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

fromCBOR ∷ Decoder s (Attributes AddrAttributes) #

label ∷ Proxy (Attributes AddrAttributes) → Text #

FromCBOR a ⇒ FromCBOR (MerkleRoot a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

fromCBOR ∷ Decoder s (MerkleRoot a) #

label ∷ Proxy (MerkleRoot a) → Text #

(FromCBOR a, ToCBOR a) ⇒ FromCBOR (MerkleTree a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

fromCBOR ∷ Decoder s (MerkleTree a) #

label ∷ Proxy (MerkleTree a) → Text #

FromCBOR n ⇒ FromCBOR (TooLarge n) 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s (TooLarge n) #

label ∷ Proxy (TooLarge n) → Text #

Crypto crypto ⇒ FromCBOR (CompactValue crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (CompactValue crypto) #

label ∷ Proxy (CompactValue crypto) → Text #

Crypto crypto ⇒ FromCBOR (LastAppliedBlock crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (LastAppliedBlock crypto) #

label ∷ Proxy (LastAppliedBlock crypto) → Text #

(FromCBORGroup a, ToCBORGroup a) ⇒ FromCBOR (CBORGroup a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

fromCBOR ∷ Decoder s (CBORGroup a) #

label ∷ Proxy (CBORGroup a) → Text #

Crypto crypto ⇒ FromCBOR (MIRCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (MIRCert crypto) #

label ∷ Proxy (MIRCert crypto) → Text #

Crypto crypto ⇒ FromCBOR (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (StakeCreds crypto) #

label ∷ Proxy (StakeCreds crypto) → Text #

Crypto crypto ⇒ FromCBOR (Stake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (Stake crypto) #

label ∷ Proxy (Stake crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardSnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardSnapShot crypto) #

label ∷ Proxy (RewardSnapShot crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardUpdate crypto) #

label ∷ Proxy (RewardUpdate crypto) → Text #

Crypto c ⇒ FromCBOR (RewardAns c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardAns c) #

label ∷ Proxy (RewardAns c) → Text #

Crypto c ⇒ FromCBOR (Pulser c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (Pulser c) #

label ∷ Proxy (Pulser c) → Text #

Crypto crypto ⇒ FromCBOR (OBftSlot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OverlaySchedule

Methods

fromCBOR ∷ Decoder s (OBftSlot crypto) #

label ∷ Proxy (OBftSlot crypto) → Text #

Crypto crypto ⇒ FromCBOR (FreeVars crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (FreeVars crypto) #

label ∷ Proxy (FreeVars crypto) → Text #

Crypto crypto ⇒ FromCBOR (Reward crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s (Reward crypto) #

label ∷ Proxy (Reward crypto) → Text #

(Era era, Typeable (Script era)) ⇒ FromCBOR (DelegPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Deleg

Methods

fromCBOR ∷ Decoder s (DelegPredicateFailure era) #

label ∷ Proxy (DelegPredicateFailure era) → Text #

Era era ⇒ FromCBOR (PoolPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Pool

Methods

fromCBOR ∷ Decoder s (PoolPredicateFailure era) #

label ∷ Proxy (PoolPredicateFailure era) → Text #

(ShelleyBased era, FromCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ FromCBOR (LedgersPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledgers

Methods

fromCBOR ∷ Decoder s (LedgersPredicateFailure era) #

label ∷ Proxy (LedgersPredicateFailure era) → Text #

(TransValue FromCBOR era, TransUTxO FromCBOR era, DecodeNonNegative (Value era), Show (Value era), FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (MIRTarget crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (MIRTarget crypto) #

label ∷ Proxy (MIRTarget crypto) → Text #

(FromCBOR (TxOut era), Era era, FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

FromCBOR a ⇒ FromCBOR (CborSeq a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

fromCBOR ∷ Decoder s (CborSeq a) #

label ∷ Proxy (CborSeq a) → Text #

FromCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakePoolKey) #

label ∷ Proxy (VerificationKey StakePoolKey) → Text #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateKey) #

label ∷ Proxy (VerificationKey GenesisDelegateKey) → Text #

FromCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisExtendedKey) #

label ∷ Proxy (VerificationKey GenesisExtendedKey) → Text #

FromCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisKey) #

label ∷ Proxy (VerificationKey GenesisKey) → Text #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeKey) #

label ∷ Proxy (VerificationKey StakeKey) → Text #

FromCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentExtendedKey) #

label ∷ Proxy (VerificationKey PaymentExtendedKey) → Text #

FromCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentKey) #

label ∷ Proxy (VerificationKey PaymentKey) → Text #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

FromCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakePoolKey) #

label ∷ Proxy (SigningKey StakePoolKey) → Text #

FromCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisUTxOKey) #

label ∷ Proxy (SigningKey GenesisUTxOKey) → Text #

FromCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateExtendedKey) #

label ∷ Proxy (SigningKey GenesisDelegateExtendedKey) → Text #

FromCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateKey) #

label ∷ Proxy (SigningKey GenesisDelegateKey) → Text #

FromCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisExtendedKey) #

label ∷ Proxy (SigningKey GenesisExtendedKey) → Text #

FromCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisKey) #

label ∷ Proxy (SigningKey GenesisKey) → Text #

FromCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeExtendedKey) #

label ∷ Proxy (SigningKey StakeExtendedKey) → Text #

FromCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeKey) #

label ∷ Proxy (SigningKey StakeKey) → Text #

FromCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentExtendedKey) #

label ∷ Proxy (SigningKey PaymentExtendedKey) → Text #

FromCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentKey) #

label ∷ Proxy (SigningKey PaymentKey) → Text #

FromCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKeyLegacy) #

label ∷ Proxy (SigningKey ByronKeyLegacy) → Text #

FromCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKey) #

label ∷ Proxy (SigningKey ByronKey) → Text #

FromCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey VrfKey) #

label ∷ Proxy (SigningKey VrfKey) → Text #

FromCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey KesKey) #

label ∷ Proxy (SigningKey KesKey) → Text #

Typeable lang ⇒ FromCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

fromCBOR ∷ Decoder s (PlutusScript lang) #

label ∷ Proxy (PlutusScript lang) → Text #

(Typeable era, TransLedgerState FromCBOR (ShelleyLedgerEra era)) ⇒ FromCBOR (DebugLedgerState era) Source # 
Instance details

Defined in Cardano.Api.Query

Methods

fromCBOR ∷ Decoder s (DebugLedgerState era) #

label ∷ Proxy (DebugLedgerState era) → Text #

(FromCBOR a, FromCBOR b) ⇒ FromCBOR (Either a b) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Either a b) #

label ∷ Proxy (Either a b) → Text #

(FromCBOR a, FromCBOR b) ⇒ FromCBOR (a, b) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b) #

label ∷ Proxy (a, b) → Text #

(Ord k, FromCBOR k, FromCBOR v) ⇒ FromCBOR (Map k v) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Map k v) #

label ∷ Proxy (Map k v) → Text #

(HashAlgorithm h, Typeable a) ⇒ FromCBOR (Hash h a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

fromCBOR ∷ Decoder s (Hash h a) #

label ∷ Proxy (Hash h a) → Text #

(Crypto crypto, Typeable disc) ⇒ FromCBOR (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (KeyHash disc crypto) #

label ∷ Proxy (KeyHash disc crypto) → Text #

(Typeable index, Crypto c) ⇒ FromCBOR (SafeHash c index) 
Instance details

Defined in Cardano.Ledger.SafeHash

Methods

fromCBOR ∷ Decoder s (SafeHash c index) #

label ∷ Proxy (SafeHash c index) → Text #

(Typeable kr, Crypto crypto) ⇒ FromCBOR (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

fromCBOR ∷ Decoder s (Credential kr crypto) #

label ∷ Proxy (Credential kr crypto) → Text #

(Typeable algo, Typeable a, HashAlgorithm algo) ⇒ FromCBOR (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

fromCBOR ∷ Decoder s (AbstractHash algo a) #

label ∷ Proxy (AbstractHash algo a) → Text #

(Crypto crypto, Typeable kd) ⇒ FromCBOR (VKey kd crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (VKey kd crypto) #

label ∷ Proxy (VKey kd crypto) → Text #

(VRFAlgorithm v, Typeable a) ⇒ FromCBOR (CertifiedVRF v a) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

fromCBOR ∷ Decoder s (CertifiedVRF v a) #

label ∷ Proxy (CertifiedVRF v a) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c) ⇒ FromCBOR (a, b, c) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c) #

label ∷ Proxy (a, b, c) → Text #

(Typeable s, FromCBOR a) ⇒ FromCBOR (Tagged s a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s0 (Tagged s a) #

label ∷ Proxy (Tagged s a) → Text #

(Ord a, Ord b, FromCBOR a, FromCBOR b) ⇒ FromCBOR (BiMap b a b) 
Instance details

Defined in Control.Iterate.SetAlgebra

Methods

fromCBOR ∷ Decoder s (BiMap b a b) #

label ∷ Proxy (BiMap b a b) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d) ⇒ FromCBOR (a, b, c, d) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d) #

label ∷ Proxy (a, b, c, d) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d, FromCBOR e) ⇒ FromCBOR (a, b, c, d, e) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d, e) #

label ∷ Proxy (a, b, c, d, e) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d, FromCBOR e, FromCBOR f, FromCBOR g) ⇒ FromCBOR (a, b, c, d, e, f, g) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d, e, f, g) #

label ∷ Proxy (a, b, c, d, e, f, g) → Text #

serialiseToCBOR ∷ SerialiseAsCBOR a ⇒ a → ByteString Source #

deserialiseFromCBOR ∷ SerialiseAsCBOR a ⇒ AsType a → ByteString → Either DecoderError a Source #

JSON

class ToJSON a #

Instances

Instances details
ToJSON Bool 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Bool → Value #

toEncoding ∷ Bool → Encoding #

toJSONList ∷ [Bool] → Value #

toEncodingList ∷ [Bool] → Encoding #

ToJSON Char 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Char → Value #

toEncoding ∷ Char → Encoding #

toJSONList ∷ [Char] → Value #

toEncodingList ∷ [Char] → Encoding #

ToJSON Double 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Double → Value #

toEncoding ∷ Double → Encoding #

toJSONList ∷ [Double] → Value #

toEncodingList ∷ [Double] → Encoding #

ToJSON Float 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Float → Value #

toEncoding ∷ Float → Encoding #

toJSONList ∷ [Float] → Value #

toEncodingList ∷ [Float] → Encoding #

ToJSON Int 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Int → Value #

toEncoding ∷ Int → Encoding #

toJSONList ∷ [Int] → Value #

toEncodingList ∷ [Int] → Encoding #

ToJSON Int8 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Int8 → Value #

toEncoding ∷ Int8 → Encoding #

toJSONList ∷ [Int8] → Value #

toEncodingList ∷ [Int8] → Encoding #

ToJSON Int16 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Int16 → Value #

toEncoding ∷ Int16 → Encoding #

toJSONList ∷ [Int16] → Value #

toEncodingList ∷ [Int16] → Encoding #

ToJSON Int32 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Int32 → Value #

toEncoding ∷ Int32 → Encoding #

toJSONList ∷ [Int32] → Value #

toEncodingList ∷ [Int32] → Encoding #

ToJSON Int64 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Int64 → Value #

toEncoding ∷ Int64 → Encoding #

toJSONList ∷ [Int64] → Value #

toEncodingList ∷ [Int64] → Encoding #

ToJSON Integer 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Integer → Value #

toEncoding ∷ Integer → Encoding #

toJSONList ∷ [Integer] → Value #

toEncodingList ∷ [Integer] → Encoding #

ToJSON Natural 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Natural → Value #

toEncoding ∷ Natural → Encoding #

toJSONList ∷ [Natural] → Value #

toEncodingList ∷ [Natural] → Encoding #

ToJSON Ordering 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Ordering → Value #

toEncoding ∷ Ordering → Encoding #

toJSONList ∷ [Ordering] → Value #

toEncodingList ∷ [Ordering] → Encoding #

ToJSON Word 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Word → Value #

toEncoding ∷ Word → Encoding #

toJSONList ∷ [Word] → Value #

toEncodingList ∷ [Word] → Encoding #

ToJSON Word8 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Word8 → Value #

toEncoding ∷ Word8 → Encoding #

toJSONList ∷ [Word8] → Value #

toEncodingList ∷ [Word8] → Encoding #

ToJSON Word16 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Word16 → Value #

toEncoding ∷ Word16 → Encoding #

toJSONList ∷ [Word16] → Value #

toEncodingList ∷ [Word16] → Encoding #

ToJSON Word32 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Word32 → Value #

toEncoding ∷ Word32 → Encoding #

toJSONList ∷ [Word32] → Value #

toEncodingList ∷ [Word32] → Encoding #

ToJSON Word64 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Word64 → Value #

toEncoding ∷ Word64 → Encoding #

toJSONList ∷ [Word64] → Value #

toEncodingList ∷ [Word64] → Encoding #

ToJSON () 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ () → Value #

toEncoding ∷ () → Encoding #

toJSONList ∷ [()] → Value #

toEncodingList ∷ [()] → Encoding #

ToJSON Version 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Version → Value #

toEncoding ∷ Version → Encoding #

toJSONList ∷ [Version] → Value #

toEncodingList ∷ [Version] → Encoding #

ToJSON Void 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Void → Value #

toEncoding ∷ Void → Encoding #

toJSONList ∷ [Void] → Value #

toEncodingList ∷ [Void] → Encoding #

ToJSON CTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ CTime → Value #

toEncoding ∷ CTime → Encoding #

toJSONList ∷ [CTime] → Value #

toEncodingList ∷ [CTime] → Encoding #

ToJSON IntSet 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ IntSet → Value #

toEncoding ∷ IntSet → Encoding #

toJSONList ∷ [IntSet] → Value #

toEncodingList ∷ [IntSet] → Encoding #

ToJSON Text 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Text → Value #

toEncoding ∷ Text → Encoding #

toJSONList ∷ [Text] → Value #

toEncodingList ∷ [Text] → Encoding #

ToJSON Text 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Text → Value #

toEncoding ∷ Text → Encoding #

toJSONList ∷ [Text] → Value #

toEncodingList ∷ [Text] → Encoding #

ToJSON ZonedTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ ZonedTime → Value #

toEncoding ∷ ZonedTime → Encoding #

toJSONList ∷ [ZonedTime] → Value #

toEncodingList ∷ [ZonedTime] → Encoding #

ToJSON LocalTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ LocalTime → Value #

toEncoding ∷ LocalTime → Encoding #

toJSONList ∷ [LocalTime] → Value #

toEncodingList ∷ [LocalTime] → Encoding #

ToJSON TimeOfDay 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ TimeOfDay → Value #

toEncoding ∷ TimeOfDay → Encoding #

toJSONList ∷ [TimeOfDay] → Value #

toEncodingList ∷ [TimeOfDay] → Encoding #

ToJSON CalendarDiffTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ CalendarDiffTime → Value #

toEncoding ∷ CalendarDiffTime → Encoding #

toJSONList ∷ [CalendarDiffTime] → Value #

toEncodingList ∷ [CalendarDiffTime] → Encoding #

ToJSON UTCTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ UTCTime → Value #

toEncoding ∷ UTCTime → Encoding #

toJSONList ∷ [UTCTime] → Value #

toEncodingList ∷ [UTCTime] → Encoding #

ToJSON SystemTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ SystemTime → Value #

toEncoding ∷ SystemTime → Encoding #

toJSONList ∷ [SystemTime] → Value #

toEncodingList ∷ [SystemTime] → Encoding #

ToJSON NominalDiffTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ NominalDiffTime → Value #

toEncoding ∷ NominalDiffTime → Encoding #

toJSONList ∷ [NominalDiffTime] → Value #

toEncodingList ∷ [NominalDiffTime] → Encoding #

ToJSON DiffTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ DiffTime → Value #

toEncoding ∷ DiffTime → Encoding #

toJSONList ∷ [DiffTime] → Value #

toEncodingList ∷ [DiffTime] → Encoding #

ToJSON DayOfWeek 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ DayOfWeek → Value #

toEncoding ∷ DayOfWeek → Encoding #

toJSONList ∷ [DayOfWeek] → Value #

toEncodingList ∷ [DayOfWeek] → Encoding #

ToJSON Day 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Day → Value #

toEncoding ∷ Day → Encoding #

toJSONList ∷ [Day] → Value #

toEncodingList ∷ [Day] → Encoding #

ToJSON CalendarDiffDays 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ CalendarDiffDays → Value #

toEncoding ∷ CalendarDiffDays → Encoding #

toJSONList ∷ [CalendarDiffDays] → Value #

toEncodingList ∷ [CalendarDiffDays] → Encoding #

ToJSON Number 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Number → Value #

toEncoding ∷ Number → Encoding #

toJSONList ∷ [Number] → Value #

toEncodingList ∷ [Number] → Encoding #

ToJSON Scientific 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Scientific → Value #

toEncoding ∷ Scientific → Encoding #

toJSONList ∷ [Scientific] → Value #

toEncodingList ∷ [Scientific] → Encoding #

ToJSON DotNetTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ DotNetTime → Value #

toEncoding ∷ DotNetTime → Encoding #

toJSONList ∷ [DotNetTime] → Value #

toEncodingList ∷ [DotNetTime] → Encoding #

ToJSON Value 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Value → Value #

toEncoding ∷ Value → Encoding #

toJSONList ∷ [Value] → Value #

toEncodingList ∷ [Value] → Encoding #

ToJSON ByteSpan 
Instance details

Defined in Cardano.Binary.Annotated

Methods

toJSON ∷ ByteSpan → Value #

toEncoding ∷ ByteSpan → Encoding #

toJSONList ∷ [ByteSpan] → Value #

toEncodingList ∷ [ByteSpan] → Encoding #

ToJSON EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toJSON ∷ EpochNo → Value #

toEncoding ∷ EpochNo → Encoding #

toJSONList ∷ [EpochNo] → Value #

toEncodingList ∷ [EpochNo] → Encoding #

ToJSON EpochSize 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toJSON ∷ EpochSize → Value #

toEncoding ∷ EpochSize → Encoding #

toJSONList ∷ [EpochSize] → Value #

toEncodingList ∷ [EpochSize] → Encoding #

ToJSON SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toJSON ∷ SlotNo → Value #

toEncoding ∷ SlotNo → Encoding #

toJSONList ∷ [SlotNo] → Value #

toEncodingList ∷ [SlotNo] → Encoding #

ToJSON UUID 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ UUID → Value #

toEncoding ∷ UUID → Encoding #

toJSONList ∷ [UUID] → Value #

toEncodingList ∷ [UUID] → Encoding #

ToJSON Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toJSON ∷ Coin → Value #

toEncoding ∷ Coin → Encoding #

toJSONList ∷ [Coin] → Value #

toEncodingList ∷ [Coin] → Encoding #

ToJSON UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ UnitInterval → Value #

toEncoding ∷ UnitInterval → Encoding #

toJSONList ∷ [UnitInterval] → Value #

toEncodingList ∷ [UnitInterval] → Encoding #

ToJSON ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toJSON ∷ ProtVer → Value #

toEncoding ∷ ProtVer → Encoding #

toJSONList ∷ [ProtVer] → Value #

toEncodingList ∷ [ProtVer] → Encoding #

ToJSON AlonzoGenesis Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ AlonzoGenesis → Value #

toEncoding ∷ AlonzoGenesis → Encoding #

toJSONList ∷ [AlonzoGenesis] → Value #

toEncodingList ∷ [AlonzoGenesis] → Encoding #

ToJSON Language Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Language → Value #

toEncoding ∷ Language → Encoding #

toJSONList ∷ [Language] → Value #

toEncodingList ∷ [Language] → Encoding #

ToJSON CostModel Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ CostModel → Value #

toEncoding ∷ CostModel → Encoding #

toJSONList ∷ [CostModel] → Value #

toEncodingList ∷ [CostModel] → Encoding #

ToJSON Prices Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Prices → Value #

toEncoding ∷ Prices → Encoding #

toJSONList ∷ [Prices] → Value #

toEncodingList ∷ [Prices] → Encoding #

ToJSON ExUnits Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ ExUnits → Value #

toEncoding ∷ ExUnits → Encoding #

toJSONList ∷ [ExUnits] → Value #

toEncodingList ∷ [ExUnits] → Encoding #

ToJSON AssetClass 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

toJSON ∷ AssetClass → Value #

toEncoding ∷ AssetClass → Encoding #

toJSONList ∷ [AssetClass] → Value #

toEncodingList ∷ [AssetClass] → Encoding #

ToJSON CurrencySymbol 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

toJSON ∷ CurrencySymbol → Value #

toEncoding ∷ CurrencySymbol → Encoding #

toJSONList ∷ [CurrencySymbol] → Value #

toEncodingList ∷ [CurrencySymbol] → Encoding #

ToJSON TokenName 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

toJSON ∷ TokenName → Value #

toEncoding ∷ TokenName → Encoding #

toJSONList ∷ [TokenName] → Value #

toEncodingList ∷ [TokenName] → Encoding #

ToJSON Value 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

toJSON ∷ Value → Value0 #

toEncoding ∷ Value → Encoding #

toJSONList ∷ [Value] → Value0 #

toEncodingList ∷ [Value] → Encoding #

ToJSON MonetaryPolicyHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ MonetaryPolicyHash → Value #

toEncoding ∷ MonetaryPolicyHash → Encoding #

toJSONList ∷ [MonetaryPolicyHash] → Value #

toEncodingList ∷ [MonetaryPolicyHash] → Encoding #

ToJSON Context 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ Context → Value #

toEncoding ∷ Context → Encoding #

toJSONList ∷ [Context] → Value #

toEncodingList ∷ [Context] → Encoding #

ToJSON Datum 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ Datum → Value #

toEncoding ∷ Datum → Encoding #

toJSONList ∷ [Datum] → Value #

toEncodingList ∷ [Datum] → Encoding #

ToJSON DatumHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ DatumHash → Value #

toEncoding ∷ DatumHash → Encoding #

toJSONList ∷ [DatumHash] → Value #

toEncodingList ∷ [DatumHash] → Encoding #

ToJSON MonetaryPolicy 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ MonetaryPolicy → Value #

toEncoding ∷ MonetaryPolicy → Encoding #

toJSONList ∷ [MonetaryPolicy] → Value #

toEncodingList ∷ [MonetaryPolicy] → Encoding #

ToJSON Redeemer 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ Redeemer → Value #

toEncoding ∷ Redeemer → Encoding #

toJSONList ∷ [Redeemer] → Value #

toEncodingList ∷ [Redeemer] → Encoding #

ToJSON RedeemerHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ RedeemerHash → Value #

toEncoding ∷ RedeemerHash → Encoding #

toJSONList ∷ [RedeemerHash] → Value #

toEncodingList ∷ [RedeemerHash] → Encoding #

ToJSON Script 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ Script → Value #

toEncoding ∷ Script → Encoding #

toJSONList ∷ [Script] → Value #

toEncodingList ∷ [Script] → Encoding #

ToJSON ScriptError 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ ScriptError → Value #

toEncoding ∷ ScriptError → Encoding #

toJSONList ∷ [ScriptError] → Value #

toEncodingList ∷ [ScriptError] → Encoding #

ToJSON Validator 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ Validator → Value #

toEncoding ∷ Validator → Encoding #

toJSONList ∷ [Validator] → Value #

toEncodingList ∷ [Validator] → Encoding #

ToJSON ValidatorHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ ValidatorHash → Value #

toEncoding ∷ ValidatorHash → Encoding #

toJSONList ∷ [ValidatorHash] → Value #

toEncodingList ∷ [ValidatorHash] → Encoding #

ToJSON AssetName Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ AssetName → Value #

toEncoding ∷ AssetName → Encoding #

toJSONList ∷ [AssetName] → Value #

toEncodingList ∷ [AssetName] → Encoding #

ToJSON Likelihood Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Likelihood → Value #

toEncoding ∷ Likelihood → Encoding #

toJSONList ∷ [Likelihood] → Value #

toEncodingList ∷ [Likelihood] → Encoding #

ToJSON Ptr Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Ptr → Value #

toEncoding ∷ Ptr → Encoding #

toJSONList ∷ [Ptr] → Value #

toEncodingList ∷ [Ptr] → Encoding #

ToJSON Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ Nonce → Value #

toEncoding ∷ Nonce → Encoding #

toJSONList ∷ [Nonce] → Value #

toEncodingList ∷ [Nonce] → Encoding #

ToJSON Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toJSON ∷ Desirability → Value #

toEncoding ∷ Desirability → Encoding #

toJSONList ∷ [Desirability] → Value #

toEncodingList ∷ [Desirability] → Encoding #

ToJSON StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toJSON ∷ StakePoolRelay → Value #

toEncoding ∷ StakePoolRelay → Encoding #

toJSONList ∷ [StakePoolRelay] → Value #

toEncodingList ∷ [StakePoolRelay] → Encoding #

ToJSON PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toJSON ∷ PoolMetadata → Value #

toEncoding ∷ PoolMetadata → Encoding #

toJSONList ∷ [PoolMetadata] → Value #

toEncodingList ∷ [PoolMetadata] → Encoding #

ToJSON Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ Network → Value #

toEncoding ∷ Network → Encoding #

toJSONList ∷ [Network] → Value #

toEncodingList ∷ [Network] → Encoding #

ToJSON AnyCardanoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

toJSON ∷ AnyCardanoEra → Value #

toEncoding ∷ AnyCardanoEra → Encoding #

toJSONList ∷ [AnyCardanoEra] → Value #

toEncodingList ∷ [AnyCardanoEra] → Encoding #

ToJSON Month 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Month → Value #

toEncoding ∷ Month → Encoding #

toJSONList ∷ [Month] → Value #

toEncodingList ∷ [Month] → Encoding #

ToJSON Quarter 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Quarter → Value #

toEncoding ∷ Quarter → Encoding #

toJSONList ∷ [Quarter] → Value #

toEncodingList ∷ [Quarter] → Encoding #

ToJSON QuarterOfYear 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ QuarterOfYear → Value #

toEncoding ∷ QuarterOfYear → Encoding #

toJSONList ∷ [QuarterOfYear] → Value #

toEncodingList ∷ [QuarterOfYear] → Encoding #

ToJSON EpochNumber 
Instance details

Defined in Cardano.Chain.Slotting.EpochNumber

Methods

toJSON ∷ EpochNumber → Value #

toEncoding ∷ EpochNumber → Encoding #

toJSONList ∷ [EpochNumber] → Value #

toEncodingList ∷ [EpochNumber] → Encoding #

ToJSON SlotNumber 
Instance details

Defined in Cardano.Chain.Slotting.SlotNumber

Methods

toJSON ∷ SlotNumber → Value #

toEncoding ∷ SlotNumber → Encoding #

toJSONList ∷ [SlotNumber] → Value #

toEncodingList ∷ [SlotNumber] → Encoding #

ToJSON RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toJSON ∷ RequiresNetworkMagic → Value #

toEncoding ∷ RequiresNetworkMagic → Encoding #

toJSONList ∷ [RequiresNetworkMagic] → Value #

toEncodingList ∷ [RequiresNetworkMagic] → Encoding #

ToJSON ProtocolVersion 
Instance details

Defined in Cardano.Chain.Update.ProtocolVersion

Methods

toJSON ∷ ProtocolVersion → Value #

toEncoding ∷ ProtocolVersion → Encoding #

toJSONList ∷ [ProtocolVersion] → Value #

toEncodingList ∷ [ProtocolVersion] → Encoding #

ToJSON ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toJSON ∷ ProtocolMagicId → Value #

toEncoding ∷ ProtocolMagicId → Encoding #

toJSONList ∷ [ProtocolMagicId] → Value #

toEncodingList ∷ [ProtocolMagicId] → Encoding #

ToJSON SoftwareVersion 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

toJSON ∷ SoftwareVersion → Value #

toEncoding ∷ SoftwareVersion → Encoding #

toJSONList ∷ [SoftwareVersion] → Value #

toEncodingList ∷ [SoftwareVersion] → Encoding #

ToJSON VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

toJSON ∷ VerificationKey → Value #

toEncoding ∷ VerificationKey → Encoding #

toJSONList ∷ [VerificationKey] → Value #

toEncodingList ∷ [VerificationKey] → Encoding #

ToJSON GenesisHash 
Instance details

Defined in Cardano.Chain.Genesis.Hash

Methods

toJSON ∷ GenesisHash → Value #

toEncoding ∷ GenesisHash → Encoding #

toJSONList ∷ [GenesisHash] → Value #

toEncodingList ∷ [GenesisHash] → Encoding #

ToJSON Tx 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toJSON ∷ Tx → Value #

toEncoding ∷ Tx → Encoding #

toJSONList ∷ [Tx] → Value #

toEncodingList ∷ [Tx] → Encoding #

ToJSON ProtocolMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toJSON ∷ ProtocolMagic → Value #

toEncoding ∷ ProtocolMagic → Encoding #

toJSONList ∷ [ProtocolMagic] → Value #

toEncodingList ∷ [ProtocolMagic] → Encoding #

ToJSON CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

toJSON ∷ CompactRedeemVerificationKey → Value #

toEncoding ∷ CompactRedeemVerificationKey → Encoding #

toJSONList ∷ [CompactRedeemVerificationKey] → Value #

toEncodingList ∷ [CompactRedeemVerificationKey] → Encoding #

ToJSON Lovelace 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

toJSON ∷ Lovelace → Value #

toEncoding ∷ Lovelace → Encoding #

toJSONList ∷ [Lovelace] → Value #

toEncodingList ∷ [Lovelace] → Encoding #

ToJSON ByteString64 
Instance details

Defined in Data.ByteString.Base64.Type

Methods

toJSON ∷ ByteString64 → Value #

toEncoding ∷ ByteString64 → Encoding #

toJSONList ∷ [ByteString64] → Value #

toEncodingList ∷ [ByteString64] → Encoding #

ToJSON RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

toJSON ∷ RedeemVerificationKey → Value #

toEncoding ∷ RedeemVerificationKey → Encoding #

toJSONList ∷ [RedeemVerificationKey] → Value #

toEncodingList ∷ [RedeemVerificationKey] → Encoding #

ToJSON CekMachineCosts 
Instance details

Defined in UntypedPlutusCore.Evaluation.Machine.Cek.CekMachineCosts

Methods

toJSON ∷ CekMachineCosts → Value #

toEncoding ∷ CekMachineCosts → Encoding #

toJSONList ∷ [CekMachineCosts] → Value #

toEncodingList ∷ [CekMachineCosts] → Encoding #

ToJSON ChainDifficulty 
Instance details

Defined in Cardano.Chain.Common.ChainDifficulty

Methods

toJSON ∷ ChainDifficulty → Value #

toEncoding ∷ ChainDifficulty → Encoding #

toJSONList ∷ [ChainDifficulty] → Value #

toEncodingList ∷ [ChainDifficulty] → Encoding #

ToJSON Proof 
Instance details

Defined in Cardano.Chain.Block.Proof

Methods

toJSON ∷ Proof → Value #

toEncoding ∷ Proof → Encoding #

toJSONList ∷ [Proof] → Value #

toEncodingList ∷ [Proof] → Encoding #

ToJSON SscPayload 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toJSON ∷ SscPayload → Value #

toEncoding ∷ SscPayload → Encoding #

toJSONList ∷ [SscPayload] → Value #

toEncodingList ∷ [SscPayload] → Encoding #

ToJSON ProposalBody 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toJSON ∷ ProposalBody → Value #

toEncoding ∷ ProposalBody → Encoding #

toJSONList ∷ [ProposalBody] → Value #

toEncodingList ∷ [ProposalBody] → Encoding #

ToJSON TxInWitness 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toJSON ∷ TxInWitness → Value #

toEncoding ∷ TxInWitness → Encoding #

toJSONList ∷ [TxInWitness] → Value #

toEncodingList ∷ [TxInWitness] → Encoding #

ToJSON TxProof 
Instance details

Defined in Cardano.Chain.UTxO.TxProof

Methods

toJSON ∷ TxProof → Value #

toEncoding ∷ TxProof → Encoding #

toJSONList ∷ [TxProof] → Value #

toEncodingList ∷ [TxProof] → Encoding #

ToJSON SscProof 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toJSON ∷ SscProof → Value #

toEncoding ∷ SscProof → Encoding #

toJSONList ∷ [SscProof] → Value #

toEncodingList ∷ [SscProof] → Encoding #

ToJSON ApplicationName 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

toJSON ∷ ApplicationName → Value #

toEncoding ∷ ApplicationName → Encoding #

toJSONList ∷ [ApplicationName] → Value #

toEncodingList ∷ [ApplicationName] → Encoding #

ToJSON AddrAttributes 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toJSON ∷ AddrAttributes → Value #

toEncoding ∷ AddrAttributes → Encoding #

toJSONList ∷ [AddrAttributes] → Value #

toEncodingList ∷ [AddrAttributes] → Encoding #

ToJSON HDAddressPayload 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toJSON ∷ HDAddressPayload → Value #

toEncoding ∷ HDAddressPayload → Encoding #

toJSONList ∷ [HDAddressPayload] → Value #

toEncodingList ∷ [HDAddressPayload] → Encoding #

ToJSON NetworkMagic 
Instance details

Defined in Cardano.Chain.Common.NetworkMagic

Methods

toJSON ∷ NetworkMagic → Value #

toEncoding ∷ NetworkMagic → Encoding #

toJSONList ∷ [NetworkMagic] → Value #

toEncodingList ∷ [NetworkMagic] → Encoding #

ToJSON UnparsedFields 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

toJSON ∷ UnparsedFields → Value #

toEncoding ∷ UnparsedFields → Encoding #

toJSONList ∷ [UnparsedFields] → Value #

toEncodingList ∷ [UnparsedFields] → Encoding #

ToJSON AddrType 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

toJSON ∷ AddrType → Value #

toEncoding ∷ AddrType → Encoding #

toJSONList ∷ [AddrType] → Value #

toEncodingList ∷ [AddrType] → Encoding #

ToJSON Address 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

toJSON ∷ Address → Value #

toEncoding ∷ Address → Encoding #

toJSONList ∷ [Address] → Value #

toEncodingList ∷ [Address] → Encoding #

ToJSON LovelacePortion 
Instance details

Defined in Cardano.Chain.Common.LovelacePortion

Methods

toJSON ∷ LovelacePortion → Value #

toEncoding ∷ LovelacePortion → Encoding #

toJSONList ∷ [LovelacePortion] → Value #

toEncodingList ∷ [LovelacePortion] → Encoding #

ToJSON TxFeePolicy 
Instance details

Defined in Cardano.Chain.Common.TxFeePolicy

Methods

toJSON ∷ TxFeePolicy → Value #

toEncoding ∷ TxFeePolicy → Encoding #

toJSONList ∷ [TxFeePolicy] → Value #

toEncodingList ∷ [TxFeePolicy] → Encoding #

ToJSON TxSizeLinear 
Instance details

Defined in Cardano.Chain.Common.TxSizeLinear

Methods

toJSON ∷ TxSizeLinear → Value #

toEncoding ∷ TxSizeLinear → Encoding #

toJSONList ∷ [TxSizeLinear] → Value #

toEncodingList ∷ [TxSizeLinear] → Encoding #

ToJSON TxIn 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toJSON ∷ TxIn → Value #

toEncoding ∷ TxIn → Encoding #

toJSONList ∷ [TxIn] → Value #

toEncodingList ∷ [TxIn] → Encoding #

ToJSON TxOut 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toJSON ∷ TxOut → Value #

toEncoding ∷ TxOut → Encoding #

toJSONList ∷ [TxOut] → Value #

toEncodingList ∷ [TxOut] → Encoding #

ToJSON TxSigData 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toJSON ∷ TxSigData → Value #

toEncoding ∷ TxSigData → Encoding #

toJSONList ∷ [TxSigData] → Value #

toEncodingList ∷ [TxSigData] → Encoding #

ToJSON InstallerHash 
Instance details

Defined in Cardano.Chain.Update.InstallerHash

Methods

toJSON ∷ InstallerHash → Value #

toEncoding ∷ InstallerHash → Encoding #

toJSONList ∷ [InstallerHash] → Value #

toEncodingList ∷ [InstallerHash] → Encoding #

ToJSON SystemTag 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

toJSON ∷ SystemTag → Value #

toEncoding ∷ SystemTag → Encoding #

toJSONList ∷ [SystemTag] → Value #

toEncodingList ∷ [SystemTag] → Encoding #

ToJSON ProtocolParametersUpdate 
Instance details

Defined in Cardano.Chain.Update.ProtocolParametersUpdate

Methods

toJSON ∷ ProtocolParametersUpdate → Value #

toEncoding ∷ ProtocolParametersUpdate → Encoding #

toJSONList ∷ [ProtocolParametersUpdate] → Value #

toEncodingList ∷ [ProtocolParametersUpdate] → Encoding #

ToJSON SoftforkRule 
Instance details

Defined in Cardano.Chain.Update.SoftforkRule

Methods

toJSON ∷ SoftforkRule → Value #

toEncoding ∷ SoftforkRule → Encoding #

toJSONList ∷ [SoftforkRule] → Value #

toEncodingList ∷ [SoftforkRule] → Encoding #

ToJSON DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ DnsName → Value #

toEncoding ∷ DnsName → Encoding #

toJSONList ∷ [DnsName] → Value #

toEncodingList ∷ [DnsName] → Encoding #

ToJSON Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ Port → Value #

toEncoding ∷ Port → Encoding #

toJSONList ∷ [Port] → Value #

toEncodingList ∷ [Port] → Encoding #

ToJSON Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ Url → Value #

toEncoding ∷ Url → Encoding #

toJSONList ∷ [Url] → Value #

toEncodingList ∷ [Url] → Encoding #

ToJSON DeltaCoin Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ DeltaCoin → Value #

toEncoding ∷ DeltaCoin → Encoding #

toJSONList ∷ [DeltaCoin] → Value #

toEncodingList ∷ [DeltaCoin] → Encoding #

ToJSON ModelAddedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelAddedSizes → Value #

toEncoding ∷ ModelAddedSizes → Encoding #

toJSONList ∷ [ModelAddedSizes] → Value #

toEncodingList ∷ [ModelAddedSizes] → Encoding #

ToJSON ModelLinearSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelLinearSize → Value #

toEncoding ∷ ModelLinearSize → Encoding #

toJSONList ∷ [ModelLinearSize] → Value #

toEncodingList ∷ [ModelLinearSize] → Encoding #

ToJSON ModelMaxSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelMaxSize → Value #

toEncoding ∷ ModelMaxSize → Encoding #

toJSONList ∷ [ModelMaxSize] → Value #

toEncodingList ∷ [ModelMaxSize] → Encoding #

ToJSON ModelMinSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelMinSize → Value #

toEncoding ∷ ModelMinSize → Encoding #

toJSONList ∷ [ModelMinSize] → Value #

toEncodingList ∷ [ModelMinSize] → Encoding #

ToJSON ModelMultipliedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelMultipliedSizes → Value #

toEncoding ∷ ModelMultipliedSizes → Encoding #

toJSONList ∷ [ModelMultipliedSizes] → Value #

toEncodingList ∷ [ModelMultipliedSizes] → Encoding #

ToJSON ModelOneArgument 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelOneArgument → Value #

toEncoding ∷ ModelOneArgument → Encoding #

toJSONList ∷ [ModelOneArgument] → Value #

toEncodingList ∷ [ModelOneArgument] → Encoding #

ToJSON ModelOrientation 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelOrientation → Value #

toEncoding ∷ ModelOrientation → Encoding #

toJSONList ∷ [ModelOrientation] → Value #

toEncodingList ∷ [ModelOrientation] → Encoding #

ToJSON ModelSplitConst 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelSplitConst → Value #

toEncoding ∷ ModelSplitConst → Encoding #

toJSONList ∷ [ModelSplitConst] → Value #

toEncodingList ∷ [ModelSplitConst] → Encoding #

ToJSON ModelSubtractedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelSubtractedSizes → Value #

toEncoding ∷ ModelSubtractedSizes → Encoding #

toJSONList ∷ [ModelSubtractedSizes] → Value #

toEncodingList ∷ [ModelSubtractedSizes] → Encoding #

ToJSON ModelThreeArguments 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelThreeArguments → Value #

toEncoding ∷ ModelThreeArguments → Encoding #

toJSONList ∷ [ModelThreeArguments] → Value #

toEncodingList ∷ [ModelThreeArguments] → Encoding #

ToJSON ModelTwoArguments 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelTwoArguments → Value #

toEncoding ∷ ModelTwoArguments → Encoding #

toJSONList ∷ [ModelTwoArguments] → Value #

toEncodingList ∷ [ModelTwoArguments] → Encoding #

ToJSON ExMemory 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExMemory

Methods

toJSON ∷ ExMemory → Value #

toEncoding ∷ ExMemory → Encoding #

toJSONList ∷ [ExMemory] → Value #

toEncodingList ∷ [ExMemory] → Encoding #

ToJSON ExBudget 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExBudget

Methods

toJSON ∷ ExBudget → Value #

toEncoding ∷ ExBudget → Encoding #

toJSONList ∷ [ExBudget] → Value #

toEncodingList ∷ [ExBudget] → Encoding #

ToJSON ExCPU 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExMemory

Methods

toJSON ∷ ExCPU → Value #

toEncoding ∷ ExCPU → Encoding #

toJSONList ∷ [ExCPU] → Value #

toEncodingList ∷ [ExCPU] → Encoding #

ToJSON Ada 
Instance details

Defined in Plutus.V1.Ledger.Ada

Methods

toJSON ∷ Ada → Value #

toEncoding ∷ Ada → Encoding #

toJSONList ∷ [Ada] → Value #

toEncodingList ∷ [Ada] → Encoding #

ToJSON Address 
Instance details

Defined in Plutus.V1.Ledger.Address

Methods

toJSON ∷ Address → Value #

toEncoding ∷ Address → Encoding #

toJSONList ∷ [Address] → Value #

toEncodingList ∷ [Address] → Encoding #

ToJSON Credential 
Instance details

Defined in Plutus.V1.Ledger.Credential

Methods

toJSON ∷ Credential → Value #

toEncoding ∷ Credential → Encoding #

toJSONList ∷ [Credential] → Value #

toEncodingList ∷ [Credential] → Encoding #

ToJSON StakingCredential 
Instance details

Defined in Plutus.V1.Ledger.Credential

Methods

toJSON ∷ StakingCredential → Value #

toEncoding ∷ StakingCredential → Encoding #

toJSONList ∷ [StakingCredential] → Value #

toEncodingList ∷ [StakingCredential] → Encoding #

ToJSON PubKeyHash 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

toJSON ∷ PubKeyHash → Value #

toEncoding ∷ PubKeyHash → Encoding #

toJSONList ∷ [PubKeyHash] → Value #

toEncodingList ∷ [PubKeyHash] → Encoding #

ToJSON PubKey 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

toJSON ∷ PubKey → Value #

toEncoding ∷ PubKey → Encoding #

toJSONList ∷ [PubKey] → Value #

toEncodingList ∷ [PubKey] → Encoding #

ToJSON LedgerBytes 
Instance details

Defined in Plutus.V1.Ledger.Bytes

Methods

toJSON ∷ LedgerBytes → Value #

toEncoding ∷ LedgerBytes → Encoding #

toJSONList ∷ [LedgerBytes] → Value #

toEncodingList ∷ [LedgerBytes] → Encoding #

ToJSON TxOut 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ TxOut → Value #

toEncoding ∷ TxOut → Encoding #

toJSONList ∷ [TxOut] → Value #

toEncodingList ∷ [TxOut] → Encoding #

ToJSON TxOutRef 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ TxOutRef → Value #

toEncoding ∷ TxOutRef → Encoding #

toJSONList ∷ [TxOutRef] → Value #

toEncodingList ∷ [TxOutRef] → Encoding #

ToJSON DCert 
Instance details

Defined in Plutus.V1.Ledger.DCert

Methods

toJSON ∷ DCert → Value #

toEncoding ∷ DCert → Encoding #

toJSONList ∷ [DCert] → Value #

toEncodingList ∷ [DCert] → Encoding #

ToJSON TxId 
Instance details

Defined in Plutus.V1.Ledger.TxId

Methods

toJSON ∷ TxId → Value #

toEncoding ∷ TxId → Encoding #

toJSONList ∷ [TxId] → Value #

toEncodingList ∷ [TxId] → Encoding #

ToJSON POSIXTime 
Instance details

Defined in Plutus.V1.Ledger.Time

Methods

toJSON ∷ POSIXTime → Value #

toEncoding ∷ POSIXTime → Encoding #

toJSONList ∷ [POSIXTime] → Value #

toEncodingList ∷ [POSIXTime] → Encoding #

ToJSON Signature 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

toJSON ∷ Signature → Value #

toEncoding ∷ Signature → Encoding #

toJSONList ∷ [Signature] → Value #

toEncodingList ∷ [Signature] → Encoding #

ToJSON PrivateKey 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

toJSON ∷ PrivateKey → Value #

toEncoding ∷ PrivateKey → Encoding #

toJSONList ∷ [PrivateKey] → Value #

toEncodingList ∷ [PrivateKey] → Encoding #

ToJSON Slot 
Instance details

Defined in Plutus.V1.Ledger.Slot

Methods

toJSON ∷ Slot → Value #

toEncoding ∷ Slot → Encoding #

toJSONList ∷ [Slot] → Value #

toEncodingList ∷ [Slot] → Encoding #

ToJSON Tx 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ Tx → Value #

toEncoding ∷ Tx → Encoding #

toJSONList ∷ [Tx] → Value #

toEncodingList ∷ [Tx] → Encoding #

ToJSON TxIn 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ TxIn → Value #

toEncoding ∷ TxIn → Encoding #

toJSONList ∷ [TxIn] → Value #

toEncodingList ∷ [TxIn] → Encoding #

ToJSON TxInType 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ TxInType → Value #

toEncoding ∷ TxInType → Encoding #

toJSONList ∷ [TxInType] → Value #

toEncodingList ∷ [TxInType] → Encoding #

ToJSON TxOutTx 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ TxOutTx → Value #

toEncoding ∷ TxOutTx → Encoding #

toJSONList ∷ [TxOutTx] → Value #

toEncodingList ∷ [TxOutTx] → Encoding #

ToJSON AccountState Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ AccountState → Value #

toEncoding ∷ AccountState → Encoding #

toJSONList ∷ [AccountState] → Value #

toEncodingList ∷ [AccountState] → Encoding #

ToJSON RewardType Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ RewardType → Value #

toEncoding ∷ RewardType → Encoding #

toJSONList ∷ [RewardType] → Value #

toEncodingList ∷ [RewardType] → Encoding #

ToJSON StudentT 
Instance details

Defined in Statistics.Distribution.StudentT

Methods

toJSON ∷ StudentT → Value #

toEncoding ∷ StudentT → Encoding #

toJSONList ∷ [StudentT] → Value #

toEncodingList ∷ [StudentT] → Encoding #

ToJSON TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelope → Value #

toEncoding ∷ TextEnvelope → Encoding #

toJSONList ∷ [TextEnvelope] → Value #

toEncodingList ∷ [TextEnvelope] → Encoding #

ToJSON TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelopeDescr → Value #

toEncoding ∷ TextEnvelopeDescr → Encoding #

toJSONList ∷ [TextEnvelopeDescr] → Value #

toEncodingList ∷ [TextEnvelopeDescr] → Encoding #

ToJSON TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelopeType → Value #

toEncoding ∷ TextEnvelopeType → Encoding #

toJSONList ∷ [TextEnvelopeType] → Value #

toEncodingList ∷ [TextEnvelopeType] → Encoding #

ToJSON TxSubmitStatus Source # 
Instance details

Defined in Cardano.Api.TxSubmit.Types

Methods

toJSON ∷ TxSubmitStatus → Value #

toEncoding ∷ TxSubmitStatus → Encoding #

toJSONList ∷ [TxSubmitStatus] → Value #

toEncodingList ∷ [TxSubmitStatus] → Encoding #

ToJSON ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toJSON ∷ ExecutionUnits → Value #

toEncoding ∷ ExecutionUnits → Encoding #

toJSONList ∷ [ExecutionUnits] → Value #

toEncodingList ∷ [ExecutionUnits] → Encoding #

ToJSON AnyPlutusScriptVersion Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toJSON ∷ AnyPlutusScriptVersion → Value #

toEncoding ∷ AnyPlutusScriptVersion → Encoding #

toJSONList ∷ [AnyPlutusScriptVersion] → Value #

toEncodingList ∷ [AnyPlutusScriptVersion] → Encoding #

ToJSON ValueNestedRep Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ ValueNestedRep → Value #

toEncoding ∷ ValueNestedRep → Encoding #

toJSONList ∷ [ValueNestedRep] → Value #

toEncodingList ∷ [ValueNestedRep] → Encoding #

ToJSON Value Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ Value → Value0 #

toEncoding ∷ Value → Encoding #

toJSONList ∷ [Value] → Value0 #

toEncodingList ∷ [Value] → Encoding #

ToJSON AssetName Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ AssetName → Value #

toEncoding ∷ AssetName → Encoding #

toJSONList ∷ [AssetName] → Value #

toEncodingList ∷ [AssetName] → Encoding #

ToJSON Quantity Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ Quantity → Value #

toEncoding ∷ Quantity → Encoding #

toJSONList ∷ [Quantity] → Value #

toEncodingList ∷ [Quantity] → Encoding #

ToJSON Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ Lovelace → Value #

toEncoding ∷ Lovelace → Encoding #

toJSONList ∷ [Lovelace] → Value #

toEncodingList ∷ [Lovelace] → Encoding #

ToJSON CostModel Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

toJSON ∷ CostModel → Value #

toEncoding ∷ CostModel → Encoding #

toJSONList ∷ [CostModel] → Value #

toEncodingList ∷ [CostModel] → Encoding #

ToJSON ExecutionUnitPrices Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

toJSON ∷ ExecutionUnitPrices → Value #

toEncoding ∷ ExecutionUnitPrices → Encoding #

toJSONList ∷ [ExecutionUnitPrices] → Value #

toEncodingList ∷ [ExecutionUnitPrices] → Encoding #

ToJSON PraosNonce Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

toJSON ∷ PraosNonce → Value #

toEncoding ∷ PraosNonce → Encoding #

toJSONList ∷ [PraosNonce] → Value #

toEncodingList ∷ [PraosNonce] → Encoding #

ToJSON ProtocolParameters Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

toJSON ∷ ProtocolParameters → Value #

toEncoding ∷ ProtocolParameters → Encoding #

toJSONList ∷ [ProtocolParameters] → Value #

toEncodingList ∷ [ProtocolParameters] → Encoding #

ToJSON TxIx Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxIx → Value #

toEncoding ∷ TxIx → Encoding #

toJSONList ∷ [TxIx] → Value #

toEncodingList ∷ [TxIx] → Encoding #

ToJSON TxIn Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxIn → Value #

toEncoding ∷ TxIn → Encoding #

toJSONList ∷ [TxIn] → Value #

toEncodingList ∷ [TxIn] → Encoding #

ToJSON TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxId → Value #

toEncoding ∷ TxId → Encoding #

toJSONList ∷ [TxId] → Value #

toEncodingList ∷ [TxId] → Encoding #

ToJSON ChainTip Source # 
Instance details

Defined in Cardano.Api.Block

Methods

toJSON ∷ ChainTip → Value #

toEncoding ∷ ChainTip → Encoding #

toJSONList ∷ [ChainTip] → Value #

toEncodingList ∷ [ChainTip] → Encoding #

ToJSON a ⇒ ToJSON [a] 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ [a] → Value #

toEncoding ∷ [a] → Encoding #

toJSONList ∷ [[a]] → Value #

toEncodingList ∷ [[a]] → Encoding #

ToJSON a ⇒ ToJSON (Maybe a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Maybe a → Value #

toEncoding ∷ Maybe a → Encoding #

toJSONList ∷ [Maybe a] → Value #

toEncodingList ∷ [Maybe a] → Encoding #

(ToJSON a, Integral a) ⇒ ToJSON (Ratio a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Ratio a → Value #

toEncoding ∷ Ratio a → Encoding #

toJSONList ∷ [Ratio a] → Value #

toEncodingList ∷ [Ratio a] → Encoding #

ToJSON a ⇒ ToJSON (First a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ First a → Value #

toEncoding ∷ First a → Encoding #

toJSONList ∷ [First a] → Value #

toEncodingList ∷ [First a] → Encoding #

ToJSON a ⇒ ToJSON (Last a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Last a → Value #

toEncoding ∷ Last a → Encoding #

toJSONList ∷ [Last a] → Value #

toEncodingList ∷ [Last a] → Encoding #

ToJSON a ⇒ ToJSON (Set a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Set a → Value #

toEncoding ∷ Set a → Encoding #

toJSONList ∷ [Set a] → Value #

toEncodingList ∷ [Set a] → Encoding #

ToJSON a ⇒ ToJSON (NonEmpty a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ NonEmpty a → Value #

toEncoding ∷ NonEmpty a → Encoding #

toJSONList ∷ [NonEmpty a] → Value #

toEncodingList ∷ [NonEmpty a] → Encoding #

ToJSON a ⇒ ToJSON (Identity a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Identity a → Value #

toEncoding ∷ Identity a → Encoding #

toJSONList ∷ [Identity a] → Value #

toEncodingList ∷ [Identity a] → Encoding #

ToJSON a ⇒ ToJSON (Min a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Min a → Value #

toEncoding ∷ Min a → Encoding #

toJSONList ∷ [Min a] → Value #

toEncodingList ∷ [Min a] → Encoding #

ToJSON a ⇒ ToJSON (Max a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Max a → Value #

toEncoding ∷ Max a → Encoding #

toJSONList ∷ [Max a] → Value #

toEncodingList ∷ [Max a] → Encoding #

ToJSON a ⇒ ToJSON (WrappedMonoid a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ WrappedMonoid a → Value #

toEncoding ∷ WrappedMonoid a → Encoding #

toJSONList ∷ [WrappedMonoid a] → Value #

toEncodingList ∷ [WrappedMonoid a] → Encoding #

ToJSON a ⇒ ToJSON (Option a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Option a → Value #

toEncoding ∷ Option a → Encoding #

toJSONList ∷ [Option a] → Value #

toEncodingList ∷ [Option a] → Encoding #

ToJSON a ⇒ ToJSON (First a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ First a → Value #

toEncoding ∷ First a → Encoding #

toJSONList ∷ [First a] → Value #

toEncodingList ∷ [First a] → Encoding #

ToJSON a ⇒ ToJSON (Last a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Last a → Value #

toEncoding ∷ Last a → Encoding #

toJSONList ∷ [Last a] → Value #

toEncodingList ∷ [Last a] → Encoding #

ToJSON a ⇒ ToJSON (Dual a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Dual a → Value #

toEncoding ∷ Dual a → Encoding #

toJSONList ∷ [Dual a] → Value #

toEncodingList ∷ [Dual a] → Encoding #

ToJSON a ⇒ ToJSON (IntMap a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ IntMap a → Value #

toEncoding ∷ IntMap a → Encoding #

toJSONList ∷ [IntMap a] → Value #

toEncodingList ∷ [IntMap a] → Encoding #

ToJSON v ⇒ ToJSON (Tree v) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Tree v → Value #

toEncoding ∷ Tree v → Encoding #

toJSONList ∷ [Tree v] → Value #

toEncodingList ∷ [Tree v] → Encoding #

ToJSON a ⇒ ToJSON (Seq a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Seq a → Value #

toEncoding ∷ Seq a → Encoding #

toJSONList ∷ [Seq a] → Value #

toEncodingList ∷ [Seq a] → Encoding #

(Vector Vector a, ToJSON a) ⇒ ToJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Vector a → Value #

toEncoding ∷ Vector a → Encoding #

toJSONList ∷ [Vector a] → Value #

toEncodingList ∷ [Vector a] → Encoding #

ToJSON a ⇒ ToJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Vector a → Value #

toEncoding ∷ Vector a → Encoding #

toJSONList ∷ [Vector a] → Value #

toEncodingList ∷ [Vector a] → Encoding #

ToJSON1 f ⇒ ToJSON (Fix f) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Fix f → Value #

toEncoding ∷ Fix f → Encoding #

toJSONList ∷ [Fix f] → Value #

toEncodingList ∷ [Fix f] → Encoding #

(ToJSON1 f, Functor f) ⇒ ToJSON (Mu f) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Mu f → Value #

toEncoding ∷ Mu f → Encoding #

toJSONList ∷ [Mu f] → Value #

toEncodingList ∷ [Mu f] → Encoding #

(ToJSON1 f, Functor f) ⇒ ToJSON (Nu f) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Nu f → Value #

toEncoding ∷ Nu f → Encoding #

toJSONList ∷ [Nu f] → Value #

toEncodingList ∷ [Nu f] → Encoding #

ToJSON a ⇒ ToJSON (DNonEmpty a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ DNonEmpty a → Value #

toEncoding ∷ DNonEmpty a → Encoding #

toJSONList ∷ [DNonEmpty a] → Value #

toEncodingList ∷ [DNonEmpty a] → Encoding #

ToJSON a ⇒ ToJSON (DList a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ DList a → Value #

toEncoding ∷ DList a → Encoding #

toJSONList ∷ [DList a] → Value #

toEncodingList ∷ [DList a] → Encoding #

ToJSON a ⇒ ToJSON (Array a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Array a → Value #

toEncoding ∷ Array a → Encoding #

toJSONList ∷ [Array a] → Value #

toEncodingList ∷ [Array a] → Encoding #

(Prim a, ToJSON a) ⇒ ToJSON (PrimArray a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ PrimArray a → Value #

toEncoding ∷ PrimArray a → Encoding #

toJSONList ∷ [PrimArray a] → Value #

toEncodingList ∷ [PrimArray a] → Encoding #

ToJSON a ⇒ ToJSON (SmallArray a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ SmallArray a → Value #

toEncoding ∷ SmallArray a → Encoding #

toJSONList ∷ [SmallArray a] → Value #

toEncodingList ∷ [SmallArray a] → Encoding #

ToJSON a ⇒ ToJSON (Maybe a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Maybe a → Value #

toEncoding ∷ Maybe a → Encoding #

toJSONList ∷ [Maybe a] → Value #

toEncodingList ∷ [Maybe a] → Encoding #

ToJSON a ⇒ ToJSON (HashSet a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ HashSet a → Value #

toEncoding ∷ HashSet a → Encoding #

toJSONList ∷ [HashSet a] → Value #

toEncodingList ∷ [HashSet a] → Encoding #

(Prim a, ToJSON a) ⇒ ToJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Vector a → Value #

toEncoding ∷ Vector a → Encoding #

toJSONList ∷ [Vector a] → Value #

toEncodingList ∷ [Vector a] → Encoding #

(Storable a, ToJSON a) ⇒ ToJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Vector a → Value #

toEncoding ∷ Vector a → Encoding #

toJSONList ∷ [Vector a] → Value #

toEncodingList ∷ [Vector a] → Encoding #

ToJSON (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

toJSON ∷ ScriptHash crypto → Value #

toEncoding ∷ ScriptHash crypto → Encoding #

toJSONList ∷ [ScriptHash crypto] → Value #

toEncodingList ∷ [ScriptHash crypto] → Encoding #

ToJSON a ⇒ ToJSON (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

toJSON ∷ StrictMaybe a → Value #

toEncoding ∷ StrictMaybe a → Encoding #

toJSONList ∷ [StrictMaybe a] → Value #

toEncodingList ∷ [StrictMaybe a] → Encoding #

(ToJSON (PParamsDelta era), UsesPParams era) ⇒ ToJSON (PPUPState era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PPUPState era → Value #

toEncoding ∷ PPUPState era → Encoding #

toJSONList ∷ [PPUPState era] → Value #

toEncodingList ∷ [PPUPState era] → Encoding #

ToJSON (Value era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Value era → Value0 #

toEncoding ∷ Value era → Encoding #

toJSONList ∷ [Value era] → Value0 #

toEncodingList ∷ [Value era] → Encoding #

ToJSON (PParamsUpdate (AlonzoEra StandardCrypto)) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PParamsUpdate (AlonzoEra StandardCrypto) → Value #

toEncoding ∷ PParamsUpdate (AlonzoEra StandardCrypto) → Encoding #

toJSONList ∷ [PParamsUpdate (AlonzoEra StandardCrypto)] → Value #

toEncodingList ∷ [PParamsUpdate (AlonzoEra StandardCrypto)] → Encoding #

ToJSON (PParams era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PParams era → Value #

toEncoding ∷ PParams era → Encoding #

toJSONList ∷ [PParams era] → Value #

toEncodingList ∷ [PParams era] → Encoding #

(ShelleyBasedEra era, ToJSON (Value era)) ⇒ ToJSON (TxOut era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ TxOut era → Value #

toEncoding ∷ TxOut era → Encoding #

toJSONList ∷ [TxOut era] → Value #

toEncodingList ∷ [TxOut era] → Encoding #

ToJSON (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toJSON ∷ PParams era → Value #

toEncoding ∷ PParams era → Encoding #

toJSONList ∷ [PParams era] → Value #

toEncodingList ∷ [PParams era] → Encoding #

ToJSON (PParamsUpdate era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PParamsUpdate era → Value #

toEncoding ∷ PParamsUpdate era → Encoding #

toJSONList ∷ [PParamsUpdate era] → Value #

toEncodingList ∷ [PParamsUpdate era] → Encoding #

(ShelleyBasedEra era, ToJSON (TxOut era), ToJSON (PParams era), ToJSON (PParamsDelta era)) ⇒ ToJSON (EpochState era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ EpochState era → Value #

toEncoding ∷ EpochState era → Encoding #

toJSONList ∷ [EpochState era] → Value #

toEncodingList ∷ [EpochState era] → Encoding #

(ShelleyBasedEra era, ToJSON (TxOut era), ToJSON (PParamsDelta era)) ⇒ ToJSON (LedgerState era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ LedgerState era → Value #

toEncoding ∷ LedgerState era → Encoding #

toJSONList ∷ [LedgerState era] → Value #

toEncodingList ∷ [LedgerState era] → Encoding #

(ShelleyBasedEra era, ToJSON (TxOut era), ToJSON (PParamsDelta era)) ⇒ ToJSON (UTxOState era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ UTxOState era → Value #

toEncoding ∷ UTxOState era → Encoding #

toJSONList ∷ [UTxOState era] → Value #

toEncodingList ∷ [UTxOState era] → Encoding #

Crypto crypto ⇒ ToJSON (DPState crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ DPState crypto → Value #

toEncoding ∷ DPState crypto → Encoding #

toJSONList ∷ [DPState crypto] → Value #

toEncodingList ∷ [DPState crypto] → Encoding #

Crypto crypto ⇒ ToJSON (TxIn crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ TxIn crypto → Value #

toEncoding ∷ TxIn crypto → Encoding #

toJSONList ∷ [TxIn crypto] → Value #

toEncodingList ∷ [TxIn crypto] → Encoding #

Crypto crypto ⇒ ToJSON (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toJSON ∷ BlocksMade crypto → Value #

toEncoding ∷ BlocksMade crypto → Encoding #

toJSONList ∷ [BlocksMade crypto] → Value #

toEncodingList ∷ [BlocksMade crypto] → Encoding #

Crypto crypto ⇒ ToJSON (SnapShots crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ SnapShots crypto → Value #

toEncoding ∷ SnapShots crypto → Encoding #

toJSONList ∷ [SnapShots crypto] → Value #

toEncodingList ∷ [SnapShots crypto] → Encoding #

Crypto crypto ⇒ ToJSON (NonMyopic crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ NonMyopic crypto → Value #

toEncoding ∷ NonMyopic crypto → Encoding #

toJSONList ∷ [NonMyopic crypto] → Value #

toEncodingList ∷ [NonMyopic crypto] → Encoding #

Crypto crypto ⇒ ToJSON (PulsingRewUpdate crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PulsingRewUpdate crypto → Value #

toEncoding ∷ PulsingRewUpdate crypto → Encoding #

toJSONList ∷ [PulsingRewUpdate crypto] → Value #

toEncodingList ∷ [PulsingRewUpdate crypto] → Encoding #

Crypto crypto ⇒ ToJSON (PoolDistr crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PoolDistr crypto → Value #

toEncoding ∷ PoolDistr crypto → Encoding #

toJSONList ∷ [PoolDistr crypto] → Value #

toEncodingList ∷ [PoolDistr crypto] → Encoding #

(ToJSON (PParamsDelta era), UsesPParams era) ⇒ ToJSON (ProposedPPUpdates era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ ProposedPPUpdates era → Value #

toEncoding ∷ ProposedPPUpdates era → Encoding #

toJSONList ∷ [ProposedPPUpdates era] → Value #

toEncodingList ∷ [ProposedPPUpdates era] → Encoding #

Era era ⇒ ToJSON (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toJSON ∷ ShelleyGenesis era → Value #

toEncoding ∷ ShelleyGenesis era → Encoding #

toJSONList ∷ [ShelleyGenesis era] → Value #

toEncodingList ∷ [ShelleyGenesis era] → Encoding #

Crypto crypto ⇒ ToJSON (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toJSON ∷ GenDelegPair crypto → Value #

toEncoding ∷ GenDelegPair crypto → Encoding #

toJSONList ∷ [GenDelegPair crypto] → Value #

toEncodingList ∷ [GenDelegPair crypto] → Encoding #

ToJSON (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toJSON ∷ Addr crypto → Value #

toEncoding ∷ Addr crypto → Encoding #

toJSONList ∷ [Addr crypto] → Value #

toEncodingList ∷ [Addr crypto] → Encoding #

Crypto crypto ⇒ ToJSON (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toJSON ∷ ShelleyGenesisStaking crypto → Value #

toEncoding ∷ ShelleyGenesisStaking crypto → Encoding #

toJSONList ∷ [ShelleyGenesisStaking crypto] → Value #

toEncodingList ∷ [ShelleyGenesisStaking crypto] → Encoding #

(ShelleyBasedEra era, ToJSON (TxOut era)) ⇒ ToJSON (UTxO era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ UTxO era → Value #

toEncoding ∷ UTxO era → Encoding #

toJSONList ∷ [UTxO era] → Value #

toEncodingList ∷ [UTxO era] → Encoding #

(Era era, Show (Value era), ToJSON (Value era)) ⇒ ToJSON (TxOut era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ TxOut era → Value #

toEncoding ∷ TxOut era → Encoding #

toJSONList ∷ [TxOut era] → Value #

toEncodingList ∷ [TxOut era] → Encoding #

ToJSON (PolicyID era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PolicyID era → Value #

toEncoding ∷ PolicyID era → Encoding #

toJSONList ∷ [PolicyID era] → Value #

toEncodingList ∷ [PolicyID era] → Encoding #

Crypto crypto ⇒ ToJSON (PState crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PState crypto → Value #

toEncoding ∷ PState crypto → Encoding #

toJSONList ∷ [PState crypto] → Value #

toEncodingList ∷ [PState crypto] → Encoding #

Crypto crypto ⇒ ToJSON (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toJSON ∷ PoolParams crypto → Value #

toEncoding ∷ PoolParams crypto → Encoding #

toJSONList ∷ [PoolParams crypto] → Value #

toEncodingList ∷ [PoolParams crypto] → Encoding #

ToJSON (InstantaneousRewards crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ InstantaneousRewards crypto → Value #

toEncoding ∷ InstantaneousRewards crypto → Encoding #

toJSONList ∷ [InstantaneousRewards crypto] → Value #

toEncodingList ∷ [InstantaneousRewards crypto] → Encoding #

Crypto crypto ⇒ ToJSON (SnapShot crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ SnapShot crypto → Value #

toEncoding ∷ SnapShot crypto → Encoding #

toJSONList ∷ [SnapShot crypto] → Value #

toEncodingList ∷ [SnapShot crypto] → Encoding #

ToJSON (FutureGenDeleg crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ FutureGenDeleg crypto → Value #

toEncoding ∷ FutureGenDeleg crypto → Encoding #

toJSONList ∷ [FutureGenDeleg crypto] → Value #

toEncodingList ∷ [FutureGenDeleg crypto] → Encoding #

Crypto crypto ⇒ ToJSON (DState crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ DState crypto → Value #

toEncoding ∷ DState crypto → Encoding #

toJSONList ∷ [DState crypto] → Value #

toEncodingList ∷ [DState crypto] → Encoding #

ToJSON (IndividualPoolStake crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ IndividualPoolStake crypto → Value #

toEncoding ∷ IndividualPoolStake crypto → Encoding #

toJSONList ∷ [IndividualPoolStake crypto] → Value #

toEncodingList ∷ [IndividualPoolStake crypto] → Encoding #

Crypto crypto ⇒ ToJSON (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toJSON ∷ RewardProvenance crypto → Value #

toEncoding ∷ RewardProvenance crypto → Encoding #

toJSONList ∷ [RewardProvenance crypto] → Value #

toEncodingList ∷ [RewardProvenance crypto] → Encoding #

Crypto crypto ⇒ ToJSON (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toJSON ∷ RewardProvenancePool crypto → Value #

toEncoding ∷ RewardProvenancePool crypto → Encoding #

toJSONList ∷ [RewardProvenancePool crypto] → Value #

toEncodingList ∷ [RewardProvenancePool crypto] → Encoding #

ToJSON (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toJSON ∷ RewardAcnt crypto → Value #

toEncoding ∷ RewardAcnt crypto → Encoding #

toJSONList ∷ [RewardAcnt crypto] → Value #

toEncodingList ∷ [RewardAcnt crypto] → Encoding #

ToJSON (CardanoEra era) Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

toJSON ∷ CardanoEra era → Value #

toEncoding ∷ CardanoEra era → Encoding #

toJSONList ∷ [CardanoEra era] → Value #

toEncodingList ∷ [CardanoEra era] → Encoding #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSON a ⇒ ToJSON (AHeader a) 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toJSON ∷ AHeader a → Value #

toEncoding ∷ AHeader a → Encoding #

toJSONList ∷ [AHeader a] → Value #

toEncodingList ∷ [AHeader a] → Encoding #

ToJSON a ⇒ ToJSON (ATxAux a) 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

toJSON ∷ ATxAux a → Value #

toEncoding ∷ ATxAux a → Encoding #

toJSONList ∷ [ATxAux a] → Value #

toEncodingList ∷ [ATxAux a] → Encoding #

ToJSON a ⇒ ToJSON (ACertificate a) 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

toJSON ∷ ACertificate a → Value #

toEncoding ∷ ACertificate a → Encoding #

toJSONList ∷ [ACertificate a] → Value #

toEncodingList ∷ [ACertificate a] → Encoding #

ToJSON a ⇒ ToJSON (AProposal a) 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toJSON ∷ AProposal a → Value #

toEncoding ∷ AProposal a → Encoding #

toJSONList ∷ [AProposal a] → Value #

toEncodingList ∷ [AProposal a] → Encoding #

ToJSON a ⇒ ToJSON (AVote a) 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

toJSON ∷ AVote a → Value #

toEncoding ∷ AVote a → Encoding #

toJSONList ∷ [AVote a] → Value #

toEncodingList ∷ [AVote a] → Encoding #

ToJSON a ⇒ ToJSON (ABlockOrBoundary a) 
Instance details

Defined in Cardano.Chain.Block.Block

Methods

toJSON ∷ ABlockOrBoundary a → Value #

toEncoding ∷ ABlockOrBoundary a → Encoding #

toJSONList ∷ [ABlockOrBoundary a] → Value #

toEncodingList ∷ [ABlockOrBoundary a] → Encoding #

ToJSON a ⇒ ToJSON (ABoundaryHeader a) 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toJSON ∷ ABoundaryHeader a → Value #

toEncoding ∷ ABoundaryHeader a → Encoding #

toJSONList ∷ [ABoundaryHeader a] → Value #

toEncodingList ∷ [ABoundaryHeader a] → Encoding #

ToJSON a ⇒ ToJSON (ABoundaryBlock a) 
Instance details

Defined in Cardano.Chain.Block.Block

Methods

toJSON ∷ ABoundaryBlock a → Value #

toEncoding ∷ ABoundaryBlock a → Encoding #

toJSONList ∷ [ABoundaryBlock a] → Value #

toEncodingList ∷ [ABoundaryBlock a] → Encoding #

ToJSON a ⇒ ToJSON (ABlock a) 
Instance details

Defined in Cardano.Chain.Block.Block

Methods

toJSON ∷ ABlock a → Value #

toEncoding ∷ ABlock a → Encoding #

toJSONList ∷ [ABlock a] → Value #

toEncodingList ∷ [ABlock a] → Encoding #

ToJSON a ⇒ ToJSON (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

toJSON ∷ RedeemSignature a → Value #

toEncoding ∷ RedeemSignature a → Encoding #

toJSONList ∷ [RedeemSignature a] → Value #

toEncodingList ∷ [RedeemSignature a] → Encoding #

ToJSON (Signature w) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

toJSON ∷ Signature w → Value #

toEncoding ∷ Signature w → Encoding #

toJSONList ∷ [Signature w] → Value #

toEncodingList ∷ [Signature w] → Encoding #

Crypto crypto ⇒ ToJSON (GenDelegs crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ GenDelegs crypto → Value #

toEncoding ∷ GenDelegs crypto → Encoding #

toJSONList ∷ [GenDelegs crypto] → Value #

toEncodingList ∷ [GenDelegs crypto] → Encoding #

ToJSON a ⇒ ToJSON (ABoundaryBody a) 
Instance details

Defined in Cardano.Chain.Block.Block

Methods

toJSON ∷ ABoundaryBody a → Value #

toEncoding ∷ ABoundaryBody a → Encoding #

toJSONList ∷ [ABoundaryBody a] → Value #

toEncodingList ∷ [ABoundaryBody a] → Encoding #

ToJSON a ⇒ ToJSON (ABody a) 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

toJSON ∷ ABody a → Value #

toEncoding ∷ ABody a → Encoding #

toJSONList ∷ [ABody a] → Value #

toEncodingList ∷ [ABody a] → Encoding #

ToJSON a ⇒ ToJSON (APayload a) 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

toJSON ∷ APayload a → Value #

toEncoding ∷ APayload a → Encoding #

toJSONList ∷ [APayload a] → Value #

toEncodingList ∷ [APayload a] → Encoding #

ToJSON a ⇒ ToJSON (ABlockSignature a) 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toJSON ∷ ABlockSignature a → Value #

toEncoding ∷ ABlockSignature a → Encoding #

toJSONList ∷ [ABlockSignature a] → Value #

toEncodingList ∷ [ABlockSignature a] → Encoding #

ToJSON a ⇒ ToJSON (ATxPayload a) 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

toJSON ∷ ATxPayload a → Value #

toEncoding ∷ ATxPayload a → Encoding #

toJSONList ∷ [ATxPayload a] → Value #

toEncodingList ∷ [ATxPayload a] → Encoding #

ToJSON a ⇒ ToJSON (APayload a) 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

toJSON ∷ APayload a → Value #

toEncoding ∷ APayload a → Encoding #

toJSONList ∷ [APayload a] → Value #

toEncodingList ∷ [APayload a] → Encoding #

ToJSON a ⇒ ToJSON (Attributes a) 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

toJSON ∷ Attributes a → Value #

toEncoding ∷ Attributes a → Encoding #

toJSONList ∷ [Attributes a] → Value #

toEncodingList ∷ [Attributes a] → Encoding #

ToJSON a ⇒ ToJSON (MerkleRoot a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

toJSON ∷ MerkleRoot a → Value #

toEncoding ∷ MerkleRoot a → Encoding #

toJSONList ∷ [MerkleRoot a] → Value #

toEncodingList ∷ [MerkleRoot a] → Encoding #

ToJSON (BuiltinCostModelBase CostingFun) 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ BuiltinCostModelBase CostingFun → Value #

toEncoding ∷ BuiltinCostModelBase CostingFun → Encoding #

toJSONList ∷ [BuiltinCostModelBase CostingFun] → Value #

toEncodingList ∷ [BuiltinCostModelBase CostingFun] → Encoding #

ToJSON model ⇒ ToJSON (CostingFun model) 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ CostingFun model → Value #

toEncoding ∷ CostingFun model → Encoding #

toJSONList ∷ [CostingFun model] → Value #

toEncodingList ∷ [CostingFun model] → Encoding #

ToJSON a ⇒ ToJSON (Extended a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

toJSON ∷ Extended a → Value #

toEncoding ∷ Extended a → Encoding #

toJSONList ∷ [Extended a] → Value #

toEncodingList ∷ [Extended a] → Encoding #

ToJSON a ⇒ ToJSON (Interval a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

toJSON ∷ Interval a → Value #

toEncoding ∷ Interval a → Encoding #

toJSONList ∷ [Interval a] → Value #

toEncodingList ∷ [Interval a] → Encoding #

ToJSON a ⇒ ToJSON (LowerBound a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

toJSON ∷ LowerBound a → Value #

toEncoding ∷ LowerBound a → Encoding #

toJSONList ∷ [LowerBound a] → Value #

toEncodingList ∷ [LowerBound a] → Encoding #

ToJSON a ⇒ ToJSON (UpperBound a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

toJSON ∷ UpperBound a → Value #

toEncoding ∷ UpperBound a → Encoding #

toJSONList ∷ [UpperBound a] → Value #

toEncodingList ∷ [UpperBound a] → Encoding #

ToJSON a ⇒ ToJSON (Ratio a) 
Instance details

Defined in PlutusTx.Ratio

Methods

toJSON ∷ Ratio a → Value #

toEncoding ∷ Ratio a → Encoding #

toJSONList ∷ [Ratio a] → Value #

toEncodingList ∷ [Ratio a] → Encoding #

ToJSON (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toJSON ∷ StakeCreds crypto → Value #

toEncoding ∷ StakeCreds crypto → Encoding #

toJSONList ∷ [StakeCreds crypto] → Value #

toEncodingList ∷ [StakeCreds crypto] → Encoding #

ToJSON (Stake crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Stake crypto → Value #

toEncoding ∷ Stake crypto → Encoding #

toJSONList ∷ [Stake crypto] → Value #

toEncodingList ∷ [Stake crypto] → Encoding #

Crypto crypto ⇒ ToJSON (RewardUpdate crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ RewardUpdate crypto → Value #

toEncoding ∷ RewardUpdate crypto → Encoding #

toJSONList ∷ [RewardUpdate crypto] → Value #

toEncodingList ∷ [RewardUpdate crypto] → Encoding #

ToJSON (Reward crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Reward crypto → Value #

toEncoding ∷ Reward crypto → Encoding #

toJSONList ∷ [Reward crypto] → Value #

toEncodingList ∷ [Reward crypto] → Encoding #

ToJSON d ⇒ ToJSON (LinearTransform d) 
Instance details

Defined in Statistics.Distribution.Transform

Methods

toJSON ∷ LinearTransform d → Value #

toEncoding ∷ LinearTransform d → Encoding #

toJSONList ∷ [LinearTransform d] → Value #

toEncodingList ∷ [LinearTransform d] → Encoding #

ToJSON (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toJSON ∷ SimpleScript lang → Value #

toEncoding ∷ SimpleScript lang → Encoding #

toJSONList ∷ [SimpleScript lang] → Value #

toEncodingList ∷ [SimpleScript lang] → Encoding #

IsCardanoEra era ⇒ ToJSON (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

toJSON ∷ AddressInEra era → Value #

toEncoding ∷ AddressInEra era → Encoding #

toJSONList ∷ [AddressInEra era] → Value #

toEncodingList ∷ [AddressInEra era] → Encoding #

ToJSON (TxOutValue era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxOutValue era → Value #

toEncoding ∷ TxOutValue era → Encoding #

toJSONList ∷ [TxOutValue era] → Value #

toEncodingList ∷ [TxOutValue era] → Encoding #

ToJSON (MultiAssetSupportedInEra era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ MultiAssetSupportedInEra era → Value #

toEncoding ∷ MultiAssetSupportedInEra era → Encoding #

toJSONList ∷ [MultiAssetSupportedInEra era] → Value #

toEncodingList ∷ [MultiAssetSupportedInEra era] → Encoding #

IsCardanoEra era ⇒ ToJSON (TxOut era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxOut era → Value #

toEncoding ∷ TxOut era → Encoding #

toJSONList ∷ [TxOut era] → Value #

toEncodingList ∷ [TxOut era] → Encoding #

(IsShelleyBasedEra era, ShelleyLedgerEra era ~ ledgerera, ShelleyBasedEra ledgerera, ToJSON (PParams ledgerera), ToJSON (PParamsDelta ledgerera), ToJSON (TxOut ledgerera)) ⇒ ToJSON (DebugLedgerState era) Source # 
Instance details

Defined in Cardano.Api.Query

Methods

toJSON ∷ DebugLedgerState era → Value #

toEncoding ∷ DebugLedgerState era → Encoding #

toJSONList ∷ [DebugLedgerState era] → Value #

toEncodingList ∷ [DebugLedgerState era] → Encoding #

IsCardanoEra era ⇒ ToJSON (UTxO era) Source # 
Instance details

Defined in Cardano.Api.Query

Methods

toJSON ∷ UTxO era → Value #

toEncoding ∷ UTxO era → Encoding #

toJSONList ∷ [UTxO era] → Value #

toEncodingList ∷ [UTxO era] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (Either a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Either a b → Value #

toEncoding ∷ Either a b → Encoding #

toJSONList ∷ [Either a b] → Value #

toEncodingList ∷ [Either a b] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (a, b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b) → Value #

toEncoding ∷ (a, b) → Encoding #

toJSONList ∷ [(a, b)] → Value #

toEncodingList ∷ [(a, b)] → Encoding #

(ToJSON v, ToJSONKey k) ⇒ ToJSON (Map k v) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Map k v → Value #

toEncoding ∷ Map k v → Encoding #

toJSONList ∷ [Map k v] → Value #

toEncodingList ∷ [Map k v] → Encoding #

ToJSON (Proxy a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Proxy a → Value #

toEncoding ∷ Proxy a → Encoding #

toJSONList ∷ [Proxy a] → Value #

toEncodingList ∷ [Proxy a] → Encoding #

HasResolution a ⇒ ToJSON (Fixed a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Fixed a → Value #

toEncoding ∷ Fixed a → Encoding #

toJSONList ∷ [Fixed a] → Value #

toEncodingList ∷ [Fixed a] → Encoding #

(ToJSON v, ToJSONKey k) ⇒ ToJSON (HashMap k v) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ HashMap k v → Value #

toEncoding ∷ HashMap k v → Encoding #

toJSONList ∷ [HashMap k v] → Value #

toEncodingList ∷ [HashMap k v] → Encoding #

ToJSON b ⇒ ToJSON (Annotated b a) 
Instance details

Defined in Cardano.Binary.Annotated

Methods

toJSON ∷ Annotated b a → Value #

toEncoding ∷ Annotated b a → Encoding #

toJSONList ∷ [Annotated b a] → Value #

toEncodingList ∷ [Annotated b a] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (Either a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Either a b → Value #

toEncoding ∷ Either a b → Encoding #

toJSONList ∷ [Either a b] → Value #

toEncodingList ∷ [Either a b] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (These a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ These a b → Value #

toEncoding ∷ These a b → Encoding #

toJSONList ∷ [These a b] → Value #

toEncodingList ∷ [These a b] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (These a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ These a b → Value #

toEncoding ∷ These a b → Encoding #

toJSONList ∷ [These a b] → Value #

toEncodingList ∷ [These a b] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (Pair a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Pair a b → Value #

toEncoding ∷ Pair a b → Encoding #

toJSONList ∷ [Pair a b] → Value #

toEncodingList ∷ [Pair a b] → Encoding #

ToJSON (Hash crypto a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

toJSON ∷ Hash crypto a → Value #

toEncoding ∷ Hash crypto a → Encoding #

toJSONList ∷ [Hash crypto a] → Value #

toEncodingList ∷ [Hash crypto a] → Encoding #

ToJSON (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toJSON ∷ KeyHash disc crypto → Value #

toEncoding ∷ KeyHash disc crypto → Encoding #

toJSONList ∷ [KeyHash disc crypto] → Value #

toEncodingList ∷ [KeyHash disc crypto] → Encoding #

ToJSON (SafeHash c a) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ SafeHash c a → Value #

toEncoding ∷ SafeHash c a → Encoding #

toJSONList ∷ [SafeHash c a] → Value #

toEncodingList ∷ [SafeHash c a] → Encoding #

ToJSON (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toJSON ∷ Credential kr crypto → Value #

toEncoding ∷ Credential kr crypto → Encoding #

toJSONList ∷ [Credential kr crypto] → Value #

toEncodingList ∷ [Credential kr crypto] → Encoding #

ToJSON (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

toJSON ∷ AbstractHash algo a → Value #

toEncoding ∷ AbstractHash algo a → Encoding #

toJSONList ∷ [AbstractHash algo a] → Value #

toEncodingList ∷ [AbstractHash algo a] → Encoding #

ToJSON (Bimap Ptr (Credential 'Staking crypto)) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Bimap Ptr (Credential 'Staking crypto) → Value #

toEncoding ∷ Bimap Ptr (Credential 'Staking crypto) → Encoding #

toJSONList ∷ [Bimap Ptr (Credential 'Staking crypto)] → Value #

toEncodingList ∷ [Bimap Ptr (Credential 'Staking crypto)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c) ⇒ ToJSON (a, b, c) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c) → Value #

toEncoding ∷ (a, b, c) → Encoding #

toJSONList ∷ [(a, b, c)] → Value #

toEncodingList ∷ [(a, b, c)] → Encoding #

ToJSON a ⇒ ToJSON (Const a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Const a b → Value #

toEncoding ∷ Const a b → Encoding #

toJSONList ∷ [Const a b] → Value #

toEncodingList ∷ [Const a b] → Encoding #

ToJSON b ⇒ ToJSON (Tagged a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Tagged a b → Value #

toEncoding ∷ Tagged a b → Encoding #

toJSONList ∷ [Tagged a b] → Value #

toEncodingList ∷ [Tagged a b] → Encoding #

(ToJSON1 f, ToJSON1 g, ToJSON a) ⇒ ToJSON (These1 f g a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ These1 f g a → Value #

toEncoding ∷ These1 f g a → Encoding #

toJSONList ∷ [These1 f g a] → Value #

toEncodingList ∷ [These1 f g a] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d) ⇒ ToJSON (a, b, c, d) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d) → Value #

toEncoding ∷ (a, b, c, d) → Encoding #

toJSONList ∷ [(a, b, c, d)] → Value #

toEncodingList ∷ [(a, b, c, d)] → Encoding #

(ToJSON1 f, ToJSON1 g, ToJSON a) ⇒ ToJSON (Product f g a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Product f g a → Value #

toEncoding ∷ Product f g a → Encoding #

toJSONList ∷ [Product f g a] → Value #

toEncodingList ∷ [Product f g a] → Encoding #

(ToJSON1 f, ToJSON1 g, ToJSON a) ⇒ ToJSON (Sum f g a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Sum f g a → Value #

toEncoding ∷ Sum f g a → Encoding #

toJSONList ∷ [Sum f g a] → Value #

toEncodingList ∷ [Sum f g a] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e) ⇒ ToJSON (a, b, c, d, e) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e) → Value #

toEncoding ∷ (a, b, c, d, e) → Encoding #

toJSONList ∷ [(a, b, c, d, e)] → Value #

toEncodingList ∷ [(a, b, c, d, e)] → Encoding #

(ToJSON1 f, ToJSON1 g, ToJSON a) ⇒ ToJSON (Compose f g a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Compose f g a → Value #

toEncoding ∷ Compose f g a → Encoding #

toJSONList ∷ [Compose f g a] → Value #

toEncodingList ∷ [Compose f g a] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f) ⇒ ToJSON (a, b, c, d, e, f) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f) → Value #

toEncoding ∷ (a, b, c, d, e, f) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g) ⇒ ToJSON (a, b, c, d, e, f, g) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g) → Value #

toEncoding ∷ (a, b, c, d, e, f, g) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h) ⇒ ToJSON (a, b, c, d, e, f, g, h) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i) ⇒ ToJSON (a, b, c, d, e, f, g, h, i) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j, ToJSON k) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j, k) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j, k) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j, k) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j, k)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j, k)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j, ToJSON k, ToJSON l) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j, k, l) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j, k, l) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j, k, l) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j, ToJSON k, ToJSON l, ToJSON m) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j, k, l, m) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j, ToJSON k, ToJSON l, ToJSON m, ToJSON n) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j, k, l, m, n) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m, n) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m, n) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m, n)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m, n)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j, ToJSON k, ToJSON l, ToJSON m, ToJSON n, ToJSON o) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m, n, o)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m, n, o)] → Encoding #

class FromJSON a #

Instances

Instances details
FromJSON Bool 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Bool #

parseJSONList ∷ Value → Parser [Bool] #

FromJSON Char 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Char #

parseJSONList ∷ Value → Parser [Char] #

FromJSON Double 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Double #

parseJSONList ∷ Value → Parser [Double] #

FromJSON Float 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Float #

parseJSONList ∷ Value → Parser [Float] #

FromJSON Int 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Int #

parseJSONList ∷ Value → Parser [Int] #

FromJSON Int8 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Int8 #

parseJSONList ∷ Value → Parser [Int8] #

FromJSON Int16 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Int16 #

parseJSONList ∷ Value → Parser [Int16] #

FromJSON Int32 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Int32 #

parseJSONList ∷ Value → Parser [Int32] #

FromJSON Int64 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Int64 #

parseJSONList ∷ Value → Parser [Int64] #

FromJSON Integer 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Integer #

parseJSONList ∷ Value → Parser [Integer] #

FromJSON Natural 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Natural #

parseJSONList ∷ Value → Parser [Natural] #

FromJSON Ordering 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Ordering #

parseJSONList ∷ Value → Parser [Ordering] #

FromJSON Word 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Word #

parseJSONList ∷ Value → Parser [Word] #

FromJSON Word8 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Word8 #

parseJSONList ∷ Value → Parser [Word8] #

FromJSON Word16 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Word16 #

parseJSONList ∷ Value → Parser [Word16] #

FromJSON Word32 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Word32 #

parseJSONList ∷ Value → Parser [Word32] #

FromJSON Word64 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Word64 #

parseJSONList ∷ Value → Parser [Word64] #

FromJSON () 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser () #

parseJSONList ∷ Value → Parser [()] #

FromJSON Version 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Version #

parseJSONList ∷ Value → Parser [Version] #

FromJSON Void 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Void #

parseJSONList ∷ Value → Parser [Void] #

FromJSON CTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser CTime #

parseJSONList ∷ Value → Parser [CTime] #

FromJSON IntSet 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser IntSet #

parseJSONList ∷ Value → Parser [IntSet] #

FromJSON Text 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Text #

parseJSONList ∷ Value → Parser [Text] #

FromJSON Text 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Text #

parseJSONList ∷ Value → Parser [Text] #

FromJSON ZonedTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser ZonedTime #

parseJSONList ∷ Value → Parser [ZonedTime] #

FromJSON LocalTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser LocalTime #

parseJSONList ∷ Value → Parser [LocalTime] #

FromJSON TimeOfDay 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser TimeOfDay #

parseJSONList ∷ Value → Parser [TimeOfDay] #

FromJSON CalendarDiffTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser CalendarDiffTime #

parseJSONList ∷ Value → Parser [CalendarDiffTime] #

FromJSON UTCTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser UTCTime #

parseJSONList ∷ Value → Parser [UTCTime] #

FromJSON SystemTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser SystemTime #

parseJSONList ∷ Value → Parser [SystemTime] #

FromJSON NominalDiffTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser NominalDiffTime #

parseJSONList ∷ Value → Parser [NominalDiffTime] #

FromJSON DiffTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser DiffTime #

parseJSONList ∷ Value → Parser [DiffTime] #

FromJSON DayOfWeek 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser DayOfWeek #

parseJSONList ∷ Value → Parser [DayOfWeek] #

FromJSON Day 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Day #

parseJSONList ∷ Value → Parser [Day] #

FromJSON CalendarDiffDays 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser CalendarDiffDays #

parseJSONList ∷ Value → Parser [CalendarDiffDays] #

FromJSON Scientific 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Scientific #

parseJSONList ∷ Value → Parser [Scientific] #

FromJSON DotNetTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser DotNetTime #

parseJSONList ∷ Value → Parser [DotNetTime] #

FromJSON Value 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Value #

parseJSONList ∷ Value → Parser [Value] #

FromJSON EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

parseJSON ∷ Value → Parser EpochNo #

parseJSONList ∷ Value → Parser [EpochNo] #

FromJSON EpochSize 
Instance details

Defined in Cardano.Slotting.Slot

Methods

parseJSON ∷ Value → Parser EpochSize #

parseJSONList ∷ Value → Parser [EpochSize] #

FromJSON SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

parseJSON ∷ Value → Parser SlotNo #

parseJSONList ∷ Value → Parser [SlotNo] #

FromJSON UUID 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser UUID #

parseJSONList ∷ Value → Parser [UUID] #

FromJSON Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

parseJSON ∷ Value → Parser Coin #

parseJSONList ∷ Value → Parser [Coin] #

FromJSON UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser UnitInterval #

parseJSONList ∷ Value → Parser [UnitInterval] #

FromJSON ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

parseJSON ∷ Value → Parser ProtVer #

parseJSONList ∷ Value → Parser [ProtVer] #

FromJSON AlonzoGenesis Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser AlonzoGenesis #

parseJSONList ∷ Value → Parser [AlonzoGenesis] #

FromJSON Language Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser Language #

parseJSONList ∷ Value → Parser [Language] #

FromJSON CostModel Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser CostModel #

parseJSONList ∷ Value → Parser [CostModel] #

FromJSON Prices Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser Prices #

parseJSONList ∷ Value → Parser [Prices] #

FromJSON ExUnits Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser ExUnits #

parseJSONList ∷ Value → Parser [ExUnits] #

FromJSON AssetClass 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

parseJSON ∷ Value → Parser AssetClass #

parseJSONList ∷ Value → Parser [AssetClass] #

FromJSON CurrencySymbol 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

parseJSON ∷ Value → Parser CurrencySymbol #

parseJSONList ∷ Value → Parser [CurrencySymbol] #

FromJSON TokenName 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

parseJSON ∷ Value → Parser TokenName #

parseJSONList ∷ Value → Parser [TokenName] #

FromJSON Value 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

parseJSON ∷ Value0 → Parser Value #

parseJSONList ∷ Value0 → Parser [Value] #

FromJSON MonetaryPolicyHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser MonetaryPolicyHash #

parseJSONList ∷ Value → Parser [MonetaryPolicyHash] #

FromJSON Context 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser Context #

parseJSONList ∷ Value → Parser [Context] #

FromJSON Datum 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser Datum #

parseJSONList ∷ Value → Parser [Datum] #

FromJSON DatumHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser DatumHash #

parseJSONList ∷ Value → Parser [DatumHash] #

FromJSON MonetaryPolicy 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser MonetaryPolicy #

parseJSONList ∷ Value → Parser [MonetaryPolicy] #

FromJSON Redeemer 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser Redeemer #

parseJSONList ∷ Value → Parser [Redeemer] #

FromJSON RedeemerHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser RedeemerHash #

parseJSONList ∷ Value → Parser [RedeemerHash] #

FromJSON Script 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser Script #

parseJSONList ∷ Value → Parser [Script] #

FromJSON ScriptError 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser ScriptError #

parseJSONList ∷ Value → Parser [ScriptError] #

FromJSON Validator 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser Validator #

parseJSONList ∷ Value → Parser [Validator] #

FromJSON ValidatorHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser ValidatorHash #

parseJSONList ∷ Value → Parser [ValidatorHash] #

FromJSON Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser Nonce #

parseJSONList ∷ Value → Parser [Nonce] #

FromJSON Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

parseJSON ∷ Value → Parser Desirability #

parseJSONList ∷ Value → Parser [Desirability] #

FromJSON StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

parseJSON ∷ Value → Parser StakePoolRelay #

parseJSONList ∷ Value → Parser [StakePoolRelay] #

FromJSON PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

parseJSON ∷ Value → Parser PoolMetadata #

parseJSONList ∷ Value → Parser [PoolMetadata] #

FromJSON Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser Network #

parseJSONList ∷ Value → Parser [Network] #

FromJSON Month 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Month #

parseJSONList ∷ Value → Parser [Month] #

FromJSON Quarter 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Quarter #

parseJSONList ∷ Value → Parser [Quarter] #

FromJSON QuarterOfYear 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser QuarterOfYear #

parseJSONList ∷ Value → Parser [QuarterOfYear] #

FromJSON RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

parseJSON ∷ Value → Parser RequiresNetworkMagic #

parseJSONList ∷ Value → Parser [RequiresNetworkMagic] #

FromJSON ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

parseJSON ∷ Value → Parser ProtocolMagicId #

parseJSONList ∷ Value → Parser [ProtocolMagicId] #

FromJSON VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

parseJSON ∷ Value → Parser VerificationKey #

parseJSONList ∷ Value → Parser [VerificationKey] #

FromJSON ProtocolMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

parseJSON ∷ Value → Parser ProtocolMagic #

parseJSONList ∷ Value → Parser [ProtocolMagic] #

FromJSON CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

parseJSON ∷ Value → Parser CompactRedeemVerificationKey #

parseJSONList ∷ Value → Parser [CompactRedeemVerificationKey] #

FromJSON ByteString64 
Instance details

Defined in Data.ByteString.Base64.Type

Methods

parseJSON ∷ Value → Parser ByteString64 #

parseJSONList ∷ Value → Parser [ByteString64] #

FromJSON RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

parseJSON ∷ Value → Parser RedeemVerificationKey #

parseJSONList ∷ Value → Parser [RedeemVerificationKey] #

FromJSON CekMachineCosts 
Instance details

Defined in UntypedPlutusCore.Evaluation.Machine.Cek.CekMachineCosts

Methods

parseJSON ∷ Value → Parser CekMachineCosts #

parseJSONList ∷ Value → Parser [CekMachineCosts] #

FromJSON DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser DnsName #

parseJSONList ∷ Value → Parser [DnsName] #

FromJSON Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser Port #

parseJSONList ∷ Value → Parser [Port] #

FromJSON Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser Url #

parseJSONList ∷ Value → Parser [Url] #

FromJSON ModelAddedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelAddedSizes #

parseJSONList ∷ Value → Parser [ModelAddedSizes] #

FromJSON ModelLinearSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelLinearSize #

parseJSONList ∷ Value → Parser [ModelLinearSize] #

FromJSON ModelMaxSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelMaxSize #

parseJSONList ∷ Value → Parser [ModelMaxSize] #

FromJSON ModelMinSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelMinSize #

parseJSONList ∷ Value → Parser [ModelMinSize] #

FromJSON ModelMultipliedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelMultipliedSizes #

parseJSONList ∷ Value → Parser [ModelMultipliedSizes] #

FromJSON ModelOneArgument 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelOneArgument #

parseJSONList ∷ Value → Parser [ModelOneArgument] #

FromJSON ModelOrientation 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelOrientation #

parseJSONList ∷ Value → Parser [ModelOrientation] #

FromJSON ModelSplitConst 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelSplitConst #

parseJSONList ∷ Value → Parser [ModelSplitConst] #

FromJSON ModelSubtractedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelSubtractedSizes #

parseJSONList ∷ Value → Parser [ModelSubtractedSizes] #

FromJSON ModelThreeArguments 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelThreeArguments #

parseJSONList ∷ Value → Parser [ModelThreeArguments] #

FromJSON ModelTwoArguments 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelTwoArguments #

parseJSONList ∷ Value → Parser [ModelTwoArguments] #

FromJSON ExMemory 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExMemory

Methods

parseJSON ∷ Value → Parser ExMemory #

parseJSONList ∷ Value → Parser [ExMemory] #

FromJSON ExBudget 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExBudget

Methods

parseJSON ∷ Value → Parser ExBudget #

parseJSONList ∷ Value → Parser [ExBudget] #

FromJSON ExCPU 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExMemory

Methods

parseJSON ∷ Value → Parser ExCPU #

parseJSONList ∷ Value → Parser [ExCPU] #

FromJSON Ada 
Instance details

Defined in Plutus.V1.Ledger.Ada

Methods

parseJSON ∷ Value → Parser Ada #

parseJSONList ∷ Value → Parser [Ada] #

FromJSON Address 
Instance details

Defined in Plutus.V1.Ledger.Address

Methods

parseJSON ∷ Value → Parser Address #

parseJSONList ∷ Value → Parser [Address] #

FromJSON Credential 
Instance details

Defined in Plutus.V1.Ledger.Credential

Methods

parseJSON ∷ Value → Parser Credential #

parseJSONList ∷ Value → Parser [Credential] #

FromJSON StakingCredential 
Instance details

Defined in Plutus.V1.Ledger.Credential

Methods

parseJSON ∷ Value → Parser StakingCredential #

parseJSONList ∷ Value → Parser [StakingCredential] #

FromJSON PubKeyHash 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

parseJSON ∷ Value → Parser PubKeyHash #

parseJSONList ∷ Value → Parser [PubKeyHash] #

FromJSON PubKey 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

parseJSON ∷ Value → Parser PubKey #

parseJSONList ∷ Value → Parser [PubKey] #

FromJSON LedgerBytes 
Instance details

Defined in Plutus.V1.Ledger.Bytes

Methods

parseJSON ∷ Value → Parser LedgerBytes #

parseJSONList ∷ Value → Parser [LedgerBytes] #

FromJSON TxOut 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser TxOut #

parseJSONList ∷ Value → Parser [TxOut] #

FromJSON TxOutRef 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser TxOutRef #

parseJSONList ∷ Value → Parser [TxOutRef] #

FromJSON DCert 
Instance details

Defined in Plutus.V1.Ledger.DCert

Methods

parseJSON ∷ Value → Parser DCert #

parseJSONList ∷ Value → Parser [DCert] #

FromJSON TxId 
Instance details

Defined in Plutus.V1.Ledger.TxId

Methods

parseJSON ∷ Value → Parser TxId #

parseJSONList ∷ Value → Parser [TxId] #

FromJSON POSIXTime 
Instance details

Defined in Plutus.V1.Ledger.Time

Methods

parseJSON ∷ Value → Parser POSIXTime #

parseJSONList ∷ Value → Parser [POSIXTime] #

FromJSON Signature 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

parseJSON ∷ Value → Parser Signature #

parseJSONList ∷ Value → Parser [Signature] #

FromJSON PrivateKey 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

parseJSON ∷ Value → Parser PrivateKey #

parseJSONList ∷ Value → Parser [PrivateKey] #

FromJSON Slot 
Instance details

Defined in Plutus.V1.Ledger.Slot

Methods

parseJSON ∷ Value → Parser Slot #

parseJSONList ∷ Value → Parser [Slot] #

FromJSON Tx 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser Tx #

parseJSONList ∷ Value → Parser [Tx] #

FromJSON TxIn 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser TxIn #

parseJSONList ∷ Value → Parser [TxIn] #

FromJSON TxInType 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser TxInType #

parseJSONList ∷ Value → Parser [TxInType] #

FromJSON TxOutTx 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser TxOutTx #

parseJSONList ∷ Value → Parser [TxOutTx] #

FromJSON StudentT 
Instance details

Defined in Statistics.Distribution.StudentT

Methods

parseJSON ∷ Value → Parser StudentT #

parseJSONList ∷ Value → Parser [StudentT] #

FromJSON TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelope #

parseJSONList ∷ Value → Parser [TextEnvelope] #

FromJSON TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelopeDescr #

parseJSONList ∷ Value → Parser [TextEnvelopeDescr] #

FromJSON TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelopeType #

parseJSONList ∷ Value → Parser [TextEnvelopeType] #

FromJSON ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

parseJSON ∷ Value → Parser ExecutionUnits #

parseJSONList ∷ Value → Parser [ExecutionUnits] #

FromJSON AnyPlutusScriptVersion Source # 
Instance details

Defined in Cardano.Api.Script

Methods

parseJSON ∷ Value → Parser AnyPlutusScriptVersion #

parseJSONList ∷ Value → Parser [AnyPlutusScriptVersion] #

FromJSON StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

parseJSON ∷ Value → Parser StakePoolMetadata #

parseJSONList ∷ Value → Parser [StakePoolMetadata] #

FromJSON ValueNestedRep Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value → Parser ValueNestedRep #

parseJSONList ∷ Value → Parser [ValueNestedRep] #

FromJSON Value Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value0 → Parser Value #

parseJSONList ∷ Value0 → Parser [Value] #

FromJSON AssetName Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value → Parser AssetName #

parseJSONList ∷ Value → Parser [AssetName] #

FromJSON Quantity Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value → Parser Quantity #

parseJSONList ∷ Value → Parser [Quantity] #

FromJSON Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value → Parser Lovelace #

parseJSONList ∷ Value → Parser [Lovelace] #

FromJSON CostModel Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

parseJSON ∷ Value → Parser CostModel #

parseJSONList ∷ Value → Parser [CostModel] #

FromJSON ExecutionUnitPrices Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

parseJSON ∷ Value → Parser ExecutionUnitPrices #

parseJSONList ∷ Value → Parser [ExecutionUnitPrices] #

FromJSON PraosNonce Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

parseJSON ∷ Value → Parser PraosNonce #

parseJSONList ∷ Value → Parser [PraosNonce] #

FromJSON ProtocolParameters Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

parseJSON ∷ Value → Parser ProtocolParameters #

parseJSONList ∷ Value → Parser [ProtocolParameters] #

FromJSON a ⇒ FromJSON [a] 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser [a] #

parseJSONList ∷ Value → Parser [[a]] #

FromJSON a ⇒ FromJSON (Maybe a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Maybe a) #

parseJSONList ∷ Value → Parser [Maybe a] #

(FromJSON a, Integral a) ⇒ FromJSON (Ratio a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Ratio a) #

parseJSONList ∷ Value → Parser [Ratio a] #

FromJSON a ⇒ FromJSON (First a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (First a) #

parseJSONList ∷ Value → Parser [First a] #

FromJSON a ⇒ FromJSON (Last a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Last a) #

parseJSONList ∷ Value → Parser [Last a] #

(Ord a, FromJSON a) ⇒ FromJSON (Set a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Set a) #

parseJSONList ∷ Value → Parser [Set a] #

FromJSON a ⇒ FromJSON (NonEmpty a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (NonEmpty a) #

parseJSONList ∷ Value → Parser [NonEmpty a] #

FromJSON a ⇒ FromJSON (Identity a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Identity a) #

parseJSONList ∷ Value → Parser [Identity a] #

FromJSON a ⇒ FromJSON (Min a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Min a) #

parseJSONList ∷ Value → Parser [Min a] #

FromJSON a ⇒ FromJSON (Max a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Max a) #

parseJSONList ∷ Value → Parser [Max a] #

FromJSON a ⇒ FromJSON (WrappedMonoid a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (WrappedMonoid a) #

parseJSONList ∷ Value → Parser [WrappedMonoid a] #

FromJSON a ⇒ FromJSON (Option a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Option a) #

parseJSONList ∷ Value → Parser [Option a] #

FromJSON a ⇒ FromJSON (First a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (First a) #

parseJSONList ∷ Value → Parser [First a] #

FromJSON a ⇒ FromJSON (Last a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Last a) #

parseJSONList ∷ Value → Parser [Last a] #

FromJSON a ⇒ FromJSON (Dual a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Dual a) #

parseJSONList ∷ Value → Parser [Dual a] #

FromJSON a ⇒ FromJSON (IntMap a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (IntMap a) #

parseJSONList ∷ Value → Parser [IntMap a] #

FromJSON v ⇒ FromJSON (Tree v) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Tree v) #

parseJSONList ∷ Value → Parser [Tree v] #

FromJSON a ⇒ FromJSON (Seq a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Seq a) #

parseJSONList ∷ Value → Parser [Seq a] #

(Vector Vector a, FromJSON a) ⇒ FromJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Vector a) #

parseJSONList ∷ Value → Parser [Vector a] #

FromJSON a ⇒ FromJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Vector a) #

parseJSONList ∷ Value → Parser [Vector a] #

FromJSON1 f ⇒ FromJSON (Fix f) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Fix f) #

parseJSONList ∷ Value → Parser [Fix f] #

(FromJSON1 f, Functor f) ⇒ FromJSON (Mu f) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Mu f) #

parseJSONList ∷ Value → Parser [Mu f] #

(FromJSON1 f, Functor f) ⇒ FromJSON (Nu f) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Nu f) #

parseJSONList ∷ Value → Parser [Nu f] #

FromJSON a ⇒ FromJSON (DNonEmpty a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (DNonEmpty a) #

parseJSONList ∷ Value → Parser [DNonEmpty a] #

FromJSON a ⇒ FromJSON (DList a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (DList a) #

parseJSONList ∷ Value → Parser [DList a] #

FromJSON a ⇒ FromJSON (Array a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Array a) #

parseJSONList ∷ Value → Parser [Array a] #

(Prim a, FromJSON a) ⇒ FromJSON (PrimArray a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (PrimArray a) #

parseJSONList ∷ Value → Parser [PrimArray a] #

FromJSON a ⇒ FromJSON (SmallArray a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (SmallArray a) #

parseJSONList ∷ Value → Parser [SmallArray a] #

FromJSON a ⇒ FromJSON (Maybe a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Maybe a) #

parseJSONList ∷ Value → Parser [Maybe a] #

(Eq a, Hashable a, FromJSON a) ⇒ FromJSON (HashSet a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (HashSet a) #

parseJSONList ∷ Value → Parser [HashSet a] #

(Prim a, FromJSON a) ⇒ FromJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Vector a) #

parseJSONList ∷ Value → Parser [Vector a] #

(Storable a, FromJSON a) ⇒ FromJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Vector a) #

parseJSONList ∷ Value → Parser [Vector a] #

Crypto crypto ⇒ FromJSON (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

parseJSON ∷ Value → Parser (ScriptHash crypto) #

parseJSONList ∷ Value → Parser [ScriptHash crypto] #

FromJSON a ⇒ FromJSON (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

parseJSON ∷ Value → Parser (StrictMaybe a) #

parseJSONList ∷ Value → Parser [StrictMaybe a] #

FromJSON (PParams era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser (PParams era) #

parseJSONList ∷ Value → Parser [PParams era] #

FromJSON (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

parseJSON ∷ Value → Parser (PParams era) #

parseJSONList ∷ Value → Parser [PParams era] #

Crypto crypto ⇒ FromJSON (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

parseJSON ∷ Value → Parser (BlocksMade crypto) #

parseJSONList ∷ Value → Parser [BlocksMade crypto] #

Era era ⇒ FromJSON (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

parseJSON ∷ Value → Parser (ShelleyGenesis era) #

parseJSONList ∷ Value → Parser [ShelleyGenesis era] #

Crypto crypto ⇒ FromJSON (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

parseJSON ∷ Value → Parser (GenDelegPair crypto) #

parseJSONList ∷ Value → Parser [GenDelegPair crypto] #

Crypto crypto ⇒ FromJSON (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

parseJSON ∷ Value → Parser (Addr crypto) #

parseJSONList ∷ Value → Parser [Addr crypto] #

Crypto crypto ⇒ FromJSON (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

parseJSON ∷ Value → Parser (ShelleyGenesisStaking crypto) #

parseJSONList ∷ Value → Parser [ShelleyGenesisStaking crypto] #

Crypto crypto ⇒ FromJSON (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

parseJSON ∷ Value → Parser (PoolParams crypto) #

parseJSONList ∷ Value → Parser [PoolParams crypto] #

Crypto crypto ⇒ FromJSON (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

parseJSON ∷ Value → Parser (RewardProvenance crypto) #

parseJSONList ∷ Value → Parser [RewardProvenance crypto] #

Crypto crypto ⇒ FromJSON (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

parseJSON ∷ Value → Parser (RewardProvenancePool crypto) #

parseJSONList ∷ Value → Parser [RewardProvenancePool crypto] #

Crypto crypto ⇒ FromJSON (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

parseJSON ∷ Value → Parser (RewardAcnt crypto) #

parseJSONList ∷ Value → Parser [RewardAcnt crypto] #

FromJSON a ⇒ FromJSON (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

parseJSON ∷ Value → Parser (RedeemSignature a) #

parseJSONList ∷ Value → Parser [RedeemSignature a] #

FromJSON (Signature w) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

parseJSON ∷ Value → Parser (Signature w) #

parseJSONList ∷ Value → Parser [Signature w] #

FromJSON (BuiltinCostModelBase CostingFun) 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser (BuiltinCostModelBase CostingFun) #

parseJSONList ∷ Value → Parser [BuiltinCostModelBase CostingFun] #

FromJSON model ⇒ FromJSON (CostingFun model) 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser (CostingFun model) #

parseJSONList ∷ Value → Parser [CostingFun model] #

FromJSON a ⇒ FromJSON (Extended a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

parseJSON ∷ Value → Parser (Extended a) #

parseJSONList ∷ Value → Parser [Extended a] #

FromJSON a ⇒ FromJSON (Interval a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

parseJSON ∷ Value → Parser (Interval a) #

parseJSONList ∷ Value → Parser [Interval a] #

FromJSON a ⇒ FromJSON (LowerBound a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

parseJSON ∷ Value → Parser (LowerBound a) #

parseJSONList ∷ Value → Parser [LowerBound a] #

FromJSON a ⇒ FromJSON (UpperBound a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

parseJSON ∷ Value → Parser (UpperBound a) #

parseJSONList ∷ Value → Parser [UpperBound a] #

FromJSON a ⇒ FromJSON (Ratio a) 
Instance details

Defined in PlutusTx.Ratio

Methods

parseJSON ∷ Value → Parser (Ratio a) #

parseJSONList ∷ Value → Parser [Ratio a] #

Crypto crypto ⇒ FromJSON (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

parseJSON ∷ Value → Parser (StakeCreds crypto) #

parseJSONList ∷ Value → Parser [StakeCreds crypto] #

FromJSON d ⇒ FromJSON (LinearTransform d) 
Instance details

Defined in Statistics.Distribution.Transform

Methods

parseJSON ∷ Value → Parser (LinearTransform d) #

parseJSONList ∷ Value → Parser [LinearTransform d] #

IsSimpleScriptLanguage lang ⇒ FromJSON (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

parseJSON ∷ Value → Parser (SimpleScript lang) #

parseJSONList ∷ Value → Parser [SimpleScript lang] #

(FromJSON a, FromJSON b) ⇒ FromJSON (Either a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Either a b) #

parseJSONList ∷ Value → Parser [Either a b] #

(FromJSON a, FromJSON b) ⇒ FromJSON (a, b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b) #

parseJSONList ∷ Value → Parser [(a, b)] #

(FromJSONKey k, Ord k, FromJSON v) ⇒ FromJSON (Map k v) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Map k v) #

parseJSONList ∷ Value → Parser [Map k v] #

FromJSON (Proxy a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Proxy a) #

parseJSONList ∷ Value → Parser [Proxy a] #

HasResolution a ⇒ FromJSON (Fixed a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Fixed a) #

parseJSONList ∷ Value → Parser [Fixed a] #

(FromJSON v, FromJSONKey k, Eq k, Hashable k) ⇒ FromJSON (HashMap k v) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (HashMap k v) #

parseJSONList ∷ Value → Parser [HashMap k v] #

FromJSON b ⇒ FromJSON (Annotated b ()) 
Instance details

Defined in Cardano.Binary.Annotated

Methods

parseJSON ∷ Value → Parser (Annotated b ()) #

parseJSONList ∷ Value → Parser [Annotated b ()] #

(FromJSON a, FromJSON b) ⇒ FromJSON (Either a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Either a b) #

parseJSONList ∷ Value → Parser [Either a b] #

(FromJSON a, FromJSON b) ⇒ FromJSON (These a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (These a b) #

parseJSONList ∷ Value → Parser [These a b] #

(FromJSON a, FromJSON b) ⇒ FromJSON (These a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (These a b) #

parseJSONList ∷ Value → Parser [These a b] #

(FromJSON a, FromJSON b) ⇒ FromJSON (Pair a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Pair a b) #

parseJSONList ∷ Value → Parser [Pair a b] #

HashAlgorithm crypto ⇒ FromJSON (Hash crypto a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

parseJSON ∷ Value → Parser (Hash crypto a) #

parseJSONList ∷ Value → Parser [Hash crypto a] #

Crypto crypto ⇒ FromJSON (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

parseJSON ∷ Value → Parser (KeyHash disc crypto) #

parseJSONList ∷ Value → Parser [KeyHash disc crypto] #

Crypto crypto ⇒ FromJSON (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

parseJSON ∷ Value → Parser (Credential kr crypto) #

parseJSONList ∷ Value → Parser [Credential kr crypto] #

HashAlgorithm algo ⇒ FromJSON (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

parseJSON ∷ Value → Parser (AbstractHash algo a) #

parseJSONList ∷ Value → Parser [AbstractHash algo a] #

(FromJSON a, FromJSON b, FromJSON c) ⇒ FromJSON (a, b, c) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c) #

parseJSONList ∷ Value → Parser [(a, b, c)] #

FromJSON a ⇒ FromJSON (Const a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Const a b) #

parseJSONList ∷ Value → Parser [Const a b] #

FromJSON b ⇒ FromJSON (Tagged a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Tagged a b) #

parseJSONList ∷ Value → Parser [Tagged a b] #

(FromJSON1 f, FromJSON1 g, FromJSON a) ⇒ FromJSON (These1 f g a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (These1 f g a) #

parseJSONList ∷ Value → Parser [These1 f g a] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d) ⇒ FromJSON (a, b, c, d) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d) #

parseJSONList ∷ Value → Parser [(a, b, c, d)] #

(FromJSON1 f, FromJSON1 g, FromJSON a) ⇒ FromJSON (Product f g a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Product f g a) #

parseJSONList ∷ Value → Parser [Product f g a] #

(FromJSON1 f, FromJSON1 g, FromJSON a) ⇒ FromJSON (Sum f g a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Sum f g a) #

parseJSONList ∷ Value → Parser [Sum f g a] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e) ⇒ FromJSON (a, b, c, d, e) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e)] #

(FromJSON1 f, FromJSON1 g, FromJSON a) ⇒ FromJSON (Compose f g a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Compose f g a) #

parseJSONList ∷ Value → Parser [Compose f g a] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f) ⇒ FromJSON (a, b, c, d, e, f) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g) ⇒ FromJSON (a, b, c, d, e, f, g) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h) ⇒ FromJSON (a, b, c, d, e, f, g, h) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i) ⇒ FromJSON (a, b, c, d, e, f, g, h, i) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j, FromJSON k) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j, k) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j, k) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j, k)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j, FromJSON k, FromJSON l) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j, k, l) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j, k, l) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j, k, l)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j, FromJSON k, FromJSON l, FromJSON m) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j, k, l, m) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j, k, l, m) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j, k, l, m)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j, FromJSON k, FromJSON l, FromJSON m, FromJSON n) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j, k, l, m, n) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j, k, l, m, n) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j, k, l, m, n)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j, FromJSON k, FromJSON l, FromJSON m, FromJSON n, FromJSON o) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j, k, l, m, n, o)] #

serialiseToJSON ∷ ToJSON a ⇒ a → ByteString Source #

deserialiseFromJSON ∷ FromJSON a ⇒ AsType a → ByteString → Either JsonDecodeError a Source #

newtype JsonDecodeError Source #

Constructors

JsonDecodeError String 

Instances

Instances details
Eq JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

(==) ∷ JsonDecodeError → JsonDecodeError → Bool #

(/=) ∷ JsonDecodeError → JsonDecodeError → Bool #

Show JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

showsPrec ∷ Int → JsonDecodeError → ShowS #

show ∷ JsonDecodeError → String #

showList ∷ [JsonDecodeError] → ShowS #

Error JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

displayError ∷ JsonDecodeError → String Source #

readFileJSON ∷ FromJSON a ⇒ AsType a → FilePath → IO (Either (FileError JsonDecodeError) a) Source #

writeFileJSON ∷ ToJSON a ⇒ FilePath → a → IO (Either (FileError ()) ()) Source #

prettyPrintJSON ∷ ToJSON a ⇒ a → ByteString Source #

Bech32

class (HasTypeProxy a, SerialiseAsRawBytes a) ⇒ SerialiseAsBech32 a Source #

Minimal complete definition

bech32PrefixFor, bech32PrefixesPermitted

Instances

Instances details
SerialiseAsBech32 StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Methods

bech32PrefixFor ∷ StakeAddress → Text Source #

bech32PrefixesPermitted ∷ AsType StakeAddress → [Text] Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey VrfKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey KesKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey VrfKey) → [Text] Source #

SerialiseAsBech32 (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey KesKey) → [Text] Source #

SerialiseAsBech32 (Address ShelleyAddr) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

bech32PrefixFor ∷ Address ShelleyAddr → Text Source #

bech32PrefixesPermitted ∷ AsType (Address ShelleyAddr) → [Text] Source #

serialiseToBech32 ∷ SerialiseAsBech32 a ⇒ a → Text Source #

deserialiseFromBech32 ∷ SerialiseAsBech32 a ⇒ AsType a → Text → Either Bech32DecodeError a Source #

deserialiseAnyOfFromBech32 ∷ ∀ b. [FromSomeType SerialiseAsBech32 b] → Text → Either Bech32DecodeError b Source #

data Bech32DecodeError Source #

Bech32 decoding error.

Constructors

Bech32DecodingError !DecodingError

There was an error decoding the string as Bech32.

Bech32UnexpectedPrefix !Text !(Set Text)

The human-readable prefix in the Bech32-encoded string is not one + hash where we don't want things to be era-parametrised.

Instances

Instances details
Eq ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

(==) ∷ ScriptHash → ScriptHash → Bool #

(/=) ∷ ScriptHash → ScriptHash → Bool #

Ord ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

compare ∷ ScriptHash → ScriptHash → Ordering #

(<) ∷ ScriptHash → ScriptHash → Bool #

(<=) ∷ ScriptHash → ScriptHash → Bool #

(>) ∷ ScriptHash → ScriptHash → Bool #

(>=) ∷ ScriptHash → ScriptHash → Bool #

max ∷ ScriptHash → ScriptHash → ScriptHash #

min ∷ ScriptHash → ScriptHash → ScriptHash #

Show ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

showsPrec ∷ Int → ScriptHash → ShowS #

show ∷ ScriptHash → String #

showList ∷ [ScriptHash] → ShowS #

IsString ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

fromString ∷ String → ScriptHash #

HasTypeProxy ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Associated Types

data AsType ScriptHash Source #

Methods

proxyToAsType ∷ Proxy ScriptHash → AsType ScriptHash Source #

SerialiseAsRawBytes ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToRawBytes ∷ ScriptHash → ByteString Source #

deserialiseFromRawBytes ∷ AsType ScriptHash → ByteString → Maybe ScriptHash Source #

data AsType ScriptHash Source # 
Instance details

Defined in Cardano.Api.Script

data AsType ScriptHash = AsScriptHash

hashScript ∷ Script lang → ScriptHash Source #

Serialisation

Support for serialising data in JSON, CBOR and text files.

CBOR

class HasTypeProxy a ⇒ SerialiseAsCBOR a Source #

Instances

Instances details
SerialiseAsCBOR TxMetadata Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

serialiseToCBOR ∷ TxMetadata → ByteString Source #

deserialiseFromCBOR ∷ AsType TxMetadata → ByteString → Either DecoderError TxMetadata Source #

SerialiseAsCBOR UpdateProposal Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

serialiseToCBOR ∷ UpdateProposal → ByteString Source #

deserialiseFromCBOR ∷ AsType UpdateProposal → ByteString → Either DecoderError UpdateProposal Source #

SerialiseAsCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

serialiseToCBOR ∷ Certificate → ByteString Source #

deserialiseFromCBOR ∷ AsType Certificate → ByteString → Either DecoderError Certificate Source #

SerialiseAsCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

serialiseToCBOR ∷ OperationalCertificateIssueCounter → ByteString Source #

deserialiseFromCBOR ∷ AsType OperationalCertificateIssueCounter → ByteString → Either DecoderError OperationalCertificateIssueCounter Source #

SerialiseAsCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

serialiseToCBOR ∷ OperationalCertificate → ByteString Source #

deserialiseFromCBOR ∷ AsType OperationalCertificate → ByteString → Either DecoderError OperationalCertificate Source #

SerialiseAsCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakePoolKey) → ByteString → Either DecoderError (VerificationKey StakePoolKey) Source #

SerialiseAsCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisUTxOKey) → ByteString → Either DecoderError (VerificationKey GenesisUTxOKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisDelegateKey) → ByteString → Either DecoderError (VerificationKey GenesisDelegateKey) Source #

SerialiseAsCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisExtendedKey) → ByteString → Either DecoderError (VerificationKey GenesisExtendedKey) Source #

SerialiseAsCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey GenesisKey) → ByteString → Either DecoderError (VerificationKey GenesisKey) Source #

SerialiseAsCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeExtendedKey) → ByteString → Either DecoderError (VerificationKey StakeExtendedKey) Source #

SerialiseAsCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey StakeKey) → ByteString → Either DecoderError (VerificationKey StakeKey) Source #

SerialiseAsCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentExtendedKey) → ByteString → Either DecoderError (VerificationKey PaymentExtendedKey) Source #

SerialiseAsCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ VerificationKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey PaymentKey) → ByteString → Either DecoderError (VerificationKey PaymentKey) Source #

SerialiseAsCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKeyLegacy) → ByteString → Either DecoderError (VerificationKey ByronKeyLegacy) Source #

SerialiseAsCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ VerificationKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey ByronKey) → ByteString → Either DecoderError (VerificationKey ByronKey) Source #

SerialiseAsCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey VrfKey) → ByteString → Either DecoderError (VerificationKey VrfKey) Source #

SerialiseAsCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ VerificationKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (VerificationKey KesKey) → ByteString → Either DecoderError (VerificationKey KesKey) Source #

SerialiseAsCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakePoolKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakePoolKey) → ByteString → Either DecoderError (SigningKey StakePoolKey) Source #

SerialiseAsCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisUTxOKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisUTxOKey) → ByteString → Either DecoderError (SigningKey GenesisUTxOKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisDelegateKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisDelegateKey) → ByteString → Either DecoderError (SigningKey GenesisDelegateKey) Source #

SerialiseAsCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisExtendedKey) → ByteString → Either DecoderError (SigningKey GenesisExtendedKey) Source #

SerialiseAsCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey GenesisKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey GenesisKey) → ByteString → Either DecoderError (SigningKey GenesisKey) Source #

SerialiseAsCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeExtendedKey) → ByteString → Either DecoderError (SigningKey StakeExtendedKey) Source #

SerialiseAsCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey StakeKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey StakeKey) → ByteString → Either DecoderError (SigningKey StakeKey) Source #

SerialiseAsCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentExtendedKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentExtendedKey) → ByteString → Either DecoderError (SigningKey PaymentExtendedKey) Source #

SerialiseAsCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

serialiseToCBOR ∷ SigningKey PaymentKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey PaymentKey) → ByteString → Either DecoderError (SigningKey PaymentKey) Source #

SerialiseAsCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKeyLegacy → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKeyLegacy) → ByteString → Either DecoderError (SigningKey ByronKeyLegacy) Source #

SerialiseAsCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

serialiseToCBOR ∷ SigningKey ByronKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey ByronKey) → ByteString → Either DecoderError (SigningKey ByronKey) Source #

SerialiseAsCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey VrfKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey VrfKey) → ByteString → Either DecoderError (SigningKey VrfKey) Source #

SerialiseAsCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

serialiseToCBOR ∷ SigningKey KesKey → ByteString Source #

deserialiseFromCBOR ∷ AsType (SigningKey KesKey) → ByteString → Either DecoderError (SigningKey KesKey) Source #

(HasTypeProxy lang, Typeable lang) ⇒ SerialiseAsCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToCBOR ∷ PlutusScript lang → ByteString Source #

deserialiseFromCBOR ∷ AsType (PlutusScript lang) → ByteString → Either DecoderError (PlutusScript lang) Source #

IsScriptLanguage lang ⇒ SerialiseAsCBOR (Script lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

serialiseToCBOR ∷ Script lang → ByteString Source #

deserialiseFromCBOR ∷ AsType (Script lang) → ByteString → Either DecoderError (Script lang) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (TxBody era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

serialiseToCBOR ∷ TxBody era → ByteString Source #

deserialiseFromCBOR ∷ AsType (TxBody era) → ByteString → Either DecoderError (TxBody era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (KeyWitness era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ KeyWitness era → ByteString Source #

deserialiseFromCBOR ∷ AsType (KeyWitness era) → ByteString → Either DecoderError (KeyWitness era) Source #

IsCardanoEra era ⇒ SerialiseAsCBOR (Tx era) Source # 
Instance details

Defined in Cardano.Api.Tx

Methods

serialiseToCBOR ∷ Tx era → ByteString Source #

deserialiseFromCBOR ∷ AsType (Tx era) → ByteString → Either DecoderError (Tx era) Source #

class Typeable a ⇒ ToCBOR a #

Minimal complete definition

toCBOR

Instances

Instances details
ToCBOR Bool 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Bool → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Bool → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Bool] → Size #

ToCBOR Float 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Float → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Float → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Float] → Size #

ToCBOR Int 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int] → Size #

ToCBOR Int32 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int32 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int32 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int32] → Size #

ToCBOR Int64 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Int64 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Int64 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Int64] → Size #

ToCBOR Integer 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Integer → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Integer → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Integer] → Size #

ToCBOR Natural 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Natural → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Natural → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Natural] → Size #

ToCBOR Word 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word] → Size #

ToCBOR Word8 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word8 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word8 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word8] → Size #

ToCBOR Word16 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word16 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word16 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word16] → Size #

ToCBOR Word32 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word32 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word32 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word32] → Size #

ToCBOR Word64 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Word64 → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Word64 → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Word64] → Size #

ToCBOR () 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ () → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy () → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [()] → Size #

ToCBOR ByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByteString] → Size #

ToCBOR ShortByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ShortByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ShortByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShortByteString] → Size #

ToCBOR ByteString 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ ByteString → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByteString → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByteString] → Size #

ToCBOR Nano 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Nano → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Nano → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Nano] → Size #

ToCBOR Pico 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Pico → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Pico → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Pico] → Size #

ToCBOR Void 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Void → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Void → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Void] → Size #

ToCBOR Text 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Text → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Text → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Text] → Size #

ToCBOR UTCTime 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ UTCTime → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTCTime → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTCTime] → Size #

ToCBOR NominalDiffTime 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ NominalDiffTime → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy NominalDiffTime → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NominalDiffTime] → Size #

ToCBOR BlockNo 
Instance details

Defined in Cardano.Slotting.Block

Methods

toCBOR ∷ BlockNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockNo] → Size #

ToCBOR EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ EpochNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochNo] → Size #

ToCBOR SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ SlotNo → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotNo → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotNo] → Size #

ToCBOR Raw 
Instance details

Defined in Cardano.Binary.Raw

Methods

toCBOR ∷ Raw → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Raw → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Raw] → Size #

ToCBOR Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ Coin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Coin → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Coin] → Size #

ToCBOR UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ UnitInterval → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UnitInterval → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UnitInterval] → Size #

ToCBOR ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ ProtVer → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtVer → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtVer] → Size #

ToCBOR AlonzoGenesis 
Instance details

Defined in Cardano.Ledger.Alonzo.Genesis

Methods

toCBOR ∷ AlonzoGenesis → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AlonzoGenesis → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoGenesis] → Size #

ToCBOR Language 
Instance details

Defined in Cardano.Ledger.Alonzo.Language

Methods

toCBOR ∷ Language → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Language → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Language] → Size #

ToCBOR CostModel 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ CostModel → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CostModel → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CostModel] → Size #

ToCBOR Prices 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Prices → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Prices → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Prices] → Size #

ToCBOR ExUnits 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ ExUnits → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ExUnits → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ExUnits] → Size #

ToCBOR Metadatum 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

toCBOR ∷ Metadatum → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Metadatum → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Metadatum] → Size #

ToCBOR AssetName 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ AssetName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AssetName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AssetName] → Size #

ToCBOR Likelihood 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ Likelihood → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Likelihood → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Likelihood] → Size #

ToCBOR Ptr 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ Ptr → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Ptr → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Ptr] → Size #

ToCBOR Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Nonce → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Nonce → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Nonce] → Size #

ToCBOR Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ Desirability → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Desirability → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Desirability] → Size #

ToCBOR StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ StakePoolRelay → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy StakePoolRelay → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StakePoolRelay] → Size #

ToCBOR PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ PoolMetadata → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy PoolMetadata → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolMetadata] → Size #

ToCBOR Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Network → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Network → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Network] → Size #

ToCBOR ValidityInterval 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

toCBOR ∷ ValidityInterval → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ValidityInterval → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ValidityInterval] → Size #

ToCBOR ByronHash 
Instance details

Defined in Ouroboros.Consensus.Byron.Ledger.Block

Methods

toCBOR ∷ ByronHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ByronHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ByronHash] → Size #

ToCBOR EpochAndSlotCount 
Instance details

Defined in Cardano.Chain.Slotting.EpochAndSlotCount

Methods

toCBOR ∷ EpochAndSlotCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochAndSlotCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochAndSlotCount] → Size #

ToCBOR EpochNumber 
Instance details

Defined in Cardano.Chain.Slotting.EpochNumber

Methods

toCBOR ∷ EpochNumber → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochNumber → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochNumber] → Size #

ToCBOR EpochSlots 
Instance details

Defined in Cardano.Chain.Slotting.EpochSlots

Methods

toCBOR ∷ EpochSlots → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy EpochSlots → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochSlots] → Size #

ToCBOR SlotCount 
Instance details

Defined in Cardano.Chain.Slotting.SlotCount

Methods

toCBOR ∷ SlotCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotCount] → Size #

ToCBOR SlotNumber 
Instance details

Defined in Cardano.Chain.Slotting.SlotNumber

Methods

toCBOR ∷ SlotNumber → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SlotNumber → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SlotNumber] → Size #

ToCBOR Config 
Instance details

Defined in Cardano.Chain.Genesis.Config

Methods

toCBOR ∷ Config → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Config → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Config] → Size #

ToCBOR GenesisNonAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.NonAvvmBalances

Methods

toCBOR ∷ GenesisNonAvvmBalances → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisNonAvvmBalances → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisNonAvvmBalances] → Size #

ToCBOR GenesisDelegation 
Instance details

Defined in Cardano.Chain.Genesis.Delegation

Methods

toCBOR ∷ GenesisDelegation → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisDelegation → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisDelegation] → Size #

ToCBOR GenesisKeyHashes 
Instance details

Defined in Cardano.Chain.Genesis.KeyHashes

Methods

toCBOR ∷ GenesisKeyHashes → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisKeyHashes → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisKeyHashes] → Size #

ToCBOR CompactAddress 
Instance details

Defined in Cardano.Chain.Common.Compact

Methods

toCBOR ∷ CompactAddress → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactAddress → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactAddress] → Size #

ToCBOR RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toCBOR ∷ RequiresNetworkMagic → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RequiresNetworkMagic → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RequiresNetworkMagic] → Size #

ToCBOR GenesisAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.AvvmBalances

Methods

toCBOR ∷ GenesisAvvmBalances → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisAvvmBalances → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisAvvmBalances] → Size #

ToCBOR ProtocolParameters 
Instance details

Defined in Cardano.Chain.Update.ProtocolParameters

Methods

toCBOR ∷ ProtocolParameters → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolParameters → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolParameters] → Size #

ToCBOR ProtocolVersion 
Instance details

Defined in Cardano.Chain.Update.ProtocolVersion

Methods

toCBOR ∷ ProtocolVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolVersion] → Size #

ToCBOR ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toCBOR ∷ ProtocolMagicId → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolMagicId → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolMagicId] → Size #

ToCBOR Certificate 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

toCBOR ∷ Certificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Certificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Certificate] → Size #

ToCBOR SigningKey 
Instance details

Defined in Cardano.Crypto.Signing.SigningKey

Methods

toCBOR ∷ SigningKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SigningKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey] → Size #

ToCBOR SoftwareVersion 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

toCBOR ∷ SoftwareVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareVersion] → Size #

ToCBOR VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

toCBOR ∷ VerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey] → Size #

ToCBOR KeyHash 
Instance details

Defined in Cardano.Chain.Common.KeyHash

Methods

toCBOR ∷ KeyHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy KeyHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KeyHash] → Size #

ToCBOR GenesisHash 
Instance details

Defined in Cardano.Chain.Genesis.Hash

Methods

toCBOR ∷ GenesisHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisHash] → Size #

ToCBOR CandidateProtocolUpdate 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ CandidateProtocolUpdate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CandidateProtocolUpdate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CandidateProtocolUpdate] → Size #

ToCBOR Endorsement 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ Endorsement → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Endorsement → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Endorsement] → Size #

ToCBOR ApplyMempoolPayloadErr 
Instance details

Defined in Cardano.Chain.Byron.API.Mempool

Methods

toCBOR ∷ ApplyMempoolPayloadErr → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplyMempoolPayloadErr → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplyMempoolPayloadErr] → Size #

ToCBOR Tx 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ Tx → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Tx → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tx] → Size #

ToCBOR Proposal 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toCBOR ∷ Proposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proposal] → Size #

ToCBOR Vote 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

toCBOR ∷ Vote → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Vote → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Vote] → Size #

ToCBOR ChainValidationState 
Instance details

Defined in Cardano.Chain.Block.Validation

Methods

toCBOR ∷ ChainValidationState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainValidationState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainValidationState] → Size #

ToCBOR Map 
Instance details

Defined in Cardano.Chain.Delegation.Map

Methods

toCBOR ∷ Map → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Map → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Map] → Size #

ToCBOR ScheduledDelegation 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ ScheduledDelegation → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ScheduledDelegation → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScheduledDelegation] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR UTxO 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

toCBOR ∷ UTxO → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxO → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxO] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR ToSign 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toCBOR ∷ ToSign → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ToSign → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ToSign] → Size #

ToCBOR CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

toCBOR ∷ CompactRedeemVerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactRedeemVerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactRedeemVerificationKey] → Size #

ToCBOR Lovelace 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

toCBOR ∷ Lovelace → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Lovelace → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Lovelace] → Size #

ToCBOR SystemStart 
Instance details

Defined in Cardano.Slotting.Time

Methods

toCBOR ∷ SystemStart → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemStart → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemStart] → Size #

ToCBOR Point 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ Point → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Point → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Point] → Size #

ToCBOR Proof 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ Proof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proof] → Size #

ToCBOR SignKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ SignKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SignKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKey] → Size #

ToCBOR VerKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ VerKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VerKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKey] → Size #

ToCBOR RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

toCBOR ∷ RedeemVerificationKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RedeemVerificationKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemVerificationKey] → Size #

ToCBOR RedeemSigningKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.SigningKey

Methods

toCBOR ∷ RedeemSigningKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RedeemSigningKey → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemSigningKey] → Size #

ToCBOR IsValidating 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ IsValidating → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy IsValidating → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [IsValidating] → Size #

ToCBOR Tag 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Tag → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Tag → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tag] → Size #

ToCBOR ChainDifficulty 
Instance details

Defined in Cardano.Chain.Common.ChainDifficulty

Methods

toCBOR ∷ ChainDifficulty → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainDifficulty → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainDifficulty] → Size #

ToCBOR Proof 
Instance details

Defined in Cardano.Chain.Block.Proof

Methods

toCBOR ∷ Proof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Proof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Proof] → Size #

ToCBOR SscPayload 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toCBOR ∷ SscPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SscPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SscPayload] → Size #

ToCBOR ProposalBody 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toCBOR ∷ ProposalBody → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProposalBody → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProposalBody] → Size #

ToCBOR TxInWitness 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toCBOR ∷ TxInWitness → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxInWitness → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxInWitness] → Size #

ToCBOR Body 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

toCBOR ∷ Body → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Body → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Body] → Size #

ToCBOR TxPayload 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

toCBOR ∷ TxPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxPayload] → Size #

ToCBOR Payload 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

toCBOR ∷ Payload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Payload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Payload] → Size #

ToCBOR Payload 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

toCBOR ∷ Payload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Payload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Payload] → Size #

ToCBOR BlockSignature 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toCBOR ∷ BlockSignature → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockSignature → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockSignature] → Size #

ToCBOR TxProof 
Instance details

Defined in Cardano.Chain.UTxO.TxProof

Methods

toCBOR ∷ TxProof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxProof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxProof] → Size #

ToCBOR SscProof 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toCBOR ∷ SscProof → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SscProof → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SscProof] → Size #

ToCBOR CompactTxIn 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxIn → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxIn → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxIn] → Size #

ToCBOR CompactTxOut 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxOut → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxOut → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxOut] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Interface

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR UTxOValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

toCBOR ∷ UTxOValidationError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOValidationError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOValidationError] → Size #

ToCBOR BlockCount 
Instance details

Defined in Cardano.Chain.Common.BlockCount

Methods

toCBOR ∷ BlockCount → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy BlockCount → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlockCount] → Size #

ToCBOR UTxOConfiguration 
Instance details

Defined in Cardano.Chain.UTxO.UTxOConfiguration

Methods

toCBOR ∷ UTxOConfiguration → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOConfiguration → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOConfiguration] → Size #

ToCBOR ApplicationName 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

toCBOR ∷ ApplicationName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationName] → Size #

ToCBOR ApplicationVersion 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ ApplicationVersion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationVersion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationVersion] → Size #

ToCBOR ProtocolUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ ProtocolUpdateProposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolUpdateProposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolUpdateProposal] → Size #

ToCBOR SoftwareUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ SoftwareUpdateProposal → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareUpdateProposal → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareUpdateProposal] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR HDAddressPayload 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toCBOR ∷ HDAddressPayload → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy HDAddressPayload → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [HDAddressPayload] → Size #

ToCBOR NetworkMagic 
Instance details

Defined in Cardano.Chain.Common.NetworkMagic

Methods

toCBOR ∷ NetworkMagic → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy NetworkMagic → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NetworkMagic] → Size #

ToCBOR AddrSpendingData 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

toCBOR ∷ AddrSpendingData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AddrSpendingData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AddrSpendingData] → Size #

ToCBOR AddrType 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

toCBOR ∷ AddrType → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AddrType → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AddrType] → Size #

ToCBOR Address 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

toCBOR ∷ Address → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Address → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Address] → Size #

ToCBOR Address' 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

toCBOR ∷ Address' → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Address' → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Address'] → Size #

ToCBOR LovelaceError 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

toCBOR ∷ LovelaceError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LovelaceError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LovelaceError] → Size #

ToCBOR LovelacePortion 
Instance details

Defined in Cardano.Chain.Common.LovelacePortion

Methods

toCBOR ∷ LovelacePortion → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LovelacePortion → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LovelacePortion] → Size #

ToCBOR TxFeePolicy 
Instance details

Defined in Cardano.Chain.Common.TxFeePolicy

Methods

toCBOR ∷ TxFeePolicy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxFeePolicy → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxFeePolicy] → Size #

ToCBOR TxSizeLinear 
Instance details

Defined in Cardano.Chain.Common.TxSizeLinear

Methods

toCBOR ∷ TxSizeLinear → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxSizeLinear → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxSizeLinear] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Activation

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

toCBOR ∷ State → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy State → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [State] → Size #

ToCBOR GenesisData 
Instance details

Defined in Cardano.Chain.Genesis.Data

Methods

toCBOR ∷ GenesisData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy GenesisData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisData] → Size #

ToCBOR CompactTxId 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

toCBOR ∷ CompactTxId → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy CompactTxId → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactTxId] → Size #

ToCBOR TxIn 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ TxIn → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxIn → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxIn] → Size #

ToCBOR TxOut 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toCBOR ∷ TxOut → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxOut → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut] → Size #

ToCBOR TxAux 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

toCBOR ∷ TxAux → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxAux → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxAux] → Size #

ToCBOR TxSigData 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toCBOR ∷ TxSigData → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxSigData → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxSigData] → Size #

ToCBOR UTxOError 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

toCBOR ∷ UTxOError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy UTxOError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOError] → Size #

ToCBOR ApplicationNameError 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

toCBOR ∷ ApplicationNameError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ApplicationNameError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplicationNameError] → Size #

ToCBOR InstallerHash 
Instance details

Defined in Cardano.Chain.Update.InstallerHash

Methods

toCBOR ∷ InstallerHash → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy InstallerHash → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [InstallerHash] → Size #

ToCBOR SystemTag 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

toCBOR ∷ SystemTag → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemTag → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemTag] → Size #

ToCBOR ProtocolParametersUpdate 
Instance details

Defined in Cardano.Chain.Update.ProtocolParametersUpdate

Methods

toCBOR ∷ ProtocolParametersUpdate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ProtocolParametersUpdate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProtocolParametersUpdate] → Size #

ToCBOR SoftforkRule 
Instance details

Defined in Cardano.Chain.Update.SoftforkRule

Methods

toCBOR ∷ SoftforkRule → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftforkRule → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftforkRule] → Size #

ToCBOR SoftwareVersionError 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

toCBOR ∷ SoftwareVersionError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SoftwareVersionError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SoftwareVersionError] → Size #

ToCBOR SystemTagError 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

toCBOR ∷ SystemTagError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SystemTagError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SystemTagError] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Voting

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ Error → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Error → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Error] → Size #

ToCBOR Adopted 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ Adopted → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Adopted → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Adopted] → Size #

ToCBOR ActiveSlotCoeff 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ ActiveSlotCoeff → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ActiveSlotCoeff → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ActiveSlotCoeff] → Size #

ToCBOR DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ DnsName → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy DnsName → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DnsName] → Size #

ToCBOR Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Port → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Port → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Port] → Size #

ToCBOR Seed 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Seed → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Seed → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Seed] → Size #

ToCBOR Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toCBOR ∷ Url → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Url → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Url] → Size #

ToCBOR DeltaCoin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ DeltaCoin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy DeltaCoin → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DeltaCoin] → Size #

ToCBOR TicknState 
Instance details

Defined in Shelley.Spec.Ledger.STS.Tickn

Methods

toCBOR ∷ TicknState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TicknState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TicknState] → Size #

ToCBOR ChainCode 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

toCBOR ∷ ChainCode → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy ChainCode → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainCode] → Size #

ToCBOR AccountState 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ AccountState → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy AccountState → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AccountState] → Size #

ToCBOR LogWeight 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ LogWeight → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy LogWeight → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LogWeight] → Size #

ToCBOR MIRPot 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRPot → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy MIRPot → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRPot] → Size #

ToCBOR KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

toCBOR ∷ KESPeriod → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy KESPeriod → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KESPeriod] → Size #

ToCBOR PerformanceEstimate 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ PerformanceEstimate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy PerformanceEstimate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PerformanceEstimate] → Size #

ToCBOR RewardType 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ RewardType → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy RewardType → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardType] → Size #

ToCBOR VotingPeriod 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

toCBOR ∷ VotingPeriod → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy VotingPeriod → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VotingPeriod] → Size #

ToCBOR SizeOfPoolOwners 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ SizeOfPoolOwners → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SizeOfPoolOwners → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SizeOfPoolOwners] → Size #

ToCBOR SizeOfPoolRelays 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ SizeOfPoolRelays → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy SizeOfPoolRelays → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SizeOfPoolRelays] → Size #

ToCBOR TxValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

toCBOR ∷ TxValidationError → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy TxValidationError → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxValidationError] → Size #

ToCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

toCBOR ∷ Certificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy Certificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Certificate] → Size #

ToCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

toCBOR ∷ OperationalCertificateIssueCounter → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy OperationalCertificateIssueCounter → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OperationalCertificateIssueCounter] → Size #

ToCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

toCBOR ∷ OperationalCertificate → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy OperationalCertificate → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OperationalCertificate] → Size #

ToCBOR a ⇒ ToCBOR [a] 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ [a] → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [a] → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [[a]] → Size #

ToCBOR a ⇒ ToCBOR (Maybe a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Maybe a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Maybe a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Maybe a] → Size #

ToCBOR a ⇒ ToCBOR (Ratio a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Ratio a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Ratio a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Ratio a] → Size #

(Ord a, ToCBOR a) ⇒ ToCBOR (Set a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Set a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Set a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Set a] → Size #

ToCBOR a ⇒ ToCBOR (NonEmpty a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ NonEmpty a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NonEmpty a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NonEmpty a] → Size #

(Serialise t, Typeable t) ⇒ ToCBOR (WithOrigin t) 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toCBOR ∷ WithOrigin t → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (WithOrigin t) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [WithOrigin t] → Size #

ToCBOR a ⇒ ToCBOR (Vector a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Vector a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Vector a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Vector a] → Size #

Typeable xs ⇒ ToCBOR (LengthOf xs) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ LengthOf xs → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LengthOf xs) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LengthOf xs] → Size #

ToCBOR (SigDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ SigDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (SigDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ SigDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed25519DSIGN] → Size #

ToCBOR (SigDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ SigDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN MockDSIGN] → Size #

ToCBOR (SigDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ SigDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigDSIGN Ed448DSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ SignKeyDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ SignKeyDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed25519DSIGN] → Size #

ToCBOR (SignKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ SignKeyDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN MockDSIGN] → Size #

ToCBOR (SignKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ SignKeyDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyDSIGN Ed448DSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

toCBOR ∷ VerKeyDSIGN Ed25519Bip32DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed25519Bip32DSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

toCBOR ∷ VerKeyDSIGN Ed25519DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed25519DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed25519DSIGN] → Size #

ToCBOR (VerKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

toCBOR ∷ VerKeyDSIGN MockDSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN MockDSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN MockDSIGN] → Size #

ToCBOR (VerKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

toCBOR ∷ VerKeyDSIGN Ed448DSIGN → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyDSIGN Ed448DSIGN) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyDSIGN Ed448DSIGN] → Size #

Crypto crypto ⇒ ToCBOR (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

toCBOR ∷ ScriptHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ScriptHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScriptHash crypto] → Size #

ToCBOR a ⇒ ToCBOR (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

toCBOR ∷ StrictMaybe a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (StrictMaybe a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StrictMaybe a] → Size #

Crypto crypto ⇒ ToCBOR (AuxiliaryDataHash crypto) 
Instance details

Defined in Cardano.Ledger.AuxiliaryData

Methods

toCBOR ∷ AuxiliaryDataHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryDataHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryDataHash crypto] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (PPUPState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ PPUPState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PPUPState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PPUPState era] → Size #

Crypto crypto ⇒ ToCBOR (Value crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ Value crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Value crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Value crypto] → Size #

Typeable era ⇒ ToCBOR (AuxiliaryData era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ AuxiliaryData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryData era] → Size #

Era era ⇒ ToCBOR (PParamsUpdate era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ PParamsUpdate era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParamsUpdate era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParamsUpdate era] → Size #

Era era ⇒ ToCBOR (PParams era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ PParams era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParams era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParams era] → Size #

Typeable era ⇒ ToCBOR (TxWitness era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

toCBOR ∷ TxWitness era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxWitness era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxWitness era] → Size #

Typeable t ⇒ ToCBOR (MemoBytes t) 
Instance details

Defined in Data.MemoBytes

Methods

toCBOR ∷ MemoBytes t → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (MemoBytes t) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [MemoBytes t] → Size #

(Era era, TransTxOut ToCBOR era) ⇒ ToCBOR (TxOut era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxOut era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxOut era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut era] → Size #

Era era ⇒ ToCBOR (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ PParams era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParams era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParams era] → Size #

Era era ⇒ ToCBOR (PParamsUpdate era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ PParamsUpdate era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PParamsUpdate era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PParamsUpdate era] → Size #

Typeable crypto ⇒ ToCBOR (Timelock crypto) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

toCBOR ∷ Timelock crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Timelock crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Timelock crypto] → Size #

Typeable era ⇒ ToCBOR (Tx era) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

toCBOR ∷ Tx era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Tx era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tx era] → Size #

Era era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

Typeable era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

Typeable crypto ⇒ ToCBOR (MultiSig crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

toCBOR ∷ MultiSig crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MultiSig crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MultiSig crypto] → Size #

Typeable era ⇒ ToCBOR (Metadata era) 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

toCBOR ∷ Metadata era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Metadata era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Metadata era] → Size #

TransEpoch ToCBOR era ⇒ ToCBOR (EpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ EpochState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (EpochState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [EpochState era] → Size #

(Era era, TransLedgerState ToCBOR era) ⇒ ToCBOR (LedgerState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ LedgerState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgerState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgerState era] → Size #

TransUTxOState ToCBOR era ⇒ ToCBOR (UTxOState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ UTxOState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UTxOState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxOState era] → Size #

Crypto crypto ⇒ ToCBOR (DPState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ DPState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DPState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DPState crypto] → Size #

(Typeable era, TransEpoch ToCBOR era) ⇒ ToCBOR (NewEpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ NewEpochState era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NewEpochState era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NewEpochState era] → Size #

Crypto crypto ⇒ ToCBOR (TxIn crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxIn crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxIn crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxIn crypto] → Size #

Crypto crypto ⇒ ToCBOR (CompactAddr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.CompactAddr

Methods

toCBOR ∷ CompactAddr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactAddr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactAddr crypto] → Size #

Crypto crypto ⇒ ToCBOR (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ BlocksMade crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BlocksMade crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BlocksMade crypto] → Size #

Crypto crypto ⇒ ToCBOR (SnapShots crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ SnapShots crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SnapShots crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SnapShots crypto] → Size #

Crypto crypto ⇒ ToCBOR (NonMyopic crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ NonMyopic crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (NonMyopic crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [NonMyopic crypto] → Size #

Crypto crypto ⇒ ToCBOR (PulsingRewUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ PulsingRewUpdate crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PulsingRewUpdate crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PulsingRewUpdate crypto] → Size #

Crypto crypto ⇒ ToCBOR (PoolDistr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

toCBOR ∷ PoolDistr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolDistr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolDistr crypto] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (ProposedPPUpdates era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ ProposedPPUpdates era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ProposedPPUpdates era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ProposedPPUpdates era] → Size #

Era era ⇒ ToCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toCBOR ∷ ShelleyGenesis era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGenesis era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGenesis era] → Size #

Crypto crypto ⇒ ToCBOR (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ GenDelegPair crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenDelegPair crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenDelegPair crypto] → Size #

Crypto crypto ⇒ ToCBOR (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toCBOR ∷ Addr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Addr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Addr crypto] → Size #

Crypto crypto ⇒ ToCBOR (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toCBOR ∷ ShelleyGenesisStaking crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyGenesisStaking crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyGenesisStaking crypto] → Size #

ToCBOR (CompactForm Coin) 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toCBOR ∷ CompactForm Coin → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactForm Coin) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactForm Coin] → Size #

Crypto crypto ⇒ ToCBOR (CompactForm (Value crypto)) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ CompactForm (Value crypto) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactForm (Value crypto)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactForm (Value crypto)] → Size #

(Era era, ToCBOR (TxOut era)) ⇒ ToCBOR (UTxO era) 
Instance details

Defined in Shelley.Spec.Ledger.UTxO

Methods

toCBOR ∷ UTxO era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UTxO era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UTxO era] → Size #

(Era era, ToCBOR (PParamsDelta era)) ⇒ ToCBOR (Update era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toCBOR ∷ Update era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Update era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Update era] → Size #

Typeable era ⇒ ToCBOR (AuxiliaryData era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

toCBOR ∷ AuxiliaryData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryData era] → Size #

Typeable era ⇒ ToCBOR (TxBody era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

toCBOR ∷ TxBody era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBody era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBody era] → Size #

(Era era, Compactible (Value era)) ⇒ ToCBOR (TxOut era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

toCBOR ∷ TxOut era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxOut era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxOut era] → Size #

(Typeable (Crypto era), Typeable era) ⇒ ToCBOR (Script era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

toCBOR ∷ Script era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Script era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Script era] → Size #

Typeable era ⇒ ToCBOR (Data era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ Data era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Data era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Data era] → Size #

(Typeable era, Ord (Script era), Script era ~ Script era, ToCBOR (Script era), Typeable (Crypto era)) ⇒ ToCBOR (AuxiliaryDataRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

toCBOR ∷ AuxiliaryDataRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AuxiliaryDataRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AuxiliaryDataRaw era] → Size #

Crypto crypto ⇒ ToCBOR (PolicyID crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ PolicyID crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PolicyID crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PolicyID crypto] → Size #

Crypto crypto ⇒ ToCBOR (BHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ BHeader crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BHeader crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BHeader crypto] → Size #

Era era ⇒ ToCBOR (Block era) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ Block era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Block era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Block era] → Size #

(ShelleyBased era, ToCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ ToCBOR (ApplyTxError era) 
Instance details

Defined in Shelley.Spec.Ledger.API.Mempool

Methods

toCBOR ∷ ApplyTxError era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ApplyTxError era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ApplyTxError era] → Size #

(ToCBOR (PredicateFailure (EraRule "DELEGS" era)), ToCBOR (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ ToCBOR (LedgerPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledger

Methods

toCBOR ∷ LedgerPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgerPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgerPredicateFailure era] → Size #

(Era era, Typeable (Script era), ToCBOR (PredicateFailure (EraRule "DELPL" era))) ⇒ ToCBOR (DelegsPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delegs

Methods

toCBOR ∷ DelegsPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelegsPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelegsPredicateFailure era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "POOL" era)), ToCBOR (PredicateFailure (EraRule "DELEG" era)), Typeable (Script era)) ⇒ ToCBOR (DelplPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delpl

Methods

toCBOR ∷ DelplPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelplPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelplPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (PState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ PState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PState crypto] → Size #

Crypto crypto ⇒ ToCBOR (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ PoolParams crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolParams crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolParams crypto] → Size #

Crypto crypto ⇒ ToCBOR (InstantaneousRewards crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ InstantaneousRewards crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (InstantaneousRewards crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [InstantaneousRewards crypto] → Size #

Crypto crypto ⇒ ToCBOR (SnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ SnapShot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SnapShot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SnapShot crypto] → Size #

Crypto crypto ⇒ ToCBOR (ChainDepState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.API.Protocol

Methods

toCBOR ∷ ChainDepState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ChainDepState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ChainDepState crypto] → Size #

Crypto crypto ⇒ ToCBOR (FutureGenDeleg crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ FutureGenDeleg crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (FutureGenDeleg crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [FutureGenDeleg crypto] → Size #

Crypto crypto ⇒ ToCBOR (DState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

toCBOR ∷ DState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DState crypto] → Size #

Crypto crypto ⇒ ToCBOR (IndividualPoolStake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

toCBOR ∷ IndividualPoolStake crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (IndividualPoolStake crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [IndividualPoolStake crypto] → Size #

(TransValue ToCBOR era, TransUTxOState ToCBOR era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Rules.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), ToCBOR (PredicateFailure (EraRule "UTXO" era))) ⇒ ToCBOR (UtxowPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxow

Methods

toCBOR ∷ UtxowPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxowPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxowPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ RewardProvenance crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardProvenance crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardProvenance crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toCBOR ∷ RewardProvenancePool crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardProvenancePool crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardProvenancePool crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toCBOR ∷ RewardAcnt crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardAcnt crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardAcnt crypto] → Size #

Crypto crypto ⇒ ToCBOR (TxId crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxId crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxId crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxId crypto] → Size #

Crypto crypto ⇒ ToCBOR (BootstrapWitness crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

toCBOR ∷ BootstrapWitness crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BootstrapWitness crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BootstrapWitness crypto] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (SigKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ SigKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (SigKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ SigKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (SigKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ SigKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SigKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SigKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (SigKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ SigKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SigKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SigKES (SimpleKES d t)] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (VerKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ VerKeyKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (VerKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ VerKeyKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (VerKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ VerKeyKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (VerKeyKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [VerKeyKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (VerKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ VerKeyKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (VerKeyKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [VerKeyKES (SimpleKES d t)] → Size #

DSIGNAlgorithm d ⇒ ToCBOR (SignKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

toCBOR ∷ SignKeyKES (SingleKES d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyKES (SingleKES d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyKES (SingleKES d)] → Size #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ ToCBOR (SignKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

toCBOR ∷ SignKeyKES (SumKES h d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyKES (SumKES h d)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyKES (SumKES h d)] → Size #

KnownNat t ⇒ ToCBOR (SignKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

toCBOR ∷ SignKeyKES (MockKES t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SignKeyKES (MockKES t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SignKeyKES (MockKES t)] → Size #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ ToCBOR (SignKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

toCBOR ∷ SignKeyKES (SimpleKES d t) → Encoding #

encodedSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy (SignKeyKES (SimpleKES d t)) → Size #

encodedListSizeExpr ∷ (∀ t0. ToCBOR t0 ⇒ Proxy t0 → Size) → Proxy [SignKeyKES (SimpleKES d t)] → Size #

ShelleyBasedEra era ⇒ ToCBOR (Header (ShelleyBlock era)) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ Header (ShelleyBlock era) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Header (ShelleyBlock era)) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Header (ShelleyBlock era)] → Size #

ShelleyBasedEra era ⇒ ToCBOR (ShelleyBlock era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ ShelleyBlock era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyBlock era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyBlock era] → Size #

Crypto c ⇒ ToCBOR (ShelleyHash c) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

toCBOR ∷ ShelleyHash c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ShelleyHash c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ShelleyHash c] → Size #

Era era ⇒ ToCBOR (CompactGenesis era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Config

Methods

toCBOR ∷ CompactGenesis era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactGenesis era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactGenesis era] → Size #

Crypto crypto ⇒ ToCBOR (BHBody crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ BHBody crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BHBody crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BHBody crypto] → Size #

Crypto crypto ⇒ ToCBOR (PrevHash crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ PrevHash crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PrevHash crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PrevHash crypto] → Size #

Crypto crypto ⇒ ToCBOR (OCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

toCBOR ∷ OCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OCert crypto] → Size #

Crypto crypto ⇒ ToCBOR (HashHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ HashHeader crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (HashHeader crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [HashHeader crypto] → Size #

Crypto crypto ⇒ ToCBOR (PrtclState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Prtcl

Methods

toCBOR ∷ PrtclState crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PrtclState crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PrtclState crypto] → Size #

Typeable v ⇒ ToCBOR (OutputVRF v) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

toCBOR ∷ OutputVRF v → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OutputVRF v) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OutputVRF v] → Size #

ToCBOR (CertVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ CertVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF PraosVRF] → Size #

ToCBOR (CertVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ CertVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF MockVRF] → Size #

ToCBOR (CertVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ CertVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertVRF SimpleVRF] → Size #

ToCBOR (SignKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ SignKeyVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF PraosVRF] → Size #

ToCBOR (SignKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ SignKeyVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF MockVRF] → Size #

ToCBOR (SignKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ SignKeyVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SignKeyVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SignKeyVRF SimpleVRF] → Size #

ToCBOR (VerKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

toCBOR ∷ VerKeyVRF PraosVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF PraosVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF PraosVRF] → Size #

ToCBOR (VerKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

toCBOR ∷ VerKeyVRF MockVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF MockVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF MockVRF] → Size #

ToCBOR (VerKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

toCBOR ∷ VerKeyVRF SimpleVRF → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerKeyVRF SimpleVRF) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerKeyVRF SimpleVRF] → Size #

Typeable a ⇒ ToCBOR (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

toCBOR ∷ RedeemSignature a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RedeemSignature a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RedeemSignature a] → Size #

Typeable a ⇒ ToCBOR (Signature a) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

toCBOR ∷ Signature a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Signature a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Signature a] → Size #

Typeable era ⇒ ToCBOR (LangDepView era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

toCBOR ∷ LangDepView era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LangDepView era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LangDepView era] → Size #

Crypto crypto ⇒ ToCBOR (CollectError crypto) 
Instance details

Defined in Cardano.Ledger.Alonzo.PlutusScriptApi

Methods

toCBOR ∷ CollectError crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CollectError crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CollectError crypto] → Size #

(Typeable c, Crypto c) ⇒ ToCBOR (ScriptPurpose c) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ ScriptPurpose c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (ScriptPurpose c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [ScriptPurpose c] → Size #

Crypto crypto ⇒ ToCBOR (Wdrl crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ Wdrl crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Wdrl crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Wdrl crypto] → Size #

Crypto crypto ⇒ ToCBOR (DCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ DCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DCert crypto] → Size #

(Typeable era, ToCBOR (BbodyPredicateFailure era)) ⇒ ToCBOR (AlonzoBbodyPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Bbody

Methods

toCBOR ∷ AlonzoBbodyPredFail era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AlonzoBbodyPredFail era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoBbodyPredFail era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (AuxiliaryData era), Typeable (Script era), ToCBOR (Script era)) ⇒ ToCBOR (AlonzoPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxow

Methods

toCBOR ∷ AlonzoPredFail era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AlonzoPredFail era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AlonzoPredFail era] → Size #

Crypto crypto ⇒ ToCBOR (GenDelegs crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ GenDelegs crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenDelegs crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenDelegs crypto] → Size #

(Typeable era, Era era, ToCBOR (TxOut era), ToCBOR (Value era), ToCBOR (PredicateFailure (EraRule "UTXOS" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

(Era era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxosPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxos

Methods

toCBOR ∷ UtxosPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxosPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxosPredicateFailure era] → Size #

(Typeable era, Era era) ⇒ ToCBOR (PpupPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

toCBOR ∷ PpupPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PpupPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PpupPredicateFailure era] → Size #

Typeable era ⇒ ToCBOR (WitnessPPData era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ WitnessPPData era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessPPData era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessPPData era] → Size #

Typeable era ⇒ ToCBOR (Redeemers era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

toCBOR ∷ Redeemers era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Redeemers era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Redeemers era] → Size #

Era era ⇒ ToCBOR (WitnessPPDataRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

toCBOR ∷ WitnessPPDataRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessPPDataRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessPPDataRaw era] → Size #

ToCBOR (Attributes ()) 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

toCBOR ∷ Attributes () → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Attributes ()) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Attributes ()] → Size #

ToCBOR (Attributes AddrAttributes) 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toCBOR ∷ Attributes AddrAttributes → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Attributes AddrAttributes) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Attributes AddrAttributes] → Size #

ToCBOR a ⇒ ToCBOR (MerkleRoot a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

toCBOR ∷ MerkleRoot a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MerkleRoot a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MerkleRoot a] → Size #

ToCBOR a ⇒ ToCBOR (MerkleTree a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

toCBOR ∷ MerkleTree a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MerkleTree a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MerkleTree a] → Size #

ToCBOR n ⇒ ToCBOR (TooLarge n) 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

toCBOR ∷ TooLarge n → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TooLarge n) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TooLarge n] → Size #

Crypto crypto ⇒ ToCBOR (CompactValue crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

toCBOR ∷ CompactValue crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CompactValue crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CompactValue crypto] → Size #

Crypto crypto ⇒ ToCBOR (LastAppliedBlock crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ LastAppliedBlock crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LastAppliedBlock crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LastAppliedBlock crypto] → Size #

(Era era, Typeable era) ⇒ ToCBOR (LaxBlock era) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

toCBOR ∷ LaxBlock era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LaxBlock era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LaxBlock era] → Size #

Crypto crypto ⇒ ToCBOR (GenesisCredential crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ GenesisCredential crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (GenesisCredential crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [GenesisCredential crypto] → Size #

ToCBORGroup a ⇒ ToCBOR (CBORGroup a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

toCBOR ∷ CBORGroup a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CBORGroup a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CBORGroup a] → Size #

Crypto crypto ⇒ ToCBOR (MIRCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRCert crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MIRCert crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRCert crypto] → Size #

Crypto crypto ⇒ ToCBOR (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ StakeCreds crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (StakeCreds crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [StakeCreds crypto] → Size #

Crypto crypto ⇒ ToCBOR (Stake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toCBOR ∷ Stake crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Stake crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Stake crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardSnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardSnapShot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardSnapShot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardSnapShot crypto] → Size #

Crypto crypto ⇒ ToCBOR (RewardUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardUpdate crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardUpdate crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardUpdate crypto] → Size #

Crypto c ⇒ ToCBOR (RewardAns c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ RewardAns c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (RewardAns c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [RewardAns c] → Size #

Crypto c ⇒ ToCBOR (Pulser c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ Pulser c → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Pulser c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Pulser c] → Size #

Crypto crypto ⇒ ToCBOR (OBftSlot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OverlaySchedule

Methods

toCBOR ∷ OBftSlot crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (OBftSlot crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [OBftSlot crypto] → Size #

Crypto crypto ⇒ ToCBOR (FreeVars crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

toCBOR ∷ FreeVars crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (FreeVars crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [FreeVars crypto] → Size #

Crypto crypto ⇒ ToCBOR (Reward crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

toCBOR ∷ Reward crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Reward crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Reward crypto] → Size #

(Typeable era, Era era, Typeable (Script era)) ⇒ ToCBOR (DelegPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Deleg

Methods

toCBOR ∷ DelegPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (DelegPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [DelegPredicateFailure era] → Size #

(Typeable era, Era era) ⇒ ToCBOR (PoolPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Pool

Methods

toCBOR ∷ PoolPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PoolPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PoolPredicateFailure era] → Size #

(ShelleyBased era, ToCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ ToCBOR (LedgersPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledgers

Methods

toCBOR ∷ LedgersPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (LedgersPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [LedgersPredicateFailure era] → Size #

(TransUTxOState ToCBOR era, ToCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ ToCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxo

Methods

toCBOR ∷ UtxoPredicateFailure era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (UtxoPredicateFailure era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [UtxoPredicateFailure era] → Size #

Crypto crypto ⇒ ToCBOR (MIRTarget crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ MIRTarget crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (MIRTarget crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [MIRTarget crypto] → Size #

(Era era, FromCBOR (PParamsDelta era), TransTxBody ToCBOR era) ⇒ ToCBOR (TxBodyRaw era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ TxBodyRaw era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (TxBodyRaw era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [TxBodyRaw era] → Size #

ToCBOR a ⇒ ToCBOR (CborSeq a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

toCBOR ∷ CborSeq a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CborSeq a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CborSeq a] → Size #

ToCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakePoolKey] → Size #

ToCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisUTxOKey] → Size #

ToCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateExtendedKey] → Size #

ToCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisDelegateKey] → Size #

ToCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisExtendedKey] → Size #

ToCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey GenesisKey] → Size #

ToCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeExtendedKey] → Size #

ToCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey StakeKey] → Size #

ToCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentExtendedKey] → Size #

ToCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ VerificationKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey PaymentKey] → Size #

ToCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKeyLegacy] → Size #

ToCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ VerificationKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey ByronKey] → Size #

ToCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey VrfKey] → Size #

ToCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ VerificationKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VerificationKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VerificationKey KesKey] → Size #

ToCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakePoolKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakePoolKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakePoolKey] → Size #

ToCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisUTxOKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisUTxOKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisUTxOKey] → Size #

ToCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateExtendedKey] → Size #

ToCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisDelegateKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisDelegateKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisDelegateKey] → Size #

ToCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisExtendedKey] → Size #

ToCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey GenesisKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey GenesisKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey GenesisKey] → Size #

ToCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeExtendedKey] → Size #

ToCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey StakeKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey StakeKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey StakeKey] → Size #

ToCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentExtendedKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentExtendedKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentExtendedKey] → Size #

ToCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toCBOR ∷ SigningKey PaymentKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey PaymentKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey PaymentKey] → Size #

ToCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKeyLegacy → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKeyLegacy) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKeyLegacy] → Size #

ToCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

toCBOR ∷ SigningKey ByronKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey ByronKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey ByronKey] → Size #

ToCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey VrfKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey VrfKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey VrfKey] → Size #

ToCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

toCBOR ∷ SigningKey KesKey → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SigningKey KesKey) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SigningKey KesKey] → Size #

Typeable lang ⇒ ToCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toCBOR ∷ PlutusScript lang → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (PlutusScript lang) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [PlutusScript lang] → Size #

(ToCBOR a, ToCBOR b) ⇒ ToCBOR (Either a b) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Either a b → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Either a b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Either a b] → Size #

(ToCBOR a, ToCBOR b) ⇒ ToCBOR (a, b) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b)] → Size #

(Ord k, ToCBOR k, ToCBOR v) ⇒ ToCBOR (Map k v) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Map k v → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Map k v) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Map k v] → Size #

(HashAlgorithm h, Typeable a) ⇒ ToCBOR (Hash h a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

toCBOR ∷ Hash h a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Hash h a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Hash h a] → Size #

Era era ⇒ ToCBOR (WitnessSetHKD Identity era) 
Instance details

Defined in Shelley.Spec.Ledger.Tx

Methods

toCBOR ∷ WitnessSetHKD Identity era → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitnessSetHKD Identity era) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitnessSetHKD Identity era] → Size #

(Crypto crypto, Typeable disc) ⇒ ToCBOR (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ KeyHash disc crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (KeyHash disc crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [KeyHash disc crypto] → Size #

(Typeable index, Crypto c) ⇒ ToCBOR (SafeHash c index) 
Instance details

Defined in Cardano.Ledger.SafeHash

Methods

toCBOR ∷ SafeHash c index → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (SafeHash c index) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [SafeHash c index] → Size #

(Typeable kr, Crypto crypto) ⇒ ToCBOR (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toCBOR ∷ Credential kr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Credential kr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Credential kr crypto] → Size #

(Typeable kr, Crypto crypto) ⇒ ToCBOR (WitVKey kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toCBOR ∷ WitVKey kr crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (WitVKey kr crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [WitVKey kr crypto] → Size #

(Typeable algo, Typeable a, HashAlgorithm algo) ⇒ ToCBOR (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

toCBOR ∷ AbstractHash algo a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (AbstractHash algo a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [AbstractHash algo a] → Size #

(Crypto crypto, Typeable kd) ⇒ ToCBOR (VKey kd crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toCBOR ∷ VKey kd crypto → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (VKey kd crypto) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [VKey kd crypto] → Size #

(VRFAlgorithm v, Typeable a) ⇒ ToCBOR (CertifiedVRF v a) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

toCBOR ∷ CertifiedVRF v a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (CertifiedVRF v a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [CertifiedVRF v a] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c) ⇒ ToCBOR (a, b, c) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c)] → Size #

(Typeable s, ToCBOR a) ⇒ ToCBOR (Tagged s a) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ Tagged s a → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (Tagged s a) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [Tagged s a] → Size #

(Ord a, Ord b, ToCBOR a, ToCBOR b) ⇒ ToCBOR (BiMap b a b) 
Instance details

Defined in Control.Iterate.SetAlgebra

Methods

toCBOR ∷ BiMap b a b → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (BiMap b a b) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [BiMap b a b] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d) ⇒ ToCBOR (a, b, c, d) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d)] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d, ToCBOR e) ⇒ ToCBOR (a, b, c, d, e) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d, e) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d, e) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d, e)] → Size #

(ToCBOR a, ToCBOR b, ToCBOR c, ToCBOR d, ToCBOR e, ToCBOR f, ToCBOR g) ⇒ ToCBOR (a, b, c, d, e, f, g) 
Instance details

Defined in Cardano.Binary.ToCBOR

Methods

toCBOR ∷ (a, b, c, d, e, f, g) → Encoding #

encodedSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy (a, b, c, d, e, f, g) → Size #

encodedListSizeExpr ∷ (∀ t. ToCBOR t ⇒ Proxy t → Size) → Proxy [(a, b, c, d, e, f, g)] → Size #

class Typeable a ⇒ FromCBOR a #

Minimal complete definition

fromCBOR

Instances

Instances details
FromCBOR Bool 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Bool #

label ∷ Proxy Bool → Text #

FromCBOR Float 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Float #

label ∷ Proxy Float → Text #

FromCBOR Int 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int #

label ∷ Proxy Int → Text #

FromCBOR Int32 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int32 #

label ∷ Proxy Int32 → Text #

FromCBOR Int64 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Int64 #

label ∷ Proxy Int64 → Text #

FromCBOR Integer 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Integer #

label ∷ Proxy Integer → Text #

FromCBOR Natural 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Natural #

label ∷ Proxy Natural → Text #

FromCBOR Word 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word #

label ∷ Proxy Word → Text #

FromCBOR Word8 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word8 #

label ∷ Proxy Word8 → Text #

FromCBOR Word16 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word16 #

label ∷ Proxy Word16 → Text #

FromCBOR Word32 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word32 #

label ∷ Proxy Word32 → Text #

FromCBOR Word64 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Word64 #

label ∷ Proxy Word64 → Text #

FromCBOR () 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s () #

label ∷ Proxy () → Text #

FromCBOR ByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s ByteString #

label ∷ Proxy ByteString → Text #

FromCBOR ShortByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s ShortByteString #

label ∷ Proxy ShortByteString → Text #

FromCBOR Nano 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Nano #

label ∷ Proxy Nano → Text #

FromCBOR Pico 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Pico #

label ∷ Proxy Pico → Text #

FromCBOR Void 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Void #

label ∷ Proxy Void → Text #

FromCBOR Text 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s Text #

label ∷ Proxy Text → Text #

FromCBOR UTCTime 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s UTCTime #

label ∷ Proxy UTCTime → Text #

FromCBOR NominalDiffTime 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s NominalDiffTime #

label ∷ Proxy NominalDiffTime → Text #

FromCBOR BlockNo 
Instance details

Defined in Cardano.Slotting.Block

Methods

fromCBOR ∷ Decoder s BlockNo #

label ∷ Proxy BlockNo → Text #

FromCBOR LByteString 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s LByteString #

label ∷ Proxy LByteString → Text #

FromCBOR EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s EpochNo #

label ∷ Proxy EpochNo → Text #

FromCBOR SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s SlotNo #

label ∷ Proxy SlotNo → Text #

FromCBOR Raw 
Instance details

Defined in Cardano.Binary.Raw

Methods

fromCBOR ∷ Decoder s Raw #

label ∷ Proxy Raw → Text #

FromCBOR Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s Coin #

label ∷ Proxy Coin → Text #

FromCBOR UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s UnitInterval #

label ∷ Proxy UnitInterval → Text #

FromCBOR ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s ProtVer #

label ∷ Proxy ProtVer → Text #

FromCBOR AlonzoGenesis 
Instance details

Defined in Cardano.Ledger.Alonzo.Genesis

Methods

fromCBOR ∷ Decoder s AlonzoGenesis #

label ∷ Proxy AlonzoGenesis → Text #

FromCBOR Language 
Instance details

Defined in Cardano.Ledger.Alonzo.Language

Methods

fromCBOR ∷ Decoder s Language #

label ∷ Proxy Language → Text #

FromCBOR CostModel 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s CostModel #

label ∷ Proxy CostModel → Text #

FromCBOR Prices 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s Prices #

label ∷ Proxy Prices → Text #

FromCBOR ExUnits 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s ExUnits #

label ∷ Proxy ExUnits → Text #

FromCBOR Metadatum 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

fromCBOR ∷ Decoder s Metadatum #

label ∷ Proxy Metadatum → Text #

FromCBOR AssetName 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s AssetName #

label ∷ Proxy AssetName → Text #

FromCBOR Likelihood 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s Likelihood #

label ∷ Proxy Likelihood → Text #

FromCBOR Ptr 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

fromCBOR ∷ Decoder s Ptr #

label ∷ Proxy Ptr → Text #

FromCBOR Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Nonce #

label ∷ Proxy Nonce → Text #

FromCBOR Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s Desirability #

label ∷ Proxy Desirability → Text #

FromCBOR StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s StakePoolRelay #

label ∷ Proxy StakePoolRelay → Text #

FromCBOR PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s PoolMetadata #

label ∷ Proxy PoolMetadata → Text #

FromCBOR Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Network #

label ∷ Proxy Network → Text #

FromCBOR ValidityInterval 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s ValidityInterval #

label ∷ Proxy ValidityInterval → Text #

FromCBOR ByronHash 
Instance details

Defined in Ouroboros.Consensus.Byron.Ledger.Block

Methods

fromCBOR ∷ Decoder s ByronHash #

label ∷ Proxy ByronHash → Text #

FromCBOR EpochAndSlotCount 
Instance details

Defined in Cardano.Chain.Slotting.EpochAndSlotCount

Methods

fromCBOR ∷ Decoder s EpochAndSlotCount #

label ∷ Proxy EpochAndSlotCount → Text #

FromCBOR EpochNumber 
Instance details

Defined in Cardano.Chain.Slotting.EpochNumber

Methods

fromCBOR ∷ Decoder s EpochNumber #

label ∷ Proxy EpochNumber → Text #

FromCBOR EpochSlots 
Instance details

Defined in Cardano.Chain.Slotting.EpochSlots

Methods

fromCBOR ∷ Decoder s EpochSlots #

label ∷ Proxy EpochSlots → Text #

FromCBOR SlotCount 
Instance details

Defined in Cardano.Chain.Slotting.SlotCount

Methods

fromCBOR ∷ Decoder s SlotCount #

label ∷ Proxy SlotCount → Text #

FromCBOR SlotNumber 
Instance details

Defined in Cardano.Chain.Slotting.SlotNumber

Methods

fromCBOR ∷ Decoder s SlotNumber #

label ∷ Proxy SlotNumber → Text #

FromCBOR Config 
Instance details

Defined in Cardano.Chain.Genesis.Config

Methods

fromCBOR ∷ Decoder s Config #

label ∷ Proxy Config → Text #

FromCBOR GenesisNonAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.NonAvvmBalances

Methods

fromCBOR ∷ Decoder s GenesisNonAvvmBalances #

label ∷ Proxy GenesisNonAvvmBalances → Text #

FromCBOR GenesisDelegation 
Instance details

Defined in Cardano.Chain.Genesis.Delegation

Methods

fromCBOR ∷ Decoder s GenesisDelegation #

label ∷ Proxy GenesisDelegation → Text #

FromCBOR GenesisKeyHashes 
Instance details

Defined in Cardano.Chain.Genesis.KeyHashes

Methods

fromCBOR ∷ Decoder s GenesisKeyHashes #

label ∷ Proxy GenesisKeyHashes → Text #

FromCBOR CompactAddress 
Instance details

Defined in Cardano.Chain.Common.Compact

Methods

fromCBOR ∷ Decoder s CompactAddress #

label ∷ Proxy CompactAddress → Text #

FromCBOR RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

fromCBOR ∷ Decoder s RequiresNetworkMagic #

label ∷ Proxy RequiresNetworkMagic → Text #

FromCBOR GenesisAvvmBalances 
Instance details

Defined in Cardano.Chain.Genesis.AvvmBalances

Methods

fromCBOR ∷ Decoder s GenesisAvvmBalances #

label ∷ Proxy GenesisAvvmBalances → Text #

FromCBOR ProtocolParameters 
Instance details

Defined in Cardano.Chain.Update.ProtocolParameters

Methods

fromCBOR ∷ Decoder s ProtocolParameters #

label ∷ Proxy ProtocolParameters → Text #

FromCBOR ProtocolVersion 
Instance details

Defined in Cardano.Chain.Update.ProtocolVersion

Methods

fromCBOR ∷ Decoder s ProtocolVersion #

label ∷ Proxy ProtocolVersion → Text #

FromCBOR ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

fromCBOR ∷ Decoder s ProtocolMagicId #

label ∷ Proxy ProtocolMagicId → Text #

FromCBOR Certificate 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

fromCBOR ∷ Decoder s Certificate #

label ∷ Proxy Certificate → Text #

FromCBOR SigningKey 
Instance details

Defined in Cardano.Crypto.Signing.SigningKey

Methods

fromCBOR ∷ Decoder s SigningKey #

label ∷ Proxy SigningKey → Text #

FromCBOR SoftwareVersion 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

fromCBOR ∷ Decoder s SoftwareVersion #

label ∷ Proxy SoftwareVersion → Text #

FromCBOR VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

fromCBOR ∷ Decoder s VerificationKey #

label ∷ Proxy VerificationKey → Text #

FromCBOR KeyHash 
Instance details

Defined in Cardano.Chain.Common.KeyHash

Methods

fromCBOR ∷ Decoder s KeyHash #

label ∷ Proxy KeyHash → Text #

FromCBOR GenesisHash 
Instance details

Defined in Cardano.Chain.Genesis.Hash

Methods

fromCBOR ∷ Decoder s GenesisHash #

label ∷ Proxy GenesisHash → Text #

FromCBOR CandidateProtocolUpdate 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s CandidateProtocolUpdate #

label ∷ Proxy CandidateProtocolUpdate → Text #

FromCBOR Endorsement 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s Endorsement #

label ∷ Proxy Endorsement → Text #

FromCBOR ApplyMempoolPayloadErr 
Instance details

Defined in Cardano.Chain.Byron.API.Mempool

Methods

fromCBOR ∷ Decoder s ApplyMempoolPayloadErr #

label ∷ Proxy ApplyMempoolPayloadErr → Text #

FromCBOR Tx 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s Tx #

label ∷ Proxy Tx → Text #

FromCBOR Proposal 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s Proposal #

label ∷ Proxy Proposal → Text #

FromCBOR Vote 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

fromCBOR ∷ Decoder s Vote #

label ∷ Proxy Vote → Text #

FromCBOR ChainValidationState 
Instance details

Defined in Cardano.Chain.Block.Validation

Methods

fromCBOR ∷ Decoder s ChainValidationState #

label ∷ Proxy ChainValidationState → Text #

FromCBOR Map 
Instance details

Defined in Cardano.Chain.Delegation.Map

Methods

fromCBOR ∷ Decoder s Map #

label ∷ Proxy Map → Text #

FromCBOR ScheduledDelegation 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s ScheduledDelegation #

label ∷ Proxy ScheduledDelegation → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR UTxO 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

fromCBOR ∷ Decoder s UTxO #

label ∷ Proxy UTxO → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR ToSign 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s ToSign #

label ∷ Proxy ToSign → Text #

FromCBOR CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

fromCBOR ∷ Decoder s CompactRedeemVerificationKey #

label ∷ Proxy CompactRedeemVerificationKey → Text #

FromCBOR Lovelace 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

fromCBOR ∷ Decoder s Lovelace #

label ∷ Proxy Lovelace → Text #

FromCBOR SystemStart 
Instance details

Defined in Cardano.Slotting.Time

Methods

fromCBOR ∷ Decoder s SystemStart #

label ∷ Proxy SystemStart → Text #

FromCBOR Point 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s Point #

label ∷ Proxy Point → Text #

FromCBOR Proof 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s Proof #

label ∷ Proxy Proof → Text #

FromCBOR SignKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s SignKey #

label ∷ Proxy SignKey → Text #

FromCBOR VerKey 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s VerKey #

label ∷ Proxy VerKey → Text #

FromCBOR RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

fromCBOR ∷ Decoder s RedeemVerificationKey #

label ∷ Proxy RedeemVerificationKey → Text #

FromCBOR RedeemSigningKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.SigningKey

Methods

fromCBOR ∷ Decoder s RedeemSigningKey #

label ∷ Proxy RedeemSigningKey → Text #

FromCBOR IsValidating 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s IsValidating #

label ∷ Proxy IsValidating → Text #

FromCBOR Tag 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s Tag #

label ∷ Proxy Tag → Text #

FromCBOR ChainDifficulty 
Instance details

Defined in Cardano.Chain.Common.ChainDifficulty

Methods

fromCBOR ∷ Decoder s ChainDifficulty #

label ∷ Proxy ChainDifficulty → Text #

FromCBOR Proof 
Instance details

Defined in Cardano.Chain.Block.Proof

Methods

fromCBOR ∷ Decoder s Proof #

label ∷ Proxy Proof → Text #

FromCBOR SscPayload 
Instance details

Defined in Cardano.Chain.Ssc

Methods

fromCBOR ∷ Decoder s SscPayload #

label ∷ Proxy SscPayload → Text #

FromCBOR ProposalBody 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s ProposalBody #

label ∷ Proxy ProposalBody → Text #

FromCBOR TxInWitness 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

fromCBOR ∷ Decoder s TxInWitness #

label ∷ Proxy TxInWitness → Text #

FromCBOR Body 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

fromCBOR ∷ Decoder s Body #

label ∷ Proxy Body → Text #

FromCBOR TxPayload 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

fromCBOR ∷ Decoder s TxPayload #

label ∷ Proxy TxPayload → Text #

FromCBOR Payload 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

fromCBOR ∷ Decoder s Payload #

label ∷ Proxy Payload → Text #

FromCBOR Payload 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

fromCBOR ∷ Decoder s Payload #

label ∷ Proxy Payload → Text #

FromCBOR BlockSignature 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s BlockSignature #

label ∷ Proxy BlockSignature → Text #

FromCBOR TxProof 
Instance details

Defined in Cardano.Chain.UTxO.TxProof

Methods

fromCBOR ∷ Decoder s TxProof #

label ∷ Proxy TxProof → Text #

FromCBOR SscProof 
Instance details

Defined in Cardano.Chain.Ssc

Methods

fromCBOR ∷ Decoder s SscProof #

label ∷ Proxy SscProof → Text #

FromCBOR CompactTxIn 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxIn #

label ∷ Proxy CompactTxIn → Text #

FromCBOR CompactTxOut 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxOut #

label ∷ Proxy CompactTxOut → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Interface

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR UTxOValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

fromCBOR ∷ Decoder s UTxOValidationError #

label ∷ Proxy UTxOValidationError → Text #

FromCBOR BlockCount 
Instance details

Defined in Cardano.Chain.Common.BlockCount

Methods

fromCBOR ∷ Decoder s BlockCount #

label ∷ Proxy BlockCount → Text #

FromCBOR UTxOConfiguration 
Instance details

Defined in Cardano.Chain.UTxO.UTxOConfiguration

Methods

fromCBOR ∷ Decoder s UTxOConfiguration #

label ∷ Proxy UTxOConfiguration → Text #

FromCBOR ApplicationName 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

fromCBOR ∷ Decoder s ApplicationName #

label ∷ Proxy ApplicationName → Text #

FromCBOR ApplicationVersion 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s ApplicationVersion #

label ∷ Proxy ApplicationVersion → Text #

FromCBOR ProtocolUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s ProtocolUpdateProposal #

label ∷ Proxy ProtocolUpdateProposal → Text #

FromCBOR SoftwareUpdateProposal 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s SoftwareUpdateProposal #

label ∷ Proxy SoftwareUpdateProposal → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Interface

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR HDAddressPayload 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

fromCBOR ∷ Decoder s HDAddressPayload #

label ∷ Proxy HDAddressPayload → Text #

FromCBOR NetworkMagic 
Instance details

Defined in Cardano.Chain.Common.NetworkMagic

Methods

fromCBOR ∷ Decoder s NetworkMagic #

label ∷ Proxy NetworkMagic → Text #

FromCBOR AddrSpendingData 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

fromCBOR ∷ Decoder s AddrSpendingData #

label ∷ Proxy AddrSpendingData → Text #

FromCBOR AddrType 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

fromCBOR ∷ Decoder s AddrType #

label ∷ Proxy AddrType → Text #

FromCBOR Address 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

fromCBOR ∷ Decoder s Address #

label ∷ Proxy Address → Text #

FromCBOR Address' 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

fromCBOR ∷ Decoder s Address' #

label ∷ Proxy Address' → Text #

FromCBOR LovelaceError 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

fromCBOR ∷ Decoder s LovelaceError #

label ∷ Proxy LovelaceError → Text #

FromCBOR LovelacePortion 
Instance details

Defined in Cardano.Chain.Common.LovelacePortion

Methods

fromCBOR ∷ Decoder s LovelacePortion #

label ∷ Proxy LovelacePortion → Text #

FromCBOR TxFeePolicy 
Instance details

Defined in Cardano.Chain.Common.TxFeePolicy

Methods

fromCBOR ∷ Decoder s TxFeePolicy #

label ∷ Proxy TxFeePolicy → Text #

FromCBOR TxSizeLinear 
Instance details

Defined in Cardano.Chain.Common.TxSizeLinear

Methods

fromCBOR ∷ Decoder s TxSizeLinear #

label ∷ Proxy TxSizeLinear → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Activation

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR State 
Instance details

Defined in Cardano.Chain.Delegation.Validation.Scheduling

Methods

fromCBOR ∷ Decoder s State #

label ∷ Proxy State → Text #

FromCBOR GenesisData 
Instance details

Defined in Cardano.Chain.Genesis.Data

Methods

fromCBOR ∷ Decoder s GenesisData #

label ∷ Proxy GenesisData → Text #

FromCBOR CompactTxId 
Instance details

Defined in Cardano.Chain.UTxO.Compact

Methods

fromCBOR ∷ Decoder s CompactTxId #

label ∷ Proxy CompactTxId → Text #

FromCBOR TxIn 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s TxIn #

label ∷ Proxy TxIn → Text #

FromCBOR TxOut 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

fromCBOR ∷ Decoder s TxOut #

label ∷ Proxy TxOut → Text #

FromCBOR TxAux 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

fromCBOR ∷ Decoder s TxAux #

label ∷ Proxy TxAux → Text #

FromCBOR TxSigData 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

fromCBOR ∷ Decoder s TxSigData #

label ∷ Proxy TxSigData → Text #

FromCBOR UTxOError 
Instance details

Defined in Cardano.Chain.UTxO.UTxO

Methods

fromCBOR ∷ Decoder s UTxOError #

label ∷ Proxy UTxOError → Text #

FromCBOR ApplicationNameError 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

fromCBOR ∷ Decoder s ApplicationNameError #

label ∷ Proxy ApplicationNameError → Text #

FromCBOR InstallerHash 
Instance details

Defined in Cardano.Chain.Update.InstallerHash

Methods

fromCBOR ∷ Decoder s InstallerHash #

label ∷ Proxy InstallerHash → Text #

FromCBOR SystemTag 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

fromCBOR ∷ Decoder s SystemTag #

label ∷ Proxy SystemTag → Text #

FromCBOR ProtocolParametersUpdate 
Instance details

Defined in Cardano.Chain.Update.ProtocolParametersUpdate

Methods

fromCBOR ∷ Decoder s ProtocolParametersUpdate #

label ∷ Proxy ProtocolParametersUpdate → Text #

FromCBOR SoftforkRule 
Instance details

Defined in Cardano.Chain.Update.SoftforkRule

Methods

fromCBOR ∷ Decoder s SoftforkRule #

label ∷ Proxy SoftforkRule → Text #

FromCBOR SoftwareVersionError 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

fromCBOR ∷ Decoder s SoftwareVersionError #

label ∷ Proxy SoftwareVersionError → Text #

FromCBOR SystemTagError 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

fromCBOR ∷ Decoder s SystemTagError #

label ∷ Proxy SystemTagError → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Endorsement

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Voting

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Error 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s Error #

label ∷ Proxy Error → Text #

FromCBOR Adopted 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s Adopted #

label ∷ Proxy Adopted → Text #

FromCBOR ActiveSlotCoeff 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s ActiveSlotCoeff #

label ∷ Proxy ActiveSlotCoeff → Text #

FromCBOR DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s DnsName #

label ∷ Proxy DnsName → Text #

FromCBOR Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Port #

label ∷ Proxy Port → Text #

FromCBOR Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

fromCBOR ∷ Decoder s Url #

label ∷ Proxy Url → Text #

FromCBOR DeltaCoin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s DeltaCoin #

label ∷ Proxy DeltaCoin → Text #

FromCBOR TicknState 
Instance details

Defined in Shelley.Spec.Ledger.STS.Tickn

Methods

fromCBOR ∷ Decoder s TicknState #

label ∷ Proxy TicknState → Text #

FromCBOR ChainCode 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

fromCBOR ∷ Decoder s ChainCode #

label ∷ Proxy ChainCode → Text #

FromCBOR AccountState 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s AccountState #

label ∷ Proxy AccountState → Text #

FromCBOR LogWeight 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s LogWeight #

label ∷ Proxy LogWeight → Text #

FromCBOR MIRPot 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s MIRPot #

label ∷ Proxy MIRPot → Text #

FromCBOR KESPeriod 
Instance details

Defined in Shelley.Spec.Ledger.OCert

Methods

fromCBOR ∷ Decoder s KESPeriod #

label ∷ Proxy KESPeriod → Text #

FromCBOR PerformanceEstimate 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s PerformanceEstimate #

label ∷ Proxy PerformanceEstimate → Text #

FromCBOR RewardType 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s RewardType #

label ∷ Proxy RewardType → Text #

FromCBOR VotingPeriod 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

fromCBOR ∷ Decoder s VotingPeriod #

label ∷ Proxy VotingPeriod → Text #

FromCBOR TxValidationError 
Instance details

Defined in Cardano.Chain.UTxO.Validation

Methods

fromCBOR ∷ Decoder s TxValidationError #

label ∷ Proxy TxValidationError → Text #

FromCBOR Certificate Source # 
Instance details

Defined in Cardano.Api.Certificate

Methods

fromCBOR ∷ Decoder s Certificate #

label ∷ Proxy Certificate → Text #

FromCBOR OperationalCertificateIssueCounter Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

fromCBOR ∷ Decoder s OperationalCertificateIssueCounter #

label ∷ Proxy OperationalCertificateIssueCounter → Text #

FromCBOR OperationalCertificate Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

fromCBOR ∷ Decoder s OperationalCertificate #

label ∷ Proxy OperationalCertificate → Text #

FromCBOR a ⇒ FromCBOR [a] 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s [a] #

label ∷ Proxy [a] → Text #

FromCBOR a ⇒ FromCBOR (Maybe a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Maybe a) #

label ∷ Proxy (Maybe a) → Text #

(Integral a, FromCBOR a) ⇒ FromCBOR (Ratio a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Ratio a) #

label ∷ Proxy (Ratio a) → Text #

(Ord a, FromCBOR a) ⇒ FromCBOR (Set a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Set a) #

label ∷ Proxy (Set a) → Text #

FromCBOR a ⇒ FromCBOR (NonEmpty a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (NonEmpty a) #

label ∷ Proxy (NonEmpty a) → Text #

(Serialise t, Typeable t) ⇒ FromCBOR (WithOrigin t) 
Instance details

Defined in Cardano.Slotting.Slot

Methods

fromCBOR ∷ Decoder s (WithOrigin t) #

label ∷ Proxy (WithOrigin t) → Text #

FromCBOR a ⇒ FromCBOR (Vector a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Vector a) #

label ∷ Proxy (Vector a) → Text #

(Era era, Ord (Script era), FromCBOR (Annotator (Script era)), Script era ~ Script era) ⇒ FromCBOR (Annotator (AuxiliaryData era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryData era)) #

label ∷ Proxy (Annotator (AuxiliaryData era)) → Text #

(FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Script era)), FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (Witnesses era)), ToCBOR (AuxiliaryData era), ToCBOR (Script era), ToCBOR (TxBody era), ToCBOR (Witnesses era), ValidateScript era, Script era ~ Script era, Era era) ⇒ FromCBOR (Annotator (TxSeq era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxSeq

Methods

fromCBOR ∷ Decoder s (Annotator (TxSeq era)) #

label ∷ Proxy (Annotator (TxSeq era)) → Text #

(Era era, ValidateScript era, Script era ~ Script era) ⇒ FromCBOR (Annotator (TxWitness era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (TxWitness era)) #

label ∷ Proxy (Annotator (TxWitness era)) → Text #

(Typeable t, FromCBOR (Annotator t)) ⇒ FromCBOR (Annotator (MemoBytes t)) 
Instance details

Defined in Data.MemoBytes

Methods

fromCBOR ∷ Decoder s (Annotator (MemoBytes t)) #

label ∷ Proxy (Annotator (MemoBytes t)) → Text #

(Era era, ToCBOR (Data era), ToCBOR (Script era), Typeable (Script era), ValidateScript era, Script era ~ Script era) ⇒ FromCBOR (Annotator (TxWitnessRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (TxWitnessRaw era)) #

label ∷ Proxy (Annotator (TxWitnessRaw era)) → Text #

(Typeable era, FromCBOR (Annotator (Script era)), ValidateScript era) ⇒ FromCBOR (Annotator (WitnessSetHKD Identity era)) 
Instance details

Defined in Shelley.Spec.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessSetHKD Identity era)) #

label ∷ Proxy (Annotator (WitnessSetHKD Identity era)) → Text #

(BlockAnn era, Typeable era) ⇒ FromCBOR (Annotator (TxSeq era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (TxSeq era)) #

label ∷ Proxy (Annotator (TxSeq era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (Timelock crypto)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s (Annotator (Timelock crypto)) #

label ∷ Proxy (Annotator (Timelock crypto)) → Text #

(Era era, FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Witnesses era))) ⇒ FromCBOR (Annotator (Tx era)) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (Tx era)) #

label ∷ Proxy (Annotator (Tx era)) → Text #

(Era era, FromCBOR (TxOut era), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

(Era era, FromCBOR (Annotator (TxBody era)), FromCBOR (Annotator (AuxiliaryData era)), FromCBOR (Annotator (Witnesses era))) ⇒ FromCBOR (Annotator (TxRaw era)) 
Instance details

Defined in Cardano.Ledger.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (TxRaw era)) #

label ∷ Proxy (Annotator (TxRaw era)) → Text #

FamsFrom era ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), SerialisableData (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (MultiSig crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (MultiSig crypto)) #

label ∷ Proxy (Annotator (MultiSig crypto)) → Text #

Typeable era ⇒ FromCBOR (Annotator (Metadata era)) 
Instance details

Defined in Shelley.Spec.Ledger.Metadata

Methods

fromCBOR ∷ Decoder s (Annotator (Metadata era)) #

label ∷ Proxy (Annotator (Metadata era)) → Text #

(Era era, AnnotatedData (Script era)) ⇒ FromCBOR (Annotator (AuxiliaryData era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryData era)) #

label ∷ Proxy (Annotator (AuxiliaryData era)) → Text #

FamsFrom era ⇒ FromCBOR (Annotator (TxBody era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBody era)) #

label ∷ Proxy (Annotator (TxBody era)) → Text #

(Crypto (Crypto era), Typeable (Crypto era), Typeable era) ⇒ FromCBOR (Annotator (Script era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (Script era)) #

label ∷ Proxy (Annotator (Script era)) → Text #

Typeable era ⇒ FromCBOR (Annotator (Data era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (Data era)) #

label ∷ Proxy (Annotator (Data era)) → Text #

(Era era, Ord (Script era), FromCBOR (Annotator (Script era)), Script era ~ Script era) ⇒ FromCBOR (Annotator (AuxiliaryDataRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Data

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryDataRaw era)) #

label ∷ Proxy (Annotator (AuxiliaryDataRaw era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (TimelockRaw crypto)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Timelocks

Methods

fromCBOR ∷ Decoder s (Annotator (TimelockRaw crypto)) #

label ∷ Proxy (Annotator (TimelockRaw crypto)) → Text #

(Era era, AnnotatedData (Script era)) ⇒ FromCBOR (Annotator (AuxiliaryDataRaw era)) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (Annotator (AuxiliaryDataRaw era)) #

label ∷ Proxy (Annotator (AuxiliaryDataRaw era)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (BHeader crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (BHeader crypto)) #

label ∷ Proxy (Annotator (BHeader crypto)) → Text #

(BlockAnn era, ValidateScript era, SupportsSegWit era, FromCBOR (Annotator (TxSeq era))) ⇒ FromCBOR (Annotator (Block era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (Block era)) #

label ∷ Proxy (Annotator (Block era)) → Text #

(Typeable kr, Crypto crypto) ⇒ FromCBOR (Annotator (WitVKey kr crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (WitVKey kr crypto)) #

label ∷ Proxy (Annotator (WitVKey kr crypto)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (BootstrapWitness crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Address.Bootstrap

Methods

fromCBOR ∷ Decoder s (Annotator (BootstrapWitness crypto)) #

label ∷ Proxy (Annotator (BootstrapWitness crypto)) → Text #

Crypto crypto ⇒ FromCBOR (Annotator (MultiSigRaw crypto)) 
Instance details

Defined in Shelley.Spec.Ledger.Scripts

Methods

fromCBOR ∷ Decoder s (Annotator (MultiSigRaw crypto)) #

label ∷ Proxy (Annotator (MultiSigRaw crypto)) → Text #

ShelleyBasedEra era ⇒ FromCBOR (Annotator (Header (ShelleyBlock era))) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (Annotator (Header (ShelleyBlock era))) #

label ∷ Proxy (Annotator (Header (ShelleyBlock era))) → Text #

ShelleyBasedEra era ⇒ FromCBOR (Annotator (ShelleyBlock era)) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (Annotator (ShelleyBlock era)) #

label ∷ Proxy (Annotator (ShelleyBlock era)) → Text #

Era era ⇒ FromCBOR (Annotator (RedeemersRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (RedeemersRaw era)) #

label ∷ Proxy (Annotator (RedeemersRaw era)) → Text #

Era era ⇒ FromCBOR (Annotator (WitnessPPData era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessPPData era)) #

label ∷ Proxy (Annotator (WitnessPPData era)) → Text #

Era era ⇒ FromCBOR (Annotator (Redeemers era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxWitness

Methods

fromCBOR ∷ Decoder s (Annotator (Redeemers era)) #

label ∷ Proxy (Annotator (Redeemers era)) → Text #

Era era ⇒ FromCBOR (Annotator (WitnessPPDataRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (Annotator (WitnessPPDataRaw era)) #

label ∷ Proxy (Annotator (WitnessPPDataRaw era)) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

(Era era, BlockAnn era, ValidateScript era, TxSeq era ~ TxSeq era) ⇒ FromCBOR (Annotator (LaxBlock era)) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (Annotator (LaxBlock era)) #

label ∷ Proxy (Annotator (LaxBlock era)) → Text #

(TransTxBody FromCBOR era, ToCBOR (PParamsDelta era), Era era) ⇒ FromCBOR (Annotator (TxBodyRaw era)) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Annotator (TxBodyRaw era)) #

label ∷ Proxy (Annotator (TxBodyRaw era)) → Text #

FromCBOR (SigDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (SigDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (SigDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed25519DSIGN) #

label ∷ Proxy (SigDSIGN Ed25519DSIGN) → Text #

FromCBOR (SigDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (SigDSIGN MockDSIGN) #

label ∷ Proxy (SigDSIGN MockDSIGN) → Text #

FromCBOR (SigDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (SigDSIGN Ed448DSIGN) #

label ∷ Proxy (SigDSIGN Ed448DSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed25519DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed25519DSIGN) → Text #

FromCBOR (SignKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN MockDSIGN) #

label ∷ Proxy (SignKeyDSIGN MockDSIGN) → Text #

FromCBOR (SignKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (SignKeyDSIGN Ed448DSIGN) #

label ∷ Proxy (SignKeyDSIGN Ed448DSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) Source # 
Instance details

Defined in Cardano.Api.Crypto.Ed25519Bip32

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed25519Bip32DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed25519DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed25519

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed25519DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed25519DSIGN) → Text #

FromCBOR (VerKeyDSIGN MockDSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN MockDSIGN) #

label ∷ Proxy (VerKeyDSIGN MockDSIGN) → Text #

FromCBOR (VerKeyDSIGN Ed448DSIGN) 
Instance details

Defined in Cardano.Crypto.DSIGN.Ed448

Methods

fromCBOR ∷ Decoder s (VerKeyDSIGN Ed448DSIGN) #

label ∷ Proxy (VerKeyDSIGN Ed448DSIGN) → Text #

Crypto crypto ⇒ FromCBOR (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

fromCBOR ∷ Decoder s (ScriptHash crypto) #

label ∷ Proxy (ScriptHash crypto) → Text #

FromCBOR a ⇒ FromCBOR (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

fromCBOR ∷ Decoder s (StrictMaybe a) #

label ∷ Proxy (StrictMaybe a) → Text #

Crypto crypto ⇒ FromCBOR (AuxiliaryDataHash crypto) 
Instance details

Defined in Cardano.Ledger.AuxiliaryData

Methods

fromCBOR ∷ Decoder s (AuxiliaryDataHash crypto) #

label ∷ Proxy (AuxiliaryDataHash crypto) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (PPUPState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (PPUPState era) #

label ∷ Proxy (PPUPState era) → Text #

Crypto crypto ⇒ FromCBOR (Value crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (Value crypto) #

label ∷ Proxy (Value crypto) → Text #

Era era ⇒ FromCBOR (PParamsUpdate era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (PParamsUpdate era) #

label ∷ Proxy (PParamsUpdate era) → Text #

Era era ⇒ FromCBOR (PParams era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (PParams era) #

label ∷ Proxy (PParams era) → Text #

(Era era, TransTxOut DecodeNonNegative era, Show (Value era)) ⇒ FromCBOR (TxOut era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxOut era) #

label ∷ Proxy (TxOut era) → Text #

Era era ⇒ FromCBOR (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (PParams era) #

label ∷ Proxy (PParams era) → Text #

Era era ⇒ FromCBOR (PParamsUpdate era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (PParamsUpdate era) #

label ∷ Proxy (PParamsUpdate era) → Text #

FamsFrom era ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

(FromCBOR (PParams era), TransValue FromCBOR era, HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era), FromCBOR (TxOut era), FromCBOR (State (EraRule "PPUP" era)), Era era) ⇒ FromCBOR (EpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (EpochState era) #

label ∷ Proxy (EpochState era) → Text #

(Era era, HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era), FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (State (EraRule "PPUP" era))) ⇒ FromCBOR (LedgerState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (LedgerState era) #

label ∷ Proxy (LedgerState era) → Text #

(TransValue FromCBOR era, FromCBOR (State (EraRule "PPUP" era)), FromCBOR (TxOut era), HashAnnotated (TxBody era) EraIndependentTxBody (Crypto era)) ⇒ FromCBOR (UTxOState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (UTxOState era) #

label ∷ Proxy (UTxOState era) → Text #

Crypto crypto ⇒ FromCBOR (DPState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (DPState crypto) #

label ∷ Proxy (DPState crypto) → Text #

(Era era, FromCBOR (PParams era), FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (State (EraRule "PPUP" era))) ⇒ FromCBOR (NewEpochState era) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (NewEpochState era) #

label ∷ Proxy (NewEpochState era) → Text #

Crypto crypto ⇒ FromCBOR (TxIn crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxIn crypto) #

label ∷ Proxy (TxIn crypto) → Text #

Crypto crypto ⇒ FromCBOR (CompactAddr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.CompactAddr

Methods

fromCBOR ∷ Decoder s (CompactAddr crypto) #

label ∷ Proxy (CompactAddr crypto) → Text #

Crypto crypto ⇒ FromCBOR (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (BlocksMade crypto) #

label ∷ Proxy (BlocksMade crypto) → Text #

Crypto crypto ⇒ FromCBOR (SnapShots crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (SnapShots crypto) #

label ∷ Proxy (SnapShots crypto) → Text #

Crypto crypto ⇒ FromCBOR (NonMyopic crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s (NonMyopic crypto) #

label ∷ Proxy (NonMyopic crypto) → Text #

Crypto crypto ⇒ FromCBOR (PulsingRewUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (PulsingRewUpdate crypto) #

label ∷ Proxy (PulsingRewUpdate crypto) → Text #

Crypto crypto ⇒ FromCBOR (PoolDistr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

fromCBOR ∷ Decoder s (PoolDistr crypto) #

label ∷ Proxy (PoolDistr crypto) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (ProposedPPUpdates era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (ProposedPPUpdates era) #

label ∷ Proxy (ProposedPPUpdates era) → Text #

Era era ⇒ FromCBOR (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

fromCBOR ∷ Decoder s (ShelleyGenesis era) #

label ∷ Proxy (ShelleyGenesis era) → Text #

Crypto crypto ⇒ FromCBOR (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (GenDelegPair crypto) #

label ∷ Proxy (GenDelegPair crypto) → Text #

Crypto crypto ⇒ FromCBOR (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

fromCBOR ∷ Decoder s (Addr crypto) #

label ∷ Proxy (Addr crypto) → Text #

Crypto crypto ⇒ FromCBOR (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

fromCBOR ∷ Decoder s (ShelleyGenesisStaking crypto) #

label ∷ Proxy (ShelleyGenesisStaking crypto) → Text #

FromCBOR (CompactForm Coin) 
Instance details

Defined in Cardano.Ledger.Coin

Methods

fromCBOR ∷ Decoder s (CompactForm Coin) #

label ∷ Proxy (CompactForm Coin) → Text #

Crypto crypto ⇒ FromCBOR (CompactForm (Value crypto)) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (CompactForm (Value crypto)) #

label ∷ Proxy (CompactForm (Value crypto)) → Text #

(FromCBOR (TxOut era), Era era) ⇒ FromCBOR (UTxO era) 
Instance details

Defined in Shelley.Spec.Ledger.UTxO

Methods

fromCBOR ∷ Decoder s (UTxO era) #

label ∷ Proxy (UTxO era) → Text #

(Era era, FromCBOR (PParamsDelta era)) ⇒ FromCBOR (Update era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

fromCBOR ∷ Decoder s (Update era) #

label ∷ Proxy (Update era) → Text #

(Era era, DecodeNonNegative (Value era), Show (Value era), Compactible (Value era)) ⇒ FromCBOR (TxOut era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (TxOut era) #

label ∷ Proxy (TxOut era) → Text #

Crypto crypto ⇒ FromCBOR (PolicyID crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (PolicyID crypto) #

label ∷ Proxy (PolicyID crypto) → Text #

(ShelleyBased era, FromCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ FromCBOR (ApplyTxError era) 
Instance details

Defined in Shelley.Spec.Ledger.API.Mempool

Methods

fromCBOR ∷ Decoder s (ApplyTxError era) #

label ∷ Proxy (ApplyTxError era) → Text #

(FromCBOR (PredicateFailure (EraRule "DELEGS" era)), FromCBOR (PredicateFailure (EraRule "UTXOW" era)), Era era) ⇒ FromCBOR (LedgerPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledger

Methods

fromCBOR ∷ Decoder s (LedgerPredicateFailure era) #

label ∷ Proxy (LedgerPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "DELPL" era)), Typeable (Script era)) ⇒ FromCBOR (DelegsPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delegs

Methods

fromCBOR ∷ Decoder s (DelegsPredicateFailure era) #

label ∷ Proxy (DelegsPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "POOL" era)), FromCBOR (PredicateFailure (EraRule "DELEG" era)), Typeable (Script era)) ⇒ FromCBOR (DelplPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Delpl

Methods

fromCBOR ∷ Decoder s (DelplPredicateFailure era) #

label ∷ Proxy (DelplPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (PState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (PState crypto) #

label ∷ Proxy (PState crypto) → Text #

Crypto crypto ⇒ FromCBOR (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (PoolParams crypto) #

label ∷ Proxy (PoolParams crypto) → Text #

Crypto crypto ⇒ FromCBOR (InstantaneousRewards crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (InstantaneousRewards crypto) #

label ∷ Proxy (InstantaneousRewards crypto) → Text #

Crypto crypto ⇒ FromCBOR (SnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (SnapShot crypto) #

label ∷ Proxy (SnapShot crypto) → Text #

Crypto crypto ⇒ FromCBOR (ChainDepState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.API.Protocol

Methods

fromCBOR ∷ Decoder s (ChainDepState crypto) #

label ∷ Proxy (ChainDepState crypto) → Text #

Crypto crypto ⇒ FromCBOR (FutureGenDeleg crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (FutureGenDeleg crypto) #

label ∷ Proxy (FutureGenDeleg crypto) → Text #

Crypto crypto ⇒ FromCBOR (DState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.LedgerState

Methods

fromCBOR ∷ Decoder s (DState crypto) #

label ∷ Proxy (DState crypto) → Text #

Crypto crypto ⇒ FromCBOR (IndividualPoolStake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Delegation.Certificates

Methods

fromCBOR ∷ Decoder s (IndividualPoolStake crypto) #

label ∷ Proxy (IndividualPoolStake crypto) → Text #

(TransValue FromCBOR era, TransUTxO FromCBOR era, DecodeNonNegative (Value era), Show (Value era), FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.ShelleyMA.Rules.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (Script era), Typeable (AuxiliaryData era)) ⇒ FromCBOR (UtxowPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxow

Methods

fromCBOR ∷ Decoder s (UtxowPredicateFailure era) #

label ∷ Proxy (UtxowPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s (RewardProvenance crypto) #

label ∷ Proxy (RewardProvenance crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

fromCBOR ∷ Decoder s (RewardProvenancePool crypto) #

label ∷ Proxy (RewardProvenancePool crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

fromCBOR ∷ Decoder s (RewardAcnt crypto) #

label ∷ Proxy (RewardAcnt crypto) → Text #

Crypto crypto ⇒ FromCBOR (TxId crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxId crypto) #

label ∷ Proxy (TxId crypto) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (SigKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (SigKES (SingleKES d)) #

label ∷ Proxy (SigKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (SigKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (SigKES (SumKES h d)) #

label ∷ Proxy (SigKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (SigKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (SigKES (MockKES t)) #

label ∷ Proxy (SigKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (SigKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (SigKES (SimpleKES d t)) #

label ∷ Proxy (SigKES (SimpleKES d t)) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (VerKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SingleKES d)) #

label ∷ Proxy (VerKeyKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (VerKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SumKES h d)) #

label ∷ Proxy (VerKeyKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (VerKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyKES (MockKES t)) #

label ∷ Proxy (VerKeyKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (VerKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (VerKeyKES (SimpleKES d t)) #

label ∷ Proxy (VerKeyKES (SimpleKES d t)) → Text #

DSIGNAlgorithm d ⇒ FromCBOR (SignKeyKES (SingleKES d)) 
Instance details

Defined in Cardano.Crypto.KES.Single

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SingleKES d)) #

label ∷ Proxy (SignKeyKES (SingleKES d)) → Text #

(KESAlgorithm d, HashAlgorithm h, Typeable d) ⇒ FromCBOR (SignKeyKES (SumKES h d)) 
Instance details

Defined in Cardano.Crypto.KES.Sum

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SumKES h d)) #

label ∷ Proxy (SignKeyKES (SumKES h d)) → Text #

KnownNat t ⇒ FromCBOR (SignKeyKES (MockKES t)) 
Instance details

Defined in Cardano.Crypto.KES.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyKES (MockKES t)) #

label ∷ Proxy (SignKeyKES (MockKES t)) → Text #

(DSIGNAlgorithm d, Typeable d, KnownNat t, KnownNat (SeedSizeDSIGN d * t)) ⇒ FromCBOR (SignKeyKES (SimpleKES d t)) 
Instance details

Defined in Cardano.Crypto.KES.Simple

Methods

fromCBOR ∷ Decoder s (SignKeyKES (SimpleKES d t)) #

label ∷ Proxy (SignKeyKES (SimpleKES d t)) → Text #

Crypto c ⇒ FromCBOR (ShelleyHash c) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Block

Methods

fromCBOR ∷ Decoder s (ShelleyHash c) #

label ∷ Proxy (ShelleyHash c) → Text #

Era era ⇒ FromCBOR (CompactGenesis era) 
Instance details

Defined in Ouroboros.Consensus.Shelley.Ledger.Config

Methods

fromCBOR ∷ Decoder s (CompactGenesis era) #

label ∷ Proxy (CompactGenesis era) → Text #

FromCBOR (ATxAux ByteSpan) 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

fromCBOR ∷ Decoder s (ATxAux ByteSpan) #

label ∷ Proxy (ATxAux ByteSpan) → Text #

FromCBOR (ACertificate ByteSpan) 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

fromCBOR ∷ Decoder s (ACertificate ByteSpan) #

label ∷ Proxy (ACertificate ByteSpan) → Text #

FromCBOR (AProposal ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

fromCBOR ∷ Decoder s (AProposal ByteSpan) #

label ∷ Proxy (AProposal ByteSpan) → Text #

FromCBOR (AVote ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

fromCBOR ∷ Decoder s (AVote ByteSpan) #

label ∷ Proxy (AVote ByteSpan) → Text #

Crypto crypto ⇒ FromCBOR (BHBody crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (BHBody crypto) #

label ∷ Proxy (BHBody crypto) → Text #

Crypto crypto ⇒ FromCBOR (PrevHash crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (PrevHash crypto) #

label ∷ Proxy (PrevHash crypto) → Text #

Crypto crypto ⇒ FromCBOR (HashHeader crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (HashHeader crypto) #

label ∷ Proxy (HashHeader crypto) → Text #

Crypto crypto ⇒ FromCBOR (PrtclState crypto) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Prtcl

Methods

fromCBOR ∷ Decoder s (PrtclState crypto) #

label ∷ Proxy (PrtclState crypto) → Text #

Typeable v ⇒ FromCBOR (OutputVRF v) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

fromCBOR ∷ Decoder s (OutputVRF v) #

label ∷ Proxy (OutputVRF v) → Text #

FromCBOR (CertVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (CertVRF PraosVRF) #

label ∷ Proxy (CertVRF PraosVRF) → Text #

FromCBOR (CertVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (CertVRF MockVRF) #

label ∷ Proxy (CertVRF MockVRF) → Text #

FromCBOR (CertVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (CertVRF SimpleVRF) #

label ∷ Proxy (CertVRF SimpleVRF) → Text #

FromCBOR (SignKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (SignKeyVRF PraosVRF) #

label ∷ Proxy (SignKeyVRF PraosVRF) → Text #

FromCBOR (SignKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (SignKeyVRF MockVRF) #

label ∷ Proxy (SignKeyVRF MockVRF) → Text #

FromCBOR (SignKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (SignKeyVRF SimpleVRF) #

label ∷ Proxy (SignKeyVRF SimpleVRF) → Text #

FromCBOR (VerKeyVRF PraosVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Praos

Methods

fromCBOR ∷ Decoder s (VerKeyVRF PraosVRF) #

label ∷ Proxy (VerKeyVRF PraosVRF) → Text #

FromCBOR (VerKeyVRF MockVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Mock

Methods

fromCBOR ∷ Decoder s (VerKeyVRF MockVRF) #

label ∷ Proxy (VerKeyVRF MockVRF) → Text #

FromCBOR (VerKeyVRF SimpleVRF) 
Instance details

Defined in Cardano.Crypto.VRF.Simple

Methods

fromCBOR ∷ Decoder s (VerKeyVRF SimpleVRF) #

label ∷ Proxy (VerKeyVRF SimpleVRF) → Text #

Typeable a ⇒ FromCBOR (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

fromCBOR ∷ Decoder s (RedeemSignature a) #

label ∷ Proxy (RedeemSignature a) → Text #

Typeable a ⇒ FromCBOR (Signature a) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

fromCBOR ∷ Decoder s (Signature a) #

label ∷ Proxy (Signature a) → Text #

Typeable era ⇒ FromCBOR (LangDepView era) 
Instance details

Defined in Cardano.Ledger.Alonzo.PParams

Methods

fromCBOR ∷ Decoder s (LangDepView era) #

label ∷ Proxy (LangDepView era) → Text #

Crypto crypto ⇒ FromCBOR (CollectError crypto) 
Instance details

Defined in Cardano.Ledger.Alonzo.PlutusScriptApi

Methods

fromCBOR ∷ Decoder s (CollectError crypto) #

label ∷ Proxy (CollectError crypto) → Text #

(Typeable c, Crypto c) ⇒ FromCBOR (ScriptPurpose c) 
Instance details

Defined in Cardano.Ledger.Alonzo.Tx

Methods

fromCBOR ∷ Decoder s (ScriptPurpose c) #

label ∷ Proxy (ScriptPurpose c) → Text #

Crypto crypto ⇒ FromCBOR (Wdrl crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (Wdrl crypto) #

label ∷ Proxy (Wdrl crypto) → Text #

Crypto crypto ⇒ FromCBOR (DCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (DCert crypto) #

label ∷ Proxy (DCert crypto) → Text #

(Typeable era, FromCBOR (BbodyPredicateFailure era)) ⇒ FromCBOR (AlonzoBbodyPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Bbody

Methods

fromCBOR ∷ Decoder s (AlonzoBbodyPredFail era) #

label ∷ Proxy (AlonzoBbodyPredFail era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "UTXO" era)), Typeable (Script era), Typeable (AuxiliaryData era)) ⇒ FromCBOR (AlonzoPredFail era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxow

Methods

fromCBOR ∷ Decoder s (AlonzoPredFail era) #

label ∷ Proxy (AlonzoPredFail era) → Text #

Crypto crypto ⇒ FromCBOR (GenDelegs crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (GenDelegs crypto) #

label ∷ Proxy (GenDelegs crypto) → Text #

(Era era, FromCBOR (TxOut era), FromCBOR (Value era), FromCBOR (PredicateFailure (EraRule "UTXOS" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

(Era era, FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxosPredicateFailure era) 
Instance details

Defined in Cardano.Ledger.Alonzo.Rules.Utxos

Methods

fromCBOR ∷ Decoder s (UtxosPredicateFailure era) #

label ∷ Proxy (UtxosPredicateFailure era) → Text #

Era era ⇒ FromCBOR (PpupPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ppup

Methods

fromCBOR ∷ Decoder s (PpupPredicateFailure era) #

label ∷ Proxy (PpupPredicateFailure era) → Text #

(Era era, Typeable (Script era), Typeable (AuxiliaryData era), Compactible (Value era), Show (Value era), DecodeNonNegative (Value era), FromCBOR (Annotator (Script era)), FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Cardano.Ledger.Alonzo.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

FromCBOR (ABody ByteSpan) 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

fromCBOR ∷ Decoder s (ABody ByteSpan) #

label ∷ Proxy (ABody ByteSpan) → Text #

FromCBOR (APayload ByteSpan) 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

fromCBOR ∷ Decoder s (APayload ByteSpan) #

label ∷ Proxy (APayload ByteSpan) → Text #

FromCBOR (ABlockSignature ByteSpan) 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

fromCBOR ∷ Decoder s (ABlockSignature ByteSpan) #

label ∷ Proxy (ABlockSignature ByteSpan) → Text #

FromCBOR (ATxPayload ByteSpan) 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

fromCBOR ∷ Decoder s (ATxPayload ByteSpan) #

label ∷ Proxy (ATxPayload ByteSpan) → Text #

FromCBOR (APayload ByteSpan) 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

fromCBOR ∷ Decoder s (APayload ByteSpan) #

label ∷ Proxy (APayload ByteSpan) → Text #

FromCBOR (Attributes ()) 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

fromCBOR ∷ Decoder s (Attributes ()) #

label ∷ Proxy (Attributes ()) → Text #

FromCBOR (Attributes AddrAttributes) 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

fromCBOR ∷ Decoder s (Attributes AddrAttributes) #

label ∷ Proxy (Attributes AddrAttributes) → Text #

FromCBOR a ⇒ FromCBOR (MerkleRoot a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

fromCBOR ∷ Decoder s (MerkleRoot a) #

label ∷ Proxy (MerkleRoot a) → Text #

(FromCBOR a, ToCBOR a) ⇒ FromCBOR (MerkleTree a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

fromCBOR ∷ Decoder s (MerkleTree a) #

label ∷ Proxy (MerkleTree a) → Text #

FromCBOR n ⇒ FromCBOR (TooLarge n) 
Instance details

Defined in Cardano.Chain.Update.Validation.Registration

Methods

fromCBOR ∷ Decoder s (TooLarge n) #

label ∷ Proxy (TooLarge n) → Text #

Crypto crypto ⇒ FromCBOR (CompactValue crypto) 
Instance details

Defined in Cardano.Ledger.Mary.Value

Methods

fromCBOR ∷ Decoder s (CompactValue crypto) #

label ∷ Proxy (CompactValue crypto) → Text #

Crypto crypto ⇒ FromCBOR (LastAppliedBlock crypto) 
Instance details

Defined in Shelley.Spec.Ledger.BlockChain

Methods

fromCBOR ∷ Decoder s (LastAppliedBlock crypto) #

label ∷ Proxy (LastAppliedBlock crypto) → Text #

(FromCBORGroup a, ToCBORGroup a) ⇒ FromCBOR (CBORGroup a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

fromCBOR ∷ Decoder s (CBORGroup a) #

label ∷ Proxy (CBORGroup a) → Text #

Crypto crypto ⇒ FromCBOR (MIRCert crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (MIRCert crypto) #

label ∷ Proxy (MIRCert crypto) → Text #

Crypto crypto ⇒ FromCBOR (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (StakeCreds crypto) #

label ∷ Proxy (StakeCreds crypto) → Text #

Crypto crypto ⇒ FromCBOR (Stake crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

fromCBOR ∷ Decoder s (Stake crypto) #

label ∷ Proxy (Stake crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardSnapShot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardSnapShot crypto) #

label ∷ Proxy (RewardSnapShot crypto) → Text #

Crypto crypto ⇒ FromCBOR (RewardUpdate crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardUpdate crypto) #

label ∷ Proxy (RewardUpdate crypto) → Text #

Crypto c ⇒ FromCBOR (RewardAns c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (RewardAns c) #

label ∷ Proxy (RewardAns c) → Text #

Crypto c ⇒ FromCBOR (Pulser c) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (Pulser c) #

label ∷ Proxy (Pulser c) → Text #

Crypto crypto ⇒ FromCBOR (OBftSlot crypto) 
Instance details

Defined in Shelley.Spec.Ledger.OverlaySchedule

Methods

fromCBOR ∷ Decoder s (OBftSlot crypto) #

label ∷ Proxy (OBftSlot crypto) → Text #

Crypto crypto ⇒ FromCBOR (FreeVars crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardUpdate

Methods

fromCBOR ∷ Decoder s (FreeVars crypto) #

label ∷ Proxy (FreeVars crypto) → Text #

Crypto crypto ⇒ FromCBOR (Reward crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Rewards

Methods

fromCBOR ∷ Decoder s (Reward crypto) #

label ∷ Proxy (Reward crypto) → Text #

(Era era, Typeable (Script era)) ⇒ FromCBOR (DelegPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Deleg

Methods

fromCBOR ∷ Decoder s (DelegPredicateFailure era) #

label ∷ Proxy (DelegPredicateFailure era) → Text #

Era era ⇒ FromCBOR (PoolPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Pool

Methods

fromCBOR ∷ Decoder s (PoolPredicateFailure era) #

label ∷ Proxy (PoolPredicateFailure era) → Text #

(ShelleyBased era, FromCBOR (PredicateFailure (EraRule "LEDGER" era))) ⇒ FromCBOR (LedgersPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Ledgers

Methods

fromCBOR ∷ Decoder s (LedgersPredicateFailure era) #

label ∷ Proxy (LedgersPredicateFailure era) → Text #

(TransValue FromCBOR era, TransUTxO FromCBOR era, DecodeNonNegative (Value era), Show (Value era), FromCBOR (PredicateFailure (EraRule "PPUP" era))) ⇒ FromCBOR (UtxoPredicateFailure era) 
Instance details

Defined in Shelley.Spec.Ledger.STS.Utxo

Methods

fromCBOR ∷ Decoder s (UtxoPredicateFailure era) #

label ∷ Proxy (UtxoPredicateFailure era) → Text #

Crypto crypto ⇒ FromCBOR (MIRTarget crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (MIRTarget crypto) #

label ∷ Proxy (MIRTarget crypto) → Text #

(FromCBOR (TxOut era), Era era, FromCBOR (PParamsDelta era), ToCBOR (PParamsDelta era)) ⇒ FromCBOR (TxBodyRaw era) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

fromCBOR ∷ Decoder s (TxBodyRaw era) #

label ∷ Proxy (TxBodyRaw era) → Text #

FromCBOR a ⇒ FromCBOR (CborSeq a) 
Instance details

Defined in Cardano.Ledger.Serialization

Methods

fromCBOR ∷ Decoder s (CborSeq a) #

label ∷ Proxy (CborSeq a) → Text #

FromCBOR (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakePoolKey) #

label ∷ Proxy (VerificationKey StakePoolKey) → Text #

FromCBOR (VerificationKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisUTxOKey) #

label ∷ Proxy (VerificationKey GenesisUTxOKey) → Text #

FromCBOR (VerificationKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateExtendedKey) #

label ∷ Proxy (VerificationKey GenesisDelegateExtendedKey) → Text #

FromCBOR (VerificationKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisDelegateKey) #

label ∷ Proxy (VerificationKey GenesisDelegateKey) → Text #

FromCBOR (VerificationKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisExtendedKey) #

label ∷ Proxy (VerificationKey GenesisExtendedKey) → Text #

FromCBOR (VerificationKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey GenesisKey) #

label ∷ Proxy (VerificationKey GenesisKey) → Text #

FromCBOR (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeExtendedKey) #

label ∷ Proxy (VerificationKey StakeExtendedKey) → Text #

FromCBOR (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey StakeKey) #

label ∷ Proxy (VerificationKey StakeKey) → Text #

FromCBOR (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentExtendedKey) #

label ∷ Proxy (VerificationKey PaymentExtendedKey) → Text #

FromCBOR (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (VerificationKey PaymentKey) #

label ∷ Proxy (VerificationKey PaymentKey) → Text #

FromCBOR (VerificationKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKeyLegacy) #

label ∷ Proxy (VerificationKey ByronKeyLegacy) → Text #

FromCBOR (VerificationKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (VerificationKey ByronKey) #

label ∷ Proxy (VerificationKey ByronKey) → Text #

FromCBOR (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey VrfKey) #

label ∷ Proxy (VerificationKey VrfKey) → Text #

FromCBOR (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (VerificationKey KesKey) #

label ∷ Proxy (VerificationKey KesKey) → Text #

FromCBOR (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakePoolKey) #

label ∷ Proxy (SigningKey StakePoolKey) → Text #

FromCBOR (SigningKey GenesisUTxOKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisUTxOKey) #

label ∷ Proxy (SigningKey GenesisUTxOKey) → Text #

FromCBOR (SigningKey GenesisDelegateExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateExtendedKey) #

label ∷ Proxy (SigningKey GenesisDelegateExtendedKey) → Text #

FromCBOR (SigningKey GenesisDelegateKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisDelegateKey) #

label ∷ Proxy (SigningKey GenesisDelegateKey) → Text #

FromCBOR (SigningKey GenesisExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisExtendedKey) #

label ∷ Proxy (SigningKey GenesisExtendedKey) → Text #

FromCBOR (SigningKey GenesisKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey GenesisKey) #

label ∷ Proxy (SigningKey GenesisKey) → Text #

FromCBOR (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeExtendedKey) #

label ∷ Proxy (SigningKey StakeExtendedKey) → Text #

FromCBOR (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey StakeKey) #

label ∷ Proxy (SigningKey StakeKey) → Text #

FromCBOR (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentExtendedKey) #

label ∷ Proxy (SigningKey PaymentExtendedKey) → Text #

FromCBOR (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

fromCBOR ∷ Decoder s (SigningKey PaymentKey) #

label ∷ Proxy (SigningKey PaymentKey) → Text #

FromCBOR (SigningKey ByronKeyLegacy) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKeyLegacy) #

label ∷ Proxy (SigningKey ByronKeyLegacy) → Text #

FromCBOR (SigningKey ByronKey) Source # 
Instance details

Defined in Cardano.Api.KeysByron

Methods

fromCBOR ∷ Decoder s (SigningKey ByronKey) #

label ∷ Proxy (SigningKey ByronKey) → Text #

FromCBOR (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey VrfKey) #

label ∷ Proxy (SigningKey VrfKey) → Text #

FromCBOR (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

fromCBOR ∷ Decoder s (SigningKey KesKey) #

label ∷ Proxy (SigningKey KesKey) → Text #

Typeable lang ⇒ FromCBOR (PlutusScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

fromCBOR ∷ Decoder s (PlutusScript lang) #

label ∷ Proxy (PlutusScript lang) → Text #

(Typeable era, TransLedgerState FromCBOR (ShelleyLedgerEra era)) ⇒ FromCBOR (DebugLedgerState era) Source # 
Instance details

Defined in Cardano.Api.Query

Methods

fromCBOR ∷ Decoder s (DebugLedgerState era) #

label ∷ Proxy (DebugLedgerState era) → Text #

(FromCBOR a, FromCBOR b) ⇒ FromCBOR (Either a b) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Either a b) #

label ∷ Proxy (Either a b) → Text #

(FromCBOR a, FromCBOR b) ⇒ FromCBOR (a, b) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b) #

label ∷ Proxy (a, b) → Text #

(Ord k, FromCBOR k, FromCBOR v) ⇒ FromCBOR (Map k v) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (Map k v) #

label ∷ Proxy (Map k v) → Text #

(HashAlgorithm h, Typeable a) ⇒ FromCBOR (Hash h a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

fromCBOR ∷ Decoder s (Hash h a) #

label ∷ Proxy (Hash h a) → Text #

(Crypto crypto, Typeable disc) ⇒ FromCBOR (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (KeyHash disc crypto) #

label ∷ Proxy (KeyHash disc crypto) → Text #

(Typeable index, Crypto c) ⇒ FromCBOR (SafeHash c index) 
Instance details

Defined in Cardano.Ledger.SafeHash

Methods

fromCBOR ∷ Decoder s (SafeHash c index) #

label ∷ Proxy (SafeHash c index) → Text #

(Typeable kr, Crypto crypto) ⇒ FromCBOR (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

fromCBOR ∷ Decoder s (Credential kr crypto) #

label ∷ Proxy (Credential kr crypto) → Text #

(Typeable algo, Typeable a, HashAlgorithm algo) ⇒ FromCBOR (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

fromCBOR ∷ Decoder s (AbstractHash algo a) #

label ∷ Proxy (AbstractHash algo a) → Text #

(Crypto crypto, Typeable kd) ⇒ FromCBOR (VKey kd crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

fromCBOR ∷ Decoder s (VKey kd crypto) #

label ∷ Proxy (VKey kd crypto) → Text #

(VRFAlgorithm v, Typeable a) ⇒ FromCBOR (CertifiedVRF v a) 
Instance details

Defined in Cardano.Crypto.VRF.Class

Methods

fromCBOR ∷ Decoder s (CertifiedVRF v a) #

label ∷ Proxy (CertifiedVRF v a) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c) ⇒ FromCBOR (a, b, c) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c) #

label ∷ Proxy (a, b, c) → Text #

(Typeable s, FromCBOR a) ⇒ FromCBOR (Tagged s a) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s0 (Tagged s a) #

label ∷ Proxy (Tagged s a) → Text #

(Ord a, Ord b, FromCBOR a, FromCBOR b) ⇒ FromCBOR (BiMap b a b) 
Instance details

Defined in Control.Iterate.SetAlgebra

Methods

fromCBOR ∷ Decoder s (BiMap b a b) #

label ∷ Proxy (BiMap b a b) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d) ⇒ FromCBOR (a, b, c, d) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d) #

label ∷ Proxy (a, b, c, d) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d, FromCBOR e) ⇒ FromCBOR (a, b, c, d, e) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d, e) #

label ∷ Proxy (a, b, c, d, e) → Text #

(FromCBOR a, FromCBOR b, FromCBOR c, FromCBOR d, FromCBOR e, FromCBOR f, FromCBOR g) ⇒ FromCBOR (a, b, c, d, e, f, g) 
Instance details

Defined in Cardano.Binary.FromCBOR

Methods

fromCBOR ∷ Decoder s (a, b, c, d, e, f, g) #

label ∷ Proxy (a, b, c, d, e, f, g) → Text #

serialiseToCBOR ∷ SerialiseAsCBOR a ⇒ a → ByteString Source #

deserialiseFromCBOR ∷ SerialiseAsCBOR a ⇒ AsType a → ByteString → Either DecoderError a Source #

JSON

class ToJSON a #

Instances

Instances details
ToJSON Bool 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Bool → Value #

toEncoding ∷ Bool → Encoding #

toJSONList ∷ [Bool] → Value #

toEncodingList ∷ [Bool] → Encoding #

ToJSON Char 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Char → Value #

toEncoding ∷ Char → Encoding #

toJSONList ∷ [Char] → Value #

toEncodingList ∷ [Char] → Encoding #

ToJSON Double 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Double → Value #

toEncoding ∷ Double → Encoding #

toJSONList ∷ [Double] → Value #

toEncodingList ∷ [Double] → Encoding #

ToJSON Float 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Float → Value #

toEncoding ∷ Float → Encoding #

toJSONList ∷ [Float] → Value #

toEncodingList ∷ [Float] → Encoding #

ToJSON Int 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Int → Value #

toEncoding ∷ Int → Encoding #

toJSONList ∷ [Int] → Value #

toEncodingList ∷ [Int] → Encoding #

ToJSON Int8 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Int8 → Value #

toEncoding ∷ Int8 → Encoding #

toJSONList ∷ [Int8] → Value #

toEncodingList ∷ [Int8] → Encoding #

ToJSON Int16 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Int16 → Value #

toEncoding ∷ Int16 → Encoding #

toJSONList ∷ [Int16] → Value #

toEncodingList ∷ [Int16] → Encoding #

ToJSON Int32 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Int32 → Value #

toEncoding ∷ Int32 → Encoding #

toJSONList ∷ [Int32] → Value #

toEncodingList ∷ [Int32] → Encoding #

ToJSON Int64 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Int64 → Value #

toEncoding ∷ Int64 → Encoding #

toJSONList ∷ [Int64] → Value #

toEncodingList ∷ [Int64] → Encoding #

ToJSON Integer 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Integer → Value #

toEncoding ∷ Integer → Encoding #

toJSONList ∷ [Integer] → Value #

toEncodingList ∷ [Integer] → Encoding #

ToJSON Natural 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Natural → Value #

toEncoding ∷ Natural → Encoding #

toJSONList ∷ [Natural] → Value #

toEncodingList ∷ [Natural] → Encoding #

ToJSON Ordering 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Ordering → Value #

toEncoding ∷ Ordering → Encoding #

toJSONList ∷ [Ordering] → Value #

toEncodingList ∷ [Ordering] → Encoding #

ToJSON Word 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Word → Value #

toEncoding ∷ Word → Encoding #

toJSONList ∷ [Word] → Value #

toEncodingList ∷ [Word] → Encoding #

ToJSON Word8 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Word8 → Value #

toEncoding ∷ Word8 → Encoding #

toJSONList ∷ [Word8] → Value #

toEncodingList ∷ [Word8] → Encoding #

ToJSON Word16 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Word16 → Value #

toEncoding ∷ Word16 → Encoding #

toJSONList ∷ [Word16] → Value #

toEncodingList ∷ [Word16] → Encoding #

ToJSON Word32 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Word32 → Value #

toEncoding ∷ Word32 → Encoding #

toJSONList ∷ [Word32] → Value #

toEncodingList ∷ [Word32] → Encoding #

ToJSON Word64 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Word64 → Value #

toEncoding ∷ Word64 → Encoding #

toJSONList ∷ [Word64] → Value #

toEncodingList ∷ [Word64] → Encoding #

ToJSON () 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ () → Value #

toEncoding ∷ () → Encoding #

toJSONList ∷ [()] → Value #

toEncodingList ∷ [()] → Encoding #

ToJSON Version 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Version → Value #

toEncoding ∷ Version → Encoding #

toJSONList ∷ [Version] → Value #

toEncodingList ∷ [Version] → Encoding #

ToJSON Void 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Void → Value #

toEncoding ∷ Void → Encoding #

toJSONList ∷ [Void] → Value #

toEncodingList ∷ [Void] → Encoding #

ToJSON CTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ CTime → Value #

toEncoding ∷ CTime → Encoding #

toJSONList ∷ [CTime] → Value #

toEncodingList ∷ [CTime] → Encoding #

ToJSON IntSet 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ IntSet → Value #

toEncoding ∷ IntSet → Encoding #

toJSONList ∷ [IntSet] → Value #

toEncodingList ∷ [IntSet] → Encoding #

ToJSON Text 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Text → Value #

toEncoding ∷ Text → Encoding #

toJSONList ∷ [Text] → Value #

toEncodingList ∷ [Text] → Encoding #

ToJSON Text 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Text → Value #

toEncoding ∷ Text → Encoding #

toJSONList ∷ [Text] → Value #

toEncodingList ∷ [Text] → Encoding #

ToJSON ZonedTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ ZonedTime → Value #

toEncoding ∷ ZonedTime → Encoding #

toJSONList ∷ [ZonedTime] → Value #

toEncodingList ∷ [ZonedTime] → Encoding #

ToJSON LocalTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ LocalTime → Value #

toEncoding ∷ LocalTime → Encoding #

toJSONList ∷ [LocalTime] → Value #

toEncodingList ∷ [LocalTime] → Encoding #

ToJSON TimeOfDay 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ TimeOfDay → Value #

toEncoding ∷ TimeOfDay → Encoding #

toJSONList ∷ [TimeOfDay] → Value #

toEncodingList ∷ [TimeOfDay] → Encoding #

ToJSON CalendarDiffTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ CalendarDiffTime → Value #

toEncoding ∷ CalendarDiffTime → Encoding #

toJSONList ∷ [CalendarDiffTime] → Value #

toEncodingList ∷ [CalendarDiffTime] → Encoding #

ToJSON UTCTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ UTCTime → Value #

toEncoding ∷ UTCTime → Encoding #

toJSONList ∷ [UTCTime] → Value #

toEncodingList ∷ [UTCTime] → Encoding #

ToJSON SystemTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ SystemTime → Value #

toEncoding ∷ SystemTime → Encoding #

toJSONList ∷ [SystemTime] → Value #

toEncodingList ∷ [SystemTime] → Encoding #

ToJSON NominalDiffTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ NominalDiffTime → Value #

toEncoding ∷ NominalDiffTime → Encoding #

toJSONList ∷ [NominalDiffTime] → Value #

toEncodingList ∷ [NominalDiffTime] → Encoding #

ToJSON DiffTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ DiffTime → Value #

toEncoding ∷ DiffTime → Encoding #

toJSONList ∷ [DiffTime] → Value #

toEncodingList ∷ [DiffTime] → Encoding #

ToJSON DayOfWeek 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ DayOfWeek → Value #

toEncoding ∷ DayOfWeek → Encoding #

toJSONList ∷ [DayOfWeek] → Value #

toEncodingList ∷ [DayOfWeek] → Encoding #

ToJSON Day 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Day → Value #

toEncoding ∷ Day → Encoding #

toJSONList ∷ [Day] → Value #

toEncodingList ∷ [Day] → Encoding #

ToJSON CalendarDiffDays 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ CalendarDiffDays → Value #

toEncoding ∷ CalendarDiffDays → Encoding #

toJSONList ∷ [CalendarDiffDays] → Value #

toEncodingList ∷ [CalendarDiffDays] → Encoding #

ToJSON Number 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Number → Value #

toEncoding ∷ Number → Encoding #

toJSONList ∷ [Number] → Value #

toEncodingList ∷ [Number] → Encoding #

ToJSON Scientific 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Scientific → Value #

toEncoding ∷ Scientific → Encoding #

toJSONList ∷ [Scientific] → Value #

toEncodingList ∷ [Scientific] → Encoding #

ToJSON DotNetTime 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ DotNetTime → Value #

toEncoding ∷ DotNetTime → Encoding #

toJSONList ∷ [DotNetTime] → Value #

toEncodingList ∷ [DotNetTime] → Encoding #

ToJSON Value 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Value → Value #

toEncoding ∷ Value → Encoding #

toJSONList ∷ [Value] → Value #

toEncodingList ∷ [Value] → Encoding #

ToJSON ByteSpan 
Instance details

Defined in Cardano.Binary.Annotated

Methods

toJSON ∷ ByteSpan → Value #

toEncoding ∷ ByteSpan → Encoding #

toJSONList ∷ [ByteSpan] → Value #

toEncodingList ∷ [ByteSpan] → Encoding #

ToJSON EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toJSON ∷ EpochNo → Value #

toEncoding ∷ EpochNo → Encoding #

toJSONList ∷ [EpochNo] → Value #

toEncodingList ∷ [EpochNo] → Encoding #

ToJSON EpochSize 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toJSON ∷ EpochSize → Value #

toEncoding ∷ EpochSize → Encoding #

toJSONList ∷ [EpochSize] → Value #

toEncodingList ∷ [EpochSize] → Encoding #

ToJSON SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

toJSON ∷ SlotNo → Value #

toEncoding ∷ SlotNo → Encoding #

toJSONList ∷ [SlotNo] → Value #

toEncodingList ∷ [SlotNo] → Encoding #

ToJSON UUID 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ UUID → Value #

toEncoding ∷ UUID → Encoding #

toJSONList ∷ [UUID] → Value #

toEncodingList ∷ [UUID] → Encoding #

ToJSON Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

toJSON ∷ Coin → Value #

toEncoding ∷ Coin → Encoding #

toJSONList ∷ [Coin] → Value #

toEncodingList ∷ [Coin] → Encoding #

ToJSON UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ UnitInterval → Value #

toEncoding ∷ UnitInterval → Encoding #

toJSONList ∷ [UnitInterval] → Value #

toEncodingList ∷ [UnitInterval] → Encoding #

ToJSON ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toJSON ∷ ProtVer → Value #

toEncoding ∷ ProtVer → Encoding #

toJSONList ∷ [ProtVer] → Value #

toEncodingList ∷ [ProtVer] → Encoding #

ToJSON AlonzoGenesis Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ AlonzoGenesis → Value #

toEncoding ∷ AlonzoGenesis → Encoding #

toJSONList ∷ [AlonzoGenesis] → Value #

toEncodingList ∷ [AlonzoGenesis] → Encoding #

ToJSON Language Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Language → Value #

toEncoding ∷ Language → Encoding #

toJSONList ∷ [Language] → Value #

toEncodingList ∷ [Language] → Encoding #

ToJSON CostModel Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ CostModel → Value #

toEncoding ∷ CostModel → Encoding #

toJSONList ∷ [CostModel] → Value #

toEncodingList ∷ [CostModel] → Encoding #

ToJSON Prices Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Prices → Value #

toEncoding ∷ Prices → Encoding #

toJSONList ∷ [Prices] → Value #

toEncodingList ∷ [Prices] → Encoding #

ToJSON ExUnits Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ ExUnits → Value #

toEncoding ∷ ExUnits → Encoding #

toJSONList ∷ [ExUnits] → Value #

toEncodingList ∷ [ExUnits] → Encoding #

ToJSON AssetClass 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

toJSON ∷ AssetClass → Value #

toEncoding ∷ AssetClass → Encoding #

toJSONList ∷ [AssetClass] → Value #

toEncodingList ∷ [AssetClass] → Encoding #

ToJSON CurrencySymbol 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

toJSON ∷ CurrencySymbol → Value #

toEncoding ∷ CurrencySymbol → Encoding #

toJSONList ∷ [CurrencySymbol] → Value #

toEncodingList ∷ [CurrencySymbol] → Encoding #

ToJSON TokenName 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

toJSON ∷ TokenName → Value #

toEncoding ∷ TokenName → Encoding #

toJSONList ∷ [TokenName] → Value #

toEncodingList ∷ [TokenName] → Encoding #

ToJSON Value 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

toJSON ∷ Value → Value0 #

toEncoding ∷ Value → Encoding #

toJSONList ∷ [Value] → Value0 #

toEncodingList ∷ [Value] → Encoding #

ToJSON MonetaryPolicyHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ MonetaryPolicyHash → Value #

toEncoding ∷ MonetaryPolicyHash → Encoding #

toJSONList ∷ [MonetaryPolicyHash] → Value #

toEncodingList ∷ [MonetaryPolicyHash] → Encoding #

ToJSON Context 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ Context → Value #

toEncoding ∷ Context → Encoding #

toJSONList ∷ [Context] → Value #

toEncodingList ∷ [Context] → Encoding #

ToJSON Datum 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ Datum → Value #

toEncoding ∷ Datum → Encoding #

toJSONList ∷ [Datum] → Value #

toEncodingList ∷ [Datum] → Encoding #

ToJSON DatumHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ DatumHash → Value #

toEncoding ∷ DatumHash → Encoding #

toJSONList ∷ [DatumHash] → Value #

toEncodingList ∷ [DatumHash] → Encoding #

ToJSON MonetaryPolicy 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ MonetaryPolicy → Value #

toEncoding ∷ MonetaryPolicy → Encoding #

toJSONList ∷ [MonetaryPolicy] → Value #

toEncodingList ∷ [MonetaryPolicy] → Encoding #

ToJSON Redeemer 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ Redeemer → Value #

toEncoding ∷ Redeemer → Encoding #

toJSONList ∷ [Redeemer] → Value #

toEncodingList ∷ [Redeemer] → Encoding #

ToJSON RedeemerHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ RedeemerHash → Value #

toEncoding ∷ RedeemerHash → Encoding #

toJSONList ∷ [RedeemerHash] → Value #

toEncodingList ∷ [RedeemerHash] → Encoding #

ToJSON Script 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ Script → Value #

toEncoding ∷ Script → Encoding #

toJSONList ∷ [Script] → Value #

toEncodingList ∷ [Script] → Encoding #

ToJSON ScriptError 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ ScriptError → Value #

toEncoding ∷ ScriptError → Encoding #

toJSONList ∷ [ScriptError] → Value #

toEncodingList ∷ [ScriptError] → Encoding #

ToJSON Validator 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ Validator → Value #

toEncoding ∷ Validator → Encoding #

toJSONList ∷ [Validator] → Value #

toEncodingList ∷ [Validator] → Encoding #

ToJSON ValidatorHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

toJSON ∷ ValidatorHash → Value #

toEncoding ∷ ValidatorHash → Encoding #

toJSONList ∷ [ValidatorHash] → Value #

toEncodingList ∷ [ValidatorHash] → Encoding #

ToJSON AssetName Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ AssetName → Value #

toEncoding ∷ AssetName → Encoding #

toJSONList ∷ [AssetName] → Value #

toEncodingList ∷ [AssetName] → Encoding #

ToJSON Likelihood Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Likelihood → Value #

toEncoding ∷ Likelihood → Encoding #

toJSONList ∷ [Likelihood] → Value #

toEncodingList ∷ [Likelihood] → Encoding #

ToJSON Ptr Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Ptr → Value #

toEncoding ∷ Ptr → Encoding #

toJSONList ∷ [Ptr] → Value #

toEncodingList ∷ [Ptr] → Encoding #

ToJSON Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ Nonce → Value #

toEncoding ∷ Nonce → Encoding #

toJSONList ∷ [Nonce] → Value #

toEncodingList ∷ [Nonce] → Encoding #

ToJSON Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toJSON ∷ Desirability → Value #

toEncoding ∷ Desirability → Encoding #

toJSONList ∷ [Desirability] → Value #

toEncodingList ∷ [Desirability] → Encoding #

ToJSON StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toJSON ∷ StakePoolRelay → Value #

toEncoding ∷ StakePoolRelay → Encoding #

toJSONList ∷ [StakePoolRelay] → Value #

toEncodingList ∷ [StakePoolRelay] → Encoding #

ToJSON PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toJSON ∷ PoolMetadata → Value #

toEncoding ∷ PoolMetadata → Encoding #

toJSONList ∷ [PoolMetadata] → Value #

toEncodingList ∷ [PoolMetadata] → Encoding #

ToJSON Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ Network → Value #

toEncoding ∷ Network → Encoding #

toJSONList ∷ [Network] → Value #

toEncodingList ∷ [Network] → Encoding #

ToJSON AnyCardanoEra Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

toJSON ∷ AnyCardanoEra → Value #

toEncoding ∷ AnyCardanoEra → Encoding #

toJSONList ∷ [AnyCardanoEra] → Value #

toEncodingList ∷ [AnyCardanoEra] → Encoding #

ToJSON Month 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Month → Value #

toEncoding ∷ Month → Encoding #

toJSONList ∷ [Month] → Value #

toEncodingList ∷ [Month] → Encoding #

ToJSON Quarter 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Quarter → Value #

toEncoding ∷ Quarter → Encoding #

toJSONList ∷ [Quarter] → Value #

toEncodingList ∷ [Quarter] → Encoding #

ToJSON QuarterOfYear 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ QuarterOfYear → Value #

toEncoding ∷ QuarterOfYear → Encoding #

toJSONList ∷ [QuarterOfYear] → Value #

toEncodingList ∷ [QuarterOfYear] → Encoding #

ToJSON EpochNumber 
Instance details

Defined in Cardano.Chain.Slotting.EpochNumber

Methods

toJSON ∷ EpochNumber → Value #

toEncoding ∷ EpochNumber → Encoding #

toJSONList ∷ [EpochNumber] → Value #

toEncodingList ∷ [EpochNumber] → Encoding #

ToJSON SlotNumber 
Instance details

Defined in Cardano.Chain.Slotting.SlotNumber

Methods

toJSON ∷ SlotNumber → Value #

toEncoding ∷ SlotNumber → Encoding #

toJSONList ∷ [SlotNumber] → Value #

toEncodingList ∷ [SlotNumber] → Encoding #

ToJSON RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toJSON ∷ RequiresNetworkMagic → Value #

toEncoding ∷ RequiresNetworkMagic → Encoding #

toJSONList ∷ [RequiresNetworkMagic] → Value #

toEncodingList ∷ [RequiresNetworkMagic] → Encoding #

ToJSON ProtocolVersion 
Instance details

Defined in Cardano.Chain.Update.ProtocolVersion

Methods

toJSON ∷ ProtocolVersion → Value #

toEncoding ∷ ProtocolVersion → Encoding #

toJSONList ∷ [ProtocolVersion] → Value #

toEncodingList ∷ [ProtocolVersion] → Encoding #

ToJSON ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toJSON ∷ ProtocolMagicId → Value #

toEncoding ∷ ProtocolMagicId → Encoding #

toJSONList ∷ [ProtocolMagicId] → Value #

toEncodingList ∷ [ProtocolMagicId] → Encoding #

ToJSON SoftwareVersion 
Instance details

Defined in Cardano.Chain.Update.SoftwareVersion

Methods

toJSON ∷ SoftwareVersion → Value #

toEncoding ∷ SoftwareVersion → Encoding #

toJSONList ∷ [SoftwareVersion] → Value #

toEncodingList ∷ [SoftwareVersion] → Encoding #

ToJSON VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

toJSON ∷ VerificationKey → Value #

toEncoding ∷ VerificationKey → Encoding #

toJSONList ∷ [VerificationKey] → Value #

toEncodingList ∷ [VerificationKey] → Encoding #

ToJSON GenesisHash 
Instance details

Defined in Cardano.Chain.Genesis.Hash

Methods

toJSON ∷ GenesisHash → Value #

toEncoding ∷ GenesisHash → Encoding #

toJSONList ∷ [GenesisHash] → Value #

toEncodingList ∷ [GenesisHash] → Encoding #

ToJSON Tx 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toJSON ∷ Tx → Value #

toEncoding ∷ Tx → Encoding #

toJSONList ∷ [Tx] → Value #

toEncodingList ∷ [Tx] → Encoding #

ToJSON ProtocolMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

toJSON ∷ ProtocolMagic → Value #

toEncoding ∷ ProtocolMagic → Encoding #

toJSONList ∷ [ProtocolMagic] → Value #

toEncodingList ∷ [ProtocolMagic] → Encoding #

ToJSON CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

toJSON ∷ CompactRedeemVerificationKey → Value #

toEncoding ∷ CompactRedeemVerificationKey → Encoding #

toJSONList ∷ [CompactRedeemVerificationKey] → Value #

toEncodingList ∷ [CompactRedeemVerificationKey] → Encoding #

ToJSON Lovelace 
Instance details

Defined in Cardano.Chain.Common.Lovelace

Methods

toJSON ∷ Lovelace → Value #

toEncoding ∷ Lovelace → Encoding #

toJSONList ∷ [Lovelace] → Value #

toEncodingList ∷ [Lovelace] → Encoding #

ToJSON ByteString64 
Instance details

Defined in Data.ByteString.Base64.Type

Methods

toJSON ∷ ByteString64 → Value #

toEncoding ∷ ByteString64 → Encoding #

toJSONList ∷ [ByteString64] → Value #

toEncodingList ∷ [ByteString64] → Encoding #

ToJSON RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

toJSON ∷ RedeemVerificationKey → Value #

toEncoding ∷ RedeemVerificationKey → Encoding #

toJSONList ∷ [RedeemVerificationKey] → Value #

toEncodingList ∷ [RedeemVerificationKey] → Encoding #

ToJSON CekMachineCosts 
Instance details

Defined in UntypedPlutusCore.Evaluation.Machine.Cek.CekMachineCosts

Methods

toJSON ∷ CekMachineCosts → Value #

toEncoding ∷ CekMachineCosts → Encoding #

toJSONList ∷ [CekMachineCosts] → Value #

toEncodingList ∷ [CekMachineCosts] → Encoding #

ToJSON ChainDifficulty 
Instance details

Defined in Cardano.Chain.Common.ChainDifficulty

Methods

toJSON ∷ ChainDifficulty → Value #

toEncoding ∷ ChainDifficulty → Encoding #

toJSONList ∷ [ChainDifficulty] → Value #

toEncodingList ∷ [ChainDifficulty] → Encoding #

ToJSON Proof 
Instance details

Defined in Cardano.Chain.Block.Proof

Methods

toJSON ∷ Proof → Value #

toEncoding ∷ Proof → Encoding #

toJSONList ∷ [Proof] → Value #

toEncodingList ∷ [Proof] → Encoding #

ToJSON SscPayload 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toJSON ∷ SscPayload → Value #

toEncoding ∷ SscPayload → Encoding #

toJSONList ∷ [SscPayload] → Value #

toEncodingList ∷ [SscPayload] → Encoding #

ToJSON ProposalBody 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toJSON ∷ ProposalBody → Value #

toEncoding ∷ ProposalBody → Encoding #

toJSONList ∷ [ProposalBody] → Value #

toEncodingList ∷ [ProposalBody] → Encoding #

ToJSON TxInWitness 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toJSON ∷ TxInWitness → Value #

toEncoding ∷ TxInWitness → Encoding #

toJSONList ∷ [TxInWitness] → Value #

toEncodingList ∷ [TxInWitness] → Encoding #

ToJSON TxProof 
Instance details

Defined in Cardano.Chain.UTxO.TxProof

Methods

toJSON ∷ TxProof → Value #

toEncoding ∷ TxProof → Encoding #

toJSONList ∷ [TxProof] → Value #

toEncodingList ∷ [TxProof] → Encoding #

ToJSON SscProof 
Instance details

Defined in Cardano.Chain.Ssc

Methods

toJSON ∷ SscProof → Value #

toEncoding ∷ SscProof → Encoding #

toJSONList ∷ [SscProof] → Value #

toEncodingList ∷ [SscProof] → Encoding #

ToJSON ApplicationName 
Instance details

Defined in Cardano.Chain.Update.ApplicationName

Methods

toJSON ∷ ApplicationName → Value #

toEncoding ∷ ApplicationName → Encoding #

toJSONList ∷ [ApplicationName] → Value #

toEncodingList ∷ [ApplicationName] → Encoding #

ToJSON AddrAttributes 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toJSON ∷ AddrAttributes → Value #

toEncoding ∷ AddrAttributes → Encoding #

toJSONList ∷ [AddrAttributes] → Value #

toEncodingList ∷ [AddrAttributes] → Encoding #

ToJSON HDAddressPayload 
Instance details

Defined in Cardano.Chain.Common.AddrAttributes

Methods

toJSON ∷ HDAddressPayload → Value #

toEncoding ∷ HDAddressPayload → Encoding #

toJSONList ∷ [HDAddressPayload] → Value #

toEncodingList ∷ [HDAddressPayload] → Encoding #

ToJSON NetworkMagic 
Instance details

Defined in Cardano.Chain.Common.NetworkMagic

Methods

toJSON ∷ NetworkMagic → Value #

toEncoding ∷ NetworkMagic → Encoding #

toJSONList ∷ [NetworkMagic] → Value #

toEncodingList ∷ [NetworkMagic] → Encoding #

ToJSON UnparsedFields 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

toJSON ∷ UnparsedFields → Value #

toEncoding ∷ UnparsedFields → Encoding #

toJSONList ∷ [UnparsedFields] → Value #

toEncodingList ∷ [UnparsedFields] → Encoding #

ToJSON AddrType 
Instance details

Defined in Cardano.Chain.Common.AddrSpendingData

Methods

toJSON ∷ AddrType → Value #

toEncoding ∷ AddrType → Encoding #

toJSONList ∷ [AddrType] → Value #

toEncodingList ∷ [AddrType] → Encoding #

ToJSON Address 
Instance details

Defined in Cardano.Chain.Common.Address

Methods

toJSON ∷ Address → Value #

toEncoding ∷ Address → Encoding #

toJSONList ∷ [Address] → Value #

toEncodingList ∷ [Address] → Encoding #

ToJSON LovelacePortion 
Instance details

Defined in Cardano.Chain.Common.LovelacePortion

Methods

toJSON ∷ LovelacePortion → Value #

toEncoding ∷ LovelacePortion → Encoding #

toJSONList ∷ [LovelacePortion] → Value #

toEncodingList ∷ [LovelacePortion] → Encoding #

ToJSON TxFeePolicy 
Instance details

Defined in Cardano.Chain.Common.TxFeePolicy

Methods

toJSON ∷ TxFeePolicy → Value #

toEncoding ∷ TxFeePolicy → Encoding #

toJSONList ∷ [TxFeePolicy] → Value #

toEncodingList ∷ [TxFeePolicy] → Encoding #

ToJSON TxSizeLinear 
Instance details

Defined in Cardano.Chain.Common.TxSizeLinear

Methods

toJSON ∷ TxSizeLinear → Value #

toEncoding ∷ TxSizeLinear → Encoding #

toJSONList ∷ [TxSizeLinear] → Value #

toEncodingList ∷ [TxSizeLinear] → Encoding #

ToJSON TxIn 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toJSON ∷ TxIn → Value #

toEncoding ∷ TxIn → Encoding #

toJSONList ∷ [TxIn] → Value #

toEncodingList ∷ [TxIn] → Encoding #

ToJSON TxOut 
Instance details

Defined in Cardano.Chain.UTxO.Tx

Methods

toJSON ∷ TxOut → Value #

toEncoding ∷ TxOut → Encoding #

toJSONList ∷ [TxOut] → Value #

toEncodingList ∷ [TxOut] → Encoding #

ToJSON TxSigData 
Instance details

Defined in Cardano.Chain.UTxO.TxWitness

Methods

toJSON ∷ TxSigData → Value #

toEncoding ∷ TxSigData → Encoding #

toJSONList ∷ [TxSigData] → Value #

toEncodingList ∷ [TxSigData] → Encoding #

ToJSON InstallerHash 
Instance details

Defined in Cardano.Chain.Update.InstallerHash

Methods

toJSON ∷ InstallerHash → Value #

toEncoding ∷ InstallerHash → Encoding #

toJSONList ∷ [InstallerHash] → Value #

toEncodingList ∷ [InstallerHash] → Encoding #

ToJSON SystemTag 
Instance details

Defined in Cardano.Chain.Update.SystemTag

Methods

toJSON ∷ SystemTag → Value #

toEncoding ∷ SystemTag → Encoding #

toJSONList ∷ [SystemTag] → Value #

toEncodingList ∷ [SystemTag] → Encoding #

ToJSON ProtocolParametersUpdate 
Instance details

Defined in Cardano.Chain.Update.ProtocolParametersUpdate

Methods

toJSON ∷ ProtocolParametersUpdate → Value #

toEncoding ∷ ProtocolParametersUpdate → Encoding #

toJSONList ∷ [ProtocolParametersUpdate] → Value #

toEncodingList ∷ [ProtocolParametersUpdate] → Encoding #

ToJSON SoftforkRule 
Instance details

Defined in Cardano.Chain.Update.SoftforkRule

Methods

toJSON ∷ SoftforkRule → Value #

toEncoding ∷ SoftforkRule → Encoding #

toJSONList ∷ [SoftforkRule] → Value #

toEncodingList ∷ [SoftforkRule] → Encoding #

ToJSON DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ DnsName → Value #

toEncoding ∷ DnsName → Encoding #

toJSONList ∷ [DnsName] → Value #

toEncodingList ∷ [DnsName] → Encoding #

ToJSON Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ Port → Value #

toEncoding ∷ Port → Encoding #

toJSONList ∷ [Port] → Value #

toEncodingList ∷ [Port] → Encoding #

ToJSON Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

toJSON ∷ Url → Value #

toEncoding ∷ Url → Encoding #

toJSONList ∷ [Url] → Value #

toEncodingList ∷ [Url] → Encoding #

ToJSON DeltaCoin Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ DeltaCoin → Value #

toEncoding ∷ DeltaCoin → Encoding #

toJSONList ∷ [DeltaCoin] → Value #

toEncodingList ∷ [DeltaCoin] → Encoding #

ToJSON ModelAddedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelAddedSizes → Value #

toEncoding ∷ ModelAddedSizes → Encoding #

toJSONList ∷ [ModelAddedSizes] → Value #

toEncodingList ∷ [ModelAddedSizes] → Encoding #

ToJSON ModelLinearSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelLinearSize → Value #

toEncoding ∷ ModelLinearSize → Encoding #

toJSONList ∷ [ModelLinearSize] → Value #

toEncodingList ∷ [ModelLinearSize] → Encoding #

ToJSON ModelMaxSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelMaxSize → Value #

toEncoding ∷ ModelMaxSize → Encoding #

toJSONList ∷ [ModelMaxSize] → Value #

toEncodingList ∷ [ModelMaxSize] → Encoding #

ToJSON ModelMinSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelMinSize → Value #

toEncoding ∷ ModelMinSize → Encoding #

toJSONList ∷ [ModelMinSize] → Value #

toEncodingList ∷ [ModelMinSize] → Encoding #

ToJSON ModelMultipliedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelMultipliedSizes → Value #

toEncoding ∷ ModelMultipliedSizes → Encoding #

toJSONList ∷ [ModelMultipliedSizes] → Value #

toEncodingList ∷ [ModelMultipliedSizes] → Encoding #

ToJSON ModelOneArgument 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelOneArgument → Value #

toEncoding ∷ ModelOneArgument → Encoding #

toJSONList ∷ [ModelOneArgument] → Value #

toEncodingList ∷ [ModelOneArgument] → Encoding #

ToJSON ModelOrientation 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelOrientation → Value #

toEncoding ∷ ModelOrientation → Encoding #

toJSONList ∷ [ModelOrientation] → Value #

toEncodingList ∷ [ModelOrientation] → Encoding #

ToJSON ModelSplitConst 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelSplitConst → Value #

toEncoding ∷ ModelSplitConst → Encoding #

toJSONList ∷ [ModelSplitConst] → Value #

toEncodingList ∷ [ModelSplitConst] → Encoding #

ToJSON ModelSubtractedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelSubtractedSizes → Value #

toEncoding ∷ ModelSubtractedSizes → Encoding #

toJSONList ∷ [ModelSubtractedSizes] → Value #

toEncodingList ∷ [ModelSubtractedSizes] → Encoding #

ToJSON ModelThreeArguments 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelThreeArguments → Value #

toEncoding ∷ ModelThreeArguments → Encoding #

toJSONList ∷ [ModelThreeArguments] → Value #

toEncodingList ∷ [ModelThreeArguments] → Encoding #

ToJSON ModelTwoArguments 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ ModelTwoArguments → Value #

toEncoding ∷ ModelTwoArguments → Encoding #

toJSONList ∷ [ModelTwoArguments] → Value #

toEncodingList ∷ [ModelTwoArguments] → Encoding #

ToJSON ExMemory 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExMemory

Methods

toJSON ∷ ExMemory → Value #

toEncoding ∷ ExMemory → Encoding #

toJSONList ∷ [ExMemory] → Value #

toEncodingList ∷ [ExMemory] → Encoding #

ToJSON ExBudget 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExBudget

Methods

toJSON ∷ ExBudget → Value #

toEncoding ∷ ExBudget → Encoding #

toJSONList ∷ [ExBudget] → Value #

toEncodingList ∷ [ExBudget] → Encoding #

ToJSON ExCPU 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExMemory

Methods

toJSON ∷ ExCPU → Value #

toEncoding ∷ ExCPU → Encoding #

toJSONList ∷ [ExCPU] → Value #

toEncodingList ∷ [ExCPU] → Encoding #

ToJSON Ada 
Instance details

Defined in Plutus.V1.Ledger.Ada

Methods

toJSON ∷ Ada → Value #

toEncoding ∷ Ada → Encoding #

toJSONList ∷ [Ada] → Value #

toEncodingList ∷ [Ada] → Encoding #

ToJSON Address 
Instance details

Defined in Plutus.V1.Ledger.Address

Methods

toJSON ∷ Address → Value #

toEncoding ∷ Address → Encoding #

toJSONList ∷ [Address] → Value #

toEncodingList ∷ [Address] → Encoding #

ToJSON Credential 
Instance details

Defined in Plutus.V1.Ledger.Credential

Methods

toJSON ∷ Credential → Value #

toEncoding ∷ Credential → Encoding #

toJSONList ∷ [Credential] → Value #

toEncodingList ∷ [Credential] → Encoding #

ToJSON StakingCredential 
Instance details

Defined in Plutus.V1.Ledger.Credential

Methods

toJSON ∷ StakingCredential → Value #

toEncoding ∷ StakingCredential → Encoding #

toJSONList ∷ [StakingCredential] → Value #

toEncodingList ∷ [StakingCredential] → Encoding #

ToJSON PubKeyHash 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

toJSON ∷ PubKeyHash → Value #

toEncoding ∷ PubKeyHash → Encoding #

toJSONList ∷ [PubKeyHash] → Value #

toEncodingList ∷ [PubKeyHash] → Encoding #

ToJSON PubKey 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

toJSON ∷ PubKey → Value #

toEncoding ∷ PubKey → Encoding #

toJSONList ∷ [PubKey] → Value #

toEncodingList ∷ [PubKey] → Encoding #

ToJSON LedgerBytes 
Instance details

Defined in Plutus.V1.Ledger.Bytes

Methods

toJSON ∷ LedgerBytes → Value #

toEncoding ∷ LedgerBytes → Encoding #

toJSONList ∷ [LedgerBytes] → Value #

toEncodingList ∷ [LedgerBytes] → Encoding #

ToJSON TxOut 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ TxOut → Value #

toEncoding ∷ TxOut → Encoding #

toJSONList ∷ [TxOut] → Value #

toEncodingList ∷ [TxOut] → Encoding #

ToJSON TxOutRef 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ TxOutRef → Value #

toEncoding ∷ TxOutRef → Encoding #

toJSONList ∷ [TxOutRef] → Value #

toEncodingList ∷ [TxOutRef] → Encoding #

ToJSON DCert 
Instance details

Defined in Plutus.V1.Ledger.DCert

Methods

toJSON ∷ DCert → Value #

toEncoding ∷ DCert → Encoding #

toJSONList ∷ [DCert] → Value #

toEncodingList ∷ [DCert] → Encoding #

ToJSON TxId 
Instance details

Defined in Plutus.V1.Ledger.TxId

Methods

toJSON ∷ TxId → Value #

toEncoding ∷ TxId → Encoding #

toJSONList ∷ [TxId] → Value #

toEncodingList ∷ [TxId] → Encoding #

ToJSON POSIXTime 
Instance details

Defined in Plutus.V1.Ledger.Time

Methods

toJSON ∷ POSIXTime → Value #

toEncoding ∷ POSIXTime → Encoding #

toJSONList ∷ [POSIXTime] → Value #

toEncodingList ∷ [POSIXTime] → Encoding #

ToJSON Signature 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

toJSON ∷ Signature → Value #

toEncoding ∷ Signature → Encoding #

toJSONList ∷ [Signature] → Value #

toEncodingList ∷ [Signature] → Encoding #

ToJSON PrivateKey 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

toJSON ∷ PrivateKey → Value #

toEncoding ∷ PrivateKey → Encoding #

toJSONList ∷ [PrivateKey] → Value #

toEncodingList ∷ [PrivateKey] → Encoding #

ToJSON Slot 
Instance details

Defined in Plutus.V1.Ledger.Slot

Methods

toJSON ∷ Slot → Value #

toEncoding ∷ Slot → Encoding #

toJSONList ∷ [Slot] → Value #

toEncodingList ∷ [Slot] → Encoding #

ToJSON Tx 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ Tx → Value #

toEncoding ∷ Tx → Encoding #

toJSONList ∷ [Tx] → Value #

toEncodingList ∷ [Tx] → Encoding #

ToJSON TxIn 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ TxIn → Value #

toEncoding ∷ TxIn → Encoding #

toJSONList ∷ [TxIn] → Value #

toEncodingList ∷ [TxIn] → Encoding #

ToJSON TxInType 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ TxInType → Value #

toEncoding ∷ TxInType → Encoding #

toJSONList ∷ [TxInType] → Value #

toEncodingList ∷ [TxInType] → Encoding #

ToJSON TxOutTx 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

toJSON ∷ TxOutTx → Value #

toEncoding ∷ TxOutTx → Encoding #

toJSONList ∷ [TxOutTx] → Value #

toEncodingList ∷ [TxOutTx] → Encoding #

ToJSON AccountState Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ AccountState → Value #

toEncoding ∷ AccountState → Encoding #

toJSONList ∷ [AccountState] → Value #

toEncodingList ∷ [AccountState] → Encoding #

ToJSON RewardType Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ RewardType → Value #

toEncoding ∷ RewardType → Encoding #

toJSONList ∷ [RewardType] → Value #

toEncodingList ∷ [RewardType] → Encoding #

ToJSON StudentT 
Instance details

Defined in Statistics.Distribution.StudentT

Methods

toJSON ∷ StudentT → Value #

toEncoding ∷ StudentT → Encoding #

toJSONList ∷ [StudentT] → Value #

toEncodingList ∷ [StudentT] → Encoding #

ToJSON TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelope → Value #

toEncoding ∷ TextEnvelope → Encoding #

toJSONList ∷ [TextEnvelope] → Value #

toEncodingList ∷ [TextEnvelope] → Encoding #

ToJSON TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelopeDescr → Value #

toEncoding ∷ TextEnvelopeDescr → Encoding #

toJSONList ∷ [TextEnvelopeDescr] → Value #

toEncodingList ∷ [TextEnvelopeDescr] → Encoding #

ToJSON TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelopeType → Value #

toEncoding ∷ TextEnvelopeType → Encoding #

toJSONList ∷ [TextEnvelopeType] → Value #

toEncodingList ∷ [TextEnvelopeType] → Encoding #

ToJSON TxSubmitStatus Source # 
Instance details

Defined in Cardano.Api.TxSubmit.Types

Methods

toJSON ∷ TxSubmitStatus → Value #

toEncoding ∷ TxSubmitStatus → Encoding #

toJSONList ∷ [TxSubmitStatus] → Value #

toEncodingList ∷ [TxSubmitStatus] → Encoding #

ToJSON ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toJSON ∷ ExecutionUnits → Value #

toEncoding ∷ ExecutionUnits → Encoding #

toJSONList ∷ [ExecutionUnits] → Value #

toEncodingList ∷ [ExecutionUnits] → Encoding #

ToJSON AnyPlutusScriptVersion Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toJSON ∷ AnyPlutusScriptVersion → Value #

toEncoding ∷ AnyPlutusScriptVersion → Encoding #

toJSONList ∷ [AnyPlutusScriptVersion] → Value #

toEncodingList ∷ [AnyPlutusScriptVersion] → Encoding #

ToJSON ValueNestedRep Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ ValueNestedRep → Value #

toEncoding ∷ ValueNestedRep → Encoding #

toJSONList ∷ [ValueNestedRep] → Value #

toEncodingList ∷ [ValueNestedRep] → Encoding #

ToJSON Value Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ Value → Value0 #

toEncoding ∷ Value → Encoding #

toJSONList ∷ [Value] → Value0 #

toEncodingList ∷ [Value] → Encoding #

ToJSON AssetName Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ AssetName → Value #

toEncoding ∷ AssetName → Encoding #

toJSONList ∷ [AssetName] → Value #

toEncodingList ∷ [AssetName] → Encoding #

ToJSON Quantity Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ Quantity → Value #

toEncoding ∷ Quantity → Encoding #

toJSONList ∷ [Quantity] → Value #

toEncodingList ∷ [Quantity] → Encoding #

ToJSON Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

toJSON ∷ Lovelace → Value #

toEncoding ∷ Lovelace → Encoding #

toJSONList ∷ [Lovelace] → Value #

toEncodingList ∷ [Lovelace] → Encoding #

ToJSON CostModel Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

toJSON ∷ CostModel → Value #

toEncoding ∷ CostModel → Encoding #

toJSONList ∷ [CostModel] → Value #

toEncodingList ∷ [CostModel] → Encoding #

ToJSON ExecutionUnitPrices Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

toJSON ∷ ExecutionUnitPrices → Value #

toEncoding ∷ ExecutionUnitPrices → Encoding #

toJSONList ∷ [ExecutionUnitPrices] → Value #

toEncodingList ∷ [ExecutionUnitPrices] → Encoding #

ToJSON PraosNonce Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

toJSON ∷ PraosNonce → Value #

toEncoding ∷ PraosNonce → Encoding #

toJSONList ∷ [PraosNonce] → Value #

toEncodingList ∷ [PraosNonce] → Encoding #

ToJSON ProtocolParameters Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

toJSON ∷ ProtocolParameters → Value #

toEncoding ∷ ProtocolParameters → Encoding #

toJSONList ∷ [ProtocolParameters] → Value #

toEncodingList ∷ [ProtocolParameters] → Encoding #

ToJSON TxIx Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxIx → Value #

toEncoding ∷ TxIx → Encoding #

toJSONList ∷ [TxIx] → Value #

toEncodingList ∷ [TxIx] → Encoding #

ToJSON TxIn Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxIn → Value #

toEncoding ∷ TxIn → Encoding #

toJSONList ∷ [TxIn] → Value #

toEncodingList ∷ [TxIn] → Encoding #

ToJSON TxId Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxId → Value #

toEncoding ∷ TxId → Encoding #

toJSONList ∷ [TxId] → Value #

toEncodingList ∷ [TxId] → Encoding #

ToJSON ChainTip Source # 
Instance details

Defined in Cardano.Api.Block

Methods

toJSON ∷ ChainTip → Value #

toEncoding ∷ ChainTip → Encoding #

toJSONList ∷ [ChainTip] → Value #

toEncodingList ∷ [ChainTip] → Encoding #

ToJSON a ⇒ ToJSON [a] 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ [a] → Value #

toEncoding ∷ [a] → Encoding #

toJSONList ∷ [[a]] → Value #

toEncodingList ∷ [[a]] → Encoding #

ToJSON a ⇒ ToJSON (Maybe a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Maybe a → Value #

toEncoding ∷ Maybe a → Encoding #

toJSONList ∷ [Maybe a] → Value #

toEncodingList ∷ [Maybe a] → Encoding #

(ToJSON a, Integral a) ⇒ ToJSON (Ratio a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Ratio a → Value #

toEncoding ∷ Ratio a → Encoding #

toJSONList ∷ [Ratio a] → Value #

toEncodingList ∷ [Ratio a] → Encoding #

ToJSON a ⇒ ToJSON (First a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ First a → Value #

toEncoding ∷ First a → Encoding #

toJSONList ∷ [First a] → Value #

toEncodingList ∷ [First a] → Encoding #

ToJSON a ⇒ ToJSON (Last a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Last a → Value #

toEncoding ∷ Last a → Encoding #

toJSONList ∷ [Last a] → Value #

toEncodingList ∷ [Last a] → Encoding #

ToJSON a ⇒ ToJSON (Set a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Set a → Value #

toEncoding ∷ Set a → Encoding #

toJSONList ∷ [Set a] → Value #

toEncodingList ∷ [Set a] → Encoding #

ToJSON a ⇒ ToJSON (NonEmpty a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ NonEmpty a → Value #

toEncoding ∷ NonEmpty a → Encoding #

toJSONList ∷ [NonEmpty a] → Value #

toEncodingList ∷ [NonEmpty a] → Encoding #

ToJSON a ⇒ ToJSON (Identity a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Identity a → Value #

toEncoding ∷ Identity a → Encoding #

toJSONList ∷ [Identity a] → Value #

toEncodingList ∷ [Identity a] → Encoding #

ToJSON a ⇒ ToJSON (Min a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Min a → Value #

toEncoding ∷ Min a → Encoding #

toJSONList ∷ [Min a] → Value #

toEncodingList ∷ [Min a] → Encoding #

ToJSON a ⇒ ToJSON (Max a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Max a → Value #

toEncoding ∷ Max a → Encoding #

toJSONList ∷ [Max a] → Value #

toEncodingList ∷ [Max a] → Encoding #

ToJSON a ⇒ ToJSON (WrappedMonoid a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ WrappedMonoid a → Value #

toEncoding ∷ WrappedMonoid a → Encoding #

toJSONList ∷ [WrappedMonoid a] → Value #

toEncodingList ∷ [WrappedMonoid a] → Encoding #

ToJSON a ⇒ ToJSON (Option a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Option a → Value #

toEncoding ∷ Option a → Encoding #

toJSONList ∷ [Option a] → Value #

toEncodingList ∷ [Option a] → Encoding #

ToJSON a ⇒ ToJSON (First a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ First a → Value #

toEncoding ∷ First a → Encoding #

toJSONList ∷ [First a] → Value #

toEncodingList ∷ [First a] → Encoding #

ToJSON a ⇒ ToJSON (Last a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Last a → Value #

toEncoding ∷ Last a → Encoding #

toJSONList ∷ [Last a] → Value #

toEncodingList ∷ [Last a] → Encoding #

ToJSON a ⇒ ToJSON (Dual a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Dual a → Value #

toEncoding ∷ Dual a → Encoding #

toJSONList ∷ [Dual a] → Value #

toEncodingList ∷ [Dual a] → Encoding #

ToJSON a ⇒ ToJSON (IntMap a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ IntMap a → Value #

toEncoding ∷ IntMap a → Encoding #

toJSONList ∷ [IntMap a] → Value #

toEncodingList ∷ [IntMap a] → Encoding #

ToJSON v ⇒ ToJSON (Tree v) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Tree v → Value #

toEncoding ∷ Tree v → Encoding #

toJSONList ∷ [Tree v] → Value #

toEncodingList ∷ [Tree v] → Encoding #

ToJSON a ⇒ ToJSON (Seq a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Seq a → Value #

toEncoding ∷ Seq a → Encoding #

toJSONList ∷ [Seq a] → Value #

toEncodingList ∷ [Seq a] → Encoding #

(Vector Vector a, ToJSON a) ⇒ ToJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Vector a → Value #

toEncoding ∷ Vector a → Encoding #

toJSONList ∷ [Vector a] → Value #

toEncodingList ∷ [Vector a] → Encoding #

ToJSON a ⇒ ToJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Vector a → Value #

toEncoding ∷ Vector a → Encoding #

toJSONList ∷ [Vector a] → Value #

toEncodingList ∷ [Vector a] → Encoding #

ToJSON1 f ⇒ ToJSON (Fix f) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Fix f → Value #

toEncoding ∷ Fix f → Encoding #

toJSONList ∷ [Fix f] → Value #

toEncodingList ∷ [Fix f] → Encoding #

(ToJSON1 f, Functor f) ⇒ ToJSON (Mu f) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Mu f → Value #

toEncoding ∷ Mu f → Encoding #

toJSONList ∷ [Mu f] → Value #

toEncodingList ∷ [Mu f] → Encoding #

(ToJSON1 f, Functor f) ⇒ ToJSON (Nu f) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Nu f → Value #

toEncoding ∷ Nu f → Encoding #

toJSONList ∷ [Nu f] → Value #

toEncodingList ∷ [Nu f] → Encoding #

ToJSON a ⇒ ToJSON (DNonEmpty a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ DNonEmpty a → Value #

toEncoding ∷ DNonEmpty a → Encoding #

toJSONList ∷ [DNonEmpty a] → Value #

toEncodingList ∷ [DNonEmpty a] → Encoding #

ToJSON a ⇒ ToJSON (DList a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ DList a → Value #

toEncoding ∷ DList a → Encoding #

toJSONList ∷ [DList a] → Value #

toEncodingList ∷ [DList a] → Encoding #

ToJSON a ⇒ ToJSON (Array a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Array a → Value #

toEncoding ∷ Array a → Encoding #

toJSONList ∷ [Array a] → Value #

toEncodingList ∷ [Array a] → Encoding #

(Prim a, ToJSON a) ⇒ ToJSON (PrimArray a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ PrimArray a → Value #

toEncoding ∷ PrimArray a → Encoding #

toJSONList ∷ [PrimArray a] → Value #

toEncodingList ∷ [PrimArray a] → Encoding #

ToJSON a ⇒ ToJSON (SmallArray a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ SmallArray a → Value #

toEncoding ∷ SmallArray a → Encoding #

toJSONList ∷ [SmallArray a] → Value #

toEncodingList ∷ [SmallArray a] → Encoding #

ToJSON a ⇒ ToJSON (Maybe a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Maybe a → Value #

toEncoding ∷ Maybe a → Encoding #

toJSONList ∷ [Maybe a] → Value #

toEncodingList ∷ [Maybe a] → Encoding #

ToJSON a ⇒ ToJSON (HashSet a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ HashSet a → Value #

toEncoding ∷ HashSet a → Encoding #

toJSONList ∷ [HashSet a] → Value #

toEncodingList ∷ [HashSet a] → Encoding #

(Prim a, ToJSON a) ⇒ ToJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Vector a → Value #

toEncoding ∷ Vector a → Encoding #

toJSONList ∷ [Vector a] → Value #

toEncodingList ∷ [Vector a] → Encoding #

(Storable a, ToJSON a) ⇒ ToJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Vector a → Value #

toEncoding ∷ Vector a → Encoding #

toJSONList ∷ [Vector a] → Value #

toEncodingList ∷ [Vector a] → Encoding #

ToJSON (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

toJSON ∷ ScriptHash crypto → Value #

toEncoding ∷ ScriptHash crypto → Encoding #

toJSONList ∷ [ScriptHash crypto] → Value #

toEncodingList ∷ [ScriptHash crypto] → Encoding #

ToJSON a ⇒ ToJSON (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

toJSON ∷ StrictMaybe a → Value #

toEncoding ∷ StrictMaybe a → Encoding #

toJSONList ∷ [StrictMaybe a] → Value #

toEncodingList ∷ [StrictMaybe a] → Encoding #

(ToJSON (PParamsDelta era), UsesPParams era) ⇒ ToJSON (PPUPState era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PPUPState era → Value #

toEncoding ∷ PPUPState era → Encoding #

toJSONList ∷ [PPUPState era] → Value #

toEncodingList ∷ [PPUPState era] → Encoding #

ToJSON (Value era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Value era → Value0 #

toEncoding ∷ Value era → Encoding #

toJSONList ∷ [Value era] → Value0 #

toEncodingList ∷ [Value era] → Encoding #

ToJSON (PParamsUpdate (AlonzoEra StandardCrypto)) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PParamsUpdate (AlonzoEra StandardCrypto) → Value #

toEncoding ∷ PParamsUpdate (AlonzoEra StandardCrypto) → Encoding #

toJSONList ∷ [PParamsUpdate (AlonzoEra StandardCrypto)] → Value #

toEncodingList ∷ [PParamsUpdate (AlonzoEra StandardCrypto)] → Encoding #

ToJSON (PParams era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PParams era → Value #

toEncoding ∷ PParams era → Encoding #

toJSONList ∷ [PParams era] → Value #

toEncodingList ∷ [PParams era] → Encoding #

(ShelleyBasedEra era, ToJSON (Value era)) ⇒ ToJSON (TxOut era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ TxOut era → Value #

toEncoding ∷ TxOut era → Encoding #

toJSONList ∷ [TxOut era] → Value #

toEncodingList ∷ [TxOut era] → Encoding #

ToJSON (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

toJSON ∷ PParams era → Value #

toEncoding ∷ PParams era → Encoding #

toJSONList ∷ [PParams era] → Value #

toEncodingList ∷ [PParams era] → Encoding #

ToJSON (PParamsUpdate era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PParamsUpdate era → Value #

toEncoding ∷ PParamsUpdate era → Encoding #

toJSONList ∷ [PParamsUpdate era] → Value #

toEncodingList ∷ [PParamsUpdate era] → Encoding #

(ShelleyBasedEra era, ToJSON (TxOut era), ToJSON (PParams era), ToJSON (PParamsDelta era)) ⇒ ToJSON (EpochState era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ EpochState era → Value #

toEncoding ∷ EpochState era → Encoding #

toJSONList ∷ [EpochState era] → Value #

toEncodingList ∷ [EpochState era] → Encoding #

(ShelleyBasedEra era, ToJSON (TxOut era), ToJSON (PParamsDelta era)) ⇒ ToJSON (LedgerState era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ LedgerState era → Value #

toEncoding ∷ LedgerState era → Encoding #

toJSONList ∷ [LedgerState era] → Value #

toEncodingList ∷ [LedgerState era] → Encoding #

(ShelleyBasedEra era, ToJSON (TxOut era), ToJSON (PParamsDelta era)) ⇒ ToJSON (UTxOState era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ UTxOState era → Value #

toEncoding ∷ UTxOState era → Encoding #

toJSONList ∷ [UTxOState era] → Value #

toEncodingList ∷ [UTxOState era] → Encoding #

Crypto crypto ⇒ ToJSON (DPState crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ DPState crypto → Value #

toEncoding ∷ DPState crypto → Encoding #

toJSONList ∷ [DPState crypto] → Value #

toEncodingList ∷ [DPState crypto] → Encoding #

Crypto crypto ⇒ ToJSON (TxIn crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ TxIn crypto → Value #

toEncoding ∷ TxIn crypto → Encoding #

toJSONList ∷ [TxIn crypto] → Value #

toEncodingList ∷ [TxIn crypto] → Encoding #

Crypto crypto ⇒ ToJSON (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

toJSON ∷ BlocksMade crypto → Value #

toEncoding ∷ BlocksMade crypto → Encoding #

toJSONList ∷ [BlocksMade crypto] → Value #

toEncodingList ∷ [BlocksMade crypto] → Encoding #

Crypto crypto ⇒ ToJSON (SnapShots crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ SnapShots crypto → Value #

toEncoding ∷ SnapShots crypto → Encoding #

toJSONList ∷ [SnapShots crypto] → Value #

toEncodingList ∷ [SnapShots crypto] → Encoding #

Crypto crypto ⇒ ToJSON (NonMyopic crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ NonMyopic crypto → Value #

toEncoding ∷ NonMyopic crypto → Encoding #

toJSONList ∷ [NonMyopic crypto] → Value #

toEncodingList ∷ [NonMyopic crypto] → Encoding #

Crypto crypto ⇒ ToJSON (PulsingRewUpdate crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PulsingRewUpdate crypto → Value #

toEncoding ∷ PulsingRewUpdate crypto → Encoding #

toJSONList ∷ [PulsingRewUpdate crypto] → Value #

toEncodingList ∷ [PulsingRewUpdate crypto] → Encoding #

Crypto crypto ⇒ ToJSON (PoolDistr crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PoolDistr crypto → Value #

toEncoding ∷ PoolDistr crypto → Encoding #

toJSONList ∷ [PoolDistr crypto] → Value #

toEncodingList ∷ [PoolDistr crypto] → Encoding #

(ToJSON (PParamsDelta era), UsesPParams era) ⇒ ToJSON (ProposedPPUpdates era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ ProposedPPUpdates era → Value #

toEncoding ∷ ProposedPPUpdates era → Encoding #

toJSONList ∷ [ProposedPPUpdates era] → Value #

toEncodingList ∷ [ProposedPPUpdates era] → Encoding #

Era era ⇒ ToJSON (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toJSON ∷ ShelleyGenesis era → Value #

toEncoding ∷ ShelleyGenesis era → Encoding #

toJSONList ∷ [ShelleyGenesis era] → Value #

toEncodingList ∷ [ShelleyGenesis era] → Encoding #

Crypto crypto ⇒ ToJSON (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toJSON ∷ GenDelegPair crypto → Value #

toEncoding ∷ GenDelegPair crypto → Encoding #

toJSONList ∷ [GenDelegPair crypto] → Value #

toEncodingList ∷ [GenDelegPair crypto] → Encoding #

ToJSON (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toJSON ∷ Addr crypto → Value #

toEncoding ∷ Addr crypto → Encoding #

toJSONList ∷ [Addr crypto] → Value #

toEncodingList ∷ [Addr crypto] → Encoding #

Crypto crypto ⇒ ToJSON (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

toJSON ∷ ShelleyGenesisStaking crypto → Value #

toEncoding ∷ ShelleyGenesisStaking crypto → Encoding #

toJSONList ∷ [ShelleyGenesisStaking crypto] → Value #

toEncodingList ∷ [ShelleyGenesisStaking crypto] → Encoding #

(ShelleyBasedEra era, ToJSON (TxOut era)) ⇒ ToJSON (UTxO era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ UTxO era → Value #

toEncoding ∷ UTxO era → Encoding #

toJSONList ∷ [UTxO era] → Value #

toEncodingList ∷ [UTxO era] → Encoding #

(Era era, Show (Value era), ToJSON (Value era)) ⇒ ToJSON (TxOut era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ TxOut era → Value #

toEncoding ∷ TxOut era → Encoding #

toJSONList ∷ [TxOut era] → Value #

toEncodingList ∷ [TxOut era] → Encoding #

ToJSON (PolicyID era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PolicyID era → Value #

toEncoding ∷ PolicyID era → Encoding #

toJSONList ∷ [PolicyID era] → Value #

toEncodingList ∷ [PolicyID era] → Encoding #

Crypto crypto ⇒ ToJSON (PState crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ PState crypto → Value #

toEncoding ∷ PState crypto → Encoding #

toJSONList ∷ [PState crypto] → Value #

toEncodingList ∷ [PState crypto] → Encoding #

Crypto crypto ⇒ ToJSON (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toJSON ∷ PoolParams crypto → Value #

toEncoding ∷ PoolParams crypto → Encoding #

toJSONList ∷ [PoolParams crypto] → Value #

toEncodingList ∷ [PoolParams crypto] → Encoding #

ToJSON (InstantaneousRewards crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ InstantaneousRewards crypto → Value #

toEncoding ∷ InstantaneousRewards crypto → Encoding #

toJSONList ∷ [InstantaneousRewards crypto] → Value #

toEncodingList ∷ [InstantaneousRewards crypto] → Encoding #

Crypto crypto ⇒ ToJSON (SnapShot crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ SnapShot crypto → Value #

toEncoding ∷ SnapShot crypto → Encoding #

toJSONList ∷ [SnapShot crypto] → Value #

toEncodingList ∷ [SnapShot crypto] → Encoding #

ToJSON (FutureGenDeleg crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ FutureGenDeleg crypto → Value #

toEncoding ∷ FutureGenDeleg crypto → Encoding #

toJSONList ∷ [FutureGenDeleg crypto] → Value #

toEncodingList ∷ [FutureGenDeleg crypto] → Encoding #

Crypto crypto ⇒ ToJSON (DState crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ DState crypto → Value #

toEncoding ∷ DState crypto → Encoding #

toJSONList ∷ [DState crypto] → Value #

toEncodingList ∷ [DState crypto] → Encoding #

ToJSON (IndividualPoolStake crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ IndividualPoolStake crypto → Value #

toEncoding ∷ IndividualPoolStake crypto → Encoding #

toJSONList ∷ [IndividualPoolStake crypto] → Value #

toEncodingList ∷ [IndividualPoolStake crypto] → Encoding #

Crypto crypto ⇒ ToJSON (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toJSON ∷ RewardProvenance crypto → Value #

toEncoding ∷ RewardProvenance crypto → Encoding #

toJSONList ∷ [RewardProvenance crypto] → Value #

toEncodingList ∷ [RewardProvenance crypto] → Encoding #

Crypto crypto ⇒ ToJSON (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

toJSON ∷ RewardProvenancePool crypto → Value #

toEncoding ∷ RewardProvenancePool crypto → Encoding #

toJSONList ∷ [RewardProvenancePool crypto] → Value #

toEncodingList ∷ [RewardProvenancePool crypto] → Encoding #

ToJSON (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

toJSON ∷ RewardAcnt crypto → Value #

toEncoding ∷ RewardAcnt crypto → Encoding #

toJSONList ∷ [RewardAcnt crypto] → Value #

toEncodingList ∷ [RewardAcnt crypto] → Encoding #

ToJSON (CardanoEra era) Source # 
Instance details

Defined in Cardano.Api.Eras

Methods

toJSON ∷ CardanoEra era → Value #

toEncoding ∷ CardanoEra era → Encoding #

toJSONList ∷ [CardanoEra era] → Value #

toEncodingList ∷ [CardanoEra era] → Encoding #

ToJSON (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

toJSON ∷ Hash StakePoolKey → Value #

toEncoding ∷ Hash StakePoolKey → Encoding #

toJSONList ∷ [Hash StakePoolKey] → Value #

toEncodingList ∷ [Hash StakePoolKey] → Encoding #

ToJSON (Hash ScriptData) Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

toJSON ∷ Hash ScriptData → Value #

toEncoding ∷ Hash ScriptData → Encoding #

toJSONList ∷ [Hash ScriptData] → Value #

toEncodingList ∷ [Hash ScriptData] → Encoding #

ToJSON a ⇒ ToJSON (AHeader a) 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toJSON ∷ AHeader a → Value #

toEncoding ∷ AHeader a → Encoding #

toJSONList ∷ [AHeader a] → Value #

toEncodingList ∷ [AHeader a] → Encoding #

ToJSON a ⇒ ToJSON (ATxAux a) 
Instance details

Defined in Cardano.Chain.UTxO.TxAux

Methods

toJSON ∷ ATxAux a → Value #

toEncoding ∷ ATxAux a → Encoding #

toJSONList ∷ [ATxAux a] → Value #

toEncodingList ∷ [ATxAux a] → Encoding #

ToJSON a ⇒ ToJSON (ACertificate a) 
Instance details

Defined in Cardano.Chain.Delegation.Certificate

Methods

toJSON ∷ ACertificate a → Value #

toEncoding ∷ ACertificate a → Encoding #

toJSONList ∷ [ACertificate a] → Value #

toEncodingList ∷ [ACertificate a] → Encoding #

ToJSON a ⇒ ToJSON (AProposal a) 
Instance details

Defined in Cardano.Chain.Update.Proposal

Methods

toJSON ∷ AProposal a → Value #

toEncoding ∷ AProposal a → Encoding #

toJSONList ∷ [AProposal a] → Value #

toEncodingList ∷ [AProposal a] → Encoding #

ToJSON a ⇒ ToJSON (AVote a) 
Instance details

Defined in Cardano.Chain.Update.Vote

Methods

toJSON ∷ AVote a → Value #

toEncoding ∷ AVote a → Encoding #

toJSONList ∷ [AVote a] → Value #

toEncodingList ∷ [AVote a] → Encoding #

ToJSON a ⇒ ToJSON (ABlockOrBoundary a) 
Instance details

Defined in Cardano.Chain.Block.Block

Methods

toJSON ∷ ABlockOrBoundary a → Value #

toEncoding ∷ ABlockOrBoundary a → Encoding #

toJSONList ∷ [ABlockOrBoundary a] → Value #

toEncodingList ∷ [ABlockOrBoundary a] → Encoding #

ToJSON a ⇒ ToJSON (ABoundaryHeader a) 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toJSON ∷ ABoundaryHeader a → Value #

toEncoding ∷ ABoundaryHeader a → Encoding #

toJSONList ∷ [ABoundaryHeader a] → Value #

toEncodingList ∷ [ABoundaryHeader a] → Encoding #

ToJSON a ⇒ ToJSON (ABoundaryBlock a) 
Instance details

Defined in Cardano.Chain.Block.Block

Methods

toJSON ∷ ABoundaryBlock a → Value #

toEncoding ∷ ABoundaryBlock a → Encoding #

toJSONList ∷ [ABoundaryBlock a] → Value #

toEncodingList ∷ [ABoundaryBlock a] → Encoding #

ToJSON a ⇒ ToJSON (ABlock a) 
Instance details

Defined in Cardano.Chain.Block.Block

Methods

toJSON ∷ ABlock a → Value #

toEncoding ∷ ABlock a → Encoding #

toJSONList ∷ [ABlock a] → Value #

toEncodingList ∷ [ABlock a] → Encoding #

ToJSON a ⇒ ToJSON (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

toJSON ∷ RedeemSignature a → Value #

toEncoding ∷ RedeemSignature a → Encoding #

toJSONList ∷ [RedeemSignature a] → Value #

toEncodingList ∷ [RedeemSignature a] → Encoding #

ToJSON (Signature w) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

toJSON ∷ Signature w → Value #

toEncoding ∷ Signature w → Encoding #

toJSONList ∷ [Signature w] → Value #

toEncodingList ∷ [Signature w] → Encoding #

Crypto crypto ⇒ ToJSON (GenDelegs crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ GenDelegs crypto → Value #

toEncoding ∷ GenDelegs crypto → Encoding #

toJSONList ∷ [GenDelegs crypto] → Value #

toEncodingList ∷ [GenDelegs crypto] → Encoding #

ToJSON a ⇒ ToJSON (ABoundaryBody a) 
Instance details

Defined in Cardano.Chain.Block.Block

Methods

toJSON ∷ ABoundaryBody a → Value #

toEncoding ∷ ABoundaryBody a → Encoding #

toJSONList ∷ [ABoundaryBody a] → Value #

toEncodingList ∷ [ABoundaryBody a] → Encoding #

ToJSON a ⇒ ToJSON (ABody a) 
Instance details

Defined in Cardano.Chain.Block.Body

Methods

toJSON ∷ ABody a → Value #

toEncoding ∷ ABody a → Encoding #

toJSONList ∷ [ABody a] → Value #

toEncodingList ∷ [ABody a] → Encoding #

ToJSON a ⇒ ToJSON (APayload a) 
Instance details

Defined in Cardano.Chain.Delegation.Payload

Methods

toJSON ∷ APayload a → Value #

toEncoding ∷ APayload a → Encoding #

toJSONList ∷ [APayload a] → Value #

toEncodingList ∷ [APayload a] → Encoding #

ToJSON a ⇒ ToJSON (ABlockSignature a) 
Instance details

Defined in Cardano.Chain.Block.Header

Methods

toJSON ∷ ABlockSignature a → Value #

toEncoding ∷ ABlockSignature a → Encoding #

toJSONList ∷ [ABlockSignature a] → Value #

toEncodingList ∷ [ABlockSignature a] → Encoding #

ToJSON a ⇒ ToJSON (ATxPayload a) 
Instance details

Defined in Cardano.Chain.UTxO.TxPayload

Methods

toJSON ∷ ATxPayload a → Value #

toEncoding ∷ ATxPayload a → Encoding #

toJSONList ∷ [ATxPayload a] → Value #

toEncodingList ∷ [ATxPayload a] → Encoding #

ToJSON a ⇒ ToJSON (APayload a) 
Instance details

Defined in Cardano.Chain.Update.Payload

Methods

toJSON ∷ APayload a → Value #

toEncoding ∷ APayload a → Encoding #

toJSONList ∷ [APayload a] → Value #

toEncodingList ∷ [APayload a] → Encoding #

ToJSON a ⇒ ToJSON (Attributes a) 
Instance details

Defined in Cardano.Chain.Common.Attributes

Methods

toJSON ∷ Attributes a → Value #

toEncoding ∷ Attributes a → Encoding #

toJSONList ∷ [Attributes a] → Value #

toEncodingList ∷ [Attributes a] → Encoding #

ToJSON a ⇒ ToJSON (MerkleRoot a) 
Instance details

Defined in Cardano.Chain.Common.Merkle

Methods

toJSON ∷ MerkleRoot a → Value #

toEncoding ∷ MerkleRoot a → Encoding #

toJSONList ∷ [MerkleRoot a] → Value #

toEncodingList ∷ [MerkleRoot a] → Encoding #

ToJSON (BuiltinCostModelBase CostingFun) 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ BuiltinCostModelBase CostingFun → Value #

toEncoding ∷ BuiltinCostModelBase CostingFun → Encoding #

toJSONList ∷ [BuiltinCostModelBase CostingFun] → Value #

toEncodingList ∷ [BuiltinCostModelBase CostingFun] → Encoding #

ToJSON model ⇒ ToJSON (CostingFun model) 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

toJSON ∷ CostingFun model → Value #

toEncoding ∷ CostingFun model → Encoding #

toJSONList ∷ [CostingFun model] → Value #

toEncodingList ∷ [CostingFun model] → Encoding #

ToJSON a ⇒ ToJSON (Extended a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

toJSON ∷ Extended a → Value #

toEncoding ∷ Extended a → Encoding #

toJSONList ∷ [Extended a] → Value #

toEncodingList ∷ [Extended a] → Encoding #

ToJSON a ⇒ ToJSON (Interval a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

toJSON ∷ Interval a → Value #

toEncoding ∷ Interval a → Encoding #

toJSONList ∷ [Interval a] → Value #

toEncodingList ∷ [Interval a] → Encoding #

ToJSON a ⇒ ToJSON (LowerBound a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

toJSON ∷ LowerBound a → Value #

toEncoding ∷ LowerBound a → Encoding #

toJSONList ∷ [LowerBound a] → Value #

toEncodingList ∷ [LowerBound a] → Encoding #

ToJSON a ⇒ ToJSON (UpperBound a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

toJSON ∷ UpperBound a → Value #

toEncoding ∷ UpperBound a → Encoding #

toJSONList ∷ [UpperBound a] → Value #

toEncodingList ∷ [UpperBound a] → Encoding #

ToJSON a ⇒ ToJSON (Ratio a) 
Instance details

Defined in PlutusTx.Ratio

Methods

toJSON ∷ Ratio a → Value #

toEncoding ∷ Ratio a → Encoding #

toJSONList ∷ [Ratio a] → Value #

toEncodingList ∷ [Ratio a] → Encoding #

ToJSON (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

toJSON ∷ StakeCreds crypto → Value #

toEncoding ∷ StakeCreds crypto → Encoding #

toJSONList ∷ [StakeCreds crypto] → Value #

toEncodingList ∷ [StakeCreds crypto] → Encoding #

ToJSON (Stake crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Stake crypto → Value #

toEncoding ∷ Stake crypto → Encoding #

toJSONList ∷ [Stake crypto] → Value #

toEncodingList ∷ [Stake crypto] → Encoding #

Crypto crypto ⇒ ToJSON (RewardUpdate crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ RewardUpdate crypto → Value #

toEncoding ∷ RewardUpdate crypto → Encoding #

toJSONList ∷ [RewardUpdate crypto] → Value #

toEncodingList ∷ [RewardUpdate crypto] → Encoding #

ToJSON (Reward crypto) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Reward crypto → Value #

toEncoding ∷ Reward crypto → Encoding #

toJSONList ∷ [Reward crypto] → Value #

toEncodingList ∷ [Reward crypto] → Encoding #

ToJSON d ⇒ ToJSON (LinearTransform d) 
Instance details

Defined in Statistics.Distribution.Transform

Methods

toJSON ∷ LinearTransform d → Value #

toEncoding ∷ LinearTransform d → Encoding #

toJSONList ∷ [LinearTransform d] → Value #

toEncodingList ∷ [LinearTransform d] → Encoding #

ToJSON (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

toJSON ∷ SimpleScript lang → Value #

toEncoding ∷ SimpleScript lang → Encoding #

toJSONList ∷ [SimpleScript lang] → Value #

toEncodingList ∷ [SimpleScript lang] → Encoding #

IsCardanoEra era ⇒ ToJSON (AddressInEra era) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

toJSON ∷ AddressInEra era → Value #

toEncoding ∷ AddressInEra era → Encoding #

toJSONList ∷ [AddressInEra era] → Value #

toEncodingList ∷ [AddressInEra era] → Encoding #

ToJSON (TxOutValue era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxOutValue era → Value #

toEncoding ∷ TxOutValue era → Encoding #

toJSONList ∷ [TxOutValue era] → Value #

toEncodingList ∷ [TxOutValue era] → Encoding #

ToJSON (MultiAssetSupportedInEra era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ MultiAssetSupportedInEra era → Value #

toEncoding ∷ MultiAssetSupportedInEra era → Encoding #

toJSONList ∷ [MultiAssetSupportedInEra era] → Value #

toEncodingList ∷ [MultiAssetSupportedInEra era] → Encoding #

IsCardanoEra era ⇒ ToJSON (TxOut era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

toJSON ∷ TxOut era → Value #

toEncoding ∷ TxOut era → Encoding #

toJSONList ∷ [TxOut era] → Value #

toEncodingList ∷ [TxOut era] → Encoding #

(IsShelleyBasedEra era, ShelleyLedgerEra era ~ ledgerera, ShelleyBasedEra ledgerera, ToJSON (PParams ledgerera), ToJSON (PParamsDelta ledgerera), ToJSON (TxOut ledgerera)) ⇒ ToJSON (DebugLedgerState era) Source # 
Instance details

Defined in Cardano.Api.Query

Methods

toJSON ∷ DebugLedgerState era → Value #

toEncoding ∷ DebugLedgerState era → Encoding #

toJSONList ∷ [DebugLedgerState era] → Value #

toEncodingList ∷ [DebugLedgerState era] → Encoding #

IsCardanoEra era ⇒ ToJSON (UTxO era) Source # 
Instance details

Defined in Cardano.Api.Query

Methods

toJSON ∷ UTxO era → Value #

toEncoding ∷ UTxO era → Encoding #

toJSONList ∷ [UTxO era] → Value #

toEncodingList ∷ [UTxO era] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (Either a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Either a b → Value #

toEncoding ∷ Either a b → Encoding #

toJSONList ∷ [Either a b] → Value #

toEncodingList ∷ [Either a b] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (a, b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b) → Value #

toEncoding ∷ (a, b) → Encoding #

toJSONList ∷ [(a, b)] → Value #

toEncodingList ∷ [(a, b)] → Encoding #

(ToJSON v, ToJSONKey k) ⇒ ToJSON (Map k v) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Map k v → Value #

toEncoding ∷ Map k v → Encoding #

toJSONList ∷ [Map k v] → Value #

toEncodingList ∷ [Map k v] → Encoding #

ToJSON (Proxy a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Proxy a → Value #

toEncoding ∷ Proxy a → Encoding #

toJSONList ∷ [Proxy a] → Value #

toEncodingList ∷ [Proxy a] → Encoding #

HasResolution a ⇒ ToJSON (Fixed a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Fixed a → Value #

toEncoding ∷ Fixed a → Encoding #

toJSONList ∷ [Fixed a] → Value #

toEncodingList ∷ [Fixed a] → Encoding #

(ToJSON v, ToJSONKey k) ⇒ ToJSON (HashMap k v) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ HashMap k v → Value #

toEncoding ∷ HashMap k v → Encoding #

toJSONList ∷ [HashMap k v] → Value #

toEncodingList ∷ [HashMap k v] → Encoding #

ToJSON b ⇒ ToJSON (Annotated b a) 
Instance details

Defined in Cardano.Binary.Annotated

Methods

toJSON ∷ Annotated b a → Value #

toEncoding ∷ Annotated b a → Encoding #

toJSONList ∷ [Annotated b a] → Value #

toEncodingList ∷ [Annotated b a] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (Either a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Either a b → Value #

toEncoding ∷ Either a b → Encoding #

toJSONList ∷ [Either a b] → Value #

toEncodingList ∷ [Either a b] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (These a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ These a b → Value #

toEncoding ∷ These a b → Encoding #

toJSONList ∷ [These a b] → Value #

toEncodingList ∷ [These a b] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (These a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ These a b → Value #

toEncoding ∷ These a b → Encoding #

toJSONList ∷ [These a b] → Value #

toEncodingList ∷ [These a b] → Encoding #

(ToJSON a, ToJSON b) ⇒ ToJSON (Pair a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Pair a b → Value #

toEncoding ∷ Pair a b → Encoding #

toJSONList ∷ [Pair a b] → Value #

toEncodingList ∷ [Pair a b] → Encoding #

ToJSON (Hash crypto a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

toJSON ∷ Hash crypto a → Value #

toEncoding ∷ Hash crypto a → Encoding #

toJSONList ∷ [Hash crypto a] → Value #

toEncodingList ∷ [Hash crypto a] → Encoding #

ToJSON (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

toJSON ∷ KeyHash disc crypto → Value #

toEncoding ∷ KeyHash disc crypto → Encoding #

toJSONList ∷ [KeyHash disc crypto] → Value #

toEncodingList ∷ [KeyHash disc crypto] → Encoding #

ToJSON (SafeHash c a) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ SafeHash c a → Value #

toEncoding ∷ SafeHash c a → Encoding #

toJSONList ∷ [SafeHash c a] → Value #

toEncodingList ∷ [SafeHash c a] → Encoding #

ToJSON (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

toJSON ∷ Credential kr crypto → Value #

toEncoding ∷ Credential kr crypto → Encoding #

toJSONList ∷ [Credential kr crypto] → Value #

toEncodingList ∷ [Credential kr crypto] → Encoding #

ToJSON (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

toJSON ∷ AbstractHash algo a → Value #

toEncoding ∷ AbstractHash algo a → Encoding #

toJSONList ∷ [AbstractHash algo a] → Value #

toEncodingList ∷ [AbstractHash algo a] → Encoding #

ToJSON (Bimap Ptr (Credential 'Staking crypto)) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

toJSON ∷ Bimap Ptr (Credential 'Staking crypto) → Value #

toEncoding ∷ Bimap Ptr (Credential 'Staking crypto) → Encoding #

toJSONList ∷ [Bimap Ptr (Credential 'Staking crypto)] → Value #

toEncodingList ∷ [Bimap Ptr (Credential 'Staking crypto)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c) ⇒ ToJSON (a, b, c) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c) → Value #

toEncoding ∷ (a, b, c) → Encoding #

toJSONList ∷ [(a, b, c)] → Value #

toEncodingList ∷ [(a, b, c)] → Encoding #

ToJSON a ⇒ ToJSON (Const a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Const a b → Value #

toEncoding ∷ Const a b → Encoding #

toJSONList ∷ [Const a b] → Value #

toEncodingList ∷ [Const a b] → Encoding #

ToJSON b ⇒ ToJSON (Tagged a b) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Tagged a b → Value #

toEncoding ∷ Tagged a b → Encoding #

toJSONList ∷ [Tagged a b] → Value #

toEncodingList ∷ [Tagged a b] → Encoding #

(ToJSON1 f, ToJSON1 g, ToJSON a) ⇒ ToJSON (These1 f g a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ These1 f g a → Value #

toEncoding ∷ These1 f g a → Encoding #

toJSONList ∷ [These1 f g a] → Value #

toEncodingList ∷ [These1 f g a] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d) ⇒ ToJSON (a, b, c, d) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d) → Value #

toEncoding ∷ (a, b, c, d) → Encoding #

toJSONList ∷ [(a, b, c, d)] → Value #

toEncodingList ∷ [(a, b, c, d)] → Encoding #

(ToJSON1 f, ToJSON1 g, ToJSON a) ⇒ ToJSON (Product f g a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Product f g a → Value #

toEncoding ∷ Product f g a → Encoding #

toJSONList ∷ [Product f g a] → Value #

toEncodingList ∷ [Product f g a] → Encoding #

(ToJSON1 f, ToJSON1 g, ToJSON a) ⇒ ToJSON (Sum f g a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Sum f g a → Value #

toEncoding ∷ Sum f g a → Encoding #

toJSONList ∷ [Sum f g a] → Value #

toEncodingList ∷ [Sum f g a] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e) ⇒ ToJSON (a, b, c, d, e) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e) → Value #

toEncoding ∷ (a, b, c, d, e) → Encoding #

toJSONList ∷ [(a, b, c, d, e)] → Value #

toEncodingList ∷ [(a, b, c, d, e)] → Encoding #

(ToJSON1 f, ToJSON1 g, ToJSON a) ⇒ ToJSON (Compose f g a) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ Compose f g a → Value #

toEncoding ∷ Compose f g a → Encoding #

toJSONList ∷ [Compose f g a] → Value #

toEncodingList ∷ [Compose f g a] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f) ⇒ ToJSON (a, b, c, d, e, f) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f) → Value #

toEncoding ∷ (a, b, c, d, e, f) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g) ⇒ ToJSON (a, b, c, d, e, f, g) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g) → Value #

toEncoding ∷ (a, b, c, d, e, f, g) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h) ⇒ ToJSON (a, b, c, d, e, f, g, h) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i) ⇒ ToJSON (a, b, c, d, e, f, g, h, i) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j, ToJSON k) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j, k) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j, k) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j, k) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j, k)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j, k)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j, ToJSON k, ToJSON l) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j, k, l) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j, k, l) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j, k, l) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j, ToJSON k, ToJSON l, ToJSON m) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j, k, l, m) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j, ToJSON k, ToJSON l, ToJSON m, ToJSON n) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j, k, l, m, n) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m, n) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m, n) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m, n)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m, n)] → Encoding #

(ToJSON a, ToJSON b, ToJSON c, ToJSON d, ToJSON e, ToJSON f, ToJSON g, ToJSON h, ToJSON i, ToJSON j, ToJSON k, ToJSON l, ToJSON m, ToJSON n, ToJSON o) ⇒ ToJSON (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o) 
Instance details

Defined in Data.Aeson.Types.ToJSON

Methods

toJSON ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o) → Value #

toEncoding ∷ (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o) → Encoding #

toJSONList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m, n, o)] → Value #

toEncodingList ∷ [(a, b, c, d, e, f, g, h, i, j, k, l, m, n, o)] → Encoding #

class FromJSON a #

Instances

Instances details
FromJSON Bool 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Bool #

parseJSONList ∷ Value → Parser [Bool] #

FromJSON Char 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Char #

parseJSONList ∷ Value → Parser [Char] #

FromJSON Double 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Double #

parseJSONList ∷ Value → Parser [Double] #

FromJSON Float 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Float #

parseJSONList ∷ Value → Parser [Float] #

FromJSON Int 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Int #

parseJSONList ∷ Value → Parser [Int] #

FromJSON Int8 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Int8 #

parseJSONList ∷ Value → Parser [Int8] #

FromJSON Int16 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Int16 #

parseJSONList ∷ Value → Parser [Int16] #

FromJSON Int32 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Int32 #

parseJSONList ∷ Value → Parser [Int32] #

FromJSON Int64 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Int64 #

parseJSONList ∷ Value → Parser [Int64] #

FromJSON Integer 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Integer #

parseJSONList ∷ Value → Parser [Integer] #

FromJSON Natural 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Natural #

parseJSONList ∷ Value → Parser [Natural] #

FromJSON Ordering 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Ordering #

parseJSONList ∷ Value → Parser [Ordering] #

FromJSON Word 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Word #

parseJSONList ∷ Value → Parser [Word] #

FromJSON Word8 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Word8 #

parseJSONList ∷ Value → Parser [Word8] #

FromJSON Word16 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Word16 #

parseJSONList ∷ Value → Parser [Word16] #

FromJSON Word32 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Word32 #

parseJSONList ∷ Value → Parser [Word32] #

FromJSON Word64 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Word64 #

parseJSONList ∷ Value → Parser [Word64] #

FromJSON () 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser () #

parseJSONList ∷ Value → Parser [()] #

FromJSON Version 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Version #

parseJSONList ∷ Value → Parser [Version] #

FromJSON Void 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Void #

parseJSONList ∷ Value → Parser [Void] #

FromJSON CTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser CTime #

parseJSONList ∷ Value → Parser [CTime] #

FromJSON IntSet 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser IntSet #

parseJSONList ∷ Value → Parser [IntSet] #

FromJSON Text 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Text #

parseJSONList ∷ Value → Parser [Text] #

FromJSON Text 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Text #

parseJSONList ∷ Value → Parser [Text] #

FromJSON ZonedTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser ZonedTime #

parseJSONList ∷ Value → Parser [ZonedTime] #

FromJSON LocalTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser LocalTime #

parseJSONList ∷ Value → Parser [LocalTime] #

FromJSON TimeOfDay 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser TimeOfDay #

parseJSONList ∷ Value → Parser [TimeOfDay] #

FromJSON CalendarDiffTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser CalendarDiffTime #

parseJSONList ∷ Value → Parser [CalendarDiffTime] #

FromJSON UTCTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser UTCTime #

parseJSONList ∷ Value → Parser [UTCTime] #

FromJSON SystemTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser SystemTime #

parseJSONList ∷ Value → Parser [SystemTime] #

FromJSON NominalDiffTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser NominalDiffTime #

parseJSONList ∷ Value → Parser [NominalDiffTime] #

FromJSON DiffTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser DiffTime #

parseJSONList ∷ Value → Parser [DiffTime] #

FromJSON DayOfWeek 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser DayOfWeek #

parseJSONList ∷ Value → Parser [DayOfWeek] #

FromJSON Day 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Day #

parseJSONList ∷ Value → Parser [Day] #

FromJSON CalendarDiffDays 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser CalendarDiffDays #

parseJSONList ∷ Value → Parser [CalendarDiffDays] #

FromJSON Scientific 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Scientific #

parseJSONList ∷ Value → Parser [Scientific] #

FromJSON DotNetTime 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser DotNetTime #

parseJSONList ∷ Value → Parser [DotNetTime] #

FromJSON Value 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Value #

parseJSONList ∷ Value → Parser [Value] #

FromJSON EpochNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

parseJSON ∷ Value → Parser EpochNo #

parseJSONList ∷ Value → Parser [EpochNo] #

FromJSON EpochSize 
Instance details

Defined in Cardano.Slotting.Slot

Methods

parseJSON ∷ Value → Parser EpochSize #

parseJSONList ∷ Value → Parser [EpochSize] #

FromJSON SlotNo 
Instance details

Defined in Cardano.Slotting.Slot

Methods

parseJSON ∷ Value → Parser SlotNo #

parseJSONList ∷ Value → Parser [SlotNo] #

FromJSON UUID 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser UUID #

parseJSONList ∷ Value → Parser [UUID] #

FromJSON Coin 
Instance details

Defined in Cardano.Ledger.Coin

Methods

parseJSON ∷ Value → Parser Coin #

parseJSONList ∷ Value → Parser [Coin] #

FromJSON UnitInterval 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser UnitInterval #

parseJSONList ∷ Value → Parser [UnitInterval] #

FromJSON ProtVer 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

parseJSON ∷ Value → Parser ProtVer #

parseJSONList ∷ Value → Parser [ProtVer] #

FromJSON AlonzoGenesis Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser AlonzoGenesis #

parseJSONList ∷ Value → Parser [AlonzoGenesis] #

FromJSON Language Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser Language #

parseJSONList ∷ Value → Parser [Language] #

FromJSON CostModel Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser CostModel #

parseJSONList ∷ Value → Parser [CostModel] #

FromJSON Prices Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser Prices #

parseJSONList ∷ Value → Parser [Prices] #

FromJSON ExUnits Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser ExUnits #

parseJSONList ∷ Value → Parser [ExUnits] #

FromJSON AssetClass 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

parseJSON ∷ Value → Parser AssetClass #

parseJSONList ∷ Value → Parser [AssetClass] #

FromJSON CurrencySymbol 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

parseJSON ∷ Value → Parser CurrencySymbol #

parseJSONList ∷ Value → Parser [CurrencySymbol] #

FromJSON TokenName 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

parseJSON ∷ Value → Parser TokenName #

parseJSONList ∷ Value → Parser [TokenName] #

FromJSON Value 
Instance details

Defined in Plutus.V1.Ledger.Value

Methods

parseJSON ∷ Value0 → Parser Value #

parseJSONList ∷ Value0 → Parser [Value] #

FromJSON MonetaryPolicyHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser MonetaryPolicyHash #

parseJSONList ∷ Value → Parser [MonetaryPolicyHash] #

FromJSON Context 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser Context #

parseJSONList ∷ Value → Parser [Context] #

FromJSON Datum 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser Datum #

parseJSONList ∷ Value → Parser [Datum] #

FromJSON DatumHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser DatumHash #

parseJSONList ∷ Value → Parser [DatumHash] #

FromJSON MonetaryPolicy 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser MonetaryPolicy #

parseJSONList ∷ Value → Parser [MonetaryPolicy] #

FromJSON Redeemer 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser Redeemer #

parseJSONList ∷ Value → Parser [Redeemer] #

FromJSON RedeemerHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser RedeemerHash #

parseJSONList ∷ Value → Parser [RedeemerHash] #

FromJSON Script 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser Script #

parseJSONList ∷ Value → Parser [Script] #

FromJSON ScriptError 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser ScriptError #

parseJSONList ∷ Value → Parser [ScriptError] #

FromJSON Validator 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser Validator #

parseJSONList ∷ Value → Parser [Validator] #

FromJSON ValidatorHash 
Instance details

Defined in Plutus.V1.Ledger.Scripts

Methods

parseJSON ∷ Value → Parser ValidatorHash #

parseJSONList ∷ Value → Parser [ValidatorHash] #

FromJSON Nonce 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser Nonce #

parseJSONList ∷ Value → Parser [Nonce] #

FromJSON Desirability 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

parseJSON ∷ Value → Parser Desirability #

parseJSONList ∷ Value → Parser [Desirability] #

FromJSON StakePoolRelay 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

parseJSON ∷ Value → Parser StakePoolRelay #

parseJSONList ∷ Value → Parser [StakePoolRelay] #

FromJSON PoolMetadata 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

parseJSON ∷ Value → Parser PoolMetadata #

parseJSONList ∷ Value → Parser [PoolMetadata] #

FromJSON Network 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser Network #

parseJSONList ∷ Value → Parser [Network] #

FromJSON Month 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Month #

parseJSONList ∷ Value → Parser [Month] #

FromJSON Quarter 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser Quarter #

parseJSONList ∷ Value → Parser [Quarter] #

FromJSON QuarterOfYear 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser QuarterOfYear #

parseJSONList ∷ Value → Parser [QuarterOfYear] #

FromJSON RequiresNetworkMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

parseJSON ∷ Value → Parser RequiresNetworkMagic #

parseJSONList ∷ Value → Parser [RequiresNetworkMagic] #

FromJSON ProtocolMagicId 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

parseJSON ∷ Value → Parser ProtocolMagicId #

parseJSONList ∷ Value → Parser [ProtocolMagicId] #

FromJSON VerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.VerificationKey

Methods

parseJSON ∷ Value → Parser VerificationKey #

parseJSONList ∷ Value → Parser [VerificationKey] #

FromJSON ProtocolMagic 
Instance details

Defined in Cardano.Crypto.ProtocolMagic

Methods

parseJSON ∷ Value → Parser ProtocolMagic #

parseJSONList ∷ Value → Parser [ProtocolMagic] #

FromJSON CompactRedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Compact

Methods

parseJSON ∷ Value → Parser CompactRedeemVerificationKey #

parseJSONList ∷ Value → Parser [CompactRedeemVerificationKey] #

FromJSON ByteString64 
Instance details

Defined in Data.ByteString.Base64.Type

Methods

parseJSON ∷ Value → Parser ByteString64 #

parseJSONList ∷ Value → Parser [ByteString64] #

FromJSON RedeemVerificationKey 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.VerificationKey

Methods

parseJSON ∷ Value → Parser RedeemVerificationKey #

parseJSONList ∷ Value → Parser [RedeemVerificationKey] #

FromJSON CekMachineCosts 
Instance details

Defined in UntypedPlutusCore.Evaluation.Machine.Cek.CekMachineCosts

Methods

parseJSON ∷ Value → Parser CekMachineCosts #

parseJSONList ∷ Value → Parser [CekMachineCosts] #

FromJSON DnsName 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser DnsName #

parseJSONList ∷ Value → Parser [DnsName] #

FromJSON Port 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser Port #

parseJSONList ∷ Value → Parser [Port] #

FromJSON Url 
Instance details

Defined in Cardano.Ledger.BaseTypes

Methods

parseJSON ∷ Value → Parser Url #

parseJSONList ∷ Value → Parser [Url] #

FromJSON ModelAddedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelAddedSizes #

parseJSONList ∷ Value → Parser [ModelAddedSizes] #

FromJSON ModelLinearSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelLinearSize #

parseJSONList ∷ Value → Parser [ModelLinearSize] #

FromJSON ModelMaxSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelMaxSize #

parseJSONList ∷ Value → Parser [ModelMaxSize] #

FromJSON ModelMinSize 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelMinSize #

parseJSONList ∷ Value → Parser [ModelMinSize] #

FromJSON ModelMultipliedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelMultipliedSizes #

parseJSONList ∷ Value → Parser [ModelMultipliedSizes] #

FromJSON ModelOneArgument 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelOneArgument #

parseJSONList ∷ Value → Parser [ModelOneArgument] #

FromJSON ModelOrientation 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelOrientation #

parseJSONList ∷ Value → Parser [ModelOrientation] #

FromJSON ModelSplitConst 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelSplitConst #

parseJSONList ∷ Value → Parser [ModelSplitConst] #

FromJSON ModelSubtractedSizes 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelSubtractedSizes #

parseJSONList ∷ Value → Parser [ModelSubtractedSizes] #

FromJSON ModelThreeArguments 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelThreeArguments #

parseJSONList ∷ Value → Parser [ModelThreeArguments] #

FromJSON ModelTwoArguments 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser ModelTwoArguments #

parseJSONList ∷ Value → Parser [ModelTwoArguments] #

FromJSON ExMemory 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExMemory

Methods

parseJSON ∷ Value → Parser ExMemory #

parseJSONList ∷ Value → Parser [ExMemory] #

FromJSON ExBudget 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExBudget

Methods

parseJSON ∷ Value → Parser ExBudget #

parseJSONList ∷ Value → Parser [ExBudget] #

FromJSON ExCPU 
Instance details

Defined in PlutusCore.Evaluation.Machine.ExMemory

Methods

parseJSON ∷ Value → Parser ExCPU #

parseJSONList ∷ Value → Parser [ExCPU] #

FromJSON Ada 
Instance details

Defined in Plutus.V1.Ledger.Ada

Methods

parseJSON ∷ Value → Parser Ada #

parseJSONList ∷ Value → Parser [Ada] #

FromJSON Address 
Instance details

Defined in Plutus.V1.Ledger.Address

Methods

parseJSON ∷ Value → Parser Address #

parseJSONList ∷ Value → Parser [Address] #

FromJSON Credential 
Instance details

Defined in Plutus.V1.Ledger.Credential

Methods

parseJSON ∷ Value → Parser Credential #

parseJSONList ∷ Value → Parser [Credential] #

FromJSON StakingCredential 
Instance details

Defined in Plutus.V1.Ledger.Credential

Methods

parseJSON ∷ Value → Parser StakingCredential #

parseJSONList ∷ Value → Parser [StakingCredential] #

FromJSON PubKeyHash 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

parseJSON ∷ Value → Parser PubKeyHash #

parseJSONList ∷ Value → Parser [PubKeyHash] #

FromJSON PubKey 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

parseJSON ∷ Value → Parser PubKey #

parseJSONList ∷ Value → Parser [PubKey] #

FromJSON LedgerBytes 
Instance details

Defined in Plutus.V1.Ledger.Bytes

Methods

parseJSON ∷ Value → Parser LedgerBytes #

parseJSONList ∷ Value → Parser [LedgerBytes] #

FromJSON TxOut 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser TxOut #

parseJSONList ∷ Value → Parser [TxOut] #

FromJSON TxOutRef 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser TxOutRef #

parseJSONList ∷ Value → Parser [TxOutRef] #

FromJSON DCert 
Instance details

Defined in Plutus.V1.Ledger.DCert

Methods

parseJSON ∷ Value → Parser DCert #

parseJSONList ∷ Value → Parser [DCert] #

FromJSON TxId 
Instance details

Defined in Plutus.V1.Ledger.TxId

Methods

parseJSON ∷ Value → Parser TxId #

parseJSONList ∷ Value → Parser [TxId] #

FromJSON POSIXTime 
Instance details

Defined in Plutus.V1.Ledger.Time

Methods

parseJSON ∷ Value → Parser POSIXTime #

parseJSONList ∷ Value → Parser [POSIXTime] #

FromJSON Signature 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

parseJSON ∷ Value → Parser Signature #

parseJSONList ∷ Value → Parser [Signature] #

FromJSON PrivateKey 
Instance details

Defined in Plutus.V1.Ledger.Crypto

Methods

parseJSON ∷ Value → Parser PrivateKey #

parseJSONList ∷ Value → Parser [PrivateKey] #

FromJSON Slot 
Instance details

Defined in Plutus.V1.Ledger.Slot

Methods

parseJSON ∷ Value → Parser Slot #

parseJSONList ∷ Value → Parser [Slot] #

FromJSON Tx 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser Tx #

parseJSONList ∷ Value → Parser [Tx] #

FromJSON TxIn 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser TxIn #

parseJSONList ∷ Value → Parser [TxIn] #

FromJSON TxInType 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser TxInType #

parseJSONList ∷ Value → Parser [TxInType] #

FromJSON TxOutTx 
Instance details

Defined in Plutus.V1.Ledger.Tx

Methods

parseJSON ∷ Value → Parser TxOutTx #

parseJSONList ∷ Value → Parser [TxOutTx] #

FromJSON StudentT 
Instance details

Defined in Statistics.Distribution.StudentT

Methods

parseJSON ∷ Value → Parser StudentT #

parseJSONList ∷ Value → Parser [StudentT] #

FromJSON TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelope #

parseJSONList ∷ Value → Parser [TextEnvelope] #

FromJSON TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelopeDescr #

parseJSONList ∷ Value → Parser [TextEnvelopeDescr] #

FromJSON TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelopeType #

parseJSONList ∷ Value → Parser [TextEnvelopeType] #

FromJSON ExecutionUnits Source # 
Instance details

Defined in Cardano.Api.Script

Methods

parseJSON ∷ Value → Parser ExecutionUnits #

parseJSONList ∷ Value → Parser [ExecutionUnits] #

FromJSON AnyPlutusScriptVersion Source # 
Instance details

Defined in Cardano.Api.Script

Methods

parseJSON ∷ Value → Parser AnyPlutusScriptVersion #

parseJSONList ∷ Value → Parser [AnyPlutusScriptVersion] #

FromJSON StakePoolMetadata Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

parseJSON ∷ Value → Parser StakePoolMetadata #

parseJSONList ∷ Value → Parser [StakePoolMetadata] #

FromJSON ValueNestedRep Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value → Parser ValueNestedRep #

parseJSONList ∷ Value → Parser [ValueNestedRep] #

FromJSON Value Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value0 → Parser Value #

parseJSONList ∷ Value0 → Parser [Value] #

FromJSON AssetName Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value → Parser AssetName #

parseJSONList ∷ Value → Parser [AssetName] #

FromJSON Quantity Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value → Parser Quantity #

parseJSONList ∷ Value → Parser [Quantity] #

FromJSON Lovelace Source # 
Instance details

Defined in Cardano.Api.Value

Methods

parseJSON ∷ Value → Parser Lovelace #

parseJSONList ∷ Value → Parser [Lovelace] #

FromJSON CostModel Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

parseJSON ∷ Value → Parser CostModel #

parseJSONList ∷ Value → Parser [CostModel] #

FromJSON ExecutionUnitPrices Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

parseJSON ∷ Value → Parser ExecutionUnitPrices #

parseJSONList ∷ Value → Parser [ExecutionUnitPrices] #

FromJSON PraosNonce Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

parseJSON ∷ Value → Parser PraosNonce #

parseJSONList ∷ Value → Parser [PraosNonce] #

FromJSON ProtocolParameters Source # 
Instance details

Defined in Cardano.Api.ProtocolParameters

Methods

parseJSON ∷ Value → Parser ProtocolParameters #

parseJSONList ∷ Value → Parser [ProtocolParameters] #

FromJSON a ⇒ FromJSON [a] 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser [a] #

parseJSONList ∷ Value → Parser [[a]] #

FromJSON a ⇒ FromJSON (Maybe a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Maybe a) #

parseJSONList ∷ Value → Parser [Maybe a] #

(FromJSON a, Integral a) ⇒ FromJSON (Ratio a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Ratio a) #

parseJSONList ∷ Value → Parser [Ratio a] #

FromJSON a ⇒ FromJSON (First a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (First a) #

parseJSONList ∷ Value → Parser [First a] #

FromJSON a ⇒ FromJSON (Last a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Last a) #

parseJSONList ∷ Value → Parser [Last a] #

(Ord a, FromJSON a) ⇒ FromJSON (Set a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Set a) #

parseJSONList ∷ Value → Parser [Set a] #

FromJSON a ⇒ FromJSON (NonEmpty a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (NonEmpty a) #

parseJSONList ∷ Value → Parser [NonEmpty a] #

FromJSON a ⇒ FromJSON (Identity a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Identity a) #

parseJSONList ∷ Value → Parser [Identity a] #

FromJSON a ⇒ FromJSON (Min a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Min a) #

parseJSONList ∷ Value → Parser [Min a] #

FromJSON a ⇒ FromJSON (Max a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Max a) #

parseJSONList ∷ Value → Parser [Max a] #

FromJSON a ⇒ FromJSON (WrappedMonoid a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (WrappedMonoid a) #

parseJSONList ∷ Value → Parser [WrappedMonoid a] #

FromJSON a ⇒ FromJSON (Option a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Option a) #

parseJSONList ∷ Value → Parser [Option a] #

FromJSON a ⇒ FromJSON (First a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (First a) #

parseJSONList ∷ Value → Parser [First a] #

FromJSON a ⇒ FromJSON (Last a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Last a) #

parseJSONList ∷ Value → Parser [Last a] #

FromJSON a ⇒ FromJSON (Dual a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Dual a) #

parseJSONList ∷ Value → Parser [Dual a] #

FromJSON a ⇒ FromJSON (IntMap a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (IntMap a) #

parseJSONList ∷ Value → Parser [IntMap a] #

FromJSON v ⇒ FromJSON (Tree v) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Tree v) #

parseJSONList ∷ Value → Parser [Tree v] #

FromJSON a ⇒ FromJSON (Seq a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Seq a) #

parseJSONList ∷ Value → Parser [Seq a] #

(Vector Vector a, FromJSON a) ⇒ FromJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Vector a) #

parseJSONList ∷ Value → Parser [Vector a] #

FromJSON a ⇒ FromJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Vector a) #

parseJSONList ∷ Value → Parser [Vector a] #

FromJSON1 f ⇒ FromJSON (Fix f) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Fix f) #

parseJSONList ∷ Value → Parser [Fix f] #

(FromJSON1 f, Functor f) ⇒ FromJSON (Mu f) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Mu f) #

parseJSONList ∷ Value → Parser [Mu f] #

(FromJSON1 f, Functor f) ⇒ FromJSON (Nu f) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Nu f) #

parseJSONList ∷ Value → Parser [Nu f] #

FromJSON a ⇒ FromJSON (DNonEmpty a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (DNonEmpty a) #

parseJSONList ∷ Value → Parser [DNonEmpty a] #

FromJSON a ⇒ FromJSON (DList a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (DList a) #

parseJSONList ∷ Value → Parser [DList a] #

FromJSON a ⇒ FromJSON (Array a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Array a) #

parseJSONList ∷ Value → Parser [Array a] #

(Prim a, FromJSON a) ⇒ FromJSON (PrimArray a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (PrimArray a) #

parseJSONList ∷ Value → Parser [PrimArray a] #

FromJSON a ⇒ FromJSON (SmallArray a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (SmallArray a) #

parseJSONList ∷ Value → Parser [SmallArray a] #

FromJSON a ⇒ FromJSON (Maybe a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Maybe a) #

parseJSONList ∷ Value → Parser [Maybe a] #

(Eq a, Hashable a, FromJSON a) ⇒ FromJSON (HashSet a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (HashSet a) #

parseJSONList ∷ Value → Parser [HashSet a] #

(Prim a, FromJSON a) ⇒ FromJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Vector a) #

parseJSONList ∷ Value → Parser [Vector a] #

(Storable a, FromJSON a) ⇒ FromJSON (Vector a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Vector a) #

parseJSONList ∷ Value → Parser [Vector a] #

Crypto crypto ⇒ FromJSON (ScriptHash crypto) 
Instance details

Defined in Cardano.Ledger.Hashes

Methods

parseJSON ∷ Value → Parser (ScriptHash crypto) #

parseJSONList ∷ Value → Parser [ScriptHash crypto] #

FromJSON a ⇒ FromJSON (StrictMaybe a) 
Instance details

Defined in Data.Maybe.Strict

Methods

parseJSON ∷ Value → Parser (StrictMaybe a) #

parseJSONList ∷ Value → Parser [StrictMaybe a] #

FromJSON (PParams era) Source # 
Instance details

Defined in Cardano.Api.Orphans

Methods

parseJSON ∷ Value → Parser (PParams era) #

parseJSONList ∷ Value → Parser [PParams era] #

FromJSON (PParams era) 
Instance details

Defined in Shelley.Spec.Ledger.PParams

Methods

parseJSON ∷ Value → Parser (PParams era) #

parseJSONList ∷ Value → Parser [PParams era] #

Crypto crypto ⇒ FromJSON (BlocksMade crypto) 
Instance details

Defined in Shelley.Spec.Ledger.EpochBoundary

Methods

parseJSON ∷ Value → Parser (BlocksMade crypto) #

parseJSONList ∷ Value → Parser [BlocksMade crypto] #

Era era ⇒ FromJSON (ShelleyGenesis era) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

parseJSON ∷ Value → Parser (ShelleyGenesis era) #

parseJSONList ∷ Value → Parser [ShelleyGenesis era] #

Crypto crypto ⇒ FromJSON (GenDelegPair crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

parseJSON ∷ Value → Parser (GenDelegPair crypto) #

parseJSONList ∷ Value → Parser [GenDelegPair crypto] #

Crypto crypto ⇒ FromJSON (Addr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

parseJSON ∷ Value → Parser (Addr crypto) #

parseJSONList ∷ Value → Parser [Addr crypto] #

Crypto crypto ⇒ FromJSON (ShelleyGenesisStaking crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Genesis

Methods

parseJSON ∷ Value → Parser (ShelleyGenesisStaking crypto) #

parseJSONList ∷ Value → Parser [ShelleyGenesisStaking crypto] #

Crypto crypto ⇒ FromJSON (PoolParams crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

parseJSON ∷ Value → Parser (PoolParams crypto) #

parseJSONList ∷ Value → Parser [PoolParams crypto] #

Crypto crypto ⇒ FromJSON (RewardProvenance crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

parseJSON ∷ Value → Parser (RewardProvenance crypto) #

parseJSONList ∷ Value → Parser [RewardProvenance crypto] #

Crypto crypto ⇒ FromJSON (RewardProvenancePool crypto) 
Instance details

Defined in Shelley.Spec.Ledger.RewardProvenance

Methods

parseJSON ∷ Value → Parser (RewardProvenancePool crypto) #

parseJSONList ∷ Value → Parser [RewardProvenancePool crypto] #

Crypto crypto ⇒ FromJSON (RewardAcnt crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Address

Methods

parseJSON ∷ Value → Parser (RewardAcnt crypto) #

parseJSONList ∷ Value → Parser [RewardAcnt crypto] #

FromJSON a ⇒ FromJSON (RedeemSignature a) 
Instance details

Defined in Cardano.Crypto.Signing.Redeem.Signature

Methods

parseJSON ∷ Value → Parser (RedeemSignature a) #

parseJSONList ∷ Value → Parser [RedeemSignature a] #

FromJSON (Signature w) 
Instance details

Defined in Cardano.Crypto.Signing.Signature

Methods

parseJSON ∷ Value → Parser (Signature w) #

parseJSONList ∷ Value → Parser [Signature w] #

FromJSON (BuiltinCostModelBase CostingFun) 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser (BuiltinCostModelBase CostingFun) #

parseJSONList ∷ Value → Parser [BuiltinCostModelBase CostingFun] #

FromJSON model ⇒ FromJSON (CostingFun model) 
Instance details

Defined in PlutusCore.Evaluation.Machine.BuiltinCostModel

Methods

parseJSON ∷ Value → Parser (CostingFun model) #

parseJSONList ∷ Value → Parser [CostingFun model] #

FromJSON a ⇒ FromJSON (Extended a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

parseJSON ∷ Value → Parser (Extended a) #

parseJSONList ∷ Value → Parser [Extended a] #

FromJSON a ⇒ FromJSON (Interval a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

parseJSON ∷ Value → Parser (Interval a) #

parseJSONList ∷ Value → Parser [Interval a] #

FromJSON a ⇒ FromJSON (LowerBound a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

parseJSON ∷ Value → Parser (LowerBound a) #

parseJSONList ∷ Value → Parser [LowerBound a] #

FromJSON a ⇒ FromJSON (UpperBound a) 
Instance details

Defined in Plutus.V1.Ledger.Interval

Methods

parseJSON ∷ Value → Parser (UpperBound a) #

parseJSONList ∷ Value → Parser [UpperBound a] #

FromJSON a ⇒ FromJSON (Ratio a) 
Instance details

Defined in PlutusTx.Ratio

Methods

parseJSON ∷ Value → Parser (Ratio a) #

parseJSONList ∷ Value → Parser [Ratio a] #

Crypto crypto ⇒ FromJSON (StakeCreds crypto) 
Instance details

Defined in Shelley.Spec.Ledger.TxBody

Methods

parseJSON ∷ Value → Parser (StakeCreds crypto) #

parseJSONList ∷ Value → Parser [StakeCreds crypto] #

FromJSON d ⇒ FromJSON (LinearTransform d) 
Instance details

Defined in Statistics.Distribution.Transform

Methods

parseJSON ∷ Value → Parser (LinearTransform d) #

parseJSONList ∷ Value → Parser [LinearTransform d] #

IsSimpleScriptLanguage lang ⇒ FromJSON (SimpleScript lang) Source # 
Instance details

Defined in Cardano.Api.Script

Methods

parseJSON ∷ Value → Parser (SimpleScript lang) #

parseJSONList ∷ Value → Parser [SimpleScript lang] #

(FromJSON a, FromJSON b) ⇒ FromJSON (Either a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Either a b) #

parseJSONList ∷ Value → Parser [Either a b] #

(FromJSON a, FromJSON b) ⇒ FromJSON (a, b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b) #

parseJSONList ∷ Value → Parser [(a, b)] #

(FromJSONKey k, Ord k, FromJSON v) ⇒ FromJSON (Map k v) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Map k v) #

parseJSONList ∷ Value → Parser [Map k v] #

FromJSON (Proxy a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Proxy a) #

parseJSONList ∷ Value → Parser [Proxy a] #

HasResolution a ⇒ FromJSON (Fixed a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Fixed a) #

parseJSONList ∷ Value → Parser [Fixed a] #

(FromJSON v, FromJSONKey k, Eq k, Hashable k) ⇒ FromJSON (HashMap k v) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (HashMap k v) #

parseJSONList ∷ Value → Parser [HashMap k v] #

FromJSON b ⇒ FromJSON (Annotated b ()) 
Instance details

Defined in Cardano.Binary.Annotated

Methods

parseJSON ∷ Value → Parser (Annotated b ()) #

parseJSONList ∷ Value → Parser [Annotated b ()] #

(FromJSON a, FromJSON b) ⇒ FromJSON (Either a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Either a b) #

parseJSONList ∷ Value → Parser [Either a b] #

(FromJSON a, FromJSON b) ⇒ FromJSON (These a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (These a b) #

parseJSONList ∷ Value → Parser [These a b] #

(FromJSON a, FromJSON b) ⇒ FromJSON (These a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (These a b) #

parseJSONList ∷ Value → Parser [These a b] #

(FromJSON a, FromJSON b) ⇒ FromJSON (Pair a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Pair a b) #

parseJSONList ∷ Value → Parser [Pair a b] #

HashAlgorithm crypto ⇒ FromJSON (Hash crypto a) 
Instance details

Defined in Cardano.Crypto.Hash.Class

Methods

parseJSON ∷ Value → Parser (Hash crypto a) #

parseJSONList ∷ Value → Parser [Hash crypto a] #

Crypto crypto ⇒ FromJSON (KeyHash disc crypto) 
Instance details

Defined in Cardano.Ledger.Keys

Methods

parseJSON ∷ Value → Parser (KeyHash disc crypto) #

parseJSONList ∷ Value → Parser [KeyHash disc crypto] #

Crypto crypto ⇒ FromJSON (Credential kr crypto) 
Instance details

Defined in Shelley.Spec.Ledger.Credential

Methods

parseJSON ∷ Value → Parser (Credential kr crypto) #

parseJSONList ∷ Value → Parser [Credential kr crypto] #

HashAlgorithm algo ⇒ FromJSON (AbstractHash algo a) 
Instance details

Defined in Cardano.Crypto.Hashing

Methods

parseJSON ∷ Value → Parser (AbstractHash algo a) #

parseJSONList ∷ Value → Parser [AbstractHash algo a] #

(FromJSON a, FromJSON b, FromJSON c) ⇒ FromJSON (a, b, c) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c) #

parseJSONList ∷ Value → Parser [(a, b, c)] #

FromJSON a ⇒ FromJSON (Const a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Const a b) #

parseJSONList ∷ Value → Parser [Const a b] #

FromJSON b ⇒ FromJSON (Tagged a b) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Tagged a b) #

parseJSONList ∷ Value → Parser [Tagged a b] #

(FromJSON1 f, FromJSON1 g, FromJSON a) ⇒ FromJSON (These1 f g a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (These1 f g a) #

parseJSONList ∷ Value → Parser [These1 f g a] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d) ⇒ FromJSON (a, b, c, d) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d) #

parseJSONList ∷ Value → Parser [(a, b, c, d)] #

(FromJSON1 f, FromJSON1 g, FromJSON a) ⇒ FromJSON (Product f g a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Product f g a) #

parseJSONList ∷ Value → Parser [Product f g a] #

(FromJSON1 f, FromJSON1 g, FromJSON a) ⇒ FromJSON (Sum f g a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Sum f g a) #

parseJSONList ∷ Value → Parser [Sum f g a] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e) ⇒ FromJSON (a, b, c, d, e) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e)] #

(FromJSON1 f, FromJSON1 g, FromJSON a) ⇒ FromJSON (Compose f g a) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (Compose f g a) #

parseJSONList ∷ Value → Parser [Compose f g a] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f) ⇒ FromJSON (a, b, c, d, e, f) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g) ⇒ FromJSON (a, b, c, d, e, f, g) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h) ⇒ FromJSON (a, b, c, d, e, f, g, h) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i) ⇒ FromJSON (a, b, c, d, e, f, g, h, i) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j, FromJSON k) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j, k) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j, k) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j, k)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j, FromJSON k, FromJSON l) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j, k, l) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j, k, l) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j, k, l)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j, FromJSON k, FromJSON l, FromJSON m) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j, k, l, m) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j, k, l, m) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j, k, l, m)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j, FromJSON k, FromJSON l, FromJSON m, FromJSON n) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j, k, l, m, n) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j, k, l, m, n) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j, k, l, m, n)] #

(FromJSON a, FromJSON b, FromJSON c, FromJSON d, FromJSON e, FromJSON f, FromJSON g, FromJSON h, FromJSON i, FromJSON j, FromJSON k, FromJSON l, FromJSON m, FromJSON n, FromJSON o) ⇒ FromJSON (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o) 
Instance details

Defined in Data.Aeson.Types.FromJSON

Methods

parseJSON ∷ Value → Parser (a, b, c, d, e, f, g, h, i, j, k, l, m, n, o) #

parseJSONList ∷ Value → Parser [(a, b, c, d, e, f, g, h, i, j, k, l, m, n, o)] #

serialiseToJSON ∷ ToJSON a ⇒ a → ByteString Source #

deserialiseFromJSON ∷ FromJSON a ⇒ AsType a → ByteString → Either JsonDecodeError a Source #

newtype JsonDecodeError Source #

Constructors

JsonDecodeError String 

Instances

Instances details
Eq JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

(==) ∷ JsonDecodeError → JsonDecodeError → Bool #

(/=) ∷ JsonDecodeError → JsonDecodeError → Bool #

Show JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

showsPrec ∷ Int → JsonDecodeError → ShowS #

show ∷ JsonDecodeError → String #

showList ∷ [JsonDecodeError] → ShowS #

Error JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

displayError ∷ JsonDecodeError → String Source #

readFileJSON ∷ FromJSON a ⇒ AsType a → FilePath → IO (Either (FileError JsonDecodeError) a) Source #

writeFileJSON ∷ ToJSON a ⇒ FilePath → a → IO (Either (FileError ()) ()) Source #

prettyPrintJSON ∷ ToJSON a ⇒ a → ByteString Source #

Bech32

class (HasTypeProxy a, SerialiseAsRawBytes a) ⇒ SerialiseAsBech32 a Source #

Minimal complete definition

bech32PrefixFor, bech32PrefixesPermitted

Instances

Instances details
SerialiseAsBech32 StakeAddress Source # 
Instance details

Defined in Cardano.Api.Address

Methods

bech32PrefixFor ∷ StakeAddress → Text Source #

bech32PrefixesPermitted ∷ AsType StakeAddress → [Text] Source #

SerialiseAsBech32 (Hash StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ Hash StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (Hash StakePoolKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey StakeKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ VerificationKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey VrfKey) → [Text] Source #

SerialiseAsBech32 (VerificationKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ VerificationKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (VerificationKey KesKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakePoolKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakePoolKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakePoolKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey StakeKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey StakeKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey StakeKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentExtendedKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentExtendedKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentExtendedKey) → [Text] Source #

SerialiseAsBech32 (SigningKey PaymentKey) Source # 
Instance details

Defined in Cardano.Api.KeysShelley

Methods

bech32PrefixFor ∷ SigningKey PaymentKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey PaymentKey) → [Text] Source #

SerialiseAsBech32 (SigningKey VrfKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey VrfKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey VrfKey) → [Text] Source #

SerialiseAsBech32 (SigningKey KesKey) Source # 
Instance details

Defined in Cardano.Api.KeysPraos

Methods

bech32PrefixFor ∷ SigningKey KesKey → Text Source #

bech32PrefixesPermitted ∷ AsType (SigningKey KesKey) → [Text] Source #

SerialiseAsBech32 (Address ShelleyAddr) Source # 
Instance details

Defined in Cardano.Api.Address

Methods

bech32PrefixFor ∷ Address ShelleyAddr → Text Source #

bech32PrefixesPermitted ∷ AsType (Address ShelleyAddr) → [Text] Source #

serialiseToBech32 ∷ SerialiseAsBech32 a ⇒ a → Text Source #

deserialiseFromBech32 ∷ SerialiseAsBech32 a ⇒ AsType a → Text → Either Bech32DecodeError a Source #

deserialiseAnyOfFromBech32 ∷ ∀ b. [FromSomeType SerialiseAsBech32 b] → Text → Either Bech32DecodeError b Source #

data Bech32DecodeError Source #

Bech32 decoding error.

Constructors

Bech32DecodingError !DecodingError

There was an error decoding the string as Bech32.

Bech32UnexpectedPrefix !Text !(Set Text)

The human-readable prefix in the Bech32-encoded string is not one of the ones expected.

Bech32DataPartToBytesError !Text

There was an error in extracting a ByteString from the data part of the Bech32-encoded string.

Bech32DeserialiseFromBytesError !ByteString

There was an error in deserialising the bytes into a value of the expected type.

Bech32WrongPrefix !Text !Text

The human-readable prefix in the Bech32-encoded string does not @@ -214,7 +214,7 @@ with an external format with a semi-readable textual format.

It contains a "type" field, e.g. "PublicKeyByron" or "TxSignedShelley" to indicate the type of the encoded data. This is used as a sanity check and to help readers.

It also contains a "title" field which is free-form, and could be used - to indicate the role or purpose to a reader.

Constructors

TextEnvelope 

Fields

Instances

Instances details
Eq TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelope → TextEnvelope → Bool #

(/=) ∷ TextEnvelope → TextEnvelope → Bool #

Show TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelope → ShowS #

show ∷ TextEnvelope → String #

showList ∷ [TextEnvelope] → ShowS #

FromJSON TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelope #

parseJSONList ∷ Value → Parser [TextEnvelope] #

ToJSON TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelope → Value #

toEncoding ∷ TextEnvelope → Encoding #

toJSONList ∷ [TextEnvelope] → Value #

toEncodingList ∷ [TextEnvelope] → Encoding #

HasTypeProxy TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Associated Types

data AsType TextEnvelope Source #

Methods

proxyToAsType ∷ Proxy TextEnvelope → AsType TextEnvelope Source #

data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope

newtype TextEnvelopeType Source #

Constructors

TextEnvelopeType String 

Instances

Instances details
Eq TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelopeType → TextEnvelopeType → Bool #

(/=) ∷ TextEnvelopeType → TextEnvelopeType → Bool #

Show TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelopeType → ShowS #

show ∷ TextEnvelopeType → String #

showList ∷ [TextEnvelopeType] → ShowS #

IsString TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

fromString ∷ String → TextEnvelopeType #

Semigroup TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(<>) ∷ TextEnvelopeType → TextEnvelopeType → TextEnvelopeType #

sconcat ∷ NonEmpty TextEnvelopeType → TextEnvelopeType #

stimes ∷ Integral b ⇒ b → TextEnvelopeType → TextEnvelopeType #

FromJSON TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelopeType #

parseJSONList ∷ Value → Parser [TextEnvelopeType] #

ToJSON TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelopeType → Value #

toEncoding ∷ TextEnvelopeType → Encoding #

toJSONList ∷ [TextEnvelopeType] → Value #

toEncodingList ∷ [TextEnvelopeType] → Encoding #

data TextEnvelopeDescr Source #

Instances

Instances details
Eq TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelopeDescr → TextEnvelopeDescr → Bool #

(/=) ∷ TextEnvelopeDescr → TextEnvelopeDescr → Bool #

Show TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelopeDescr → ShowS #

show ∷ TextEnvelopeDescr → String #

showList ∷ [TextEnvelopeDescr] → ShowS #

IsString TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

fromString ∷ String → TextEnvelopeDescr #

Semigroup TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(<>) ∷ TextEnvelopeDescr → TextEnvelopeDescr → TextEnvelopeDescr #

sconcat ∷ NonEmpty TextEnvelopeDescr → TextEnvelopeDescr #

stimes ∷ Integral b ⇒ b → TextEnvelopeDescr → TextEnvelopeDescr #

FromJSON TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelopeDescr #

parseJSONList ∷ Value → Parser [TextEnvelopeDescr] #

ToJSON TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelopeDescr → Value #

toEncoding ∷ TextEnvelopeDescr → Encoding #

toJSONList ∷ [TextEnvelopeDescr] → Value #

toEncodingList ∷ [TextEnvelopeDescr] → Encoding #

data TextEnvelopeError Source #

The errors that the pure TextEnvelope parsing/decoding functions can return.

Constructors

TextEnvelopeTypeError ![TextEnvelopeType] !TextEnvelopeType

expected, actual

TextEnvelopeDecodeError !DecoderError 
TextEnvelopeAesonDecodeError !String 

Instances

Instances details
Eq TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelopeError → TextEnvelopeError → Bool #

(/=) ∷ TextEnvelopeError → TextEnvelopeError → Bool #

Show TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelopeError → ShowS #

show ∷ TextEnvelopeError → String #

showList ∷ [TextEnvelopeError] → ShowS #

Error TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

displayError ∷ TextEnvelopeError → String Source #

textEnvelopeRawCBOR ∷ TextEnvelope → ByteString Source #

serialiseToTextEnvelope ∷ ∀ a. HasTextEnvelope a ⇒ Maybe TextEnvelopeDescr → a → TextEnvelope Source #

deserialiseFromTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → TextEnvelope → Either TextEnvelopeError a Source #

readFileTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → FilePath → IO (Either (FileError TextEnvelopeError) a) Source #

writeFileTextEnvelope ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ()) Source #

writeFileTextEnvelopeWithOwnerPermissions ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ()) Source #

readTextEnvelopeFromFile ∷ FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope) Source #

readTextEnvelopeOfTypeFromFile ∷ TextEnvelopeType → FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope) Source #

Reading one of several key types

data FromSomeType (c ∷ Type → Constraint) b where Source #

Constructors

FromSomeType ∷ c a ⇒ AsType a → (a → b) → FromSomeType c b 

deserialiseFromTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → TextEnvelope → Either TextEnvelopeError b Source #

readFileTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → FilePath → IO (Either (FileError TextEnvelopeError) b) Source #

Errors

class Show e ⇒ Error e where Source #

Methods

displayError ∷ e → String Source #

Instances

Instances details
Error () Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ () → String Source #

Error JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

displayError ∷ JsonDecodeError → String Source #

Error TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

displayError ∷ TextEnvelopeError → String Source #

Error TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonSchemaError → String Source #

Error TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonError → String Source #

Error TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataRangeError → String Source #

Error Bech32DecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseBech32

Methods

displayError ∷ Bech32DecodeError → String Source #

Error ScriptDataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonSchemaError → String Source #

Error ScriptDataJsonError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonError → String Source #

Error ScriptDataRangeError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataRangeError → String Source #

Error StakePoolMetadataValidationError Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

displayError ∷ StakePoolMetadataValidationError → String Source #

Error OperationalCertIssueError Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

displayError ∷ OperationalCertIssueError → String Source #

Error e ⇒ Error (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ FileError e → String Source #

Error (TxBodyError era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

displayError ∷ TxBodyError era → String Source #

throwErrorAsException ∷ Error e ⇒ e → IO a Source #

The preferred approach is to use Except or ExceptT, but you can if + to indicate the role or purpose to a reader.

Constructors

TextEnvelope 

Fields

Instances

Instances details
Eq TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelope → TextEnvelope → Bool #

(/=) ∷ TextEnvelope → TextEnvelope → Bool #

Show TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelope → ShowS #

show ∷ TextEnvelope → String #

showList ∷ [TextEnvelope] → ShowS #

FromJSON TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelope #

parseJSONList ∷ Value → Parser [TextEnvelope] #

ToJSON TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelope → Value #

toEncoding ∷ TextEnvelope → Encoding #

toJSONList ∷ [TextEnvelope] → Value #

toEncodingList ∷ [TextEnvelope] → Encoding #

HasTypeProxy TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Associated Types

data AsType TextEnvelope Source #

Methods

proxyToAsType ∷ Proxy TextEnvelope → AsType TextEnvelope Source #

data AsType TextEnvelope Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

data AsType TextEnvelope = AsTextEnvelope

newtype TextEnvelopeType Source #

Constructors

TextEnvelopeType String 

Instances

Instances details
Eq TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelopeType → TextEnvelopeType → Bool #

(/=) ∷ TextEnvelopeType → TextEnvelopeType → Bool #

Show TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelopeType → ShowS #

show ∷ TextEnvelopeType → String #

showList ∷ [TextEnvelopeType] → ShowS #

IsString TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

fromString ∷ String → TextEnvelopeType #

Semigroup TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(<>) ∷ TextEnvelopeType → TextEnvelopeType → TextEnvelopeType #

sconcat ∷ NonEmpty TextEnvelopeType → TextEnvelopeType #

stimes ∷ Integral b ⇒ b → TextEnvelopeType → TextEnvelopeType #

FromJSON TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelopeType #

parseJSONList ∷ Value → Parser [TextEnvelopeType] #

ToJSON TextEnvelopeType Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelopeType → Value #

toEncoding ∷ TextEnvelopeType → Encoding #

toJSONList ∷ [TextEnvelopeType] → Value #

toEncodingList ∷ [TextEnvelopeType] → Encoding #

data TextEnvelopeDescr Source #

Instances

Instances details
Eq TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelopeDescr → TextEnvelopeDescr → Bool #

(/=) ∷ TextEnvelopeDescr → TextEnvelopeDescr → Bool #

Show TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelopeDescr → ShowS #

show ∷ TextEnvelopeDescr → String #

showList ∷ [TextEnvelopeDescr] → ShowS #

IsString TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

fromString ∷ String → TextEnvelopeDescr #

Semigroup TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(<>) ∷ TextEnvelopeDescr → TextEnvelopeDescr → TextEnvelopeDescr #

sconcat ∷ NonEmpty TextEnvelopeDescr → TextEnvelopeDescr #

stimes ∷ Integral b ⇒ b → TextEnvelopeDescr → TextEnvelopeDescr #

FromJSON TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

parseJSON ∷ Value → Parser TextEnvelopeDescr #

parseJSONList ∷ Value → Parser [TextEnvelopeDescr] #

ToJSON TextEnvelopeDescr Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

toJSON ∷ TextEnvelopeDescr → Value #

toEncoding ∷ TextEnvelopeDescr → Encoding #

toJSONList ∷ [TextEnvelopeDescr] → Value #

toEncodingList ∷ [TextEnvelopeDescr] → Encoding #

data TextEnvelopeError Source #

The errors that the pure TextEnvelope parsing/decoding functions can return.

Constructors

TextEnvelopeTypeError ![TextEnvelopeType] !TextEnvelopeType

expected, actual

TextEnvelopeDecodeError !DecoderError 
TextEnvelopeAesonDecodeError !String 

Instances

Instances details
Eq TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

(==) ∷ TextEnvelopeError → TextEnvelopeError → Bool #

(/=) ∷ TextEnvelopeError → TextEnvelopeError → Bool #

Show TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

showsPrec ∷ Int → TextEnvelopeError → ShowS #

show ∷ TextEnvelopeError → String #

showList ∷ [TextEnvelopeError] → ShowS #

Error TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

displayError ∷ TextEnvelopeError → String Source #

textEnvelopeRawCBOR ∷ TextEnvelope → ByteString Source #

serialiseToTextEnvelope ∷ ∀ a. HasTextEnvelope a ⇒ Maybe TextEnvelopeDescr → a → TextEnvelope Source #

deserialiseFromTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → TextEnvelope → Either TextEnvelopeError a Source #

readFileTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → FilePath → IO (Either (FileError TextEnvelopeError) a) Source #

writeFileTextEnvelope ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ()) Source #

writeFileTextEnvelopeWithOwnerPermissions ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ()) Source #

readTextEnvelopeFromFile ∷ FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope) Source #

readTextEnvelopeOfTypeFromFile ∷ TextEnvelopeType → FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope) Source #

Reading one of several key types

data FromSomeType (c ∷ Type → Constraint) b where Source #

Constructors

FromSomeType ∷ c a ⇒ AsType a → (a → b) → FromSomeType c b 

deserialiseFromTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → TextEnvelope → Either TextEnvelopeError b Source #

readFileTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → FilePath → IO (Either (FileError TextEnvelopeError) b) Source #

Errors

class Show e ⇒ Error e where Source #

Methods

displayError ∷ e → String Source #

Instances

Instances details
Error () Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ () → String Source #

Error JsonDecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseJSON

Methods

displayError ∷ JsonDecodeError → String Source #

Error TextEnvelopeError Source # 
Instance details

Defined in Cardano.Api.SerialiseTextEnvelope

Methods

displayError ∷ TextEnvelopeError → String Source #

Error TxMetadataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonSchemaError → String Source #

Error TxMetadataJsonError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataJsonError → String Source #

Error TxMetadataRangeError Source # 
Instance details

Defined in Cardano.Api.TxMetadata

Methods

displayError ∷ TxMetadataRangeError → String Source #

Error Bech32DecodeError Source # 
Instance details

Defined in Cardano.Api.SerialiseBech32

Methods

displayError ∷ Bech32DecodeError → String Source #

Error ScriptDataJsonSchemaError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonSchemaError → String Source #

Error ScriptDataJsonError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataJsonError → String Source #

Error ScriptDataRangeError Source # 
Instance details

Defined in Cardano.Api.ScriptData

Methods

displayError ∷ ScriptDataRangeError → String Source #

Error StakePoolMetadataValidationError Source # 
Instance details

Defined in Cardano.Api.StakePoolMetadata

Methods

displayError ∷ StakePoolMetadataValidationError → String Source #

Error OperationalCertIssueError Source # 
Instance details

Defined in Cardano.Api.OperationalCertificate

Methods

displayError ∷ OperationalCertIssueError → String Source #

Error e ⇒ Error (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ FileError e → String Source #

Error (TxBodyError era) Source # 
Instance details

Defined in Cardano.Api.TxBody

Methods

displayError ∷ TxBodyError era → String Source #

throwErrorAsException ∷ Error e ⇒ e → IO a Source #

The preferred approach is to use Except or ExceptT, but you can if necessary use IO exceptions.

data FileError e Source #

Constructors

FileError FilePath e 
FileErrorTempFile 

Fields

FileIOError FilePath IOException 

Instances

Instances details
Show e ⇒ Show (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

showsPrec ∷ Int → FileError e → ShowS #

show ∷ FileError e → String #

showList ∷ [FileError e] → ShowS #

Error e ⇒ Error (FileError e) Source # 
Instance details

Defined in Cardano.Api.Error

Methods

displayError ∷ FileError e → String Source #

Node interaction

Operations that involve talking to a local Cardano node.

Queries

Submitting transactions

High level protocol interaction with a Cardano node

Initialization / Accumulation

data Env Source #

Constructors

Env 

Fields

envSecurityParam ∷ Env → Word64 Source #

newtype LedgerState Source #

Constructors

LedgerState 

Fields

  • clsState ∷ LedgerState (HardForkBlock (CardanoEras StandardCrypto))
     

Bundled Patterns

pattern LedgerStateByron ∷ LedgerState ByronBlock → LedgerState 
pattern LedgerStateShelley ∷ LedgerState (ShelleyBlock (ShelleyEra StandardCrypto)) → LedgerState 
pattern LedgerStateAllegra ∷ LedgerState (ShelleyBlock (AllegraEra StandardCrypto)) → LedgerState 
pattern LedgerStateMary ∷ LedgerState (ShelleyBlock (MaryEra StandardCrypto)) → LedgerState 

initialLedgerState Source #

Arguments

∷ FilePath

Path to the cardano-node config file (e.g. to cardano-node projectconfigurationcardano/mainnet-config.json)

→ ExceptT InitialLedgerStateError IO (Env, LedgerState)

The environment and initial ledger state

Get the environment and initial ledger state.

applyBlock Source #

Arguments

∷ Env

The environment returned by initialLedgerState

→ LedgerState

The current ledger state

→ Bool

True to perform validation. If True, tickThenApply will be used instead of tickThenReapply.

→ Block era

Some block to apply

→ Either Text LedgerState

The new ledger state (or an error).

Apply a single block to the current ledger state.

Traversing the block chain

foldBlocks Source #

Arguments

∷ ∀ a. FilePath

Path to the cardano-node config file (e.g. to cardano-node projectconfigurationcardano/mainnet-config.json)

→ FilePath

Path to local cardano-node socket. This is the path specified by the --socket-path command line option when running the node.

→ NetworkId

The network ID.

→ Bool

True to enable validation. Under the hood this will use applyBlock instead of reapplyBlock from the ApplyBlock type class.

→ a

The initial accumulator state.

→ (Env → LedgerState → BlockInMode CardanoMode → a → IO a)

Accumulator function Takes: diff --git a/cardano-api/cardano-api.haddock b/cardano-api/cardano-api.haddock index 265e8f37869d0bfbdb4af52ec4368866ccb595cb..c777f5748f40fa153659c324aaed194036b9b029 100644 GIT binary patch delta 16276 zcmche30xFM_W1ivx6?B{-P5gTG+seP;}KC4P0VUsD5|9(ZwhqJVhfeSnC7{$IToMT0TPZ-0M2`khy=s%xsM zyQ^NkR};I~ac{B1y}#Hy)K7q+vH%^=6ver(I$aIIBtd9kA{sJT`Owg#P}El<8bx!k zua&p$jW?j!*qfk4)v&*C(k=)ucn2FA*nMZog5c}@XU%BQ-Xy~z2u-}L>huG9(@>`% zG-dzyx%KvD8&PcL?NYZP*!_x8_GA6)4YW6(tO!DLZ(6-{u(vpmatp6ne-qeWOmPXq zi{4Kfsy4eEtqOw7zHZ#z?npw>;f-sIwY0p2a!YU43vbu3w+hk)p%rV~{GPpa0*b9! z(-z&0Hak#klZtpLjf0JBv80Z40Y#}0QR^bdB@Wi+#l7~np@tx|Wfd=uwAWgVVlDQ4 z%N)D^aTNX8N3BM=Z=zK57Dop`u(7zFKDJg@SwXAcf)8TI*_EEJK?l~nSAQ75#`JopW;wNJz&C^1jTp(> zUBQm`+6e{TMZGg^@L%5V`+hFMJ(m6c8Tihd^oP1O*yzpppuh!XZ0#4zpxpcEUsZq# zHgv#o{JP(L`3-br@m~&lDNqWMI^PnD#4F-e@tSyDydmBcZ;NGOp?FceEM5}NiRZ-& zV!2o$-ZS%jp@Ci^mWp@8yW)K@K*Foppn;v;ae@G*g#QHm)A_*b1G5C7&Iz~!rEnL@ zfE^sz(0`eMF4zx4sw&NdJ6Wo<{QY}Rmp?~D<{ z0Cq4KmWE9E?meV7GT(Dqx*(mA@}(2fQ7KzGDD9PYNr$0OIxC%$PD;n5LsEvcPueY| zO8dl%(mAO>%9V~whowv@P1-N*k@kz1r1R2gDNo9gj!0S3PU(P@E^U-HNy*Y?X^XT~ zN|Cln+oc`SZ+76vHcW0re%*e4LOjI5Q(De;j`0^? ze?FAm8S{5A*@&_2VK$2#I};+kFOO>gu*lnQd{clW?7Io?!BUnyp}%dN98&R|_vMLQ zZLpq=n7kD>vG!B;Lo)I+_UY8lu$iRmQ{RR??A2*GaGli(?g)F?yTR|ECOEh|>|zIk z_v05uO#c}2*zM_GK|bq0V;kgqeP=3wx3NvgM_4o{q$iwU=^^!N?U8Mo@4yk?j2b=i z`+=iJjP$?4NX&kwyi>j+UzM*t-coA&9l2EI{kSWa$yFciMe<^K ziM&*flo!gya=Ba~-;?jlyeqflBKfvlB3C}q7v)Q=+uTO){@f9M)?>bC?#p5x$vC9C93X9B~|V9CI9Z z$~(*w2h*c_D8!$Ue=yvE~~|QEqf6So9~tlK>H_a*(_V2!iFvHgT)e- zzl)dLTmE&m&rFH^$1gm;b-cazvBlLb!ME-FdE$KuP;NU*oOhh1&b!VsXSuV&dCwWB zqzR9wtujHZ``iYf{oGgLQ5&A|a#U#x`y#5fIMXqQO^vFLcYJx&QkduMyRs(00`C{m zeE=4-RjXddRpH#Ko~UE(Vm^X7Y<$dn_+Vtl41|U3)iv|*@yJ@!)3#V)F~8|lv&X+i zj`+rRz@R}R2ag&xc$EJV@4(m>p!O;yT8U9sD=U>KWrea_;l>4<6W38(sw`s}aZNm1 zl&wma1xlo{P+6?3Q5Gq&N{GUgS;`b;sxnOpR^}=5l?Y{yGFLH`aAmdWv#MK zNl+4%P$f*6uFOzoD(e+)t0XBKl#R+JWs8!mY{sgWDELK65Iorq-X?AqvcJXqiCt=3 zV6);|*1e>F%}wUQ0N+u=z8NxnFkf13v8?#!aEX=1{}yeI*S)Rmw-j87#t6h0uxq+&zkn&y^4uU7FK1nGMH%B7>l){p;2Q6m<_dHL zxF)(LxhA`KtycZ~`ZA?lsZj1I_mwHGsV;6>wD|=MWgjNIEPl`_jZI2u?k>S`t3l(2 z!?lQQN*IpMMyo_WNN4>LyV}pWaJcrd8HwM*elM)o0S)j#+x+wmdu zPp!oo9QuF-r24R9JO0G{(`vEqskQNr{VBB#n}?}a56^?MSj*pR=UnXDv9(!z+7Z~s zChx3YE1h=;M6^CWM6(k6oX!$|>gYwQqnE6XUbZ@V_)oJP^VE2x^T!R;R$DG~(Uha9u zb=I}V74)!*G}lhoF4u0?4p*vcoVv}m-Noyegtb)G!E65UJI;IX#;@-IP7&;n$J&Z9 zt{4_{EEIQ#^^PyVec}4!eIU+TBgYL8&uX7|54VSZJ>ier!|5lcvYWZJylqd`21sB% za$_Np-O3$;_VcHCT@-o^gqpp2zsFMYo|6;R^=gt@lgkb+qdtk{GJUGat3a;iNXWY%~G?~L+WAmi2A71K34)?M!#^^*XWa{WG1=a*R6r zmTjAhT|4W`E}z+ijv7?p40ZMFXLu9dJ9ojBrLhjUv*>+(sl8ak=^&dGpZ^dJd3#^b z0OzSc7cPMuR#6y^o1L(W0C0wdU+M~HyoWBO0Tg=YUFiaB=(Qf~`D?xH*Lelky~D2g z0>0;yuU|%ETR_|y`z?@chxerT&+;=srS`DEkFy>Cc4LH zW3_SGcx|dSS(~6u)Fx?Dv}szfHeH*c&D26Prp?kqHB$@I!nHZtY;CSKUz?{zXp!0i zZK1YUTcj<~mT611)HZ0F zw9Q(wwnan`LhYhv}|p^c0fC*WoVh&Zf%d2uI<(KX*;x3Elu00?b6I9ji7#$ zsqPtW=AP!B>7L~dbqB$tN5Fazrn9?uI*6~>$1wlW&tWW^R_YJq*rw7BFq2&^9SI?9 zz}@Y&nQqg4|2|;&_k(?h;f8$hfI*&sw6-(nIwy-NcK=>l5^e z`Xqg_K1H9ZPt$|->G}+;Xr>;bGpuqYRu}|To4^~hK!*r+wA@duT_cg*FMnRzpxZjL z?)N&dz7?;*1~#r@J~}Qi1H#!G_j1v7(eQpZ*up-&zv87teZ8KfZ_qdDoAhLTv%W>& zs;B6#O3})&3Z;a$gXZE#w$#v%;TohRz6;<1NHurbpcf`8D=Ltya|WQf7syzIA*5X!Pgd8)4XB_KREt) zGRXWyhMk^leW$)#-=*)-_v-2TK7GG_KtHHw=!f)7Jxf2VAJLEM$MoZRj($RKQmH=l zu;Aeb7xwAf@11vh@`C&VtI95Kz0I#W4B6;KN9Q>Q{#80pb(>t**IeL$T2dN%|IH)^ z_zk_M-`4|;03*m4V~jP%8RLx!#zbSXG0B)>Of{w%!A7&nq*bs;FV=7CCHft`RKKg2 z>E(Kbeow!t-_m*E>-r7-vVKLss$bK2mApD$?NswkC-{p4#l_}GC-jGv=0PXSv9C06 z-dkyYtH6Ijw3(y8vbvRb)VhUyYzp;@`X#eNGw>PAzshPxWuw9j(+D?a8*_}g#yn%b z5n(Ja78whTNMo_F#8_%9GnN}Gj3{HJ5pAq8RvQO}l~qcws8Xu(x(L%yp+SHC%~s`B zODfy7$|#20Py*B{{U+RkBB*T4PmNGCe)$X=v(2=H*rLpdDzp}d+c%r*ROkU)%sVQ4 z4qMHSHB6KWdnj?cVdbGb0klU zvBros;*5AB!SEVujdez%vBTJIY%@}f^+uAh!PsbQGLntW#uj6%k!qwFJB?k&Zex#; zZZxgDIQ@x>Dl6cHcR#4&(HB%!whJr4_b8_hG!@g}MA&oqKAkjsKL_7bXPVUWRDJ)W z#9wdX9ajsCQ^pmzim!8yal$xh%7zw=%z8uqv+dz~ z)5^WPHM>R7+t|+R&=!1b^=g^->O!k(N9NB}Tk>e$|DTT$JJsba^HM#CZBSkKfP28u zOJgQH4{vzNtmuzeH4qa2AWHJ%D8rM!?q|8wEmwNzkA0`;ZKOSi`S<$p$?v&WlzT|I zr_}P9TK-e?tD=9@a%gf7=}mM{ayKS-VRE0{ZS>FtKJ-0If8dJgG^dX{nYGpx2(A2-{6iPa`s_Em`K+Xxzb!A-a77x7tSAyl;v_~LI(iq-_l zm(HgxZ8=pYanGYk{KpGU*fS^dM^ky_to3L{O2nzIa?X0{l&902mxI$o9!?dxHCXGe ze&(l*p_^v`J|c^hWwzzE6}B}>4*GtdbZ7CP+Ou3*(;qmqN}lQ7dEBKF=y~Yt;mf|Y zd7*daL?zd%CJM?WxwBerQdj#c>RdLk|3Jnbn@3wyS@wSsms!-Qn)p z?m6zc?s@L{?g)3Jd!c)gdx4u9wU$9khHP)NWS?%sF4Oq~{!4=Ao~m=eHk=(csC;_5 z?R;85=sz3`@;n|5`WeBXCqqG%QPJ`TQPQUeIV&ATkvJmwc!FaMo#m)}ysA3`k&8k80u1(_#h^bA{XcG=s04jeNr{$&)54mx3=q`q;Dkx|b z$Y#g2aV^9Z?vWwXq!o|gJj)om!$S>by_V3Z<^u}|J-q3zz4-8+F}t;dHsU_lepYeh zm1dT!csx3W`75wqO;i)qb?RExtH!Hw_&VTAfgZ*>p1o?ix<}ou?oxNEY3dF&Ro#b{ zQwDhntM@UYhw-5&vIsq273cvgLr+*Kdc;b|H^!Gm%Lg_Kyx{bD@H)j|6a=1rlH~Mz=l9y*c`g=0S^TT~W+!yq_Bj^<3 zuAv-s66KP+C?7pX+<$ZiJxS-ur&NgErOV`J;vT2#=y|$DKB!{!Mxjs2^lc4wefVlV z6}?5l=rx+@4nfb+EVAUt2{#5EGBc`i$;={m4PX79=I{B1cHP4*Ki~dyS3r>mH|iDW z8z@5`K`HtQO2}(q?T;T>eN)KMFcs%uYYRW0Ht~E5A4!{dK6fvtO?-7$-#Xmp^384{ zZgIEaR+ldyl~!MiWZdQQz3$^X-N(0yM*t@>KhLwHzY8$FnS^o4jTn`*%tI^6$>W!m zkxna)xd9`WTQPnagznhNd&7N~{O)jD3-1s4F?sZl$L}zD*8#(P;dm#kyHcI?J%;>n zD;^%k;~|$n@K^28E6*naI?VClu+ft*5qIEM?uq#zRE=CeaMW`Le)se$4t%saH%j}| zWT&->-sI$~tch!Dh>hQv$-tdF+}Trk*JEtc%rIKlF!novK@ne)@a}-yL^r_t@_E$16~EyW?NB{ye@ru4d8k{C`|^ zs#|oPe|*br9h>2+jdhZwO?4+pD);2UbRwYYp1jWEd-C_5y$qEpKe;b|Vpa0ss>FBb zPhX23?%69>p2wqJPhV%oP^{${>x}1@1zY~(>&)ASF#z$OS!bNqu5r5C@)OYN!q=AR z=;EJ-uKp?L@}ER2jpgd+Apt97@IUkz=tb2nB%TLO;ObVAN_X&oZY}xoQsUuW(@GCQ zzF@rv)h{Fb2+;yOAY&~XK^n&CaLMLN0$&bzNQ*B8;TU`2V`h!sKmPgM$Wf#DY#WZV z?M#|&am&KJ(bnF?^;%B&~yUUbSwrJaGn;?u$Oz#N) zP&+peV)58^10fFCP>4tBqL&la64wzEh>67YL^I$`s4I(`tVH;m(6GKPr0|rm4cSQ8 zPTYZPESmeVum-z%0`^#{n{Pr(M`IzArv$TU4|Jf3Cou7XXnx)U3S}5u0~3(g?{^SU z!~KF#%zw`y+(!C}=G~sqtQS=91l%LleUeLv0sQ9?*-l4M^es0;tk5VNxVfYA}*rb#YD4P zZ)gOf`5AtAAO>|!U=61jOEOW6Bbg|~b6N0GnYE-}M@%3ll72nONyH7L*+}vxVlrtq zle~qvmDn?dGPV(^5NxN69i&MmIgPlJxQp}_Nh4COXm)=OT6y3g70RGOnIsd%ERu<0 zHpx-MrJUj+PT?@gM@T+O@-a>zipNPNia8{opfV>(&LzH(N2+{EoFW#G#?t4Sav$)Q z;UeWEcI^X0ZErQfHmU#ODrRn6T^w7dG`0v>cesPzBCoa6XPf&mNVB<`kEZOca)KSy)C~PFz8`QN)#`iT2RPDk6V| znhUE*jv=lg@@c2Jz$cvMLM&2iOs|5f?d5|6mlqi0x63pIe{qVl1voyNG1yT zToz7oiUq{elxqfm4AXstGRiKej0!8G{hwjFCWPY8?_?p26U@DThO{2*Ns~mJfUT8< ziNp=0*+|?(OeSt7Zb3T4t(;(He*)d#atP@>CG17EL^lo+h{Ap@3kOJlkn|bEOkx)4 zvq?7p{1<4~MmWI}!b!@=CFW6fKJgT>fb?ekU-9ibW+VAc_xu$F@$7BoW&`Il5Af56#6=ZMLZ!aHsAgXygmt(zn=2>j}}|O z2Gi9aU5hD{*hVB-Bw5_fHR2A^rxMeMJBhnE#oZ+DA*K`e68CY6`$;}PJV?wSW^#&I zBxjpj`h(#Sk5K9;@fh(qr7Lt6C zc!_BC`yA@_7Ozv{2Jt45|D>}O6mg2hB;O{M5buz_l;pd_GSZZr8$XApuZaN~znUlp zl58=E9MN=q0gGBJVZR>D={V$v)j9=0VO`~rV&=-WytCBV6FqJgZh{2?vPVx-mOkxO;5v|-= zB!?2ih$g2HPMl3NBff+|-C7ILlv;&sBd+EIi!r2GLz-A(9BJZ7wrF-A2+!4NBP4R2 zupar6kVM>Iem4*ry|Eb+5+rkqTSz8~TS+F0DI{+rZYS;_rkJS%q20%Oc|zDn?ipE@gOmSm`UWzk|c0z7|+@hv)n?bY`1ubKEV1A%#R0wU#(+!Nn7zaClEz5a1g&Y zXGnFHvd@uxo|r?L3nUZ8LXwH%MUsi)C6X@_ts1UyS-48PM!aqjpQN_J4U%sXJ-6ti zh*(U#jjbNizlMFHYqIqA-oiLNMv4lYRzqCNYG_IK^2c6NOOHgptN1hLgtp z%~yQ;v%tz2^cDPfXMbTGPYL|T+BL;QPCV()A8F z-T(gfw*!dxO#zJ;A}WF)qN9MKh=PC@r-I0hH!7aUp~AoF4HM8{O!C|1qu+V;s=B+X zy1VMtd(|!L+!EHg*>dU~pLh!}ty+L*4_)7CtFu^pg^Gfp85~rS-_#$EVdCSP7@mmb zpr6aXG56lZ#NLiXIi`!*v)n8Qo{p)y3g$k+k|6YP{M|j4n7#7d1i{NOu>0#^?i*qe zgue8DdnB8^Q<&)O81YCiF#FUq*@sSi^dob>`LZDNb7Vex7|i|8F}c6P=(!ur(mtyo zNRD@UDJHX9tRe_*^z$c1ng{G;;sD3iC)imA-eB@TM`7>ZbTJPK&;(%+eZr^3JUEew zgQ-`)k@}DfCJs5kAZBvV8U5CG?|PnzT`zFdG7P=QK?nCgV(uEEGbO#-e}>t2GZTI3 zUk8+$-A^*no&Is)*R*ipqi~vD8u%;lrb7n(3xLKB^3ksAU^07tGu?BtCy2rgS~=)h zxK6tbE?_)2IMkizyLo;*WBQ-(Es;K?h?Q6|G}h$XvhEdM03XMgC;I{%a(prDT?O{i ztQUR>b&f8-jIzLb8u#)f=t9+3o`EOms8{ZI+|=v!TlzKAb<+*@zd>)*o9Kiw&%i%v z;20l>q?;JCY2KKAaD_IE`33Z+PmY}kZ_!0#Uv_WC8cqIk%9GP)@H*e7r^jZ&2}j(x z0uxMf*k5~}z#UpK;WSKhq`&cq3AQ>)e_vyTCYt&|l&P7}V!x+p*rXD;O=nC#34!#r z55I(`=^HD%(Yy~Q4EXsCa+6#pb>s@UO0JRXA@lo9Tq9&%+Hmf9i0Er)g8Cz!vKB zu>o7@o{!&xZM6Hew}x#JW5qaevluUK5fj9%;x^GCZWnimiYw8v0L!4OraeV!x}-Sr zro9A^N|nE4G7kG(pgP@%r!f$H7);o0Ev^&Io!TcWjIfJ{A&_ipnv<<$52Zv{`HFK zqM3%j{|D10=g(y`egA_GpqUQ$i(t=bkzYfPb7qsf=f~`k|K^jao>QiNGx^gmzV^LC zPx&8!b2KL4nNB;f-rQ+r#GB?abGf;~TxmXKt~OVhYs{z3XU%8K=gjBL7tFQhi{{Jb zOXfQB74uc|HS=}z4f8E?gSpY%WNtR!Hs3L43mx;C`4L0$5a$Va5$6f-zYISGKNWjd zdJXTaqwCGv!2#P~D?Fg)v}C3)>HjlI<-q@j5b7T|3=Fz0a2bR?;4Di_Dpl349yy zIM3im*d?9|j#kShFo}FjW}{mLy&ODEt>~aBr;|gThelTM?ld8!(bOc-{AnJJJ)x}3 z9f{_J4S>7!is56r+cD9C2~&$smxjG)YVDY!&n@r$=g#lNIq9r)MmjB>l4_)CsYR!OU+Flo88LJF7G(6r@ta$dSXUs^HL9sw0nxpY!0mCB@I z>4a1w9hZuvLg|>4FBM3+Ql4~F%8?F9hovJ@wscUcl`^F)sZP2g?UqucT~eZyBqd8b zC5NGNc3V zOBba}(&hUq$*X-!YLIvn8l@(w3fv0aj=3FoD{?D#JKw!}D;9ez4(B&_Gi*Ok_6A&!UF0X<}T|b8MQJ z88w+%K4+qWO|2ICKO0|Vg|auk!Vb`*KkxKGsW*T31?TsR*Y+-}Z)dabO*4OpcuQI= zH!by+Tb2e(qov8xY`JZ@V`;Ty3iqa+Wdi8$RzCLL4}A~X>+p~_qC;KiUt$IkyIU9y zkLk&7_0E_Lu)^`dCU=0{}IAySp0Yhr>EmTf;Du^ zmQ@fz&ukfES}W7P{MT?gB|(Qs$6phA!y}vI7&%Ukm80d2a+JJ5=C;H*@YD)H(G z?5{ujPiJoPBm=vgrBT}kFf$`}TX(od&usHyveoe`xJbu42AZ$QZ0-r9|8PuzxpdS4 z4_e`HXIWPro={KSx4#Cn=?B|ig#|Qj`xvIL-#+DyA9@2DVc`KDYi-;$f;W*W7l|LZvdPjM~J^|SJF&Lb|${?-8NOzSLbpml+@ zRc?`ITjyBkTKQR>=U-@DWM$`(Z_9V&yYf8id@DCC2LFhP(vK6LCZmRDurBCEwSZu>K~sy(zY#Pi@eB4?j7ai^gLG2T3+B^S)@_IBxa_ash$AIi12{_i4>2M!_T*t|jaDY5VpPXI*`Siuym!W``r;dg~dMJ0Y>6n$Sozjgi-|Gv<=~sCp zp@?qH`xJ`lWBLCNPSDp6KSJa3KZ6oFecwE0NUSY5LciSSLH!En&_?##^Vo~b64{#m zF0(@Xk9*MG8E?{rbPwu#{CCuv(T!eW>8~@o(%&8E#%|rT1B2;_3=cZCXeAwapewZ( zO7w2gA7~Jh(=tmTjjqb-+4UfA7!YQAyva;V*7k!mJF7oiGhWSl2hL)H&p8`>{@Vt_ z1;^`$p8=?KHus{lxtFlHm$A8Z*xW1a&Ap1vy@t)bj?KOCZF6t(=F;GN4{F`Ni}omR zHaLR)@&-3zgPXo>@Y~0n4R#!JHuy2t5x0+zpnmL^H}yRG^(!>9rv6F4|81d@qkFzw z->I$t{i7m(v|Ft%8z9ZP&q_0j|3Ul|e>&;fDt*vy?f?Y-O%8PnoYQQ2dnu<-2b;ukSB^dVSg8K&O-p zC9AA)G`J*$Ed>XiT*DTDhfclS)`K(3eA#+%ZP`L_IDE@} z0JhUND-vJ_?NT|7+0cKk9AU%PKyV*BZu}-CR-w6-k9KiylX{3un?x^H_9dax9_mpw zge?h2R*h#~frVASgd_A&RZqqS4Wd9$YM^t=Nk-J!o+C3+#YpHIH@r1dRBh<3#(6 z#P9zJC0W@?)lL z#e73$<3s_K&c6wTj`z;1z(%moF05x`l~x-D6^`gy=H;lNn=ZZpHI8!^GXc&y;xCT? zxJ3Ww$|ySc$~bc!KSiD6f3A3f>4wVJFErum31+X%yY_R&Z?Dow{ja~qtQ`OAFS$!5 z^QbSTfBBE;Y;c}BW3q2E^}3M;3+bsFqs)H%e35j}&A#C0c>QJ~fFJF0>pA-@TcB;8 zZLV#O?YeS9xvA7Ex0D8@QE5_|mD|c4<*w4Iv?zY+Y@5Ftpw3hS)%ogNb(T6?oukfE z7pM!>Me1U8iMmu>rUt204N-&DP&G_7)aB|*b%nZ04OdsIYt*%Bgc_-?SJ$Z<)QxJC z8m(?pW7OCo>Si@gjaL)YE$UWvo9a-vtBL9kHA&s6Cab&D-D--uN8PKYs%h#zdivHZ zGT*jzW3KGv9K^|soeHmXhP4fUp4uijGY)GO*$^_qHJ zy`)}N&#C9t3u>);QLRx=si)O5>RGiytyHVjYPCc?sXkk(mZ|0HakWS-R!^vf>M=E6 zEl`iBN7WoPSItwi)NJ*jdPqI2?pM>*4E2DTsnY*#=-Fq!ZLw{cZGmlxEyzY~0nq*g zIG=+>RB3vO^fCL>kxlPI0A17M3o~g>(^Ie{sCfn~rC&FvcUz{JG|&H@{Ka3VdVb2* z?NcXD@m)s8-M-X)g| z>$MG9l(tce)?&0x+OSZ~nY|JVI1i4(tVk_Lqgt>Q!VY4m(`IXPw7J?mZN9cZTc|D4 z7PAvA(Uxk<*eRpg2?L;GHF$-1b(qn2`A#2V>av5n-~AaR)4_K?XEg4v=1vZ#38lYn zses+oxAjHXL;u_wJ!FTLs3mF1+D>hkmZI&}_GqcvUd`$fof*zTdqYNn4;gJr5BU_X zKt|F#0Cs?Mqr?Pb#SG01MwtovB)vjF2e))BLo+cLABgZY=_Vau*Y_|sir@j+Mv4e) znZ?9wl*?)~#VG9ppF^(kiWx>hp)t=4zlUO@+zg(kR^4bdgEySGH|b}5Eo31D zh8N@qI8QlZ^l$i4MNnWEZZJgL&f)+@^&seBl(<3H&swz>%}@8&1N51Cpgv2VtpYPE~nCG9ev zlAn&Bc0P04b9a8_%twr`EZ|PwAZv|43rvJ)qs9U&%+Wd<@uH0Y89sv;ScPlUZGdBhk^g{bbD^K-e#g$ zJFJtL+4}FU4`1iH+yd=`pCCNR-x&7SAX-~b~v8UQ+ivN3`(TgKS z8+RXtgvUDzN^p-FcmEux`5%t3H#y@;q+?(up)Kn2-QdOj4)urm?VbL5+NmEF*CaG^ z`9#9Jtp>BnyW4BqyrJB^dX;%Mxet{4Ke@y2CiC>PT3k+yMQu(E+UCUI?hL16V>NSm zba05==iW&CKF5F;dInnLR^|n8uKWYp+TXe6=PP}-UZT0h&%604fr@LfVNYh(bK1Ao za$cLY?Xt-`w~e@U^)RdI2bz07Z@2e;w7Iv?wv_&}q4%WDr~M#}8x0-p32sR^M^5J` z%4gaK&4MMJ4*%bsvw|Nw4YW@Ju7Rw5klMjUKi4q!{i9%snGG1_dbRQL6EM}jnmr;B za+GPKDcZDIE@5uu`@Lj5O7}2N*`hWdS^Y!3NB4S+TJ7JulDK8yvsW|TN*&;OJOZhyE9{!>iwU|WbS)MnViY|CvcY%6W6Y~i*w zwg}s58-J3W&oY08BgZkD_rccgdW}EWKPC`w@A%rMu>m1j;e*vp%Y$M||K_-o{kwss zhs2fck1Dx>uFY*h*ayc@U9O~XHa-WCmqyMcfy9u#K>wL*+UPiypkvy2#tX*&$@TVf zGo<5N>w145Zib{YbFkfHTx?omT5jT2*hZt+3;NpIEk~D47;0*_|5oY2dPn0gl-ZR| zv+su*eC2EeDPiVEd)PkG#;1WeWwR2mY@tP!n%2>C!l#S;;$J);sBjltIb4Nn5Mw%T zx?sB3&K`z_!@Z_M-6TKrO1DZD53Oc#(Niow zdWOYG&q?*>Otx(yhizXdV%r!h*mj1qVy#%uwiL`^K8ShD7ctAWiY?ZbvnAUaZG~1y zj*(&(>E6a7-rFG#HbXpYfdtsVLJS*Os3Dex9GKtIi1UW&o)3$~7$bZjad>AtBb@Q3 z?=eJ-e*Iv)eG}X95zlsh@ckdI2dT5|6J>0-Ko#3HaEk37;Cl$}wLmW6-hn!{W8ga5 zIl%W1+`Dt2Jtn+@MT5gwRG7zx!=;ERZBf6f(Am*WBXV933kNNBFGIB=UZ{+Zht;^79{x+D) zO&%Vg<7Q7I3vJ!TAQu`yJnYk7TXV0SgMlBPhethFq=Lrn=wso&-)!qa>mlRq0Wes} zu^zP^wjQy5>pr$~BWD4cIf=>+WxL`~wkcbc1Z4|**7+0f@)f##hiS~Sc!+ruvzb>h zlX(|2(9d|7Sw^|&N$lJ!>9Ui!@A5ixiQQ(du_opsYp^q4Sv`8q_$27`js-D4*iz;X zTg?1o3z>gx9`lpUX8tnnHT!|)(hs(l?Du%bn4c$;d3m_6CyRM~4x#_&2=fHxqECo> zhq#yMIP(^9pHT_(9+fdiQYmvQRik66hPjx|ptI>5b34_d1B$z%>X=LF8ak(LFgF!< zRyiG4&Ge5A9vbt*ShM>xFU{gk{4_!6!{HO%gPcG=)^u}u2Dq1i zdkn5K&%tdwb0IV_S3(1GDb%BL!MRRux9sMjKVm)`Zk-GKmAJ&`3;b|g;`3p811|A9 zv+Nvfb<5YdJJ`xLjjeF`Own%HrRrXMiF@w?_uj?faWFP}gO~jTd3XeQH4Bm^vEb%T z7TR+|3{n0-crSWZi?Jr*Y7{Esc+yc_JZR!43h`%(hl`!vwj-hYY>&ais z{SS2bGjnsNcvwlXI2Y2pEQbCN+P z-uddstjoU**tadsdtp@mJ8Sa}^O@Z>pShOm51PZAYj@WSb#FZFp84pW>Bt|0HQzHG z+5heH(T|&s#{S#pBl>#7V_g>77CBu7c0TtkVsU{5EIu%g#R=x%OyrCY@Hm1q&hUSC z8nBtBvx&yeT*#fxG%jcIzjvfpE-N)Z-4*GjIY1p%bPGZ{4T@cm#tp7qujYn;R^`q8nkc!dOVJ8 z{My{M^^0!}TV!jJ<4m!p%_czzNILT@{7vcBOGse5wKcMp6Sg6ZuSUV+c9M(;I!Jm_$9s*D^6B&s5St!p&8h-3_lCX#;1Y^@!@a}nvUEEVRjhv0--)VRX zA(C-^EQ}m>1$9@E*O1qd5m;(1GLo?mS;q;++v8ZDLkuQ1A!Cto$jzK29%Urif-+J_ z;Ign4%WOlv1Gyc!1NDh0Cn1wjvlHcA$Q0Ckyc-jHkg3SMn30CWLa-0@`%#mQat87M zG86SqqK05D$->-hr19=}82BE^!vvD#ql_d4C~rh!=P(B_Z{IOaavbF%l#4k5Nlu`Q zBqc`Wc<3<%%CS@h=2Rl9P~+5>p{5#HWAu3yd?lflr-YNf1bUBS;%u(<~;HO zlA=BsxfHn=xdd5@WiBEwAul8OW9TKAu68lvehXetg<;Y_HX@sl&B#z>2=Xqn#b{;K ze{l;Y;*oRM8{{R-Mb1NRMtvM|A=C6Fb?n-G0V!N@GbT-d?jRWdoB*%+kXFn?3V!?( zCh$iFa0)Y#M%@H>wVO9t#!}uSh!ZH%c>N6+Xu((Cn{}1p_Xc=%TgkJ8RY=|`-olbD zMk3Eyjk<6o?+R~$^~5EXgFWFb@SgA%cu#l>yeGT`-V@#e?+I^#_k_2=d%|02F@E(s zb|ZODcniEIyanD9-q;h~0`CcLf%k;Bz9vCy7KEDXinNupYSq z8HKqUkiU4GK*8lMjqsZ zLr5dz_b^Zr3NRz-=I`Nk7~h{P;GeF+LL|y$5z0uin9F1dYL+5VCd*Jpk|30W4F5ks zFAoU8R4AulIJx@|5c%9p!Zi-m_@TTVK3DO7M-sN^J7$ZE_*3N@H(M85?~JjiX#Kni!98ROoDB`SpQ&-a8-q;d9b$m}+U z)khNMB9l?S(`ux>13kOBkyMs;1EjE*%Ysq&4vZWaa9KFYNpeu1i_Amj zqrL!Tq)^CZ!I<$bJUN(@VRkuYS0F2qRj98Y$Osh)*&N}cisbsM>072$S%P4{xRkv^EgR9 z$^|GFqI?YH<3{B~knK>6x)Z1?LHQ)I6j_EW=Oh&O*^6=-avyR(67@nl zmxT+m$qO0#az=ve1mYjk$M_cR8U2 z*@{FB@nf6lx&l)0=dxg=P6c1PFPYC$zJL@Ka9LQ$Nfx1gF>(oVDRLPn2|^huP}BsY zCIlIZ8Uy7pcardano-api-1.27.0 (Index)

cardano-api-1.27.0

Index

?!Cardano.Api.Utils
?!.Cardano.Api.Utils
AByronSigningKeyCardano.Api.KeysByron, Cardano.Api.Byron
AByronSigningKeyLegacyCardano.Api.KeysByron, Cardano.Api.Byron
AcquireFailureCardano.Api.IPC
AcquireFailurePointNotOnChainCardano.Api.IPC
AcquireFailurePointTooOldCardano.Api.IPC
AdaAssetIdCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressByronCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressInEra 
1 (Type/Class)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressShelleyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressTypeInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
adjustSimpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AllegraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AllegraEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AllegraEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AlonzoEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AlonzoEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyAddressInShelleyBasedEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyCardanoEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyCardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyConsensusMode 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyConsensusModeParams 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyEraInMode 
1 (Type/Class)Cardano.Api.Modes
2 (Data Constructor)Cardano.Api.Modes
anyEraInModeToAnyEraCardano.Api.Modes
AnyPlutusScriptVersion 
1 (Type/Class)Cardano.Api.Script
2 (Data Constructor)Cardano.Api.Script
AnyScriptLanguage 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
applyBlockCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ApplyMempoolPayloadErrCardano.Api.TxSubmit.Types
AsAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAddressAnyCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAddressInEraCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAllegraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAllegraEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAlonzoEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAssetNameCardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronAddrCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronKeyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronKeyLegacyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
AsByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
AsByronWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsCertificateCardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisDelegateExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisDelegateKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisUTxOKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsHashCardano.Api.Hash, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsKesKeyCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsKeyWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsOperationalCertificateCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsOperationalCertificateIssueCounterCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPaymentExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPaymentKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPlutusScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPlutusScriptV1Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPolicyIdCardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptHashCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptInAnyLangCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptInEraCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AssetId 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AssetName 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyAddrCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSigningKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptV1Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptV2Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakePoolKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakePoolMetadataCardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxIdCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxMetadataCardano.Api.TxMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTypeCardano.Api.HasTypeProxy, Cardano.Api.Eras, Cardano.Api.Hash, Cardano.Api.SerialiseTextEnvelope, Cardano.Api.Key, Cardano.Api.TxMetadata, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.SpecialByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Address, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.TxBody, Cardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Shelley, Cardano.Api.Byron, Cardano.Api.Byron
AsUpdateProposalCardano.Api.ProtocolParameters, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsVerificationKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsVrfKeyCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
auxScriptsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DataPartToBytesErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DecodeErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DecodingErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DeserialiseFromBytesErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
bech32PrefixesPermittedCardano.Api.SerialiseBech32
bech32PrefixForCardano.Api.SerialiseBech32
Bech32UnexpectedPrefixCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32WrongPrefixCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Block 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockHeader 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockInMode 
1 (Type/Class)Cardano.Api.Block, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockNo 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockTypeCardano.Api.Protocol.Types
bPpuHeavyDelThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxBlockSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxHeaderSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxProposalSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxTxSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMpcThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuScriptVersionCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuSlotDurationCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuSoftforkRuleCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuTxFeePolicyCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUnlockStakeEpochCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateProposalThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateProposalTTLCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateVoteThdCardano.Api.SpecialByron, Cardano.Api.Byron
BuildTxCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BuildTxWith 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronAddrCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronAddressCardano.Api.Address, Cardano.Api.Byron
ByronAddressInAnyEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
byronAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronBlockCardano.Api.Block
ByronBlockTypeCardano.Api.Protocol.Types
ByronEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronEraInByronModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyFormatCardano.Api.KeysByron
byronKeyFormatCardano.Api.KeysByron
ByronKeyHashCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyHashLegacyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyLegacyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyWitnessCardano.Api.Tx, Cardano.Api.Byron
ByronLegacyKeyFormatCardano.Api.KeysByron
ByronMode 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Byron
ByronModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronModernKeyFormatCardano.Api.KeysByron
ByronProtocolParametersUpdate 
1 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
ByronSigningKeyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronSigningKeyLegacyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronTxCardano.Api.Tx, Cardano.Api.Byron
ByronTxBodyCardano.Api.TxBody, Cardano.Api.Byron
ByronTxValidationErrorCardano.Api.TxInMode
ByronUpdateProposal 
1 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
ByronVerificationKeyCardano.Api.KeysByron, Cardano.Api.Byron
ByronVerificationKeyLegacyCardano.Api.KeysByron, Cardano.Api.Byron
ByronVote 
1 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
calcMinimumDepositCardano.Api.Value, Cardano.Api.Shelley
CardanoBlockTypeCardano.Api.Protocol.Types
CardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
cardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoEraStyleCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
cardanoEraStyleCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoMode 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoModeIsMultiEraCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastHashCardano.Api.Hash
castHashCardano.Api.Hash, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
castSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastSigningKeyRoleCardano.Api.Key
castVerificationKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastVerificationKeyRoleCardano.Api.Key
CertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
certificatesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainPoint 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainPointAtGenesisCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainSyncClient 
1 (Type/Class)Cardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
chainSyncClientNullCardano.Api.ChainSync.Client
ChainSyncClientPipelined 
1 (Type/Class)Cardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainSyncInstructionCardano.Api.ChainSync.ClientPipelined
ChainTip 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainTipAtGenesisCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
chainTipToChainPointCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ClientPipelinedStIdleCardano.Api.ChainSync.ClientPipelined
ClientPipelinedStIntersect 
1 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
ClientStIdleCardano.Api.ChainSync.Client
ClientStIntersect 
1 (Type/Class)Cardano.Api.ChainSync.Client
2 (Data Constructor)Cardano.Api.ChainSync.Client
ClientStNext 
1 (Type/Class)Cardano.Api.ChainSync.Client
2 (Data Constructor)Cardano.Api.ChainSync.Client
3 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
4 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
clsStateCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CollateralInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CollateralSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
collateralSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CollectCardano.Api.ChainSync.ClientPipelined
CollectOrPipelineCardano.Api.ChainSync.ClientPipelined
CollectResponseCardano.Api.ChainSync.ClientPipelined
connectToLocalNodeCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusBlockForEraCardano.Api.Modes
ConsensusBlockForModeCardano.Api.Modes
ConsensusModeCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusModeIsMultiEraCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
consensusModeOnlyCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
constantPipelineDecisionCardano.Api.ChainSync.ClientPipelined
CostModel 
1 (Type/Class)Cardano.Api.ProtocolParameters
2 (Data Constructor)Cardano.Api.ProtocolParameters
DebugLedgerState 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
deserialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseAnyOfFromBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromRawBytesHexCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromTextEnvelopeAnyOfCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deterministicSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deterministicSigningKeySeedSizeCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
displayErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Ed25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
encodedListSizeExprCardano.Api.SerialiseCBOR
encodedSizeExprCardano.Api.SerialiseCBOR
Env 
1 (Type/Class)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envLedgerConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envProtocolConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envSecurityParamCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EpochNo 
1 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EpochSize 
1 (Type/Class)Cardano.Api.GenesisParameters
2 (Data Constructor)Cardano.Api.GenesisParameters
EpochSlots 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EraHistory 
1 (Type/Class)Cardano.Api.Query
2 (Data Constructor)Cardano.Api.Query
EraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
eraInModeToEraCardano.Api.Modes
eraOfScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
eraOfScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ErrorAsException 
1 (Type/Class)Cardano.Api.Error
2 (Data Constructor)Cardano.Api.Error
estimateTransactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
examplePlutusScriptAlwaysFailsCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
examplePlutusScriptAlwaysSucceedsCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
executionMemoryCardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
executionStepsCardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ExecutionUnitPrices 
1 (Type/Class)Cardano.Api.ProtocolParameters
2 (Data Constructor)Cardano.Api.ProtocolParameters
ExecutionUnits 
1 (Type/Class)Cardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ExtraKeyWitnessesInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
extraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileError 
1 (Type/Class)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileErrorTempFileCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileIOErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
filterValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
foldBlocksCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksApplyBlockErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
fromAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromAlonzoExUnitsCardano.Api.Script
fromAlonzoLanguageCardano.Api.Script
fromAlonzoPricesCardano.Api.ProtocolParameters
fromByronLovelaceCardano.Api.Value
fromByronTxInCardano.Api.TxBody, Cardano.Api.Byron
FromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromCBORCardano.Api.SerialiseCBOR
fromConsensusApplyTxErrCardano.Api.TxInMode
fromConsensusBlockCardano.Api.Block
fromConsensusEraIndexCardano.Api.Modes
fromConsensusPointCardano.Api.Block
fromConsensusPointInModeCardano.Api.Block
fromConsensusQueryResultCardano.Api.Query
fromConsensusTipCardano.Api.Block
FromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromLedgerPParamsCardano.Api.ProtocolParameters
fromLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
fromLedgerUpdateCardano.Api.ProtocolParameters
fromMaryValueCardano.Api.Value, Cardano.Api.Shelley
fromPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyBasedScriptCardano.Api.Script
fromShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
fromShelleyDeltaLovelaceCardano.Api.Value
fromShelleyGenesisCardano.Api.GenesisParameters
fromShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
fromShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
fromShelleyNetworkCardano.Api.NetworkId
fromShelleyPaymentCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyPParamsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
fromShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
fromShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeReferenceCardano.Api.Address, Cardano.Api.Shelley
fromShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
FromSomeType 
1 (Type/Class)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromTxOutCardano.Api.TxBody
generateSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisConfigErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisKeyDelegationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
GenesisKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisParameters 
1 (Type/Class)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
genesisUTxOPseudoTxInCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
getLocalChainTipCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getShelleyKeyWitnessVerificationKeyCardano.Api.Tx, Cardano.Api.Shelley
getTxBodyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getTxIdCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getTxWitnessesCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getVerificationKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HashCardano.Api.Hash, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
hashScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HasTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HasTypeProxyCardano.Api.HasTypeProxy, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HeaderHashCardano.Api.Block
ILSEConfigFileCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ILSEGenesisFileCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ILSELedgerConsensusConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InAnyCardanoEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InAnyShelleyBasedEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
initialLedgerStateCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsByronKeyCardano.Api.KeysByron
IsCardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsShelleyBasedEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsSimpleScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
issueOperationalCertificateCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
JsonDecodeError 
1 (Type/Class)Cardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KesKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
KesKeyHashCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
KESPeriod 
1 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
KesSigningKeyCardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KesVerificationKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
KeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitness 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessForSpendingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessForStakeAddrCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessInCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
labelCardano.Api.SerialiseCBOR
languageOfScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerState 
1 (Type/Class)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateAllegraCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateByronCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateMaryCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateShelleyCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LegacyByronEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalChainSyncClient 
1 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localChainSyncClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalChainSyncClientPipelinedCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localConsensusModeCardano.Api.IPC
localConsensusModeParamsCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeClientProtocols 
1 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeClientProtocolsInModeCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeConnectInfo 
1 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localNodeNetworkIdCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localNodeSocketPathCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalStateQueryClient 
1 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localStateQueryClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalTxSubmissionClient 
1 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.IPC, Cardano.Api.Byron
localTxSubmissionClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Lovelace 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api.Shelley, Cardano.Api.Byron
lovelaceToQuantityCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
lovelaceToValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MainnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mainnetNetworkMagicCardano.Api.NetworkId
makeByronAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronKeyWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
makeByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
makeGenesisKeyDelegationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeMIRCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makePraosNonceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeProtocolParametersUpdateCardano.Api.SpecialByron, Cardano.Api.Byron
makeShelleyAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyBootstrapWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyKeyWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleySignatureCardano.Api.Tx, Cardano.Api.Shelley
makeShelleyUpdateProposalCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeSignedTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressDelegationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressDeregistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressRegistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakePoolRegistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakePoolRetirementCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeTransactionBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeTransactionMetadataCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mapChainSyncClientCardano.Api.ChainSync.Client
mapChainSyncClientPipelinedCardano.Api.ChainSync.ClientPipelined
MaryCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MaryEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MaryEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MempoolDlgErrCardano.Api.TxSubmit.Types
MempoolTxErrCardano.Api.TxSubmit.Types
MempoolUpdateProposalErrCardano.Api.TxSubmit.Types
MempoolUpdateVoteErrCardano.Api.TxSubmit.Types
metadataFromJsonCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
metadataToJsonCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
metadataValueToJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MIRCertificateCardano.Api.Certificate, Cardano.Api.Shelley
MIRTargetCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mkNodeClientProtocolByronCardano.Api.Protocol.Byron
mkNodeClientProtocolCardanoCardano.Api.Protocol.Cardano
mkNodeClientProtocolShelleyCardano.Api.Protocol.Shelley
MkPipelineDecision 
1 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
mkSomeNodeClientProtocolByronCardano.Api.Protocol.Byron
mkSomeNodeClientProtocolCardanoCardano.Api.Protocol.Cardano
mkSomeNodeClientProtocolShelleyCardano.Api.Protocol.Shelley
MultiAssetInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MultiAssetInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MultiAssetSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
multiAssetSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NCardano.Api.ChainSync.ClientPipelined
naeConfigCardano.Api.TxSubmit.Types
naeSocketCardano.Api.TxSubmit.Types
NatCardano.Api.ChainSync.ClientPipelined
natToIntCardano.Api.ChainSync.ClientPipelined
NEByronConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NECardanoConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NEErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
negateValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NEShelleyConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NetworkIdCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NetworkMagic 
1 (Type/Class)Cardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NodeApiEnv 
1 (Type/Class)Cardano.Api.TxSubmit.Types
2 (Data Constructor)Cardano.Api.TxSubmit.Types
NoLocalChainSyncClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NoScriptDatumForMintCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NoScriptDatumForStakeCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NoStakeAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OnlyAdaSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OperationalCertificate 
1 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
OperationalCertificateIssueCounter 
1 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
OperationalCertIssueErrorCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OperationalCertKeyMismatchCardano.Api.OperationalCertificate, Cardano.Api.Shelley
parseAllCardano.Api.TxMetadata
parseJSONCardano.Api.SerialiseJSON
parseJSONListCardano.Api.SerialiseJSON
PaymentCredentialCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentCredentialByKeyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentCredentialByScriptCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
pBytesCardano.Api.TxMetadata
PipelineCardano.Api.ChainSync.ClientPipelined
PipelineDecisionCardano.Api.ChainSync.ClientPipelined
pipelineDecisionLowHighMarkCardano.Api.ChainSync.ClientPipelined
pipelineDecisionMaxCardano.Api.ChainSync.ClientPipelined
pipelineDecisionMinCardano.Api.ChainSync.ClientPipelined
PlutusScript 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptSerialisedCardano.Api.Script, Cardano.Api.Shelley
PlutusScriptV1Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptV1InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptWitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PolicyId 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PoolIdCardano.Api.Certificate, Cardano.Api.Shelley
PraosNonceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
prettyPrintJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
priceExecutionMemoryCardano.Api.ProtocolParameters
priceExecutionStepsCardano.Api.ProtocolParameters
ProtocolCardano.Api.Protocol.Types
ProtocolClientCardano.Api.Protocol.Types
protocolClientInfoCardano.Api.Protocol.Types
ProtocolClientInfoArgsCardano.Api.Protocol.Types, Cardano.Api.Protocol.Types
ProtocolClientInfoArgsByronCardano.Api.Protocol.Types
ProtocolClientInfoArgsCardanoCardano.Api.Protocol.Types
ProtocolClientInfoArgsShelleyCardano.Api.Protocol.Types
protocolInfoCardano.Api.Protocol.Types
ProtocolInfoArgsCardano.Api.Protocol.Types, Cardano.Api.Protocol.Types
ProtocolInfoArgsByronCardano.Api.Protocol.Types
ProtocolInfoArgsCardanoCardano.Api.Protocol.Types
ProtocolInfoArgsShelleyCardano.Api.Protocol.Types
protocolInitialUpdateableProtocolParametersCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamActiveSlotsCoefficientCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamCollateralPercentCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamCostModelsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamDecentralizationCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamEpochLengthCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ProtocolParameters 
1 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api.Shelley
ProtocolParametersUpdate 
1 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamExtraPraosEntropyCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockBodySizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockExUnitsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockHeaderSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxCollateralInputsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxKESEvolutionsCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamMaxLovelaceSupplyCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamMaxTxExUnitsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxTxSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxValueSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMinPoolCostCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMinUTxOValueCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMonetaryExpansionCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamNetworkIdCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamPoolPledgeInfluenceCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamPoolRetireMaxEpochCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamPricesCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamProtocolVersionCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamSecurityCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamSlotLengthCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamSlotsPerKESPeriodCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamStakeAddressDepositCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamStakePoolDepositCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamStakePoolTargetNumCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamSystemStartCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamTreasuryCutCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamTxFeeFixedCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamTxFeePerByteCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamUpdateQuorumCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamUTxOCostPerWordCardano.Api.ProtocolParameters, Cardano.Api.Shelley
ProtocolState 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
protocolUpdateCollateralPercentCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateCostModelsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateDecentralizationCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateExtraPraosEntropyCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockBodySizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockExUnitsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockHeaderSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxCollateralInputsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxTxExUnitsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxTxSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxValueSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMinPoolCostCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMinUTxOValueCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMonetaryExpansionCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePoolPledgeInfluenceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePoolRetireMaxEpochCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePricesCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateProtocolVersionCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakeAddressDepositCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakePoolDepositCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakePoolTargetNumCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTreasuryCutCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTxFeeFixedCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTxFeePerByteCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateUTxOCostPerWordCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Proxy 
1 (Type/Class)Cardano.Api.HasTypeProxy
2 (Data Constructor)Cardano.Api.HasTypeProxy
proxyToAsTypeCardano.Api.HasTypeProxy, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
pSignedCardano.Api.TxMetadata
pUnsignedCardano.Api.TxMetadata
Quantity 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
quantityToLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryByronUpdateStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryChainPointCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryCurrentEraCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryDebugLedgerStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryEpochCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryEraHistoryCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryGenesisParametersCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInEra 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInModeCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInShelleyBasedEra 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
queryNodeLocalStateCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolParametersCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolParametersUpdateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryStakeAddressesCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryStakeDistributionCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryUTxOCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readFileJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readFileTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readFileTextEnvelopeAnyOfCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readTextEnvelopeFromFileCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readTextEnvelopeOfTypeFromFileCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
recvMsgIntersectFound 
1 (Function)Cardano.Api.ChainSync.Client
2 (Function)Cardano.Api.ChainSync.ClientPipelined
recvMsgIntersectNotFound 
1 (Function)Cardano.Api.ChainSync.Client
2 (Function)Cardano.Api.ChainSync.ClientPipelined
recvMsgRollBackward 
1 (Function)Cardano.Api.ChainSync.Client
2 (Function)Cardano.Api.ChainSync.ClientPipelined
recvMsgRollForward 
1 (Function)Cardano.Api.ChainSync.Client
2 (Function)Cardano.Api.ChainSync.ClientPipelined
renderApplyMempoolPayloadErrCardano.Api.TxSubmit.ErrorRender
renderFoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderGenesisConfigErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderTxSubmitStatusCardano.Api.TxSubmit.Types
RequestCardano.Api.ChainSync.ClientPipelined
RequireAllOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireAnyOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireMOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireSignatureCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireTimeAfterCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireTimeBeforeCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RollBackwardCardano.Api.ChainSync.ClientPipelined
RollForwardCardano.Api.ChainSync.ClientPipelined
runChainSyncClientCardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runChainSyncClientPipelinedCardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runLocalStateQueryClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runLocalTxSubmissionClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runPipelineDecisionCardano.Api.ChainSync.ClientPipelined
SCardano.Api.ChainSync.ClientPipelined
ScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataBytesCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataBytesTooLongCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataConstructorCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataConstructorOutOfRangeCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptDataFromJsonCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataHashCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
ScriptDataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBadMapPairCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBadObjectCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBoolNotAllowedCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonDetailedSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonErrorCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNoSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNotObjectCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNullNotAllowedCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNumberNotIntegerCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonSchemaError 
1 (Type/Class)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonTypeMismatchCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataListCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataMapCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataNumberCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataNumberOutOfRangeCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataRangeError 
1 (Data Constructor)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptDataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptDataToJsonCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDatumCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDatumForTxInCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptHash 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script
ScriptInAnyLang 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptInEra 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptLanguageSupportedInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptPolicyIdCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptRedeemerCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitness 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessForMintingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessForSpendingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessForStakeAddrCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessInCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptWitnessScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
selectAssetCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
selectLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SendMsgDone 
1 (Data Constructor)Cardano.Api.ChainSync.Client
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
SendMsgFindIntersect 
1 (Data Constructor)Cardano.Api.ChainSync.Client
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
SendMsgRequestNext 
1 (Data Constructor)Cardano.Api.ChainSync.Client
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
SendMsgRequestNextPipelinedCardano.Api.ChainSync.ClientPipelined
SendToReservesMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SendToTreasuryMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseAddressForTxOutCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialisedDebugLedgerState 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
serialiseToBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesHexCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesHexTextCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
sgActiveSlotsCoeffCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgEpochLengthCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgGenDelegsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgInitialFundsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgMaxKESEvolutionsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgMaxLovelaceSupplyCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgNetworkIdCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgNetworkMagicCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgProtocolParamsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSecurityParamCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSlotLengthCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSlotsPerKESPeriodCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgStakingCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSystemStartCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgUpdateQuorumCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
ShelleyCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyAddrCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyAddressCardano.Api.Address, Cardano.Api.Shelley
ShelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyBasedEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraAllegraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraAlonzoCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraMaryCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraShelleyCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyBasedToCardanoEraCardano.Api.Eras
ShelleyBlockCardano.Api.Block
ShelleyBlockTypeCardano.Api.Protocol.Types
ShelleyBootstrapWitnessCardano.Api.Tx, Cardano.Api.Shelley
ShelleyEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyEraInShelleyModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyExtendedSigningKeyCardano.Api.Tx
ShelleyGenesis 
1 (Type/Class)Cardano.Api.Shelley.Genesis, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Shelley.Genesis, Cardano.Api.Shelley
shelleyGenesisDefaultsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
ShelleyKeyWitnessCardano.Api.Tx, Cardano.Api.Shelley
ShelleyLedgerEraCardano.Api.Eras, Cardano.Api.Shelley
ShelleyMode 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Shelley
ShelleyModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyNormalSigningKeyCardano.Api.Tx
ShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
ShelleyTxCardano.Api.Tx, Cardano.Api.Shelley
ShelleyTxBodyCardano.Api.TxBody, Cardano.Api.Shelley
ShelleyTxValidationErrorCardano.Api.TxInMode
ShelleyWitnessSigningKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SigDSIGNCardano.Api.Crypto.Ed25519Bip32
SigEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
signByronTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SigningKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SignKeyDSIGNCardano.Api.Crypto.Ed25519Bip32
SignKeyEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
signShelleyTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScript 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InAllegraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InMaryCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InShelleyCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InAllegraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InMaryCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
simpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptWitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SlotNo 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SlotsInEpoch 
1 (Type/Class)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SlotsToEpochEnd 
1 (Type/Class)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
slotToEpochCardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SocketPath 
1 (Type/Class)Cardano.Api.TxSubmit.Types
2 (Data Constructor)Cardano.Api.TxSubmit.Types
SomeByronSigningKeyCardano.Api.KeysByron, Cardano.Api.Byron
SomeNodeClientProtocol 
1 (Type/Class)Cardano.Api.Protocol.Types, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Protocol.Types, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddress 
1 (Type/Class)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Address, Cardano.Api.Shelley
StakeAddressByPointerCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressByValueCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressDelegationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeAddressDeregistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeAddressesMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressReferenceCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressRegistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeCredentialCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeCredentialByKeyCardano.Api.Address, Cardano.Api.Shelley
StakeCredentialByScriptCardano.Api.Address, Cardano.Api.Shelley
StakeExtendedKeyCardano.Api.KeysShelley, Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
StakeKeyCardano.Api.KeysShelley, Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolCostCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolDescriptionCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolHomepageCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolIdCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolKeyCardano.Api.KeysShelley, Cardano.Api.Shelley
StakePoolKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolMarginCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadata 
1 (Type/Class)Cardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolMetadataCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataHashCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolMetadataHashCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataInvalidLengthErrorCardano.Api.StakePoolMetadata
StakePoolMetadataJsonDecodeErrorCardano.Api.StakePoolMetadata
StakePoolMetadataReference 
1 (Type/Class)Cardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Certificate, Cardano.Api.Shelley
stakePoolMetadataURLCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataValidationErrorCardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolNameCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolOwnersCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolParameters 
1 (Type/Class)Cardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Certificate, Cardano.Api.Shelley
stakePoolPledgeCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRegistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakePoolRelayDnsARecordCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayDnsSrvRecordCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayIpCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolRelaysCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRetirementCertificateCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolRewardAccountCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolTickerCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
StakePoolVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolVRFCardano.Api.Certificate, Cardano.Api.Shelley
StakeSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
SubmitFailCardano.Api.IPC
SubmitResultCardano.Api.IPC
SubmitSuccessCardano.Api.IPC
submitTxToNodeLocalCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SuccCardano.Api.ChainSync.ClientPipelined
teDescriptionCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
teRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TestnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
teTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelope 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeAesonDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeDefaultDescrCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDescr 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope
TextEnvelopeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeType 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeTypeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textShowCardano.Api.TxSubmit.Types
throwErrorAsExceptionCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksInSimpleScriptV2Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
timeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
toAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toAlonzoExUnitsCardano.Api.Script
toAlonzoLanguageCardano.Api.Script
toAlonzoPricesCardano.Api.ProtocolParameters
toByronLedgertoByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLedgerUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLovelaceCardano.Api.Value, Cardano.Api.Byron
toByronNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronProtocolMagicIdCardano.Api.NetworkId, Cardano.Api.Byron
toByronRequiresNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronSigningKeyCardano.Api.KeysByron
ToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toCBORCardano.Api.SerialiseCBOR
toConsensusEraIndexCardano.Api.Modes
toConsensusGenTxCardano.Api.TxInMode
toConsensusPointCardano.Api.Block
toConsensusPointInModeCardano.Api.Block
toConsensusQueryCardano.Api.Query
toEncodingCardano.Api.SerialiseJSON
toEncodingListCardano.Api.SerialiseJSON
toEraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toJSONCardano.Api.SerialiseJSON
toJSONListCardano.Api.SerialiseJSON
toLedgerPParamsCardano.Api.ProtocolParameters
toLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
toLedgerUpdateCardano.Api.ProtocolParameters
toMaryValueCardano.Api.Value, Cardano.Api.Shelley
toNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toScriptInAnyLangCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
toShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
toShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
toShelleyNetworkCardano.Api.NetworkId, Cardano.Api.Shelley
toShelleyPoolParamsCardano.Api.Certificate
toShelleyScriptCardano.Api.Script, Cardano.Api.Shelley
toShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
toShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
toShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
toShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
transactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Tx 
1 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptData 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptDataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptDataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScripts 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBody 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyAuxDataHashInvalidErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyContent 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMetadataErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintAdaErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintBeforeMaryErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMissingProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyNoScriptDataCardano.Api.TxBody
TxBodyOutputNegativeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyOutputOverflowCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyScriptData 
1 (Type/Class)Cardano.Api.TxBody
2 (Data Constructor)Cardano.Api.TxBody
TxCertificates 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txCertificatesCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCertificatesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnesses 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txExtraKeyWitsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeExplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeImplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxId 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIn 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInByronSpecialCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInMode 
1 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateral 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateralNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIx 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaBytesCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadata 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataBytesTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInEra 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadMapPairCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBoolNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonDetailedSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonErrorCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNotObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNullNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNumberNotIntegerCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaError 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelBadKeyCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelNotMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonTypeMismatchCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNumberOutOfRangeCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataRangeError 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataTextTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataValueCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaListCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaNumberCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaTextCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintValue 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMintValueCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOut 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAdaOnlyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHash 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHashNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutValue 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxSubmitBadTxCardano.Api.TxSubmit.Types
TxSubmitDecodeFailCardano.Api.TxSubmit.Types
TxSubmitDecodeHexCardano.Api.TxSubmit.Types
TxSubmitEmptyCardano.Api.TxSubmit.Types
TxSubmitFailCardano.Api.TxSubmit.Types
TxSubmitOkCardano.Api.TxSubmit.Types
TxSubmitStatusCardano.Api.TxSubmit.Types
TxUpdateProposal 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txUpdateProposalCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxUpdateProposalNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationEraMismatchCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationErrorCardano.Api.TxInMode, Cardano.Api.IPC
TxValidationErrorInMode 
1 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityLowerBound 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoLowerBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoUpperBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txValidityRangeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityUpperBound 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawals 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txWithdrawalsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawalsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unBlockNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
unByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
unEpochNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unEpochSizeCardano.Api.GenesisParameters
unEpochSlotsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unKESPeriodCardano.Api.OperationalCertificate, Cardano.Api.Shelley
unNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unSlotNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unSocketPathCardano.Api.TxSubmit.Types
UpdateProposal 
1 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
updateProposalSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UsingRawBytesHex 
1 (Type/Class)Cardano.Api.SerialiseRaw
2 (Data Constructor)Cardano.Api.SerialiseRaw
UTxO 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
validateAndHashStakePoolMetadataCardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validateCostModelCardano.Api.ProtocolParameters
validateScriptDataCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validateTxMetadataCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityLowerBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityNoUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueFromListCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueFromNestedRepCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedBundle 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedBundleAdaCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedRep 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToListCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToNestedRepCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VerificationKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Shelley, Cardano.Api.Byron, Cardano.Api.Byron
verificationKeyHashCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VerKeyDSIGNCardano.Api.Crypto.Ed25519Bip32
VerKeyEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
ViewTx 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VrfKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
VrfKeyHashCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
VrfSigningKeyCardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VrfVerificationKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
WitCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxMint 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxStake 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxTxIn 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
withdrawalsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessByronAddressCardano.Api.Tx, Cardano.Api.Byron
WitnessGenesisDelegateExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisDelegateKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisUTxOKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessNetworkIdCardano.Api.Tx, Cardano.Api.Byron
WitnessNetworkIdOrByronAddressCardano.Api.Tx, Cardano.Api.Byron
WitnessPaymentExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessPaymentKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessStakeExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessStakeKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessStakePoolKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileTextEnvelopeWithOwnerPermissionsCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
xPrvFromBytesCardano.Api.Crypto.Ed25519Bip32
xPrvToBytesCardano.Api.Crypto.Ed25519Bip32
ZCardano.Api.ChainSync.ClientPipelined
ZeroCardano.Api.ChainSync.ClientPipelined
\ No newline at end of file +cardano-api-1.27.0 (Index)
cardano-api-1.27.0

Index

?!Cardano.Api.Utils
?!.Cardano.Api.Utils
AByronSigningKeyCardano.Api.KeysByron, Cardano.Api.Byron
AByronSigningKeyLegacyCardano.Api.KeysByron, Cardano.Api.Byron
AcquireFailureCardano.Api.IPC
AcquireFailurePointNotOnChainCardano.Api.IPC
AcquireFailurePointTooOldCardano.Api.IPC
AdaAssetIdCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressByronCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressInEra 
1 (Type/Class)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressShelleyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressTypeInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
adjustSimpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AllegraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AllegraEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AllegraEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AlonzoEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AlonzoEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyAddressInShelleyBasedEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyCardanoEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyCardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyConsensusMode 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyConsensusModeParams 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyEraInMode 
1 (Type/Class)Cardano.Api.Modes
2 (Data Constructor)Cardano.Api.Modes
anyEraInModeToAnyEraCardano.Api.Modes
AnyPlutusScriptVersion 
1 (Type/Class)Cardano.Api.Script
2 (Data Constructor)Cardano.Api.Script
AnyScriptLanguage 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
applyBlockCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ApplyMempoolPayloadErrCardano.Api.TxSubmit.Types
AsAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAddressAnyCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAddressInEraCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAllegraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAllegraEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAlonzoEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAssetNameCardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronAddrCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronKeyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronKeyLegacyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
AsByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
AsByronWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsCertificateCardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisDelegateExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisDelegateKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisUTxOKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsHashCardano.Api.Hash, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsKesKeyCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsKeyWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsOperationalCertificateCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsOperationalCertificateIssueCounterCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPaymentExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPaymentKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPlutusScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPlutusScriptV1Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPolicyIdCardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptHashCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptInAnyLangCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptInEraCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AssetId 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AssetName 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyAddrCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSigningKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptV1Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptV2Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakePoolKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakePoolMetadataCardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxIdCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxMetadataCardano.Api.TxMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTypeCardano.Api.HasTypeProxy, Cardano.Api.Eras, Cardano.Api.Hash, Cardano.Api.SerialiseTextEnvelope, Cardano.Api.Key, Cardano.Api.TxMetadata, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.SpecialByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Address, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.TxBody, Cardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Shelley, Cardano.Api.Byron, Cardano.Api.Byron
AsUpdateProposalCardano.Api.ProtocolParameters, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsVerificationKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsVrfKeyCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
auxScriptsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DataPartToBytesErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DecodeErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DecodingErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DeserialiseFromBytesErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
bech32PrefixesPermittedCardano.Api.SerialiseBech32
bech32PrefixForCardano.Api.SerialiseBech32
Bech32UnexpectedPrefixCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32WrongPrefixCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Block 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockHeader 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockInMode 
1 (Type/Class)Cardano.Api.Block, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockNo 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockTypeCardano.Api.Protocol.Types
bPpuHeavyDelThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxBlockSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxHeaderSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxProposalSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxTxSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMpcThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuScriptVersionCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuSlotDurationCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuSoftforkRuleCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuTxFeePolicyCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUnlockStakeEpochCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateProposalThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateProposalTTLCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateVoteThdCardano.Api.SpecialByron, Cardano.Api.Byron
BuildTxCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BuildTxWith 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronAddrCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronAddressCardano.Api.Address, Cardano.Api.Byron
ByronAddressInAnyEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
byronAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronBlockCardano.Api.Block
ByronBlockTypeCardano.Api.Protocol.Types
ByronEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronEraInByronModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyFormatCardano.Api.KeysByron
byronKeyFormatCardano.Api.KeysByron
ByronKeyHashCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyHashLegacyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyLegacyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyWitnessCardano.Api.Tx, Cardano.Api.Byron
ByronLegacyKeyFormatCardano.Api.KeysByron
ByronMode 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Byron
ByronModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronModernKeyFormatCardano.Api.KeysByron
ByronProtocolParametersUpdate 
1 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
ByronSigningKeyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronSigningKeyLegacyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronTxCardano.Api.Tx, Cardano.Api.Byron
ByronTxBodyCardano.Api.TxBody, Cardano.Api.Byron
ByronTxValidationErrorCardano.Api.TxInMode
ByronUpdateProposal 
1 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
ByronVerificationKeyCardano.Api.KeysByron, Cardano.Api.Byron
ByronVerificationKeyLegacyCardano.Api.KeysByron, Cardano.Api.Byron
ByronVote 
1 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
calcMinimumDepositCardano.Api.Value, Cardano.Api.Shelley
CardanoBlockTypeCardano.Api.Protocol.Types
CardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
cardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoEraStyleCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
cardanoEraStyleCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoMode 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoModeIsMultiEraCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastHashCardano.Api.Hash
castHashCardano.Api.Hash, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
castSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastSigningKeyRoleCardano.Api.Key
castVerificationKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastVerificationKeyRoleCardano.Api.Key
CertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
certificatesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainPoint 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainPointAtGenesisCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainSyncClient 
1 (Type/Class)Cardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
chainSyncClientNullCardano.Api.ChainSync.Client
ChainSyncClientPipelined 
1 (Type/Class)Cardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainSyncInstructionCardano.Api.ChainSync.ClientPipelined
ChainTip 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainTipAtGenesisCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
chainTipToChainPointCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ClientPipelinedStIdleCardano.Api.ChainSync.ClientPipelined
ClientPipelinedStIntersect 
1 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
ClientStIdleCardano.Api.ChainSync.Client
ClientStIntersect 
1 (Type/Class)Cardano.Api.ChainSync.Client
2 (Data Constructor)Cardano.Api.ChainSync.Client
ClientStNext 
1 (Type/Class)Cardano.Api.ChainSync.Client
2 (Data Constructor)Cardano.Api.ChainSync.Client
3 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
4 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
clsStateCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CollateralInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CollateralSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
collateralSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CollectCardano.Api.ChainSync.ClientPipelined
CollectOrPipelineCardano.Api.ChainSync.ClientPipelined
CollectResponseCardano.Api.ChainSync.ClientPipelined
connectToLocalNodeCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusBlockForEraCardano.Api.Modes
ConsensusBlockForModeCardano.Api.Modes
ConsensusModeCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusModeIsMultiEraCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
consensusModeOnlyCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
constantPipelineDecisionCardano.Api.ChainSync.ClientPipelined
CostModel 
1 (Type/Class)Cardano.Api.ProtocolParameters
2 (Data Constructor)Cardano.Api.ProtocolParameters
DebugLedgerState 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
deserialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseAnyOfFromBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromRawBytesHexCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromTextEnvelopeAnyOfCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deterministicSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deterministicSigningKeySeedSizeCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
displayErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Ed25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
encodedListSizeExprCardano.Api.SerialiseCBOR
encodedSizeExprCardano.Api.SerialiseCBOR
Env 
1 (Type/Class)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envLedgerConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envProtocolConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envSecurityParamCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EpochNo 
1 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EpochSize 
1 (Type/Class)Cardano.Api.GenesisParameters
2 (Data Constructor)Cardano.Api.GenesisParameters
EpochSlots 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EraHistory 
1 (Type/Class)Cardano.Api.Query
2 (Data Constructor)Cardano.Api.Query
EraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
eraInModeToEraCardano.Api.Modes
eraOfScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
eraOfScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ErrorAsException 
1 (Type/Class)Cardano.Api.Error
2 (Data Constructor)Cardano.Api.Error
estimateTransactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
examplePlutusScriptAlwaysFailsCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
examplePlutusScriptAlwaysSucceedsCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
executionMemoryCardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
executionStepsCardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ExecutionUnitPrices 
1 (Type/Class)Cardano.Api.ProtocolParameters
2 (Data Constructor)Cardano.Api.ProtocolParameters
ExecutionUnits 
1 (Type/Class)Cardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ExtraKeyWitnessesInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
extraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileError 
1 (Type/Class)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileErrorTempFileCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileIOErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
filterValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
foldBlocksCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksApplyBlockErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
fromAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromAlonzoExUnitsCardano.Api.Script
fromAlonzoLanguageCardano.Api.Script
fromAlonzoPricesCardano.Api.ProtocolParameters
fromByronLovelaceCardano.Api.Value
fromByronTxInCardano.Api.TxBody, Cardano.Api.Byron
FromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromCBORCardano.Api.SerialiseCBOR
fromConsensusApplyTxErrCardano.Api.TxInMode
fromConsensusBlockCardano.Api.Block
fromConsensusEraIndexCardano.Api.Modes
fromConsensusPointCardano.Api.Block
fromConsensusPointInModeCardano.Api.Block
fromConsensusQueryResultCardano.Api.Query
fromConsensusTipCardano.Api.Block
FromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromLedgerPParamsCardano.Api.ProtocolParameters
fromLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
fromLedgerUpdateCardano.Api.ProtocolParameters
fromMaryValueCardano.Api.Value, Cardano.Api.Shelley
fromPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyBasedScriptCardano.Api.Script
fromShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
fromShelleyDeltaLovelaceCardano.Api.Value
fromShelleyGenesisCardano.Api.GenesisParameters
fromShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
fromShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMetadatumCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
fromShelleyNetworkCardano.Api.NetworkId
fromShelleyPaymentCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyPParamsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
fromShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
fromShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeReferenceCardano.Api.Address, Cardano.Api.Shelley
fromShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
FromSomeType 
1 (Type/Class)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromTxOutCardano.Api.TxBody
generateSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisConfigErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisKeyDelegationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
GenesisKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisParameters 
1 (Type/Class)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
genesisUTxOPseudoTxInCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
getLocalChainTipCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getShelleyKeyWitnessVerificationKeyCardano.Api.Tx, Cardano.Api.Shelley
getTxBodyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getTxIdCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getTxWitnessesCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getVerificationKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HashCardano.Api.Hash, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
hashScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HasTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HasTypeProxyCardano.Api.HasTypeProxy, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HeaderHashCardano.Api.Block
ILSEConfigFileCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ILSEGenesisFileCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ILSELedgerConsensusConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InAnyCardanoEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InAnyShelleyBasedEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
initialLedgerStateCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsByronKeyCardano.Api.KeysByron
IsCardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsShelleyBasedEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsSimpleScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
issueOperationalCertificateCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
JsonDecodeError 
1 (Type/Class)Cardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KesKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
KesKeyHashCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
KESPeriod 
1 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
KesSigningKeyCardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KesVerificationKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
KeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitness 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessForSpendingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessForStakeAddrCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessInCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
labelCardano.Api.SerialiseCBOR
languageOfScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerState 
1 (Type/Class)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateAllegraCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateByronCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateMaryCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateShelleyCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LegacyByronEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalChainSyncClient 
1 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localChainSyncClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalChainSyncClientPipelinedCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localConsensusModeCardano.Api.IPC
localConsensusModeParamsCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeClientProtocols 
1 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeClientProtocolsInModeCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeConnectInfo 
1 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localNodeNetworkIdCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localNodeSocketPathCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalStateQueryClient 
1 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localStateQueryClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalTxSubmissionClient 
1 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.IPC, Cardano.Api.Byron
localTxSubmissionClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Lovelace 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api.Shelley, Cardano.Api.Byron
lovelaceToQuantityCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
lovelaceToValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MainnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mainnetNetworkMagicCardano.Api.NetworkId
makeByronAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronKeyWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
makeByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
makeGenesisKeyDelegationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeMIRCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makePraosNonceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeProtocolParametersUpdateCardano.Api.SpecialByron, Cardano.Api.Byron
makeShelleyAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyBootstrapWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyKeyWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleySignatureCardano.Api.Tx, Cardano.Api.Shelley
makeShelleyUpdateProposalCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeSignedTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressDelegationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressDeregistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressRegistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakePoolRegistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakePoolRetirementCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeTransactionBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeTransactionMetadataCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mapChainSyncClientCardano.Api.ChainSync.Client
mapChainSyncClientPipelinedCardano.Api.ChainSync.ClientPipelined
MaryCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MaryEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MaryEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MempoolDlgErrCardano.Api.TxSubmit.Types
MempoolTxErrCardano.Api.TxSubmit.Types
MempoolUpdateProposalErrCardano.Api.TxSubmit.Types
MempoolUpdateVoteErrCardano.Api.TxSubmit.Types
metadataFromJsonCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
metadataToJsonCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
metadataValueToJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MIRCertificateCardano.Api.Certificate, Cardano.Api.Shelley
MIRTargetCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mkNodeClientProtocolByronCardano.Api.Protocol.Byron
mkNodeClientProtocolCardanoCardano.Api.Protocol.Cardano
mkNodeClientProtocolShelleyCardano.Api.Protocol.Shelley
MkPipelineDecision 
1 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
mkSomeNodeClientProtocolByronCardano.Api.Protocol.Byron
mkSomeNodeClientProtocolCardanoCardano.Api.Protocol.Cardano
mkSomeNodeClientProtocolShelleyCardano.Api.Protocol.Shelley
MultiAssetInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MultiAssetInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MultiAssetSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
multiAssetSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NCardano.Api.ChainSync.ClientPipelined
naeConfigCardano.Api.TxSubmit.Types
naeSocketCardano.Api.TxSubmit.Types
NatCardano.Api.ChainSync.ClientPipelined
natToIntCardano.Api.ChainSync.ClientPipelined
NEByronConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NECardanoConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NEErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
negateValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NEShelleyConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NetworkIdCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NetworkMagic 
1 (Type/Class)Cardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NodeApiEnv 
1 (Type/Class)Cardano.Api.TxSubmit.Types
2 (Data Constructor)Cardano.Api.TxSubmit.Types
NoLocalChainSyncClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NoScriptDatumForMintCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NoScriptDatumForStakeCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NoStakeAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OnlyAdaSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OperationalCertificate 
1 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
OperationalCertificateIssueCounter 
1 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
OperationalCertIssueErrorCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OperationalCertKeyMismatchCardano.Api.OperationalCertificate, Cardano.Api.Shelley
parseAllCardano.Api.TxMetadata
parseJSONCardano.Api.SerialiseJSON
parseJSONListCardano.Api.SerialiseJSON
PaymentCredentialCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentCredentialByKeyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentCredentialByScriptCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
pBytesCardano.Api.TxMetadata
PipelineCardano.Api.ChainSync.ClientPipelined
PipelineDecisionCardano.Api.ChainSync.ClientPipelined
pipelineDecisionLowHighMarkCardano.Api.ChainSync.ClientPipelined
pipelineDecisionMaxCardano.Api.ChainSync.ClientPipelined
pipelineDecisionMinCardano.Api.ChainSync.ClientPipelined
PlutusScript 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptSerialisedCardano.Api.Script, Cardano.Api.Shelley
PlutusScriptV1Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptV1InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptWitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PolicyId 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PoolIdCardano.Api.Certificate, Cardano.Api.Shelley
PraosNonceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
prettyPrintJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
priceExecutionMemoryCardano.Api.ProtocolParameters
priceExecutionStepsCardano.Api.ProtocolParameters
ProtocolCardano.Api.Protocol.Types
ProtocolClientCardano.Api.Protocol.Types
protocolClientInfoCardano.Api.Protocol.Types
ProtocolClientInfoArgsCardano.Api.Protocol.Types, Cardano.Api.Protocol.Types
ProtocolClientInfoArgsByronCardano.Api.Protocol.Types
ProtocolClientInfoArgsCardanoCardano.Api.Protocol.Types
ProtocolClientInfoArgsShelleyCardano.Api.Protocol.Types
protocolInfoCardano.Api.Protocol.Types
ProtocolInfoArgsCardano.Api.Protocol.Types, Cardano.Api.Protocol.Types
ProtocolInfoArgsByronCardano.Api.Protocol.Types
ProtocolInfoArgsCardanoCardano.Api.Protocol.Types
ProtocolInfoArgsShelleyCardano.Api.Protocol.Types
protocolInitialUpdateableProtocolParametersCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamActiveSlotsCoefficientCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamCollateralPercentCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamCostModelsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamDecentralizationCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamEpochLengthCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ProtocolParameters 
1 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api.Shelley
ProtocolParametersUpdate 
1 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamExtraPraosEntropyCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockBodySizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockExUnitsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockHeaderSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxCollateralInputsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxKESEvolutionsCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamMaxLovelaceSupplyCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamMaxTxExUnitsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxTxSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxValueSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMinPoolCostCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMinUTxOValueCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMonetaryExpansionCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamNetworkIdCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamPoolPledgeInfluenceCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamPoolRetireMaxEpochCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamPricesCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamProtocolVersionCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamSecurityCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamSlotLengthCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamSlotsPerKESPeriodCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamStakeAddressDepositCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamStakePoolDepositCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamStakePoolTargetNumCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamSystemStartCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamTreasuryCutCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamTxFeeFixedCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamTxFeePerByteCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamUpdateQuorumCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamUTxOCostPerWordCardano.Api.ProtocolParameters, Cardano.Api.Shelley
ProtocolState 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
protocolUpdateCollateralPercentCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateCostModelsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateDecentralizationCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateExtraPraosEntropyCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockBodySizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockExUnitsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockHeaderSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxCollateralInputsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxTxExUnitsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxTxSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxValueSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMinPoolCostCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMinUTxOValueCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMonetaryExpansionCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePoolPledgeInfluenceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePoolRetireMaxEpochCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePricesCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateProtocolVersionCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakeAddressDepositCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakePoolDepositCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakePoolTargetNumCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTreasuryCutCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTxFeeFixedCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTxFeePerByteCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateUTxOCostPerWordCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Proxy 
1 (Type/Class)Cardano.Api.HasTypeProxy
2 (Data Constructor)Cardano.Api.HasTypeProxy
proxyToAsTypeCardano.Api.HasTypeProxy, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
pSignedCardano.Api.TxMetadata
pUnsignedCardano.Api.TxMetadata
Quantity 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
quantityToLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryByronUpdateStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryChainPointCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryCurrentEraCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryDebugLedgerStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryEpochCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryEraHistoryCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryGenesisParametersCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInEra 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInModeCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInShelleyBasedEra 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
queryNodeLocalStateCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolParametersCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolParametersUpdateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryStakeAddressesCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryStakeDistributionCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryUTxOCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readFileJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readFileTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readFileTextEnvelopeAnyOfCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readTextEnvelopeFromFileCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readTextEnvelopeOfTypeFromFileCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
recvMsgIntersectFound 
1 (Function)Cardano.Api.ChainSync.Client
2 (Function)Cardano.Api.ChainSync.ClientPipelined
recvMsgIntersectNotFound 
1 (Function)Cardano.Api.ChainSync.Client
2 (Function)Cardano.Api.ChainSync.ClientPipelined
recvMsgRollBackward 
1 (Function)Cardano.Api.ChainSync.Client
2 (Function)Cardano.Api.ChainSync.ClientPipelined
recvMsgRollForward 
1 (Function)Cardano.Api.ChainSync.Client
2 (Function)Cardano.Api.ChainSync.ClientPipelined
renderApplyMempoolPayloadErrCardano.Api.TxSubmit.ErrorRender
renderFoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderGenesisConfigErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderTxSubmitStatusCardano.Api.TxSubmit.Types
RequestCardano.Api.ChainSync.ClientPipelined
RequireAllOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireAnyOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireMOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireSignatureCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireTimeAfterCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireTimeBeforeCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RollBackwardCardano.Api.ChainSync.ClientPipelined
RollForwardCardano.Api.ChainSync.ClientPipelined
runChainSyncClientCardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runChainSyncClientPipelinedCardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runLocalStateQueryClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runLocalTxSubmissionClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runPipelineDecisionCardano.Api.ChainSync.ClientPipelined
SCardano.Api.ChainSync.ClientPipelined
ScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataBytesCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataBytesTooLongCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataConstructorCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataConstructorOutOfRangeCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptDataFromJsonCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataHashCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
ScriptDataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBadMapPairCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBadObjectCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBoolNotAllowedCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonDetailedSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonErrorCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNoSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNotObjectCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNullNotAllowedCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNumberNotIntegerCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonSchemaError 
1 (Type/Class)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonTypeMismatchCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataListCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataMapCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataNumberCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataNumberOutOfRangeCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataRangeError 
1 (Data Constructor)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptDataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptDataToJsonCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDatumCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDatumForTxInCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptHash 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script
ScriptInAnyLang 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptInEra 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptLanguageSupportedInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptPolicyIdCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptRedeemerCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitness 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessForMintingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessForSpendingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessForStakeAddrCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessInCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptWitnessScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
selectAssetCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
selectLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SendMsgDone 
1 (Data Constructor)Cardano.Api.ChainSync.Client
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
SendMsgFindIntersect 
1 (Data Constructor)Cardano.Api.ChainSync.Client
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
SendMsgRequestNext 
1 (Data Constructor)Cardano.Api.ChainSync.Client
2 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
SendMsgRequestNextPipelinedCardano.Api.ChainSync.ClientPipelined
SendToReservesMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SendToTreasuryMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseAddressForTxOutCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialisedDebugLedgerState 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
serialiseToBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesHexCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesHexTextCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
sgActiveSlotsCoeffCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgEpochLengthCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgGenDelegsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgInitialFundsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgMaxKESEvolutionsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgMaxLovelaceSupplyCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgNetworkIdCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgNetworkMagicCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgProtocolParamsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSecurityParamCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSlotLengthCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSlotsPerKESPeriodCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgStakingCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSystemStartCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgUpdateQuorumCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
ShelleyCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyAddrCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyAddressCardano.Api.Address, Cardano.Api.Shelley
ShelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyBasedEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraAllegraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraAlonzoCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraMaryCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraShelleyCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyBasedToCardanoEraCardano.Api.Eras
ShelleyBlockCardano.Api.Block
ShelleyBlockTypeCardano.Api.Protocol.Types
ShelleyBootstrapWitnessCardano.Api.Tx, Cardano.Api.Shelley
ShelleyEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyEraInShelleyModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyExtendedSigningKeyCardano.Api.Tx
ShelleyGenesis 
1 (Type/Class)Cardano.Api.Shelley.Genesis, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Shelley.Genesis, Cardano.Api.Shelley
shelleyGenesisDefaultsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
ShelleyKeyWitnessCardano.Api.Tx, Cardano.Api.Shelley
ShelleyLedgerEraCardano.Api.Eras, Cardano.Api.Shelley
ShelleyMode 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Shelley
ShelleyModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyNormalSigningKeyCardano.Api.Tx
ShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
ShelleyTxCardano.Api.Tx, Cardano.Api.Shelley
ShelleyTxBodyCardano.Api.TxBody, Cardano.Api.Shelley
ShelleyTxValidationErrorCardano.Api.TxInMode
ShelleyWitnessSigningKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SigDSIGNCardano.Api.Crypto.Ed25519Bip32
SigEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
signByronTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SigningKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SignKeyDSIGNCardano.Api.Crypto.Ed25519Bip32
SignKeyEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
signShelleyTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScript 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InAllegraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InMaryCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InShelleyCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InAllegraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InMaryCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
simpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptWitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SlotNo 
1 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SlotsInEpoch 
1 (Type/Class)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SlotsToEpochEnd 
1 (Type/Class)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
slotToEpochCardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SocketPath 
1 (Type/Class)Cardano.Api.TxSubmit.Types
2 (Data Constructor)Cardano.Api.TxSubmit.Types
SomeByronSigningKeyCardano.Api.KeysByron, Cardano.Api.Byron
SomeNodeClientProtocol 
1 (Type/Class)Cardano.Api.Protocol.Types, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Protocol.Types, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddress 
1 (Type/Class)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Address, Cardano.Api.Shelley
StakeAddressByPointerCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressByValueCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressDelegationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeAddressDeregistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeAddressesMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressReferenceCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressRegistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeCredentialCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeCredentialByKeyCardano.Api.Address, Cardano.Api.Shelley
StakeCredentialByScriptCardano.Api.Address, Cardano.Api.Shelley
StakeExtendedKeyCardano.Api.KeysShelley, Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
StakeKeyCardano.Api.KeysShelley, Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolCostCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolDescriptionCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolHomepageCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolIdCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolKeyCardano.Api.KeysShelley, Cardano.Api.Shelley
StakePoolKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolMarginCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadata 
1 (Type/Class)Cardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolMetadataCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataHashCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolMetadataHashCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataInvalidLengthErrorCardano.Api.StakePoolMetadata
StakePoolMetadataJsonDecodeErrorCardano.Api.StakePoolMetadata
StakePoolMetadataReference 
1 (Type/Class)Cardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Certificate, Cardano.Api.Shelley
stakePoolMetadataURLCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataValidationErrorCardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolNameCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolOwnersCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolParameters 
1 (Type/Class)Cardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Certificate, Cardano.Api.Shelley
stakePoolPledgeCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRegistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakePoolRelayDnsARecordCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayDnsSrvRecordCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayIpCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolRelaysCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRetirementCertificateCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolRewardAccountCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolTickerCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
StakePoolVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolVRFCardano.Api.Certificate, Cardano.Api.Shelley
StakeSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
SubmitFailCardano.Api.IPC
SubmitResultCardano.Api.IPC
SubmitSuccessCardano.Api.IPC
submitTxToNodeLocalCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SuccCardano.Api.ChainSync.ClientPipelined
teDescriptionCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
teRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TestnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
teTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelope 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeAesonDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeDefaultDescrCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDescr 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope
TextEnvelopeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeType 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeTypeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textShowCardano.Api.TxSubmit.Types
throwErrorAsExceptionCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksInSimpleScriptV2Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
timeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
toAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toAlonzoExUnitsCardano.Api.Script
toAlonzoLanguageCardano.Api.Script
toAlonzoPricesCardano.Api.ProtocolParameters
toByronLedgertoByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLedgerUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLovelaceCardano.Api.Value, Cardano.Api.Byron
toByronNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronProtocolMagicIdCardano.Api.NetworkId, Cardano.Api.Byron
toByronRequiresNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronSigningKeyCardano.Api.KeysByron
ToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toCBORCardano.Api.SerialiseCBOR
toConsensusEraIndexCardano.Api.Modes
toConsensusGenTxCardano.Api.TxInMode
toConsensusPointCardano.Api.Block
toConsensusPointInModeCardano.Api.Block
toConsensusQueryCardano.Api.Query
toEncodingCardano.Api.SerialiseJSON
toEncodingListCardano.Api.SerialiseJSON
toEraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toJSONCardano.Api.SerialiseJSON
toJSONListCardano.Api.SerialiseJSON
toLedgerPParamsCardano.Api.ProtocolParameters
toLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
toLedgerUpdateCardano.Api.ProtocolParameters
toMaryValueCardano.Api.Value, Cardano.Api.Shelley
toNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toScriptInAnyLangCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
toShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
toShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMetadatumCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
toShelleyNetworkCardano.Api.NetworkId, Cardano.Api.Shelley
toShelleyPoolParamsCardano.Api.Certificate
toShelleyScriptCardano.Api.Script, Cardano.Api.Shelley
toShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
toShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
toShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
toShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
transactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Tx 
1 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptData 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptDataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptDataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScripts 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBody 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyAuxDataHashInvalidErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyContent 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMetadataErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintAdaErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintBeforeMaryErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMissingProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyNoScriptDataCardano.Api.TxBody
TxBodyOutputNegativeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyOutputOverflowCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyScriptData 
1 (Type/Class)Cardano.Api.TxBody
2 (Data Constructor)Cardano.Api.TxBody
TxCertificates 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txCertificatesCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCertificatesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnesses 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txExtraKeyWitsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeExplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeImplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxId 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIn 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInByronSpecialCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInMode 
1 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateral 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateralNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIx 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaBytesCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadata 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataBytesTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInEra 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadMapPairCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBoolNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonDetailedSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonErrorCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNotObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNullNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNumberNotIntegerCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaError 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelBadKeyCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelNotMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonTypeMismatchCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNumberOutOfRangeCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataRangeError 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataTextTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataValueCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaListCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaNumberCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaTextCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintValue 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMintValueCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOut 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAdaOnlyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHash 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHashNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutValue 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxSubmitBadTxCardano.Api.TxSubmit.Types
TxSubmitDecodeFailCardano.Api.TxSubmit.Types
TxSubmitDecodeHexCardano.Api.TxSubmit.Types
TxSubmitEmptyCardano.Api.TxSubmit.Types
TxSubmitFailCardano.Api.TxSubmit.Types
TxSubmitOkCardano.Api.TxSubmit.Types
TxSubmitStatusCardano.Api.TxSubmit.Types
TxUpdateProposal 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txUpdateProposalCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxUpdateProposalNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationEraMismatchCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationErrorCardano.Api.TxInMode, Cardano.Api.IPC
TxValidationErrorInMode 
1 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityLowerBound 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoLowerBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoUpperBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txValidityRangeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityUpperBound 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawals 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txWithdrawalsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawalsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unBlockNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
unByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
unEpochNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unEpochSizeCardano.Api.GenesisParameters
unEpochSlotsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unKESPeriodCardano.Api.OperationalCertificate, Cardano.Api.Shelley
unNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unSlotNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unSocketPathCardano.Api.TxSubmit.Types
UpdateProposal 
1 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
updateProposalSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UsingRawBytesHex 
1 (Type/Class)Cardano.Api.SerialiseRaw
2 (Data Constructor)Cardano.Api.SerialiseRaw
UTxO 
1 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
validateAndHashStakePoolMetadataCardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validateCostModelCardano.Api.ProtocolParameters
validateScriptDataCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validateTxMetadataCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityLowerBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityNoUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueFromListCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueFromNestedRepCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedBundle 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedBundleAdaCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedRep 
1 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToListCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToNestedRepCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VerificationKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Shelley, Cardano.Api.Byron, Cardano.Api.Byron
verificationKeyHashCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VerKeyDSIGNCardano.Api.Crypto.Ed25519Bip32
VerKeyEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
ViewTx 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VrfKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
VrfKeyHashCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
VrfSigningKeyCardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VrfVerificationKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
WitCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxMint 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxStake 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxTxIn 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
withdrawalsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessByronAddressCardano.Api.Tx, Cardano.Api.Byron
WitnessGenesisDelegateExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisDelegateKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisUTxOKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessNetworkIdCardano.Api.Tx, Cardano.Api.Byron
WitnessNetworkIdOrByronAddressCardano.Api.Tx, Cardano.Api.Byron
WitnessPaymentExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessPaymentKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessStakeExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessStakeKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessStakePoolKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileTextEnvelopeWithOwnerPermissionsCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
xPrvFromBytesCardano.Api.Crypto.Ed25519Bip32
xPrvToBytesCardano.Api.Crypto.Ed25519Bip32
ZCardano.Api.ChainSync.ClientPipelined
ZeroCardano.Api.ChainSync.ClientPipelined
\ No newline at end of file diff --git a/cardano-api/doc-index-F.html b/cardano-api/doc-index-F.html index 95a39251201..2ff40168471 100644 --- a/cardano-api/doc-index-F.html +++ b/cardano-api/doc-index-F.html @@ -1 +1 @@ -cardano-api-1.27.0 (Index - F)
cardano-api-1.27.0

Index - F

FileError 
1 (Type/Class)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileErrorTempFileCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileIOErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
filterValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
foldBlocksCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksApplyBlockErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
fromAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromAlonzoExUnitsCardano.Api.Script
fromAlonzoLanguageCardano.Api.Script
fromAlonzoPricesCardano.Api.ProtocolParameters
fromByronLovelaceCardano.Api.Value
fromByronTxInCardano.Api.TxBody, Cardano.Api.Byron
FromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromCBORCardano.Api.SerialiseCBOR
fromConsensusApplyTxErrCardano.Api.TxInMode
fromConsensusBlockCardano.Api.Block
fromConsensusEraIndexCardano.Api.Modes
fromConsensusPointCardano.Api.Block
fromConsensusPointInModeCardano.Api.Block
fromConsensusQueryResultCardano.Api.Query
fromConsensusTipCardano.Api.Block
FromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromLedgerPParamsCardano.Api.ProtocolParameters
fromLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
fromLedgerUpdateCardano.Api.ProtocolParameters
fromMaryValueCardano.Api.Value, Cardano.Api.Shelley
fromPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyBasedScriptCardano.Api.Script
fromShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
fromShelleyDeltaLovelaceCardano.Api.Value
fromShelleyGenesisCardano.Api.GenesisParameters
fromShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
fromShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
fromShelleyNetworkCardano.Api.NetworkId
fromShelleyPaymentCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyPParamsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
fromShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
fromShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeReferenceCardano.Api.Address, Cardano.Api.Shelley
fromShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
FromSomeType 
1 (Type/Class)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromTxOutCardano.Api.TxBody
\ No newline at end of file +cardano-api-1.27.0 (Index - F)
cardano-api-1.27.0

Index - F

FileError 
1 (Type/Class)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileErrorTempFileCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileIOErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
filterValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
foldBlocksCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksApplyBlockErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
fromAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromAlonzoExUnitsCardano.Api.Script
fromAlonzoLanguageCardano.Api.Script
fromAlonzoPricesCardano.Api.ProtocolParameters
fromByronLovelaceCardano.Api.Value
fromByronTxInCardano.Api.TxBody, Cardano.Api.Byron
FromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromCBORCardano.Api.SerialiseCBOR
fromConsensusApplyTxErrCardano.Api.TxInMode
fromConsensusBlockCardano.Api.Block
fromConsensusEraIndexCardano.Api.Modes
fromConsensusPointCardano.Api.Block
fromConsensusPointInModeCardano.Api.Block
fromConsensusQueryResultCardano.Api.Query
fromConsensusTipCardano.Api.Block
FromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromLedgerPParamsCardano.Api.ProtocolParameters
fromLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
fromLedgerUpdateCardano.Api.ProtocolParameters
fromMaryValueCardano.Api.Value, Cardano.Api.Shelley
fromPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyBasedScriptCardano.Api.Script
fromShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
fromShelleyDeltaLovelaceCardano.Api.Value
fromShelleyGenesisCardano.Api.GenesisParameters
fromShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
fromShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMetadatumCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
fromShelleyNetworkCardano.Api.NetworkId
fromShelleyPaymentCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyPParamsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
fromShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
fromShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeReferenceCardano.Api.Address, Cardano.Api.Shelley
fromShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
FromSomeType 
1 (Type/Class)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromTxOutCardano.Api.TxBody
\ No newline at end of file diff --git a/cardano-api/doc-index-T.html b/cardano-api/doc-index-T.html index 6b8c4e91864..010b017b873 100644 --- a/cardano-api/doc-index-T.html +++ b/cardano-api/doc-index-T.html @@ -1 +1 @@ -cardano-api-1.27.0 (Index - T)
cardano-api-1.27.0

Index - T

teDescriptionCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
teRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TestnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
teTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelope 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeAesonDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeDefaultDescrCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDescr 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope
TextEnvelopeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeType 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeTypeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textShowCardano.Api.TxSubmit.Types
throwErrorAsExceptionCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksInSimpleScriptV2Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
timeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
toAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toAlonzoExUnitsCardano.Api.Script
toAlonzoLanguageCardano.Api.Script
toAlonzoPricesCardano.Api.ProtocolParameters
toByronLedgertoByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLedgerUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLovelaceCardano.Api.Value, Cardano.Api.Byron
toByronNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronProtocolMagicIdCardano.Api.NetworkId, Cardano.Api.Byron
toByronRequiresNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronSigningKeyCardano.Api.KeysByron
ToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toCBORCardano.Api.SerialiseCBOR
toConsensusEraIndexCardano.Api.Modes
toConsensusGenTxCardano.Api.TxInMode
toConsensusPointCardano.Api.Block
toConsensusPointInModeCardano.Api.Block
toConsensusQueryCardano.Api.Query
toEncodingCardano.Api.SerialiseJSON
toEncodingListCardano.Api.SerialiseJSON
toEraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toJSONCardano.Api.SerialiseJSON
toJSONListCardano.Api.SerialiseJSON
toLedgerPParamsCardano.Api.ProtocolParameters
toLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
toLedgerUpdateCardano.Api.ProtocolParameters
toMaryValueCardano.Api.Value, Cardano.Api.Shelley
toNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toScriptInAnyLangCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
toShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
toShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
toShelleyNetworkCardano.Api.NetworkId, Cardano.Api.Shelley
toShelleyPoolParamsCardano.Api.Certificate
toShelleyScriptCardano.Api.Script, Cardano.Api.Shelley
toShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
toShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
toShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
toShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
transactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Tx 
1 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptData 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptDataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptDataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScripts 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBody 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyAuxDataHashInvalidErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyContent 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMetadataErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintAdaErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintBeforeMaryErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMissingProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyNoScriptDataCardano.Api.TxBody
TxBodyOutputNegativeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyOutputOverflowCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyScriptData 
1 (Type/Class)Cardano.Api.TxBody
2 (Data Constructor)Cardano.Api.TxBody
TxCertificates 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txCertificatesCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCertificatesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnesses 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txExtraKeyWitsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeExplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeImplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxId 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIn 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInByronSpecialCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInMode 
1 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateral 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateralNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIx 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaBytesCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadata 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataBytesTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInEra 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadMapPairCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBoolNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonDetailedSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonErrorCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNotObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNullNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNumberNotIntegerCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaError 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelBadKeyCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelNotMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonTypeMismatchCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNumberOutOfRangeCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataRangeError 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataTextTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataValueCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaListCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaNumberCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaTextCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintValue 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMintValueCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOut 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAdaOnlyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHash 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHashNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutValue 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxSubmitBadTxCardano.Api.TxSubmit.Types
TxSubmitDecodeFailCardano.Api.TxSubmit.Types
TxSubmitDecodeHexCardano.Api.TxSubmit.Types
TxSubmitEmptyCardano.Api.TxSubmit.Types
TxSubmitFailCardano.Api.TxSubmit.Types
TxSubmitOkCardano.Api.TxSubmit.Types
TxSubmitStatusCardano.Api.TxSubmit.Types
TxUpdateProposal 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txUpdateProposalCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxUpdateProposalNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationEraMismatchCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationErrorCardano.Api.TxInMode, Cardano.Api.IPC
TxValidationErrorInMode 
1 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityLowerBound 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoLowerBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoUpperBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txValidityRangeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityUpperBound 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawals 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txWithdrawalsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawalsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
\ No newline at end of file +cardano-api-1.27.0 (Index - T)
cardano-api-1.27.0

Index - T

teDescriptionCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
teRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TestnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
teTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelope 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeAesonDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeDefaultDescrCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDescr 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope
TextEnvelopeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeType 
1 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeTypeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textShowCardano.Api.TxSubmit.Types
throwErrorAsExceptionCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksInSimpleScriptV2Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
timeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
toAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toAlonzoExUnitsCardano.Api.Script
toAlonzoLanguageCardano.Api.Script
toAlonzoPricesCardano.Api.ProtocolParameters
toByronLedgertoByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLedgerUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLovelaceCardano.Api.Value, Cardano.Api.Byron
toByronNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronProtocolMagicIdCardano.Api.NetworkId, Cardano.Api.Byron
toByronRequiresNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronSigningKeyCardano.Api.KeysByron
ToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toCBORCardano.Api.SerialiseCBOR
toConsensusEraIndexCardano.Api.Modes
toConsensusGenTxCardano.Api.TxInMode
toConsensusPointCardano.Api.Block
toConsensusPointInModeCardano.Api.Block
toConsensusQueryCardano.Api.Query
toEncodingCardano.Api.SerialiseJSON
toEncodingListCardano.Api.SerialiseJSON
toEraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toJSONCardano.Api.SerialiseJSON
toJSONListCardano.Api.SerialiseJSON
toLedgerPParamsCardano.Api.ProtocolParameters
toLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
toLedgerUpdateCardano.Api.ProtocolParameters
toMaryValueCardano.Api.Value, Cardano.Api.Shelley
toNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toScriptInAnyLangCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
toShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
toShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMetadatumCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
toShelleyNetworkCardano.Api.NetworkId, Cardano.Api.Shelley
toShelleyPoolParamsCardano.Api.Certificate
toShelleyScriptCardano.Api.Script, Cardano.Api.Shelley
toShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
toShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
toShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
toShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
transactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Tx 
1 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptData 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptDataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptDataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScripts 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBody 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyAuxDataHashInvalidErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyContent 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMetadataErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintAdaErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintBeforeMaryErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMissingProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyNoScriptDataCardano.Api.TxBody
TxBodyOutputNegativeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyOutputOverflowCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyScriptData 
1 (Type/Class)Cardano.Api.TxBody
2 (Data Constructor)Cardano.Api.TxBody
TxCertificates 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txCertificatesCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCertificatesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnesses 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txExtraKeyWitsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeExplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeImplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxId 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIn 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInByronSpecialCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInMode 
1 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateral 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateralNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIx 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaBytesCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadata 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataBytesTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInEra 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadMapPairCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBoolNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonDetailedSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonErrorCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNotObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNullNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNumberNotIntegerCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaError 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelBadKeyCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelNotMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonTypeMismatchCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNumberOutOfRangeCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataRangeError 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataTextTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataValueCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaListCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaNumberCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaTextCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintValue 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMintValueCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOut 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAdaOnlyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHash 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHashNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutValue 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxSubmitBadTxCardano.Api.TxSubmit.Types
TxSubmitDecodeFailCardano.Api.TxSubmit.Types
TxSubmitDecodeHexCardano.Api.TxSubmit.Types
TxSubmitEmptyCardano.Api.TxSubmit.Types
TxSubmitFailCardano.Api.TxSubmit.Types
TxSubmitOkCardano.Api.TxSubmit.Types
TxSubmitStatusCardano.Api.TxSubmit.Types
TxUpdateProposal 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txUpdateProposalCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxUpdateProposalNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationEraMismatchCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationErrorCardano.Api.TxInMode, Cardano.Api.IPC
TxValidationErrorInMode 
1 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityLowerBound 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoLowerBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoUpperBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txValidityRangeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityUpperBound 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawals 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txWithdrawalsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawalsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
\ No newline at end of file diff --git a/cardano-api/doc-index.json b/cardano-api/doc-index.json index f170b908c7c..527c69902e7 100644 --- a/cardano-api/doc-index.json +++ b/cardano-api/doc-index.json @@ -1 +1 @@ -[{"display_html":"newtype ChainSyncClient header point tip (m ∷ Type → Type) a = ChainSyncClient {}","name":"ChainSyncClient ChainSyncClient runChainSyncClient","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#t:ChainSyncClient"},{"display_html":"data ClientStIdle header point tip (m ∷ Type → Type) a where","name":"ClientStIdle SendMsgDone SendMsgFindIntersect SendMsgRequestNext","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#t:ClientStIdle"},{"display_html":"data ClientStNext header point tip (m ∷ Type → Type) a = ClientStNext {}","name":"ClientStNext ClientStNext recvMsgRollBackward recvMsgRollForward","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#t:ClientStNext"},{"display_html":"data ClientStIntersect header point tip (m ∷ Type → Type) a = ClientStIntersect {}","name":"ClientStIntersect ClientStIntersect recvMsgIntersectFound recvMsgIntersectNotFound","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#t:ClientStIntersect"},{"display_html":"chainSyncClientNull ∷ ∀ (m ∷ Type → Type) header point tip a. MonadTimer m ⇒ ChainSyncClient header point tip m a","name":"chainSyncClientNull","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#v:chainSyncClientNull"},{"display_html":"mapChainSyncClient ∷ ∀ header header' point point' tip tip' (m ∷ Type → Type) a. Functor m ⇒ (point → point') → (point' → point) → (header' → header) → (tip' → tip) → ChainSyncClient header point tip m a → ChainSyncClient header' point' tip' m a","name":"mapChainSyncClient","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#v:mapChainSyncClient"},{"display_html":"newtype ChainSyncClientPipelined header point tip (m ∷ Type → Type) a = ChainSyncClientPipelined {}","name":"ChainSyncClientPipelined ChainSyncClientPipelined runChainSyncClientPipelined","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:ChainSyncClientPipelined"},{"display_html":"data ClientPipelinedStIdle (n ∷ N) header point tip (m ∷ Type → Type) a where","name":"ClientPipelinedStIdle CollectResponse SendMsgDone SendMsgRequestNextPipelined SendMsgFindIntersect SendMsgRequestNext","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:ClientPipelinedStIdle"},{"display_html":"data ClientStNext (n ∷ N) header point tip (m ∷ Type → Type) a = ClientStNext {}","name":"ClientStNext ClientStNext recvMsgRollBackward recvMsgRollForward","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:ClientStNext"},{"display_html":"data ClientPipelinedStIntersect header point tip (m ∷ Type → Type) a = ClientPipelinedStIntersect {}","name":"ClientPipelinedStIntersect ClientPipelinedStIntersect recvMsgIntersectFound recvMsgIntersectNotFound","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:ClientPipelinedStIntersect"},{"display_html":"data ChainSyncInstruction header point tip","name":"ChainSyncInstruction RollBackward RollForward","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:ChainSyncInstruction"},{"display_html":"data PipelineDecision (n ∷ N) where","name":"PipelineDecision Collect CollectOrPipeline Pipeline Request","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:PipelineDecision"},{"display_html":"data MkPipelineDecision where","name":"MkPipelineDecision MkPipelineDecision","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:MkPipelineDecision"},{"display_html":"runPipelineDecision ∷ ∀ (n ∷ N). MkPipelineDecision → Nat n → WithOrigin BlockNo → WithOrigin BlockNo → (PipelineDecision n, MkPipelineDecision)","name":"runPipelineDecision","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:runPipelineDecision"},{"display_html":"constantPipelineDecision ∷ (∀ (n ∷ N). Nat n → WithOrigin BlockNo → WithOrigin BlockNo → PipelineDecision n) → MkPipelineDecision","name":"constantPipelineDecision","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:constantPipelineDecision"},{"display_html":"pipelineDecisionMax ∷ ∀ (n ∷ N). Word32 → Nat n → WithOrigin BlockNo → WithOrigin BlockNo → PipelineDecision n","name":"pipelineDecisionMax","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:pipelineDecisionMax"},{"display_html":"pipelineDecisionMin ∷ ∀ (n ∷ N). Word32 → Nat n → WithOrigin BlockNo → WithOrigin BlockNo → PipelineDecision n","name":"pipelineDecisionMin","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:pipelineDecisionMin"},{"display_html":"pipelineDecisionLowHighMark ∷ Word32 → Word32 → MkPipelineDecision","name":"pipelineDecisionLowHighMark","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:pipelineDecisionLowHighMark"},{"display_html":"data N","name":"N S Z","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:N"},{"display_html":"data Nat (n ∷ N) where
  • pattern Succ ∷ ∀ m n. () ⇒ m ~ 'S n ⇒ Nat n → Nat m
  • pattern Zero ∷ () ⇒ 'Z ~ n ⇒ Nat n
","name":"Nat Succ Zero","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:Nat"},{"display_html":"natToInt ∷ ∀ (n ∷ N). Nat n → Int","name":"natToInt","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:natToInt"},{"display_html":"mapChainSyncClientPipelined ∷ ∀ header header' point point' tip tip' (m ∷ Type → Type) a. Functor m ⇒ (point → point') → (point' → point) → (header' → header) → (tip' → tip) → ChainSyncClientPipelined header point tip m a → ChainSyncClientPipelined header' point' tip' m a","name":"mapChainSyncClientPipelined","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:mapChainSyncClientPipelined"},{"display_html":"data Ed25519Bip32DSIGN","name":"Ed25519Bip32DSIGN","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#t:Ed25519Bip32DSIGN"},{"display_html":"data family SigDSIGN v","name":"SigDSIGN SigEd25519Bip32DSIGN","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#t:SigDSIGN"},{"display_html":"data family SignKeyDSIGN v","name":"SignKeyDSIGN SignKeyEd25519Bip32DSIGN","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#t:SignKeyDSIGN"},{"display_html":"data family VerKeyDSIGN v","name":"VerKeyDSIGN VerKeyEd25519Bip32DSIGN","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#t:VerKeyDSIGN"},{"display_html":"xPrvToBytes ∷ XPrv → ByteString","name":"xPrvToBytes","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#v:xPrvToBytes"},{"display_html":"xPrvFromBytes ∷ ByteString → Maybe XPrv","name":"xPrvFromBytes","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#v:xPrvFromBytes"},{"display_html":"class Show e ⇒ Error e where","name":"Error displayError","module":"Cardano.Api.Error","link":"Cardano-Api-Error.html#t:Error"},{"display_html":"throwErrorAsException ∷ Error e ⇒ e → IO a","name":"throwErrorAsException","module":"Cardano.Api.Error","link":"Cardano-Api-Error.html#v:throwErrorAsException"},{"display_html":"data ErrorAsException where","name":"ErrorAsException ErrorAsException","module":"Cardano.Api.Error","link":"Cardano-Api-Error.html#t:ErrorAsException"},{"display_html":"data FileError e","name":"FileError FileError FileErrorTempFile FileIOError","module":"Cardano.Api.Error","link":"Cardano-Api-Error.html#t:FileError"},{"display_html":"class HasTypeProxy t where","name":"HasTypeProxy AsType proxyToAsType","module":"Cardano.Api.HasTypeProxy","link":"Cardano-Api-HasTypeProxy.html#t:HasTypeProxy"},{"display_html":"data Proxy (t ∷ k) = Proxy","name":"Proxy Proxy","module":"Cardano.Api.HasTypeProxy","link":"Cardano-Api-HasTypeProxy.html#t:Proxy"},{"display_html":"data FromSomeType (c ∷ Type → Constraint) b where","name":"FromSomeType FromSomeType","module":"Cardano.Api.HasTypeProxy","link":"Cardano-Api-HasTypeProxy.html#t:FromSomeType"},{"display_html":"data ByronEra","name":"ByronEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:ByronEra"},{"display_html":"data ShelleyEra","name":"ShelleyEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:ShelleyEra"},{"display_html":"data AllegraEra","name":"AllegraEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:AllegraEra"},{"display_html":"data MaryEra","name":"MaryEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:MaryEra"},{"display_html":"data AlonzoEra","name":"AlonzoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:AlonzoEra"},{"display_html":"data CardanoEra era where","name":"CardanoEra ByronEra ShelleyEra AllegraEra MaryEra AlonzoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:CardanoEra"},{"display_html":"class HasTypeProxy era ⇒ IsCardanoEra era where","name":"IsCardanoEra cardanoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:IsCardanoEra"},{"display_html":"data AnyCardanoEra where","name":"AnyCardanoEra AnyCardanoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:AnyCardanoEra"},{"display_html":"anyCardanoEra ∷ CardanoEra era → AnyCardanoEra","name":"anyCardanoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#v:anyCardanoEra"},{"display_html":"data InAnyCardanoEra thing where","name":"InAnyCardanoEra InAnyCardanoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:InAnyCardanoEra"},{"display_html":"type Byron = ByronEra","name":"Byron","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:Byron"},{"display_html":"type Shelley = ShelleyEra","name":"Shelley","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:Shelley"},{"display_html":"type Allegra = AllegraEra","name":"Allegra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:Allegra"},{"display_html":"type Mary = MaryEra","name":"Mary","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:Mary"},{"display_html":"data ShelleyBasedEra era where","name":"ShelleyBasedEra ShelleyBasedEraShelley ShelleyBasedEraAllegra ShelleyBasedEraMary ShelleyBasedEraAlonzo","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:ShelleyBasedEra"},{"display_html":"class (IsCardanoEra era, Crypto (ShelleyLedgerEra era) ~ StandardCrypto) ⇒ IsShelleyBasedEra era where","name":"IsShelleyBasedEra shelleyBasedEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:IsShelleyBasedEra"},{"display_html":"data InAnyShelleyBasedEra thing where","name":"InAnyShelleyBasedEra InAnyShelleyBasedEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:InAnyShelleyBasedEra"},{"display_html":"shelleyBasedToCardanoEra ∷ ShelleyBasedEra era → CardanoEra era","name":"shelleyBasedToCardanoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#v:shelleyBasedToCardanoEra"},{"display_html":"type family ShelleyLedgerEra era where ...","name":"ShelleyLedgerEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:ShelleyLedgerEra"},{"display_html":"data CardanoEraStyle era where","name":"CardanoEraStyle ShelleyBasedEra LegacyByronEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:CardanoEraStyle"},{"display_html":"cardanoEraStyle ∷ CardanoEra era → CardanoEraStyle era","name":"cardanoEraStyle","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#v:cardanoEraStyle"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:AsType"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash","module":"Cardano.Api.Hash","link":"Cardano-Api-Hash.html#t:Hash"},{"display_html":"class CastHash roleA roleB where","name":"CastHash castHash","module":"Cardano.Api.Hash","link":"Cardano-Api-Hash.html#t:CastHash"},{"display_html":"data family AsType t","name":"AsType AsHash","module":"Cardano.Api.Hash","link":"Cardano-Api-Hash.html#t:AsType"},{"display_html":"data ByronMode","name":"ByronMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ByronMode"},{"display_html":"data ShelleyMode","name":"ShelleyMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ShelleyMode"},{"display_html":"data CardanoMode","name":"CardanoMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:CardanoMode"},{"display_html":"data ConsensusMode mode where","name":"ConsensusMode CardanoMode ByronMode ShelleyMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ConsensusMode"},{"display_html":"data AnyConsensusMode where","name":"AnyConsensusMode AnyConsensusMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:AnyConsensusMode"},{"display_html":"renderMode ∷ AnyConsensusMode → Text","name":"renderMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:renderMode"},{"display_html":"data ConsensusModeIsMultiEra mode where","name":"ConsensusModeIsMultiEra CardanoModeIsMultiEra","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ConsensusModeIsMultiEra"},{"display_html":"data EraInMode era mode where","name":"EraInMode ByronEraInByronMode ShelleyEraInShelleyMode ByronEraInCardanoMode ShelleyEraInCardanoMode AllegraEraInCardanoMode MaryEraInCardanoMode AlonzoEraInCardanoMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:EraInMode"},{"display_html":"eraInModeToEra ∷ EraInMode era mode → CardanoEra era","name":"eraInModeToEra","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:eraInModeToEra"},{"display_html":"anyEraInModeToAnyEra ∷ AnyEraInMode mode → AnyCardanoEra","name":"anyEraInModeToAnyEra","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:anyEraInModeToAnyEra"},{"display_html":"data AnyEraInMode mode where","name":"AnyEraInMode AnyEraInMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:AnyEraInMode"},{"display_html":"toEraInMode ∷ CardanoEra era → ConsensusMode mode → Maybe (EraInMode era mode)","name":"toEraInMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:toEraInMode"},{"display_html":"data ConsensusModeParams mode where","name":"ConsensusModeParams CardanoModeParams ByronModeParams ShelleyModeParams","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ConsensusModeParams"},{"display_html":"data AnyConsensusModeParams where","name":"AnyConsensusModeParams AnyConsensusModeParams","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:AnyConsensusModeParams"},{"display_html":"newtype EpochSlots = EpochSlots {}","name":"EpochSlots EpochSlots unEpochSlots","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:EpochSlots"},{"display_html":"type family ConsensusBlockForMode mode where ...","name":"ConsensusBlockForMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ConsensusBlockForMode"},{"display_html":"type family ConsensusBlockForEra era where ...","name":"ConsensusBlockForEra","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ConsensusBlockForEra"},{"display_html":"toConsensusEraIndex ∷ ConsensusBlockForMode mode ~ HardForkBlock xs ⇒ EraInMode era mode → EraIndex xs","name":"toConsensusEraIndex","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:toConsensusEraIndex"},{"display_html":"fromConsensusEraIndex ∷ ConsensusBlockForMode mode ~ HardForkBlock xs ⇒ ConsensusMode mode → EraIndex xs → AnyEraInMode mode","name":"fromConsensusEraIndex","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:fromConsensusEraIndex"},{"display_html":"data NetworkId","name":"NetworkId Mainnet Testnet","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#t:NetworkId"},{"display_html":"newtype NetworkMagic = NetworkMagic {}","name":"NetworkMagic NetworkMagic unNetworkMagic","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#t:NetworkMagic"},{"display_html":"toNetworkMagic ∷ NetworkId → NetworkMagic","name":"toNetworkMagic","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:toNetworkMagic"},{"display_html":"mainnetNetworkMagic ∷ NetworkMagic","name":"mainnetNetworkMagic","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:mainnetNetworkMagic"},{"display_html":"toByronProtocolMagicId ∷ NetworkId → ProtocolMagicId","name":"toByronProtocolMagicId","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:toByronProtocolMagicId"},{"display_html":"toByronNetworkMagic ∷ NetworkId → NetworkMagic","name":"toByronNetworkMagic","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:toByronNetworkMagic"},{"display_html":"toByronRequiresNetworkMagic ∷ NetworkId → RequiresNetworkMagic","name":"toByronRequiresNetworkMagic","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:toByronRequiresNetworkMagic"},{"display_html":"toShelleyNetwork ∷ NetworkId → Network","name":"toShelleyNetwork","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:toShelleyNetwork"},{"display_html":"fromShelleyNetwork ∷ Network → NetworkMagic → NetworkId","name":"fromShelleyNetwork","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:fromShelleyNetwork"},{"display_html":"data BlockType blk where","name":"BlockType ByronBlockType ShelleyBlockType CardanoBlockType","module":"Cardano.Api.Protocol.Types","link":"Cardano-Api-Protocol-Types.html#t:BlockType"},{"display_html":"class (RunNode blk, IOLike m) ⇒ Protocol m blk where","name":"Protocol ProtocolInfoArgs protocolInfo","module":"Cardano.Api.Protocol.Types","link":"Cardano-Api-Protocol-Types.html#t:Protocol"},{"display_html":"class RunNode blk ⇒ ProtocolClient blk where","name":"ProtocolClient ProtocolClientInfoArgs protocolClientInfo","module":"Cardano.Api.Protocol.Types","link":"Cardano-Api-Protocol-Types.html#t:ProtocolClient"},{"display_html":"data SomeNodeClientProtocol where","name":"SomeNodeClientProtocol SomeNodeClientProtocol","module":"Cardano.Api.Protocol.Types","link":"Cardano-Api-Protocol-Types.html#t:SomeNodeClientProtocol"},{"display_html":"mkNodeClientProtocolShelley ∷ ProtocolClientInfoArgs (ShelleyBlockHFC StandardShelley)","name":"mkNodeClientProtocolShelley","module":"Cardano.Api.Protocol.Shelley","link":"Cardano-Api-Protocol-Shelley.html#v:mkNodeClientProtocolShelley"},{"display_html":"mkSomeNodeClientProtocolShelley ∷ SomeNodeClientProtocol","name":"mkSomeNodeClientProtocolShelley","module":"Cardano.Api.Protocol.Shelley","link":"Cardano-Api-Protocol-Shelley.html#v:mkSomeNodeClientProtocolShelley"},{"display_html":"mkNodeClientProtocolCardano ∷ EpochSlots → ProtocolClientInfoArgs (CardanoBlock StandardCrypto)","name":"mkNodeClientProtocolCardano","module":"Cardano.Api.Protocol.Cardano","link":"Cardano-Api-Protocol-Cardano.html#v:mkNodeClientProtocolCardano"},{"display_html":"mkSomeNodeClientProtocolCardano ∷ EpochSlots → SomeNodeClientProtocol","name":"mkSomeNodeClientProtocolCardano","module":"Cardano.Api.Protocol.Cardano","link":"Cardano-Api-Protocol-Cardano.html#v:mkSomeNodeClientProtocolCardano"},{"display_html":"mkNodeClientProtocolByron ∷ EpochSlots → ProtocolClientInfoArgs ByronBlockHFC","name":"mkNodeClientProtocolByron","module":"Cardano.Api.Protocol.Byron","link":"Cardano-Api-Protocol-Byron.html#v:mkNodeClientProtocolByron"},{"display_html":"mkSomeNodeClientProtocolByron ∷ EpochSlots → SomeNodeClientProtocol","name":"mkSomeNodeClientProtocolByron","module":"Cardano.Api.Protocol.Byron","link":"Cardano-Api-Protocol-Byron.html#v:mkSomeNodeClientProtocolByron"},{"display_html":"class HasTypeProxy a ⇒ SerialiseAsCBOR a where","name":"SerialiseAsCBOR serialiseToCBOR deserialiseFromCBOR","module":"Cardano.Api.SerialiseCBOR","link":"Cardano-Api-SerialiseCBOR.html#t:SerialiseAsCBOR"},{"display_html":"class Typeable a ⇒ FromCBOR a where","name":"FromCBOR label fromCBOR","module":"Cardano.Api.SerialiseCBOR","link":"Cardano-Api-SerialiseCBOR.html#t:FromCBOR"},{"display_html":"class Typeable a ⇒ ToCBOR a where","name":"ToCBOR toCBOR encodedSizeExpr encodedListSizeExpr","module":"Cardano.Api.SerialiseCBOR","link":"Cardano-Api-SerialiseCBOR.html#t:ToCBOR"},{"display_html":"serialiseToJSON ∷ ToJSON a ⇒ a → ByteString","name":"serialiseToJSON","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#v:serialiseToJSON"},{"display_html":"class ToJSON a where","name":"ToJSON toJSON toEncoding toEncodingList toJSONList","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#t:ToJSON"},{"display_html":"deserialiseFromJSON ∷ FromJSON a ⇒ AsType a → ByteString → Either JsonDecodeError a","name":"deserialiseFromJSON","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#v:deserialiseFromJSON"},{"display_html":"prettyPrintJSON ∷ ToJSON a ⇒ a → ByteString","name":"prettyPrintJSON","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#v:prettyPrintJSON"},{"display_html":"class FromJSON a where","name":"FromJSON parseJSON parseJSONList","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#t:FromJSON"},{"display_html":"newtype JsonDecodeError = JsonDecodeError String","name":"JsonDecodeError JsonDecodeError","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#t:JsonDecodeError"},{"display_html":"readFileJSON ∷ FromJSON a ⇒ AsType a → FilePath → IO (Either (FileError JsonDecodeError) a)","name":"readFileJSON","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#v:readFileJSON"},{"display_html":"writeFileJSON ∷ ToJSON a ⇒ FilePath → a → IO (Either (FileError ()) ())","name":"writeFileJSON","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#v:writeFileJSON"},{"display_html":"class HasTypeProxy a ⇒ SerialiseAsRawBytes a where","name":"SerialiseAsRawBytes serialiseToRawBytes deserialiseFromRawBytes","module":"Cardano.Api.SerialiseRaw","link":"Cardano-Api-SerialiseRaw.html#t:SerialiseAsRawBytes"},{"display_html":"serialiseToRawBytesHex ∷ SerialiseAsRawBytes a ⇒ a → ByteString","name":"serialiseToRawBytesHex","module":"Cardano.Api.SerialiseRaw","link":"Cardano-Api-SerialiseRaw.html#v:serialiseToRawBytesHex"},{"display_html":"deserialiseFromRawBytesHex ∷ SerialiseAsRawBytes a ⇒ AsType a → ByteString → Maybe a","name":"deserialiseFromRawBytesHex","module":"Cardano.Api.SerialiseRaw","link":"Cardano-Api-SerialiseRaw.html#v:deserialiseFromRawBytesHex"},{"display_html":"serialiseToRawBytesHexText ∷ SerialiseAsRawBytes a ⇒ a → Text","name":"serialiseToRawBytesHexText","module":"Cardano.Api.SerialiseRaw","link":"Cardano-Api-SerialiseRaw.html#v:serialiseToRawBytesHexText"},{"display_html":"newtype UsingRawBytesHex a = UsingRawBytesHex a","name":"UsingRawBytesHex UsingRawBytesHex","module":"Cardano.Api.SerialiseRaw","link":"Cardano-Api-SerialiseRaw.html#t:UsingRawBytesHex"},{"display_html":"class SerialiseAsCBOR a ⇒ HasTextEnvelope a where","name":"HasTextEnvelope textEnvelopeType textEnvelopeDefaultDescr","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:HasTextEnvelope"},{"display_html":"data TextEnvelope = TextEnvelope {}","name":"TextEnvelope TextEnvelope teType teDescription teRawCBOR","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:TextEnvelope"},{"display_html":"newtype TextEnvelopeType = TextEnvelopeType String","name":"TextEnvelopeType TextEnvelopeType","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:TextEnvelopeType"},{"display_html":"newtype TextEnvelopeDescr = TextEnvelopeDescr String","name":"TextEnvelopeDescr TextEnvelopeDescr","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:TextEnvelopeDescr"},{"display_html":"textEnvelopeRawCBOR ∷ TextEnvelope → ByteString","name":"textEnvelopeRawCBOR","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:textEnvelopeRawCBOR"},{"display_html":"data TextEnvelopeError","name":"TextEnvelopeError TextEnvelopeTypeError TextEnvelopeDecodeError TextEnvelopeAesonDecodeError","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:TextEnvelopeError"},{"display_html":"serialiseToTextEnvelope ∷ ∀ a. HasTextEnvelope a ⇒ Maybe TextEnvelopeDescr → a → TextEnvelope","name":"serialiseToTextEnvelope","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:serialiseToTextEnvelope"},{"display_html":"deserialiseFromTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → TextEnvelope → Either TextEnvelopeError a","name":"deserialiseFromTextEnvelope","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:deserialiseFromTextEnvelope"},{"display_html":"readFileTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → FilePath → IO (Either (FileError TextEnvelopeError) a)","name":"readFileTextEnvelope","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:readFileTextEnvelope"},{"display_html":"writeFileTextEnvelope ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ())","name":"writeFileTextEnvelope","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:writeFileTextEnvelope"},{"display_html":"writeFileTextEnvelopeWithOwnerPermissions ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ())","name":"writeFileTextEnvelopeWithOwnerPermissions","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:writeFileTextEnvelopeWithOwnerPermissions"},{"display_html":"readTextEnvelopeFromFile ∷ FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope)","name":"readTextEnvelopeFromFile","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:readTextEnvelopeFromFile"},{"display_html":"readTextEnvelopeOfTypeFromFile ∷ TextEnvelopeType → FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope)","name":"readTextEnvelopeOfTypeFromFile","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:readTextEnvelopeOfTypeFromFile"},{"display_html":"data FromSomeType (c ∷ Type → Constraint) b where","name":"FromSomeType FromSomeType","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:FromSomeType"},{"display_html":"deserialiseFromTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → TextEnvelope → Either TextEnvelopeError b","name":"deserialiseFromTextEnvelopeAnyOf","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:deserialiseFromTextEnvelopeAnyOf"},{"display_html":"readFileTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → FilePath → IO (Either (FileError TextEnvelopeError) b)","name":"readFileTextEnvelopeAnyOf","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:readFileTextEnvelopeAnyOf"},{"display_html":"data family AsType t","name":"AsType AsTextEnvelope","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:AsType"},{"display_html":"class (Eq (VerificationKey keyrole), Show (VerificationKey keyrole), SerialiseAsRawBytes (Hash keyrole), HasTextEnvelope (VerificationKey keyrole), HasTextEnvelope (SigningKey keyrole)) ⇒ Key keyrole where","name":"Key VerificationKey SigningKey getVerificationKey verificationKeyHash deterministicSigningKey deterministicSigningKeySeedSize","module":"Cardano.Api.Key","link":"Cardano-Api-Key.html#t:Key"},{"display_html":"generateSigningKey ∷ Key keyrole ⇒ AsType keyrole → IO (SigningKey keyrole)","name":"generateSigningKey","module":"Cardano.Api.Key","link":"Cardano-Api-Key.html#v:generateSigningKey"},{"display_html":"class CastVerificationKeyRole keyroleA keyroleB where","name":"CastVerificationKeyRole castVerificationKey","module":"Cardano.Api.Key","link":"Cardano-Api-Key.html#t:CastVerificationKeyRole"},{"display_html":"class CastSigningKeyRole keyroleA keyroleB where","name":"CastSigningKeyRole castSigningKey","module":"Cardano.Api.Key","link":"Cardano-Api-Key.html#t:CastSigningKeyRole"},{"display_html":"data family AsType t","name":"AsType AsVerificationKey AsSigningKey","module":"Cardano.Api.Key","link":"Cardano-Api-Key.html#t:AsType"},{"display_html":"data ShelleyGenesis era = ShelleyGenesis {}","name":"ShelleyGenesis ShelleyGenesis sgActiveSlotsCoeff sgEpochLength sgGenDelegs sgInitialFunds sgMaxKESEvolutions sgMaxLovelaceSupply sgNetworkId sgNetworkMagic sgProtocolParams sgSecurityParam sgSlotLength sgSlotsPerKESPeriod sgStaking sgSystemStart sgUpdateQuorum","module":"Cardano.Api.Shelley.Genesis","link":"Cardano-Api-Shelley-Genesis.html#t:ShelleyGenesis"},{"display_html":"shelleyGenesisDefaults ∷ ShelleyGenesis crypto","name":"shelleyGenesisDefaults","module":"Cardano.Api.Shelley.Genesis","link":"Cardano-Api-Shelley-Genesis.html#v:shelleyGenesisDefaults"},{"display_html":"newtype TxMetadata = TxMetadata (Map Word64 TxMetadataValue)","name":"TxMetadata TxMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadata"},{"display_html":"data TxMetadataValue","name":"TxMetadataValue TxMetaNumber TxMetaBytes TxMetaText TxMetaList TxMetaMap","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadataValue"},{"display_html":"makeTransactionMetadata ∷ Map Word64 TxMetadataValue → TxMetadata","name":"makeTransactionMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:makeTransactionMetadata"},{"display_html":"validateTxMetadata ∷ TxMetadata → Either [(Word64, TxMetadataRangeError)] ()","name":"validateTxMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:validateTxMetadata"},{"display_html":"data TxMetadataRangeError","name":"TxMetadataRangeError TxMetadataNumberOutOfRange TxMetadataBytesTooLong TxMetadataTextTooLong","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadataRangeError"},{"display_html":"data TxMetadataJsonSchema","name":"TxMetadataJsonSchema TxMetadataJsonNoSchema TxMetadataJsonDetailedSchema","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadataJsonSchema"},{"display_html":"metadataFromJson ∷ TxMetadataJsonSchema → Value → Either TxMetadataJsonError TxMetadata","name":"metadataFromJson","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:metadataFromJson"},{"display_html":"metadataToJson ∷ TxMetadataJsonSchema → TxMetadata → Value","name":"metadataToJson","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:metadataToJson"},{"display_html":"metadataValueToJsonNoSchema ∷ TxMetadataValue → Value","name":"metadataValueToJsonNoSchema","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:metadataValueToJsonNoSchema"},{"display_html":"data TxMetadataJsonError","name":"TxMetadataJsonError TxMetadataRangeError TxMetadataJsonSchemaError TxMetadataJsonToplevelNotMap TxMetadataJsonToplevelBadKey","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadataJsonError"},{"display_html":"data TxMetadataJsonSchemaError","name":"TxMetadataJsonSchemaError TxMetadataJsonNullNotAllowed TxMetadataJsonBoolNotAllowed TxMetadataJsonNumberNotInteger TxMetadataJsonTypeMismatch TxMetadataJsonBadObject TxMetadataJsonNotObject TxMetadataJsonBadMapPair","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadataJsonSchemaError"},{"display_html":"toShelleyMetadata ∷ Map Word64 TxMetadataValue → Map Word64 Metadatum","name":"toShelleyMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:toShelleyMetadata"},{"display_html":"fromShelleyMetadata ∷ Map Word64 Metadatum → Map Word64 TxMetadataValue","name":"fromShelleyMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:fromShelleyMetadata"},{"display_html":"parseAll ∷ Parser a → Text → Maybe a","name":"parseAll","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:parseAll"},{"display_html":"pUnsigned ∷ Parser Integer","name":"pUnsigned","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:pUnsigned"},{"display_html":"pSigned ∷ Parser Integer","name":"pSigned","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:pSigned"},{"display_html":"pBytes ∷ Parser ByteString","name":"pBytes","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:pBytes"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsTxMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:AsType"},{"display_html":"renderApplyMempoolPayloadErr ∷ ApplyMempoolPayloadErr → Text","name":"renderApplyMempoolPayloadErr","module":"Cardano.Api.TxSubmit.ErrorRender","link":"Cardano-Api-TxSubmit-ErrorRender.html#v:renderApplyMempoolPayloadErr"},{"display_html":"data NodeApiEnv = NodeApiEnv {}","name":"NodeApiEnv NodeApiEnv naeConfig naeSocket","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#t:NodeApiEnv"},{"display_html":"newtype SocketPath = SocketPath {}","name":"SocketPath SocketPath unSocketPath","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#t:SocketPath"},{"display_html":"data TxSubmitStatus","name":"TxSubmitStatus TxSubmitOk TxSubmitDecodeHex TxSubmitEmpty TxSubmitDecodeFail TxSubmitBadTx TxSubmitFail","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#t:TxSubmitStatus"},{"display_html":"data ApplyMempoolPayloadErr","name":"ApplyMempoolPayloadErr MempoolDlgErr MempoolTxErr MempoolUpdateProposalErr MempoolUpdateVoteErr","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#t:ApplyMempoolPayloadErr"},{"display_html":"renderTxSubmitStatus ∷ TxSubmitStatus → Text","name":"renderTxSubmitStatus","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#v:renderTxSubmitStatus"},{"display_html":"textShow ∷ Show a ⇒ a → Text","name":"textShow","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#v:textShow"},{"display_html":"(?!) ∷ Maybe a → e → Either e a","name":"?!","module":"Cardano.Api.Utils","link":"Cardano-Api-Utils.html#v:-63--33-"},{"display_html":"(?!.) ∷ Either e a → (e → e') → Either e' a","name":"?!.","module":"Cardano.Api.Utils","link":"Cardano-Api-Utils.html#v:-63--33-."},{"display_html":"class (HasTypeProxy a, SerialiseAsRawBytes a) ⇒ SerialiseAsBech32 a where","name":"SerialiseAsBech32 bech32PrefixFor bech32PrefixesPermitted","module":"Cardano.Api.SerialiseBech32","link":"Cardano-Api-SerialiseBech32.html#t:SerialiseAsBech32"},{"display_html":"serialiseToBech32 ∷ SerialiseAsBech32 a ⇒ a → Text","name":"serialiseToBech32","module":"Cardano.Api.SerialiseBech32","link":"Cardano-Api-SerialiseBech32.html#v:serialiseToBech32"},{"display_html":"data Bech32DecodeError","name":"Bech32DecodeError Bech32DecodingError Bech32UnexpectedPrefix Bech32DataPartToBytesError Bech32DeserialiseFromBytesError Bech32WrongPrefix","module":"Cardano.Api.SerialiseBech32","link":"Cardano-Api-SerialiseBech32.html#t:Bech32DecodeError"},{"display_html":"deserialiseFromBech32 ∷ SerialiseAsBech32 a ⇒ AsType a → Text → Either Bech32DecodeError a","name":"deserialiseFromBech32","module":"Cardano.Api.SerialiseBech32","link":"Cardano-Api-SerialiseBech32.html#v:deserialiseFromBech32"},{"display_html":"deserialiseAnyOfFromBech32 ∷ ∀ b. [FromSomeType SerialiseAsBech32 b] → Text → Either Bech32DecodeError b","name":"deserialiseAnyOfFromBech32","module":"Cardano.Api.SerialiseBech32","link":"Cardano-Api-SerialiseBech32.html#v:deserialiseAnyOfFromBech32"},{"display_html":"data PaymentKey","name":"PaymentKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:PaymentKey"},{"display_html":"data PaymentExtendedKey","name":"PaymentExtendedKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:PaymentExtendedKey"},{"display_html":"data StakeKey","name":"StakeKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:StakeKey"},{"display_html":"data StakeExtendedKey","name":"StakeExtendedKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:StakeExtendedKey"},{"display_html":"data StakePoolKey","name":"StakePoolKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:StakePoolKey"},{"display_html":"data GenesisKey","name":"GenesisKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:GenesisKey"},{"display_html":"data GenesisExtendedKey","name":"GenesisExtendedKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:GenesisExtendedKey"},{"display_html":"data GenesisDelegateKey","name":"GenesisDelegateKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:GenesisDelegateKey"},{"display_html":"data GenesisDelegateExtendedKey","name":"GenesisDelegateExtendedKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:GenesisDelegateExtendedKey"},{"display_html":"data GenesisUTxOKey","name":"GenesisUTxOKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:GenesisUTxOKey"},{"display_html":"data family AsType t","name":"AsType AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:AsType"},{"display_html":"data family VerificationKey keyrole ∷ Type","name":"VerificationKey PaymentVerificationKey PaymentExtendedVerificationKey StakeVerificationKey StakeExtendedVerificationKey GenesisVerificationKey GenesisExtendedVerificationKey GenesisDelegateVerificationKey StakePoolVerificationKey GenesisDelegateExtendedVerificationKey GenesisUTxOVerificationKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:VerificationKey"},{"display_html":"data family SigningKey keyrole ∷ Type","name":"SigningKey PaymentSigningKey PaymentExtendedSigningKey StakeSigningKey StakeExtendedSigningKey GenesisSigningKey GenesisExtendedSigningKey GenesisDelegateSigningKey StakePoolSigningKey GenesisDelegateExtendedSigningKey GenesisUTxOSigningKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:SigningKey"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:Hash"},{"display_html":"data ScriptData","name":"ScriptData ScriptDataConstructor ScriptDataMap ScriptDataList ScriptDataNumber ScriptDataBytes","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:ScriptData"},{"display_html":"validateScriptData ∷ ScriptData → Either ScriptDataRangeError ()","name":"validateScriptData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:validateScriptData"},{"display_html":"data ScriptDataRangeError","name":"ScriptDataRangeError ScriptDataNumberOutOfRange ScriptDataBytesTooLong ScriptDataConstructorOutOfRange","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:ScriptDataRangeError"},{"display_html":"data ScriptDataJsonSchema","name":"ScriptDataJsonSchema ScriptDataJsonNoSchema ScriptDataJsonDetailedSchema","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:ScriptDataJsonSchema"},{"display_html":"scriptDataFromJson ∷ ScriptDataJsonSchema → Value → Either ScriptDataJsonError ScriptData","name":"scriptDataFromJson","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:scriptDataFromJson"},{"display_html":"scriptDataToJson ∷ ScriptDataJsonSchema → ScriptData → Value","name":"scriptDataToJson","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:scriptDataToJson"},{"display_html":"data ScriptDataJsonError","name":"ScriptDataJsonError ScriptDataRangeError ScriptDataJsonSchemaError","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:ScriptDataJsonError"},{"display_html":"data ScriptDataJsonSchemaError","name":"ScriptDataJsonSchemaError ScriptDataJsonNullNotAllowed ScriptDataJsonBoolNotAllowed ScriptDataJsonNumberNotInteger ScriptDataJsonTypeMismatch ScriptDataJsonBadObject ScriptDataJsonNotObject ScriptDataJsonBadMapPair","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:ScriptDataJsonSchemaError"},{"display_html":"toPlutusData ∷ ScriptData → Data","name":"toPlutusData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:toPlutusData"},{"display_html":"fromPlutusData ∷ Data → ScriptData","name":"fromPlutusData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:fromPlutusData"},{"display_html":"toAlonzoData ∷ ScriptData → Data ledgerera","name":"toAlonzoData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:toAlonzoData"},{"display_html":"fromAlonzoData ∷ Data ledgerera → ScriptData","name":"fromAlonzoData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:fromAlonzoData"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:AsType"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ScriptDataHash","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:Hash"},{"display_html":"data SimpleScriptV1","name":"SimpleScriptV1","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:SimpleScriptV1"},{"display_html":"data SimpleScriptV2","name":"SimpleScriptV2","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:SimpleScriptV2"},{"display_html":"data ScriptLanguage lang where","name":"ScriptLanguage SimpleScriptLanguage PlutusScriptLanguage","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptLanguage"},{"display_html":"data SimpleScriptVersion lang where","name":"SimpleScriptVersion SimpleScriptV1 SimpleScriptV2","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:SimpleScriptVersion"},{"display_html":"data PlutusScriptVersion lang where","name":"PlutusScriptVersion PlutusScriptV1","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:PlutusScriptVersion"},{"display_html":"data AnyScriptLanguage where","name":"AnyScriptLanguage AnyScriptLanguage","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:AnyScriptLanguage"},{"display_html":"data AnyPlutusScriptVersion where","name":"AnyPlutusScriptVersion AnyPlutusScriptVersion","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:AnyPlutusScriptVersion"},{"display_html":"class HasTypeProxy lang ⇒ IsScriptLanguage lang where","name":"IsScriptLanguage scriptLanguage","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:IsScriptLanguage"},{"display_html":"class IsScriptLanguage lang ⇒ IsSimpleScriptLanguage lang where","name":"IsSimpleScriptLanguage simpleScriptVersion","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:IsSimpleScriptLanguage"},{"display_html":"data Script lang where","name":"Script SimpleScript PlutusScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:Script"},{"display_html":"data ScriptInAnyLang where","name":"ScriptInAnyLang ScriptInAnyLang","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptInAnyLang"},{"display_html":"toScriptInAnyLang ∷ Script lang → ScriptInAnyLang","name":"toScriptInAnyLang","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toScriptInAnyLang"},{"display_html":"data ScriptInEra era where","name":"ScriptInEra ScriptInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptInEra"},{"display_html":"toScriptInEra ∷ CardanoEra era → ScriptInAnyLang → Maybe (ScriptInEra era)","name":"toScriptInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toScriptInEra"},{"display_html":"eraOfScriptInEra ∷ ScriptInEra era → ShelleyBasedEra era","name":"eraOfScriptInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:eraOfScriptInEra"},{"display_html":"data WitCtxTxIn","name":"WitCtxTxIn","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:WitCtxTxIn"},{"display_html":"data WitCtxMint","name":"WitCtxMint","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:WitCtxMint"},{"display_html":"data WitCtxStake","name":"WitCtxStake","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:WitCtxStake"},{"display_html":"data WitCtx witctx where","name":"WitCtx WitCtxTxIn WitCtxMint WitCtxStake","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:WitCtx"},{"display_html":"data ScriptWitness witctx era where","name":"ScriptWitness SimpleScriptWitness PlutusScriptWitness","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptWitness"},{"display_html":"data Witness witctx era where","name":"Witness KeyWitness ScriptWitness","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:Witness"},{"display_html":"data KeyWitnessInCtx witctx where","name":"KeyWitnessInCtx KeyWitnessForSpending KeyWitnessForStakeAddr","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:KeyWitnessInCtx"},{"display_html":"data ScriptWitnessInCtx witctx where","name":"ScriptWitnessInCtx ScriptWitnessForSpending ScriptWitnessForMinting ScriptWitnessForStakeAddr","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptWitnessInCtx"},{"display_html":"data ScriptDatum witctx where","name":"ScriptDatum ScriptDatumForTxIn NoScriptDatumForMint NoScriptDatumForStake","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptDatum"},{"display_html":"type ScriptRedeemer = ScriptData","name":"ScriptRedeemer","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptRedeemer"},{"display_html":"scriptWitnessScript ∷ ScriptWitness witctx era → ScriptInEra era","name":"scriptWitnessScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:scriptWitnessScript"},{"display_html":"data ScriptLanguageInEra lang era where","name":"ScriptLanguageInEra SimpleScriptV1InShelley SimpleScriptV1InAllegra SimpleScriptV1InMary SimpleScriptV1InAlonzo SimpleScriptV2InAllegra SimpleScriptV2InMary SimpleScriptV2InAlonzo PlutusScriptV1InAlonzo","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptLanguageInEra"},{"display_html":"scriptLanguageSupportedInEra ∷ CardanoEra era → ScriptLanguage lang → Maybe (ScriptLanguageInEra lang era)","name":"scriptLanguageSupportedInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:scriptLanguageSupportedInEra"},{"display_html":"languageOfScriptLanguageInEra ∷ ScriptLanguageInEra lang era → ScriptLanguage lang","name":"languageOfScriptLanguageInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:languageOfScriptLanguageInEra"},{"display_html":"eraOfScriptLanguageInEra ∷ ScriptLanguageInEra lang era → ShelleyBasedEra era","name":"eraOfScriptLanguageInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:eraOfScriptLanguageInEra"},{"display_html":"data SimpleScript lang where","name":"SimpleScript RequireAllOf RequireAnyOf RequireMOf RequireSignature RequireTimeBefore RequireTimeAfter","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:SimpleScript"},{"display_html":"data TimeLocksSupported lang where","name":"TimeLocksSupported TimeLocksInSimpleScriptV2","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:TimeLocksSupported"},{"display_html":"timeLocksSupported ∷ SimpleScriptVersion lang → Maybe (TimeLocksSupported lang)","name":"timeLocksSupported","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:timeLocksSupported"},{"display_html":"adjustSimpleScriptVersion ∷ SimpleScriptVersion lang' → SimpleScript lang → Maybe (SimpleScript lang')","name":"adjustSimpleScriptVersion","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:adjustSimpleScriptVersion"},{"display_html":"data PlutusScript lang where","name":"PlutusScript PlutusScriptSerialised","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:PlutusScript"},{"display_html":"examplePlutusScriptAlwaysSucceeds ∷ WitCtx witctx → PlutusScript PlutusScriptV1","name":"examplePlutusScriptAlwaysSucceeds","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:examplePlutusScriptAlwaysSucceeds"},{"display_html":"examplePlutusScriptAlwaysFails ∷ WitCtx witctx → PlutusScript PlutusScriptV1","name":"examplePlutusScriptAlwaysFails","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:examplePlutusScriptAlwaysFails"},{"display_html":"data ScriptData","name":"ScriptData ScriptDataConstructor ScriptDataMap ScriptDataList ScriptDataNumber ScriptDataBytes","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptData"},{"display_html":"data ExecutionUnits = ExecutionUnits {}","name":"ExecutionUnits ExecutionUnits executionSteps executionMemory","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ExecutionUnits"},{"display_html":"newtype ScriptHash = ScriptHash (ScriptHash StandardCrypto)","name":"ScriptHash ScriptHash","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptHash"},{"display_html":"hashScript ∷ Script lang → ScriptHash","name":"hashScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:hashScript"},{"display_html":"toShelleyScript ∷ ScriptInEra era → Script (ShelleyLedgerEra era)","name":"toShelleyScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toShelleyScript"},{"display_html":"fromShelleyBasedScript ∷ ShelleyBasedEra era → Script (ShelleyLedgerEra era) → ScriptInEra era","name":"fromShelleyBasedScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromShelleyBasedScript"},{"display_html":"toShelleyMultiSig ∷ SimpleScript SimpleScriptV1 → MultiSig StandardCrypto","name":"toShelleyMultiSig","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toShelleyMultiSig"},{"display_html":"fromShelleyMultiSig ∷ MultiSig StandardCrypto → SimpleScript lang","name":"fromShelleyMultiSig","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromShelleyMultiSig"},{"display_html":"toAllegraTimelock ∷ ∀ lang. SimpleScript lang → Timelock StandardCrypto","name":"toAllegraTimelock","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toAllegraTimelock"},{"display_html":"fromAllegraTimelock ∷ TimeLocksSupported lang → Timelock StandardCrypto → SimpleScript lang","name":"fromAllegraTimelock","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromAllegraTimelock"},{"display_html":"toAlonzoExUnits ∷ ExecutionUnits → ExUnits","name":"toAlonzoExUnits","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toAlonzoExUnits"},{"display_html":"fromAlonzoExUnits ∷ ExUnits → ExecutionUnits","name":"fromAlonzoExUnits","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromAlonzoExUnits"},{"display_html":"toShelleyScriptHash ∷ ScriptHash → ScriptHash StandardCrypto","name":"toShelleyScriptHash","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toShelleyScriptHash"},{"display_html":"fromShelleyScriptHash ∷ ScriptHash StandardCrypto → ScriptHash","name":"fromShelleyScriptHash","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromShelleyScriptHash"},{"display_html":"toPlutusData ∷ ScriptData → Data","name":"toPlutusData","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toPlutusData"},{"display_html":"fromPlutusData ∷ Data → ScriptData","name":"fromPlutusData","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromPlutusData"},{"display_html":"toAlonzoData ∷ ScriptData → Data ledgerera","name":"toAlonzoData","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toAlonzoData"},{"display_html":"fromAlonzoData ∷ Data ledgerera → ScriptData","name":"fromAlonzoData","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromAlonzoData"},{"display_html":"toAlonzoLanguage ∷ AnyPlutusScriptVersion → Language","name":"toAlonzoLanguage","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toAlonzoLanguage"},{"display_html":"fromAlonzoLanguage ∷ Language → AnyPlutusScriptVersion","name":"fromAlonzoLanguage","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromAlonzoLanguage"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:AsType"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ScriptDataHash","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:Hash"},{"display_html":"data ByronKey","name":"ByronKey","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:ByronKey"},{"display_html":"data ByronKeyLegacy","name":"ByronKeyLegacy","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:ByronKeyLegacy"},{"display_html":"data family AsType t","name":"AsType AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsByronKey AsByronKeyLegacy","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:AsType"},{"display_html":"data family VerificationKey keyrole ∷ Type","name":"VerificationKey PaymentVerificationKey PaymentExtendedVerificationKey StakeVerificationKey StakeExtendedVerificationKey GenesisVerificationKey GenesisExtendedVerificationKey GenesisDelegateVerificationKey StakePoolVerificationKey GenesisDelegateExtendedVerificationKey GenesisUTxOVerificationKey ByronVerificationKey ByronVerificationKeyLegacy","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:VerificationKey"},{"display_html":"data family SigningKey keyrole ∷ Type","name":"SigningKey PaymentSigningKey PaymentExtendedSigningKey StakeSigningKey StakeExtendedSigningKey GenesisSigningKey GenesisExtendedSigningKey GenesisDelegateSigningKey StakePoolSigningKey GenesisDelegateExtendedSigningKey GenesisUTxOSigningKey ByronSigningKeyLegacy ByronSigningKey","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:SigningKey"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ByronKeyHash ByronKeyHashLegacy","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:Hash"},{"display_html":"class IsByronKey key where","name":"IsByronKey byronKeyFormat","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:IsByronKey"},{"display_html":"data ByronKeyFormat key where","name":"ByronKeyFormat ByronLegacyKeyFormat ByronModernKeyFormat","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:ByronKeyFormat"},{"display_html":"data SomeByronSigningKey","name":"SomeByronSigningKey AByronSigningKeyLegacy AByronSigningKey","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:SomeByronSigningKey"},{"display_html":"toByronSigningKey ∷ SomeByronSigningKey → SigningKey","name":"toByronSigningKey","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#v:toByronSigningKey"},{"display_html":"newtype ByronUpdateProposal = ByronUpdateProposal {}","name":"ByronUpdateProposal ByronUpdateProposal unByronUpdateProposal","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#t:ByronUpdateProposal"},{"display_html":"data ByronProtocolParametersUpdate = ByronProtocolParametersUpdate {}","name":"ByronProtocolParametersUpdate ByronProtocolParametersUpdate bPpuScriptVersion bPpuSlotDuration bPpuMaxBlockSize bPpuMaxHeaderSize bPpuMaxTxSize bPpuMaxProposalSize bPpuMpcThd bPpuHeavyDelThd bPpuUpdateVoteThd bPpuUpdateProposalThd bPpuUpdateProposalTTL bPpuSoftforkRule bPpuTxFeePolicy bPpuUnlockStakeEpoch","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#t:ByronProtocolParametersUpdate"},{"display_html":"data family AsType t","name":"AsType AsByronUpdateProposal AsByronVote","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#t:AsType"},{"display_html":"makeProtocolParametersUpdate ∷ ByronProtocolParametersUpdate → ProtocolParametersUpdate","name":"makeProtocolParametersUpdate","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#v:makeProtocolParametersUpdate"},{"display_html":"toByronLedgerUpdateProposal ∷ ByronUpdateProposal → GenTx ByronBlock","name":"toByronLedgerUpdateProposal","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#v:toByronLedgerUpdateProposal"},{"display_html":"newtype ByronVote = ByronVote {}","name":"ByronVote ByronVote unByronVote","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#t:ByronVote"},{"display_html":"makeByronUpdateProposal ∷ NetworkId → ProtocolVersion → SoftwareVersion → SystemTag → InstallerHash → SomeByronSigningKey → ByronProtocolParametersUpdate → ByronUpdateProposal","name":"makeByronUpdateProposal","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#v:makeByronUpdateProposal"},{"display_html":"makeByronVote ∷ NetworkId → SomeByronSigningKey → ByronUpdateProposal → Bool → ByronVote","name":"makeByronVote","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#v:makeByronVote"},{"display_html":"toByronLedgertoByronVote ∷ ByronVote → GenTx ByronBlock","name":"toByronLedgertoByronVote","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#v:toByronLedgertoByronVote"},{"display_html":"data KesKey","name":"KesKey","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:KesKey"},{"display_html":"data VrfKey","name":"VrfKey","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:VrfKey"},{"display_html":"data family AsType t","name":"AsType AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsKesKey AsVrfKey","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:AsType"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash KesKeyHash VrfKeyHash","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:Hash"},{"display_html":"data family VerificationKey keyrole ∷ Type","name":"VerificationKey KesVerificationKey VrfVerificationKey","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:VerificationKey"},{"display_html":"data family SigningKey keyrole ∷ Type","name":"SigningKey KesSigningKey VrfSigningKey","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:SigningKey"},{"display_html":"data StakePoolMetadata = StakePoolMetadata {}","name":"StakePoolMetadata StakePoolMetadata stakePoolName stakePoolDescription stakePoolTicker stakePoolHomepage","module":"Cardano.Api.StakePoolMetadata","link":"Cardano-Api-StakePoolMetadata.html#t:StakePoolMetadata"},{"display_html":"validateAndHashStakePoolMetadata ∷ ByteString → Either StakePoolMetadataValidationError (StakePoolMetadata, Hash StakePoolMetadata)","name":"validateAndHashStakePoolMetadata","module":"Cardano.Api.StakePoolMetadata","link":"Cardano-Api-StakePoolMetadata.html#v:validateAndHashStakePoolMetadata"},{"display_html":"data StakePoolMetadataValidationError","name":"StakePoolMetadataValidationError StakePoolMetadataJsonDecodeError StakePoolMetadataInvalidLengthError","module":"Cardano.Api.StakePoolMetadata","link":"Cardano-Api-StakePoolMetadata.html#t:StakePoolMetadataValidationError"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript AsByronKey AsByronKeyLegacy AsKesKey AsVrfKey AsStakePoolMetadata","module":"Cardano.Api.StakePoolMetadata","link":"Cardano-Api-StakePoolMetadata.html#t:AsType"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ScriptDataHash ByronKeyHash ByronKeyHashLegacy KesKeyHash VrfKeyHash StakePoolMetadataHash","module":"Cardano.Api.StakePoolMetadata","link":"Cardano-Api-StakePoolMetadata.html#t:Hash"},{"display_html":"data Address addrtype where","name":"Address ByronAddress ShelleyAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:Address"},{"display_html":"data ByronAddr","name":"ByronAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:ByronAddr"},{"display_html":"makeByronAddress ∷ NetworkId → VerificationKey ByronKey → Address ByronAddr","name":"makeByronAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:makeByronAddress"},{"display_html":"data ShelleyAddr","name":"ShelleyAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:ShelleyAddr"},{"display_html":"makeShelleyAddress ∷ NetworkId → PaymentCredential → StakeAddressReference → Address ShelleyAddr","name":"makeShelleyAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:makeShelleyAddress"},{"display_html":"data PaymentCredential","name":"PaymentCredential PaymentCredentialByKey PaymentCredentialByScript","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:PaymentCredential"},{"display_html":"data StakeAddressReference","name":"StakeAddressReference StakeAddressByValue StakeAddressByPointer NoStakeAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:StakeAddressReference"},{"display_html":"data AddressAny","name":"AddressAny AddressByron AddressShelley","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:AddressAny"},{"display_html":"data AddressInEra era where","name":"AddressInEra AddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:AddressInEra"},{"display_html":"data AddressTypeInEra addrtype era where","name":"AddressTypeInEra ByronAddressInAnyEra ShelleyAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:AddressTypeInEra"},{"display_html":"byronAddressInEra ∷ Address ByronAddr → AddressInEra era","name":"byronAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:byronAddressInEra"},{"display_html":"shelleyAddressInEra ∷ IsShelleyBasedEra era ⇒ Address ShelleyAddr → AddressInEra era","name":"shelleyAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:shelleyAddressInEra"},{"display_html":"anyAddressInShelleyBasedEra ∷ IsShelleyBasedEra era ⇒ AddressAny → AddressInEra era","name":"anyAddressInShelleyBasedEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:anyAddressInShelleyBasedEra"},{"display_html":"anyAddressInEra ∷ CardanoEra era → AddressAny → Maybe (AddressInEra era)","name":"anyAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:anyAddressInEra"},{"display_html":"toAddressAny ∷ Address addr → AddressAny","name":"toAddressAny","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:toAddressAny"},{"display_html":"makeByronAddressInEra ∷ NetworkId → VerificationKey ByronKey → AddressInEra era","name":"makeByronAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:makeByronAddressInEra"},{"display_html":"makeShelleyAddressInEra ∷ IsShelleyBasedEra era ⇒ NetworkId → PaymentCredential → StakeAddressReference → AddressInEra era","name":"makeShelleyAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:makeShelleyAddressInEra"},{"display_html":"data StakeAddress where","name":"StakeAddress StakeAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:StakeAddress"},{"display_html":"data StakeCredential","name":"StakeCredential StakeCredentialByKey StakeCredentialByScript","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:StakeCredential"},{"display_html":"makeStakeAddress ∷ NetworkId → StakeCredential → StakeAddress","name":"makeStakeAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:makeStakeAddress"},{"display_html":"data StakeKey","name":"StakeKey","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:StakeKey"},{"display_html":"data StakeExtendedKey","name":"StakeExtendedKey","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:StakeExtendedKey"},{"display_html":"toShelleyAddr ∷ AddressInEra era → Addr StandardCrypto","name":"toShelleyAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:toShelleyAddr"},{"display_html":"toShelleyStakeAddr ∷ StakeAddress → RewardAcnt StandardCrypto","name":"toShelleyStakeAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:toShelleyStakeAddr"},{"display_html":"toShelleyStakeCredential ∷ StakeCredential → StakeCredential StandardCrypto","name":"toShelleyStakeCredential","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:toShelleyStakeCredential"},{"display_html":"fromShelleyAddr ∷ IsShelleyBasedEra era ⇒ Addr StandardCrypto → AddressInEra era","name":"fromShelleyAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:fromShelleyAddr"},{"display_html":"fromShelleyPaymentCredential ∷ PaymentCredential StandardCrypto → PaymentCredential","name":"fromShelleyPaymentCredential","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:fromShelleyPaymentCredential"},{"display_html":"fromShelleyStakeAddr ∷ RewardAcnt StandardCrypto → StakeAddress","name":"fromShelleyStakeAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:fromShelleyStakeAddr"},{"display_html":"fromShelleyStakeCredential ∷ StakeCredential StandardCrypto → StakeCredential","name":"fromShelleyStakeCredential","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:fromShelleyStakeCredential"},{"display_html":"fromShelleyStakeReference ∷ StakeReference StandardCrypto → StakeAddressReference","name":"fromShelleyStakeReference","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:fromShelleyStakeReference"},{"display_html":"class HasTypeProxy addr ⇒ SerialiseAddress addr where","name":"SerialiseAddress serialiseAddress deserialiseAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:SerialiseAddress"},{"display_html":"data family AsType t","name":"AsType AsByronAddr AsShelleyAddr AsByronAddress AsShelleyAddress AsAddress AsAddressAny AsAddressInEra AsStakeAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:AsType"},{"display_html":"newtype Lovelace = Lovelace Integer","name":"Lovelace Lovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:Lovelace"},{"display_html":"newtype Quantity = Quantity Integer","name":"Quantity Quantity","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:Quantity"},{"display_html":"newtype PolicyId = PolicyId ScriptHash","name":"PolicyId PolicyId","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:PolicyId"},{"display_html":"scriptPolicyId ∷ Script lang → PolicyId","name":"scriptPolicyId","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:scriptPolicyId"},{"display_html":"newtype AssetName = AssetName ByteString","name":"AssetName AssetName","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:AssetName"},{"display_html":"data AssetId","name":"AssetId AssetId AdaAssetId","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:AssetId"},{"display_html":"data Value","name":"Value","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:Value"},{"display_html":"selectAsset ∷ Value → AssetId → Quantity","name":"selectAsset","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:selectAsset"},{"display_html":"valueFromList ∷ [(AssetId, Quantity)] → Value","name":"valueFromList","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:valueFromList"},{"display_html":"valueToList ∷ Value → [(AssetId, Quantity)]","name":"valueToList","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:valueToList"},{"display_html":"filterValue ∷ (AssetId → Bool) → Value → Value","name":"filterValue","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:filterValue"},{"display_html":"negateValue ∷ Value → Value","name":"negateValue","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:negateValue"},{"display_html":"calcMinimumDeposit ∷ Value → Lovelace → Lovelace","name":"calcMinimumDeposit","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:calcMinimumDeposit"},{"display_html":"quantityToLovelace ∷ Quantity → Lovelace","name":"quantityToLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:quantityToLovelace"},{"display_html":"lovelaceToQuantity ∷ Lovelace → Quantity","name":"lovelaceToQuantity","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:lovelaceToQuantity"},{"display_html":"selectLovelace ∷ Value → Lovelace","name":"selectLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:selectLovelace"},{"display_html":"lovelaceToValue ∷ Lovelace → Value","name":"lovelaceToValue","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:lovelaceToValue"},{"display_html":"valueToLovelace ∷ Value → Maybe Lovelace","name":"valueToLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:valueToLovelace"},{"display_html":"newtype ValueNestedRep = ValueNestedRep [ValueNestedBundle]","name":"ValueNestedRep ValueNestedRep","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:ValueNestedRep"},{"display_html":"data ValueNestedBundle","name":"ValueNestedBundle ValueNestedBundle ValueNestedBundleAda","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:ValueNestedBundle"},{"display_html":"valueToNestedRep ∷ Value → ValueNestedRep","name":"valueToNestedRep","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:valueToNestedRep"},{"display_html":"valueFromNestedRep ∷ ValueNestedRep → Value","name":"valueFromNestedRep","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:valueFromNestedRep"},{"display_html":"toByronLovelace ∷ Lovelace → Maybe Lovelace","name":"toByronLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:toByronLovelace"},{"display_html":"fromByronLovelace ∷ Lovelace → Lovelace","name":"fromByronLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:fromByronLovelace"},{"display_html":"toShelleyLovelace ∷ Lovelace → Coin","name":"toShelleyLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:toShelleyLovelace"},{"display_html":"fromShelleyLovelace ∷ Coin → Lovelace","name":"fromShelleyLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:fromShelleyLovelace"},{"display_html":"fromShelleyDeltaLovelace ∷ DeltaCoin → Lovelace","name":"fromShelleyDeltaLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:fromShelleyDeltaLovelace"},{"display_html":"toMaryValue ∷ Value → Value StandardCrypto","name":"toMaryValue","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:toMaryValue"},{"display_html":"fromMaryValue ∷ Value StandardCrypto → Value","name":"fromMaryValue","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:fromMaryValue"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript AsPolicyId AsAssetName","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:AsType"},{"display_html":"data ProtocolParameters = ProtocolParameters {}","name":"ProtocolParameters ProtocolParameters protocolParamProtocolVersion protocolParamDecentralization protocolParamExtraPraosEntropy protocolParamMaxBlockHeaderSize protocolParamMaxBlockBodySize protocolParamMaxTxSize protocolParamTxFeeFixed protocolParamTxFeePerByte protocolParamMinUTxOValue protocolParamStakeAddressDeposit protocolParamStakePoolDeposit protocolParamMinPoolCost protocolParamPoolRetireMaxEpoch protocolParamStakePoolTargetNum protocolParamPoolPledgeInfluence protocolParamMonetaryExpansion protocolParamTreasuryCut protocolParamUTxOCostPerWord protocolParamCostModels protocolParamPrices protocolParamMaxTxExUnits protocolParamMaxBlockExUnits protocolParamMaxValueSize protocolParamCollateralPercent protocolParamMaxCollateralInputs","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:ProtocolParameters"},{"display_html":"data EpochNo","name":"EpochNo","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:EpochNo"},{"display_html":"data ProtocolParametersUpdate = ProtocolParametersUpdate {}","name":"ProtocolParametersUpdate ProtocolParametersUpdate protocolUpdateProtocolVersion protocolUpdateDecentralization protocolUpdateExtraPraosEntropy protocolUpdateMaxBlockHeaderSize protocolUpdateMaxBlockBodySize protocolUpdateMaxTxSize protocolUpdateTxFeeFixed protocolUpdateTxFeePerByte protocolUpdateMinUTxOValue protocolUpdateStakeAddressDeposit protocolUpdateStakePoolDeposit protocolUpdateMinPoolCost protocolUpdatePoolRetireMaxEpoch protocolUpdateStakePoolTargetNum protocolUpdatePoolPledgeInfluence protocolUpdateMonetaryExpansion protocolUpdateTreasuryCut protocolUpdateUTxOCostPerWord protocolUpdateCostModels protocolUpdatePrices protocolUpdateMaxTxExUnits protocolUpdateMaxBlockExUnits protocolUpdateMaxValueSize protocolUpdateCollateralPercent protocolUpdateMaxCollateralInputs","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:ProtocolParametersUpdate"},{"display_html":"data PraosNonce","name":"PraosNonce","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:PraosNonce"},{"display_html":"makePraosNonce ∷ ByteString → PraosNonce","name":"makePraosNonce","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:makePraosNonce"},{"display_html":"data ExecutionUnits = ExecutionUnits {}","name":"ExecutionUnits ExecutionUnits executionSteps executionMemory","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:ExecutionUnits"},{"display_html":"data ExecutionUnitPrices = ExecutionUnitPrices {}","name":"ExecutionUnitPrices ExecutionUnitPrices priceExecutionSteps priceExecutionMemory","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:ExecutionUnitPrices"},{"display_html":"newtype CostModel = CostModel (Map Text Integer)","name":"CostModel CostModel","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:CostModel"},{"display_html":"validateCostModel ∷ PlutusScriptVersion lang → CostModel → Either InvalidCostModel ()","name":"validateCostModel","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:validateCostModel"},{"display_html":"data UpdateProposal = UpdateProposal !(Map (Hash GenesisKey) ProtocolParametersUpdate) !EpochNo","name":"UpdateProposal UpdateProposal","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:UpdateProposal"},{"display_html":"makeShelleyUpdateProposal ∷ ProtocolParametersUpdate → [Hash GenesisKey] → EpochNo → UpdateProposal","name":"makeShelleyUpdateProposal","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:makeShelleyUpdateProposal"},{"display_html":"toLedgerUpdate ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → UpdateProposal → Update ledgerera","name":"toLedgerUpdate","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:toLedgerUpdate"},{"display_html":"fromLedgerUpdate ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → Update ledgerera → UpdateProposal","name":"fromLedgerUpdate","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:fromLedgerUpdate"},{"display_html":"toLedgerProposedPPUpdates ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → Map (Hash GenesisKey) ProtocolParametersUpdate → ProposedPPUpdates ledgerera","name":"toLedgerProposedPPUpdates","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:toLedgerProposedPPUpdates"},{"display_html":"fromLedgerProposedPPUpdates ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → ProposedPPUpdates ledgerera → Map (Hash GenesisKey) ProtocolParametersUpdate","name":"fromLedgerProposedPPUpdates","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:fromLedgerProposedPPUpdates"},{"display_html":"toLedgerPParams ∷ ShelleyBasedEra era → ProtocolParameters → PParams (ShelleyLedgerEra era)","name":"toLedgerPParams","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:toLedgerPParams"},{"display_html":"fromLedgerPParams ∷ ShelleyBasedEra era → PParams (ShelleyLedgerEra era) → ProtocolParameters","name":"fromLedgerPParams","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:fromLedgerPParams"},{"display_html":"fromShelleyPParams ∷ PParams ledgerera → ProtocolParameters","name":"fromShelleyPParams","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:fromShelleyPParams"},{"display_html":"toAlonzoPrices ∷ ExecutionUnitPrices → Prices","name":"toAlonzoPrices","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:toAlonzoPrices"},{"display_html":"fromAlonzoPrices ∷ Prices → ExecutionUnitPrices","name":"fromAlonzoPrices","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:fromAlonzoPrices"},{"display_html":"data family AsType t","name":"AsType AsByronAddr AsShelleyAddr AsByronAddress AsShelleyAddress AsAddress AsAddressAny AsAddressInEra AsStakeAddress AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsTxMetadata AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript AsByronKey AsByronKeyLegacy AsKesKey AsVrfKey AsStakePoolMetadata AsPolicyId AsAssetName AsUpdateProposal","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:AsType"},{"display_html":"data GenesisParameters = GenesisParameters {}","name":"GenesisParameters GenesisParameters protocolParamSystemStart protocolParamNetworkId protocolParamActiveSlotsCoefficient protocolParamSecurity protocolParamEpochLength protocolParamSlotLength protocolParamSlotsPerKESPeriod protocolParamMaxKESEvolutions protocolParamUpdateQuorum protocolParamMaxLovelaceSupply protocolInitialUpdateableProtocolParameters","module":"Cardano.Api.GenesisParameters","link":"Cardano-Api-GenesisParameters.html#t:GenesisParameters"},{"display_html":"newtype EpochSize = EpochSize {}","name":"EpochSize EpochSize unEpochSize","module":"Cardano.Api.GenesisParameters","link":"Cardano-Api-GenesisParameters.html#t:EpochSize"},{"display_html":"fromShelleyGenesis ∷ ShelleyGenesis era → GenesisParameters","name":"fromShelleyGenesis","module":"Cardano.Api.GenesisParameters","link":"Cardano-Api-GenesisParameters.html#v:fromShelleyGenesis"},{"display_html":"data Certificate","name":"Certificate StakeAddressRegistrationCertificate StakeAddressDeregistrationCertificate StakeAddressDelegationCertificate StakePoolRegistrationCertificate StakePoolRetirementCertificate GenesisKeyDelegationCertificate MIRCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:Certificate"},{"display_html":"makeStakeAddressRegistrationCertificate ∷ StakeCredential → Certificate","name":"makeStakeAddressRegistrationCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeStakeAddressRegistrationCertificate"},{"display_html":"makeStakeAddressDeregistrationCertificate ∷ StakeCredential → Certificate","name":"makeStakeAddressDeregistrationCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeStakeAddressDeregistrationCertificate"},{"display_html":"makeStakeAddressDelegationCertificate ∷ StakeCredential → PoolId → Certificate","name":"makeStakeAddressDelegationCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeStakeAddressDelegationCertificate"},{"display_html":"type PoolId = Hash StakePoolKey","name":"PoolId","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:PoolId"},{"display_html":"makeStakePoolRegistrationCertificate ∷ StakePoolParameters → Certificate","name":"makeStakePoolRegistrationCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeStakePoolRegistrationCertificate"},{"display_html":"makeStakePoolRetirementCertificate ∷ PoolId → EpochNo → Certificate","name":"makeStakePoolRetirementCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeStakePoolRetirementCertificate"},{"display_html":"data StakePoolParameters = StakePoolParameters {}","name":"StakePoolParameters StakePoolParameters stakePoolId stakePoolVRF stakePoolCost stakePoolMargin stakePoolRewardAccount stakePoolPledge stakePoolOwners stakePoolRelays stakePoolMetadata","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:StakePoolParameters"},{"display_html":"data StakePoolRelay","name":"StakePoolRelay StakePoolRelayIp StakePoolRelayDnsARecord StakePoolRelayDnsSrvRecord","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:StakePoolRelay"},{"display_html":"data StakePoolMetadataReference = StakePoolMetadataReference {}","name":"StakePoolMetadataReference StakePoolMetadataReference stakePoolMetadataURL stakePoolMetadataHash","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:StakePoolMetadataReference"},{"display_html":"makeMIRCertificate ∷ MIRPot → MIRTarget → Certificate","name":"makeMIRCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeMIRCertificate"},{"display_html":"makeGenesisKeyDelegationCertificate ∷ Hash GenesisKey → Hash GenesisDelegateKey → Hash VrfKey → Certificate","name":"makeGenesisKeyDelegationCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeGenesisKeyDelegationCertificate"},{"display_html":"data MIRTarget","name":"MIRTarget StakeAddressesMIR SendToReservesMIR SendToTreasuryMIR","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:MIRTarget"},{"display_html":"toShelleyCertificate ∷ Certificate → DCert StandardCrypto","name":"toShelleyCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:toShelleyCertificate"},{"display_html":"fromShelleyCertificate ∷ DCert StandardCrypto → Certificate","name":"fromShelleyCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:fromShelleyCertificate"},{"display_html":"toShelleyPoolParams ∷ StakePoolParameters → PoolParams StandardCrypto","name":"toShelleyPoolParams","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:toShelleyPoolParams"},{"display_html":"data family AsType t","name":"AsType AsByronAddr AsShelleyAddr AsByronAddress AsShelleyAddress AsAddress AsAddressAny AsAddressInEra AsStakeAddress AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript AsByronKey AsByronKeyLegacy AsKesKey AsVrfKey AsStakePoolMetadata AsPolicyId AsAssetName AsCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:AsType"},{"display_html":"data TxBody era where","name":"TxBody TxBody ByronTxBody ShelleyTxBody","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxBody"},{"display_html":"makeTransactionBody ∷ ∀ era. IsCardanoEra era ⇒ TxBodyContent BuildTx era → Either (TxBodyError era) (TxBody era)","name":"makeTransactionBody","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:makeTransactionBody"},{"display_html":"data TxBodyContent build era = TxBodyContent {}","name":"TxBodyContent TxBodyContent txMetadata txFee txIns txInsCollateral txOuts txValidityRange txAuxScripts txAuxScriptData txExtraKeyWits txProtocolParams txWithdrawals txCertificates txUpdateProposal txMintValue","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxBodyContent"},{"display_html":"data TxBodyError era","name":"TxBodyError TxBodyEmptyTxIns TxBodyEmptyTxInsCollateral TxBodyEmptyTxOuts TxBodyOutputNegative TxBodyOutputOverflow TxBodyMetadataError TxBodyMintAdaError TxBodyAuxDataHashInvalidError TxBodyMintBeforeMaryError TxBodyMissingProtocolParams","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxBodyError"},{"display_html":"data TxBodyScriptData era where","name":"TxBodyScriptData TxBodyScriptData TxBodyNoScriptData","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxBodyScriptData"},{"display_html":"newtype TxId = TxId (Hash StandardCrypto EraIndependentTxBody)","name":"TxId TxId","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxId"},{"display_html":"getTxId ∷ ∀ era. TxBody era → TxId","name":"getTxId","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:getTxId"},{"display_html":"data TxIn = TxIn TxId TxIx","name":"TxIn TxIn","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxIn"},{"display_html":"newtype TxIx = TxIx Word","name":"TxIx TxIx","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxIx"},{"display_html":"genesisUTxOPseudoTxIn ∷ NetworkId → Hash GenesisUTxOKey → TxIn","name":"genesisUTxOPseudoTxIn","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:genesisUTxOPseudoTxIn"},{"display_html":"data TxOut era = TxOut (AddressInEra era) (TxOutValue era) (TxOutDatumHash era)","name":"TxOut TxOut","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxOut"},{"display_html":"data TxOutValue era where","name":"TxOutValue TxOutValue TxOutAdaOnly","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxOutValue"},{"display_html":"serialiseAddressForTxOut ∷ AddressInEra era → Text","name":"serialiseAddressForTxOut","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:serialiseAddressForTxOut"},{"display_html":"data TxOutDatumHash era where","name":"TxOutDatumHash TxOutDatumHash TxOutDatumHashNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxOutDatumHash"},{"display_html":"data TxInsCollateral era where","name":"TxInsCollateral TxInsCollateral TxInsCollateralNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxInsCollateral"},{"display_html":"data TxFee era where","name":"TxFee TxFeeImplicit TxFeeExplicit","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxFee"},{"display_html":"data TxValidityLowerBound era where","name":"TxValidityLowerBound TxValidityLowerBound TxValidityNoLowerBound","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxValidityLowerBound"},{"display_html":"data TxValidityUpperBound era where","name":"TxValidityUpperBound TxValidityUpperBound TxValidityNoUpperBound","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxValidityUpperBound"},{"display_html":"data TxMetadataInEra era where","name":"TxMetadataInEra TxMetadataInEra TxMetadataNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxMetadataInEra"},{"display_html":"data TxAuxScripts era where","name":"TxAuxScripts TxAuxScripts TxAuxScriptsNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxAuxScripts"},{"display_html":"data TxAuxScriptData era where","name":"TxAuxScriptData TxAuxScriptData TxAuxScriptDataNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxAuxScriptData"},{"display_html":"data TxExtraKeyWitnesses era where","name":"TxExtraKeyWitnesses TxExtraKeyWitnesses TxExtraKeyWitnessesNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxExtraKeyWitnesses"},{"display_html":"data TxWithdrawals build era where","name":"TxWithdrawals TxWithdrawals TxWithdrawalsNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxWithdrawals"},{"display_html":"data TxCertificates build era where","name":"TxCertificates TxCertificates TxCertificatesNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxCertificates"},{"display_html":"data TxUpdateProposal era where","name":"TxUpdateProposal TxUpdateProposal TxUpdateProposalNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxUpdateProposal"},{"display_html":"data TxMintValue build era where","name":"TxMintValue TxMintValue TxMintNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxMintValue"},{"display_html":"data BuildTxWith build a where","name":"BuildTxWith BuildTxWith ViewTx","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:BuildTxWith"},{"display_html":"data BuildTx","name":"BuildTx","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:BuildTx"},{"display_html":"data ViewTx","name":"ViewTx","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:ViewTx"},{"display_html":"data CollateralSupportedInEra era where","name":"CollateralSupportedInEra CollateralInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:CollateralSupportedInEra"},{"display_html":"data MultiAssetSupportedInEra era where","name":"MultiAssetSupportedInEra MultiAssetInMaryEra MultiAssetInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:MultiAssetSupportedInEra"},{"display_html":"data OnlyAdaSupportedInEra era where","name":"OnlyAdaSupportedInEra AdaOnlyInByronEra AdaOnlyInShelleyEra AdaOnlyInAllegraEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:OnlyAdaSupportedInEra"},{"display_html":"data TxFeesExplicitInEra era where","name":"TxFeesExplicitInEra TxFeesExplicitInShelleyEra TxFeesExplicitInAllegraEra TxFeesExplicitInMaryEra TxFeesExplicitInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxFeesExplicitInEra"},{"display_html":"data TxFeesImplicitInEra era where","name":"TxFeesImplicitInEra TxFeesImplicitInByronEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxFeesImplicitInEra"},{"display_html":"data ValidityUpperBoundSupportedInEra era where","name":"ValidityUpperBoundSupportedInEra ValidityUpperBoundInShelleyEra ValidityUpperBoundInAllegraEra ValidityUpperBoundInMaryEra ValidityUpperBoundInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:ValidityUpperBoundSupportedInEra"},{"display_html":"data ValidityNoUpperBoundSupportedInEra era where","name":"ValidityNoUpperBoundSupportedInEra ValidityNoUpperBoundInByronEra ValidityNoUpperBoundInAllegraEra ValidityNoUpperBoundInMaryEra ValidityNoUpperBoundInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:ValidityNoUpperBoundSupportedInEra"},{"display_html":"data ValidityLowerBoundSupportedInEra era where","name":"ValidityLowerBoundSupportedInEra ValidityLowerBoundInAllegraEra ValidityLowerBoundInMaryEra ValidityLowerBoundInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:ValidityLowerBoundSupportedInEra"},{"display_html":"data TxMetadataSupportedInEra era where","name":"TxMetadataSupportedInEra TxMetadataInShelleyEra TxMetadataInAllegraEra TxMetadataInMaryEra TxMetadataInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxMetadataSupportedInEra"},{"display_html":"data AuxScriptsSupportedInEra era where","name":"AuxScriptsSupportedInEra AuxScriptsInAllegraEra AuxScriptsInMaryEra AuxScriptsInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:AuxScriptsSupportedInEra"},{"display_html":"data TxExtraKeyWitnessesSupportedInEra era where","name":"TxExtraKeyWitnessesSupportedInEra ExtraKeyWitnessesInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxExtraKeyWitnessesSupportedInEra"},{"display_html":"data ScriptDataSupportedInEra era where","name":"ScriptDataSupportedInEra ScriptDataInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:ScriptDataSupportedInEra"},{"display_html":"data WithdrawalsSupportedInEra era where","name":"WithdrawalsSupportedInEra WithdrawalsInShelleyEra WithdrawalsInAllegraEra WithdrawalsInMaryEra WithdrawalsInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:WithdrawalsSupportedInEra"},{"display_html":"data CertificatesSupportedInEra era where","name":"CertificatesSupportedInEra CertificatesInShelleyEra CertificatesInAllegraEra CertificatesInMaryEra CertificatesInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:CertificatesSupportedInEra"},{"display_html":"data UpdateProposalSupportedInEra era where","name":"UpdateProposalSupportedInEra UpdateProposalInShelleyEra UpdateProposalInAllegraEra UpdateProposalInMaryEra UpdateProposalInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:UpdateProposalSupportedInEra"},{"display_html":"collateralSupportedInEra ∷ CardanoEra era → Maybe (CollateralSupportedInEra era)","name":"collateralSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:collateralSupportedInEra"},{"display_html":"multiAssetSupportedInEra ∷ CardanoEra era → Either (OnlyAdaSupportedInEra era) (MultiAssetSupportedInEra era)","name":"multiAssetSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:multiAssetSupportedInEra"},{"display_html":"txFeesExplicitInEra ∷ CardanoEra era → Either (TxFeesImplicitInEra era) (TxFeesExplicitInEra era)","name":"txFeesExplicitInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:txFeesExplicitInEra"},{"display_html":"validityUpperBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityUpperBoundSupportedInEra era)","name":"validityUpperBoundSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:validityUpperBoundSupportedInEra"},{"display_html":"validityNoUpperBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityNoUpperBoundSupportedInEra era)","name":"validityNoUpperBoundSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:validityNoUpperBoundSupportedInEra"},{"display_html":"validityLowerBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityLowerBoundSupportedInEra era)","name":"validityLowerBoundSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:validityLowerBoundSupportedInEra"},{"display_html":"txMetadataSupportedInEra ∷ CardanoEra era → Maybe (TxMetadataSupportedInEra era)","name":"txMetadataSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:txMetadataSupportedInEra"},{"display_html":"auxScriptsSupportedInEra ∷ CardanoEra era → Maybe (AuxScriptsSupportedInEra era)","name":"auxScriptsSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:auxScriptsSupportedInEra"},{"display_html":"extraKeyWitnessesSupportedInEra ∷ CardanoEra era → Maybe (TxExtraKeyWitnessesSupportedInEra era)","name":"extraKeyWitnessesSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:extraKeyWitnessesSupportedInEra"},{"display_html":"scriptDataSupportedInEra ∷ CardanoEra era → Maybe (ScriptDataSupportedInEra era)","name":"scriptDataSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:scriptDataSupportedInEra"},{"display_html":"withdrawalsSupportedInEra ∷ CardanoEra era → Maybe (WithdrawalsSupportedInEra era)","name":"withdrawalsSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:withdrawalsSupportedInEra"},{"display_html":"certificatesSupportedInEra ∷ CardanoEra era → Maybe (CertificatesSupportedInEra era)","name":"certificatesSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:certificatesSupportedInEra"},{"display_html":"updateProposalSupportedInEra ∷ CardanoEra era → Maybe (UpdateProposalSupportedInEra era)","name":"updateProposalSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:updateProposalSupportedInEra"},{"display_html":"toShelleyTxId ∷ TxId → TxId StandardCrypto","name":"toShelleyTxId","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:toShelleyTxId"},{"display_html":"toShelleyTxIn ∷ TxIn → TxIn StandardCrypto","name":"toShelleyTxIn","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:toShelleyTxIn"},{"display_html":"toShelleyTxOut ∷ ∀ era ledgerera. (ShelleyLedgerEra era ~ ledgerera, IsShelleyBasedEra era, ShelleyBased ledgerera) ⇒ TxOut era → TxOut ledgerera","name":"toShelleyTxOut","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:toShelleyTxOut"},{"display_html":"fromShelleyTxId ∷ TxId StandardCrypto → TxId","name":"fromShelleyTxId","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:fromShelleyTxId"},{"display_html":"fromShelleyTxIn ∷ TxIn StandardCrypto → TxIn","name":"fromShelleyTxIn","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:fromShelleyTxIn"},{"display_html":"fromShelleyTxOut ∷ TxOut StandardShelley → TxOut ShelleyEra","name":"fromShelleyTxOut","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:fromShelleyTxOut"},{"display_html":"fromTxOut ∷ ShelleyLedgerEra era ~ ledgerera ⇒ ShelleyBasedEra era → TxOut ledgerera → TxOut era","name":"fromTxOut","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:fromTxOut"},{"display_html":"data family AsType t","name":"AsType AsTxId AsTxBody AsByronTxBody AsShelleyTxBody AsMaryTxBody","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:AsType"},{"display_html":"fromByronTxIn ∷ TxIn → TxIn","name":"fromByronTxIn","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:fromByronTxIn"},{"display_html":"data Tx era where","name":"Tx Tx ByronTx ShelleyTx","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:Tx"},{"display_html":"getTxBody ∷ ∀ era. Tx era → TxBody era","name":"getTxBody","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:getTxBody"},{"display_html":"getTxWitnesses ∷ ∀ era. Tx era → [KeyWitness era]","name":"getTxWitnesses","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:getTxWitnesses"},{"display_html":"data ShelleySigningKey","name":"ShelleySigningKey ShelleyExtendedSigningKey ShelleyNormalSigningKey","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:ShelleySigningKey"},{"display_html":"toShelleySigningKey ∷ ShelleyWitnessSigningKey → ShelleySigningKey","name":"toShelleySigningKey","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:toShelleySigningKey"},{"display_html":"signByronTransaction ∷ NetworkId → TxBody ByronEra → [SigningKey ByronKey] → Tx ByronEra","name":"signByronTransaction","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:signByronTransaction"},{"display_html":"signShelleyTransaction ∷ IsShelleyBasedEra era ⇒ TxBody era → [ShelleyWitnessSigningKey] → Tx era","name":"signShelleyTransaction","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:signShelleyTransaction"},{"display_html":"makeSignedTransaction ∷ ∀ era. [KeyWitness era] → TxBody era → Tx era","name":"makeSignedTransaction","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:makeSignedTransaction"},{"display_html":"data KeyWitness era where","name":"KeyWitness ByronKeyWitness ShelleyBootstrapWitness ShelleyKeyWitness","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:KeyWitness"},{"display_html":"makeByronKeyWitness ∷ ∀ key. IsByronKey key ⇒ NetworkId → TxBody ByronEra → SigningKey key → KeyWitness ByronEra","name":"makeByronKeyWitness","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:makeByronKeyWitness"},{"display_html":"data ShelleyWitnessSigningKey","name":"ShelleyWitnessSigningKey WitnessPaymentKey WitnessPaymentExtendedKey WitnessStakeKey WitnessStakeExtendedKey WitnessStakePoolKey WitnessGenesisKey WitnessGenesisExtendedKey WitnessGenesisDelegateKey WitnessGenesisDelegateExtendedKey WitnessGenesisUTxOKey","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:ShelleyWitnessSigningKey"},{"display_html":"makeShelleyKeyWitness ∷ ∀ era. IsShelleyBasedEra era ⇒ TxBody era → ShelleyWitnessSigningKey → KeyWitness era","name":"makeShelleyKeyWitness","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:makeShelleyKeyWitness"},{"display_html":"data WitnessNetworkIdOrByronAddress","name":"WitnessNetworkIdOrByronAddress WitnessNetworkId WitnessByronAddress","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:WitnessNetworkIdOrByronAddress"},{"display_html":"makeShelleyBootstrapWitness ∷ ∀ era. IsShelleyBasedEra era ⇒ WitnessNetworkIdOrByronAddress → TxBody era → SigningKey ByronKey → KeyWitness era","name":"makeShelleyBootstrapWitness","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:makeShelleyBootstrapWitness"},{"display_html":"makeShelleySignature ∷ SignableRepresentation tosign ⇒ tosign → ShelleySigningKey → SignedDSIGN StandardCrypto tosign","name":"makeShelleySignature","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:makeShelleySignature"},{"display_html":"getShelleyKeyWitnessVerificationKey ∷ ShelleySigningKey → VKey Witness StandardCrypto","name":"getShelleyKeyWitnessVerificationKey","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:getShelleyKeyWitnessVerificationKey"},{"display_html":"data family AsType t","name":"AsType AsTx AsByronTx AsShelleyTx AsKeyWitness AsByronWitness AsShelleyWitness","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:AsType"},{"display_html":"data TxInMode mode where","name":"TxInMode TxInMode TxInByronSpecial","module":"Cardano.Api.TxInMode","link":"Cardano-Api-TxInMode.html#t:TxInMode"},{"display_html":"toConsensusGenTx ∷ ConsensusBlockForMode mode ~ block ⇒ TxInMode mode → GenTx block","name":"toConsensusGenTx","module":"Cardano.Api.TxInMode","link":"Cardano-Api-TxInMode.html#v:toConsensusGenTx"},{"display_html":"data TxValidationError era where","name":"TxValidationError ByronTxValidationError ShelleyTxValidationError","module":"Cardano.Api.TxInMode","link":"Cardano-Api-TxInMode.html#t:TxValidationError"},{"display_html":"data TxValidationErrorInMode mode where","name":"TxValidationErrorInMode TxValidationErrorInMode TxValidationEraMismatch","module":"Cardano.Api.TxInMode","link":"Cardano-Api-TxInMode.html#t:TxValidationErrorInMode"},{"display_html":"fromConsensusApplyTxErr ∷ ConsensusBlockForMode mode ~ block ⇒ ConsensusMode mode → ApplyTxErr block → TxValidationErrorInMode mode","name":"fromConsensusApplyTxErr","module":"Cardano.Api.TxInMode","link":"Cardano-Api-TxInMode.html#v:fromConsensusApplyTxErr"},{"display_html":"transactionFee ∷ ∀ era. IsShelleyBasedEra era ⇒ Natural → Natural → Tx era → Lovelace","name":"transactionFee","module":"Cardano.Api.Fees","link":"Cardano-Api-Fees.html#v:transactionFee"},{"display_html":"estimateTransactionFee ∷ ∀ era. IsShelleyBasedEra era ⇒ NetworkId → Natural → Natural → Tx era → Int → Int → Int → Int → Lovelace","name":"estimateTransactionFee","module":"Cardano.Api.Fees","link":"Cardano-Api-Fees.html#v:estimateTransactionFee"},{"display_html":"data Block era where","name":"Block Block ByronBlock ShelleyBlock","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:Block"},{"display_html":"data BlockHeader = BlockHeader !SlotNo !(Hash BlockHeader) !BlockNo","name":"BlockHeader BlockHeader","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:BlockHeader"},{"display_html":"data BlockInMode mode where","name":"BlockInMode BlockInMode","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:BlockInMode"},{"display_html":"fromConsensusBlock ∷ ConsensusBlockForMode mode ~ block ⇒ ConsensusMode mode → block → BlockInMode mode","name":"fromConsensusBlock","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:fromConsensusBlock"},{"display_html":"data ChainPoint","name":"ChainPoint ChainPoint ChainPointAtGenesis","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:ChainPoint"},{"display_html":"newtype SlotNo = SlotNo {}","name":"SlotNo SlotNo unSlotNo","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:SlotNo"},{"display_html":"newtype EpochNo = EpochNo {}","name":"EpochNo EpochNo unEpochNo","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:EpochNo"},{"display_html":"toConsensusPoint ∷ ∀ ledgerera. ShelleyBasedEra ledgerera ⇒ ChainPoint → Point (ShelleyBlock ledgerera)","name":"toConsensusPoint","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:toConsensusPoint"},{"display_html":"fromConsensusPoint ∷ ∀ ledgerera. ShelleyBasedEra ledgerera ⇒ Point (ShelleyBlock ledgerera) → ChainPoint","name":"fromConsensusPoint","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:fromConsensusPoint"},{"display_html":"toConsensusPointInMode ∷ ConsensusMode mode → ChainPoint → Point (ConsensusBlockForMode mode)","name":"toConsensusPointInMode","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:toConsensusPointInMode"},{"display_html":"fromConsensusPointInMode ∷ ConsensusMode mode → Point (ConsensusBlockForMode mode) → ChainPoint","name":"fromConsensusPointInMode","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:fromConsensusPointInMode"},{"display_html":"data ChainTip","name":"ChainTip ChainTip ChainTipAtGenesis","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:ChainTip"},{"display_html":"newtype BlockNo = BlockNo {}","name":"BlockNo BlockNo unBlockNo","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:BlockNo"},{"display_html":"chainTipToChainPoint ∷ ChainTip → ChainPoint","name":"chainTipToChainPoint","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:chainTipToChainPoint"},{"display_html":"fromConsensusTip ∷ ConsensusBlockForMode mode ~ block ⇒ ConsensusMode mode → Tip block → ChainTip","name":"fromConsensusTip","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:fromConsensusTip"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash HeaderHash","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:Hash"},{"display_html":"data QueryInMode mode result where","name":"QueryInMode QueryInEra QueryCurrentEra QueryEraHistory","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:QueryInMode"},{"display_html":"data QueryInEra era result where","name":"QueryInEra QueryInShelleyBasedEra QueryByronUpdateState","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:QueryInEra"},{"display_html":"data QueryInShelleyBasedEra era result where","name":"QueryInShelleyBasedEra QueryChainPoint QueryEpoch QueryGenesisParameters QueryProtocolParameters QueryProtocolParametersUpdate QueryStakeDistribution QueryUTxO QueryStakeAddresses QueryDebugLedgerState QueryProtocolState","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:QueryInShelleyBasedEra"},{"display_html":"newtype UTxO era = UTxO (Map TxIn (TxOut era))","name":"UTxO UTxO","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:UTxO"},{"display_html":"toConsensusQuery ∷ ∀ mode block result. ConsensusBlockForMode mode ~ block ⇒ QueryInMode mode result → Some (Query block)","name":"toConsensusQuery","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#v:toConsensusQuery"},{"display_html":"fromConsensusQueryResult ∷ ∀ mode block result result'. ConsensusBlockForMode mode ~ block ⇒ QueryInMode mode result → Query block result' → result' → result","name":"fromConsensusQueryResult","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#v:fromConsensusQueryResult"},{"display_html":"newtype SerialisedDebugLedgerState era = SerialisedDebugLedgerState (Serialised (NewEpochState (ShelleyLedgerEra era)))","name":"SerialisedDebugLedgerState SerialisedDebugLedgerState","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:SerialisedDebugLedgerState"},{"display_html":"newtype ProtocolState era = ProtocolState (Serialised (ChainDepState (Crypto (ShelleyLedgerEra era))))","name":"ProtocolState ProtocolState","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:ProtocolState"},{"display_html":"data DebugLedgerState era where","name":"DebugLedgerState DebugLedgerState","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:DebugLedgerState"},{"display_html":"data EraHistory mode where","name":"EraHistory EraHistory","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:EraHistory"},{"display_html":"newtype SlotsInEpoch = SlotsInEpoch Word64","name":"SlotsInEpoch SlotsInEpoch","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:SlotsInEpoch"},{"display_html":"newtype SlotsToEpochEnd = SlotsToEpochEnd Word64","name":"SlotsToEpochEnd SlotsToEpochEnd","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:SlotsToEpochEnd"},{"display_html":"slotToEpoch ∷ SlotNo → EraHistory mode → Either PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd)","name":"slotToEpoch","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#v:slotToEpoch"},{"display_html":"connectToLocalNode ∷ LocalNodeConnectInfo mode → LocalNodeClientProtocolsInMode mode → IO ()","name":"connectToLocalNode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:connectToLocalNode"},{"display_html":"data LocalNodeConnectInfo mode = LocalNodeConnectInfo {}","name":"LocalNodeConnectInfo LocalNodeConnectInfo localConsensusModeParams localNodeNetworkId localNodeSocketPath","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalNodeConnectInfo"},{"display_html":"localConsensusMode ∷ LocalNodeConnectInfo mode → ConsensusMode mode","name":"localConsensusMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:localConsensusMode"},{"display_html":"data LocalNodeClientProtocols block point tip tx txerr query m = LocalNodeClientProtocols {}","name":"LocalNodeClientProtocols LocalNodeClientProtocols localChainSyncClient localTxSubmissionClient localStateQueryClient","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalNodeClientProtocols"},{"display_html":"data LocalChainSyncClient block point tip m","name":"LocalChainSyncClient LocalChainSyncClient LocalChainSyncClientPipelined NoLocalChainSyncClient","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalChainSyncClient"},{"display_html":"type LocalNodeClientProtocolsInMode mode = LocalNodeClientProtocols (BlockInMode mode) ChainPoint ChainTip (TxInMode mode) (TxValidationErrorInMode mode) (QueryInMode mode) IO","name":"LocalNodeClientProtocolsInMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalNodeClientProtocolsInMode"},{"display_html":"data ByronMode","name":"ByronMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ByronMode"},{"display_html":"data ShelleyMode","name":"ShelleyMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ShelleyMode"},{"display_html":"data CardanoMode","name":"CardanoMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:CardanoMode"},{"display_html":"data ConsensusModeParams mode where","name":"ConsensusModeParams CardanoModeParams ByronModeParams ShelleyModeParams","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ConsensusModeParams"},{"display_html":"newtype EpochSlots = EpochSlots {}","name":"EpochSlots EpochSlots unEpochSlots","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:EpochSlots"},{"display_html":"newtype ChainSyncClient header point tip (m ∷ Type → Type) a = ChainSyncClient {}","name":"ChainSyncClient ChainSyncClient runChainSyncClient","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ChainSyncClient"},{"display_html":"newtype ChainSyncClientPipelined header point tip (m ∷ Type → Type) a = ChainSyncClientPipelined {}","name":"ChainSyncClientPipelined ChainSyncClientPipelined runChainSyncClientPipelined","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ChainSyncClientPipelined"},{"display_html":"data BlockInMode mode where","name":"BlockInMode BlockInMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:BlockInMode"},{"display_html":"newtype LocalTxSubmissionClient tx reject (m ∷ Type → Type) a = LocalTxSubmissionClient {}","name":"LocalTxSubmissionClient LocalTxSubmissionClient runLocalTxSubmissionClient","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalTxSubmissionClient"},{"display_html":"data TxInMode mode where","name":"TxInMode TxInMode TxInByronSpecial","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:TxInMode"},{"display_html":"data TxValidationErrorInMode mode where","name":"TxValidationErrorInMode TxValidationErrorInMode TxValidationEraMismatch","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:TxValidationErrorInMode"},{"display_html":"data TxValidationError era","name":"TxValidationError","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:TxValidationError"},{"display_html":"submitTxToNodeLocal ∷ ∀ mode. LocalNodeConnectInfo mode → TxInMode mode → IO (SubmitResult (TxValidationErrorInMode mode))","name":"submitTxToNodeLocal","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:submitTxToNodeLocal"},{"display_html":"data SubmitResult reason","name":"SubmitResult SubmitFail SubmitSuccess","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:SubmitResult"},{"display_html":"newtype LocalStateQueryClient block point (query ∷ Type → Type) (m ∷ Type → Type) a = LocalStateQueryClient {}","name":"LocalStateQueryClient LocalStateQueryClient runLocalStateQueryClient","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalStateQueryClient"},{"display_html":"data AcquireFailure","name":"AcquireFailure AcquireFailurePointNotOnChain AcquireFailurePointTooOld","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:AcquireFailure"},{"display_html":"data QueryInMode mode result where","name":"QueryInMode QueryInEra QueryCurrentEra QueryEraHistory","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:QueryInMode"},{"display_html":"data QueryInEra era result where","name":"QueryInEra QueryInShelleyBasedEra QueryByronUpdateState","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:QueryInEra"},{"display_html":"data QueryInShelleyBasedEra era result where","name":"QueryInShelleyBasedEra QueryChainPoint QueryEpoch QueryGenesisParameters QueryProtocolParameters QueryProtocolParametersUpdate QueryStakeDistribution QueryUTxO QueryStakeAddresses QueryDebugLedgerState QueryProtocolState","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:QueryInShelleyBasedEra"},{"display_html":"queryNodeLocalState ∷ ∀ mode result. LocalNodeConnectInfo mode → Maybe ChainPoint → QueryInMode mode result → IO (Either AcquireFailure result)","name":"queryNodeLocalState","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:queryNodeLocalState"},{"display_html":"getLocalChainTip ∷ LocalNodeConnectInfo mode → IO ChainTip","name":"getLocalChainTip","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:getLocalChainTip"},{"display_html":"data ConsensusMode mode where","name":"ConsensusMode CardanoMode ByronMode ShelleyMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ConsensusMode"},{"display_html":"consensusModeOnly ∷ ConsensusModeParams mode → ConsensusMode mode","name":"consensusModeOnly","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:consensusModeOnly"},{"display_html":"data Env = Env {}","name":"Env Env envLedgerConfig envProtocolConfig","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#t:Env"},{"display_html":"envSecurityParam ∷ Env → Word64","name":"envSecurityParam","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:envSecurityParam"},{"display_html":"newtype LedgerState where","name":"LedgerState LedgerStateByron LedgerStateShelley LedgerStateAllegra LedgerStateMary LedgerState clsState","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#t:LedgerState"},{"display_html":"initialLedgerState ∷ FilePath → ExceptT InitialLedgerStateError IO (Env, LedgerState)","name":"initialLedgerState","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:initialLedgerState"},{"display_html":"applyBlock ∷ Env → LedgerState → Bool → Block era → Either Text LedgerState","name":"applyBlock","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:applyBlock"},{"display_html":"foldBlocks ∷ ∀ a. FilePath → FilePath → NetworkId → Bool → a → (Env → LedgerState → BlockInMode CardanoMode → a → IO a) → ExceptT FoldBlocksError IO a","name":"foldBlocks","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:foldBlocks"},{"display_html":"data FoldBlocksError","name":"FoldBlocksError FoldBlocksInitialLedgerStateError FoldBlocksApplyBlockError","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#t:FoldBlocksError"},{"display_html":"data GenesisConfigError","name":"GenesisConfigError NECardanoConfig NEError NEByronConfig NEShelleyConfig","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#t:GenesisConfigError"},{"display_html":"data InitialLedgerStateError","name":"InitialLedgerStateError ILSEConfigFile ILSEGenesisFile ILSELedgerConsensusConfig","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#t:InitialLedgerStateError"},{"display_html":"renderFoldBlocksError ∷ FoldBlocksError → Text","name":"renderFoldBlocksError","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:renderFoldBlocksError"},{"display_html":"renderGenesisConfigError ∷ GenesisConfigError → Text","name":"renderGenesisConfigError","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:renderGenesisConfigError"},{"display_html":"renderInitialLedgerStateError ∷ InitialLedgerStateError → Text","name":"renderInitialLedgerStateError","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:renderInitialLedgerStateError"},{"display_html":"data OperationalCertificate = OperationalCertificate !(OCert StandardCrypto) !(VerificationKey StakePoolKey)","name":"OperationalCertificate OperationalCertificate","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#t:OperationalCertificate"},{"display_html":"data OperationalCertificateIssueCounter = OperationalCertificateIssueCounter !Word64 !(VerificationKey StakePoolKey)","name":"OperationalCertificateIssueCounter OperationalCertificateIssueCounter","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#t:OperationalCertificateIssueCounter"},{"display_html":"newtype KESPeriod = KESPeriod {}","name":"KESPeriod KESPeriod unKESPeriod","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#t:KESPeriod"},{"display_html":"data OperationalCertIssueError = OperationalCertKeyMismatch (VerificationKey StakePoolKey) (VerificationKey StakePoolKey)","name":"OperationalCertIssueError OperationalCertKeyMismatch","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#t:OperationalCertIssueError"},{"display_html":"issueOperationalCertificate ∷ VerificationKey KesKey → Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) → KESPeriod → OperationalCertificateIssueCounter → Either OperationalCertIssueError (OperationalCertificate, OperationalCertificateIssueCounter)","name":"issueOperationalCertificate","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#v:issueOperationalCertificate"},{"display_html":"data family AsType t","name":"AsType AsByronAddr AsShelleyAddr AsByronAddress AsShelleyAddress AsAddress AsAddressAny AsAddressInEra AsStakeAddress AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTx AsByronTx AsShelleyTx AsKeyWitness AsByronWitness AsShelleyWitness AsTextEnvelope AsTxMetadata AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript AsByronKey AsByronKeyLegacy AsKesKey AsVrfKey AsStakePoolMetadata AsPolicyId AsAssetName AsUpdateProposal AsCertificate AsOperationalCertificate AsOperationalCertificateIssueCounter","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#t:AsType"},{"display_html":"data ByronEra","name":"ByronEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ByronEra"},{"display_html":"data ShelleyEra","name":"ShelleyEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ShelleyEra"},{"display_html":"data AllegraEra","name":"AllegraEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AllegraEra"},{"display_html":"data MaryEra","name":"MaryEra","module":"Cardano.Api","link":"Cardano-Api.html#t:MaryEra"},{"display_html":"data AlonzoEra","name":"AlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AlonzoEra"},{"display_html":"data CardanoEra era where","name":"CardanoEra ByronEra ShelleyEra AllegraEra MaryEra AlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:CardanoEra"},{"display_html":"class HasTypeProxy era ⇒ IsCardanoEra era where","name":"IsCardanoEra cardanoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:IsCardanoEra"},{"display_html":"data AnyCardanoEra where","name":"AnyCardanoEra AnyCardanoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AnyCardanoEra"},{"display_html":"anyCardanoEra ∷ CardanoEra era → AnyCardanoEra","name":"anyCardanoEra","module":"Cardano.Api","link":"Cardano-Api.html#v:anyCardanoEra"},{"display_html":"data InAnyCardanoEra thing where","name":"InAnyCardanoEra InAnyCardanoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:InAnyCardanoEra"},{"display_html":"data ShelleyBasedEra era where","name":"ShelleyBasedEra ShelleyBasedEraShelley ShelleyBasedEraAllegra ShelleyBasedEraMary ShelleyBasedEraAlonzo","module":"Cardano.Api","link":"Cardano-Api.html#t:ShelleyBasedEra"},{"display_html":"class (IsCardanoEra era, Crypto (ShelleyLedgerEra era) ~ StandardCrypto) ⇒ IsShelleyBasedEra era where","name":"IsShelleyBasedEra shelleyBasedEra","module":"Cardano.Api","link":"Cardano-Api.html#t:IsShelleyBasedEra"},{"display_html":"data InAnyShelleyBasedEra thing where","name":"InAnyShelleyBasedEra InAnyShelleyBasedEra","module":"Cardano.Api","link":"Cardano-Api.html#t:InAnyShelleyBasedEra"},{"display_html":"data CardanoEraStyle era where","name":"CardanoEraStyle ShelleyBasedEra LegacyByronEra","module":"Cardano.Api","link":"Cardano-Api.html#t:CardanoEraStyle"},{"display_html":"cardanoEraStyle ∷ CardanoEra era → CardanoEraStyle era","name":"cardanoEraStyle","module":"Cardano.Api","link":"Cardano-Api.html#v:cardanoEraStyle"},{"display_html":"type Byron = ByronEra","name":"Byron","module":"Cardano.Api","link":"Cardano-Api.html#t:Byron"},{"display_html":"type Shelley = ShelleyEra","name":"Shelley","module":"Cardano.Api","link":"Cardano-Api.html#t:Shelley"},{"display_html":"type Allegra = AllegraEra","name":"Allegra","module":"Cardano.Api","link":"Cardano-Api.html#t:Allegra"},{"display_html":"type Mary = MaryEra","name":"Mary","module":"Cardano.Api","link":"Cardano-Api.html#t:Mary"},{"display_html":"class HasTypeProxy t where","name":"HasTypeProxy AsType proxyToAsType","module":"Cardano.Api","link":"Cardano-Api.html#t:HasTypeProxy"},{"display_html":"class (Eq (VerificationKey keyrole), Show (VerificationKey keyrole), SerialiseAsRawBytes (Hash keyrole), HasTextEnvelope (VerificationKey keyrole), HasTextEnvelope (SigningKey keyrole)) ⇒ Key keyrole","name":"Key","module":"Cardano.Api","link":"Cardano-Api.html#t:Key"},{"display_html":"data family VerificationKey keyrole ∷ Type","name":"VerificationKey","module":"Cardano.Api","link":"Cardano-Api.html#t:VerificationKey"},{"display_html":"getVerificationKey ∷ Key keyrole ⇒ SigningKey keyrole → VerificationKey keyrole","name":"getVerificationKey","module":"Cardano.Api","link":"Cardano-Api.html#v:getVerificationKey"},{"display_html":"verificationKeyHash ∷ Key keyrole ⇒ VerificationKey keyrole → Hash keyrole","name":"verificationKeyHash","module":"Cardano.Api","link":"Cardano-Api.html#v:verificationKeyHash"},{"display_html":"castVerificationKey ∷ CastVerificationKeyRole keyroleA keyroleB ⇒ VerificationKey keyroleA → VerificationKey keyroleB","name":"castVerificationKey","module":"Cardano.Api","link":"Cardano-Api.html#v:castVerificationKey"},{"display_html":"castSigningKey ∷ CastSigningKeyRole keyroleA keyroleB ⇒ SigningKey keyroleA → SigningKey keyroleB","name":"castSigningKey","module":"Cardano.Api","link":"Cardano-Api.html#v:castSigningKey"},{"display_html":"generateSigningKey ∷ Key keyrole ⇒ AsType keyrole → IO (SigningKey keyrole)","name":"generateSigningKey","module":"Cardano.Api","link":"Cardano-Api.html#v:generateSigningKey"},{"display_html":"deterministicSigningKey ∷ Key keyrole ⇒ AsType keyrole → Seed → SigningKey keyrole","name":"deterministicSigningKey","module":"Cardano.Api","link":"Cardano-Api.html#v:deterministicSigningKey"},{"display_html":"deterministicSigningKeySeedSize ∷ Key keyrole ⇒ AsType keyrole → Word","name":"deterministicSigningKeySeedSize","module":"Cardano.Api","link":"Cardano-Api.html#v:deterministicSigningKeySeedSize"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash","module":"Cardano.Api","link":"Cardano-Api.html#t:Hash"},{"display_html":"castHash ∷ CastHash roleA roleB ⇒ Hash roleA → Hash roleB","name":"castHash","module":"Cardano.Api","link":"Cardano-Api.html#v:castHash"},{"display_html":"data Address addrtype","name":"Address","module":"Cardano.Api","link":"Cardano-Api.html#t:Address"},{"display_html":"data ByronAddr","name":"ByronAddr","module":"Cardano.Api","link":"Cardano-Api.html#t:ByronAddr"},{"display_html":"data ShelleyAddr","name":"ShelleyAddr","module":"Cardano.Api","link":"Cardano-Api.html#t:ShelleyAddr"},{"display_html":"data NetworkId","name":"NetworkId Mainnet Testnet","module":"Cardano.Api","link":"Cardano-Api.html#t:NetworkId"},{"display_html":"makeByronAddress ∷ NetworkId → VerificationKey ByronKey → Address ByronAddr","name":"makeByronAddress","module":"Cardano.Api","link":"Cardano-Api.html#v:makeByronAddress"},{"display_html":"data ByronKey","name":"ByronKey","module":"Cardano.Api","link":"Cardano-Api.html#t:ByronKey"},{"display_html":"data ByronKeyLegacy","name":"ByronKeyLegacy","module":"Cardano.Api","link":"Cardano-Api.html#t:ByronKeyLegacy"},{"display_html":"makeShelleyAddress ∷ NetworkId → PaymentCredential → StakeAddressReference → Address ShelleyAddr","name":"makeShelleyAddress","module":"Cardano.Api","link":"Cardano-Api.html#v:makeShelleyAddress"},{"display_html":"data PaymentCredential","name":"PaymentCredential PaymentCredentialByKey PaymentCredentialByScript","module":"Cardano.Api","link":"Cardano-Api.html#t:PaymentCredential"},{"display_html":"data StakeAddressReference","name":"StakeAddressReference StakeAddressByValue StakeAddressByPointer NoStakeAddress","module":"Cardano.Api","link":"Cardano-Api.html#t:StakeAddressReference"},{"display_html":"data PaymentKey","name":"PaymentKey","module":"Cardano.Api","link":"Cardano-Api.html#t:PaymentKey"},{"display_html":"data PaymentExtendedKey","name":"PaymentExtendedKey","module":"Cardano.Api","link":"Cardano-Api.html#t:PaymentExtendedKey"},{"display_html":"data AddressAny","name":"AddressAny AddressByron AddressShelley","module":"Cardano.Api","link":"Cardano-Api.html#t:AddressAny"},{"display_html":"data AddressInEra era where","name":"AddressInEra AddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AddressInEra"},{"display_html":"data AddressTypeInEra addrtype era where","name":"AddressTypeInEra ByronAddressInAnyEra ShelleyAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AddressTypeInEra"},{"display_html":"byronAddressInEra ∷ Address ByronAddr → AddressInEra era","name":"byronAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:byronAddressInEra"},{"display_html":"shelleyAddressInEra ∷ IsShelleyBasedEra era ⇒ Address ShelleyAddr → AddressInEra era","name":"shelleyAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:shelleyAddressInEra"},{"display_html":"anyAddressInShelleyBasedEra ∷ IsShelleyBasedEra era ⇒ AddressAny → AddressInEra era","name":"anyAddressInShelleyBasedEra","module":"Cardano.Api","link":"Cardano-Api.html#v:anyAddressInShelleyBasedEra"},{"display_html":"anyAddressInEra ∷ CardanoEra era → AddressAny → Maybe (AddressInEra era)","name":"anyAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:anyAddressInEra"},{"display_html":"toAddressAny ∷ Address addr → AddressAny","name":"toAddressAny","module":"Cardano.Api","link":"Cardano-Api.html#v:toAddressAny"},{"display_html":"makeByronAddressInEra ∷ NetworkId → VerificationKey ByronKey → AddressInEra era","name":"makeByronAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:makeByronAddressInEra"},{"display_html":"makeShelleyAddressInEra ∷ IsShelleyBasedEra era ⇒ NetworkId → PaymentCredential → StakeAddressReference → AddressInEra era","name":"makeShelleyAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:makeShelleyAddressInEra"},{"display_html":"data StakeAddress","name":"StakeAddress","module":"Cardano.Api","link":"Cardano-Api.html#t:StakeAddress"},{"display_html":"data StakeCredential","name":"StakeCredential","module":"Cardano.Api","link":"Cardano-Api.html#t:StakeCredential"},{"display_html":"makeStakeAddress ∷ NetworkId → StakeCredential → StakeAddress","name":"makeStakeAddress","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakeAddress"},{"display_html":"data StakeKey","name":"StakeKey","module":"Cardano.Api","link":"Cardano-Api.html#t:StakeKey"},{"display_html":"data StakeExtendedKey","name":"StakeExtendedKey","module":"Cardano.Api","link":"Cardano-Api.html#t:StakeExtendedKey"},{"display_html":"data Lovelace","name":"Lovelace","module":"Cardano.Api","link":"Cardano-Api.html#t:Lovelace"},{"display_html":"newtype Quantity = Quantity Integer","name":"Quantity Quantity","module":"Cardano.Api","link":"Cardano-Api.html#t:Quantity"},{"display_html":"newtype PolicyId = PolicyId ScriptHash","name":"PolicyId PolicyId","module":"Cardano.Api","link":"Cardano-Api.html#t:PolicyId"},{"display_html":"scriptPolicyId ∷ Script lang → PolicyId","name":"scriptPolicyId","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptPolicyId"},{"display_html":"newtype AssetName = AssetName ByteString","name":"AssetName AssetName","module":"Cardano.Api","link":"Cardano-Api.html#t:AssetName"},{"display_html":"data AssetId","name":"AssetId AssetId AdaAssetId","module":"Cardano.Api","link":"Cardano-Api.html#t:AssetId"},{"display_html":"data Value","name":"Value","module":"Cardano.Api","link":"Cardano-Api.html#t:Value"},{"display_html":"selectAsset ∷ Value → AssetId → Quantity","name":"selectAsset","module":"Cardano.Api","link":"Cardano-Api.html#v:selectAsset"},{"display_html":"valueFromList ∷ [(AssetId, Quantity)] → Value","name":"valueFromList","module":"Cardano.Api","link":"Cardano-Api.html#v:valueFromList"},{"display_html":"valueToList ∷ Value → [(AssetId, Quantity)]","name":"valueToList","module":"Cardano.Api","link":"Cardano-Api.html#v:valueToList"},{"display_html":"filterValue ∷ (AssetId → Bool) → Value → Value","name":"filterValue","module":"Cardano.Api","link":"Cardano-Api.html#v:filterValue"},{"display_html":"negateValue ∷ Value → Value","name":"negateValue","module":"Cardano.Api","link":"Cardano-Api.html#v:negateValue"},{"display_html":"newtype ValueNestedRep = ValueNestedRep [ValueNestedBundle]","name":"ValueNestedRep ValueNestedRep","module":"Cardano.Api","link":"Cardano-Api.html#t:ValueNestedRep"},{"display_html":"data ValueNestedBundle","name":"ValueNestedBundle ValueNestedBundle ValueNestedBundleAda","module":"Cardano.Api","link":"Cardano-Api.html#t:ValueNestedBundle"},{"display_html":"valueToNestedRep ∷ Value → ValueNestedRep","name":"valueToNestedRep","module":"Cardano.Api","link":"Cardano-Api.html#v:valueToNestedRep"},{"display_html":"valueFromNestedRep ∷ ValueNestedRep → Value","name":"valueFromNestedRep","module":"Cardano.Api","link":"Cardano-Api.html#v:valueFromNestedRep"},{"display_html":"quantityToLovelace ∷ Quantity → Lovelace","name":"quantityToLovelace","module":"Cardano.Api","link":"Cardano-Api.html#v:quantityToLovelace"},{"display_html":"lovelaceToQuantity ∷ Lovelace → Quantity","name":"lovelaceToQuantity","module":"Cardano.Api","link":"Cardano-Api.html#v:lovelaceToQuantity"},{"display_html":"selectLovelace ∷ Value → Lovelace","name":"selectLovelace","module":"Cardano.Api","link":"Cardano-Api.html#v:selectLovelace"},{"display_html":"lovelaceToValue ∷ Lovelace → Value","name":"lovelaceToValue","module":"Cardano.Api","link":"Cardano-Api.html#v:lovelaceToValue"},{"display_html":"valueToLovelace ∷ Value → Maybe Lovelace","name":"valueToLovelace","module":"Cardano.Api","link":"Cardano-Api.html#v:valueToLovelace"},{"display_html":"data Block era where","name":"Block Block","module":"Cardano.Api","link":"Cardano-Api.html#t:Block"},{"display_html":"data BlockHeader = BlockHeader !SlotNo !(Hash BlockHeader) !BlockNo","name":"BlockHeader BlockHeader","module":"Cardano.Api","link":"Cardano-Api.html#t:BlockHeader"},{"display_html":"data ChainPoint","name":"ChainPoint ChainPoint ChainPointAtGenesis","module":"Cardano.Api","link":"Cardano-Api.html#t:ChainPoint"},{"display_html":"newtype EpochNo = EpochNo {}","name":"EpochNo EpochNo unEpochNo","module":"Cardano.Api","link":"Cardano-Api.html#t:EpochNo"},{"display_html":"data ChainTip","name":"ChainTip ChainTip ChainTipAtGenesis","module":"Cardano.Api","link":"Cardano-Api.html#t:ChainTip"},{"display_html":"newtype BlockNo = BlockNo {}","name":"BlockNo BlockNo unBlockNo","module":"Cardano.Api","link":"Cardano-Api.html#t:BlockNo"},{"display_html":"chainTipToChainPoint ∷ ChainTip → ChainPoint","name":"chainTipToChainPoint","module":"Cardano.Api","link":"Cardano-Api.html#v:chainTipToChainPoint"},{"display_html":"data TxBody era where","name":"TxBody TxBody","module":"Cardano.Api","link":"Cardano-Api.html#t:TxBody"},{"display_html":"makeTransactionBody ∷ ∀ era. IsCardanoEra era ⇒ TxBodyContent BuildTx era → Either (TxBodyError era) (TxBody era)","name":"makeTransactionBody","module":"Cardano.Api","link":"Cardano-Api.html#v:makeTransactionBody"},{"display_html":"data TxBodyContent build era = TxBodyContent {}","name":"TxBodyContent TxBodyContent txMetadata txFee txIns txInsCollateral txOuts txValidityRange txAuxScripts txAuxScriptData txExtraKeyWits txProtocolParams txWithdrawals txCertificates txUpdateProposal txMintValue","module":"Cardano.Api","link":"Cardano-Api.html#t:TxBodyContent"},{"display_html":"data TxBodyError era","name":"TxBodyError TxBodyEmptyTxIns TxBodyEmptyTxInsCollateral TxBodyEmptyTxOuts TxBodyOutputNegative TxBodyOutputOverflow TxBodyMetadataError TxBodyMintAdaError TxBodyAuxDataHashInvalidError TxBodyMintBeforeMaryError TxBodyMissingProtocolParams","module":"Cardano.Api","link":"Cardano-Api.html#t:TxBodyError"},{"display_html":"newtype TxId = TxId (Hash StandardCrypto EraIndependentTxBody)","name":"TxId TxId","module":"Cardano.Api","link":"Cardano-Api.html#t:TxId"},{"display_html":"getTxId ∷ ∀ era. TxBody era → TxId","name":"getTxId","module":"Cardano.Api","link":"Cardano-Api.html#v:getTxId"},{"display_html":"data TxIn = TxIn TxId TxIx","name":"TxIn TxIn","module":"Cardano.Api","link":"Cardano-Api.html#t:TxIn"},{"display_html":"newtype TxIx = TxIx Word","name":"TxIx TxIx","module":"Cardano.Api","link":"Cardano-Api.html#t:TxIx"},{"display_html":"data TxOut era = TxOut (AddressInEra era) (TxOutValue era) (TxOutDatumHash era)","name":"TxOut TxOut","module":"Cardano.Api","link":"Cardano-Api.html#t:TxOut"},{"display_html":"data TxOutValue era where","name":"TxOutValue TxOutValue TxOutAdaOnly","module":"Cardano.Api","link":"Cardano-Api.html#t:TxOutValue"},{"display_html":"serialiseAddressForTxOut ∷ AddressInEra era → Text","name":"serialiseAddressForTxOut","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseAddressForTxOut"},{"display_html":"data TxOutDatumHash era where","name":"TxOutDatumHash TxOutDatumHash TxOutDatumHashNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxOutDatumHash"},{"display_html":"data TxInsCollateral era where","name":"TxInsCollateral TxInsCollateral TxInsCollateralNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxInsCollateral"},{"display_html":"data TxFee era where","name":"TxFee TxFeeImplicit TxFeeExplicit","module":"Cardano.Api","link":"Cardano-Api.html#t:TxFee"},{"display_html":"data TxValidityLowerBound era where","name":"TxValidityLowerBound TxValidityLowerBound TxValidityNoLowerBound","module":"Cardano.Api","link":"Cardano-Api.html#t:TxValidityLowerBound"},{"display_html":"data TxValidityUpperBound era where","name":"TxValidityUpperBound TxValidityUpperBound TxValidityNoUpperBound","module":"Cardano.Api","link":"Cardano-Api.html#t:TxValidityUpperBound"},{"display_html":"newtype SlotNo = SlotNo {}","name":"SlotNo SlotNo unSlotNo","module":"Cardano.Api","link":"Cardano-Api.html#t:SlotNo"},{"display_html":"newtype EpochSlots = EpochSlots {}","name":"EpochSlots EpochSlots unEpochSlots","module":"Cardano.Api","link":"Cardano-Api.html#t:EpochSlots"},{"display_html":"data TxMetadataInEra era where","name":"TxMetadataInEra TxMetadataInEra TxMetadataNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataInEra"},{"display_html":"data TxAuxScripts era where","name":"TxAuxScripts TxAuxScripts TxAuxScriptsNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxAuxScripts"},{"display_html":"data TxAuxScriptData era where","name":"TxAuxScriptData TxAuxScriptData TxAuxScriptDataNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxAuxScriptData"},{"display_html":"data TxExtraKeyWitnesses era where","name":"TxExtraKeyWitnesses TxExtraKeyWitnesses TxExtraKeyWitnessesNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxExtraKeyWitnesses"},{"display_html":"data TxWithdrawals build era where","name":"TxWithdrawals TxWithdrawals TxWithdrawalsNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxWithdrawals"},{"display_html":"data TxCertificates build era where","name":"TxCertificates TxCertificates TxCertificatesNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxCertificates"},{"display_html":"data TxUpdateProposal era where","name":"TxUpdateProposal TxUpdateProposal TxUpdateProposalNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxUpdateProposal"},{"display_html":"data TxMintValue build era where","name":"TxMintValue TxMintValue TxMintNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMintValue"},{"display_html":"data BuildTxWith build a where","name":"BuildTxWith BuildTxWith ViewTx","module":"Cardano.Api","link":"Cardano-Api.html#t:BuildTxWith"},{"display_html":"data BuildTx","name":"BuildTx","module":"Cardano.Api","link":"Cardano-Api.html#t:BuildTx"},{"display_html":"data ViewTx","name":"ViewTx","module":"Cardano.Api","link":"Cardano-Api.html#t:ViewTx"},{"display_html":"data CollateralSupportedInEra era where","name":"CollateralSupportedInEra CollateralInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:CollateralSupportedInEra"},{"display_html":"data MultiAssetSupportedInEra era where","name":"MultiAssetSupportedInEra MultiAssetInMaryEra MultiAssetInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:MultiAssetSupportedInEra"},{"display_html":"data OnlyAdaSupportedInEra era where","name":"OnlyAdaSupportedInEra AdaOnlyInByronEra AdaOnlyInShelleyEra AdaOnlyInAllegraEra","module":"Cardano.Api","link":"Cardano-Api.html#t:OnlyAdaSupportedInEra"},{"display_html":"data TxFeesExplicitInEra era where","name":"TxFeesExplicitInEra TxFeesExplicitInShelleyEra TxFeesExplicitInAllegraEra TxFeesExplicitInMaryEra TxFeesExplicitInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:TxFeesExplicitInEra"},{"display_html":"data TxFeesImplicitInEra era where","name":"TxFeesImplicitInEra TxFeesImplicitInByronEra","module":"Cardano.Api","link":"Cardano-Api.html#t:TxFeesImplicitInEra"},{"display_html":"data ValidityUpperBoundSupportedInEra era where","name":"ValidityUpperBoundSupportedInEra ValidityUpperBoundInShelleyEra ValidityUpperBoundInAllegraEra ValidityUpperBoundInMaryEra ValidityUpperBoundInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ValidityUpperBoundSupportedInEra"},{"display_html":"data ValidityNoUpperBoundSupportedInEra era where","name":"ValidityNoUpperBoundSupportedInEra ValidityNoUpperBoundInByronEra ValidityNoUpperBoundInAllegraEra ValidityNoUpperBoundInMaryEra ValidityNoUpperBoundInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ValidityNoUpperBoundSupportedInEra"},{"display_html":"data ValidityLowerBoundSupportedInEra era where","name":"ValidityLowerBoundSupportedInEra ValidityLowerBoundInAllegraEra ValidityLowerBoundInMaryEra ValidityLowerBoundInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ValidityLowerBoundSupportedInEra"},{"display_html":"data TxMetadataSupportedInEra era where","name":"TxMetadataSupportedInEra TxMetadataInShelleyEra TxMetadataInAllegraEra TxMetadataInMaryEra TxMetadataInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataSupportedInEra"},{"display_html":"data AuxScriptsSupportedInEra era where","name":"AuxScriptsSupportedInEra AuxScriptsInAllegraEra AuxScriptsInMaryEra AuxScriptsInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AuxScriptsSupportedInEra"},{"display_html":"data TxExtraKeyWitnessesSupportedInEra era where","name":"TxExtraKeyWitnessesSupportedInEra ExtraKeyWitnessesInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:TxExtraKeyWitnessesSupportedInEra"},{"display_html":"data ScriptDataSupportedInEra era where","name":"ScriptDataSupportedInEra ScriptDataInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDataSupportedInEra"},{"display_html":"data WithdrawalsSupportedInEra era where","name":"WithdrawalsSupportedInEra WithdrawalsInShelleyEra WithdrawalsInAllegraEra WithdrawalsInMaryEra WithdrawalsInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:WithdrawalsSupportedInEra"},{"display_html":"data CertificatesSupportedInEra era where","name":"CertificatesSupportedInEra CertificatesInShelleyEra CertificatesInAllegraEra CertificatesInMaryEra CertificatesInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:CertificatesSupportedInEra"},{"display_html":"data UpdateProposalSupportedInEra era where","name":"UpdateProposalSupportedInEra UpdateProposalInShelleyEra UpdateProposalInAllegraEra UpdateProposalInMaryEra UpdateProposalInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:UpdateProposalSupportedInEra"},{"display_html":"collateralSupportedInEra ∷ CardanoEra era → Maybe (CollateralSupportedInEra era)","name":"collateralSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:collateralSupportedInEra"},{"display_html":"multiAssetSupportedInEra ∷ CardanoEra era → Either (OnlyAdaSupportedInEra era) (MultiAssetSupportedInEra era)","name":"multiAssetSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:multiAssetSupportedInEra"},{"display_html":"txFeesExplicitInEra ∷ CardanoEra era → Either (TxFeesImplicitInEra era) (TxFeesExplicitInEra era)","name":"txFeesExplicitInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:txFeesExplicitInEra"},{"display_html":"validityUpperBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityUpperBoundSupportedInEra era)","name":"validityUpperBoundSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:validityUpperBoundSupportedInEra"},{"display_html":"validityNoUpperBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityNoUpperBoundSupportedInEra era)","name":"validityNoUpperBoundSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:validityNoUpperBoundSupportedInEra"},{"display_html":"validityLowerBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityLowerBoundSupportedInEra era)","name":"validityLowerBoundSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:validityLowerBoundSupportedInEra"},{"display_html":"txMetadataSupportedInEra ∷ CardanoEra era → Maybe (TxMetadataSupportedInEra era)","name":"txMetadataSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:txMetadataSupportedInEra"},{"display_html":"auxScriptsSupportedInEra ∷ CardanoEra era → Maybe (AuxScriptsSupportedInEra era)","name":"auxScriptsSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:auxScriptsSupportedInEra"},{"display_html":"extraKeyWitnessesSupportedInEra ∷ CardanoEra era → Maybe (TxExtraKeyWitnessesSupportedInEra era)","name":"extraKeyWitnessesSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:extraKeyWitnessesSupportedInEra"},{"display_html":"withdrawalsSupportedInEra ∷ CardanoEra era → Maybe (WithdrawalsSupportedInEra era)","name":"withdrawalsSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:withdrawalsSupportedInEra"},{"display_html":"certificatesSupportedInEra ∷ CardanoEra era → Maybe (CertificatesSupportedInEra era)","name":"certificatesSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:certificatesSupportedInEra"},{"display_html":"updateProposalSupportedInEra ∷ CardanoEra era → Maybe (UpdateProposalSupportedInEra era)","name":"updateProposalSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:updateProposalSupportedInEra"},{"display_html":"scriptDataSupportedInEra ∷ CardanoEra era → Maybe (ScriptDataSupportedInEra era)","name":"scriptDataSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptDataSupportedInEra"},{"display_html":"data Tx era where","name":"Tx Tx","module":"Cardano.Api","link":"Cardano-Api.html#t:Tx"},{"display_html":"getTxBody ∷ ∀ era. Tx era → TxBody era","name":"getTxBody","module":"Cardano.Api","link":"Cardano-Api.html#v:getTxBody"},{"display_html":"getTxWitnesses ∷ ∀ era. Tx era → [KeyWitness era]","name":"getTxWitnesses","module":"Cardano.Api","link":"Cardano-Api.html#v:getTxWitnesses"},{"display_html":"signByronTransaction ∷ NetworkId → TxBody ByronEra → [SigningKey ByronKey] → Tx ByronEra","name":"signByronTransaction","module":"Cardano.Api","link":"Cardano-Api.html#v:signByronTransaction"},{"display_html":"signShelleyTransaction ∷ IsShelleyBasedEra era ⇒ TxBody era → [ShelleyWitnessSigningKey] → Tx era","name":"signShelleyTransaction","module":"Cardano.Api","link":"Cardano-Api.html#v:signShelleyTransaction"},{"display_html":"makeSignedTransaction ∷ ∀ era. [KeyWitness era] → TxBody era → Tx era","name":"makeSignedTransaction","module":"Cardano.Api","link":"Cardano-Api.html#v:makeSignedTransaction"},{"display_html":"data KeyWitness era","name":"KeyWitness","module":"Cardano.Api","link":"Cardano-Api.html#t:KeyWitness"},{"display_html":"makeByronKeyWitness ∷ ∀ key. IsByronKey key ⇒ NetworkId → TxBody ByronEra → SigningKey key → KeyWitness ByronEra","name":"makeByronKeyWitness","module":"Cardano.Api","link":"Cardano-Api.html#v:makeByronKeyWitness"},{"display_html":"data ShelleyWitnessSigningKey","name":"ShelleyWitnessSigningKey WitnessPaymentKey WitnessPaymentExtendedKey WitnessStakeKey WitnessStakeExtendedKey WitnessStakePoolKey WitnessGenesisKey WitnessGenesisExtendedKey WitnessGenesisDelegateKey WitnessGenesisDelegateExtendedKey WitnessGenesisUTxOKey","module":"Cardano.Api","link":"Cardano-Api.html#t:ShelleyWitnessSigningKey"},{"display_html":"makeShelleyKeyWitness ∷ ∀ era. IsShelleyBasedEra era ⇒ TxBody era → ShelleyWitnessSigningKey → KeyWitness era","name":"makeShelleyKeyWitness","module":"Cardano.Api","link":"Cardano-Api.html#v:makeShelleyKeyWitness"},{"display_html":"makeShelleyBootstrapWitness ∷ ∀ era. IsShelleyBasedEra era ⇒ WitnessNetworkIdOrByronAddress → TxBody era → SigningKey ByronKey → KeyWitness era","name":"makeShelleyBootstrapWitness","module":"Cardano.Api","link":"Cardano-Api.html#v:makeShelleyBootstrapWitness"},{"display_html":"transactionFee ∷ ∀ era. IsShelleyBasedEra era ⇒ Natural → Natural → Tx era → Lovelace","name":"transactionFee","module":"Cardano.Api","link":"Cardano-Api.html#v:transactionFee"},{"display_html":"estimateTransactionFee ∷ ∀ era. IsShelleyBasedEra era ⇒ NetworkId → Natural → Natural → Tx era → Int → Int → Int → Int → Lovelace","name":"estimateTransactionFee","module":"Cardano.Api","link":"Cardano-Api.html#v:estimateTransactionFee"},{"display_html":"newtype TxMetadata = TxMetadata (Map Word64 TxMetadataValue)","name":"TxMetadata TxMetadata","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadata"},{"display_html":"data TxMetadataValue","name":"TxMetadataValue TxMetaNumber TxMetaBytes TxMetaText TxMetaList TxMetaMap","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataValue"},{"display_html":"makeTransactionMetadata ∷ Map Word64 TxMetadataValue → TxMetadata","name":"makeTransactionMetadata","module":"Cardano.Api","link":"Cardano-Api.html#v:makeTransactionMetadata"},{"display_html":"validateTxMetadata ∷ TxMetadata → Either [(Word64, TxMetadataRangeError)] ()","name":"validateTxMetadata","module":"Cardano.Api","link":"Cardano-Api.html#v:validateTxMetadata"},{"display_html":"data TxMetadataRangeError","name":"TxMetadataRangeError TxMetadataNumberOutOfRange TxMetadataBytesTooLong TxMetadataTextTooLong","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataRangeError"},{"display_html":"data TxMetadataJsonSchema","name":"TxMetadataJsonSchema TxMetadataJsonNoSchema TxMetadataJsonDetailedSchema","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataJsonSchema"},{"display_html":"metadataFromJson ∷ TxMetadataJsonSchema → Value → Either TxMetadataJsonError TxMetadata","name":"metadataFromJson","module":"Cardano.Api","link":"Cardano-Api.html#v:metadataFromJson"},{"display_html":"metadataToJson ∷ TxMetadataJsonSchema → TxMetadata → Value","name":"metadataToJson","module":"Cardano.Api","link":"Cardano-Api.html#v:metadataToJson"},{"display_html":"metadataValueToJsonNoSchema ∷ TxMetadataValue → Value","name":"metadataValueToJsonNoSchema","module":"Cardano.Api","link":"Cardano-Api.html#v:metadataValueToJsonNoSchema"},{"display_html":"data TxMetadataJsonError","name":"TxMetadataJsonError TxMetadataRangeError TxMetadataJsonSchemaError TxMetadataJsonToplevelNotMap TxMetadataJsonToplevelBadKey","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataJsonError"},{"display_html":"data TxMetadataJsonSchemaError","name":"TxMetadataJsonSchemaError TxMetadataJsonNullNotAllowed TxMetadataJsonBoolNotAllowed TxMetadataJsonNumberNotInteger TxMetadataJsonTypeMismatch TxMetadataJsonBadObject TxMetadataJsonNotObject TxMetadataJsonBadMapPair","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataJsonSchemaError"},{"display_html":"data Certificate","name":"Certificate","module":"Cardano.Api","link":"Cardano-Api.html#t:Certificate"},{"display_html":"makeStakeAddressRegistrationCertificate ∷ StakeCredential → Certificate","name":"makeStakeAddressRegistrationCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakeAddressRegistrationCertificate"},{"display_html":"makeStakeAddressDeregistrationCertificate ∷ StakeCredential → Certificate","name":"makeStakeAddressDeregistrationCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakeAddressDeregistrationCertificate"},{"display_html":"makeStakeAddressDelegationCertificate ∷ StakeCredential → PoolId → Certificate","name":"makeStakeAddressDelegationCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakeAddressDelegationCertificate"},{"display_html":"makeStakePoolRegistrationCertificate ∷ StakePoolParameters → Certificate","name":"makeStakePoolRegistrationCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakePoolRegistrationCertificate"},{"display_html":"makeStakePoolRetirementCertificate ∷ PoolId → EpochNo → Certificate","name":"makeStakePoolRetirementCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakePoolRetirementCertificate"},{"display_html":"data StakePoolParameters","name":"StakePoolParameters","module":"Cardano.Api","link":"Cardano-Api.html#t:StakePoolParameters"},{"display_html":"data StakePoolRelay","name":"StakePoolRelay","module":"Cardano.Api","link":"Cardano-Api.html#t:StakePoolRelay"},{"display_html":"data StakePoolMetadataReference","name":"StakePoolMetadataReference","module":"Cardano.Api","link":"Cardano-Api.html#t:StakePoolMetadataReference"},{"display_html":"data StakePoolMetadata","name":"StakePoolMetadata","module":"Cardano.Api","link":"Cardano-Api.html#t:StakePoolMetadata"},{"display_html":"validateAndHashStakePoolMetadata ∷ ByteString → Either StakePoolMetadataValidationError (StakePoolMetadata, Hash StakePoolMetadata)","name":"validateAndHashStakePoolMetadata","module":"Cardano.Api","link":"Cardano-Api.html#v:validateAndHashStakePoolMetadata"},{"display_html":"data StakePoolMetadataValidationError","name":"StakePoolMetadataValidationError","module":"Cardano.Api","link":"Cardano-Api.html#t:StakePoolMetadataValidationError"},{"display_html":"data SimpleScriptV1","name":"SimpleScriptV1","module":"Cardano.Api","link":"Cardano-Api.html#t:SimpleScriptV1"},{"display_html":"data SimpleScriptV2","name":"SimpleScriptV2","module":"Cardano.Api","link":"Cardano-Api.html#t:SimpleScriptV2"},{"display_html":"data ScriptLanguage lang where","name":"ScriptLanguage SimpleScriptLanguage PlutusScriptLanguage","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptLanguage"},{"display_html":"data SimpleScriptVersion lang where","name":"SimpleScriptVersion SimpleScriptV1 SimpleScriptV2","module":"Cardano.Api","link":"Cardano-Api.html#t:SimpleScriptVersion"},{"display_html":"data PlutusScriptVersion lang where","name":"PlutusScriptVersion PlutusScriptV1","module":"Cardano.Api","link":"Cardano-Api.html#t:PlutusScriptVersion"},{"display_html":"data AnyScriptLanguage where","name":"AnyScriptLanguage AnyScriptLanguage","module":"Cardano.Api","link":"Cardano-Api.html#t:AnyScriptLanguage"},{"display_html":"class HasTypeProxy lang ⇒ IsScriptLanguage lang where","name":"IsScriptLanguage scriptLanguage","module":"Cardano.Api","link":"Cardano-Api.html#t:IsScriptLanguage"},{"display_html":"class IsScriptLanguage lang ⇒ IsSimpleScriptLanguage lang where","name":"IsSimpleScriptLanguage simpleScriptVersion","module":"Cardano.Api","link":"Cardano-Api.html#t:IsSimpleScriptLanguage"},{"display_html":"data Script lang where","name":"Script SimpleScript PlutusScript","module":"Cardano.Api","link":"Cardano-Api.html#t:Script"},{"display_html":"data ScriptInAnyLang where","name":"ScriptInAnyLang ScriptInAnyLang","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptInAnyLang"},{"display_html":"toScriptInAnyLang ∷ Script lang → ScriptInAnyLang","name":"toScriptInAnyLang","module":"Cardano.Api","link":"Cardano-Api.html#v:toScriptInAnyLang"},{"display_html":"data ScriptInEra era where","name":"ScriptInEra ScriptInEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptInEra"},{"display_html":"toScriptInEra ∷ CardanoEra era → ScriptInAnyLang → Maybe (ScriptInEra era)","name":"toScriptInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:toScriptInEra"},{"display_html":"eraOfScriptInEra ∷ ScriptInEra era → ShelleyBasedEra era","name":"eraOfScriptInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:eraOfScriptInEra"},{"display_html":"data WitCtxTxIn","name":"WitCtxTxIn","module":"Cardano.Api","link":"Cardano-Api.html#t:WitCtxTxIn"},{"display_html":"data WitCtxMint","name":"WitCtxMint","module":"Cardano.Api","link":"Cardano-Api.html#t:WitCtxMint"},{"display_html":"data WitCtxStake","name":"WitCtxStake","module":"Cardano.Api","link":"Cardano-Api.html#t:WitCtxStake"},{"display_html":"data WitCtx witctx where","name":"WitCtx WitCtxTxIn WitCtxMint WitCtxStake","module":"Cardano.Api","link":"Cardano-Api.html#t:WitCtx"},{"display_html":"data ScriptWitness witctx era where","name":"ScriptWitness SimpleScriptWitness PlutusScriptWitness","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptWitness"},{"display_html":"data Witness witctx era where","name":"Witness KeyWitness ScriptWitness","module":"Cardano.Api","link":"Cardano-Api.html#t:Witness"},{"display_html":"data KeyWitnessInCtx witctx where","name":"KeyWitnessInCtx KeyWitnessForSpending KeyWitnessForStakeAddr","module":"Cardano.Api","link":"Cardano-Api.html#t:KeyWitnessInCtx"},{"display_html":"data ScriptWitnessInCtx witctx where","name":"ScriptWitnessInCtx ScriptWitnessForSpending ScriptWitnessForMinting ScriptWitnessForStakeAddr","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptWitnessInCtx"},{"display_html":"data ScriptDatum witctx where","name":"ScriptDatum ScriptDatumForTxIn NoScriptDatumForMint NoScriptDatumForStake","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDatum"},{"display_html":"type ScriptRedeemer = ScriptData","name":"ScriptRedeemer","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptRedeemer"},{"display_html":"scriptWitnessScript ∷ ScriptWitness witctx era → ScriptInEra era","name":"scriptWitnessScript","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptWitnessScript"},{"display_html":"data ScriptLanguageInEra lang era where","name":"ScriptLanguageInEra SimpleScriptV1InShelley SimpleScriptV1InAllegra SimpleScriptV1InMary SimpleScriptV1InAlonzo SimpleScriptV2InAllegra SimpleScriptV2InMary SimpleScriptV2InAlonzo PlutusScriptV1InAlonzo","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptLanguageInEra"},{"display_html":"scriptLanguageSupportedInEra ∷ CardanoEra era → ScriptLanguage lang → Maybe (ScriptLanguageInEra lang era)","name":"scriptLanguageSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptLanguageSupportedInEra"},{"display_html":"languageOfScriptLanguageInEra ∷ ScriptLanguageInEra lang era → ScriptLanguage lang","name":"languageOfScriptLanguageInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:languageOfScriptLanguageInEra"},{"display_html":"eraOfScriptLanguageInEra ∷ ScriptLanguageInEra lang era → ShelleyBasedEra era","name":"eraOfScriptLanguageInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:eraOfScriptLanguageInEra"},{"display_html":"data SimpleScript lang where","name":"SimpleScript RequireAllOf RequireAnyOf RequireMOf RequireSignature RequireTimeBefore RequireTimeAfter","module":"Cardano.Api","link":"Cardano-Api.html#t:SimpleScript"},{"display_html":"data TimeLocksSupported lang where","name":"TimeLocksSupported TimeLocksInSimpleScriptV2","module":"Cardano.Api","link":"Cardano-Api.html#t:TimeLocksSupported"},{"display_html":"timeLocksSupported ∷ SimpleScriptVersion lang → Maybe (TimeLocksSupported lang)","name":"timeLocksSupported","module":"Cardano.Api","link":"Cardano-Api.html#v:timeLocksSupported"},{"display_html":"adjustSimpleScriptVersion ∷ SimpleScriptVersion lang' → SimpleScript lang → Maybe (SimpleScript lang')","name":"adjustSimpleScriptVersion","module":"Cardano.Api","link":"Cardano-Api.html#v:adjustSimpleScriptVersion"},{"display_html":"data PlutusScript lang","name":"PlutusScript","module":"Cardano.Api","link":"Cardano-Api.html#t:PlutusScript"},{"display_html":"examplePlutusScriptAlwaysSucceeds ∷ WitCtx witctx → PlutusScript PlutusScriptV1","name":"examplePlutusScriptAlwaysSucceeds","module":"Cardano.Api","link":"Cardano-Api.html#v:examplePlutusScriptAlwaysSucceeds"},{"display_html":"examplePlutusScriptAlwaysFails ∷ WitCtx witctx → PlutusScript PlutusScriptV1","name":"examplePlutusScriptAlwaysFails","module":"Cardano.Api","link":"Cardano-Api.html#v:examplePlutusScriptAlwaysFails"},{"display_html":"data ScriptData","name":"ScriptData ScriptDataConstructor ScriptDataMap ScriptDataList ScriptDataNumber ScriptDataBytes","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptData"},{"display_html":"data ScriptDataRangeError","name":"ScriptDataRangeError ScriptDataNumberOutOfRange ScriptDataBytesTooLong ScriptDataConstructorOutOfRange","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDataRangeError"},{"display_html":"validateScriptData ∷ ScriptData → Either ScriptDataRangeError ()","name":"validateScriptData","module":"Cardano.Api","link":"Cardano-Api.html#v:validateScriptData"},{"display_html":"data ScriptDataJsonSchema","name":"ScriptDataJsonSchema ScriptDataJsonNoSchema ScriptDataJsonDetailedSchema","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDataJsonSchema"},{"display_html":"scriptDataFromJson ∷ ScriptDataJsonSchema → Value → Either ScriptDataJsonError ScriptData","name":"scriptDataFromJson","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptDataFromJson"},{"display_html":"scriptDataToJson ∷ ScriptDataJsonSchema → ScriptData → Value","name":"scriptDataToJson","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptDataToJson"},{"display_html":"data ScriptDataJsonError","name":"ScriptDataJsonError ScriptDataRangeError ScriptDataJsonSchemaError","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDataJsonError"},{"display_html":"data ScriptDataJsonSchemaError","name":"ScriptDataJsonSchemaError ScriptDataJsonNullNotAllowed ScriptDataJsonBoolNotAllowed ScriptDataJsonNumberNotInteger ScriptDataJsonTypeMismatch ScriptDataJsonBadObject ScriptDataJsonNotObject ScriptDataJsonBadMapPair","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDataJsonSchemaError"},{"display_html":"data ExecutionUnits = ExecutionUnits {}","name":"ExecutionUnits ExecutionUnits executionSteps executionMemory","module":"Cardano.Api","link":"Cardano-Api.html#t:ExecutionUnits"},{"display_html":"data ScriptHash","name":"ScriptHash","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptHash"},{"display_html":"hashScript ∷ Script lang → ScriptHash","name":"hashScript","module":"Cardano.Api","link":"Cardano-Api.html#v:hashScript"},{"display_html":"class HasTypeProxy a ⇒ SerialiseAsCBOR a","name":"SerialiseAsCBOR","module":"Cardano.Api","link":"Cardano-Api.html#t:SerialiseAsCBOR"},{"display_html":"class Typeable a ⇒ ToCBOR a","name":"ToCBOR","module":"Cardano.Api","link":"Cardano-Api.html#t:ToCBOR"},{"display_html":"class Typeable a ⇒ FromCBOR a","name":"FromCBOR","module":"Cardano.Api","link":"Cardano-Api.html#t:FromCBOR"},{"display_html":"serialiseToCBOR ∷ SerialiseAsCBOR a ⇒ a → ByteString","name":"serialiseToCBOR","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToCBOR"},{"display_html":"deserialiseFromCBOR ∷ SerialiseAsCBOR a ⇒ AsType a → ByteString → Either DecoderError a","name":"deserialiseFromCBOR","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromCBOR"},{"display_html":"class ToJSON a","name":"ToJSON","module":"Cardano.Api","link":"Cardano-Api.html#t:ToJSON"},{"display_html":"class FromJSON a","name":"FromJSON","module":"Cardano.Api","link":"Cardano-Api.html#t:FromJSON"},{"display_html":"serialiseToJSON ∷ ToJSON a ⇒ a → ByteString","name":"serialiseToJSON","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToJSON"},{"display_html":"deserialiseFromJSON ∷ FromJSON a ⇒ AsType a → ByteString → Either JsonDecodeError a","name":"deserialiseFromJSON","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromJSON"},{"display_html":"newtype JsonDecodeError = JsonDecodeError String","name":"JsonDecodeError JsonDecodeError","module":"Cardano.Api","link":"Cardano-Api.html#t:JsonDecodeError"},{"display_html":"readFileJSON ∷ FromJSON a ⇒ AsType a → FilePath → IO (Either (FileError JsonDecodeError) a)","name":"readFileJSON","module":"Cardano.Api","link":"Cardano-Api.html#v:readFileJSON"},{"display_html":"writeFileJSON ∷ ToJSON a ⇒ FilePath → a → IO (Either (FileError ()) ())","name":"writeFileJSON","module":"Cardano.Api","link":"Cardano-Api.html#v:writeFileJSON"},{"display_html":"prettyPrintJSON ∷ ToJSON a ⇒ a → ByteString","name":"prettyPrintJSON","module":"Cardano.Api","link":"Cardano-Api.html#v:prettyPrintJSON"},{"display_html":"class (HasTypeProxy a, SerialiseAsRawBytes a) ⇒ SerialiseAsBech32 a","name":"SerialiseAsBech32","module":"Cardano.Api","link":"Cardano-Api.html#t:SerialiseAsBech32"},{"display_html":"serialiseToBech32 ∷ SerialiseAsBech32 a ⇒ a → Text","name":"serialiseToBech32","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToBech32"},{"display_html":"deserialiseFromBech32 ∷ SerialiseAsBech32 a ⇒ AsType a → Text → Either Bech32DecodeError a","name":"deserialiseFromBech32","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromBech32"},{"display_html":"deserialiseAnyOfFromBech32 ∷ ∀ b. [FromSomeType SerialiseAsBech32 b] → Text → Either Bech32DecodeError b","name":"deserialiseAnyOfFromBech32","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseAnyOfFromBech32"},{"display_html":"data Bech32DecodeError","name":"Bech32DecodeError Bech32DecodingError Bech32UnexpectedPrefix Bech32DataPartToBytesError Bech32DeserialiseFromBytesError Bech32WrongPrefix","module":"Cardano.Api","link":"Cardano-Api.html#t:Bech32DecodeError"},{"display_html":"class HasTypeProxy addr ⇒ SerialiseAddress addr","name":"SerialiseAddress","module":"Cardano.Api","link":"Cardano-Api.html#t:SerialiseAddress"},{"display_html":"serialiseAddress ∷ SerialiseAddress addr ⇒ addr → Text","name":"serialiseAddress","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseAddress"},{"display_html":"deserialiseAddress ∷ SerialiseAddress addr ⇒ AsType addr → Text → Maybe addr","name":"deserialiseAddress","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseAddress"},{"display_html":"class HasTypeProxy a ⇒ SerialiseAsRawBytes a","name":"SerialiseAsRawBytes","module":"Cardano.Api","link":"Cardano-Api.html#t:SerialiseAsRawBytes"},{"display_html":"serialiseToRawBytes ∷ SerialiseAsRawBytes a ⇒ a → ByteString","name":"serialiseToRawBytes","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToRawBytes"},{"display_html":"deserialiseFromRawBytes ∷ SerialiseAsRawBytes a ⇒ AsType a → ByteString → Maybe a","name":"deserialiseFromRawBytes","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromRawBytes"},{"display_html":"serialiseToRawBytesHex ∷ SerialiseAsRawBytes a ⇒ a → ByteString","name":"serialiseToRawBytesHex","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToRawBytesHex"},{"display_html":"deserialiseFromRawBytesHex ∷ SerialiseAsRawBytes a ⇒ AsType a → ByteString → Maybe a","name":"deserialiseFromRawBytesHex","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromRawBytesHex"},{"display_html":"serialiseToRawBytesHexText ∷ SerialiseAsRawBytes a ⇒ a → Text","name":"serialiseToRawBytesHexText","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToRawBytesHexText"},{"display_html":"class SerialiseAsCBOR a ⇒ HasTextEnvelope a where","name":"HasTextEnvelope textEnvelopeType textEnvelopeDefaultDescr","module":"Cardano.Api","link":"Cardano-Api.html#t:HasTextEnvelope"},{"display_html":"data TextEnvelope = TextEnvelope {}","name":"TextEnvelope TextEnvelope teType teDescription teRawCBOR","module":"Cardano.Api","link":"Cardano-Api.html#t:TextEnvelope"},{"display_html":"newtype TextEnvelopeType = TextEnvelopeType String","name":"TextEnvelopeType TextEnvelopeType","module":"Cardano.Api","link":"Cardano-Api.html#t:TextEnvelopeType"},{"display_html":"data TextEnvelopeDescr","name":"TextEnvelopeDescr","module":"Cardano.Api","link":"Cardano-Api.html#t:TextEnvelopeDescr"},{"display_html":"data TextEnvelopeError","name":"TextEnvelopeError TextEnvelopeTypeError TextEnvelopeDecodeError TextEnvelopeAesonDecodeError","module":"Cardano.Api","link":"Cardano-Api.html#t:TextEnvelopeError"},{"display_html":"textEnvelopeRawCBOR ∷ TextEnvelope → ByteString","name":"textEnvelopeRawCBOR","module":"Cardano.Api","link":"Cardano-Api.html#v:textEnvelopeRawCBOR"},{"display_html":"serialiseToTextEnvelope ∷ ∀ a. HasTextEnvelope a ⇒ Maybe TextEnvelopeDescr → a → TextEnvelope","name":"serialiseToTextEnvelope","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToTextEnvelope"},{"display_html":"deserialiseFromTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → TextEnvelope → Either TextEnvelopeError a","name":"deserialiseFromTextEnvelope","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromTextEnvelope"},{"display_html":"readFileTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → FilePath → IO (Either (FileError TextEnvelopeError) a)","name":"readFileTextEnvelope","module":"Cardano.Api","link":"Cardano-Api.html#v:readFileTextEnvelope"},{"display_html":"writeFileTextEnvelope ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ())","name":"writeFileTextEnvelope","module":"Cardano.Api","link":"Cardano-Api.html#v:writeFileTextEnvelope"},{"display_html":"writeFileTextEnvelopeWithOwnerPermissions ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ())","name":"writeFileTextEnvelopeWithOwnerPermissions","module":"Cardano.Api","link":"Cardano-Api.html#v:writeFileTextEnvelopeWithOwnerPermissions"},{"display_html":"readTextEnvelopeFromFile ∷ FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope)","name":"readTextEnvelopeFromFile","module":"Cardano.Api","link":"Cardano-Api.html#v:readTextEnvelopeFromFile"},{"display_html":"readTextEnvelopeOfTypeFromFile ∷ TextEnvelopeType → FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope)","name":"readTextEnvelopeOfTypeFromFile","module":"Cardano.Api","link":"Cardano-Api.html#v:readTextEnvelopeOfTypeFromFile"},{"display_html":"data FromSomeType (c ∷ Type → Constraint) b where","name":"FromSomeType FromSomeType","module":"Cardano.Api","link":"Cardano-Api.html#t:FromSomeType"},{"display_html":"deserialiseFromTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → TextEnvelope → Either TextEnvelopeError b","name":"deserialiseFromTextEnvelopeAnyOf","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromTextEnvelopeAnyOf"},{"display_html":"readFileTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → FilePath → IO (Either (FileError TextEnvelopeError) b)","name":"readFileTextEnvelopeAnyOf","module":"Cardano.Api","link":"Cardano-Api.html#v:readFileTextEnvelopeAnyOf"},{"display_html":"class Show e ⇒ Error e where","name":"Error displayError","module":"Cardano.Api","link":"Cardano-Api.html#t:Error"},{"display_html":"throwErrorAsException ∷ Error e ⇒ e → IO a","name":"throwErrorAsException","module":"Cardano.Api","link":"Cardano-Api.html#v:throwErrorAsException"},{"display_html":"data FileError e","name":"FileError FileError FileErrorTempFile FileIOError","module":"Cardano.Api","link":"Cardano-Api.html#t:FileError"},{"display_html":"data Env = Env {}","name":"Env Env envLedgerConfig envProtocolConfig","module":"Cardano.Api","link":"Cardano-Api.html#t:Env"},{"display_html":"envSecurityParam ∷ Env → Word64","name":"envSecurityParam","module":"Cardano.Api","link":"Cardano-Api.html#v:envSecurityParam"},{"display_html":"newtype LedgerState where","name":"LedgerState LedgerState LedgerStateByron LedgerStateShelley LedgerStateAllegra LedgerStateMary clsState","module":"Cardano.Api","link":"Cardano-Api.html#t:LedgerState"},{"display_html":"initialLedgerState ∷ FilePath → ExceptT InitialLedgerStateError IO (Env, LedgerState)","name":"initialLedgerState","module":"Cardano.Api","link":"Cardano-Api.html#v:initialLedgerState"},{"display_html":"applyBlock ∷ Env → LedgerState → Bool → Block era → Either Text LedgerState","name":"applyBlock","module":"Cardano.Api","link":"Cardano-Api.html#v:applyBlock"},{"display_html":"foldBlocks ∷ ∀ a. FilePath → FilePath → NetworkId → Bool → a → (Env → LedgerState → BlockInMode CardanoMode → a → IO a) → ExceptT FoldBlocksError IO a","name":"foldBlocks","module":"Cardano.Api","link":"Cardano-Api.html#v:foldBlocks"},{"display_html":"data FoldBlocksError","name":"FoldBlocksError FoldBlocksInitialLedgerStateError FoldBlocksApplyBlockError","module":"Cardano.Api","link":"Cardano-Api.html#t:FoldBlocksError"},{"display_html":"data GenesisConfigError","name":"GenesisConfigError NECardanoConfig NEError NEByronConfig NEShelleyConfig","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisConfigError"},{"display_html":"data InitialLedgerStateError","name":"InitialLedgerStateError ILSEConfigFile ILSEGenesisFile ILSELedgerConsensusConfig","module":"Cardano.Api","link":"Cardano-Api.html#t:InitialLedgerStateError"},{"display_html":"renderFoldBlocksError ∷ FoldBlocksError → Text","name":"renderFoldBlocksError","module":"Cardano.Api","link":"Cardano-Api.html#v:renderFoldBlocksError"},{"display_html":"renderGenesisConfigError ∷ GenesisConfigError → Text","name":"renderGenesisConfigError","module":"Cardano.Api","link":"Cardano-Api.html#v:renderGenesisConfigError"},{"display_html":"renderInitialLedgerStateError ∷ InitialLedgerStateError → Text","name":"renderInitialLedgerStateError","module":"Cardano.Api","link":"Cardano-Api.html#v:renderInitialLedgerStateError"},{"display_html":"connectToLocalNode ∷ LocalNodeConnectInfo mode → LocalNodeClientProtocolsInMode mode → IO ()","name":"connectToLocalNode","module":"Cardano.Api","link":"Cardano-Api.html#v:connectToLocalNode"},{"display_html":"data LocalNodeConnectInfo mode = LocalNodeConnectInfo {}","name":"LocalNodeConnectInfo LocalNodeConnectInfo localConsensusModeParams localNodeNetworkId localNodeSocketPath","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalNodeConnectInfo"},{"display_html":"data AnyConsensusMode where","name":"AnyConsensusMode AnyConsensusMode","module":"Cardano.Api","link":"Cardano-Api.html#t:AnyConsensusMode"},{"display_html":"renderMode ∷ AnyConsensusMode → Text","name":"renderMode","module":"Cardano.Api","link":"Cardano-Api.html#v:renderMode"},{"display_html":"data ConsensusMode mode where","name":"ConsensusMode CardanoMode","module":"Cardano.Api","link":"Cardano-Api.html#t:ConsensusMode"},{"display_html":"consensusModeOnly ∷ ConsensusModeParams mode → ConsensusMode mode","name":"consensusModeOnly","module":"Cardano.Api","link":"Cardano-Api.html#v:consensusModeOnly"},{"display_html":"data ConsensusModeIsMultiEra mode where","name":"ConsensusModeIsMultiEra CardanoModeIsMultiEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ConsensusModeIsMultiEra"},{"display_html":"data AnyConsensusModeParams where","name":"AnyConsensusModeParams AnyConsensusModeParams","module":"Cardano.Api","link":"Cardano-Api.html#t:AnyConsensusModeParams"},{"display_html":"data ConsensusModeParams mode where","name":"ConsensusModeParams CardanoModeParams ByronModeParams ShelleyModeParams","module":"Cardano.Api","link":"Cardano-Api.html#t:ConsensusModeParams"},{"display_html":"data EraInMode era mode where","name":"EraInMode ByronEraInByronMode ShelleyEraInShelleyMode ByronEraInCardanoMode ShelleyEraInCardanoMode AllegraEraInCardanoMode MaryEraInCardanoMode AlonzoEraInCardanoMode","module":"Cardano.Api","link":"Cardano-Api.html#t:EraInMode"},{"display_html":"toEraInMode ∷ CardanoEra era → ConsensusMode mode → Maybe (EraInMode era mode)","name":"toEraInMode","module":"Cardano.Api","link":"Cardano-Api.html#v:toEraInMode"},{"display_html":"data LocalNodeClientProtocols block point tip tx txerr query m = LocalNodeClientProtocols {}","name":"LocalNodeClientProtocols LocalNodeClientProtocols localChainSyncClient localTxSubmissionClient localStateQueryClient","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalNodeClientProtocols"},{"display_html":"data LocalChainSyncClient block point tip m","name":"LocalChainSyncClient LocalChainSyncClient LocalChainSyncClientPipelined NoLocalChainSyncClient","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalChainSyncClient"},{"display_html":"data CardanoMode","name":"CardanoMode","module":"Cardano.Api","link":"Cardano-Api.html#t:CardanoMode"},{"display_html":"newtype ChainSyncClient header point tip (m ∷ Type → Type) a = ChainSyncClient {}","name":"ChainSyncClient ChainSyncClient runChainSyncClient","module":"Cardano.Api","link":"Cardano-Api.html#t:ChainSyncClient"},{"display_html":"newtype ChainSyncClientPipelined header point tip (m ∷ Type → Type) a = ChainSyncClientPipelined {}","name":"ChainSyncClientPipelined ChainSyncClientPipelined runChainSyncClientPipelined","module":"Cardano.Api","link":"Cardano-Api.html#t:ChainSyncClientPipelined"},{"display_html":"data BlockInMode mode where","name":"BlockInMode BlockInMode","module":"Cardano.Api","link":"Cardano-Api.html#t:BlockInMode"},{"display_html":"type LocalNodeClientProtocolsInMode mode = LocalNodeClientProtocols (BlockInMode mode) ChainPoint ChainTip (TxInMode mode) (TxValidationErrorInMode mode) (QueryInMode mode) IO","name":"LocalNodeClientProtocolsInMode","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalNodeClientProtocolsInMode"},{"display_html":"data LocalTxSubmissionClient tx reject (m ∷ Type → Type) a","name":"LocalTxSubmissionClient","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalTxSubmissionClient"},{"display_html":"data TxInMode mode where","name":"TxInMode TxInMode TxInByronSpecial","module":"Cardano.Api","link":"Cardano-Api.html#t:TxInMode"},{"display_html":"data TxValidationErrorInMode mode where","name":"TxValidationErrorInMode TxValidationErrorInMode TxValidationEraMismatch","module":"Cardano.Api","link":"Cardano-Api.html#t:TxValidationErrorInMode"},{"display_html":"runLocalTxSubmissionClient ∷ LocalTxSubmissionClient tx reject m a → m (LocalTxClientStIdle tx reject m a)","name":"runLocalTxSubmissionClient","module":"Cardano.Api","link":"Cardano-Api.html#v:runLocalTxSubmissionClient"},{"display_html":"submitTxToNodeLocal ∷ ∀ mode. LocalNodeConnectInfo mode → TxInMode mode → IO (SubmitResult (TxValidationErrorInMode mode))","name":"submitTxToNodeLocal","module":"Cardano.Api","link":"Cardano-Api.html#v:submitTxToNodeLocal"},{"display_html":"newtype LocalStateQueryClient block point (query ∷ Type → Type) (m ∷ Type → Type) a = LocalStateQueryClient {}","name":"LocalStateQueryClient LocalStateQueryClient runLocalStateQueryClient","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalStateQueryClient"},{"display_html":"data QueryInMode mode result where","name":"QueryInMode QueryInEra QueryCurrentEra QueryEraHistory","module":"Cardano.Api","link":"Cardano-Api.html#t:QueryInMode"},{"display_html":"data QueryInEra era result where","name":"QueryInEra QueryInShelleyBasedEra QueryByronUpdateState","module":"Cardano.Api","link":"Cardano-Api.html#t:QueryInEra"},{"display_html":"data QueryInShelleyBasedEra era result where","name":"QueryInShelleyBasedEra QueryChainPoint QueryEpoch QueryGenesisParameters QueryProtocolParameters QueryProtocolParametersUpdate QueryStakeDistribution QueryUTxO QueryStakeAddresses QueryDebugLedgerState QueryProtocolState","module":"Cardano.Api","link":"Cardano-Api.html#t:QueryInShelleyBasedEra"},{"display_html":"queryNodeLocalState ∷ ∀ mode result. LocalNodeConnectInfo mode → Maybe ChainPoint → QueryInMode mode result → IO (Either AcquireFailure result)","name":"queryNodeLocalState","module":"Cardano.Api","link":"Cardano-Api.html#v:queryNodeLocalState"},{"display_html":"getLocalChainTip ∷ LocalNodeConnectInfo mode → IO ChainTip","name":"getLocalChainTip","module":"Cardano.Api","link":"Cardano-Api.html#v:getLocalChainTip"},{"display_html":"data OperationalCertificate","name":"OperationalCertificate","module":"Cardano.Api","link":"Cardano-Api.html#t:OperationalCertificate"},{"display_html":"data OperationalCertificateIssueCounter","name":"OperationalCertificateIssueCounter","module":"Cardano.Api","link":"Cardano-Api.html#t:OperationalCertificateIssueCounter"},{"display_html":"data OperationalCertIssueError","name":"OperationalCertIssueError","module":"Cardano.Api","link":"Cardano-Api.html#t:OperationalCertIssueError"},{"display_html":"issueOperationalCertificate ∷ VerificationKey KesKey → Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) → KESPeriod → OperationalCertificateIssueCounter → Either OperationalCertIssueError (OperationalCertificate, OperationalCertificateIssueCounter)","name":"issueOperationalCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:issueOperationalCertificate"},{"display_html":"data GenesisKey","name":"GenesisKey","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisKey"},{"display_html":"data GenesisExtendedKey","name":"GenesisExtendedKey","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisExtendedKey"},{"display_html":"data GenesisDelegateKey","name":"GenesisDelegateKey","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisDelegateKey"},{"display_html":"data GenesisDelegateExtendedKey","name":"GenesisDelegateExtendedKey","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisDelegateExtendedKey"},{"display_html":"data GenesisUTxOKey","name":"GenesisUTxOKey","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisUTxOKey"},{"display_html":"genesisUTxOPseudoTxIn ∷ NetworkId → Hash GenesisUTxOKey → TxIn","name":"genesisUTxOPseudoTxIn","module":"Cardano.Api","link":"Cardano-Api.html#v:genesisUTxOPseudoTxIn"},{"display_html":"data GenesisParameters = GenesisParameters {}","name":"GenesisParameters GenesisParameters protocolParamSystemStart protocolParamNetworkId protocolParamActiveSlotsCoefficient protocolParamSecurity protocolParamEpochLength protocolParamSlotLength protocolParamSlotsPerKESPeriod protocolParamMaxKESEvolutions protocolParamUpdateQuorum protocolParamMaxLovelaceSupply protocolInitialUpdateableProtocolParameters","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisParameters"},{"display_html":"makeMIRCertificate ∷ MIRPot → MIRTarget → Certificate","name":"makeMIRCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeMIRCertificate"},{"display_html":"makeGenesisKeyDelegationCertificate ∷ Hash GenesisKey → Hash GenesisDelegateKey → Hash VrfKey → Certificate","name":"makeGenesisKeyDelegationCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeGenesisKeyDelegationCertificate"},{"display_html":"data MIRTarget","name":"MIRTarget StakeAddressesMIR SendToReservesMIR SendToTreasuryMIR","module":"Cardano.Api","link":"Cardano-Api.html#t:MIRTarget"},{"display_html":"data UpdateProposal = UpdateProposal !(Map (Hash GenesisKey) ProtocolParametersUpdate) !EpochNo","name":"UpdateProposal UpdateProposal","module":"Cardano.Api","link":"Cardano-Api.html#t:UpdateProposal"},{"display_html":"data ProtocolParametersUpdate = ProtocolParametersUpdate {}","name":"ProtocolParametersUpdate ProtocolParametersUpdate protocolUpdateProtocolVersion protocolUpdateDecentralization protocolUpdateExtraPraosEntropy protocolUpdateMaxBlockHeaderSize protocolUpdateMaxBlockBodySize protocolUpdateMaxTxSize protocolUpdateTxFeeFixed protocolUpdateTxFeePerByte protocolUpdateMinUTxOValue protocolUpdateStakeAddressDeposit protocolUpdateStakePoolDeposit protocolUpdateMinPoolCost protocolUpdatePoolRetireMaxEpoch protocolUpdateStakePoolTargetNum protocolUpdatePoolPledgeInfluence protocolUpdateMonetaryExpansion protocolUpdateTreasuryCut protocolUpdateUTxOCostPerWord protocolUpdateCostModels protocolUpdatePrices protocolUpdateMaxTxExUnits protocolUpdateMaxBlockExUnits protocolUpdateMaxValueSize protocolUpdateCollateralPercent protocolUpdateMaxCollateralInputs","module":"Cardano.Api","link":"Cardano-Api.html#t:ProtocolParametersUpdate"},{"display_html":"makeShelleyUpdateProposal ∷ ProtocolParametersUpdate → [Hash GenesisKey] → EpochNo → UpdateProposal","name":"makeShelleyUpdateProposal","module":"Cardano.Api","link":"Cardano-Api.html#v:makeShelleyUpdateProposal"},{"display_html":"data PraosNonce","name":"PraosNonce","module":"Cardano.Api","link":"Cardano-Api.html#t:PraosNonce"},{"display_html":"makePraosNonce ∷ ByteString → PraosNonce","name":"makePraosNonce","module":"Cardano.Api","link":"Cardano-Api.html#v:makePraosNonce"},{"display_html":"newtype NetworkMagic = NetworkMagic {}","name":"NetworkMagic NetworkMagic unNetworkMagic","module":"Cardano.Api","link":"Cardano-Api.html#t:NetworkMagic"},{"display_html":"toNetworkMagic ∷ NetworkId → NetworkMagic","name":"toNetworkMagic","module":"Cardano.Api","link":"Cardano-Api.html#v:toNetworkMagic"},{"display_html":"data SomeNodeClientProtocol where","name":"SomeNodeClientProtocol SomeNodeClientProtocol","module":"Cardano.Api","link":"Cardano-Api.html#t:SomeNodeClientProtocol"},{"display_html":"newtype SlotsInEpoch = SlotsInEpoch Word64","name":"SlotsInEpoch SlotsInEpoch","module":"Cardano.Api","link":"Cardano-Api.html#t:SlotsInEpoch"},{"display_html":"newtype SlotsToEpochEnd = SlotsToEpochEnd Word64","name":"SlotsToEpochEnd SlotsToEpochEnd","module":"Cardano.Api","link":"Cardano-Api.html#t:SlotsToEpochEnd"},{"display_html":"slotToEpoch ∷ SlotNo → EraHistory mode → Either PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd)","name":"slotToEpoch","module":"Cardano.Api","link":"Cardano-Api.html#v:slotToEpoch"},{"display_html":"module Cardano.Api","name":"","module":"Cardano.Api.Shelley","link":""},{"display_html":"data ShelleyGenesis era = ShelleyGenesis {}","name":"ShelleyGenesis ShelleyGenesis sgActiveSlotsCoeff sgEpochLength sgGenDelegs sgInitialFunds sgMaxKESEvolutions sgMaxLovelaceSupply sgNetworkId sgNetworkMagic sgProtocolParams sgSecurityParam sgSlotLength sgSlotsPerKESPeriod sgStaking sgSystemStart sgUpdateQuorum","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ShelleyGenesis"},{"display_html":"shelleyGenesisDefaults ∷ ShelleyGenesis crypto","name":"shelleyGenesisDefaults","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:shelleyGenesisDefaults"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ScriptDataHash ByronKeyHash ByronKeyHashLegacy KesKeyHash VrfKeyHash StakePoolMetadataHash","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:Hash"},{"display_html":"data Address addrtype where","name":"Address ShelleyAddress","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:Address"},{"display_html":"toShelleyAddr ∷ AddressInEra era → Addr StandardCrypto","name":"toShelleyAddr","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyAddr"},{"display_html":"fromShelleyAddr ∷ IsShelleyBasedEra era ⇒ Addr StandardCrypto → AddressInEra era","name":"fromShelleyAddr","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyAddr"},{"display_html":"toShelleyStakeCredential ∷ StakeCredential → StakeCredential StandardCrypto","name":"toShelleyStakeCredential","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyStakeCredential"},{"display_html":"fromShelleyStakeCredential ∷ StakeCredential StandardCrypto → StakeCredential","name":"fromShelleyStakeCredential","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyStakeCredential"},{"display_html":"data NetworkId","name":"NetworkId Mainnet Testnet","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:NetworkId"},{"display_html":"data PaymentCredential","name":"PaymentCredential PaymentCredentialByKey PaymentCredentialByScript","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:PaymentCredential"},{"display_html":"data StakeAddress where","name":"StakeAddress StakeAddress","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakeAddress"},{"display_html":"data StakeAddressReference","name":"StakeAddressReference StakeAddressByValue StakeAddressByPointer NoStakeAddress","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakeAddressReference"},{"display_html":"data StakeCredential","name":"StakeCredential StakeCredentialByKey StakeCredentialByScript","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakeCredential"},{"display_html":"toShelleyStakeAddr ∷ StakeAddress → RewardAcnt StandardCrypto","name":"toShelleyStakeAddr","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyStakeAddr"},{"display_html":"fromShelleyStakeAddr ∷ RewardAcnt StandardCrypto → StakeAddress","name":"fromShelleyStakeAddr","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyStakeAddr"},{"display_html":"fromShelleyStakeReference ∷ StakeReference StandardCrypto → StakeAddressReference","name":"fromShelleyStakeReference","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyStakeReference"},{"display_html":"fromShelleyPaymentCredential ∷ PaymentCredential StandardCrypto → PaymentCredential","name":"fromShelleyPaymentCredential","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyPaymentCredential"},{"display_html":"data TxBody era where","name":"TxBody ShelleyTxBody","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:TxBody"},{"display_html":"newtype TxId = TxId (Hash StandardCrypto EraIndependentTxBody)","name":"TxId TxId","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:TxId"},{"display_html":"toShelleyTxId ∷ TxId → TxId StandardCrypto","name":"toShelleyTxId","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyTxId"},{"display_html":"fromShelleyTxId ∷ TxId StandardCrypto → TxId","name":"fromShelleyTxId","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyTxId"},{"display_html":"data TxIn = TxIn TxId TxIx","name":"TxIn TxIn","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:TxIn"},{"display_html":"toShelleyTxIn ∷ TxIn → TxIn StandardCrypto","name":"toShelleyTxIn","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyTxIn"},{"display_html":"fromShelleyTxIn ∷ TxIn StandardCrypto → TxIn","name":"fromShelleyTxIn","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyTxIn"},{"display_html":"data TxOut era = TxOut (AddressInEra era) (TxOutValue era) (TxOutDatumHash era)","name":"TxOut TxOut","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:TxOut"},{"display_html":"toShelleyTxOut ∷ ∀ era ledgerera. (ShelleyLedgerEra era ~ ledgerera, IsShelleyBasedEra era, ShelleyBased ledgerera) ⇒ TxOut era → TxOut ledgerera","name":"toShelleyTxOut","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyTxOut"},{"display_html":"fromShelleyTxOut ∷ TxOut StandardShelley → TxOut ShelleyEra","name":"fromShelleyTxOut","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyTxOut"},{"display_html":"newtype TxIx = TxIx Word","name":"TxIx TxIx","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:TxIx"},{"display_html":"newtype Lovelace = Lovelace Integer","name":"Lovelace Lovelace","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:Lovelace"},{"display_html":"toShelleyLovelace ∷ Lovelace → Coin","name":"toShelleyLovelace","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyLovelace"},{"display_html":"fromShelleyLovelace ∷ Coin → Lovelace","name":"fromShelleyLovelace","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyLovelace"},{"display_html":"toMaryValue ∷ Value → Value StandardCrypto","name":"toMaryValue","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toMaryValue"},{"display_html":"fromMaryValue ∷ Value StandardCrypto → Value","name":"fromMaryValue","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromMaryValue"},{"display_html":"calcMinimumDeposit ∷ Value → Lovelace → Lovelace","name":"calcMinimumDeposit","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:calcMinimumDeposit"},{"display_html":"data Tx era where","name":"Tx ShelleyTx","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:Tx"},{"display_html":"data KeyWitness era where","name":"KeyWitness ShelleyBootstrapWitness ShelleyKeyWitness","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:KeyWitness"},{"display_html":"data ShelleyWitnessSigningKey","name":"ShelleyWitnessSigningKey WitnessPaymentKey WitnessPaymentExtendedKey WitnessStakeKey WitnessStakeExtendedKey WitnessStakePoolKey WitnessGenesisKey WitnessGenesisExtendedKey WitnessGenesisDelegateKey WitnessGenesisDelegateExtendedKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ShelleyWitnessSigningKey"},{"display_html":"data ShelleySigningKey","name":"ShelleySigningKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ShelleySigningKey"},{"display_html":"getShelleyKeyWitnessVerificationKey ∷ ShelleySigningKey → VKey Witness StandardCrypto","name":"getShelleyKeyWitnessVerificationKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:getShelleyKeyWitnessVerificationKey"},{"display_html":"makeShelleySignature ∷ SignableRepresentation tosign ⇒ tosign → ShelleySigningKey → SignedDSIGN StandardCrypto tosign","name":"makeShelleySignature","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:makeShelleySignature"},{"display_html":"toShelleySigningKey ∷ ShelleyWitnessSigningKey → ShelleySigningKey","name":"toShelleySigningKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleySigningKey"},{"display_html":"toShelleyMetadata ∷ Map Word64 TxMetadataValue → Map Word64 Metadatum","name":"toShelleyMetadata","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyMetadata"},{"display_html":"fromShelleyMetadata ∷ Map Word64 Metadatum → Map Word64 TxMetadataValue","name":"fromShelleyMetadata","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyMetadata"},{"display_html":"data ProtocolParameters = ProtocolParameters {}","name":"ProtocolParameters ProtocolParameters protocolParamProtocolVersion protocolParamDecentralization protocolParamExtraPraosEntropy protocolParamMaxBlockHeaderSize protocolParamMaxBlockBodySize protocolParamMaxTxSize protocolParamTxFeeFixed protocolParamTxFeePerByte protocolParamMinUTxOValue protocolParamStakeAddressDeposit protocolParamStakePoolDeposit protocolParamMinPoolCost protocolParamPoolRetireMaxEpoch protocolParamStakePoolTargetNum protocolParamPoolPledgeInfluence protocolParamMonetaryExpansion protocolParamTreasuryCut protocolParamUTxOCostPerWord protocolParamCostModels protocolParamPrices protocolParamMaxTxExUnits protocolParamMaxBlockExUnits protocolParamMaxValueSize protocolParamCollateralPercent protocolParamMaxCollateralInputs","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ProtocolParameters"},{"display_html":"toShelleyScript ∷ ScriptInEra era → Script (ShelleyLedgerEra era)","name":"toShelleyScript","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyScript"},{"display_html":"toShelleyMultiSig ∷ SimpleScript SimpleScriptV1 → MultiSig StandardCrypto","name":"toShelleyMultiSig","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyMultiSig"},{"display_html":"fromShelleyMultiSig ∷ MultiSig StandardCrypto → SimpleScript lang","name":"fromShelleyMultiSig","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyMultiSig"},{"display_html":"toAllegraTimelock ∷ ∀ lang. SimpleScript lang → Timelock StandardCrypto","name":"toAllegraTimelock","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toAllegraTimelock"},{"display_html":"fromAllegraTimelock ∷ TimeLocksSupported lang → Timelock StandardCrypto → SimpleScript lang","name":"fromAllegraTimelock","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromAllegraTimelock"},{"display_html":"toShelleyScriptHash ∷ ScriptHash → ScriptHash StandardCrypto","name":"toShelleyScriptHash","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyScriptHash"},{"display_html":"fromShelleyScriptHash ∷ ScriptHash StandardCrypto → ScriptHash","name":"fromShelleyScriptHash","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyScriptHash"},{"display_html":"data PlutusScript lang where","name":"PlutusScript PlutusScriptSerialised","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:PlutusScript"},{"display_html":"toPlutusData ∷ ScriptData → Data","name":"toPlutusData","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toPlutusData"},{"display_html":"fromPlutusData ∷ Data → ScriptData","name":"fromPlutusData","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromPlutusData"},{"display_html":"toAlonzoData ∷ ScriptData → Data ledgerera","name":"toAlonzoData","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toAlonzoData"},{"display_html":"fromAlonzoData ∷ Data ledgerera → ScriptData","name":"fromAlonzoData","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromAlonzoData"},{"display_html":"data Certificate","name":"Certificate StakeAddressRegistrationCertificate StakeAddressDeregistrationCertificate StakeAddressDelegationCertificate StakePoolRegistrationCertificate StakePoolRetirementCertificate GenesisKeyDelegationCertificate MIRCertificate","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:Certificate"},{"display_html":"toShelleyCertificate ∷ Certificate → DCert StandardCrypto","name":"toShelleyCertificate","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyCertificate"},{"display_html":"fromShelleyCertificate ∷ DCert StandardCrypto → Certificate","name":"fromShelleyCertificate","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyCertificate"},{"display_html":"data OperationalCertificate = OperationalCertificate !(OCert StandardCrypto) !(VerificationKey StakePoolKey)","name":"OperationalCertificate OperationalCertificate","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:OperationalCertificate"},{"display_html":"data OperationalCertificateIssueCounter = OperationalCertificateIssueCounter !Word64 !(VerificationKey StakePoolKey)","name":"OperationalCertificateIssueCounter OperationalCertificateIssueCounter","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:OperationalCertificateIssueCounter"},{"display_html":"data OperationalCertIssueError = OperationalCertKeyMismatch (VerificationKey StakePoolKey) (VerificationKey StakePoolKey)","name":"OperationalCertIssueError OperationalCertKeyMismatch","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:OperationalCertIssueError"},{"display_html":"data StakePoolMetadata = StakePoolMetadata !Text !Text !Text !Text","name":"StakePoolMetadata StakePoolMetadata","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakePoolMetadata"},{"display_html":"stakePoolName ∷ StakePoolMetadata → Text","name":"stakePoolName","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolName"},{"display_html":"stakePoolDescription ∷ StakePoolMetadata → Text","name":"stakePoolDescription","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolDescription"},{"display_html":"stakePoolTicker ∷ StakePoolMetadata → Text","name":"stakePoolTicker","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolTicker"},{"display_html":"stakePoolHomepage ∷ StakePoolMetadata → Text","name":"stakePoolHomepage","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolHomepage"},{"display_html":"data StakePoolMetadataReference = StakePoolMetadataReference Text (Hash StakePoolMetadata)","name":"StakePoolMetadataReference StakePoolMetadataReference","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakePoolMetadataReference"},{"display_html":"stakePoolMetadataURL ∷ StakePoolMetadataReference → Text","name":"stakePoolMetadataURL","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolMetadataURL"},{"display_html":"stakePoolMetadataHash ∷ StakePoolMetadataReference → Hash StakePoolMetadata","name":"stakePoolMetadataHash","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolMetadataHash"},{"display_html":"data StakePoolParameters = StakePoolParameters PoolId (Hash VrfKey) Lovelace Rational StakeAddress Lovelace [Hash StakeKey] [StakePoolRelay] (Maybe StakePoolMetadataReference)","name":"StakePoolParameters StakePoolParameters","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakePoolParameters"},{"display_html":"stakePoolId ∷ StakePoolParameters → PoolId","name":"stakePoolId","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolId"},{"display_html":"stakePoolVRF ∷ StakePoolParameters → Hash VrfKey","name":"stakePoolVRF","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolVRF"},{"display_html":"stakePoolCost ∷ StakePoolParameters → Lovelace","name":"stakePoolCost","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolCost"},{"display_html":"stakePoolMargin ∷ StakePoolParameters → Rational","name":"stakePoolMargin","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolMargin"},{"display_html":"stakePoolRewardAccount ∷ StakePoolParameters → StakeAddress","name":"stakePoolRewardAccount","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolRewardAccount"},{"display_html":"stakePoolPledge ∷ StakePoolParameters → Lovelace","name":"stakePoolPledge","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolPledge"},{"display_html":"stakePoolOwners ∷ StakePoolParameters → [Hash StakeKey]","name":"stakePoolOwners","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolOwners"},{"display_html":"stakePoolRelays ∷ StakePoolParameters → [StakePoolRelay]","name":"stakePoolRelays","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolRelays"},{"display_html":"stakePoolMetadata ∷ StakePoolParameters → Maybe StakePoolMetadataReference","name":"stakePoolMetadata","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolMetadata"},{"display_html":"data StakePoolRelay","name":"StakePoolRelay StakePoolRelayIp StakePoolRelayDnsARecord StakePoolRelayDnsSrvRecord","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakePoolRelay"},{"display_html":"newtype EpochNo = EpochNo {}","name":"EpochNo EpochNo unEpochNo","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:EpochNo"},{"display_html":"data StakePoolKey","name":"StakePoolKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakePoolKey"},{"display_html":"type PoolId = Hash StakePoolKey","name":"PoolId","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:PoolId"},{"display_html":"data KesKey","name":"KesKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:KesKey"},{"display_html":"newtype KESPeriod = KESPeriod {}","name":"KESPeriod KESPeriod unKESPeriod","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:KESPeriod"},{"display_html":"data VrfKey","name":"VrfKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:VrfKey"},{"display_html":"data LocalNodeConnectInfo mode = LocalNodeConnectInfo (ConsensusModeParams mode) NetworkId FilePath","name":"LocalNodeConnectInfo LocalNodeConnectInfo","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:LocalNodeConnectInfo"},{"display_html":"data ShelleyMode","name":"ShelleyMode","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ShelleyMode"},{"display_html":"data ConsensusMode mode where","name":"ConsensusMode ShelleyMode","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ConsensusMode"},{"display_html":"data LocalNodeClientProtocols block point tip tx txerr query m = LocalNodeClientProtocols (LocalChainSyncClient block point tip m) (Maybe (LocalTxSubmissionClient tx txerr m ())) (Maybe (LocalStateQueryClient block point query m ()))","name":"LocalNodeClientProtocols LocalNodeClientProtocols","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:LocalNodeClientProtocols"},{"display_html":"type family ShelleyLedgerEra era where ...","name":"ShelleyLedgerEra","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ShelleyLedgerEra"},{"display_html":"data DebugLedgerState era where","name":"DebugLedgerState DebugLedgerState","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:DebugLedgerState"},{"display_html":"newtype ProtocolState era = ProtocolState (Serialised (ChainDepState (Crypto (ShelleyLedgerEra era))))","name":"ProtocolState ProtocolState","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ProtocolState"},{"display_html":"newtype SerialisedDebugLedgerState era = SerialisedDebugLedgerState (Serialised (NewEpochState (ShelleyLedgerEra era)))","name":"SerialisedDebugLedgerState SerialisedDebugLedgerState","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:SerialisedDebugLedgerState"},{"display_html":"newtype UTxO era = UTxO (Map TxIn (TxOut era))","name":"UTxO UTxO","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:UTxO"},{"display_html":"toShelleyNetwork ∷ NetworkId → Network","name":"toShelleyNetwork","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyNetwork"},{"display_html":"fromShelleyPParams ∷ PParams ledgerera → ProtocolParameters","name":"fromShelleyPParams","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyPParams"},{"display_html":"module Cardano.Api","name":"","module":"Cardano.Api.Byron","link":""},{"display_html":"data SomeByronSigningKey","name":"SomeByronSigningKey AByronSigningKeyLegacy AByronSigningKey","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:SomeByronSigningKey"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ByronKeyHash ByronKeyHashLegacy","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:Hash"},{"display_html":"data Address addrtype where","name":"Address ByronAddress","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:Address"},{"display_html":"data NetworkId","name":"NetworkId Mainnet Testnet","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:NetworkId"},{"display_html":"data TxBody era where","name":"TxBody ByronTxBody","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:TxBody"},{"display_html":"newtype TxId = TxId (Hash StandardCrypto EraIndependentTxBody)","name":"TxId TxId","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:TxId"},{"display_html":"data TxIn = TxIn TxId TxIx","name":"TxIn TxIn","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:TxIn"},{"display_html":"data TxOut era = TxOut (AddressInEra era) (TxOutValue era) (TxOutDatumHash era)","name":"TxOut TxOut","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:TxOut"},{"display_html":"newtype TxIx = TxIx Word","name":"TxIx TxIx","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:TxIx"},{"display_html":"newtype Lovelace = Lovelace Integer","name":"Lovelace Lovelace","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:Lovelace"},{"display_html":"data Tx era where","name":"Tx ByronTx","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:Tx"},{"display_html":"data KeyWitness era where","name":"KeyWitness ByronKeyWitness","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:KeyWitness"},{"display_html":"data WitnessNetworkIdOrByronAddress","name":"WitnessNetworkIdOrByronAddress WitnessNetworkId WitnessByronAddress","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:WitnessNetworkIdOrByronAddress"},{"display_html":"class Show e ⇒ Error e where","name":"Error displayError","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:Error"},{"display_html":"data FileError e","name":"FileError FileError FileErrorTempFile FileIOError","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:FileError"},{"display_html":"data LocalNodeConnectInfo mode = LocalNodeConnectInfo (ConsensusModeParams mode) NetworkId FilePath","name":"LocalNodeConnectInfo LocalNodeConnectInfo","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:LocalNodeConnectInfo"},{"display_html":"data ByronMode","name":"ByronMode","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ByronMode"},{"display_html":"data ConsensusMode mode where","name":"ConsensusMode ByronMode","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ConsensusMode"},{"display_html":"data LocalNodeClientProtocols block point tip tx txerr query m = LocalNodeClientProtocols (LocalChainSyncClient block point tip m) (Maybe (LocalTxSubmissionClient tx txerr m ())) (Maybe (LocalStateQueryClient block point query m ()))","name":"LocalNodeClientProtocols LocalNodeClientProtocols","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:LocalNodeClientProtocols"},{"display_html":"newtype ChainSyncClient header point tip (m ∷ Type → Type) a = ChainSyncClient {}","name":"ChainSyncClient ChainSyncClient runChainSyncClient","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ChainSyncClient"},{"display_html":"newtype LocalTxSubmissionClient tx reject (m ∷ Type → Type) a = LocalTxSubmissionClient (m (LocalTxClientStIdle tx reject m a))","name":"LocalTxSubmissionClient LocalTxSubmissionClient","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:LocalTxSubmissionClient"},{"display_html":"newtype LocalStateQueryClient block point (query ∷ Type → Type) (m ∷ Type → Type) a = LocalStateQueryClient {}","name":"LocalStateQueryClient LocalStateQueryClient runLocalStateQueryClient","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:LocalStateQueryClient"},{"display_html":"newtype NetworkMagic = NetworkMagic {}","name":"NetworkMagic NetworkMagic unNetworkMagic","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:NetworkMagic"},{"display_html":"newtype ByronUpdateProposal = ByronUpdateProposal {}","name":"ByronUpdateProposal ByronUpdateProposal unByronUpdateProposal","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ByronUpdateProposal"},{"display_html":"data ByronProtocolParametersUpdate = ByronProtocolParametersUpdate {}","name":"ByronProtocolParametersUpdate ByronProtocolParametersUpdate bPpuScriptVersion bPpuSlotDuration bPpuMaxBlockSize bPpuMaxHeaderSize bPpuMaxTxSize bPpuMaxProposalSize bPpuMpcThd bPpuHeavyDelThd bPpuUpdateVoteThd bPpuUpdateProposalThd bPpuUpdateProposalTTL bPpuSoftforkRule bPpuTxFeePolicy bPpuUnlockStakeEpoch","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ByronProtocolParametersUpdate"},{"display_html":"makeByronUpdateProposal ∷ NetworkId → ProtocolVersion → SoftwareVersion → SystemTag → InstallerHash → SomeByronSigningKey → ByronProtocolParametersUpdate → ByronUpdateProposal","name":"makeByronUpdateProposal","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:makeByronUpdateProposal"},{"display_html":"toByronLedgerUpdateProposal ∷ ByronUpdateProposal → GenTx ByronBlock","name":"toByronLedgerUpdateProposal","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronLedgerUpdateProposal"},{"display_html":"makeProtocolParametersUpdate ∷ ByronProtocolParametersUpdate → ProtocolParametersUpdate","name":"makeProtocolParametersUpdate","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:makeProtocolParametersUpdate"},{"display_html":"newtype ByronVote = ByronVote {}","name":"ByronVote ByronVote unByronVote","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ByronVote"},{"display_html":"makeByronVote ∷ NetworkId → SomeByronSigningKey → ByronUpdateProposal → Bool → ByronVote","name":"makeByronVote","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:makeByronVote"},{"display_html":"toByronLedgertoByronVote ∷ ByronVote → GenTx ByronBlock","name":"toByronLedgertoByronVote","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronLedgertoByronVote"},{"display_html":"fromByronTxIn ∷ TxIn → TxIn","name":"fromByronTxIn","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:fromByronTxIn"},{"display_html":"toByronLovelace ∷ Lovelace → Maybe Lovelace","name":"toByronLovelace","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronLovelace"},{"display_html":"toByronNetworkMagic ∷ NetworkId → NetworkMagic","name":"toByronNetworkMagic","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronNetworkMagic"},{"display_html":"toByronProtocolMagicId ∷ NetworkId → ProtocolMagicId","name":"toByronProtocolMagicId","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronProtocolMagicId"},{"display_html":"toByronRequiresNetworkMagic ∷ NetworkId → RequiresNetworkMagic","name":"toByronRequiresNetworkMagic","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronRequiresNetworkMagic"}] \ No newline at end of file +[{"display_html":"newtype ChainSyncClient header point tip (m ∷ Type → Type) a = ChainSyncClient {}","name":"ChainSyncClient ChainSyncClient runChainSyncClient","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#t:ChainSyncClient"},{"display_html":"data ClientStIdle header point tip (m ∷ Type → Type) a where","name":"ClientStIdle SendMsgDone SendMsgFindIntersect SendMsgRequestNext","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#t:ClientStIdle"},{"display_html":"data ClientStNext header point tip (m ∷ Type → Type) a = ClientStNext {}","name":"ClientStNext ClientStNext recvMsgRollBackward recvMsgRollForward","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#t:ClientStNext"},{"display_html":"data ClientStIntersect header point tip (m ∷ Type → Type) a = ClientStIntersect {}","name":"ClientStIntersect ClientStIntersect recvMsgIntersectFound recvMsgIntersectNotFound","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#t:ClientStIntersect"},{"display_html":"chainSyncClientNull ∷ ∀ (m ∷ Type → Type) header point tip a. MonadTimer m ⇒ ChainSyncClient header point tip m a","name":"chainSyncClientNull","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#v:chainSyncClientNull"},{"display_html":"mapChainSyncClient ∷ ∀ header header' point point' tip tip' (m ∷ Type → Type) a. Functor m ⇒ (point → point') → (point' → point) → (header' → header) → (tip' → tip) → ChainSyncClient header point tip m a → ChainSyncClient header' point' tip' m a","name":"mapChainSyncClient","module":"Cardano.Api.ChainSync.Client","link":"Cardano-Api-ChainSync-Client.html#v:mapChainSyncClient"},{"display_html":"newtype ChainSyncClientPipelined header point tip (m ∷ Type → Type) a = ChainSyncClientPipelined {}","name":"ChainSyncClientPipelined ChainSyncClientPipelined runChainSyncClientPipelined","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:ChainSyncClientPipelined"},{"display_html":"data ClientPipelinedStIdle (n ∷ N) header point tip (m ∷ Type → Type) a where","name":"ClientPipelinedStIdle CollectResponse SendMsgDone SendMsgRequestNextPipelined SendMsgFindIntersect SendMsgRequestNext","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:ClientPipelinedStIdle"},{"display_html":"data ClientStNext (n ∷ N) header point tip (m ∷ Type → Type) a = ClientStNext {}","name":"ClientStNext ClientStNext recvMsgRollBackward recvMsgRollForward","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:ClientStNext"},{"display_html":"data ClientPipelinedStIntersect header point tip (m ∷ Type → Type) a = ClientPipelinedStIntersect {}","name":"ClientPipelinedStIntersect ClientPipelinedStIntersect recvMsgIntersectFound recvMsgIntersectNotFound","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:ClientPipelinedStIntersect"},{"display_html":"data ChainSyncInstruction header point tip","name":"ChainSyncInstruction RollBackward RollForward","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:ChainSyncInstruction"},{"display_html":"data PipelineDecision (n ∷ N) where","name":"PipelineDecision Collect CollectOrPipeline Pipeline Request","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:PipelineDecision"},{"display_html":"data MkPipelineDecision where","name":"MkPipelineDecision MkPipelineDecision","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:MkPipelineDecision"},{"display_html":"runPipelineDecision ∷ ∀ (n ∷ N). MkPipelineDecision → Nat n → WithOrigin BlockNo → WithOrigin BlockNo → (PipelineDecision n, MkPipelineDecision)","name":"runPipelineDecision","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:runPipelineDecision"},{"display_html":"constantPipelineDecision ∷ (∀ (n ∷ N). Nat n → WithOrigin BlockNo → WithOrigin BlockNo → PipelineDecision n) → MkPipelineDecision","name":"constantPipelineDecision","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:constantPipelineDecision"},{"display_html":"pipelineDecisionMax ∷ ∀ (n ∷ N). Word32 → Nat n → WithOrigin BlockNo → WithOrigin BlockNo → PipelineDecision n","name":"pipelineDecisionMax","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:pipelineDecisionMax"},{"display_html":"pipelineDecisionMin ∷ ∀ (n ∷ N). Word32 → Nat n → WithOrigin BlockNo → WithOrigin BlockNo → PipelineDecision n","name":"pipelineDecisionMin","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:pipelineDecisionMin"},{"display_html":"pipelineDecisionLowHighMark ∷ Word32 → Word32 → MkPipelineDecision","name":"pipelineDecisionLowHighMark","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:pipelineDecisionLowHighMark"},{"display_html":"data N","name":"N S Z","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:N"},{"display_html":"data Nat (n ∷ N) where
  • pattern Succ ∷ ∀ m n. () ⇒ m ~ 'S n ⇒ Nat n → Nat m
  • pattern Zero ∷ () ⇒ 'Z ~ n ⇒ Nat n
","name":"Nat Succ Zero","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#t:Nat"},{"display_html":"natToInt ∷ ∀ (n ∷ N). Nat n → Int","name":"natToInt","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:natToInt"},{"display_html":"mapChainSyncClientPipelined ∷ ∀ header header' point point' tip tip' (m ∷ Type → Type) a. Functor m ⇒ (point → point') → (point' → point) → (header' → header) → (tip' → tip) → ChainSyncClientPipelined header point tip m a → ChainSyncClientPipelined header' point' tip' m a","name":"mapChainSyncClientPipelined","module":"Cardano.Api.ChainSync.ClientPipelined","link":"Cardano-Api-ChainSync-ClientPipelined.html#v:mapChainSyncClientPipelined"},{"display_html":"data Ed25519Bip32DSIGN","name":"Ed25519Bip32DSIGN","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#t:Ed25519Bip32DSIGN"},{"display_html":"data family SigDSIGN v","name":"SigDSIGN SigEd25519Bip32DSIGN","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#t:SigDSIGN"},{"display_html":"data family SignKeyDSIGN v","name":"SignKeyDSIGN SignKeyEd25519Bip32DSIGN","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#t:SignKeyDSIGN"},{"display_html":"data family VerKeyDSIGN v","name":"VerKeyDSIGN VerKeyEd25519Bip32DSIGN","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#t:VerKeyDSIGN"},{"display_html":"xPrvToBytes ∷ XPrv → ByteString","name":"xPrvToBytes","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#v:xPrvToBytes"},{"display_html":"xPrvFromBytes ∷ ByteString → Maybe XPrv","name":"xPrvFromBytes","module":"Cardano.Api.Crypto.Ed25519Bip32","link":"Cardano-Api-Crypto-Ed25519Bip32.html#v:xPrvFromBytes"},{"display_html":"class Show e ⇒ Error e where","name":"Error displayError","module":"Cardano.Api.Error","link":"Cardano-Api-Error.html#t:Error"},{"display_html":"throwErrorAsException ∷ Error e ⇒ e → IO a","name":"throwErrorAsException","module":"Cardano.Api.Error","link":"Cardano-Api-Error.html#v:throwErrorAsException"},{"display_html":"data ErrorAsException where","name":"ErrorAsException ErrorAsException","module":"Cardano.Api.Error","link":"Cardano-Api-Error.html#t:ErrorAsException"},{"display_html":"data FileError e","name":"FileError FileError FileErrorTempFile FileIOError","module":"Cardano.Api.Error","link":"Cardano-Api-Error.html#t:FileError"},{"display_html":"class HasTypeProxy t where","name":"HasTypeProxy AsType proxyToAsType","module":"Cardano.Api.HasTypeProxy","link":"Cardano-Api-HasTypeProxy.html#t:HasTypeProxy"},{"display_html":"data Proxy (t ∷ k) = Proxy","name":"Proxy Proxy","module":"Cardano.Api.HasTypeProxy","link":"Cardano-Api-HasTypeProxy.html#t:Proxy"},{"display_html":"data FromSomeType (c ∷ Type → Constraint) b where","name":"FromSomeType FromSomeType","module":"Cardano.Api.HasTypeProxy","link":"Cardano-Api-HasTypeProxy.html#t:FromSomeType"},{"display_html":"data ByronEra","name":"ByronEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:ByronEra"},{"display_html":"data ShelleyEra","name":"ShelleyEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:ShelleyEra"},{"display_html":"data AllegraEra","name":"AllegraEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:AllegraEra"},{"display_html":"data MaryEra","name":"MaryEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:MaryEra"},{"display_html":"data AlonzoEra","name":"AlonzoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:AlonzoEra"},{"display_html":"data CardanoEra era where","name":"CardanoEra ByronEra ShelleyEra AllegraEra MaryEra AlonzoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:CardanoEra"},{"display_html":"class HasTypeProxy era ⇒ IsCardanoEra era where","name":"IsCardanoEra cardanoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:IsCardanoEra"},{"display_html":"data AnyCardanoEra where","name":"AnyCardanoEra AnyCardanoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:AnyCardanoEra"},{"display_html":"anyCardanoEra ∷ CardanoEra era → AnyCardanoEra","name":"anyCardanoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#v:anyCardanoEra"},{"display_html":"data InAnyCardanoEra thing where","name":"InAnyCardanoEra InAnyCardanoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:InAnyCardanoEra"},{"display_html":"type Byron = ByronEra","name":"Byron","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:Byron"},{"display_html":"type Shelley = ShelleyEra","name":"Shelley","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:Shelley"},{"display_html":"type Allegra = AllegraEra","name":"Allegra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:Allegra"},{"display_html":"type Mary = MaryEra","name":"Mary","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:Mary"},{"display_html":"data ShelleyBasedEra era where","name":"ShelleyBasedEra ShelleyBasedEraShelley ShelleyBasedEraAllegra ShelleyBasedEraMary ShelleyBasedEraAlonzo","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:ShelleyBasedEra"},{"display_html":"class (IsCardanoEra era, Crypto (ShelleyLedgerEra era) ~ StandardCrypto) ⇒ IsShelleyBasedEra era where","name":"IsShelleyBasedEra shelleyBasedEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:IsShelleyBasedEra"},{"display_html":"data InAnyShelleyBasedEra thing where","name":"InAnyShelleyBasedEra InAnyShelleyBasedEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:InAnyShelleyBasedEra"},{"display_html":"shelleyBasedToCardanoEra ∷ ShelleyBasedEra era → CardanoEra era","name":"shelleyBasedToCardanoEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#v:shelleyBasedToCardanoEra"},{"display_html":"type family ShelleyLedgerEra era where ...","name":"ShelleyLedgerEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:ShelleyLedgerEra"},{"display_html":"data CardanoEraStyle era where","name":"CardanoEraStyle ShelleyBasedEra LegacyByronEra","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:CardanoEraStyle"},{"display_html":"cardanoEraStyle ∷ CardanoEra era → CardanoEraStyle era","name":"cardanoEraStyle","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#v:cardanoEraStyle"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary","module":"Cardano.Api.Eras","link":"Cardano-Api-Eras.html#t:AsType"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash","module":"Cardano.Api.Hash","link":"Cardano-Api-Hash.html#t:Hash"},{"display_html":"class CastHash roleA roleB where","name":"CastHash castHash","module":"Cardano.Api.Hash","link":"Cardano-Api-Hash.html#t:CastHash"},{"display_html":"data family AsType t","name":"AsType AsHash","module":"Cardano.Api.Hash","link":"Cardano-Api-Hash.html#t:AsType"},{"display_html":"data ByronMode","name":"ByronMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ByronMode"},{"display_html":"data ShelleyMode","name":"ShelleyMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ShelleyMode"},{"display_html":"data CardanoMode","name":"CardanoMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:CardanoMode"},{"display_html":"data ConsensusMode mode where","name":"ConsensusMode CardanoMode ByronMode ShelleyMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ConsensusMode"},{"display_html":"data AnyConsensusMode where","name":"AnyConsensusMode AnyConsensusMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:AnyConsensusMode"},{"display_html":"renderMode ∷ AnyConsensusMode → Text","name":"renderMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:renderMode"},{"display_html":"data ConsensusModeIsMultiEra mode where","name":"ConsensusModeIsMultiEra CardanoModeIsMultiEra","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ConsensusModeIsMultiEra"},{"display_html":"data EraInMode era mode where","name":"EraInMode ByronEraInByronMode ShelleyEraInShelleyMode ByronEraInCardanoMode ShelleyEraInCardanoMode AllegraEraInCardanoMode MaryEraInCardanoMode AlonzoEraInCardanoMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:EraInMode"},{"display_html":"eraInModeToEra ∷ EraInMode era mode → CardanoEra era","name":"eraInModeToEra","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:eraInModeToEra"},{"display_html":"anyEraInModeToAnyEra ∷ AnyEraInMode mode → AnyCardanoEra","name":"anyEraInModeToAnyEra","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:anyEraInModeToAnyEra"},{"display_html":"data AnyEraInMode mode where","name":"AnyEraInMode AnyEraInMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:AnyEraInMode"},{"display_html":"toEraInMode ∷ CardanoEra era → ConsensusMode mode → Maybe (EraInMode era mode)","name":"toEraInMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:toEraInMode"},{"display_html":"data ConsensusModeParams mode where","name":"ConsensusModeParams CardanoModeParams ByronModeParams ShelleyModeParams","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ConsensusModeParams"},{"display_html":"data AnyConsensusModeParams where","name":"AnyConsensusModeParams AnyConsensusModeParams","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:AnyConsensusModeParams"},{"display_html":"newtype EpochSlots = EpochSlots {}","name":"EpochSlots EpochSlots unEpochSlots","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:EpochSlots"},{"display_html":"type family ConsensusBlockForMode mode where ...","name":"ConsensusBlockForMode","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ConsensusBlockForMode"},{"display_html":"type family ConsensusBlockForEra era where ...","name":"ConsensusBlockForEra","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#t:ConsensusBlockForEra"},{"display_html":"toConsensusEraIndex ∷ ConsensusBlockForMode mode ~ HardForkBlock xs ⇒ EraInMode era mode → EraIndex xs","name":"toConsensusEraIndex","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:toConsensusEraIndex"},{"display_html":"fromConsensusEraIndex ∷ ConsensusBlockForMode mode ~ HardForkBlock xs ⇒ ConsensusMode mode → EraIndex xs → AnyEraInMode mode","name":"fromConsensusEraIndex","module":"Cardano.Api.Modes","link":"Cardano-Api-Modes.html#v:fromConsensusEraIndex"},{"display_html":"data NetworkId","name":"NetworkId Mainnet Testnet","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#t:NetworkId"},{"display_html":"newtype NetworkMagic = NetworkMagic {}","name":"NetworkMagic NetworkMagic unNetworkMagic","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#t:NetworkMagic"},{"display_html":"toNetworkMagic ∷ NetworkId → NetworkMagic","name":"toNetworkMagic","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:toNetworkMagic"},{"display_html":"mainnetNetworkMagic ∷ NetworkMagic","name":"mainnetNetworkMagic","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:mainnetNetworkMagic"},{"display_html":"toByronProtocolMagicId ∷ NetworkId → ProtocolMagicId","name":"toByronProtocolMagicId","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:toByronProtocolMagicId"},{"display_html":"toByronNetworkMagic ∷ NetworkId → NetworkMagic","name":"toByronNetworkMagic","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:toByronNetworkMagic"},{"display_html":"toByronRequiresNetworkMagic ∷ NetworkId → RequiresNetworkMagic","name":"toByronRequiresNetworkMagic","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:toByronRequiresNetworkMagic"},{"display_html":"toShelleyNetwork ∷ NetworkId → Network","name":"toShelleyNetwork","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:toShelleyNetwork"},{"display_html":"fromShelleyNetwork ∷ Network → NetworkMagic → NetworkId","name":"fromShelleyNetwork","module":"Cardano.Api.NetworkId","link":"Cardano-Api-NetworkId.html#v:fromShelleyNetwork"},{"display_html":"data BlockType blk where","name":"BlockType ByronBlockType ShelleyBlockType CardanoBlockType","module":"Cardano.Api.Protocol.Types","link":"Cardano-Api-Protocol-Types.html#t:BlockType"},{"display_html":"class (RunNode blk, IOLike m) ⇒ Protocol m blk where","name":"Protocol ProtocolInfoArgs protocolInfo","module":"Cardano.Api.Protocol.Types","link":"Cardano-Api-Protocol-Types.html#t:Protocol"},{"display_html":"class RunNode blk ⇒ ProtocolClient blk where","name":"ProtocolClient ProtocolClientInfoArgs protocolClientInfo","module":"Cardano.Api.Protocol.Types","link":"Cardano-Api-Protocol-Types.html#t:ProtocolClient"},{"display_html":"data SomeNodeClientProtocol where","name":"SomeNodeClientProtocol SomeNodeClientProtocol","module":"Cardano.Api.Protocol.Types","link":"Cardano-Api-Protocol-Types.html#t:SomeNodeClientProtocol"},{"display_html":"mkNodeClientProtocolShelley ∷ ProtocolClientInfoArgs (ShelleyBlockHFC StandardShelley)","name":"mkNodeClientProtocolShelley","module":"Cardano.Api.Protocol.Shelley","link":"Cardano-Api-Protocol-Shelley.html#v:mkNodeClientProtocolShelley"},{"display_html":"mkSomeNodeClientProtocolShelley ∷ SomeNodeClientProtocol","name":"mkSomeNodeClientProtocolShelley","module":"Cardano.Api.Protocol.Shelley","link":"Cardano-Api-Protocol-Shelley.html#v:mkSomeNodeClientProtocolShelley"},{"display_html":"mkNodeClientProtocolCardano ∷ EpochSlots → ProtocolClientInfoArgs (CardanoBlock StandardCrypto)","name":"mkNodeClientProtocolCardano","module":"Cardano.Api.Protocol.Cardano","link":"Cardano-Api-Protocol-Cardano.html#v:mkNodeClientProtocolCardano"},{"display_html":"mkSomeNodeClientProtocolCardano ∷ EpochSlots → SomeNodeClientProtocol","name":"mkSomeNodeClientProtocolCardano","module":"Cardano.Api.Protocol.Cardano","link":"Cardano-Api-Protocol-Cardano.html#v:mkSomeNodeClientProtocolCardano"},{"display_html":"mkNodeClientProtocolByron ∷ EpochSlots → ProtocolClientInfoArgs ByronBlockHFC","name":"mkNodeClientProtocolByron","module":"Cardano.Api.Protocol.Byron","link":"Cardano-Api-Protocol-Byron.html#v:mkNodeClientProtocolByron"},{"display_html":"mkSomeNodeClientProtocolByron ∷ EpochSlots → SomeNodeClientProtocol","name":"mkSomeNodeClientProtocolByron","module":"Cardano.Api.Protocol.Byron","link":"Cardano-Api-Protocol-Byron.html#v:mkSomeNodeClientProtocolByron"},{"display_html":"class HasTypeProxy a ⇒ SerialiseAsCBOR a where","name":"SerialiseAsCBOR serialiseToCBOR deserialiseFromCBOR","module":"Cardano.Api.SerialiseCBOR","link":"Cardano-Api-SerialiseCBOR.html#t:SerialiseAsCBOR"},{"display_html":"class Typeable a ⇒ FromCBOR a where","name":"FromCBOR label fromCBOR","module":"Cardano.Api.SerialiseCBOR","link":"Cardano-Api-SerialiseCBOR.html#t:FromCBOR"},{"display_html":"class Typeable a ⇒ ToCBOR a where","name":"ToCBOR toCBOR encodedSizeExpr encodedListSizeExpr","module":"Cardano.Api.SerialiseCBOR","link":"Cardano-Api-SerialiseCBOR.html#t:ToCBOR"},{"display_html":"serialiseToJSON ∷ ToJSON a ⇒ a → ByteString","name":"serialiseToJSON","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#v:serialiseToJSON"},{"display_html":"class ToJSON a where","name":"ToJSON toJSON toEncoding toEncodingList toJSONList","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#t:ToJSON"},{"display_html":"deserialiseFromJSON ∷ FromJSON a ⇒ AsType a → ByteString → Either JsonDecodeError a","name":"deserialiseFromJSON","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#v:deserialiseFromJSON"},{"display_html":"prettyPrintJSON ∷ ToJSON a ⇒ a → ByteString","name":"prettyPrintJSON","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#v:prettyPrintJSON"},{"display_html":"class FromJSON a where","name":"FromJSON parseJSON parseJSONList","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#t:FromJSON"},{"display_html":"newtype JsonDecodeError = JsonDecodeError String","name":"JsonDecodeError JsonDecodeError","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#t:JsonDecodeError"},{"display_html":"readFileJSON ∷ FromJSON a ⇒ AsType a → FilePath → IO (Either (FileError JsonDecodeError) a)","name":"readFileJSON","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#v:readFileJSON"},{"display_html":"writeFileJSON ∷ ToJSON a ⇒ FilePath → a → IO (Either (FileError ()) ())","name":"writeFileJSON","module":"Cardano.Api.SerialiseJSON","link":"Cardano-Api-SerialiseJSON.html#v:writeFileJSON"},{"display_html":"class HasTypeProxy a ⇒ SerialiseAsRawBytes a where","name":"SerialiseAsRawBytes serialiseToRawBytes deserialiseFromRawBytes","module":"Cardano.Api.SerialiseRaw","link":"Cardano-Api-SerialiseRaw.html#t:SerialiseAsRawBytes"},{"display_html":"serialiseToRawBytesHex ∷ SerialiseAsRawBytes a ⇒ a → ByteString","name":"serialiseToRawBytesHex","module":"Cardano.Api.SerialiseRaw","link":"Cardano-Api-SerialiseRaw.html#v:serialiseToRawBytesHex"},{"display_html":"deserialiseFromRawBytesHex ∷ SerialiseAsRawBytes a ⇒ AsType a → ByteString → Maybe a","name":"deserialiseFromRawBytesHex","module":"Cardano.Api.SerialiseRaw","link":"Cardano-Api-SerialiseRaw.html#v:deserialiseFromRawBytesHex"},{"display_html":"serialiseToRawBytesHexText ∷ SerialiseAsRawBytes a ⇒ a → Text","name":"serialiseToRawBytesHexText","module":"Cardano.Api.SerialiseRaw","link":"Cardano-Api-SerialiseRaw.html#v:serialiseToRawBytesHexText"},{"display_html":"newtype UsingRawBytesHex a = UsingRawBytesHex a","name":"UsingRawBytesHex UsingRawBytesHex","module":"Cardano.Api.SerialiseRaw","link":"Cardano-Api-SerialiseRaw.html#t:UsingRawBytesHex"},{"display_html":"class SerialiseAsCBOR a ⇒ HasTextEnvelope a where","name":"HasTextEnvelope textEnvelopeType textEnvelopeDefaultDescr","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:HasTextEnvelope"},{"display_html":"data TextEnvelope = TextEnvelope {}","name":"TextEnvelope TextEnvelope teType teDescription teRawCBOR","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:TextEnvelope"},{"display_html":"newtype TextEnvelopeType = TextEnvelopeType String","name":"TextEnvelopeType TextEnvelopeType","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:TextEnvelopeType"},{"display_html":"newtype TextEnvelopeDescr = TextEnvelopeDescr String","name":"TextEnvelopeDescr TextEnvelopeDescr","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:TextEnvelopeDescr"},{"display_html":"textEnvelopeRawCBOR ∷ TextEnvelope → ByteString","name":"textEnvelopeRawCBOR","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:textEnvelopeRawCBOR"},{"display_html":"data TextEnvelopeError","name":"TextEnvelopeError TextEnvelopeTypeError TextEnvelopeDecodeError TextEnvelopeAesonDecodeError","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:TextEnvelopeError"},{"display_html":"serialiseToTextEnvelope ∷ ∀ a. HasTextEnvelope a ⇒ Maybe TextEnvelopeDescr → a → TextEnvelope","name":"serialiseToTextEnvelope","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:serialiseToTextEnvelope"},{"display_html":"deserialiseFromTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → TextEnvelope → Either TextEnvelopeError a","name":"deserialiseFromTextEnvelope","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:deserialiseFromTextEnvelope"},{"display_html":"readFileTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → FilePath → IO (Either (FileError TextEnvelopeError) a)","name":"readFileTextEnvelope","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:readFileTextEnvelope"},{"display_html":"writeFileTextEnvelope ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ())","name":"writeFileTextEnvelope","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:writeFileTextEnvelope"},{"display_html":"writeFileTextEnvelopeWithOwnerPermissions ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ())","name":"writeFileTextEnvelopeWithOwnerPermissions","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:writeFileTextEnvelopeWithOwnerPermissions"},{"display_html":"readTextEnvelopeFromFile ∷ FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope)","name":"readTextEnvelopeFromFile","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:readTextEnvelopeFromFile"},{"display_html":"readTextEnvelopeOfTypeFromFile ∷ TextEnvelopeType → FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope)","name":"readTextEnvelopeOfTypeFromFile","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:readTextEnvelopeOfTypeFromFile"},{"display_html":"data FromSomeType (c ∷ Type → Constraint) b where","name":"FromSomeType FromSomeType","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:FromSomeType"},{"display_html":"deserialiseFromTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → TextEnvelope → Either TextEnvelopeError b","name":"deserialiseFromTextEnvelopeAnyOf","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:deserialiseFromTextEnvelopeAnyOf"},{"display_html":"readFileTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → FilePath → IO (Either (FileError TextEnvelopeError) b)","name":"readFileTextEnvelopeAnyOf","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#v:readFileTextEnvelopeAnyOf"},{"display_html":"data family AsType t","name":"AsType AsTextEnvelope","module":"Cardano.Api.SerialiseTextEnvelope","link":"Cardano-Api-SerialiseTextEnvelope.html#t:AsType"},{"display_html":"class (Eq (VerificationKey keyrole), Show (VerificationKey keyrole), SerialiseAsRawBytes (Hash keyrole), HasTextEnvelope (VerificationKey keyrole), HasTextEnvelope (SigningKey keyrole)) ⇒ Key keyrole where","name":"Key VerificationKey SigningKey getVerificationKey verificationKeyHash deterministicSigningKey deterministicSigningKeySeedSize","module":"Cardano.Api.Key","link":"Cardano-Api-Key.html#t:Key"},{"display_html":"generateSigningKey ∷ Key keyrole ⇒ AsType keyrole → IO (SigningKey keyrole)","name":"generateSigningKey","module":"Cardano.Api.Key","link":"Cardano-Api-Key.html#v:generateSigningKey"},{"display_html":"class CastVerificationKeyRole keyroleA keyroleB where","name":"CastVerificationKeyRole castVerificationKey","module":"Cardano.Api.Key","link":"Cardano-Api-Key.html#t:CastVerificationKeyRole"},{"display_html":"class CastSigningKeyRole keyroleA keyroleB where","name":"CastSigningKeyRole castSigningKey","module":"Cardano.Api.Key","link":"Cardano-Api-Key.html#t:CastSigningKeyRole"},{"display_html":"data family AsType t","name":"AsType AsVerificationKey AsSigningKey","module":"Cardano.Api.Key","link":"Cardano-Api-Key.html#t:AsType"},{"display_html":"data ShelleyGenesis era = ShelleyGenesis {}","name":"ShelleyGenesis ShelleyGenesis sgActiveSlotsCoeff sgEpochLength sgGenDelegs sgInitialFunds sgMaxKESEvolutions sgMaxLovelaceSupply sgNetworkId sgNetworkMagic sgProtocolParams sgSecurityParam sgSlotLength sgSlotsPerKESPeriod sgStaking sgSystemStart sgUpdateQuorum","module":"Cardano.Api.Shelley.Genesis","link":"Cardano-Api-Shelley-Genesis.html#t:ShelleyGenesis"},{"display_html":"shelleyGenesisDefaults ∷ ShelleyGenesis crypto","name":"shelleyGenesisDefaults","module":"Cardano.Api.Shelley.Genesis","link":"Cardano-Api-Shelley-Genesis.html#v:shelleyGenesisDefaults"},{"display_html":"newtype TxMetadata = TxMetadata (Map Word64 TxMetadataValue)","name":"TxMetadata TxMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadata"},{"display_html":"data TxMetadataValue","name":"TxMetadataValue TxMetaMap TxMetaList TxMetaNumber TxMetaBytes TxMetaText","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadataValue"},{"display_html":"makeTransactionMetadata ∷ Map Word64 TxMetadataValue → TxMetadata","name":"makeTransactionMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:makeTransactionMetadata"},{"display_html":"validateTxMetadata ∷ TxMetadata → Either [(Word64, TxMetadataRangeError)] ()","name":"validateTxMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:validateTxMetadata"},{"display_html":"data TxMetadataRangeError","name":"TxMetadataRangeError TxMetadataNumberOutOfRange TxMetadataBytesTooLong TxMetadataTextTooLong","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadataRangeError"},{"display_html":"data TxMetadataJsonSchema","name":"TxMetadataJsonSchema TxMetadataJsonNoSchema TxMetadataJsonDetailedSchema","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadataJsonSchema"},{"display_html":"metadataFromJson ∷ TxMetadataJsonSchema → Value → Either TxMetadataJsonError TxMetadata","name":"metadataFromJson","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:metadataFromJson"},{"display_html":"metadataToJson ∷ TxMetadataJsonSchema → TxMetadata → Value","name":"metadataToJson","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:metadataToJson"},{"display_html":"metadataValueToJsonNoSchema ∷ TxMetadataValue → Value","name":"metadataValueToJsonNoSchema","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:metadataValueToJsonNoSchema"},{"display_html":"data TxMetadataJsonError","name":"TxMetadataJsonError TxMetadataRangeError TxMetadataJsonSchemaError TxMetadataJsonToplevelNotMap TxMetadataJsonToplevelBadKey","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadataJsonError"},{"display_html":"data TxMetadataJsonSchemaError","name":"TxMetadataJsonSchemaError TxMetadataJsonNullNotAllowed TxMetadataJsonBoolNotAllowed TxMetadataJsonNumberNotInteger TxMetadataJsonTypeMismatch TxMetadataJsonBadObject TxMetadataJsonNotObject TxMetadataJsonBadMapPair","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:TxMetadataJsonSchemaError"},{"display_html":"toShelleyMetadata ∷ Map Word64 TxMetadataValue → Map Word64 Metadatum","name":"toShelleyMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:toShelleyMetadata"},{"display_html":"fromShelleyMetadata ∷ Map Word64 Metadatum → Map Word64 TxMetadataValue","name":"fromShelleyMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:fromShelleyMetadata"},{"display_html":"toShelleyMetadatum ∷ TxMetadataValue → Metadatum","name":"toShelleyMetadatum","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:toShelleyMetadatum"},{"display_html":"fromShelleyMetadatum ∷ Metadatum → TxMetadataValue","name":"fromShelleyMetadatum","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:fromShelleyMetadatum"},{"display_html":"parseAll ∷ Parser a → Text → Maybe a","name":"parseAll","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:parseAll"},{"display_html":"pUnsigned ∷ Parser Integer","name":"pUnsigned","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:pUnsigned"},{"display_html":"pSigned ∷ Parser Integer","name":"pSigned","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:pSigned"},{"display_html":"pBytes ∷ Parser ByteString","name":"pBytes","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#v:pBytes"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsTxMetadata","module":"Cardano.Api.TxMetadata","link":"Cardano-Api-TxMetadata.html#t:AsType"},{"display_html":"renderApplyMempoolPayloadErr ∷ ApplyMempoolPayloadErr → Text","name":"renderApplyMempoolPayloadErr","module":"Cardano.Api.TxSubmit.ErrorRender","link":"Cardano-Api-TxSubmit-ErrorRender.html#v:renderApplyMempoolPayloadErr"},{"display_html":"data NodeApiEnv = NodeApiEnv {}","name":"NodeApiEnv NodeApiEnv naeConfig naeSocket","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#t:NodeApiEnv"},{"display_html":"newtype SocketPath = SocketPath {}","name":"SocketPath SocketPath unSocketPath","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#t:SocketPath"},{"display_html":"data TxSubmitStatus","name":"TxSubmitStatus TxSubmitOk TxSubmitDecodeHex TxSubmitEmpty TxSubmitDecodeFail TxSubmitBadTx TxSubmitFail","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#t:TxSubmitStatus"},{"display_html":"data ApplyMempoolPayloadErr","name":"ApplyMempoolPayloadErr MempoolDlgErr MempoolTxErr MempoolUpdateProposalErr MempoolUpdateVoteErr","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#t:ApplyMempoolPayloadErr"},{"display_html":"renderTxSubmitStatus ∷ TxSubmitStatus → Text","name":"renderTxSubmitStatus","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#v:renderTxSubmitStatus"},{"display_html":"textShow ∷ Show a ⇒ a → Text","name":"textShow","module":"Cardano.Api.TxSubmit.Types","link":"Cardano-Api-TxSubmit-Types.html#v:textShow"},{"display_html":"(?!) ∷ Maybe a → e → Either e a","name":"?!","module":"Cardano.Api.Utils","link":"Cardano-Api-Utils.html#v:-63--33-"},{"display_html":"(?!.) ∷ Either e a → (e → e') → Either e' a","name":"?!.","module":"Cardano.Api.Utils","link":"Cardano-Api-Utils.html#v:-63--33-."},{"display_html":"class (HasTypeProxy a, SerialiseAsRawBytes a) ⇒ SerialiseAsBech32 a where","name":"SerialiseAsBech32 bech32PrefixFor bech32PrefixesPermitted","module":"Cardano.Api.SerialiseBech32","link":"Cardano-Api-SerialiseBech32.html#t:SerialiseAsBech32"},{"display_html":"serialiseToBech32 ∷ SerialiseAsBech32 a ⇒ a → Text","name":"serialiseToBech32","module":"Cardano.Api.SerialiseBech32","link":"Cardano-Api-SerialiseBech32.html#v:serialiseToBech32"},{"display_html":"data Bech32DecodeError","name":"Bech32DecodeError Bech32DecodingError Bech32UnexpectedPrefix Bech32DataPartToBytesError Bech32DeserialiseFromBytesError Bech32WrongPrefix","module":"Cardano.Api.SerialiseBech32","link":"Cardano-Api-SerialiseBech32.html#t:Bech32DecodeError"},{"display_html":"deserialiseFromBech32 ∷ SerialiseAsBech32 a ⇒ AsType a → Text → Either Bech32DecodeError a","name":"deserialiseFromBech32","module":"Cardano.Api.SerialiseBech32","link":"Cardano-Api-SerialiseBech32.html#v:deserialiseFromBech32"},{"display_html":"deserialiseAnyOfFromBech32 ∷ ∀ b. [FromSomeType SerialiseAsBech32 b] → Text → Either Bech32DecodeError b","name":"deserialiseAnyOfFromBech32","module":"Cardano.Api.SerialiseBech32","link":"Cardano-Api-SerialiseBech32.html#v:deserialiseAnyOfFromBech32"},{"display_html":"data PaymentKey","name":"PaymentKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:PaymentKey"},{"display_html":"data PaymentExtendedKey","name":"PaymentExtendedKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:PaymentExtendedKey"},{"display_html":"data StakeKey","name":"StakeKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:StakeKey"},{"display_html":"data StakeExtendedKey","name":"StakeExtendedKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:StakeExtendedKey"},{"display_html":"data StakePoolKey","name":"StakePoolKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:StakePoolKey"},{"display_html":"data GenesisKey","name":"GenesisKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:GenesisKey"},{"display_html":"data GenesisExtendedKey","name":"GenesisExtendedKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:GenesisExtendedKey"},{"display_html":"data GenesisDelegateKey","name":"GenesisDelegateKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:GenesisDelegateKey"},{"display_html":"data GenesisDelegateExtendedKey","name":"GenesisDelegateExtendedKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:GenesisDelegateExtendedKey"},{"display_html":"data GenesisUTxOKey","name":"GenesisUTxOKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:GenesisUTxOKey"},{"display_html":"data family AsType t","name":"AsType AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:AsType"},{"display_html":"data family VerificationKey keyrole ∷ Type","name":"VerificationKey PaymentVerificationKey PaymentExtendedVerificationKey StakeVerificationKey StakeExtendedVerificationKey GenesisVerificationKey GenesisExtendedVerificationKey GenesisDelegateVerificationKey StakePoolVerificationKey GenesisDelegateExtendedVerificationKey GenesisUTxOVerificationKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:VerificationKey"},{"display_html":"data family SigningKey keyrole ∷ Type","name":"SigningKey PaymentSigningKey PaymentExtendedSigningKey StakeSigningKey StakeExtendedSigningKey GenesisSigningKey GenesisExtendedSigningKey GenesisDelegateSigningKey StakePoolSigningKey GenesisDelegateExtendedSigningKey GenesisUTxOSigningKey","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:SigningKey"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash","module":"Cardano.Api.KeysShelley","link":"Cardano-Api-KeysShelley.html#t:Hash"},{"display_html":"data ScriptData","name":"ScriptData ScriptDataConstructor ScriptDataMap ScriptDataList ScriptDataNumber ScriptDataBytes","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:ScriptData"},{"display_html":"validateScriptData ∷ ScriptData → Either ScriptDataRangeError ()","name":"validateScriptData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:validateScriptData"},{"display_html":"data ScriptDataRangeError","name":"ScriptDataRangeError ScriptDataNumberOutOfRange ScriptDataBytesTooLong ScriptDataConstructorOutOfRange","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:ScriptDataRangeError"},{"display_html":"data ScriptDataJsonSchema","name":"ScriptDataJsonSchema ScriptDataJsonNoSchema ScriptDataJsonDetailedSchema","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:ScriptDataJsonSchema"},{"display_html":"scriptDataFromJson ∷ ScriptDataJsonSchema → Value → Either ScriptDataJsonError ScriptData","name":"scriptDataFromJson","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:scriptDataFromJson"},{"display_html":"scriptDataToJson ∷ ScriptDataJsonSchema → ScriptData → Value","name":"scriptDataToJson","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:scriptDataToJson"},{"display_html":"data ScriptDataJsonError","name":"ScriptDataJsonError ScriptDataRangeError ScriptDataJsonSchemaError","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:ScriptDataJsonError"},{"display_html":"data ScriptDataJsonSchemaError","name":"ScriptDataJsonSchemaError ScriptDataJsonNullNotAllowed ScriptDataJsonBoolNotAllowed ScriptDataJsonNumberNotInteger ScriptDataJsonTypeMismatch ScriptDataJsonBadObject ScriptDataJsonNotObject ScriptDataJsonBadMapPair","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:ScriptDataJsonSchemaError"},{"display_html":"toPlutusData ∷ ScriptData → Data","name":"toPlutusData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:toPlutusData"},{"display_html":"fromPlutusData ∷ Data → ScriptData","name":"fromPlutusData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:fromPlutusData"},{"display_html":"toAlonzoData ∷ ScriptData → Data ledgerera","name":"toAlonzoData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:toAlonzoData"},{"display_html":"fromAlonzoData ∷ Data ledgerera → ScriptData","name":"fromAlonzoData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#v:fromAlonzoData"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:AsType"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ScriptDataHash","module":"Cardano.Api.ScriptData","link":"Cardano-Api-ScriptData.html#t:Hash"},{"display_html":"data SimpleScriptV1","name":"SimpleScriptV1","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:SimpleScriptV1"},{"display_html":"data SimpleScriptV2","name":"SimpleScriptV2","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:SimpleScriptV2"},{"display_html":"data ScriptLanguage lang where","name":"ScriptLanguage SimpleScriptLanguage PlutusScriptLanguage","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptLanguage"},{"display_html":"data SimpleScriptVersion lang where","name":"SimpleScriptVersion SimpleScriptV1 SimpleScriptV2","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:SimpleScriptVersion"},{"display_html":"data PlutusScriptVersion lang where","name":"PlutusScriptVersion PlutusScriptV1","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:PlutusScriptVersion"},{"display_html":"data AnyScriptLanguage where","name":"AnyScriptLanguage AnyScriptLanguage","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:AnyScriptLanguage"},{"display_html":"data AnyPlutusScriptVersion where","name":"AnyPlutusScriptVersion AnyPlutusScriptVersion","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:AnyPlutusScriptVersion"},{"display_html":"class HasTypeProxy lang ⇒ IsScriptLanguage lang where","name":"IsScriptLanguage scriptLanguage","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:IsScriptLanguage"},{"display_html":"class IsScriptLanguage lang ⇒ IsSimpleScriptLanguage lang where","name":"IsSimpleScriptLanguage simpleScriptVersion","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:IsSimpleScriptLanguage"},{"display_html":"data Script lang where","name":"Script SimpleScript PlutusScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:Script"},{"display_html":"data ScriptInAnyLang where","name":"ScriptInAnyLang ScriptInAnyLang","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptInAnyLang"},{"display_html":"toScriptInAnyLang ∷ Script lang → ScriptInAnyLang","name":"toScriptInAnyLang","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toScriptInAnyLang"},{"display_html":"data ScriptInEra era where","name":"ScriptInEra ScriptInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptInEra"},{"display_html":"toScriptInEra ∷ CardanoEra era → ScriptInAnyLang → Maybe (ScriptInEra era)","name":"toScriptInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toScriptInEra"},{"display_html":"eraOfScriptInEra ∷ ScriptInEra era → ShelleyBasedEra era","name":"eraOfScriptInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:eraOfScriptInEra"},{"display_html":"data WitCtxTxIn","name":"WitCtxTxIn","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:WitCtxTxIn"},{"display_html":"data WitCtxMint","name":"WitCtxMint","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:WitCtxMint"},{"display_html":"data WitCtxStake","name":"WitCtxStake","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:WitCtxStake"},{"display_html":"data WitCtx witctx where","name":"WitCtx WitCtxTxIn WitCtxMint WitCtxStake","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:WitCtx"},{"display_html":"data ScriptWitness witctx era where","name":"ScriptWitness SimpleScriptWitness PlutusScriptWitness","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptWitness"},{"display_html":"data Witness witctx era where","name":"Witness KeyWitness ScriptWitness","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:Witness"},{"display_html":"data KeyWitnessInCtx witctx where","name":"KeyWitnessInCtx KeyWitnessForSpending KeyWitnessForStakeAddr","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:KeyWitnessInCtx"},{"display_html":"data ScriptWitnessInCtx witctx where","name":"ScriptWitnessInCtx ScriptWitnessForSpending ScriptWitnessForMinting ScriptWitnessForStakeAddr","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptWitnessInCtx"},{"display_html":"data ScriptDatum witctx where","name":"ScriptDatum ScriptDatumForTxIn NoScriptDatumForMint NoScriptDatumForStake","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptDatum"},{"display_html":"type ScriptRedeemer = ScriptData","name":"ScriptRedeemer","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptRedeemer"},{"display_html":"scriptWitnessScript ∷ ScriptWitness witctx era → ScriptInEra era","name":"scriptWitnessScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:scriptWitnessScript"},{"display_html":"data ScriptLanguageInEra lang era where","name":"ScriptLanguageInEra SimpleScriptV1InShelley SimpleScriptV1InAllegra SimpleScriptV1InMary SimpleScriptV1InAlonzo SimpleScriptV2InAllegra SimpleScriptV2InMary SimpleScriptV2InAlonzo PlutusScriptV1InAlonzo","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptLanguageInEra"},{"display_html":"scriptLanguageSupportedInEra ∷ CardanoEra era → ScriptLanguage lang → Maybe (ScriptLanguageInEra lang era)","name":"scriptLanguageSupportedInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:scriptLanguageSupportedInEra"},{"display_html":"languageOfScriptLanguageInEra ∷ ScriptLanguageInEra lang era → ScriptLanguage lang","name":"languageOfScriptLanguageInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:languageOfScriptLanguageInEra"},{"display_html":"eraOfScriptLanguageInEra ∷ ScriptLanguageInEra lang era → ShelleyBasedEra era","name":"eraOfScriptLanguageInEra","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:eraOfScriptLanguageInEra"},{"display_html":"data SimpleScript lang where","name":"SimpleScript RequireAllOf RequireAnyOf RequireMOf RequireSignature RequireTimeBefore RequireTimeAfter","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:SimpleScript"},{"display_html":"data TimeLocksSupported lang where","name":"TimeLocksSupported TimeLocksInSimpleScriptV2","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:TimeLocksSupported"},{"display_html":"timeLocksSupported ∷ SimpleScriptVersion lang → Maybe (TimeLocksSupported lang)","name":"timeLocksSupported","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:timeLocksSupported"},{"display_html":"adjustSimpleScriptVersion ∷ SimpleScriptVersion lang' → SimpleScript lang → Maybe (SimpleScript lang')","name":"adjustSimpleScriptVersion","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:adjustSimpleScriptVersion"},{"display_html":"data PlutusScript lang where","name":"PlutusScript PlutusScriptSerialised","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:PlutusScript"},{"display_html":"examplePlutusScriptAlwaysSucceeds ∷ WitCtx witctx → PlutusScript PlutusScriptV1","name":"examplePlutusScriptAlwaysSucceeds","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:examplePlutusScriptAlwaysSucceeds"},{"display_html":"examplePlutusScriptAlwaysFails ∷ WitCtx witctx → PlutusScript PlutusScriptV1","name":"examplePlutusScriptAlwaysFails","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:examplePlutusScriptAlwaysFails"},{"display_html":"data ScriptData","name":"ScriptData ScriptDataConstructor ScriptDataMap ScriptDataList ScriptDataNumber ScriptDataBytes","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptData"},{"display_html":"data ExecutionUnits = ExecutionUnits {}","name":"ExecutionUnits ExecutionUnits executionSteps executionMemory","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ExecutionUnits"},{"display_html":"newtype ScriptHash = ScriptHash (ScriptHash StandardCrypto)","name":"ScriptHash ScriptHash","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:ScriptHash"},{"display_html":"hashScript ∷ Script lang → ScriptHash","name":"hashScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:hashScript"},{"display_html":"toShelleyScript ∷ ScriptInEra era → Script (ShelleyLedgerEra era)","name":"toShelleyScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toShelleyScript"},{"display_html":"fromShelleyBasedScript ∷ ShelleyBasedEra era → Script (ShelleyLedgerEra era) → ScriptInEra era","name":"fromShelleyBasedScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromShelleyBasedScript"},{"display_html":"toShelleyMultiSig ∷ SimpleScript SimpleScriptV1 → MultiSig StandardCrypto","name":"toShelleyMultiSig","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toShelleyMultiSig"},{"display_html":"fromShelleyMultiSig ∷ MultiSig StandardCrypto → SimpleScript lang","name":"fromShelleyMultiSig","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromShelleyMultiSig"},{"display_html":"toAllegraTimelock ∷ ∀ lang. SimpleScript lang → Timelock StandardCrypto","name":"toAllegraTimelock","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toAllegraTimelock"},{"display_html":"fromAllegraTimelock ∷ TimeLocksSupported lang → Timelock StandardCrypto → SimpleScript lang","name":"fromAllegraTimelock","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromAllegraTimelock"},{"display_html":"toAlonzoExUnits ∷ ExecutionUnits → ExUnits","name":"toAlonzoExUnits","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toAlonzoExUnits"},{"display_html":"fromAlonzoExUnits ∷ ExUnits → ExecutionUnits","name":"fromAlonzoExUnits","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromAlonzoExUnits"},{"display_html":"toShelleyScriptHash ∷ ScriptHash → ScriptHash StandardCrypto","name":"toShelleyScriptHash","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toShelleyScriptHash"},{"display_html":"fromShelleyScriptHash ∷ ScriptHash StandardCrypto → ScriptHash","name":"fromShelleyScriptHash","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromShelleyScriptHash"},{"display_html":"toPlutusData ∷ ScriptData → Data","name":"toPlutusData","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toPlutusData"},{"display_html":"fromPlutusData ∷ Data → ScriptData","name":"fromPlutusData","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromPlutusData"},{"display_html":"toAlonzoData ∷ ScriptData → Data ledgerera","name":"toAlonzoData","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toAlonzoData"},{"display_html":"fromAlonzoData ∷ Data ledgerera → ScriptData","name":"fromAlonzoData","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromAlonzoData"},{"display_html":"toAlonzoLanguage ∷ AnyPlutusScriptVersion → Language","name":"toAlonzoLanguage","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:toAlonzoLanguage"},{"display_html":"fromAlonzoLanguage ∷ Language → AnyPlutusScriptVersion","name":"fromAlonzoLanguage","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#v:fromAlonzoLanguage"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:AsType"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ScriptDataHash","module":"Cardano.Api.Script","link":"Cardano-Api-Script.html#t:Hash"},{"display_html":"data ByronKey","name":"ByronKey","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:ByronKey"},{"display_html":"data ByronKeyLegacy","name":"ByronKeyLegacy","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:ByronKeyLegacy"},{"display_html":"data family AsType t","name":"AsType AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsByronKey AsByronKeyLegacy","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:AsType"},{"display_html":"data family VerificationKey keyrole ∷ Type","name":"VerificationKey PaymentVerificationKey PaymentExtendedVerificationKey StakeVerificationKey StakeExtendedVerificationKey GenesisVerificationKey GenesisExtendedVerificationKey GenesisDelegateVerificationKey StakePoolVerificationKey GenesisDelegateExtendedVerificationKey GenesisUTxOVerificationKey ByronVerificationKey ByronVerificationKeyLegacy","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:VerificationKey"},{"display_html":"data family SigningKey keyrole ∷ Type","name":"SigningKey PaymentSigningKey PaymentExtendedSigningKey StakeSigningKey StakeExtendedSigningKey GenesisSigningKey GenesisExtendedSigningKey GenesisDelegateSigningKey StakePoolSigningKey GenesisDelegateExtendedSigningKey GenesisUTxOSigningKey ByronSigningKeyLegacy ByronSigningKey","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:SigningKey"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ByronKeyHash ByronKeyHashLegacy","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:Hash"},{"display_html":"class IsByronKey key where","name":"IsByronKey byronKeyFormat","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:IsByronKey"},{"display_html":"data ByronKeyFormat key where","name":"ByronKeyFormat ByronLegacyKeyFormat ByronModernKeyFormat","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:ByronKeyFormat"},{"display_html":"data SomeByronSigningKey","name":"SomeByronSigningKey AByronSigningKeyLegacy AByronSigningKey","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#t:SomeByronSigningKey"},{"display_html":"toByronSigningKey ∷ SomeByronSigningKey → SigningKey","name":"toByronSigningKey","module":"Cardano.Api.KeysByron","link":"Cardano-Api-KeysByron.html#v:toByronSigningKey"},{"display_html":"newtype ByronUpdateProposal = ByronUpdateProposal {}","name":"ByronUpdateProposal ByronUpdateProposal unByronUpdateProposal","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#t:ByronUpdateProposal"},{"display_html":"data ByronProtocolParametersUpdate = ByronProtocolParametersUpdate {}","name":"ByronProtocolParametersUpdate ByronProtocolParametersUpdate bPpuScriptVersion bPpuSlotDuration bPpuMaxBlockSize bPpuMaxHeaderSize bPpuMaxTxSize bPpuMaxProposalSize bPpuMpcThd bPpuHeavyDelThd bPpuUpdateVoteThd bPpuUpdateProposalThd bPpuUpdateProposalTTL bPpuSoftforkRule bPpuTxFeePolicy bPpuUnlockStakeEpoch","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#t:ByronProtocolParametersUpdate"},{"display_html":"data family AsType t","name":"AsType AsByronUpdateProposal AsByronVote","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#t:AsType"},{"display_html":"makeProtocolParametersUpdate ∷ ByronProtocolParametersUpdate → ProtocolParametersUpdate","name":"makeProtocolParametersUpdate","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#v:makeProtocolParametersUpdate"},{"display_html":"toByronLedgerUpdateProposal ∷ ByronUpdateProposal → GenTx ByronBlock","name":"toByronLedgerUpdateProposal","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#v:toByronLedgerUpdateProposal"},{"display_html":"newtype ByronVote = ByronVote {}","name":"ByronVote ByronVote unByronVote","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#t:ByronVote"},{"display_html":"makeByronUpdateProposal ∷ NetworkId → ProtocolVersion → SoftwareVersion → SystemTag → InstallerHash → SomeByronSigningKey → ByronProtocolParametersUpdate → ByronUpdateProposal","name":"makeByronUpdateProposal","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#v:makeByronUpdateProposal"},{"display_html":"makeByronVote ∷ NetworkId → SomeByronSigningKey → ByronUpdateProposal → Bool → ByronVote","name":"makeByronVote","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#v:makeByronVote"},{"display_html":"toByronLedgertoByronVote ∷ ByronVote → GenTx ByronBlock","name":"toByronLedgertoByronVote","module":"Cardano.Api.SpecialByron","link":"Cardano-Api-SpecialByron.html#v:toByronLedgertoByronVote"},{"display_html":"data KesKey","name":"KesKey","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:KesKey"},{"display_html":"data VrfKey","name":"VrfKey","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:VrfKey"},{"display_html":"data family AsType t","name":"AsType AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsKesKey AsVrfKey","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:AsType"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash KesKeyHash VrfKeyHash","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:Hash"},{"display_html":"data family VerificationKey keyrole ∷ Type","name":"VerificationKey KesVerificationKey VrfVerificationKey","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:VerificationKey"},{"display_html":"data family SigningKey keyrole ∷ Type","name":"SigningKey KesSigningKey VrfSigningKey","module":"Cardano.Api.KeysPraos","link":"Cardano-Api-KeysPraos.html#t:SigningKey"},{"display_html":"data StakePoolMetadata = StakePoolMetadata {}","name":"StakePoolMetadata StakePoolMetadata stakePoolName stakePoolDescription stakePoolTicker stakePoolHomepage","module":"Cardano.Api.StakePoolMetadata","link":"Cardano-Api-StakePoolMetadata.html#t:StakePoolMetadata"},{"display_html":"validateAndHashStakePoolMetadata ∷ ByteString → Either StakePoolMetadataValidationError (StakePoolMetadata, Hash StakePoolMetadata)","name":"validateAndHashStakePoolMetadata","module":"Cardano.Api.StakePoolMetadata","link":"Cardano-Api-StakePoolMetadata.html#v:validateAndHashStakePoolMetadata"},{"display_html":"data StakePoolMetadataValidationError","name":"StakePoolMetadataValidationError StakePoolMetadataJsonDecodeError StakePoolMetadataInvalidLengthError","module":"Cardano.Api.StakePoolMetadata","link":"Cardano-Api-StakePoolMetadata.html#t:StakePoolMetadataValidationError"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript AsByronKey AsByronKeyLegacy AsKesKey AsVrfKey AsStakePoolMetadata","module":"Cardano.Api.StakePoolMetadata","link":"Cardano-Api-StakePoolMetadata.html#t:AsType"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ScriptDataHash ByronKeyHash ByronKeyHashLegacy KesKeyHash VrfKeyHash StakePoolMetadataHash","module":"Cardano.Api.StakePoolMetadata","link":"Cardano-Api-StakePoolMetadata.html#t:Hash"},{"display_html":"data Address addrtype where","name":"Address ByronAddress ShelleyAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:Address"},{"display_html":"data ByronAddr","name":"ByronAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:ByronAddr"},{"display_html":"makeByronAddress ∷ NetworkId → VerificationKey ByronKey → Address ByronAddr","name":"makeByronAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:makeByronAddress"},{"display_html":"data ShelleyAddr","name":"ShelleyAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:ShelleyAddr"},{"display_html":"makeShelleyAddress ∷ NetworkId → PaymentCredential → StakeAddressReference → Address ShelleyAddr","name":"makeShelleyAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:makeShelleyAddress"},{"display_html":"data PaymentCredential","name":"PaymentCredential PaymentCredentialByKey PaymentCredentialByScript","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:PaymentCredential"},{"display_html":"data StakeAddressReference","name":"StakeAddressReference StakeAddressByValue StakeAddressByPointer NoStakeAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:StakeAddressReference"},{"display_html":"data AddressAny","name":"AddressAny AddressByron AddressShelley","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:AddressAny"},{"display_html":"data AddressInEra era where","name":"AddressInEra AddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:AddressInEra"},{"display_html":"data AddressTypeInEra addrtype era where","name":"AddressTypeInEra ByronAddressInAnyEra ShelleyAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:AddressTypeInEra"},{"display_html":"byronAddressInEra ∷ Address ByronAddr → AddressInEra era","name":"byronAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:byronAddressInEra"},{"display_html":"shelleyAddressInEra ∷ IsShelleyBasedEra era ⇒ Address ShelleyAddr → AddressInEra era","name":"shelleyAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:shelleyAddressInEra"},{"display_html":"anyAddressInShelleyBasedEra ∷ IsShelleyBasedEra era ⇒ AddressAny → AddressInEra era","name":"anyAddressInShelleyBasedEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:anyAddressInShelleyBasedEra"},{"display_html":"anyAddressInEra ∷ CardanoEra era → AddressAny → Maybe (AddressInEra era)","name":"anyAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:anyAddressInEra"},{"display_html":"toAddressAny ∷ Address addr → AddressAny","name":"toAddressAny","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:toAddressAny"},{"display_html":"makeByronAddressInEra ∷ NetworkId → VerificationKey ByronKey → AddressInEra era","name":"makeByronAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:makeByronAddressInEra"},{"display_html":"makeShelleyAddressInEra ∷ IsShelleyBasedEra era ⇒ NetworkId → PaymentCredential → StakeAddressReference → AddressInEra era","name":"makeShelleyAddressInEra","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:makeShelleyAddressInEra"},{"display_html":"data StakeAddress where","name":"StakeAddress StakeAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:StakeAddress"},{"display_html":"data StakeCredential","name":"StakeCredential StakeCredentialByKey StakeCredentialByScript","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:StakeCredential"},{"display_html":"makeStakeAddress ∷ NetworkId → StakeCredential → StakeAddress","name":"makeStakeAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:makeStakeAddress"},{"display_html":"data StakeKey","name":"StakeKey","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:StakeKey"},{"display_html":"data StakeExtendedKey","name":"StakeExtendedKey","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:StakeExtendedKey"},{"display_html":"toShelleyAddr ∷ AddressInEra era → Addr StandardCrypto","name":"toShelleyAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:toShelleyAddr"},{"display_html":"toShelleyStakeAddr ∷ StakeAddress → RewardAcnt StandardCrypto","name":"toShelleyStakeAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:toShelleyStakeAddr"},{"display_html":"toShelleyStakeCredential ∷ StakeCredential → StakeCredential StandardCrypto","name":"toShelleyStakeCredential","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:toShelleyStakeCredential"},{"display_html":"fromShelleyAddr ∷ IsShelleyBasedEra era ⇒ Addr StandardCrypto → AddressInEra era","name":"fromShelleyAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:fromShelleyAddr"},{"display_html":"fromShelleyPaymentCredential ∷ PaymentCredential StandardCrypto → PaymentCredential","name":"fromShelleyPaymentCredential","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:fromShelleyPaymentCredential"},{"display_html":"fromShelleyStakeAddr ∷ RewardAcnt StandardCrypto → StakeAddress","name":"fromShelleyStakeAddr","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:fromShelleyStakeAddr"},{"display_html":"fromShelleyStakeCredential ∷ StakeCredential StandardCrypto → StakeCredential","name":"fromShelleyStakeCredential","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:fromShelleyStakeCredential"},{"display_html":"fromShelleyStakeReference ∷ StakeReference StandardCrypto → StakeAddressReference","name":"fromShelleyStakeReference","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#v:fromShelleyStakeReference"},{"display_html":"class HasTypeProxy addr ⇒ SerialiseAddress addr where","name":"SerialiseAddress serialiseAddress deserialiseAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:SerialiseAddress"},{"display_html":"data family AsType t","name":"AsType AsByronAddr AsShelleyAddr AsByronAddress AsShelleyAddress AsAddress AsAddressAny AsAddressInEra AsStakeAddress","module":"Cardano.Api.Address","link":"Cardano-Api-Address.html#t:AsType"},{"display_html":"newtype Lovelace = Lovelace Integer","name":"Lovelace Lovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:Lovelace"},{"display_html":"newtype Quantity = Quantity Integer","name":"Quantity Quantity","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:Quantity"},{"display_html":"newtype PolicyId = PolicyId ScriptHash","name":"PolicyId PolicyId","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:PolicyId"},{"display_html":"scriptPolicyId ∷ Script lang → PolicyId","name":"scriptPolicyId","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:scriptPolicyId"},{"display_html":"newtype AssetName = AssetName ByteString","name":"AssetName AssetName","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:AssetName"},{"display_html":"data AssetId","name":"AssetId AssetId AdaAssetId","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:AssetId"},{"display_html":"data Value","name":"Value","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:Value"},{"display_html":"selectAsset ∷ Value → AssetId → Quantity","name":"selectAsset","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:selectAsset"},{"display_html":"valueFromList ∷ [(AssetId, Quantity)] → Value","name":"valueFromList","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:valueFromList"},{"display_html":"valueToList ∷ Value → [(AssetId, Quantity)]","name":"valueToList","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:valueToList"},{"display_html":"filterValue ∷ (AssetId → Bool) → Value → Value","name":"filterValue","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:filterValue"},{"display_html":"negateValue ∷ Value → Value","name":"negateValue","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:negateValue"},{"display_html":"calcMinimumDeposit ∷ Value → Lovelace → Lovelace","name":"calcMinimumDeposit","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:calcMinimumDeposit"},{"display_html":"quantityToLovelace ∷ Quantity → Lovelace","name":"quantityToLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:quantityToLovelace"},{"display_html":"lovelaceToQuantity ∷ Lovelace → Quantity","name":"lovelaceToQuantity","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:lovelaceToQuantity"},{"display_html":"selectLovelace ∷ Value → Lovelace","name":"selectLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:selectLovelace"},{"display_html":"lovelaceToValue ∷ Lovelace → Value","name":"lovelaceToValue","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:lovelaceToValue"},{"display_html":"valueToLovelace ∷ Value → Maybe Lovelace","name":"valueToLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:valueToLovelace"},{"display_html":"newtype ValueNestedRep = ValueNestedRep [ValueNestedBundle]","name":"ValueNestedRep ValueNestedRep","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:ValueNestedRep"},{"display_html":"data ValueNestedBundle","name":"ValueNestedBundle ValueNestedBundle ValueNestedBundleAda","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:ValueNestedBundle"},{"display_html":"valueToNestedRep ∷ Value → ValueNestedRep","name":"valueToNestedRep","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:valueToNestedRep"},{"display_html":"valueFromNestedRep ∷ ValueNestedRep → Value","name":"valueFromNestedRep","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:valueFromNestedRep"},{"display_html":"toByronLovelace ∷ Lovelace → Maybe Lovelace","name":"toByronLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:toByronLovelace"},{"display_html":"fromByronLovelace ∷ Lovelace → Lovelace","name":"fromByronLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:fromByronLovelace"},{"display_html":"toShelleyLovelace ∷ Lovelace → Coin","name":"toShelleyLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:toShelleyLovelace"},{"display_html":"fromShelleyLovelace ∷ Coin → Lovelace","name":"fromShelleyLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:fromShelleyLovelace"},{"display_html":"fromShelleyDeltaLovelace ∷ DeltaCoin → Lovelace","name":"fromShelleyDeltaLovelace","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:fromShelleyDeltaLovelace"},{"display_html":"toMaryValue ∷ Value → Value StandardCrypto","name":"toMaryValue","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:toMaryValue"},{"display_html":"fromMaryValue ∷ Value StandardCrypto → Value","name":"fromMaryValue","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#v:fromMaryValue"},{"display_html":"data family AsType t","name":"AsType AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript AsPolicyId AsAssetName","module":"Cardano.Api.Value","link":"Cardano-Api-Value.html#t:AsType"},{"display_html":"data ProtocolParameters = ProtocolParameters {}","name":"ProtocolParameters ProtocolParameters protocolParamProtocolVersion protocolParamDecentralization protocolParamExtraPraosEntropy protocolParamMaxBlockHeaderSize protocolParamMaxBlockBodySize protocolParamMaxTxSize protocolParamTxFeeFixed protocolParamTxFeePerByte protocolParamMinUTxOValue protocolParamStakeAddressDeposit protocolParamStakePoolDeposit protocolParamMinPoolCost protocolParamPoolRetireMaxEpoch protocolParamStakePoolTargetNum protocolParamPoolPledgeInfluence protocolParamMonetaryExpansion protocolParamTreasuryCut protocolParamUTxOCostPerWord protocolParamCostModels protocolParamPrices protocolParamMaxTxExUnits protocolParamMaxBlockExUnits protocolParamMaxValueSize protocolParamCollateralPercent protocolParamMaxCollateralInputs","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:ProtocolParameters"},{"display_html":"data EpochNo","name":"EpochNo","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:EpochNo"},{"display_html":"data ProtocolParametersUpdate = ProtocolParametersUpdate {}","name":"ProtocolParametersUpdate ProtocolParametersUpdate protocolUpdateProtocolVersion protocolUpdateDecentralization protocolUpdateExtraPraosEntropy protocolUpdateMaxBlockHeaderSize protocolUpdateMaxBlockBodySize protocolUpdateMaxTxSize protocolUpdateTxFeeFixed protocolUpdateTxFeePerByte protocolUpdateMinUTxOValue protocolUpdateStakeAddressDeposit protocolUpdateStakePoolDeposit protocolUpdateMinPoolCost protocolUpdatePoolRetireMaxEpoch protocolUpdateStakePoolTargetNum protocolUpdatePoolPledgeInfluence protocolUpdateMonetaryExpansion protocolUpdateTreasuryCut protocolUpdateUTxOCostPerWord protocolUpdateCostModels protocolUpdatePrices protocolUpdateMaxTxExUnits protocolUpdateMaxBlockExUnits protocolUpdateMaxValueSize protocolUpdateCollateralPercent protocolUpdateMaxCollateralInputs","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:ProtocolParametersUpdate"},{"display_html":"data PraosNonce","name":"PraosNonce","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:PraosNonce"},{"display_html":"makePraosNonce ∷ ByteString → PraosNonce","name":"makePraosNonce","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:makePraosNonce"},{"display_html":"data ExecutionUnits = ExecutionUnits {}","name":"ExecutionUnits ExecutionUnits executionSteps executionMemory","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:ExecutionUnits"},{"display_html":"data ExecutionUnitPrices = ExecutionUnitPrices {}","name":"ExecutionUnitPrices ExecutionUnitPrices priceExecutionSteps priceExecutionMemory","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:ExecutionUnitPrices"},{"display_html":"newtype CostModel = CostModel (Map Text Integer)","name":"CostModel CostModel","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:CostModel"},{"display_html":"validateCostModel ∷ PlutusScriptVersion lang → CostModel → Either InvalidCostModel ()","name":"validateCostModel","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:validateCostModel"},{"display_html":"data UpdateProposal = UpdateProposal !(Map (Hash GenesisKey) ProtocolParametersUpdate) !EpochNo","name":"UpdateProposal UpdateProposal","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:UpdateProposal"},{"display_html":"makeShelleyUpdateProposal ∷ ProtocolParametersUpdate → [Hash GenesisKey] → EpochNo → UpdateProposal","name":"makeShelleyUpdateProposal","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:makeShelleyUpdateProposal"},{"display_html":"toLedgerUpdate ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → UpdateProposal → Update ledgerera","name":"toLedgerUpdate","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:toLedgerUpdate"},{"display_html":"fromLedgerUpdate ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → Update ledgerera → UpdateProposal","name":"fromLedgerUpdate","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:fromLedgerUpdate"},{"display_html":"toLedgerProposedPPUpdates ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → Map (Hash GenesisKey) ProtocolParametersUpdate → ProposedPPUpdates ledgerera","name":"toLedgerProposedPPUpdates","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:toLedgerProposedPPUpdates"},{"display_html":"fromLedgerProposedPPUpdates ∷ ∀ era ledgerera. ShelleyLedgerEra era ~ ledgerera ⇒ Crypto ledgerera ~ StandardCrypto ⇒ ShelleyBasedEra era → ProposedPPUpdates ledgerera → Map (Hash GenesisKey) ProtocolParametersUpdate","name":"fromLedgerProposedPPUpdates","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:fromLedgerProposedPPUpdates"},{"display_html":"toLedgerPParams ∷ ShelleyBasedEra era → ProtocolParameters → PParams (ShelleyLedgerEra era)","name":"toLedgerPParams","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:toLedgerPParams"},{"display_html":"fromLedgerPParams ∷ ShelleyBasedEra era → PParams (ShelleyLedgerEra era) → ProtocolParameters","name":"fromLedgerPParams","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:fromLedgerPParams"},{"display_html":"fromShelleyPParams ∷ PParams ledgerera → ProtocolParameters","name":"fromShelleyPParams","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:fromShelleyPParams"},{"display_html":"toAlonzoPrices ∷ ExecutionUnitPrices → Prices","name":"toAlonzoPrices","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:toAlonzoPrices"},{"display_html":"fromAlonzoPrices ∷ Prices → ExecutionUnitPrices","name":"fromAlonzoPrices","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#v:fromAlonzoPrices"},{"display_html":"data family AsType t","name":"AsType AsByronAddr AsShelleyAddr AsByronAddress AsShelleyAddress AsAddress AsAddressAny AsAddressInEra AsStakeAddress AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsTxMetadata AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript AsByronKey AsByronKeyLegacy AsKesKey AsVrfKey AsStakePoolMetadata AsPolicyId AsAssetName AsUpdateProposal","module":"Cardano.Api.ProtocolParameters","link":"Cardano-Api-ProtocolParameters.html#t:AsType"},{"display_html":"data GenesisParameters = GenesisParameters {}","name":"GenesisParameters GenesisParameters protocolParamSystemStart protocolParamNetworkId protocolParamActiveSlotsCoefficient protocolParamSecurity protocolParamEpochLength protocolParamSlotLength protocolParamSlotsPerKESPeriod protocolParamMaxKESEvolutions protocolParamUpdateQuorum protocolParamMaxLovelaceSupply protocolInitialUpdateableProtocolParameters","module":"Cardano.Api.GenesisParameters","link":"Cardano-Api-GenesisParameters.html#t:GenesisParameters"},{"display_html":"newtype EpochSize = EpochSize {}","name":"EpochSize EpochSize unEpochSize","module":"Cardano.Api.GenesisParameters","link":"Cardano-Api-GenesisParameters.html#t:EpochSize"},{"display_html":"fromShelleyGenesis ∷ ShelleyGenesis era → GenesisParameters","name":"fromShelleyGenesis","module":"Cardano.Api.GenesisParameters","link":"Cardano-Api-GenesisParameters.html#v:fromShelleyGenesis"},{"display_html":"data Certificate","name":"Certificate StakeAddressRegistrationCertificate StakeAddressDeregistrationCertificate StakeAddressDelegationCertificate StakePoolRegistrationCertificate StakePoolRetirementCertificate GenesisKeyDelegationCertificate MIRCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:Certificate"},{"display_html":"makeStakeAddressRegistrationCertificate ∷ StakeCredential → Certificate","name":"makeStakeAddressRegistrationCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeStakeAddressRegistrationCertificate"},{"display_html":"makeStakeAddressDeregistrationCertificate ∷ StakeCredential → Certificate","name":"makeStakeAddressDeregistrationCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeStakeAddressDeregistrationCertificate"},{"display_html":"makeStakeAddressDelegationCertificate ∷ StakeCredential → PoolId → Certificate","name":"makeStakeAddressDelegationCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeStakeAddressDelegationCertificate"},{"display_html":"type PoolId = Hash StakePoolKey","name":"PoolId","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:PoolId"},{"display_html":"makeStakePoolRegistrationCertificate ∷ StakePoolParameters → Certificate","name":"makeStakePoolRegistrationCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeStakePoolRegistrationCertificate"},{"display_html":"makeStakePoolRetirementCertificate ∷ PoolId → EpochNo → Certificate","name":"makeStakePoolRetirementCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeStakePoolRetirementCertificate"},{"display_html":"data StakePoolParameters = StakePoolParameters {}","name":"StakePoolParameters StakePoolParameters stakePoolId stakePoolVRF stakePoolCost stakePoolMargin stakePoolRewardAccount stakePoolPledge stakePoolOwners stakePoolRelays stakePoolMetadata","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:StakePoolParameters"},{"display_html":"data StakePoolRelay","name":"StakePoolRelay StakePoolRelayIp StakePoolRelayDnsARecord StakePoolRelayDnsSrvRecord","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:StakePoolRelay"},{"display_html":"data StakePoolMetadataReference = StakePoolMetadataReference {}","name":"StakePoolMetadataReference StakePoolMetadataReference stakePoolMetadataURL stakePoolMetadataHash","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:StakePoolMetadataReference"},{"display_html":"makeMIRCertificate ∷ MIRPot → MIRTarget → Certificate","name":"makeMIRCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeMIRCertificate"},{"display_html":"makeGenesisKeyDelegationCertificate ∷ Hash GenesisKey → Hash GenesisDelegateKey → Hash VrfKey → Certificate","name":"makeGenesisKeyDelegationCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:makeGenesisKeyDelegationCertificate"},{"display_html":"data MIRTarget","name":"MIRTarget StakeAddressesMIR SendToReservesMIR SendToTreasuryMIR","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:MIRTarget"},{"display_html":"toShelleyCertificate ∷ Certificate → DCert StandardCrypto","name":"toShelleyCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:toShelleyCertificate"},{"display_html":"fromShelleyCertificate ∷ DCert StandardCrypto → Certificate","name":"fromShelleyCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:fromShelleyCertificate"},{"display_html":"toShelleyPoolParams ∷ StakePoolParameters → PoolParams StandardCrypto","name":"toShelleyPoolParams","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#v:toShelleyPoolParams"},{"display_html":"data family AsType t","name":"AsType AsByronAddr AsShelleyAddr AsByronAddress AsShelleyAddress AsAddress AsAddressAny AsAddressInEra AsStakeAddress AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTextEnvelope AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript AsByronKey AsByronKeyLegacy AsKesKey AsVrfKey AsStakePoolMetadata AsPolicyId AsAssetName AsCertificate","module":"Cardano.Api.Certificate","link":"Cardano-Api-Certificate.html#t:AsType"},{"display_html":"data TxBody era where","name":"TxBody TxBody ByronTxBody ShelleyTxBody","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxBody"},{"display_html":"makeTransactionBody ∷ ∀ era. IsCardanoEra era ⇒ TxBodyContent BuildTx era → Either (TxBodyError era) (TxBody era)","name":"makeTransactionBody","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:makeTransactionBody"},{"display_html":"data TxBodyContent build era = TxBodyContent {}","name":"TxBodyContent TxBodyContent txMetadata txFee txIns txInsCollateral txOuts txValidityRange txAuxScripts txAuxScriptData txExtraKeyWits txProtocolParams txWithdrawals txCertificates txUpdateProposal txMintValue","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxBodyContent"},{"display_html":"data TxBodyError era","name":"TxBodyError TxBodyEmptyTxIns TxBodyEmptyTxInsCollateral TxBodyEmptyTxOuts TxBodyOutputNegative TxBodyOutputOverflow TxBodyMetadataError TxBodyMintAdaError TxBodyAuxDataHashInvalidError TxBodyMintBeforeMaryError TxBodyMissingProtocolParams","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxBodyError"},{"display_html":"data TxBodyScriptData era where","name":"TxBodyScriptData TxBodyScriptData TxBodyNoScriptData","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxBodyScriptData"},{"display_html":"newtype TxId = TxId (Hash StandardCrypto EraIndependentTxBody)","name":"TxId TxId","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxId"},{"display_html":"getTxId ∷ ∀ era. TxBody era → TxId","name":"getTxId","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:getTxId"},{"display_html":"data TxIn = TxIn TxId TxIx","name":"TxIn TxIn","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxIn"},{"display_html":"newtype TxIx = TxIx Word","name":"TxIx TxIx","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxIx"},{"display_html":"genesisUTxOPseudoTxIn ∷ NetworkId → Hash GenesisUTxOKey → TxIn","name":"genesisUTxOPseudoTxIn","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:genesisUTxOPseudoTxIn"},{"display_html":"data TxOut era = TxOut (AddressInEra era) (TxOutValue era) (TxOutDatumHash era)","name":"TxOut TxOut","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxOut"},{"display_html":"data TxOutValue era where","name":"TxOutValue TxOutValue TxOutAdaOnly","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxOutValue"},{"display_html":"serialiseAddressForTxOut ∷ AddressInEra era → Text","name":"serialiseAddressForTxOut","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:serialiseAddressForTxOut"},{"display_html":"data TxOutDatumHash era where","name":"TxOutDatumHash TxOutDatumHash TxOutDatumHashNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxOutDatumHash"},{"display_html":"data TxInsCollateral era where","name":"TxInsCollateral TxInsCollateral TxInsCollateralNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxInsCollateral"},{"display_html":"data TxFee era where","name":"TxFee TxFeeImplicit TxFeeExplicit","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxFee"},{"display_html":"data TxValidityLowerBound era where","name":"TxValidityLowerBound TxValidityLowerBound TxValidityNoLowerBound","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxValidityLowerBound"},{"display_html":"data TxValidityUpperBound era where","name":"TxValidityUpperBound TxValidityUpperBound TxValidityNoUpperBound","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxValidityUpperBound"},{"display_html":"data TxMetadataInEra era where","name":"TxMetadataInEra TxMetadataInEra TxMetadataNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxMetadataInEra"},{"display_html":"data TxAuxScripts era where","name":"TxAuxScripts TxAuxScripts TxAuxScriptsNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxAuxScripts"},{"display_html":"data TxAuxScriptData era where","name":"TxAuxScriptData TxAuxScriptData TxAuxScriptDataNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxAuxScriptData"},{"display_html":"data TxExtraKeyWitnesses era where","name":"TxExtraKeyWitnesses TxExtraKeyWitnesses TxExtraKeyWitnessesNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxExtraKeyWitnesses"},{"display_html":"data TxWithdrawals build era where","name":"TxWithdrawals TxWithdrawals TxWithdrawalsNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxWithdrawals"},{"display_html":"data TxCertificates build era where","name":"TxCertificates TxCertificates TxCertificatesNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxCertificates"},{"display_html":"data TxUpdateProposal era where","name":"TxUpdateProposal TxUpdateProposal TxUpdateProposalNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxUpdateProposal"},{"display_html":"data TxMintValue build era where","name":"TxMintValue TxMintValue TxMintNone","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxMintValue"},{"display_html":"data BuildTxWith build a where","name":"BuildTxWith BuildTxWith ViewTx","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:BuildTxWith"},{"display_html":"data BuildTx","name":"BuildTx","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:BuildTx"},{"display_html":"data ViewTx","name":"ViewTx","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:ViewTx"},{"display_html":"data CollateralSupportedInEra era where","name":"CollateralSupportedInEra CollateralInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:CollateralSupportedInEra"},{"display_html":"data MultiAssetSupportedInEra era where","name":"MultiAssetSupportedInEra MultiAssetInMaryEra MultiAssetInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:MultiAssetSupportedInEra"},{"display_html":"data OnlyAdaSupportedInEra era where","name":"OnlyAdaSupportedInEra AdaOnlyInByronEra AdaOnlyInShelleyEra AdaOnlyInAllegraEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:OnlyAdaSupportedInEra"},{"display_html":"data TxFeesExplicitInEra era where","name":"TxFeesExplicitInEra TxFeesExplicitInShelleyEra TxFeesExplicitInAllegraEra TxFeesExplicitInMaryEra TxFeesExplicitInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxFeesExplicitInEra"},{"display_html":"data TxFeesImplicitInEra era where","name":"TxFeesImplicitInEra TxFeesImplicitInByronEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxFeesImplicitInEra"},{"display_html":"data ValidityUpperBoundSupportedInEra era where","name":"ValidityUpperBoundSupportedInEra ValidityUpperBoundInShelleyEra ValidityUpperBoundInAllegraEra ValidityUpperBoundInMaryEra ValidityUpperBoundInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:ValidityUpperBoundSupportedInEra"},{"display_html":"data ValidityNoUpperBoundSupportedInEra era where","name":"ValidityNoUpperBoundSupportedInEra ValidityNoUpperBoundInByronEra ValidityNoUpperBoundInAllegraEra ValidityNoUpperBoundInMaryEra ValidityNoUpperBoundInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:ValidityNoUpperBoundSupportedInEra"},{"display_html":"data ValidityLowerBoundSupportedInEra era where","name":"ValidityLowerBoundSupportedInEra ValidityLowerBoundInAllegraEra ValidityLowerBoundInMaryEra ValidityLowerBoundInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:ValidityLowerBoundSupportedInEra"},{"display_html":"data TxMetadataSupportedInEra era where","name":"TxMetadataSupportedInEra TxMetadataInShelleyEra TxMetadataInAllegraEra TxMetadataInMaryEra TxMetadataInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxMetadataSupportedInEra"},{"display_html":"data AuxScriptsSupportedInEra era where","name":"AuxScriptsSupportedInEra AuxScriptsInAllegraEra AuxScriptsInMaryEra AuxScriptsInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:AuxScriptsSupportedInEra"},{"display_html":"data TxExtraKeyWitnessesSupportedInEra era where","name":"TxExtraKeyWitnessesSupportedInEra ExtraKeyWitnessesInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:TxExtraKeyWitnessesSupportedInEra"},{"display_html":"data ScriptDataSupportedInEra era where","name":"ScriptDataSupportedInEra ScriptDataInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:ScriptDataSupportedInEra"},{"display_html":"data WithdrawalsSupportedInEra era where","name":"WithdrawalsSupportedInEra WithdrawalsInShelleyEra WithdrawalsInAllegraEra WithdrawalsInMaryEra WithdrawalsInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:WithdrawalsSupportedInEra"},{"display_html":"data CertificatesSupportedInEra era where","name":"CertificatesSupportedInEra CertificatesInShelleyEra CertificatesInAllegraEra CertificatesInMaryEra CertificatesInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:CertificatesSupportedInEra"},{"display_html":"data UpdateProposalSupportedInEra era where","name":"UpdateProposalSupportedInEra UpdateProposalInShelleyEra UpdateProposalInAllegraEra UpdateProposalInMaryEra UpdateProposalInAlonzoEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:UpdateProposalSupportedInEra"},{"display_html":"collateralSupportedInEra ∷ CardanoEra era → Maybe (CollateralSupportedInEra era)","name":"collateralSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:collateralSupportedInEra"},{"display_html":"multiAssetSupportedInEra ∷ CardanoEra era → Either (OnlyAdaSupportedInEra era) (MultiAssetSupportedInEra era)","name":"multiAssetSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:multiAssetSupportedInEra"},{"display_html":"txFeesExplicitInEra ∷ CardanoEra era → Either (TxFeesImplicitInEra era) (TxFeesExplicitInEra era)","name":"txFeesExplicitInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:txFeesExplicitInEra"},{"display_html":"validityUpperBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityUpperBoundSupportedInEra era)","name":"validityUpperBoundSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:validityUpperBoundSupportedInEra"},{"display_html":"validityNoUpperBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityNoUpperBoundSupportedInEra era)","name":"validityNoUpperBoundSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:validityNoUpperBoundSupportedInEra"},{"display_html":"validityLowerBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityLowerBoundSupportedInEra era)","name":"validityLowerBoundSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:validityLowerBoundSupportedInEra"},{"display_html":"txMetadataSupportedInEra ∷ CardanoEra era → Maybe (TxMetadataSupportedInEra era)","name":"txMetadataSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:txMetadataSupportedInEra"},{"display_html":"auxScriptsSupportedInEra ∷ CardanoEra era → Maybe (AuxScriptsSupportedInEra era)","name":"auxScriptsSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:auxScriptsSupportedInEra"},{"display_html":"extraKeyWitnessesSupportedInEra ∷ CardanoEra era → Maybe (TxExtraKeyWitnessesSupportedInEra era)","name":"extraKeyWitnessesSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:extraKeyWitnessesSupportedInEra"},{"display_html":"scriptDataSupportedInEra ∷ CardanoEra era → Maybe (ScriptDataSupportedInEra era)","name":"scriptDataSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:scriptDataSupportedInEra"},{"display_html":"withdrawalsSupportedInEra ∷ CardanoEra era → Maybe (WithdrawalsSupportedInEra era)","name":"withdrawalsSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:withdrawalsSupportedInEra"},{"display_html":"certificatesSupportedInEra ∷ CardanoEra era → Maybe (CertificatesSupportedInEra era)","name":"certificatesSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:certificatesSupportedInEra"},{"display_html":"updateProposalSupportedInEra ∷ CardanoEra era → Maybe (UpdateProposalSupportedInEra era)","name":"updateProposalSupportedInEra","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:updateProposalSupportedInEra"},{"display_html":"toShelleyTxId ∷ TxId → TxId StandardCrypto","name":"toShelleyTxId","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:toShelleyTxId"},{"display_html":"toShelleyTxIn ∷ TxIn → TxIn StandardCrypto","name":"toShelleyTxIn","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:toShelleyTxIn"},{"display_html":"toShelleyTxOut ∷ ∀ era ledgerera. (ShelleyLedgerEra era ~ ledgerera, IsShelleyBasedEra era, ShelleyBased ledgerera) ⇒ TxOut era → TxOut ledgerera","name":"toShelleyTxOut","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:toShelleyTxOut"},{"display_html":"fromShelleyTxId ∷ TxId StandardCrypto → TxId","name":"fromShelleyTxId","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:fromShelleyTxId"},{"display_html":"fromShelleyTxIn ∷ TxIn StandardCrypto → TxIn","name":"fromShelleyTxIn","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:fromShelleyTxIn"},{"display_html":"fromShelleyTxOut ∷ TxOut StandardShelley → TxOut ShelleyEra","name":"fromShelleyTxOut","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:fromShelleyTxOut"},{"display_html":"fromTxOut ∷ ShelleyLedgerEra era ~ ledgerera ⇒ ShelleyBasedEra era → TxOut ledgerera → TxOut era","name":"fromTxOut","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:fromTxOut"},{"display_html":"data family AsType t","name":"AsType AsTxId AsTxBody AsByronTxBody AsShelleyTxBody AsMaryTxBody","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#t:AsType"},{"display_html":"fromByronTxIn ∷ TxIn → TxIn","name":"fromByronTxIn","module":"Cardano.Api.TxBody","link":"Cardano-Api-TxBody.html#v:fromByronTxIn"},{"display_html":"data Tx era where","name":"Tx Tx ByronTx ShelleyTx","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:Tx"},{"display_html":"getTxBody ∷ ∀ era. Tx era → TxBody era","name":"getTxBody","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:getTxBody"},{"display_html":"getTxWitnesses ∷ ∀ era. Tx era → [KeyWitness era]","name":"getTxWitnesses","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:getTxWitnesses"},{"display_html":"data ShelleySigningKey","name":"ShelleySigningKey ShelleyExtendedSigningKey ShelleyNormalSigningKey","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:ShelleySigningKey"},{"display_html":"toShelleySigningKey ∷ ShelleyWitnessSigningKey → ShelleySigningKey","name":"toShelleySigningKey","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:toShelleySigningKey"},{"display_html":"signByronTransaction ∷ NetworkId → TxBody ByronEra → [SigningKey ByronKey] → Tx ByronEra","name":"signByronTransaction","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:signByronTransaction"},{"display_html":"signShelleyTransaction ∷ IsShelleyBasedEra era ⇒ TxBody era → [ShelleyWitnessSigningKey] → Tx era","name":"signShelleyTransaction","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:signShelleyTransaction"},{"display_html":"makeSignedTransaction ∷ ∀ era. [KeyWitness era] → TxBody era → Tx era","name":"makeSignedTransaction","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:makeSignedTransaction"},{"display_html":"data KeyWitness era where","name":"KeyWitness ByronKeyWitness ShelleyBootstrapWitness ShelleyKeyWitness","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:KeyWitness"},{"display_html":"makeByronKeyWitness ∷ ∀ key. IsByronKey key ⇒ NetworkId → TxBody ByronEra → SigningKey key → KeyWitness ByronEra","name":"makeByronKeyWitness","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:makeByronKeyWitness"},{"display_html":"data ShelleyWitnessSigningKey","name":"ShelleyWitnessSigningKey WitnessPaymentKey WitnessPaymentExtendedKey WitnessStakeKey WitnessStakeExtendedKey WitnessStakePoolKey WitnessGenesisKey WitnessGenesisExtendedKey WitnessGenesisDelegateKey WitnessGenesisDelegateExtendedKey WitnessGenesisUTxOKey","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:ShelleyWitnessSigningKey"},{"display_html":"makeShelleyKeyWitness ∷ ∀ era. IsShelleyBasedEra era ⇒ TxBody era → ShelleyWitnessSigningKey → KeyWitness era","name":"makeShelleyKeyWitness","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:makeShelleyKeyWitness"},{"display_html":"data WitnessNetworkIdOrByronAddress","name":"WitnessNetworkIdOrByronAddress WitnessNetworkId WitnessByronAddress","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:WitnessNetworkIdOrByronAddress"},{"display_html":"makeShelleyBootstrapWitness ∷ ∀ era. IsShelleyBasedEra era ⇒ WitnessNetworkIdOrByronAddress → TxBody era → SigningKey ByronKey → KeyWitness era","name":"makeShelleyBootstrapWitness","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:makeShelleyBootstrapWitness"},{"display_html":"makeShelleySignature ∷ SignableRepresentation tosign ⇒ tosign → ShelleySigningKey → SignedDSIGN StandardCrypto tosign","name":"makeShelleySignature","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:makeShelleySignature"},{"display_html":"getShelleyKeyWitnessVerificationKey ∷ ShelleySigningKey → VKey Witness StandardCrypto","name":"getShelleyKeyWitnessVerificationKey","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#v:getShelleyKeyWitnessVerificationKey"},{"display_html":"data family AsType t","name":"AsType AsTx AsByronTx AsShelleyTx AsKeyWitness AsByronWitness AsShelleyWitness","module":"Cardano.Api.Tx","link":"Cardano-Api-Tx.html#t:AsType"},{"display_html":"data TxInMode mode where","name":"TxInMode TxInMode TxInByronSpecial","module":"Cardano.Api.TxInMode","link":"Cardano-Api-TxInMode.html#t:TxInMode"},{"display_html":"toConsensusGenTx ∷ ConsensusBlockForMode mode ~ block ⇒ TxInMode mode → GenTx block","name":"toConsensusGenTx","module":"Cardano.Api.TxInMode","link":"Cardano-Api-TxInMode.html#v:toConsensusGenTx"},{"display_html":"data TxValidationError era where","name":"TxValidationError ByronTxValidationError ShelleyTxValidationError","module":"Cardano.Api.TxInMode","link":"Cardano-Api-TxInMode.html#t:TxValidationError"},{"display_html":"data TxValidationErrorInMode mode where","name":"TxValidationErrorInMode TxValidationErrorInMode TxValidationEraMismatch","module":"Cardano.Api.TxInMode","link":"Cardano-Api-TxInMode.html#t:TxValidationErrorInMode"},{"display_html":"fromConsensusApplyTxErr ∷ ConsensusBlockForMode mode ~ block ⇒ ConsensusMode mode → ApplyTxErr block → TxValidationErrorInMode mode","name":"fromConsensusApplyTxErr","module":"Cardano.Api.TxInMode","link":"Cardano-Api-TxInMode.html#v:fromConsensusApplyTxErr"},{"display_html":"transactionFee ∷ ∀ era. IsShelleyBasedEra era ⇒ Natural → Natural → Tx era → Lovelace","name":"transactionFee","module":"Cardano.Api.Fees","link":"Cardano-Api-Fees.html#v:transactionFee"},{"display_html":"estimateTransactionFee ∷ ∀ era. IsShelleyBasedEra era ⇒ NetworkId → Natural → Natural → Tx era → Int → Int → Int → Int → Lovelace","name":"estimateTransactionFee","module":"Cardano.Api.Fees","link":"Cardano-Api-Fees.html#v:estimateTransactionFee"},{"display_html":"data Block era where","name":"Block Block ByronBlock ShelleyBlock","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:Block"},{"display_html":"data BlockHeader = BlockHeader !SlotNo !(Hash BlockHeader) !BlockNo","name":"BlockHeader BlockHeader","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:BlockHeader"},{"display_html":"data BlockInMode mode where","name":"BlockInMode BlockInMode","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:BlockInMode"},{"display_html":"fromConsensusBlock ∷ ConsensusBlockForMode mode ~ block ⇒ ConsensusMode mode → block → BlockInMode mode","name":"fromConsensusBlock","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:fromConsensusBlock"},{"display_html":"data ChainPoint","name":"ChainPoint ChainPoint ChainPointAtGenesis","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:ChainPoint"},{"display_html":"newtype SlotNo = SlotNo {}","name":"SlotNo SlotNo unSlotNo","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:SlotNo"},{"display_html":"newtype EpochNo = EpochNo {}","name":"EpochNo EpochNo unEpochNo","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:EpochNo"},{"display_html":"toConsensusPoint ∷ ∀ ledgerera. ShelleyBasedEra ledgerera ⇒ ChainPoint → Point (ShelleyBlock ledgerera)","name":"toConsensusPoint","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:toConsensusPoint"},{"display_html":"fromConsensusPoint ∷ ∀ ledgerera. ShelleyBasedEra ledgerera ⇒ Point (ShelleyBlock ledgerera) → ChainPoint","name":"fromConsensusPoint","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:fromConsensusPoint"},{"display_html":"toConsensusPointInMode ∷ ConsensusMode mode → ChainPoint → Point (ConsensusBlockForMode mode)","name":"toConsensusPointInMode","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:toConsensusPointInMode"},{"display_html":"fromConsensusPointInMode ∷ ConsensusMode mode → Point (ConsensusBlockForMode mode) → ChainPoint","name":"fromConsensusPointInMode","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:fromConsensusPointInMode"},{"display_html":"data ChainTip","name":"ChainTip ChainTip ChainTipAtGenesis","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:ChainTip"},{"display_html":"newtype BlockNo = BlockNo {}","name":"BlockNo BlockNo unBlockNo","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:BlockNo"},{"display_html":"chainTipToChainPoint ∷ ChainTip → ChainPoint","name":"chainTipToChainPoint","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:chainTipToChainPoint"},{"display_html":"fromConsensusTip ∷ ConsensusBlockForMode mode ~ block ⇒ ConsensusMode mode → Tip block → ChainTip","name":"fromConsensusTip","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#v:fromConsensusTip"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash HeaderHash","module":"Cardano.Api.Block","link":"Cardano-Api-Block.html#t:Hash"},{"display_html":"data QueryInMode mode result where","name":"QueryInMode QueryInEra QueryCurrentEra QueryEraHistory","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:QueryInMode"},{"display_html":"data QueryInEra era result where","name":"QueryInEra QueryInShelleyBasedEra QueryByronUpdateState","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:QueryInEra"},{"display_html":"data QueryInShelleyBasedEra era result where","name":"QueryInShelleyBasedEra QueryChainPoint QueryEpoch QueryGenesisParameters QueryProtocolParameters QueryProtocolParametersUpdate QueryStakeDistribution QueryUTxO QueryStakeAddresses QueryDebugLedgerState QueryProtocolState","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:QueryInShelleyBasedEra"},{"display_html":"newtype UTxO era = UTxO (Map TxIn (TxOut era))","name":"UTxO UTxO","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:UTxO"},{"display_html":"toConsensusQuery ∷ ∀ mode block result. ConsensusBlockForMode mode ~ block ⇒ QueryInMode mode result → Some (Query block)","name":"toConsensusQuery","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#v:toConsensusQuery"},{"display_html":"fromConsensusQueryResult ∷ ∀ mode block result result'. ConsensusBlockForMode mode ~ block ⇒ QueryInMode mode result → Query block result' → result' → result","name":"fromConsensusQueryResult","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#v:fromConsensusQueryResult"},{"display_html":"newtype SerialisedDebugLedgerState era = SerialisedDebugLedgerState (Serialised (NewEpochState (ShelleyLedgerEra era)))","name":"SerialisedDebugLedgerState SerialisedDebugLedgerState","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:SerialisedDebugLedgerState"},{"display_html":"newtype ProtocolState era = ProtocolState (Serialised (ChainDepState (Crypto (ShelleyLedgerEra era))))","name":"ProtocolState ProtocolState","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:ProtocolState"},{"display_html":"data DebugLedgerState era where","name":"DebugLedgerState DebugLedgerState","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:DebugLedgerState"},{"display_html":"data EraHistory mode where","name":"EraHistory EraHistory","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:EraHistory"},{"display_html":"newtype SlotsInEpoch = SlotsInEpoch Word64","name":"SlotsInEpoch SlotsInEpoch","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:SlotsInEpoch"},{"display_html":"newtype SlotsToEpochEnd = SlotsToEpochEnd Word64","name":"SlotsToEpochEnd SlotsToEpochEnd","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#t:SlotsToEpochEnd"},{"display_html":"slotToEpoch ∷ SlotNo → EraHistory mode → Either PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd)","name":"slotToEpoch","module":"Cardano.Api.Query","link":"Cardano-Api-Query.html#v:slotToEpoch"},{"display_html":"connectToLocalNode ∷ LocalNodeConnectInfo mode → LocalNodeClientProtocolsInMode mode → IO ()","name":"connectToLocalNode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:connectToLocalNode"},{"display_html":"data LocalNodeConnectInfo mode = LocalNodeConnectInfo {}","name":"LocalNodeConnectInfo LocalNodeConnectInfo localConsensusModeParams localNodeNetworkId localNodeSocketPath","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalNodeConnectInfo"},{"display_html":"localConsensusMode ∷ LocalNodeConnectInfo mode → ConsensusMode mode","name":"localConsensusMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:localConsensusMode"},{"display_html":"data LocalNodeClientProtocols block point tip tx txerr query m = LocalNodeClientProtocols {}","name":"LocalNodeClientProtocols LocalNodeClientProtocols localChainSyncClient localTxSubmissionClient localStateQueryClient","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalNodeClientProtocols"},{"display_html":"data LocalChainSyncClient block point tip m","name":"LocalChainSyncClient LocalChainSyncClient LocalChainSyncClientPipelined NoLocalChainSyncClient","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalChainSyncClient"},{"display_html":"type LocalNodeClientProtocolsInMode mode = LocalNodeClientProtocols (BlockInMode mode) ChainPoint ChainTip (TxInMode mode) (TxValidationErrorInMode mode) (QueryInMode mode) IO","name":"LocalNodeClientProtocolsInMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalNodeClientProtocolsInMode"},{"display_html":"data ByronMode","name":"ByronMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ByronMode"},{"display_html":"data ShelleyMode","name":"ShelleyMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ShelleyMode"},{"display_html":"data CardanoMode","name":"CardanoMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:CardanoMode"},{"display_html":"data ConsensusModeParams mode where","name":"ConsensusModeParams CardanoModeParams ByronModeParams ShelleyModeParams","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ConsensusModeParams"},{"display_html":"newtype EpochSlots = EpochSlots {}","name":"EpochSlots EpochSlots unEpochSlots","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:EpochSlots"},{"display_html":"newtype ChainSyncClient header point tip (m ∷ Type → Type) a = ChainSyncClient {}","name":"ChainSyncClient ChainSyncClient runChainSyncClient","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ChainSyncClient"},{"display_html":"newtype ChainSyncClientPipelined header point tip (m ∷ Type → Type) a = ChainSyncClientPipelined {}","name":"ChainSyncClientPipelined ChainSyncClientPipelined runChainSyncClientPipelined","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ChainSyncClientPipelined"},{"display_html":"data BlockInMode mode where","name":"BlockInMode BlockInMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:BlockInMode"},{"display_html":"newtype LocalTxSubmissionClient tx reject (m ∷ Type → Type) a = LocalTxSubmissionClient {}","name":"LocalTxSubmissionClient LocalTxSubmissionClient runLocalTxSubmissionClient","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalTxSubmissionClient"},{"display_html":"data TxInMode mode where","name":"TxInMode TxInMode TxInByronSpecial","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:TxInMode"},{"display_html":"data TxValidationErrorInMode mode where","name":"TxValidationErrorInMode TxValidationErrorInMode TxValidationEraMismatch","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:TxValidationErrorInMode"},{"display_html":"data TxValidationError era","name":"TxValidationError","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:TxValidationError"},{"display_html":"submitTxToNodeLocal ∷ ∀ mode. LocalNodeConnectInfo mode → TxInMode mode → IO (SubmitResult (TxValidationErrorInMode mode))","name":"submitTxToNodeLocal","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:submitTxToNodeLocal"},{"display_html":"data SubmitResult reason","name":"SubmitResult SubmitFail SubmitSuccess","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:SubmitResult"},{"display_html":"newtype LocalStateQueryClient block point (query ∷ Type → Type) (m ∷ Type → Type) a = LocalStateQueryClient {}","name":"LocalStateQueryClient LocalStateQueryClient runLocalStateQueryClient","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:LocalStateQueryClient"},{"display_html":"data AcquireFailure","name":"AcquireFailure AcquireFailurePointNotOnChain AcquireFailurePointTooOld","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:AcquireFailure"},{"display_html":"data QueryInMode mode result where","name":"QueryInMode QueryInEra QueryCurrentEra QueryEraHistory","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:QueryInMode"},{"display_html":"data QueryInEra era result where","name":"QueryInEra QueryInShelleyBasedEra QueryByronUpdateState","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:QueryInEra"},{"display_html":"data QueryInShelleyBasedEra era result where","name":"QueryInShelleyBasedEra QueryChainPoint QueryEpoch QueryGenesisParameters QueryProtocolParameters QueryProtocolParametersUpdate QueryStakeDistribution QueryUTxO QueryStakeAddresses QueryDebugLedgerState QueryProtocolState","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:QueryInShelleyBasedEra"},{"display_html":"queryNodeLocalState ∷ ∀ mode result. LocalNodeConnectInfo mode → Maybe ChainPoint → QueryInMode mode result → IO (Either AcquireFailure result)","name":"queryNodeLocalState","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:queryNodeLocalState"},{"display_html":"getLocalChainTip ∷ LocalNodeConnectInfo mode → IO ChainTip","name":"getLocalChainTip","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:getLocalChainTip"},{"display_html":"data ConsensusMode mode where","name":"ConsensusMode CardanoMode ByronMode ShelleyMode","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#t:ConsensusMode"},{"display_html":"consensusModeOnly ∷ ConsensusModeParams mode → ConsensusMode mode","name":"consensusModeOnly","module":"Cardano.Api.IPC","link":"Cardano-Api-IPC.html#v:consensusModeOnly"},{"display_html":"data Env = Env {}","name":"Env Env envLedgerConfig envProtocolConfig","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#t:Env"},{"display_html":"envSecurityParam ∷ Env → Word64","name":"envSecurityParam","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:envSecurityParam"},{"display_html":"newtype LedgerState where","name":"LedgerState LedgerStateByron LedgerStateShelley LedgerStateAllegra LedgerStateMary LedgerState clsState","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#t:LedgerState"},{"display_html":"initialLedgerState ∷ FilePath → ExceptT InitialLedgerStateError IO (Env, LedgerState)","name":"initialLedgerState","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:initialLedgerState"},{"display_html":"applyBlock ∷ Env → LedgerState → Bool → Block era → Either Text LedgerState","name":"applyBlock","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:applyBlock"},{"display_html":"foldBlocks ∷ ∀ a. FilePath → FilePath → NetworkId → Bool → a → (Env → LedgerState → BlockInMode CardanoMode → a → IO a) → ExceptT FoldBlocksError IO a","name":"foldBlocks","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:foldBlocks"},{"display_html":"data FoldBlocksError","name":"FoldBlocksError FoldBlocksInitialLedgerStateError FoldBlocksApplyBlockError","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#t:FoldBlocksError"},{"display_html":"data GenesisConfigError","name":"GenesisConfigError NECardanoConfig NEError NEByronConfig NEShelleyConfig","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#t:GenesisConfigError"},{"display_html":"data InitialLedgerStateError","name":"InitialLedgerStateError ILSEConfigFile ILSEGenesisFile ILSELedgerConsensusConfig","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#t:InitialLedgerStateError"},{"display_html":"renderFoldBlocksError ∷ FoldBlocksError → Text","name":"renderFoldBlocksError","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:renderFoldBlocksError"},{"display_html":"renderGenesisConfigError ∷ GenesisConfigError → Text","name":"renderGenesisConfigError","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:renderGenesisConfigError"},{"display_html":"renderInitialLedgerStateError ∷ InitialLedgerStateError → Text","name":"renderInitialLedgerStateError","module":"Cardano.Api.LedgerState","link":"Cardano-Api-LedgerState.html#v:renderInitialLedgerStateError"},{"display_html":"data OperationalCertificate = OperationalCertificate !(OCert StandardCrypto) !(VerificationKey StakePoolKey)","name":"OperationalCertificate OperationalCertificate","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#t:OperationalCertificate"},{"display_html":"data OperationalCertificateIssueCounter = OperationalCertificateIssueCounter !Word64 !(VerificationKey StakePoolKey)","name":"OperationalCertificateIssueCounter OperationalCertificateIssueCounter","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#t:OperationalCertificateIssueCounter"},{"display_html":"newtype KESPeriod = KESPeriod {}","name":"KESPeriod KESPeriod unKESPeriod","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#t:KESPeriod"},{"display_html":"data OperationalCertIssueError = OperationalCertKeyMismatch (VerificationKey StakePoolKey) (VerificationKey StakePoolKey)","name":"OperationalCertIssueError OperationalCertKeyMismatch","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#t:OperationalCertIssueError"},{"display_html":"issueOperationalCertificate ∷ VerificationKey KesKey → Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) → KESPeriod → OperationalCertificateIssueCounter → Either OperationalCertIssueError (OperationalCertificate, OperationalCertificateIssueCounter)","name":"issueOperationalCertificate","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#v:issueOperationalCertificate"},{"display_html":"data family AsType t","name":"AsType AsByronAddr AsShelleyAddr AsByronAddress AsShelleyAddress AsAddress AsAddressAny AsAddressInEra AsStakeAddress AsByronEra AsShelleyEra AsAllegraEra AsMaryEra AsAlonzoEra AsByron AsShelley AsAllegra AsMary AsHash AsVerificationKey AsSigningKey AsTx AsByronTx AsShelleyTx AsKeyWitness AsByronWitness AsShelleyWitness AsTextEnvelope AsTxMetadata AsPaymentKey AsPaymentExtendedKey AsStakeKey AsStakeExtendedKey AsGenesisKey AsGenesisExtendedKey AsGenesisDelegateKey AsGenesisDelegateExtendedKey AsGenesisUTxOKey AsStakePoolKey AsScriptData AsSimpleScriptV1 AsSimpleScriptV2 AsPlutusScriptV1 AsScript AsScriptInAnyLang AsScriptInEra AsScriptHash AsSimpleScript AsPlutusScript AsByronKey AsByronKeyLegacy AsKesKey AsVrfKey AsStakePoolMetadata AsPolicyId AsAssetName AsUpdateProposal AsCertificate AsOperationalCertificate AsOperationalCertificateIssueCounter","module":"Cardano.Api.OperationalCertificate","link":"Cardano-Api-OperationalCertificate.html#t:AsType"},{"display_html":"data ByronEra","name":"ByronEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ByronEra"},{"display_html":"data ShelleyEra","name":"ShelleyEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ShelleyEra"},{"display_html":"data AllegraEra","name":"AllegraEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AllegraEra"},{"display_html":"data MaryEra","name":"MaryEra","module":"Cardano.Api","link":"Cardano-Api.html#t:MaryEra"},{"display_html":"data AlonzoEra","name":"AlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AlonzoEra"},{"display_html":"data CardanoEra era where","name":"CardanoEra ByronEra ShelleyEra AllegraEra MaryEra AlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:CardanoEra"},{"display_html":"class HasTypeProxy era ⇒ IsCardanoEra era where","name":"IsCardanoEra cardanoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:IsCardanoEra"},{"display_html":"data AnyCardanoEra where","name":"AnyCardanoEra AnyCardanoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AnyCardanoEra"},{"display_html":"anyCardanoEra ∷ CardanoEra era → AnyCardanoEra","name":"anyCardanoEra","module":"Cardano.Api","link":"Cardano-Api.html#v:anyCardanoEra"},{"display_html":"data InAnyCardanoEra thing where","name":"InAnyCardanoEra InAnyCardanoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:InAnyCardanoEra"},{"display_html":"data ShelleyBasedEra era where","name":"ShelleyBasedEra ShelleyBasedEraShelley ShelleyBasedEraAllegra ShelleyBasedEraMary ShelleyBasedEraAlonzo","module":"Cardano.Api","link":"Cardano-Api.html#t:ShelleyBasedEra"},{"display_html":"class (IsCardanoEra era, Crypto (ShelleyLedgerEra era) ~ StandardCrypto) ⇒ IsShelleyBasedEra era where","name":"IsShelleyBasedEra shelleyBasedEra","module":"Cardano.Api","link":"Cardano-Api.html#t:IsShelleyBasedEra"},{"display_html":"data InAnyShelleyBasedEra thing where","name":"InAnyShelleyBasedEra InAnyShelleyBasedEra","module":"Cardano.Api","link":"Cardano-Api.html#t:InAnyShelleyBasedEra"},{"display_html":"data CardanoEraStyle era where","name":"CardanoEraStyle ShelleyBasedEra LegacyByronEra","module":"Cardano.Api","link":"Cardano-Api.html#t:CardanoEraStyle"},{"display_html":"cardanoEraStyle ∷ CardanoEra era → CardanoEraStyle era","name":"cardanoEraStyle","module":"Cardano.Api","link":"Cardano-Api.html#v:cardanoEraStyle"},{"display_html":"type Byron = ByronEra","name":"Byron","module":"Cardano.Api","link":"Cardano-Api.html#t:Byron"},{"display_html":"type Shelley = ShelleyEra","name":"Shelley","module":"Cardano.Api","link":"Cardano-Api.html#t:Shelley"},{"display_html":"type Allegra = AllegraEra","name":"Allegra","module":"Cardano.Api","link":"Cardano-Api.html#t:Allegra"},{"display_html":"type Mary = MaryEra","name":"Mary","module":"Cardano.Api","link":"Cardano-Api.html#t:Mary"},{"display_html":"class HasTypeProxy t where","name":"HasTypeProxy AsType proxyToAsType","module":"Cardano.Api","link":"Cardano-Api.html#t:HasTypeProxy"},{"display_html":"class (Eq (VerificationKey keyrole), Show (VerificationKey keyrole), SerialiseAsRawBytes (Hash keyrole), HasTextEnvelope (VerificationKey keyrole), HasTextEnvelope (SigningKey keyrole)) ⇒ Key keyrole","name":"Key","module":"Cardano.Api","link":"Cardano-Api.html#t:Key"},{"display_html":"data family VerificationKey keyrole ∷ Type","name":"VerificationKey","module":"Cardano.Api","link":"Cardano-Api.html#t:VerificationKey"},{"display_html":"getVerificationKey ∷ Key keyrole ⇒ SigningKey keyrole → VerificationKey keyrole","name":"getVerificationKey","module":"Cardano.Api","link":"Cardano-Api.html#v:getVerificationKey"},{"display_html":"verificationKeyHash ∷ Key keyrole ⇒ VerificationKey keyrole → Hash keyrole","name":"verificationKeyHash","module":"Cardano.Api","link":"Cardano-Api.html#v:verificationKeyHash"},{"display_html":"castVerificationKey ∷ CastVerificationKeyRole keyroleA keyroleB ⇒ VerificationKey keyroleA → VerificationKey keyroleB","name":"castVerificationKey","module":"Cardano.Api","link":"Cardano-Api.html#v:castVerificationKey"},{"display_html":"castSigningKey ∷ CastSigningKeyRole keyroleA keyroleB ⇒ SigningKey keyroleA → SigningKey keyroleB","name":"castSigningKey","module":"Cardano.Api","link":"Cardano-Api.html#v:castSigningKey"},{"display_html":"generateSigningKey ∷ Key keyrole ⇒ AsType keyrole → IO (SigningKey keyrole)","name":"generateSigningKey","module":"Cardano.Api","link":"Cardano-Api.html#v:generateSigningKey"},{"display_html":"deterministicSigningKey ∷ Key keyrole ⇒ AsType keyrole → Seed → SigningKey keyrole","name":"deterministicSigningKey","module":"Cardano.Api","link":"Cardano-Api.html#v:deterministicSigningKey"},{"display_html":"deterministicSigningKeySeedSize ∷ Key keyrole ⇒ AsType keyrole → Word","name":"deterministicSigningKeySeedSize","module":"Cardano.Api","link":"Cardano-Api.html#v:deterministicSigningKeySeedSize"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash","module":"Cardano.Api","link":"Cardano-Api.html#t:Hash"},{"display_html":"castHash ∷ CastHash roleA roleB ⇒ Hash roleA → Hash roleB","name":"castHash","module":"Cardano.Api","link":"Cardano-Api.html#v:castHash"},{"display_html":"data Address addrtype","name":"Address","module":"Cardano.Api","link":"Cardano-Api.html#t:Address"},{"display_html":"data ByronAddr","name":"ByronAddr","module":"Cardano.Api","link":"Cardano-Api.html#t:ByronAddr"},{"display_html":"data ShelleyAddr","name":"ShelleyAddr","module":"Cardano.Api","link":"Cardano-Api.html#t:ShelleyAddr"},{"display_html":"data NetworkId","name":"NetworkId Mainnet Testnet","module":"Cardano.Api","link":"Cardano-Api.html#t:NetworkId"},{"display_html":"makeByronAddress ∷ NetworkId → VerificationKey ByronKey → Address ByronAddr","name":"makeByronAddress","module":"Cardano.Api","link":"Cardano-Api.html#v:makeByronAddress"},{"display_html":"data ByronKey","name":"ByronKey","module":"Cardano.Api","link":"Cardano-Api.html#t:ByronKey"},{"display_html":"data ByronKeyLegacy","name":"ByronKeyLegacy","module":"Cardano.Api","link":"Cardano-Api.html#t:ByronKeyLegacy"},{"display_html":"makeShelleyAddress ∷ NetworkId → PaymentCredential → StakeAddressReference → Address ShelleyAddr","name":"makeShelleyAddress","module":"Cardano.Api","link":"Cardano-Api.html#v:makeShelleyAddress"},{"display_html":"data PaymentCredential","name":"PaymentCredential PaymentCredentialByKey PaymentCredentialByScript","module":"Cardano.Api","link":"Cardano-Api.html#t:PaymentCredential"},{"display_html":"data StakeAddressReference","name":"StakeAddressReference StakeAddressByValue StakeAddressByPointer NoStakeAddress","module":"Cardano.Api","link":"Cardano-Api.html#t:StakeAddressReference"},{"display_html":"data PaymentKey","name":"PaymentKey","module":"Cardano.Api","link":"Cardano-Api.html#t:PaymentKey"},{"display_html":"data PaymentExtendedKey","name":"PaymentExtendedKey","module":"Cardano.Api","link":"Cardano-Api.html#t:PaymentExtendedKey"},{"display_html":"data AddressAny","name":"AddressAny AddressByron AddressShelley","module":"Cardano.Api","link":"Cardano-Api.html#t:AddressAny"},{"display_html":"data AddressInEra era where","name":"AddressInEra AddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AddressInEra"},{"display_html":"data AddressTypeInEra addrtype era where","name":"AddressTypeInEra ByronAddressInAnyEra ShelleyAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AddressTypeInEra"},{"display_html":"byronAddressInEra ∷ Address ByronAddr → AddressInEra era","name":"byronAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:byronAddressInEra"},{"display_html":"shelleyAddressInEra ∷ IsShelleyBasedEra era ⇒ Address ShelleyAddr → AddressInEra era","name":"shelleyAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:shelleyAddressInEra"},{"display_html":"anyAddressInShelleyBasedEra ∷ IsShelleyBasedEra era ⇒ AddressAny → AddressInEra era","name":"anyAddressInShelleyBasedEra","module":"Cardano.Api","link":"Cardano-Api.html#v:anyAddressInShelleyBasedEra"},{"display_html":"anyAddressInEra ∷ CardanoEra era → AddressAny → Maybe (AddressInEra era)","name":"anyAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:anyAddressInEra"},{"display_html":"toAddressAny ∷ Address addr → AddressAny","name":"toAddressAny","module":"Cardano.Api","link":"Cardano-Api.html#v:toAddressAny"},{"display_html":"makeByronAddressInEra ∷ NetworkId → VerificationKey ByronKey → AddressInEra era","name":"makeByronAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:makeByronAddressInEra"},{"display_html":"makeShelleyAddressInEra ∷ IsShelleyBasedEra era ⇒ NetworkId → PaymentCredential → StakeAddressReference → AddressInEra era","name":"makeShelleyAddressInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:makeShelleyAddressInEra"},{"display_html":"data StakeAddress","name":"StakeAddress","module":"Cardano.Api","link":"Cardano-Api.html#t:StakeAddress"},{"display_html":"data StakeCredential","name":"StakeCredential","module":"Cardano.Api","link":"Cardano-Api.html#t:StakeCredential"},{"display_html":"makeStakeAddress ∷ NetworkId → StakeCredential → StakeAddress","name":"makeStakeAddress","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakeAddress"},{"display_html":"data StakeKey","name":"StakeKey","module":"Cardano.Api","link":"Cardano-Api.html#t:StakeKey"},{"display_html":"data StakeExtendedKey","name":"StakeExtendedKey","module":"Cardano.Api","link":"Cardano-Api.html#t:StakeExtendedKey"},{"display_html":"data Lovelace","name":"Lovelace","module":"Cardano.Api","link":"Cardano-Api.html#t:Lovelace"},{"display_html":"newtype Quantity = Quantity Integer","name":"Quantity Quantity","module":"Cardano.Api","link":"Cardano-Api.html#t:Quantity"},{"display_html":"newtype PolicyId = PolicyId ScriptHash","name":"PolicyId PolicyId","module":"Cardano.Api","link":"Cardano-Api.html#t:PolicyId"},{"display_html":"scriptPolicyId ∷ Script lang → PolicyId","name":"scriptPolicyId","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptPolicyId"},{"display_html":"newtype AssetName = AssetName ByteString","name":"AssetName AssetName","module":"Cardano.Api","link":"Cardano-Api.html#t:AssetName"},{"display_html":"data AssetId","name":"AssetId AssetId AdaAssetId","module":"Cardano.Api","link":"Cardano-Api.html#t:AssetId"},{"display_html":"data Value","name":"Value","module":"Cardano.Api","link":"Cardano-Api.html#t:Value"},{"display_html":"selectAsset ∷ Value → AssetId → Quantity","name":"selectAsset","module":"Cardano.Api","link":"Cardano-Api.html#v:selectAsset"},{"display_html":"valueFromList ∷ [(AssetId, Quantity)] → Value","name":"valueFromList","module":"Cardano.Api","link":"Cardano-Api.html#v:valueFromList"},{"display_html":"valueToList ∷ Value → [(AssetId, Quantity)]","name":"valueToList","module":"Cardano.Api","link":"Cardano-Api.html#v:valueToList"},{"display_html":"filterValue ∷ (AssetId → Bool) → Value → Value","name":"filterValue","module":"Cardano.Api","link":"Cardano-Api.html#v:filterValue"},{"display_html":"negateValue ∷ Value → Value","name":"negateValue","module":"Cardano.Api","link":"Cardano-Api.html#v:negateValue"},{"display_html":"newtype ValueNestedRep = ValueNestedRep [ValueNestedBundle]","name":"ValueNestedRep ValueNestedRep","module":"Cardano.Api","link":"Cardano-Api.html#t:ValueNestedRep"},{"display_html":"data ValueNestedBundle","name":"ValueNestedBundle ValueNestedBundle ValueNestedBundleAda","module":"Cardano.Api","link":"Cardano-Api.html#t:ValueNestedBundle"},{"display_html":"valueToNestedRep ∷ Value → ValueNestedRep","name":"valueToNestedRep","module":"Cardano.Api","link":"Cardano-Api.html#v:valueToNestedRep"},{"display_html":"valueFromNestedRep ∷ ValueNestedRep → Value","name":"valueFromNestedRep","module":"Cardano.Api","link":"Cardano-Api.html#v:valueFromNestedRep"},{"display_html":"quantityToLovelace ∷ Quantity → Lovelace","name":"quantityToLovelace","module":"Cardano.Api","link":"Cardano-Api.html#v:quantityToLovelace"},{"display_html":"lovelaceToQuantity ∷ Lovelace → Quantity","name":"lovelaceToQuantity","module":"Cardano.Api","link":"Cardano-Api.html#v:lovelaceToQuantity"},{"display_html":"selectLovelace ∷ Value → Lovelace","name":"selectLovelace","module":"Cardano.Api","link":"Cardano-Api.html#v:selectLovelace"},{"display_html":"lovelaceToValue ∷ Lovelace → Value","name":"lovelaceToValue","module":"Cardano.Api","link":"Cardano-Api.html#v:lovelaceToValue"},{"display_html":"valueToLovelace ∷ Value → Maybe Lovelace","name":"valueToLovelace","module":"Cardano.Api","link":"Cardano-Api.html#v:valueToLovelace"},{"display_html":"data Block era where","name":"Block Block","module":"Cardano.Api","link":"Cardano-Api.html#t:Block"},{"display_html":"data BlockHeader = BlockHeader !SlotNo !(Hash BlockHeader) !BlockNo","name":"BlockHeader BlockHeader","module":"Cardano.Api","link":"Cardano-Api.html#t:BlockHeader"},{"display_html":"data ChainPoint","name":"ChainPoint ChainPoint ChainPointAtGenesis","module":"Cardano.Api","link":"Cardano-Api.html#t:ChainPoint"},{"display_html":"newtype EpochNo = EpochNo {}","name":"EpochNo EpochNo unEpochNo","module":"Cardano.Api","link":"Cardano-Api.html#t:EpochNo"},{"display_html":"data ChainTip","name":"ChainTip ChainTip ChainTipAtGenesis","module":"Cardano.Api","link":"Cardano-Api.html#t:ChainTip"},{"display_html":"newtype BlockNo = BlockNo {}","name":"BlockNo BlockNo unBlockNo","module":"Cardano.Api","link":"Cardano-Api.html#t:BlockNo"},{"display_html":"chainTipToChainPoint ∷ ChainTip → ChainPoint","name":"chainTipToChainPoint","module":"Cardano.Api","link":"Cardano-Api.html#v:chainTipToChainPoint"},{"display_html":"data TxBody era where","name":"TxBody TxBody","module":"Cardano.Api","link":"Cardano-Api.html#t:TxBody"},{"display_html":"makeTransactionBody ∷ ∀ era. IsCardanoEra era ⇒ TxBodyContent BuildTx era → Either (TxBodyError era) (TxBody era)","name":"makeTransactionBody","module":"Cardano.Api","link":"Cardano-Api.html#v:makeTransactionBody"},{"display_html":"data TxBodyContent build era = TxBodyContent {}","name":"TxBodyContent TxBodyContent txMetadata txFee txIns txInsCollateral txOuts txValidityRange txAuxScripts txAuxScriptData txExtraKeyWits txProtocolParams txWithdrawals txCertificates txUpdateProposal txMintValue","module":"Cardano.Api","link":"Cardano-Api.html#t:TxBodyContent"},{"display_html":"data TxBodyError era","name":"TxBodyError TxBodyEmptyTxIns TxBodyEmptyTxInsCollateral TxBodyEmptyTxOuts TxBodyOutputNegative TxBodyOutputOverflow TxBodyMetadataError TxBodyMintAdaError TxBodyAuxDataHashInvalidError TxBodyMintBeforeMaryError TxBodyMissingProtocolParams","module":"Cardano.Api","link":"Cardano-Api.html#t:TxBodyError"},{"display_html":"newtype TxId = TxId (Hash StandardCrypto EraIndependentTxBody)","name":"TxId TxId","module":"Cardano.Api","link":"Cardano-Api.html#t:TxId"},{"display_html":"getTxId ∷ ∀ era. TxBody era → TxId","name":"getTxId","module":"Cardano.Api","link":"Cardano-Api.html#v:getTxId"},{"display_html":"data TxIn = TxIn TxId TxIx","name":"TxIn TxIn","module":"Cardano.Api","link":"Cardano-Api.html#t:TxIn"},{"display_html":"newtype TxIx = TxIx Word","name":"TxIx TxIx","module":"Cardano.Api","link":"Cardano-Api.html#t:TxIx"},{"display_html":"data TxOut era = TxOut (AddressInEra era) (TxOutValue era) (TxOutDatumHash era)","name":"TxOut TxOut","module":"Cardano.Api","link":"Cardano-Api.html#t:TxOut"},{"display_html":"data TxOutValue era where","name":"TxOutValue TxOutValue TxOutAdaOnly","module":"Cardano.Api","link":"Cardano-Api.html#t:TxOutValue"},{"display_html":"serialiseAddressForTxOut ∷ AddressInEra era → Text","name":"serialiseAddressForTxOut","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseAddressForTxOut"},{"display_html":"data TxOutDatumHash era where","name":"TxOutDatumHash TxOutDatumHash TxOutDatumHashNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxOutDatumHash"},{"display_html":"data TxInsCollateral era where","name":"TxInsCollateral TxInsCollateral TxInsCollateralNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxInsCollateral"},{"display_html":"data TxFee era where","name":"TxFee TxFeeImplicit TxFeeExplicit","module":"Cardano.Api","link":"Cardano-Api.html#t:TxFee"},{"display_html":"data TxValidityLowerBound era where","name":"TxValidityLowerBound TxValidityLowerBound TxValidityNoLowerBound","module":"Cardano.Api","link":"Cardano-Api.html#t:TxValidityLowerBound"},{"display_html":"data TxValidityUpperBound era where","name":"TxValidityUpperBound TxValidityUpperBound TxValidityNoUpperBound","module":"Cardano.Api","link":"Cardano-Api.html#t:TxValidityUpperBound"},{"display_html":"newtype SlotNo = SlotNo {}","name":"SlotNo SlotNo unSlotNo","module":"Cardano.Api","link":"Cardano-Api.html#t:SlotNo"},{"display_html":"newtype EpochSlots = EpochSlots {}","name":"EpochSlots EpochSlots unEpochSlots","module":"Cardano.Api","link":"Cardano-Api.html#t:EpochSlots"},{"display_html":"data TxMetadataInEra era where","name":"TxMetadataInEra TxMetadataInEra TxMetadataNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataInEra"},{"display_html":"data TxAuxScripts era where","name":"TxAuxScripts TxAuxScripts TxAuxScriptsNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxAuxScripts"},{"display_html":"data TxAuxScriptData era where","name":"TxAuxScriptData TxAuxScriptData TxAuxScriptDataNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxAuxScriptData"},{"display_html":"data TxExtraKeyWitnesses era where","name":"TxExtraKeyWitnesses TxExtraKeyWitnesses TxExtraKeyWitnessesNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxExtraKeyWitnesses"},{"display_html":"data TxWithdrawals build era where","name":"TxWithdrawals TxWithdrawals TxWithdrawalsNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxWithdrawals"},{"display_html":"data TxCertificates build era where","name":"TxCertificates TxCertificates TxCertificatesNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxCertificates"},{"display_html":"data TxUpdateProposal era where","name":"TxUpdateProposal TxUpdateProposal TxUpdateProposalNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxUpdateProposal"},{"display_html":"data TxMintValue build era where","name":"TxMintValue TxMintValue TxMintNone","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMintValue"},{"display_html":"data BuildTxWith build a where","name":"BuildTxWith BuildTxWith ViewTx","module":"Cardano.Api","link":"Cardano-Api.html#t:BuildTxWith"},{"display_html":"data BuildTx","name":"BuildTx","module":"Cardano.Api","link":"Cardano-Api.html#t:BuildTx"},{"display_html":"data ViewTx","name":"ViewTx","module":"Cardano.Api","link":"Cardano-Api.html#t:ViewTx"},{"display_html":"data CollateralSupportedInEra era where","name":"CollateralSupportedInEra CollateralInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:CollateralSupportedInEra"},{"display_html":"data MultiAssetSupportedInEra era where","name":"MultiAssetSupportedInEra MultiAssetInMaryEra MultiAssetInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:MultiAssetSupportedInEra"},{"display_html":"data OnlyAdaSupportedInEra era where","name":"OnlyAdaSupportedInEra AdaOnlyInByronEra AdaOnlyInShelleyEra AdaOnlyInAllegraEra","module":"Cardano.Api","link":"Cardano-Api.html#t:OnlyAdaSupportedInEra"},{"display_html":"data TxFeesExplicitInEra era where","name":"TxFeesExplicitInEra TxFeesExplicitInShelleyEra TxFeesExplicitInAllegraEra TxFeesExplicitInMaryEra TxFeesExplicitInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:TxFeesExplicitInEra"},{"display_html":"data TxFeesImplicitInEra era where","name":"TxFeesImplicitInEra TxFeesImplicitInByronEra","module":"Cardano.Api","link":"Cardano-Api.html#t:TxFeesImplicitInEra"},{"display_html":"data ValidityUpperBoundSupportedInEra era where","name":"ValidityUpperBoundSupportedInEra ValidityUpperBoundInShelleyEra ValidityUpperBoundInAllegraEra ValidityUpperBoundInMaryEra ValidityUpperBoundInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ValidityUpperBoundSupportedInEra"},{"display_html":"data ValidityNoUpperBoundSupportedInEra era where","name":"ValidityNoUpperBoundSupportedInEra ValidityNoUpperBoundInByronEra ValidityNoUpperBoundInAllegraEra ValidityNoUpperBoundInMaryEra ValidityNoUpperBoundInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ValidityNoUpperBoundSupportedInEra"},{"display_html":"data ValidityLowerBoundSupportedInEra era where","name":"ValidityLowerBoundSupportedInEra ValidityLowerBoundInAllegraEra ValidityLowerBoundInMaryEra ValidityLowerBoundInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ValidityLowerBoundSupportedInEra"},{"display_html":"data TxMetadataSupportedInEra era where","name":"TxMetadataSupportedInEra TxMetadataInShelleyEra TxMetadataInAllegraEra TxMetadataInMaryEra TxMetadataInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataSupportedInEra"},{"display_html":"data AuxScriptsSupportedInEra era where","name":"AuxScriptsSupportedInEra AuxScriptsInAllegraEra AuxScriptsInMaryEra AuxScriptsInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:AuxScriptsSupportedInEra"},{"display_html":"data TxExtraKeyWitnessesSupportedInEra era where","name":"TxExtraKeyWitnessesSupportedInEra ExtraKeyWitnessesInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:TxExtraKeyWitnessesSupportedInEra"},{"display_html":"data ScriptDataSupportedInEra era where","name":"ScriptDataSupportedInEra ScriptDataInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDataSupportedInEra"},{"display_html":"data WithdrawalsSupportedInEra era where","name":"WithdrawalsSupportedInEra WithdrawalsInShelleyEra WithdrawalsInAllegraEra WithdrawalsInMaryEra WithdrawalsInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:WithdrawalsSupportedInEra"},{"display_html":"data CertificatesSupportedInEra era where","name":"CertificatesSupportedInEra CertificatesInShelleyEra CertificatesInAllegraEra CertificatesInMaryEra CertificatesInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:CertificatesSupportedInEra"},{"display_html":"data UpdateProposalSupportedInEra era where","name":"UpdateProposalSupportedInEra UpdateProposalInShelleyEra UpdateProposalInAllegraEra UpdateProposalInMaryEra UpdateProposalInAlonzoEra","module":"Cardano.Api","link":"Cardano-Api.html#t:UpdateProposalSupportedInEra"},{"display_html":"collateralSupportedInEra ∷ CardanoEra era → Maybe (CollateralSupportedInEra era)","name":"collateralSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:collateralSupportedInEra"},{"display_html":"multiAssetSupportedInEra ∷ CardanoEra era → Either (OnlyAdaSupportedInEra era) (MultiAssetSupportedInEra era)","name":"multiAssetSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:multiAssetSupportedInEra"},{"display_html":"txFeesExplicitInEra ∷ CardanoEra era → Either (TxFeesImplicitInEra era) (TxFeesExplicitInEra era)","name":"txFeesExplicitInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:txFeesExplicitInEra"},{"display_html":"validityUpperBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityUpperBoundSupportedInEra era)","name":"validityUpperBoundSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:validityUpperBoundSupportedInEra"},{"display_html":"validityNoUpperBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityNoUpperBoundSupportedInEra era)","name":"validityNoUpperBoundSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:validityNoUpperBoundSupportedInEra"},{"display_html":"validityLowerBoundSupportedInEra ∷ CardanoEra era → Maybe (ValidityLowerBoundSupportedInEra era)","name":"validityLowerBoundSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:validityLowerBoundSupportedInEra"},{"display_html":"txMetadataSupportedInEra ∷ CardanoEra era → Maybe (TxMetadataSupportedInEra era)","name":"txMetadataSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:txMetadataSupportedInEra"},{"display_html":"auxScriptsSupportedInEra ∷ CardanoEra era → Maybe (AuxScriptsSupportedInEra era)","name":"auxScriptsSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:auxScriptsSupportedInEra"},{"display_html":"extraKeyWitnessesSupportedInEra ∷ CardanoEra era → Maybe (TxExtraKeyWitnessesSupportedInEra era)","name":"extraKeyWitnessesSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:extraKeyWitnessesSupportedInEra"},{"display_html":"withdrawalsSupportedInEra ∷ CardanoEra era → Maybe (WithdrawalsSupportedInEra era)","name":"withdrawalsSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:withdrawalsSupportedInEra"},{"display_html":"certificatesSupportedInEra ∷ CardanoEra era → Maybe (CertificatesSupportedInEra era)","name":"certificatesSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:certificatesSupportedInEra"},{"display_html":"updateProposalSupportedInEra ∷ CardanoEra era → Maybe (UpdateProposalSupportedInEra era)","name":"updateProposalSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:updateProposalSupportedInEra"},{"display_html":"scriptDataSupportedInEra ∷ CardanoEra era → Maybe (ScriptDataSupportedInEra era)","name":"scriptDataSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptDataSupportedInEra"},{"display_html":"data Tx era where","name":"Tx Tx","module":"Cardano.Api","link":"Cardano-Api.html#t:Tx"},{"display_html":"getTxBody ∷ ∀ era. Tx era → TxBody era","name":"getTxBody","module":"Cardano.Api","link":"Cardano-Api.html#v:getTxBody"},{"display_html":"getTxWitnesses ∷ ∀ era. Tx era → [KeyWitness era]","name":"getTxWitnesses","module":"Cardano.Api","link":"Cardano-Api.html#v:getTxWitnesses"},{"display_html":"signByronTransaction ∷ NetworkId → TxBody ByronEra → [SigningKey ByronKey] → Tx ByronEra","name":"signByronTransaction","module":"Cardano.Api","link":"Cardano-Api.html#v:signByronTransaction"},{"display_html":"signShelleyTransaction ∷ IsShelleyBasedEra era ⇒ TxBody era → [ShelleyWitnessSigningKey] → Tx era","name":"signShelleyTransaction","module":"Cardano.Api","link":"Cardano-Api.html#v:signShelleyTransaction"},{"display_html":"makeSignedTransaction ∷ ∀ era. [KeyWitness era] → TxBody era → Tx era","name":"makeSignedTransaction","module":"Cardano.Api","link":"Cardano-Api.html#v:makeSignedTransaction"},{"display_html":"data KeyWitness era","name":"KeyWitness","module":"Cardano.Api","link":"Cardano-Api.html#t:KeyWitness"},{"display_html":"makeByronKeyWitness ∷ ∀ key. IsByronKey key ⇒ NetworkId → TxBody ByronEra → SigningKey key → KeyWitness ByronEra","name":"makeByronKeyWitness","module":"Cardano.Api","link":"Cardano-Api.html#v:makeByronKeyWitness"},{"display_html":"data ShelleyWitnessSigningKey","name":"ShelleyWitnessSigningKey WitnessPaymentKey WitnessPaymentExtendedKey WitnessStakeKey WitnessStakeExtendedKey WitnessStakePoolKey WitnessGenesisKey WitnessGenesisExtendedKey WitnessGenesisDelegateKey WitnessGenesisDelegateExtendedKey WitnessGenesisUTxOKey","module":"Cardano.Api","link":"Cardano-Api.html#t:ShelleyWitnessSigningKey"},{"display_html":"makeShelleyKeyWitness ∷ ∀ era. IsShelleyBasedEra era ⇒ TxBody era → ShelleyWitnessSigningKey → KeyWitness era","name":"makeShelleyKeyWitness","module":"Cardano.Api","link":"Cardano-Api.html#v:makeShelleyKeyWitness"},{"display_html":"makeShelleyBootstrapWitness ∷ ∀ era. IsShelleyBasedEra era ⇒ WitnessNetworkIdOrByronAddress → TxBody era → SigningKey ByronKey → KeyWitness era","name":"makeShelleyBootstrapWitness","module":"Cardano.Api","link":"Cardano-Api.html#v:makeShelleyBootstrapWitness"},{"display_html":"transactionFee ∷ ∀ era. IsShelleyBasedEra era ⇒ Natural → Natural → Tx era → Lovelace","name":"transactionFee","module":"Cardano.Api","link":"Cardano-Api.html#v:transactionFee"},{"display_html":"estimateTransactionFee ∷ ∀ era. IsShelleyBasedEra era ⇒ NetworkId → Natural → Natural → Tx era → Int → Int → Int → Int → Lovelace","name":"estimateTransactionFee","module":"Cardano.Api","link":"Cardano-Api.html#v:estimateTransactionFee"},{"display_html":"newtype TxMetadata = TxMetadata (Map Word64 TxMetadataValue)","name":"TxMetadata TxMetadata","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadata"},{"display_html":"data TxMetadataValue","name":"TxMetadataValue TxMetaMap TxMetaList TxMetaNumber TxMetaBytes TxMetaText","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataValue"},{"display_html":"makeTransactionMetadata ∷ Map Word64 TxMetadataValue → TxMetadata","name":"makeTransactionMetadata","module":"Cardano.Api","link":"Cardano-Api.html#v:makeTransactionMetadata"},{"display_html":"validateTxMetadata ∷ TxMetadata → Either [(Word64, TxMetadataRangeError)] ()","name":"validateTxMetadata","module":"Cardano.Api","link":"Cardano-Api.html#v:validateTxMetadata"},{"display_html":"data TxMetadataRangeError","name":"TxMetadataRangeError TxMetadataNumberOutOfRange TxMetadataBytesTooLong TxMetadataTextTooLong","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataRangeError"},{"display_html":"data TxMetadataJsonSchema","name":"TxMetadataJsonSchema TxMetadataJsonNoSchema TxMetadataJsonDetailedSchema","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataJsonSchema"},{"display_html":"metadataFromJson ∷ TxMetadataJsonSchema → Value → Either TxMetadataJsonError TxMetadata","name":"metadataFromJson","module":"Cardano.Api","link":"Cardano-Api.html#v:metadataFromJson"},{"display_html":"metadataToJson ∷ TxMetadataJsonSchema → TxMetadata → Value","name":"metadataToJson","module":"Cardano.Api","link":"Cardano-Api.html#v:metadataToJson"},{"display_html":"metadataValueToJsonNoSchema ∷ TxMetadataValue → Value","name":"metadataValueToJsonNoSchema","module":"Cardano.Api","link":"Cardano-Api.html#v:metadataValueToJsonNoSchema"},{"display_html":"data TxMetadataJsonError","name":"TxMetadataJsonError TxMetadataRangeError TxMetadataJsonSchemaError TxMetadataJsonToplevelNotMap TxMetadataJsonToplevelBadKey","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataJsonError"},{"display_html":"data TxMetadataJsonSchemaError","name":"TxMetadataJsonSchemaError TxMetadataJsonNullNotAllowed TxMetadataJsonBoolNotAllowed TxMetadataJsonNumberNotInteger TxMetadataJsonTypeMismatch TxMetadataJsonBadObject TxMetadataJsonNotObject TxMetadataJsonBadMapPair","module":"Cardano.Api","link":"Cardano-Api.html#t:TxMetadataJsonSchemaError"},{"display_html":"data Certificate","name":"Certificate","module":"Cardano.Api","link":"Cardano-Api.html#t:Certificate"},{"display_html":"makeStakeAddressRegistrationCertificate ∷ StakeCredential → Certificate","name":"makeStakeAddressRegistrationCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakeAddressRegistrationCertificate"},{"display_html":"makeStakeAddressDeregistrationCertificate ∷ StakeCredential → Certificate","name":"makeStakeAddressDeregistrationCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakeAddressDeregistrationCertificate"},{"display_html":"makeStakeAddressDelegationCertificate ∷ StakeCredential → PoolId → Certificate","name":"makeStakeAddressDelegationCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakeAddressDelegationCertificate"},{"display_html":"makeStakePoolRegistrationCertificate ∷ StakePoolParameters → Certificate","name":"makeStakePoolRegistrationCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakePoolRegistrationCertificate"},{"display_html":"makeStakePoolRetirementCertificate ∷ PoolId → EpochNo → Certificate","name":"makeStakePoolRetirementCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeStakePoolRetirementCertificate"},{"display_html":"data StakePoolParameters","name":"StakePoolParameters","module":"Cardano.Api","link":"Cardano-Api.html#t:StakePoolParameters"},{"display_html":"data StakePoolRelay","name":"StakePoolRelay","module":"Cardano.Api","link":"Cardano-Api.html#t:StakePoolRelay"},{"display_html":"data StakePoolMetadataReference","name":"StakePoolMetadataReference","module":"Cardano.Api","link":"Cardano-Api.html#t:StakePoolMetadataReference"},{"display_html":"data StakePoolMetadata","name":"StakePoolMetadata","module":"Cardano.Api","link":"Cardano-Api.html#t:StakePoolMetadata"},{"display_html":"validateAndHashStakePoolMetadata ∷ ByteString → Either StakePoolMetadataValidationError (StakePoolMetadata, Hash StakePoolMetadata)","name":"validateAndHashStakePoolMetadata","module":"Cardano.Api","link":"Cardano-Api.html#v:validateAndHashStakePoolMetadata"},{"display_html":"data StakePoolMetadataValidationError","name":"StakePoolMetadataValidationError","module":"Cardano.Api","link":"Cardano-Api.html#t:StakePoolMetadataValidationError"},{"display_html":"data SimpleScriptV1","name":"SimpleScriptV1","module":"Cardano.Api","link":"Cardano-Api.html#t:SimpleScriptV1"},{"display_html":"data SimpleScriptV2","name":"SimpleScriptV2","module":"Cardano.Api","link":"Cardano-Api.html#t:SimpleScriptV2"},{"display_html":"data ScriptLanguage lang where","name":"ScriptLanguage SimpleScriptLanguage PlutusScriptLanguage","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptLanguage"},{"display_html":"data SimpleScriptVersion lang where","name":"SimpleScriptVersion SimpleScriptV1 SimpleScriptV2","module":"Cardano.Api","link":"Cardano-Api.html#t:SimpleScriptVersion"},{"display_html":"data PlutusScriptVersion lang where","name":"PlutusScriptVersion PlutusScriptV1","module":"Cardano.Api","link":"Cardano-Api.html#t:PlutusScriptVersion"},{"display_html":"data AnyScriptLanguage where","name":"AnyScriptLanguage AnyScriptLanguage","module":"Cardano.Api","link":"Cardano-Api.html#t:AnyScriptLanguage"},{"display_html":"class HasTypeProxy lang ⇒ IsScriptLanguage lang where","name":"IsScriptLanguage scriptLanguage","module":"Cardano.Api","link":"Cardano-Api.html#t:IsScriptLanguage"},{"display_html":"class IsScriptLanguage lang ⇒ IsSimpleScriptLanguage lang where","name":"IsSimpleScriptLanguage simpleScriptVersion","module":"Cardano.Api","link":"Cardano-Api.html#t:IsSimpleScriptLanguage"},{"display_html":"data Script lang where","name":"Script SimpleScript PlutusScript","module":"Cardano.Api","link":"Cardano-Api.html#t:Script"},{"display_html":"data ScriptInAnyLang where","name":"ScriptInAnyLang ScriptInAnyLang","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptInAnyLang"},{"display_html":"toScriptInAnyLang ∷ Script lang → ScriptInAnyLang","name":"toScriptInAnyLang","module":"Cardano.Api","link":"Cardano-Api.html#v:toScriptInAnyLang"},{"display_html":"data ScriptInEra era where","name":"ScriptInEra ScriptInEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptInEra"},{"display_html":"toScriptInEra ∷ CardanoEra era → ScriptInAnyLang → Maybe (ScriptInEra era)","name":"toScriptInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:toScriptInEra"},{"display_html":"eraOfScriptInEra ∷ ScriptInEra era → ShelleyBasedEra era","name":"eraOfScriptInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:eraOfScriptInEra"},{"display_html":"data WitCtxTxIn","name":"WitCtxTxIn","module":"Cardano.Api","link":"Cardano-Api.html#t:WitCtxTxIn"},{"display_html":"data WitCtxMint","name":"WitCtxMint","module":"Cardano.Api","link":"Cardano-Api.html#t:WitCtxMint"},{"display_html":"data WitCtxStake","name":"WitCtxStake","module":"Cardano.Api","link":"Cardano-Api.html#t:WitCtxStake"},{"display_html":"data WitCtx witctx where","name":"WitCtx WitCtxTxIn WitCtxMint WitCtxStake","module":"Cardano.Api","link":"Cardano-Api.html#t:WitCtx"},{"display_html":"data ScriptWitness witctx era where","name":"ScriptWitness SimpleScriptWitness PlutusScriptWitness","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptWitness"},{"display_html":"data Witness witctx era where","name":"Witness KeyWitness ScriptWitness","module":"Cardano.Api","link":"Cardano-Api.html#t:Witness"},{"display_html":"data KeyWitnessInCtx witctx where","name":"KeyWitnessInCtx KeyWitnessForSpending KeyWitnessForStakeAddr","module":"Cardano.Api","link":"Cardano-Api.html#t:KeyWitnessInCtx"},{"display_html":"data ScriptWitnessInCtx witctx where","name":"ScriptWitnessInCtx ScriptWitnessForSpending ScriptWitnessForMinting ScriptWitnessForStakeAddr","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptWitnessInCtx"},{"display_html":"data ScriptDatum witctx where","name":"ScriptDatum ScriptDatumForTxIn NoScriptDatumForMint NoScriptDatumForStake","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDatum"},{"display_html":"type ScriptRedeemer = ScriptData","name":"ScriptRedeemer","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptRedeemer"},{"display_html":"scriptWitnessScript ∷ ScriptWitness witctx era → ScriptInEra era","name":"scriptWitnessScript","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptWitnessScript"},{"display_html":"data ScriptLanguageInEra lang era where","name":"ScriptLanguageInEra SimpleScriptV1InShelley SimpleScriptV1InAllegra SimpleScriptV1InMary SimpleScriptV1InAlonzo SimpleScriptV2InAllegra SimpleScriptV2InMary SimpleScriptV2InAlonzo PlutusScriptV1InAlonzo","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptLanguageInEra"},{"display_html":"scriptLanguageSupportedInEra ∷ CardanoEra era → ScriptLanguage lang → Maybe (ScriptLanguageInEra lang era)","name":"scriptLanguageSupportedInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptLanguageSupportedInEra"},{"display_html":"languageOfScriptLanguageInEra ∷ ScriptLanguageInEra lang era → ScriptLanguage lang","name":"languageOfScriptLanguageInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:languageOfScriptLanguageInEra"},{"display_html":"eraOfScriptLanguageInEra ∷ ScriptLanguageInEra lang era → ShelleyBasedEra era","name":"eraOfScriptLanguageInEra","module":"Cardano.Api","link":"Cardano-Api.html#v:eraOfScriptLanguageInEra"},{"display_html":"data SimpleScript lang where","name":"SimpleScript RequireAllOf RequireAnyOf RequireMOf RequireSignature RequireTimeBefore RequireTimeAfter","module":"Cardano.Api","link":"Cardano-Api.html#t:SimpleScript"},{"display_html":"data TimeLocksSupported lang where","name":"TimeLocksSupported TimeLocksInSimpleScriptV2","module":"Cardano.Api","link":"Cardano-Api.html#t:TimeLocksSupported"},{"display_html":"timeLocksSupported ∷ SimpleScriptVersion lang → Maybe (TimeLocksSupported lang)","name":"timeLocksSupported","module":"Cardano.Api","link":"Cardano-Api.html#v:timeLocksSupported"},{"display_html":"adjustSimpleScriptVersion ∷ SimpleScriptVersion lang' → SimpleScript lang → Maybe (SimpleScript lang')","name":"adjustSimpleScriptVersion","module":"Cardano.Api","link":"Cardano-Api.html#v:adjustSimpleScriptVersion"},{"display_html":"data PlutusScript lang","name":"PlutusScript","module":"Cardano.Api","link":"Cardano-Api.html#t:PlutusScript"},{"display_html":"examplePlutusScriptAlwaysSucceeds ∷ WitCtx witctx → PlutusScript PlutusScriptV1","name":"examplePlutusScriptAlwaysSucceeds","module":"Cardano.Api","link":"Cardano-Api.html#v:examplePlutusScriptAlwaysSucceeds"},{"display_html":"examplePlutusScriptAlwaysFails ∷ WitCtx witctx → PlutusScript PlutusScriptV1","name":"examplePlutusScriptAlwaysFails","module":"Cardano.Api","link":"Cardano-Api.html#v:examplePlutusScriptAlwaysFails"},{"display_html":"data ScriptData","name":"ScriptData ScriptDataConstructor ScriptDataMap ScriptDataList ScriptDataNumber ScriptDataBytes","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptData"},{"display_html":"data ScriptDataRangeError","name":"ScriptDataRangeError ScriptDataNumberOutOfRange ScriptDataBytesTooLong ScriptDataConstructorOutOfRange","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDataRangeError"},{"display_html":"validateScriptData ∷ ScriptData → Either ScriptDataRangeError ()","name":"validateScriptData","module":"Cardano.Api","link":"Cardano-Api.html#v:validateScriptData"},{"display_html":"data ScriptDataJsonSchema","name":"ScriptDataJsonSchema ScriptDataJsonNoSchema ScriptDataJsonDetailedSchema","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDataJsonSchema"},{"display_html":"scriptDataFromJson ∷ ScriptDataJsonSchema → Value → Either ScriptDataJsonError ScriptData","name":"scriptDataFromJson","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptDataFromJson"},{"display_html":"scriptDataToJson ∷ ScriptDataJsonSchema → ScriptData → Value","name":"scriptDataToJson","module":"Cardano.Api","link":"Cardano-Api.html#v:scriptDataToJson"},{"display_html":"data ScriptDataJsonError","name":"ScriptDataJsonError ScriptDataRangeError ScriptDataJsonSchemaError","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDataJsonError"},{"display_html":"data ScriptDataJsonSchemaError","name":"ScriptDataJsonSchemaError ScriptDataJsonNullNotAllowed ScriptDataJsonBoolNotAllowed ScriptDataJsonNumberNotInteger ScriptDataJsonTypeMismatch ScriptDataJsonBadObject ScriptDataJsonNotObject ScriptDataJsonBadMapPair","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptDataJsonSchemaError"},{"display_html":"data ExecutionUnits = ExecutionUnits {}","name":"ExecutionUnits ExecutionUnits executionSteps executionMemory","module":"Cardano.Api","link":"Cardano-Api.html#t:ExecutionUnits"},{"display_html":"data ScriptHash","name":"ScriptHash","module":"Cardano.Api","link":"Cardano-Api.html#t:ScriptHash"},{"display_html":"hashScript ∷ Script lang → ScriptHash","name":"hashScript","module":"Cardano.Api","link":"Cardano-Api.html#v:hashScript"},{"display_html":"class HasTypeProxy a ⇒ SerialiseAsCBOR a","name":"SerialiseAsCBOR","module":"Cardano.Api","link":"Cardano-Api.html#t:SerialiseAsCBOR"},{"display_html":"class Typeable a ⇒ ToCBOR a","name":"ToCBOR","module":"Cardano.Api","link":"Cardano-Api.html#t:ToCBOR"},{"display_html":"class Typeable a ⇒ FromCBOR a","name":"FromCBOR","module":"Cardano.Api","link":"Cardano-Api.html#t:FromCBOR"},{"display_html":"serialiseToCBOR ∷ SerialiseAsCBOR a ⇒ a → ByteString","name":"serialiseToCBOR","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToCBOR"},{"display_html":"deserialiseFromCBOR ∷ SerialiseAsCBOR a ⇒ AsType a → ByteString → Either DecoderError a","name":"deserialiseFromCBOR","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromCBOR"},{"display_html":"class ToJSON a","name":"ToJSON","module":"Cardano.Api","link":"Cardano-Api.html#t:ToJSON"},{"display_html":"class FromJSON a","name":"FromJSON","module":"Cardano.Api","link":"Cardano-Api.html#t:FromJSON"},{"display_html":"serialiseToJSON ∷ ToJSON a ⇒ a → ByteString","name":"serialiseToJSON","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToJSON"},{"display_html":"deserialiseFromJSON ∷ FromJSON a ⇒ AsType a → ByteString → Either JsonDecodeError a","name":"deserialiseFromJSON","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromJSON"},{"display_html":"newtype JsonDecodeError = JsonDecodeError String","name":"JsonDecodeError JsonDecodeError","module":"Cardano.Api","link":"Cardano-Api.html#t:JsonDecodeError"},{"display_html":"readFileJSON ∷ FromJSON a ⇒ AsType a → FilePath → IO (Either (FileError JsonDecodeError) a)","name":"readFileJSON","module":"Cardano.Api","link":"Cardano-Api.html#v:readFileJSON"},{"display_html":"writeFileJSON ∷ ToJSON a ⇒ FilePath → a → IO (Either (FileError ()) ())","name":"writeFileJSON","module":"Cardano.Api","link":"Cardano-Api.html#v:writeFileJSON"},{"display_html":"prettyPrintJSON ∷ ToJSON a ⇒ a → ByteString","name":"prettyPrintJSON","module":"Cardano.Api","link":"Cardano-Api.html#v:prettyPrintJSON"},{"display_html":"class (HasTypeProxy a, SerialiseAsRawBytes a) ⇒ SerialiseAsBech32 a","name":"SerialiseAsBech32","module":"Cardano.Api","link":"Cardano-Api.html#t:SerialiseAsBech32"},{"display_html":"serialiseToBech32 ∷ SerialiseAsBech32 a ⇒ a → Text","name":"serialiseToBech32","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToBech32"},{"display_html":"deserialiseFromBech32 ∷ SerialiseAsBech32 a ⇒ AsType a → Text → Either Bech32DecodeError a","name":"deserialiseFromBech32","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromBech32"},{"display_html":"deserialiseAnyOfFromBech32 ∷ ∀ b. [FromSomeType SerialiseAsBech32 b] → Text → Either Bech32DecodeError b","name":"deserialiseAnyOfFromBech32","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseAnyOfFromBech32"},{"display_html":"data Bech32DecodeError","name":"Bech32DecodeError Bech32DecodingError Bech32UnexpectedPrefix Bech32DataPartToBytesError Bech32DeserialiseFromBytesError Bech32WrongPrefix","module":"Cardano.Api","link":"Cardano-Api.html#t:Bech32DecodeError"},{"display_html":"class HasTypeProxy addr ⇒ SerialiseAddress addr","name":"SerialiseAddress","module":"Cardano.Api","link":"Cardano-Api.html#t:SerialiseAddress"},{"display_html":"serialiseAddress ∷ SerialiseAddress addr ⇒ addr → Text","name":"serialiseAddress","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseAddress"},{"display_html":"deserialiseAddress ∷ SerialiseAddress addr ⇒ AsType addr → Text → Maybe addr","name":"deserialiseAddress","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseAddress"},{"display_html":"class HasTypeProxy a ⇒ SerialiseAsRawBytes a","name":"SerialiseAsRawBytes","module":"Cardano.Api","link":"Cardano-Api.html#t:SerialiseAsRawBytes"},{"display_html":"serialiseToRawBytes ∷ SerialiseAsRawBytes a ⇒ a → ByteString","name":"serialiseToRawBytes","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToRawBytes"},{"display_html":"deserialiseFromRawBytes ∷ SerialiseAsRawBytes a ⇒ AsType a → ByteString → Maybe a","name":"deserialiseFromRawBytes","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromRawBytes"},{"display_html":"serialiseToRawBytesHex ∷ SerialiseAsRawBytes a ⇒ a → ByteString","name":"serialiseToRawBytesHex","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToRawBytesHex"},{"display_html":"deserialiseFromRawBytesHex ∷ SerialiseAsRawBytes a ⇒ AsType a → ByteString → Maybe a","name":"deserialiseFromRawBytesHex","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromRawBytesHex"},{"display_html":"serialiseToRawBytesHexText ∷ SerialiseAsRawBytes a ⇒ a → Text","name":"serialiseToRawBytesHexText","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToRawBytesHexText"},{"display_html":"class SerialiseAsCBOR a ⇒ HasTextEnvelope a where","name":"HasTextEnvelope textEnvelopeType textEnvelopeDefaultDescr","module":"Cardano.Api","link":"Cardano-Api.html#t:HasTextEnvelope"},{"display_html":"data TextEnvelope = TextEnvelope {}","name":"TextEnvelope TextEnvelope teType teDescription teRawCBOR","module":"Cardano.Api","link":"Cardano-Api.html#t:TextEnvelope"},{"display_html":"newtype TextEnvelopeType = TextEnvelopeType String","name":"TextEnvelopeType TextEnvelopeType","module":"Cardano.Api","link":"Cardano-Api.html#t:TextEnvelopeType"},{"display_html":"data TextEnvelopeDescr","name":"TextEnvelopeDescr","module":"Cardano.Api","link":"Cardano-Api.html#t:TextEnvelopeDescr"},{"display_html":"data TextEnvelopeError","name":"TextEnvelopeError TextEnvelopeTypeError TextEnvelopeDecodeError TextEnvelopeAesonDecodeError","module":"Cardano.Api","link":"Cardano-Api.html#t:TextEnvelopeError"},{"display_html":"textEnvelopeRawCBOR ∷ TextEnvelope → ByteString","name":"textEnvelopeRawCBOR","module":"Cardano.Api","link":"Cardano-Api.html#v:textEnvelopeRawCBOR"},{"display_html":"serialiseToTextEnvelope ∷ ∀ a. HasTextEnvelope a ⇒ Maybe TextEnvelopeDescr → a → TextEnvelope","name":"serialiseToTextEnvelope","module":"Cardano.Api","link":"Cardano-Api.html#v:serialiseToTextEnvelope"},{"display_html":"deserialiseFromTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → TextEnvelope → Either TextEnvelopeError a","name":"deserialiseFromTextEnvelope","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromTextEnvelope"},{"display_html":"readFileTextEnvelope ∷ HasTextEnvelope a ⇒ AsType a → FilePath → IO (Either (FileError TextEnvelopeError) a)","name":"readFileTextEnvelope","module":"Cardano.Api","link":"Cardano-Api.html#v:readFileTextEnvelope"},{"display_html":"writeFileTextEnvelope ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ())","name":"writeFileTextEnvelope","module":"Cardano.Api","link":"Cardano-Api.html#v:writeFileTextEnvelope"},{"display_html":"writeFileTextEnvelopeWithOwnerPermissions ∷ HasTextEnvelope a ⇒ FilePath → Maybe TextEnvelopeDescr → a → IO (Either (FileError ()) ())","name":"writeFileTextEnvelopeWithOwnerPermissions","module":"Cardano.Api","link":"Cardano-Api.html#v:writeFileTextEnvelopeWithOwnerPermissions"},{"display_html":"readTextEnvelopeFromFile ∷ FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope)","name":"readTextEnvelopeFromFile","module":"Cardano.Api","link":"Cardano-Api.html#v:readTextEnvelopeFromFile"},{"display_html":"readTextEnvelopeOfTypeFromFile ∷ TextEnvelopeType → FilePath → IO (Either (FileError TextEnvelopeError) TextEnvelope)","name":"readTextEnvelopeOfTypeFromFile","module":"Cardano.Api","link":"Cardano-Api.html#v:readTextEnvelopeOfTypeFromFile"},{"display_html":"data FromSomeType (c ∷ Type → Constraint) b where","name":"FromSomeType FromSomeType","module":"Cardano.Api","link":"Cardano-Api.html#t:FromSomeType"},{"display_html":"deserialiseFromTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → TextEnvelope → Either TextEnvelopeError b","name":"deserialiseFromTextEnvelopeAnyOf","module":"Cardano.Api","link":"Cardano-Api.html#v:deserialiseFromTextEnvelopeAnyOf"},{"display_html":"readFileTextEnvelopeAnyOf ∷ [FromSomeType HasTextEnvelope b] → FilePath → IO (Either (FileError TextEnvelopeError) b)","name":"readFileTextEnvelopeAnyOf","module":"Cardano.Api","link":"Cardano-Api.html#v:readFileTextEnvelopeAnyOf"},{"display_html":"class Show e ⇒ Error e where","name":"Error displayError","module":"Cardano.Api","link":"Cardano-Api.html#t:Error"},{"display_html":"throwErrorAsException ∷ Error e ⇒ e → IO a","name":"throwErrorAsException","module":"Cardano.Api","link":"Cardano-Api.html#v:throwErrorAsException"},{"display_html":"data FileError e","name":"FileError FileError FileErrorTempFile FileIOError","module":"Cardano.Api","link":"Cardano-Api.html#t:FileError"},{"display_html":"data Env = Env {}","name":"Env Env envLedgerConfig envProtocolConfig","module":"Cardano.Api","link":"Cardano-Api.html#t:Env"},{"display_html":"envSecurityParam ∷ Env → Word64","name":"envSecurityParam","module":"Cardano.Api","link":"Cardano-Api.html#v:envSecurityParam"},{"display_html":"newtype LedgerState where","name":"LedgerState LedgerState LedgerStateByron LedgerStateShelley LedgerStateAllegra LedgerStateMary clsState","module":"Cardano.Api","link":"Cardano-Api.html#t:LedgerState"},{"display_html":"initialLedgerState ∷ FilePath → ExceptT InitialLedgerStateError IO (Env, LedgerState)","name":"initialLedgerState","module":"Cardano.Api","link":"Cardano-Api.html#v:initialLedgerState"},{"display_html":"applyBlock ∷ Env → LedgerState → Bool → Block era → Either Text LedgerState","name":"applyBlock","module":"Cardano.Api","link":"Cardano-Api.html#v:applyBlock"},{"display_html":"foldBlocks ∷ ∀ a. FilePath → FilePath → NetworkId → Bool → a → (Env → LedgerState → BlockInMode CardanoMode → a → IO a) → ExceptT FoldBlocksError IO a","name":"foldBlocks","module":"Cardano.Api","link":"Cardano-Api.html#v:foldBlocks"},{"display_html":"data FoldBlocksError","name":"FoldBlocksError FoldBlocksInitialLedgerStateError FoldBlocksApplyBlockError","module":"Cardano.Api","link":"Cardano-Api.html#t:FoldBlocksError"},{"display_html":"data GenesisConfigError","name":"GenesisConfigError NECardanoConfig NEError NEByronConfig NEShelleyConfig","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisConfigError"},{"display_html":"data InitialLedgerStateError","name":"InitialLedgerStateError ILSEConfigFile ILSEGenesisFile ILSELedgerConsensusConfig","module":"Cardano.Api","link":"Cardano-Api.html#t:InitialLedgerStateError"},{"display_html":"renderFoldBlocksError ∷ FoldBlocksError → Text","name":"renderFoldBlocksError","module":"Cardano.Api","link":"Cardano-Api.html#v:renderFoldBlocksError"},{"display_html":"renderGenesisConfigError ∷ GenesisConfigError → Text","name":"renderGenesisConfigError","module":"Cardano.Api","link":"Cardano-Api.html#v:renderGenesisConfigError"},{"display_html":"renderInitialLedgerStateError ∷ InitialLedgerStateError → Text","name":"renderInitialLedgerStateError","module":"Cardano.Api","link":"Cardano-Api.html#v:renderInitialLedgerStateError"},{"display_html":"connectToLocalNode ∷ LocalNodeConnectInfo mode → LocalNodeClientProtocolsInMode mode → IO ()","name":"connectToLocalNode","module":"Cardano.Api","link":"Cardano-Api.html#v:connectToLocalNode"},{"display_html":"data LocalNodeConnectInfo mode = LocalNodeConnectInfo {}","name":"LocalNodeConnectInfo LocalNodeConnectInfo localConsensusModeParams localNodeNetworkId localNodeSocketPath","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalNodeConnectInfo"},{"display_html":"data AnyConsensusMode where","name":"AnyConsensusMode AnyConsensusMode","module":"Cardano.Api","link":"Cardano-Api.html#t:AnyConsensusMode"},{"display_html":"renderMode ∷ AnyConsensusMode → Text","name":"renderMode","module":"Cardano.Api","link":"Cardano-Api.html#v:renderMode"},{"display_html":"data ConsensusMode mode where","name":"ConsensusMode CardanoMode","module":"Cardano.Api","link":"Cardano-Api.html#t:ConsensusMode"},{"display_html":"consensusModeOnly ∷ ConsensusModeParams mode → ConsensusMode mode","name":"consensusModeOnly","module":"Cardano.Api","link":"Cardano-Api.html#v:consensusModeOnly"},{"display_html":"data ConsensusModeIsMultiEra mode where","name":"ConsensusModeIsMultiEra CardanoModeIsMultiEra","module":"Cardano.Api","link":"Cardano-Api.html#t:ConsensusModeIsMultiEra"},{"display_html":"data AnyConsensusModeParams where","name":"AnyConsensusModeParams AnyConsensusModeParams","module":"Cardano.Api","link":"Cardano-Api.html#t:AnyConsensusModeParams"},{"display_html":"data ConsensusModeParams mode where","name":"ConsensusModeParams CardanoModeParams ByronModeParams ShelleyModeParams","module":"Cardano.Api","link":"Cardano-Api.html#t:ConsensusModeParams"},{"display_html":"data EraInMode era mode where","name":"EraInMode ByronEraInByronMode ShelleyEraInShelleyMode ByronEraInCardanoMode ShelleyEraInCardanoMode AllegraEraInCardanoMode MaryEraInCardanoMode AlonzoEraInCardanoMode","module":"Cardano.Api","link":"Cardano-Api.html#t:EraInMode"},{"display_html":"toEraInMode ∷ CardanoEra era → ConsensusMode mode → Maybe (EraInMode era mode)","name":"toEraInMode","module":"Cardano.Api","link":"Cardano-Api.html#v:toEraInMode"},{"display_html":"data LocalNodeClientProtocols block point tip tx txerr query m = LocalNodeClientProtocols {}","name":"LocalNodeClientProtocols LocalNodeClientProtocols localChainSyncClient localTxSubmissionClient localStateQueryClient","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalNodeClientProtocols"},{"display_html":"data LocalChainSyncClient block point tip m","name":"LocalChainSyncClient LocalChainSyncClient LocalChainSyncClientPipelined NoLocalChainSyncClient","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalChainSyncClient"},{"display_html":"data CardanoMode","name":"CardanoMode","module":"Cardano.Api","link":"Cardano-Api.html#t:CardanoMode"},{"display_html":"newtype ChainSyncClient header point tip (m ∷ Type → Type) a = ChainSyncClient {}","name":"ChainSyncClient ChainSyncClient runChainSyncClient","module":"Cardano.Api","link":"Cardano-Api.html#t:ChainSyncClient"},{"display_html":"newtype ChainSyncClientPipelined header point tip (m ∷ Type → Type) a = ChainSyncClientPipelined {}","name":"ChainSyncClientPipelined ChainSyncClientPipelined runChainSyncClientPipelined","module":"Cardano.Api","link":"Cardano-Api.html#t:ChainSyncClientPipelined"},{"display_html":"data BlockInMode mode where","name":"BlockInMode BlockInMode","module":"Cardano.Api","link":"Cardano-Api.html#t:BlockInMode"},{"display_html":"type LocalNodeClientProtocolsInMode mode = LocalNodeClientProtocols (BlockInMode mode) ChainPoint ChainTip (TxInMode mode) (TxValidationErrorInMode mode) (QueryInMode mode) IO","name":"LocalNodeClientProtocolsInMode","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalNodeClientProtocolsInMode"},{"display_html":"data LocalTxSubmissionClient tx reject (m ∷ Type → Type) a","name":"LocalTxSubmissionClient","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalTxSubmissionClient"},{"display_html":"data TxInMode mode where","name":"TxInMode TxInMode TxInByronSpecial","module":"Cardano.Api","link":"Cardano-Api.html#t:TxInMode"},{"display_html":"data TxValidationErrorInMode mode where","name":"TxValidationErrorInMode TxValidationErrorInMode TxValidationEraMismatch","module":"Cardano.Api","link":"Cardano-Api.html#t:TxValidationErrorInMode"},{"display_html":"runLocalTxSubmissionClient ∷ LocalTxSubmissionClient tx reject m a → m (LocalTxClientStIdle tx reject m a)","name":"runLocalTxSubmissionClient","module":"Cardano.Api","link":"Cardano-Api.html#v:runLocalTxSubmissionClient"},{"display_html":"submitTxToNodeLocal ∷ ∀ mode. LocalNodeConnectInfo mode → TxInMode mode → IO (SubmitResult (TxValidationErrorInMode mode))","name":"submitTxToNodeLocal","module":"Cardano.Api","link":"Cardano-Api.html#v:submitTxToNodeLocal"},{"display_html":"newtype LocalStateQueryClient block point (query ∷ Type → Type) (m ∷ Type → Type) a = LocalStateQueryClient {}","name":"LocalStateQueryClient LocalStateQueryClient runLocalStateQueryClient","module":"Cardano.Api","link":"Cardano-Api.html#t:LocalStateQueryClient"},{"display_html":"data QueryInMode mode result where","name":"QueryInMode QueryInEra QueryCurrentEra QueryEraHistory","module":"Cardano.Api","link":"Cardano-Api.html#t:QueryInMode"},{"display_html":"data QueryInEra era result where","name":"QueryInEra QueryInShelleyBasedEra QueryByronUpdateState","module":"Cardano.Api","link":"Cardano-Api.html#t:QueryInEra"},{"display_html":"data QueryInShelleyBasedEra era result where","name":"QueryInShelleyBasedEra QueryChainPoint QueryEpoch QueryGenesisParameters QueryProtocolParameters QueryProtocolParametersUpdate QueryStakeDistribution QueryUTxO QueryStakeAddresses QueryDebugLedgerState QueryProtocolState","module":"Cardano.Api","link":"Cardano-Api.html#t:QueryInShelleyBasedEra"},{"display_html":"queryNodeLocalState ∷ ∀ mode result. LocalNodeConnectInfo mode → Maybe ChainPoint → QueryInMode mode result → IO (Either AcquireFailure result)","name":"queryNodeLocalState","module":"Cardano.Api","link":"Cardano-Api.html#v:queryNodeLocalState"},{"display_html":"getLocalChainTip ∷ LocalNodeConnectInfo mode → IO ChainTip","name":"getLocalChainTip","module":"Cardano.Api","link":"Cardano-Api.html#v:getLocalChainTip"},{"display_html":"data OperationalCertificate","name":"OperationalCertificate","module":"Cardano.Api","link":"Cardano-Api.html#t:OperationalCertificate"},{"display_html":"data OperationalCertificateIssueCounter","name":"OperationalCertificateIssueCounter","module":"Cardano.Api","link":"Cardano-Api.html#t:OperationalCertificateIssueCounter"},{"display_html":"data OperationalCertIssueError","name":"OperationalCertIssueError","module":"Cardano.Api","link":"Cardano-Api.html#t:OperationalCertIssueError"},{"display_html":"issueOperationalCertificate ∷ VerificationKey KesKey → Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) → KESPeriod → OperationalCertificateIssueCounter → Either OperationalCertIssueError (OperationalCertificate, OperationalCertificateIssueCounter)","name":"issueOperationalCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:issueOperationalCertificate"},{"display_html":"data GenesisKey","name":"GenesisKey","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisKey"},{"display_html":"data GenesisExtendedKey","name":"GenesisExtendedKey","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisExtendedKey"},{"display_html":"data GenesisDelegateKey","name":"GenesisDelegateKey","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisDelegateKey"},{"display_html":"data GenesisDelegateExtendedKey","name":"GenesisDelegateExtendedKey","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisDelegateExtendedKey"},{"display_html":"data GenesisUTxOKey","name":"GenesisUTxOKey","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisUTxOKey"},{"display_html":"genesisUTxOPseudoTxIn ∷ NetworkId → Hash GenesisUTxOKey → TxIn","name":"genesisUTxOPseudoTxIn","module":"Cardano.Api","link":"Cardano-Api.html#v:genesisUTxOPseudoTxIn"},{"display_html":"data GenesisParameters = GenesisParameters {}","name":"GenesisParameters GenesisParameters protocolParamSystemStart protocolParamNetworkId protocolParamActiveSlotsCoefficient protocolParamSecurity protocolParamEpochLength protocolParamSlotLength protocolParamSlotsPerKESPeriod protocolParamMaxKESEvolutions protocolParamUpdateQuorum protocolParamMaxLovelaceSupply protocolInitialUpdateableProtocolParameters","module":"Cardano.Api","link":"Cardano-Api.html#t:GenesisParameters"},{"display_html":"makeMIRCertificate ∷ MIRPot → MIRTarget → Certificate","name":"makeMIRCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeMIRCertificate"},{"display_html":"makeGenesisKeyDelegationCertificate ∷ Hash GenesisKey → Hash GenesisDelegateKey → Hash VrfKey → Certificate","name":"makeGenesisKeyDelegationCertificate","module":"Cardano.Api","link":"Cardano-Api.html#v:makeGenesisKeyDelegationCertificate"},{"display_html":"data MIRTarget","name":"MIRTarget StakeAddressesMIR SendToReservesMIR SendToTreasuryMIR","module":"Cardano.Api","link":"Cardano-Api.html#t:MIRTarget"},{"display_html":"data UpdateProposal = UpdateProposal !(Map (Hash GenesisKey) ProtocolParametersUpdate) !EpochNo","name":"UpdateProposal UpdateProposal","module":"Cardano.Api","link":"Cardano-Api.html#t:UpdateProposal"},{"display_html":"data ProtocolParametersUpdate = ProtocolParametersUpdate {}","name":"ProtocolParametersUpdate ProtocolParametersUpdate protocolUpdateProtocolVersion protocolUpdateDecentralization protocolUpdateExtraPraosEntropy protocolUpdateMaxBlockHeaderSize protocolUpdateMaxBlockBodySize protocolUpdateMaxTxSize protocolUpdateTxFeeFixed protocolUpdateTxFeePerByte protocolUpdateMinUTxOValue protocolUpdateStakeAddressDeposit protocolUpdateStakePoolDeposit protocolUpdateMinPoolCost protocolUpdatePoolRetireMaxEpoch protocolUpdateStakePoolTargetNum protocolUpdatePoolPledgeInfluence protocolUpdateMonetaryExpansion protocolUpdateTreasuryCut protocolUpdateUTxOCostPerWord protocolUpdateCostModels protocolUpdatePrices protocolUpdateMaxTxExUnits protocolUpdateMaxBlockExUnits protocolUpdateMaxValueSize protocolUpdateCollateralPercent protocolUpdateMaxCollateralInputs","module":"Cardano.Api","link":"Cardano-Api.html#t:ProtocolParametersUpdate"},{"display_html":"makeShelleyUpdateProposal ∷ ProtocolParametersUpdate → [Hash GenesisKey] → EpochNo → UpdateProposal","name":"makeShelleyUpdateProposal","module":"Cardano.Api","link":"Cardano-Api.html#v:makeShelleyUpdateProposal"},{"display_html":"data PraosNonce","name":"PraosNonce","module":"Cardano.Api","link":"Cardano-Api.html#t:PraosNonce"},{"display_html":"makePraosNonce ∷ ByteString → PraosNonce","name":"makePraosNonce","module":"Cardano.Api","link":"Cardano-Api.html#v:makePraosNonce"},{"display_html":"newtype NetworkMagic = NetworkMagic {}","name":"NetworkMagic NetworkMagic unNetworkMagic","module":"Cardano.Api","link":"Cardano-Api.html#t:NetworkMagic"},{"display_html":"toNetworkMagic ∷ NetworkId → NetworkMagic","name":"toNetworkMagic","module":"Cardano.Api","link":"Cardano-Api.html#v:toNetworkMagic"},{"display_html":"data SomeNodeClientProtocol where","name":"SomeNodeClientProtocol SomeNodeClientProtocol","module":"Cardano.Api","link":"Cardano-Api.html#t:SomeNodeClientProtocol"},{"display_html":"newtype SlotsInEpoch = SlotsInEpoch Word64","name":"SlotsInEpoch SlotsInEpoch","module":"Cardano.Api","link":"Cardano-Api.html#t:SlotsInEpoch"},{"display_html":"newtype SlotsToEpochEnd = SlotsToEpochEnd Word64","name":"SlotsToEpochEnd SlotsToEpochEnd","module":"Cardano.Api","link":"Cardano-Api.html#t:SlotsToEpochEnd"},{"display_html":"slotToEpoch ∷ SlotNo → EraHistory mode → Either PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd)","name":"slotToEpoch","module":"Cardano.Api","link":"Cardano-Api.html#v:slotToEpoch"},{"display_html":"module Cardano.Api","name":"","module":"Cardano.Api.Shelley","link":""},{"display_html":"data ShelleyGenesis era = ShelleyGenesis {}","name":"ShelleyGenesis ShelleyGenesis sgActiveSlotsCoeff sgEpochLength sgGenDelegs sgInitialFunds sgMaxKESEvolutions sgMaxLovelaceSupply sgNetworkId sgNetworkMagic sgProtocolParams sgSecurityParam sgSlotLength sgSlotsPerKESPeriod sgStaking sgSystemStart sgUpdateQuorum","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ShelleyGenesis"},{"display_html":"shelleyGenesisDefaults ∷ ShelleyGenesis crypto","name":"shelleyGenesisDefaults","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:shelleyGenesisDefaults"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ScriptDataHash ByronKeyHash ByronKeyHashLegacy KesKeyHash VrfKeyHash StakePoolMetadataHash","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:Hash"},{"display_html":"data Address addrtype where","name":"Address ShelleyAddress","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:Address"},{"display_html":"toShelleyAddr ∷ AddressInEra era → Addr StandardCrypto","name":"toShelleyAddr","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyAddr"},{"display_html":"fromShelleyAddr ∷ IsShelleyBasedEra era ⇒ Addr StandardCrypto → AddressInEra era","name":"fromShelleyAddr","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyAddr"},{"display_html":"toShelleyStakeCredential ∷ StakeCredential → StakeCredential StandardCrypto","name":"toShelleyStakeCredential","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyStakeCredential"},{"display_html":"fromShelleyStakeCredential ∷ StakeCredential StandardCrypto → StakeCredential","name":"fromShelleyStakeCredential","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyStakeCredential"},{"display_html":"data NetworkId","name":"NetworkId Mainnet Testnet","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:NetworkId"},{"display_html":"data PaymentCredential","name":"PaymentCredential PaymentCredentialByKey PaymentCredentialByScript","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:PaymentCredential"},{"display_html":"data StakeAddress where","name":"StakeAddress StakeAddress","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakeAddress"},{"display_html":"data StakeAddressReference","name":"StakeAddressReference StakeAddressByValue StakeAddressByPointer NoStakeAddress","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakeAddressReference"},{"display_html":"data StakeCredential","name":"StakeCredential StakeCredentialByKey StakeCredentialByScript","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakeCredential"},{"display_html":"toShelleyStakeAddr ∷ StakeAddress → RewardAcnt StandardCrypto","name":"toShelleyStakeAddr","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyStakeAddr"},{"display_html":"fromShelleyStakeAddr ∷ RewardAcnt StandardCrypto → StakeAddress","name":"fromShelleyStakeAddr","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyStakeAddr"},{"display_html":"fromShelleyStakeReference ∷ StakeReference StandardCrypto → StakeAddressReference","name":"fromShelleyStakeReference","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyStakeReference"},{"display_html":"fromShelleyPaymentCredential ∷ PaymentCredential StandardCrypto → PaymentCredential","name":"fromShelleyPaymentCredential","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyPaymentCredential"},{"display_html":"data TxBody era where","name":"TxBody ShelleyTxBody","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:TxBody"},{"display_html":"newtype TxId = TxId (Hash StandardCrypto EraIndependentTxBody)","name":"TxId TxId","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:TxId"},{"display_html":"toShelleyTxId ∷ TxId → TxId StandardCrypto","name":"toShelleyTxId","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyTxId"},{"display_html":"fromShelleyTxId ∷ TxId StandardCrypto → TxId","name":"fromShelleyTxId","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyTxId"},{"display_html":"data TxIn = TxIn TxId TxIx","name":"TxIn TxIn","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:TxIn"},{"display_html":"toShelleyTxIn ∷ TxIn → TxIn StandardCrypto","name":"toShelleyTxIn","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyTxIn"},{"display_html":"fromShelleyTxIn ∷ TxIn StandardCrypto → TxIn","name":"fromShelleyTxIn","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyTxIn"},{"display_html":"data TxOut era = TxOut (AddressInEra era) (TxOutValue era) (TxOutDatumHash era)","name":"TxOut TxOut","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:TxOut"},{"display_html":"toShelleyTxOut ∷ ∀ era ledgerera. (ShelleyLedgerEra era ~ ledgerera, IsShelleyBasedEra era, ShelleyBased ledgerera) ⇒ TxOut era → TxOut ledgerera","name":"toShelleyTxOut","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyTxOut"},{"display_html":"fromShelleyTxOut ∷ TxOut StandardShelley → TxOut ShelleyEra","name":"fromShelleyTxOut","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyTxOut"},{"display_html":"newtype TxIx = TxIx Word","name":"TxIx TxIx","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:TxIx"},{"display_html":"newtype Lovelace = Lovelace Integer","name":"Lovelace Lovelace","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:Lovelace"},{"display_html":"toShelleyLovelace ∷ Lovelace → Coin","name":"toShelleyLovelace","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyLovelace"},{"display_html":"fromShelleyLovelace ∷ Coin → Lovelace","name":"fromShelleyLovelace","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyLovelace"},{"display_html":"toMaryValue ∷ Value → Value StandardCrypto","name":"toMaryValue","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toMaryValue"},{"display_html":"fromMaryValue ∷ Value StandardCrypto → Value","name":"fromMaryValue","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromMaryValue"},{"display_html":"calcMinimumDeposit ∷ Value → Lovelace → Lovelace","name":"calcMinimumDeposit","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:calcMinimumDeposit"},{"display_html":"data Tx era where","name":"Tx ShelleyTx","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:Tx"},{"display_html":"data KeyWitness era where","name":"KeyWitness ShelleyBootstrapWitness ShelleyKeyWitness","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:KeyWitness"},{"display_html":"data ShelleyWitnessSigningKey","name":"ShelleyWitnessSigningKey WitnessPaymentKey WitnessPaymentExtendedKey WitnessStakeKey WitnessStakeExtendedKey WitnessStakePoolKey WitnessGenesisKey WitnessGenesisExtendedKey WitnessGenesisDelegateKey WitnessGenesisDelegateExtendedKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ShelleyWitnessSigningKey"},{"display_html":"data ShelleySigningKey","name":"ShelleySigningKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ShelleySigningKey"},{"display_html":"getShelleyKeyWitnessVerificationKey ∷ ShelleySigningKey → VKey Witness StandardCrypto","name":"getShelleyKeyWitnessVerificationKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:getShelleyKeyWitnessVerificationKey"},{"display_html":"makeShelleySignature ∷ SignableRepresentation tosign ⇒ tosign → ShelleySigningKey → SignedDSIGN StandardCrypto tosign","name":"makeShelleySignature","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:makeShelleySignature"},{"display_html":"toShelleySigningKey ∷ ShelleyWitnessSigningKey → ShelleySigningKey","name":"toShelleySigningKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleySigningKey"},{"display_html":"toShelleyMetadata ∷ Map Word64 TxMetadataValue → Map Word64 Metadatum","name":"toShelleyMetadata","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyMetadata"},{"display_html":"fromShelleyMetadata ∷ Map Word64 Metadatum → Map Word64 TxMetadataValue","name":"fromShelleyMetadata","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyMetadata"},{"display_html":"toShelleyMetadatum ∷ TxMetadataValue → Metadatum","name":"toShelleyMetadatum","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyMetadatum"},{"display_html":"fromShelleyMetadatum ∷ Metadatum → TxMetadataValue","name":"fromShelleyMetadatum","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyMetadatum"},{"display_html":"data ProtocolParameters = ProtocolParameters {}","name":"ProtocolParameters ProtocolParameters protocolParamProtocolVersion protocolParamDecentralization protocolParamExtraPraosEntropy protocolParamMaxBlockHeaderSize protocolParamMaxBlockBodySize protocolParamMaxTxSize protocolParamTxFeeFixed protocolParamTxFeePerByte protocolParamMinUTxOValue protocolParamStakeAddressDeposit protocolParamStakePoolDeposit protocolParamMinPoolCost protocolParamPoolRetireMaxEpoch protocolParamStakePoolTargetNum protocolParamPoolPledgeInfluence protocolParamMonetaryExpansion protocolParamTreasuryCut protocolParamUTxOCostPerWord protocolParamCostModels protocolParamPrices protocolParamMaxTxExUnits protocolParamMaxBlockExUnits protocolParamMaxValueSize protocolParamCollateralPercent protocolParamMaxCollateralInputs","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ProtocolParameters"},{"display_html":"toShelleyScript ∷ ScriptInEra era → Script (ShelleyLedgerEra era)","name":"toShelleyScript","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyScript"},{"display_html":"toShelleyMultiSig ∷ SimpleScript SimpleScriptV1 → MultiSig StandardCrypto","name":"toShelleyMultiSig","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyMultiSig"},{"display_html":"fromShelleyMultiSig ∷ MultiSig StandardCrypto → SimpleScript lang","name":"fromShelleyMultiSig","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyMultiSig"},{"display_html":"toAllegraTimelock ∷ ∀ lang. SimpleScript lang → Timelock StandardCrypto","name":"toAllegraTimelock","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toAllegraTimelock"},{"display_html":"fromAllegraTimelock ∷ TimeLocksSupported lang → Timelock StandardCrypto → SimpleScript lang","name":"fromAllegraTimelock","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromAllegraTimelock"},{"display_html":"toShelleyScriptHash ∷ ScriptHash → ScriptHash StandardCrypto","name":"toShelleyScriptHash","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyScriptHash"},{"display_html":"fromShelleyScriptHash ∷ ScriptHash StandardCrypto → ScriptHash","name":"fromShelleyScriptHash","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyScriptHash"},{"display_html":"data PlutusScript lang where","name":"PlutusScript PlutusScriptSerialised","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:PlutusScript"},{"display_html":"toPlutusData ∷ ScriptData → Data","name":"toPlutusData","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toPlutusData"},{"display_html":"fromPlutusData ∷ Data → ScriptData","name":"fromPlutusData","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromPlutusData"},{"display_html":"toAlonzoData ∷ ScriptData → Data ledgerera","name":"toAlonzoData","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toAlonzoData"},{"display_html":"fromAlonzoData ∷ Data ledgerera → ScriptData","name":"fromAlonzoData","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromAlonzoData"},{"display_html":"data Certificate","name":"Certificate StakeAddressRegistrationCertificate StakeAddressDeregistrationCertificate StakeAddressDelegationCertificate StakePoolRegistrationCertificate StakePoolRetirementCertificate GenesisKeyDelegationCertificate MIRCertificate","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:Certificate"},{"display_html":"toShelleyCertificate ∷ Certificate → DCert StandardCrypto","name":"toShelleyCertificate","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyCertificate"},{"display_html":"fromShelleyCertificate ∷ DCert StandardCrypto → Certificate","name":"fromShelleyCertificate","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyCertificate"},{"display_html":"data OperationalCertificate = OperationalCertificate !(OCert StandardCrypto) !(VerificationKey StakePoolKey)","name":"OperationalCertificate OperationalCertificate","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:OperationalCertificate"},{"display_html":"data OperationalCertificateIssueCounter = OperationalCertificateIssueCounter !Word64 !(VerificationKey StakePoolKey)","name":"OperationalCertificateIssueCounter OperationalCertificateIssueCounter","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:OperationalCertificateIssueCounter"},{"display_html":"data OperationalCertIssueError = OperationalCertKeyMismatch (VerificationKey StakePoolKey) (VerificationKey StakePoolKey)","name":"OperationalCertIssueError OperationalCertKeyMismatch","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:OperationalCertIssueError"},{"display_html":"data StakePoolMetadata = StakePoolMetadata !Text !Text !Text !Text","name":"StakePoolMetadata StakePoolMetadata","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakePoolMetadata"},{"display_html":"stakePoolName ∷ StakePoolMetadata → Text","name":"stakePoolName","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolName"},{"display_html":"stakePoolDescription ∷ StakePoolMetadata → Text","name":"stakePoolDescription","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolDescription"},{"display_html":"stakePoolTicker ∷ StakePoolMetadata → Text","name":"stakePoolTicker","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolTicker"},{"display_html":"stakePoolHomepage ∷ StakePoolMetadata → Text","name":"stakePoolHomepage","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolHomepage"},{"display_html":"data StakePoolMetadataReference = StakePoolMetadataReference Text (Hash StakePoolMetadata)","name":"StakePoolMetadataReference StakePoolMetadataReference","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakePoolMetadataReference"},{"display_html":"stakePoolMetadataURL ∷ StakePoolMetadataReference → Text","name":"stakePoolMetadataURL","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolMetadataURL"},{"display_html":"stakePoolMetadataHash ∷ StakePoolMetadataReference → Hash StakePoolMetadata","name":"stakePoolMetadataHash","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolMetadataHash"},{"display_html":"data StakePoolParameters = StakePoolParameters PoolId (Hash VrfKey) Lovelace Rational StakeAddress Lovelace [Hash StakeKey] [StakePoolRelay] (Maybe StakePoolMetadataReference)","name":"StakePoolParameters StakePoolParameters","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakePoolParameters"},{"display_html":"stakePoolId ∷ StakePoolParameters → PoolId","name":"stakePoolId","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolId"},{"display_html":"stakePoolVRF ∷ StakePoolParameters → Hash VrfKey","name":"stakePoolVRF","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolVRF"},{"display_html":"stakePoolCost ∷ StakePoolParameters → Lovelace","name":"stakePoolCost","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolCost"},{"display_html":"stakePoolMargin ∷ StakePoolParameters → Rational","name":"stakePoolMargin","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolMargin"},{"display_html":"stakePoolRewardAccount ∷ StakePoolParameters → StakeAddress","name":"stakePoolRewardAccount","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolRewardAccount"},{"display_html":"stakePoolPledge ∷ StakePoolParameters → Lovelace","name":"stakePoolPledge","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolPledge"},{"display_html":"stakePoolOwners ∷ StakePoolParameters → [Hash StakeKey]","name":"stakePoolOwners","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolOwners"},{"display_html":"stakePoolRelays ∷ StakePoolParameters → [StakePoolRelay]","name":"stakePoolRelays","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolRelays"},{"display_html":"stakePoolMetadata ∷ StakePoolParameters → Maybe StakePoolMetadataReference","name":"stakePoolMetadata","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:stakePoolMetadata"},{"display_html":"data StakePoolRelay","name":"StakePoolRelay StakePoolRelayIp StakePoolRelayDnsARecord StakePoolRelayDnsSrvRecord","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakePoolRelay"},{"display_html":"newtype EpochNo = EpochNo {}","name":"EpochNo EpochNo unEpochNo","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:EpochNo"},{"display_html":"data StakePoolKey","name":"StakePoolKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:StakePoolKey"},{"display_html":"type PoolId = Hash StakePoolKey","name":"PoolId","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:PoolId"},{"display_html":"data KesKey","name":"KesKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:KesKey"},{"display_html":"newtype KESPeriod = KESPeriod {}","name":"KESPeriod KESPeriod unKESPeriod","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:KESPeriod"},{"display_html":"data VrfKey","name":"VrfKey","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:VrfKey"},{"display_html":"data LocalNodeConnectInfo mode = LocalNodeConnectInfo (ConsensusModeParams mode) NetworkId FilePath","name":"LocalNodeConnectInfo LocalNodeConnectInfo","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:LocalNodeConnectInfo"},{"display_html":"data ShelleyMode","name":"ShelleyMode","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ShelleyMode"},{"display_html":"data ConsensusMode mode where","name":"ConsensusMode ShelleyMode","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ConsensusMode"},{"display_html":"data LocalNodeClientProtocols block point tip tx txerr query m = LocalNodeClientProtocols (LocalChainSyncClient block point tip m) (Maybe (LocalTxSubmissionClient tx txerr m ())) (Maybe (LocalStateQueryClient block point query m ()))","name":"LocalNodeClientProtocols LocalNodeClientProtocols","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:LocalNodeClientProtocols"},{"display_html":"type family ShelleyLedgerEra era where ...","name":"ShelleyLedgerEra","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ShelleyLedgerEra"},{"display_html":"data DebugLedgerState era where","name":"DebugLedgerState DebugLedgerState","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:DebugLedgerState"},{"display_html":"newtype ProtocolState era = ProtocolState (Serialised (ChainDepState (Crypto (ShelleyLedgerEra era))))","name":"ProtocolState ProtocolState","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:ProtocolState"},{"display_html":"newtype SerialisedDebugLedgerState era = SerialisedDebugLedgerState (Serialised (NewEpochState (ShelleyLedgerEra era)))","name":"SerialisedDebugLedgerState SerialisedDebugLedgerState","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:SerialisedDebugLedgerState"},{"display_html":"newtype UTxO era = UTxO (Map TxIn (TxOut era))","name":"UTxO UTxO","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#t:UTxO"},{"display_html":"toShelleyNetwork ∷ NetworkId → Network","name":"toShelleyNetwork","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:toShelleyNetwork"},{"display_html":"fromShelleyPParams ∷ PParams ledgerera → ProtocolParameters","name":"fromShelleyPParams","module":"Cardano.Api.Shelley","link":"Cardano-Api-Shelley.html#v:fromShelleyPParams"},{"display_html":"module Cardano.Api","name":"","module":"Cardano.Api.Byron","link":""},{"display_html":"data SomeByronSigningKey","name":"SomeByronSigningKey AByronSigningKeyLegacy AByronSigningKey","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:SomeByronSigningKey"},{"display_html":"data family Hash keyrole ∷ Type","name":"Hash PaymentKeyHash PaymentExtendedKeyHash StakeKeyHash StakeExtendedKeyHash GenesisKeyHash GenesisExtendedKeyHash GenesisDelegateKeyHash GenesisDelegateExtendedKeyHash GenesisUTxOKeyHash StakePoolKeyHash ByronKeyHash ByronKeyHashLegacy","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:Hash"},{"display_html":"data Address addrtype where","name":"Address ByronAddress","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:Address"},{"display_html":"data NetworkId","name":"NetworkId Mainnet Testnet","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:NetworkId"},{"display_html":"data TxBody era where","name":"TxBody ByronTxBody","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:TxBody"},{"display_html":"newtype TxId = TxId (Hash StandardCrypto EraIndependentTxBody)","name":"TxId TxId","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:TxId"},{"display_html":"data TxIn = TxIn TxId TxIx","name":"TxIn TxIn","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:TxIn"},{"display_html":"data TxOut era = TxOut (AddressInEra era) (TxOutValue era) (TxOutDatumHash era)","name":"TxOut TxOut","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:TxOut"},{"display_html":"newtype TxIx = TxIx Word","name":"TxIx TxIx","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:TxIx"},{"display_html":"newtype Lovelace = Lovelace Integer","name":"Lovelace Lovelace","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:Lovelace"},{"display_html":"data Tx era where","name":"Tx ByronTx","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:Tx"},{"display_html":"data KeyWitness era where","name":"KeyWitness ByronKeyWitness","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:KeyWitness"},{"display_html":"data WitnessNetworkIdOrByronAddress","name":"WitnessNetworkIdOrByronAddress WitnessNetworkId WitnessByronAddress","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:WitnessNetworkIdOrByronAddress"},{"display_html":"class Show e ⇒ Error e where","name":"Error displayError","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:Error"},{"display_html":"data FileError e","name":"FileError FileError FileErrorTempFile FileIOError","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:FileError"},{"display_html":"data LocalNodeConnectInfo mode = LocalNodeConnectInfo (ConsensusModeParams mode) NetworkId FilePath","name":"LocalNodeConnectInfo LocalNodeConnectInfo","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:LocalNodeConnectInfo"},{"display_html":"data ByronMode","name":"ByronMode","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ByronMode"},{"display_html":"data ConsensusMode mode where","name":"ConsensusMode ByronMode","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ConsensusMode"},{"display_html":"data LocalNodeClientProtocols block point tip tx txerr query m = LocalNodeClientProtocols (LocalChainSyncClient block point tip m) (Maybe (LocalTxSubmissionClient tx txerr m ())) (Maybe (LocalStateQueryClient block point query m ()))","name":"LocalNodeClientProtocols LocalNodeClientProtocols","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:LocalNodeClientProtocols"},{"display_html":"newtype ChainSyncClient header point tip (m ∷ Type → Type) a = ChainSyncClient {}","name":"ChainSyncClient ChainSyncClient runChainSyncClient","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ChainSyncClient"},{"display_html":"newtype LocalTxSubmissionClient tx reject (m ∷ Type → Type) a = LocalTxSubmissionClient (m (LocalTxClientStIdle tx reject m a))","name":"LocalTxSubmissionClient LocalTxSubmissionClient","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:LocalTxSubmissionClient"},{"display_html":"newtype LocalStateQueryClient block point (query ∷ Type → Type) (m ∷ Type → Type) a = LocalStateQueryClient {}","name":"LocalStateQueryClient LocalStateQueryClient runLocalStateQueryClient","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:LocalStateQueryClient"},{"display_html":"newtype NetworkMagic = NetworkMagic {}","name":"NetworkMagic NetworkMagic unNetworkMagic","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:NetworkMagic"},{"display_html":"newtype ByronUpdateProposal = ByronUpdateProposal {}","name":"ByronUpdateProposal ByronUpdateProposal unByronUpdateProposal","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ByronUpdateProposal"},{"display_html":"data ByronProtocolParametersUpdate = ByronProtocolParametersUpdate {}","name":"ByronProtocolParametersUpdate ByronProtocolParametersUpdate bPpuScriptVersion bPpuSlotDuration bPpuMaxBlockSize bPpuMaxHeaderSize bPpuMaxTxSize bPpuMaxProposalSize bPpuMpcThd bPpuHeavyDelThd bPpuUpdateVoteThd bPpuUpdateProposalThd bPpuUpdateProposalTTL bPpuSoftforkRule bPpuTxFeePolicy bPpuUnlockStakeEpoch","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ByronProtocolParametersUpdate"},{"display_html":"makeByronUpdateProposal ∷ NetworkId → ProtocolVersion → SoftwareVersion → SystemTag → InstallerHash → SomeByronSigningKey → ByronProtocolParametersUpdate → ByronUpdateProposal","name":"makeByronUpdateProposal","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:makeByronUpdateProposal"},{"display_html":"toByronLedgerUpdateProposal ∷ ByronUpdateProposal → GenTx ByronBlock","name":"toByronLedgerUpdateProposal","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronLedgerUpdateProposal"},{"display_html":"makeProtocolParametersUpdate ∷ ByronProtocolParametersUpdate → ProtocolParametersUpdate","name":"makeProtocolParametersUpdate","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:makeProtocolParametersUpdate"},{"display_html":"newtype ByronVote = ByronVote {}","name":"ByronVote ByronVote unByronVote","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#t:ByronVote"},{"display_html":"makeByronVote ∷ NetworkId → SomeByronSigningKey → ByronUpdateProposal → Bool → ByronVote","name":"makeByronVote","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:makeByronVote"},{"display_html":"toByronLedgertoByronVote ∷ ByronVote → GenTx ByronBlock","name":"toByronLedgertoByronVote","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronLedgertoByronVote"},{"display_html":"fromByronTxIn ∷ TxIn → TxIn","name":"fromByronTxIn","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:fromByronTxIn"},{"display_html":"toByronLovelace ∷ Lovelace → Maybe Lovelace","name":"toByronLovelace","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronLovelace"},{"display_html":"toByronNetworkMagic ∷ NetworkId → NetworkMagic","name":"toByronNetworkMagic","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronNetworkMagic"},{"display_html":"toByronProtocolMagicId ∷ NetworkId → ProtocolMagicId","name":"toByronProtocolMagicId","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronProtocolMagicId"},{"display_html":"toByronRequiresNetworkMagic ∷ NetworkId → RequiresNetworkMagic","name":"toByronRequiresNetworkMagic","module":"Cardano.Api.Byron","link":"Cardano-Api-Byron.html#v:toByronRequiresNetworkMagic"}] \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Address.html b/cardano-api/src/Cardano.Api.Address.html index 6dc99e3e100..e421ab8d86d 100644 --- a/cardano-api/src/Cardano.Api.Address.html +++ b/cardano-api/src/Cardano.Api.Address.html @@ -101,11 +101,11 @@ -- In particular, Byron addresses are typically formatted in base 58, while -- Shelley addresses (payment and stake) are formatted using Bech32. -- -class HasTypeProxy addr => SerialiseAddress addr where +class HasTypeProxy addr => SerialiseAddress addr where - serialiseAddress :: addr -> Text + serialiseAddress :: addr -> Text - deserialiseAddress :: AsType addr -> Text -> Maybe addr + deserialiseAddress :: AsType addr -> Text -> Maybe addr -- TODO: consider adding data AddressDecodeError @@ -121,15 +121,15 @@ instance HasTypeProxy ByronAddr where data AsType ByronAddr = AsByronAddr - proxyToAsType :: Proxy ByronAddr -> AsType ByronAddr + proxyToAsType :: Proxy ByronAddr -> AsType ByronAddr proxyToAsType Proxy ByronAddr _ = AsType ByronAddr AsByronAddr instance HasTypeProxy ShelleyAddr where data AsType ShelleyAddr = AsShelleyAddr - proxyToAsType :: Proxy ShelleyAddr -> AsType ShelleyAddr -proxyToAsType Proxy ShelleyAddr + proxyToAsType :: Proxy ShelleyAddr -> AsType ShelleyAddr +proxyToAsType Proxy ShelleyAddr _ = AsType ShelleyAddr AsShelleyAddr @@ -155,7 +155,7 @@ -- (either Byron or Shelley). The 'AddressInEra' type connects the address type -- with the era in which it is supported. -- -data Address addrtype where +data Address addrtype where -- | Byron addresses were the only supported address type in the original -- Byron era. @@ -176,22 +176,22 @@ -- the era, but in fact this is a phantom type parameter and they are -- the same for all eras. See 'toShelleyAddr' below. -deriving instance Eq (Address addrtype) -deriving instance Ord (Address addrtype) -deriving instance Show (Address addrtype) +deriving instance Eq (Address addrtype) +deriving instance Ord (Address addrtype) +deriving instance Show (Address addrtype) -instance HasTypeProxy addrtype => HasTypeProxy (Address addrtype) where - data AsType (Address addrtype) = AsAddress (AsType addrtype) - proxyToAsType :: Proxy (Address addrtype) -> AsType (Address addrtype) -proxyToAsType Proxy (Address addrtype) +instance HasTypeProxy addrtype => HasTypeProxy (Address addrtype) where + data AsType (Address addrtype) = AsAddress (AsType addrtype) + proxyToAsType :: Proxy (Address addrtype) -> AsType (Address addrtype) +proxyToAsType Proxy (Address addrtype) _ = AsType addrtype -> AsType (Address addrtype) forall addrtype. AsType addrtype -> AsType (Address addrtype) AsAddress (Proxy addrtype -> AsType addrtype forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType (Proxy addrtype forall k (t :: k). Proxy t -Proxy :: Proxy addrtype)) +Proxy :: Proxy addrtype)) pattern AsByronAddress :: AsType (Address ByronAddr) pattern $bAsByronAddress :: AsType (Address ByronAddr) @@ -208,9 +208,9 @@ {-# COMPLETE AsShelleyAddress #-} instance SerialiseAsRawBytes (Address ByronAddr) where - serialiseToRawBytes :: Address ByronAddr -> ByteString -serialiseToRawBytes (ByronAddress Address -addr) = + serialiseToRawBytes :: Address ByronAddr -> ByteString +serialiseToRawBytes (ByronAddress Address +addr) = Addr Any -> ByteString forall crypto. Addr crypto -> ByteString Shelley.serialiseAddr @@ -229,16 +229,16 @@ (Address -> ByteString) -> Address -> ByteString forall a b. (a -> b) -> a -> b $ Address -addr +addr - deserialiseFromRawBytes :: AsType (Address ByronAddr) + deserialiseFromRawBytes :: AsType (Address ByronAddr) -> ByteString -> Maybe (Address ByronAddr) -deserialiseFromRawBytes (AsAddress AsByronAddr) ByteString -bs = +deserialiseFromRawBytes (AsAddress AsByronAddr) ByteString +bs = case ByteString -> Maybe (Addr StandardCrypto) forall crypto. Crypto crypto => ByteString -> Maybe (Addr crypto) Shelley.deserialiseAddr ByteString -bs :: Maybe (Shelley.Addr StandardCrypto) of +bs :: Maybe (Shelley.Addr StandardCrypto) of Maybe (Addr StandardCrypto) Nothing -> Maybe (Address ByronAddr) forall a. Maybe a @@ -246,20 +246,20 @@ Just Shelley.Addr{} -> Maybe (Address ByronAddr) forall a. Maybe a Nothing - Just (Shelley.AddrBootstrap (Shelley.BootstrapAddress Address -addr)) -> + Just (Shelley.AddrBootstrap (Shelley.BootstrapAddress Address +addr)) -> Address ByronAddr -> Maybe (Address ByronAddr) forall a. a -> Maybe a Just (Address -> Address ByronAddr ByronAddress Address -addr) +addr) instance SerialiseAsRawBytes (Address ShelleyAddr) where - serialiseToRawBytes :: Address ShelleyAddr -> ByteString -serialiseToRawBytes (ShelleyAddress Network -nw PaymentCredential StandardCrypto -pc StakeReference StandardCrypto -scr) = + serialiseToRawBytes :: Address ShelleyAddr -> ByteString +serialiseToRawBytes (ShelleyAddress Network +nw PaymentCredential StandardCrypto +pc StakeReference StandardCrypto +scr) = Addr StandardCrypto -> ByteString forall crypto. Addr crypto -> ByteString Shelley.serialiseAddr (Network @@ -270,18 +270,18 @@ Network -> PaymentCredential crypto -> StakeReference crypto -> Addr crypto Shelley.Addr Network -nw PaymentCredential StandardCrypto -pc StakeReference StandardCrypto -scr) +nw PaymentCredential StandardCrypto +pc StakeReference StandardCrypto +scr) - deserialiseFromRawBytes :: AsType (Address ShelleyAddr) + deserialiseFromRawBytes :: AsType (Address ShelleyAddr) -> ByteString -> Maybe (Address ShelleyAddr) -deserialiseFromRawBytes (AsAddress AsShelleyAddr) ByteString -bs = +deserialiseFromRawBytes (AsAddress AsShelleyAddr) ByteString +bs = case ByteString -> Maybe (Addr StandardCrypto) forall crypto. Crypto crypto => ByteString -> Maybe (Addr crypto) Shelley.deserialiseAddr ByteString -bs of +bs of Maybe (Addr StandardCrypto) Nothing -> Maybe (Address ShelleyAddr) forall a. Maybe a @@ -289,22 +289,22 @@ Just Shelley.AddrBootstrap{} -> Maybe (Address ShelleyAddr) forall a. Maybe a Nothing - Just (Shelley.Addr Network -nw PaymentCredential StandardCrypto -pc StakeReference StandardCrypto -scr) -> Address ShelleyAddr -> Maybe (Address ShelleyAddr) + Just (Shelley.Addr Network +nw PaymentCredential StandardCrypto +pc StakeReference StandardCrypto +scr) -> Address ShelleyAddr -> Maybe (Address ShelleyAddr) forall a. a -> Maybe a Just (Network -> PaymentCredential StandardCrypto -> StakeReference StandardCrypto -> Address ShelleyAddr ShelleyAddress Network -nw PaymentCredential StandardCrypto -pc StakeReference StandardCrypto -scr) +nw PaymentCredential StandardCrypto +pc StakeReference StandardCrypto +scr) instance SerialiseAsBech32 (Address ShelleyAddr) where - bech32PrefixFor :: Address ShelleyAddr -> Text + bech32PrefixFor :: Address ShelleyAddr -> Text bech32PrefixFor (ShelleyAddress Network Shelley.Mainnet PaymentCredential StandardCrypto _ StakeReference StandardCrypto @@ -316,16 +316,16 @@ _) = Text "addr_test" - bech32PrefixesPermitted :: AsType (Address ShelleyAddr) -> [Text] + bech32PrefixesPermitted :: AsType (Address ShelleyAddr) -> [Text] bech32PrefixesPermitted (AsAddress AsShelleyAddr) = [Text "addr", Text "addr_test"] instance SerialiseAddress (Address ByronAddr) where - serialiseAddress :: Address ByronAddr -> Text -serialiseAddress addr :: Address ByronAddr -addr@ByronAddress{} = + serialiseAddress :: Address ByronAddr -> Text +serialiseAddress addr :: Address ByronAddr +addr@ByronAddress{} = ByteString -> Text Text.decodeLatin1 (ByteString -> Text) @@ -345,17 +345,17 @@ (Address ByronAddr -> Text) -> Address ByronAddr -> Text forall a b. (a -> b) -> a -> b $ Address ByronAddr -addr +addr - deserialiseAddress :: AsType (Address ByronAddr) -> Text -> Maybe (Address ByronAddr) -deserialiseAddress (AsAddress AsByronAddr) Text -txt = do - ByteString -bs <- Alphabet -> ByteString -> Maybe ByteString + deserialiseAddress :: AsType (Address ByronAddr) -> Text -> Maybe (Address ByronAddr) +deserialiseAddress (AsAddress AsByronAddr) Text +txt = do + ByteString +bs <- Alphabet -> ByteString -> Maybe ByteString Base58.decodeBase58 Alphabet Base58.bitcoinAlphabet (Text -> ByteString Text.encodeUtf8 Text -txt) +txt) AsType (Address ByronAddr) -> ByteString -> Maybe (Address ByronAddr) forall a. @@ -365,20 +365,20 @@ forall addrtype. AsType addrtype -> AsType (Address addrtype) AsAddress AsType ByronAddr AsByronAddr) ByteString -bs +bs instance SerialiseAddress (Address ShelleyAddr) where - serialiseAddress :: Address ShelleyAddr -> Text -serialiseAddress addr :: Address ShelleyAddr -addr@ShelleyAddress{} = + serialiseAddress :: Address ShelleyAddr -> Text +serialiseAddress addr :: Address ShelleyAddr +addr@ShelleyAddress{} = Address ShelleyAddr -> Text forall a. SerialiseAsBech32 a => a -> Text serialiseToBech32 Address ShelleyAddr -addr +addr - deserialiseAddress :: AsType (Address ShelleyAddr) -> Text -> Maybe (Address ShelleyAddr) -deserialiseAddress (AsAddress AsShelleyAddr) Text -t = + deserialiseAddress :: AsType (Address ShelleyAddr) -> Text -> Maybe (Address ShelleyAddr) +deserialiseAddress (AsAddress AsShelleyAddr) Text +t = (Bech32DecodeError -> Maybe (Address ShelleyAddr)) -> (Address ShelleyAddr -> Maybe (Address ShelleyAddr)) -> Either Bech32DecodeError (Address ShelleyAddr) @@ -406,15 +406,15 @@ forall addrtype. AsType addrtype -> AsType (Address addrtype) AsAddress AsType ShelleyAddr AsShelleyAddr) Text -t +t makeByronAddress :: NetworkId -> VerificationKey ByronKey -> Address ByronAddr makeByronAddress :: NetworkId -> VerificationKey ByronKey -> Address ByronAddr -makeByronAddress NetworkId -nw (ByronVerificationKey vk) = +makeByronAddress NetworkId +nw (ByronVerificationKey vk) = Address -> Address ByronAddr ByronAddress (Address -> Address ByronAddr) -> Address -> Address ByronAddr forall a b. (a -> b) -> a -> b @@ -423,9 +423,9 @@ Byron.makeVerKeyAddress (NetworkId -> NetworkMagic toByronNetworkMagic NetworkId -nw) +nw) VerificationKey -vk +vk makeShelleyAddress :: NetworkId @@ -436,10 +436,10 @@ -> PaymentCredential -> StakeAddressReference -> Address ShelleyAddr -makeShelleyAddress NetworkId -nw PaymentCredential -pc StakeAddressReference -scr = +makeShelleyAddress NetworkId +nw PaymentCredential +pc StakeAddressReference +scr = Network -> PaymentCredential StandardCrypto -> StakeReference StandardCrypto @@ -447,13 +447,13 @@ ShelleyAddress (NetworkId -> Network toShelleyNetwork NetworkId -nw) +nw) (PaymentCredential -> PaymentCredential StandardCrypto toShelleyPaymentCredential PaymentCredential -pc) +pc) (StakeAddressReference -> StakeReference StandardCrypto toShelleyStakeReference StakeAddressReference -scr) +scr) -- ---------------------------------------------------------------------------- @@ -468,7 +468,7 @@ -- data AddressAny = AddressByron !(Address ByronAddr) | AddressShelley !(Address ShelleyAddr) - deriving (AddressAny -> AddressAny -> Bool + deriving (AddressAny -> AddressAny -> Bool (AddressAny -> AddressAny -> Bool) -> (AddressAny -> AddressAny -> Bool) -> Eq AddressAny forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -476,7 +476,7 @@ $c/= :: AddressAny -> AddressAny -> Bool == :: AddressAny -> AddressAny -> Bool $c== :: AddressAny -> AddressAny -> Bool -Eq, Eq AddressAny +Eq, Eq AddressAny Eq AddressAny -> (AddressAny -> AddressAny -> Ordering) -> (AddressAny -> AddressAny -> Bool) @@ -514,7 +514,7 @@ compare :: AddressAny -> AddressAny -> Ordering $ccompare :: AddressAny -> AddressAny -> Ordering $cp1Ord :: Eq AddressAny -Ord, Int -> AddressAny -> ShowS +Ord, Int -> AddressAny -> ShowS [AddressAny] -> ShowS AddressAny -> String (Int -> AddressAny -> ShowS) @@ -533,49 +533,49 @@ instance HasTypeProxy AddressAny where data AsType AddressAny = AsAddressAny - proxyToAsType :: Proxy AddressAny -> AsType AddressAny -proxyToAsType Proxy AddressAny + proxyToAsType :: Proxy AddressAny -> AsType AddressAny +proxyToAsType Proxy AddressAny _ = AsType AddressAny AsAddressAny instance SerialiseAsRawBytes AddressAny where - serialiseToRawBytes :: AddressAny -> ByteString -serialiseToRawBytes (AddressByron Address ByronAddr -addr) = Address ByronAddr -> ByteString + serialiseToRawBytes :: AddressAny -> ByteString +serialiseToRawBytes (AddressByron Address ByronAddr +addr) = Address ByronAddr -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes Address ByronAddr -addr - serialiseToRawBytes (AddressShelley Address ShelleyAddr -addr) = Address ShelleyAddr -> ByteString +addr + serialiseToRawBytes (AddressShelley Address ShelleyAddr +addr) = Address ShelleyAddr -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes Address ShelleyAddr -addr +addr - deserialiseFromRawBytes :: AsType AddressAny -> ByteString -> Maybe AddressAny -deserialiseFromRawBytes AsType AddressAny -AsAddressAny ByteString -bs = + deserialiseFromRawBytes :: AsType AddressAny -> ByteString -> Maybe AddressAny +deserialiseFromRawBytes AsType AddressAny +AsAddressAny ByteString +bs = case ByteString -> Maybe (Addr StandardCrypto) forall crypto. Crypto crypto => ByteString -> Maybe (Addr crypto) Shelley.deserialiseAddr ByteString -bs of +bs of Maybe (Addr StandardCrypto) Nothing -> Maybe AddressAny forall a. Maybe a Nothing - Just (Shelley.AddrBootstrap (Shelley.BootstrapAddress Address -addr)) -> + Just (Shelley.AddrBootstrap (Shelley.BootstrapAddress Address +addr)) -> AddressAny -> Maybe AddressAny forall a. a -> Maybe a Just (Address ByronAddr -> AddressAny AddressByron (Address -> Address ByronAddr ByronAddress Address -addr)) +addr)) - Just (Shelley.Addr Network -nw PaymentCredential StandardCrypto -pc StakeReference StandardCrypto -scr) -> + Just (Shelley.Addr Network +nw PaymentCredential StandardCrypto +pc StakeReference StandardCrypto +scr) -> AddressAny -> Maybe AddressAny forall a. a -> Maybe a Just (Address ShelleyAddr -> AddressAny @@ -584,27 +584,27 @@ -> StakeReference StandardCrypto -> Address ShelleyAddr ShelleyAddress Network -nw PaymentCredential StandardCrypto -pc StakeReference StandardCrypto -scr)) +nw PaymentCredential StandardCrypto +pc StakeReference StandardCrypto +scr)) instance SerialiseAddress AddressAny where - serialiseAddress :: AddressAny -> Text -serialiseAddress (AddressByron Address ByronAddr -addr) = Address ByronAddr -> Text + serialiseAddress :: AddressAny -> Text +serialiseAddress (AddressByron Address ByronAddr +addr) = Address ByronAddr -> Text forall addr. SerialiseAddress addr => addr -> Text serialiseAddress Address ByronAddr -addr - serialiseAddress (AddressShelley Address ShelleyAddr -addr) = Address ShelleyAddr -> Text +addr + serialiseAddress (AddressShelley Address ShelleyAddr +addr) = Address ShelleyAddr -> Text forall addr. SerialiseAddress addr => addr -> Text serialiseAddress Address ShelleyAddr -addr +addr - deserialiseAddress :: AsType AddressAny -> Text -> Maybe AddressAny -deserialiseAddress AsType AddressAny -AsAddressAny Text -t = + deserialiseAddress :: AsType AddressAny -> Text -> Maybe AddressAny +deserialiseAddress AsType AddressAny +AsAddressAny Text +t = (Address ByronAddr -> AddressAny AddressByron (Address ByronAddr -> AddressAny) -> Maybe (Address ByronAddr) -> Maybe AddressAny @@ -617,7 +617,7 @@ forall addrtype. AsType addrtype -> AsType (Address addrtype) AsAddress AsType ByronAddr AsByronAddr) Text -t) +t) Maybe AddressAny -> Maybe AddressAny -> Maybe AddressAny forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> (Address ShelleyAddr -> AddressAny @@ -632,7 +632,7 @@ forall addrtype. AsType addrtype -> AsType (Address addrtype) AsAddress AsType ShelleyAddr AsShelleyAddr) Text -t) +t) -- ---------------------------------------------------------------------------- @@ -644,13 +644,13 @@ -- All current ledger eras support Byron addresses. Shelley addresses are -- supported in the 'ShelleyEra' and later eras. -- -data AddressInEra era where - AddressInEra :: AddressTypeInEra addrtype era - -> Address addrtype - -> AddressInEra era +data AddressInEra era where + AddressInEra :: AddressTypeInEra addrtype era + -> Address addrtype + -> AddressInEra era -instance IsCardanoEra era => ToJSON (AddressInEra era) where - toJSON :: AddressInEra era -> Value +instance IsCardanoEra era => ToJSON (AddressInEra era) where + toJSON :: AddressInEra era -> Value toJSON = Text -> Value Aeson.String (Text -> Value) -> (AddressInEra era -> Text) -> AddressInEra era -> Value @@ -659,29 +659,29 @@ forall addr. SerialiseAddress addr => addr -> Text serialiseAddress -instance Eq (AddressInEra era) where - == :: AddressInEra era -> AddressInEra era -> Bool +instance Eq (AddressInEra era) where + == :: AddressInEra era -> AddressInEra era -> Bool (==) (AddressInEra AddressTypeInEra addrtype era -ByronAddressInAnyEra Address addrtype -addr1) +ByronAddressInAnyEra Address addrtype +addr1) (AddressInEra AddressTypeInEra addrtype era -ByronAddressInAnyEra Address addrtype -addr2) = Address addrtype -addr1 Address addrtype -> Address addrtype -> Bool +ByronAddressInAnyEra Address addrtype +addr2) = Address addrtype +addr1 Address addrtype -> Address addrtype -> Bool forall a. Eq a => a -> a -> Bool == Address addrtype Address addrtype -addr2 +addr2 - (==) (AddressInEra ShelleyAddressInEra{} Address addrtype -addr1) - (AddressInEra ShelleyAddressInEra{} Address addrtype -addr2) = Address addrtype -addr1 Address addrtype -> Address addrtype -> Bool + (==) (AddressInEra ShelleyAddressInEra{} Address addrtype +addr1) + (AddressInEra ShelleyAddressInEra{} Address addrtype +addr2) = Address addrtype +addr1 Address addrtype -> Address addrtype -> Bool forall a. Eq a => a -> a -> Bool == Address addrtype Address addrtype -addr2 +addr2 (==) (AddressInEra AddressTypeInEra addrtype era ByronAddressInAnyEra Address addrtype @@ -697,52 +697,52 @@ _) = Bool False -deriving instance Show (AddressInEra era) +deriving instance Show (AddressInEra era) -data AddressTypeInEra addrtype era where +data AddressTypeInEra addrtype era where - ByronAddressInAnyEra :: AddressTypeInEra ByronAddr era + ByronAddressInAnyEra :: AddressTypeInEra ByronAddr era - ShelleyAddressInEra :: ShelleyBasedEra era - -> AddressTypeInEra ShelleyAddr era + ShelleyAddressInEra :: ShelleyBasedEra era + -> AddressTypeInEra ShelleyAddr era -deriving instance Show (AddressTypeInEra addrtype era) +deriving instance Show (AddressTypeInEra addrtype era) -instance HasTypeProxy era => HasTypeProxy (AddressInEra era) where - data AsType (AddressInEra era) = AsAddressInEra (AsType era) - proxyToAsType :: Proxy (AddressInEra era) -> AsType (AddressInEra era) -proxyToAsType Proxy (AddressInEra era) +instance HasTypeProxy era => HasTypeProxy (AddressInEra era) where + data AsType (AddressInEra era) = AsAddressInEra (AsType era) + proxyToAsType :: Proxy (AddressInEra era) -> AsType (AddressInEra era) +proxyToAsType Proxy (AddressInEra era) _ = AsType era -> AsType (AddressInEra era) forall era. AsType era -> AsType (AddressInEra era) AsAddressInEra (Proxy era -> AsType era forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType (Proxy era forall k (t :: k). Proxy t -Proxy :: Proxy era)) +Proxy :: Proxy era)) -instance IsCardanoEra era => SerialiseAsRawBytes (AddressInEra era) where +instance IsCardanoEra era => SerialiseAsRawBytes (AddressInEra era) where - serialiseToRawBytes :: AddressInEra era -> ByteString -serialiseToRawBytes (AddressInEra AddressTypeInEra addrtype era -ByronAddressInAnyEra Address addrtype -addr) = + serialiseToRawBytes :: AddressInEra era -> ByteString +serialiseToRawBytes (AddressInEra AddressTypeInEra addrtype era +ByronAddressInAnyEra Address addrtype +addr) = Address addrtype -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes Address addrtype -addr +addr - serialiseToRawBytes (AddressInEra ShelleyAddressInEra{} Address addrtype -addr) = + serialiseToRawBytes (AddressInEra ShelleyAddressInEra{} Address addrtype +addr) = Address addrtype -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes Address addrtype -addr +addr - deserialiseFromRawBytes :: AsType (AddressInEra era) -> ByteString -> Maybe (AddressInEra era) -deserialiseFromRawBytes AsType (AddressInEra era) -_ ByteString -bs = + deserialiseFromRawBytes :: AsType (AddressInEra era) -> ByteString -> Maybe (AddressInEra era) +deserialiseFromRawBytes AsType (AddressInEra era) +_ ByteString +bs = CardanoEra era -> AddressAny -> Maybe (AddressInEra era) forall era. CardanoEra era -> AddressAny -> Maybe (AddressInEra era) @@ -757,29 +757,29 @@ AsType a -> ByteString -> Maybe a deserialiseFromRawBytes AsType AddressAny AsAddressAny ByteString -bs +bs -instance IsCardanoEra era => SerialiseAddress (AddressInEra era) where - serialiseAddress :: AddressInEra era -> Text -serialiseAddress (AddressInEra AddressTypeInEra addrtype era -ByronAddressInAnyEra Address addrtype -addr) = +instance IsCardanoEra era => SerialiseAddress (AddressInEra era) where + serialiseAddress :: AddressInEra era -> Text +serialiseAddress (AddressInEra AddressTypeInEra addrtype era +ByronAddressInAnyEra Address addrtype +addr) = Address addrtype -> Text forall addr. SerialiseAddress addr => addr -> Text serialiseAddress Address addrtype -addr +addr - serialiseAddress (AddressInEra ShelleyAddressInEra{} Address addrtype -addr) = + serialiseAddress (AddressInEra ShelleyAddressInEra{} Address addrtype +addr) = Address addrtype -> Text forall addr. SerialiseAddress addr => addr -> Text serialiseAddress Address addrtype -addr +addr - deserialiseAddress :: AsType (AddressInEra era) -> Text -> Maybe (AddressInEra era) -deserialiseAddress AsType (AddressInEra era) -_ Text -t = + deserialiseAddress :: AsType (AddressInEra era) -> Text -> Maybe (AddressInEra era) +deserialiseAddress AsType (AddressInEra era) +_ Text +t = CardanoEra era -> AddressAny -> Maybe (AddressInEra era) forall era. CardanoEra era -> AddressAny -> Maybe (AddressInEra era) @@ -794,10 +794,10 @@ AsType addr -> Text -> Maybe addr deserialiseAddress AsType AddressAny AsAddressAny Text -t +t -byronAddressInEra :: Address ByronAddr -> AddressInEra era +byronAddressInEra :: Address ByronAddr -> AddressInEra era byronAddressInEra :: Address ByronAddr -> AddressInEra era byronAddressInEra = AddressTypeInEra ByronAddr era -> Address ByronAddr -> AddressInEra era @@ -809,8 +809,8 @@ ByronAddressInAnyEra -shelleyAddressInEra :: IsShelleyBasedEra era - => Address ShelleyAddr -> AddressInEra era +shelleyAddressInEra :: IsShelleyBasedEra era + => Address ShelleyAddr -> AddressInEra era shelleyAddressInEra :: Address ShelleyAddr -> AddressInEra era shelleyAddressInEra = AddressTypeInEra ShelleyAddr era -> Address ShelleyAddr -> AddressInEra era @@ -824,30 +824,30 @@ shelleyBasedEra) -anyAddressInShelleyBasedEra :: IsShelleyBasedEra era - => AddressAny -> AddressInEra era +anyAddressInShelleyBasedEra :: IsShelleyBasedEra era + => AddressAny -> AddressInEra era anyAddressInShelleyBasedEra :: AddressAny -> AddressInEra era -anyAddressInShelleyBasedEra (AddressByron Address ByronAddr -addr) = Address ByronAddr -> AddressInEra era +anyAddressInShelleyBasedEra (AddressByron Address ByronAddr +addr) = Address ByronAddr -> AddressInEra era forall era. Address ByronAddr -> AddressInEra era byronAddressInEra Address ByronAddr -addr -anyAddressInShelleyBasedEra (AddressShelley Address ShelleyAddr -addr) = Address ShelleyAddr -> AddressInEra era +addr +anyAddressInShelleyBasedEra (AddressShelley Address ShelleyAddr +addr) = Address ShelleyAddr -> AddressInEra era forall era. IsShelleyBasedEra era => Address ShelleyAddr -> AddressInEra era shelleyAddressInEra Address ShelleyAddr -addr +addr -anyAddressInEra :: CardanoEra era +anyAddressInEra :: CardanoEra era -> AddressAny - -> Maybe (AddressInEra era) + -> Maybe (AddressInEra era) anyAddressInEra :: CardanoEra era -> AddressAny -> Maybe (AddressInEra era) anyAddressInEra CardanoEra era -_ (AddressByron Address ByronAddr -addr) = +_ (AddressByron Address ByronAddr +addr) = AddressInEra era -> Maybe (AddressInEra era) forall a. a -> Maybe a Just (AddressTypeInEra ByronAddr era @@ -858,21 +858,21 @@ AddressInEra AddressTypeInEra ByronAddr era forall era. AddressTypeInEra ByronAddr era ByronAddressInAnyEra Address ByronAddr -addr) +addr) -anyAddressInEra CardanoEra era -era (AddressShelley Address ShelleyAddr -addr) = +anyAddressInEra CardanoEra era +era (AddressShelley Address ShelleyAddr +addr) = case CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era of +era of CardanoEraStyle era LegacyByronEra -> Maybe (AddressInEra era) forall a. Maybe a Nothing - ShelleyBasedEra ShelleyBasedEra era -era' -> AddressInEra era -> Maybe (AddressInEra era) + ShelleyBasedEra ShelleyBasedEra era +era' -> AddressInEra era -> Maybe (AddressInEra era) forall a. a -> Maybe a Just (AddressTypeInEra ShelleyAddr era -> Address ShelleyAddr -> AddressInEra era @@ -882,48 +882,48 @@ AddressInEra (ShelleyBasedEra era -> AddressTypeInEra ShelleyAddr era forall era. ShelleyBasedEra era -> AddressTypeInEra ShelleyAddr era ShelleyAddressInEra ShelleyBasedEra era -era') Address ShelleyAddr -addr) +era') Address ShelleyAddr +addr) -toAddressAny :: Address addr -> AddressAny +toAddressAny :: Address addr -> AddressAny toAddressAny :: Address addr -> AddressAny -toAddressAny a :: Address addr -a@ShelleyAddress{} = Address ShelleyAddr -> AddressAny +toAddressAny a :: Address addr +a@ShelleyAddress{} = Address ShelleyAddr -> AddressAny AddressShelley Address addr Address ShelleyAddr -a -toAddressAny a :: Address addr -a@ByronAddress{} = Address ByronAddr -> AddressAny +a +toAddressAny a :: Address addr +a@ByronAddress{} = Address ByronAddr -> AddressAny AddressByron Address addr Address ByronAddr -a +a -makeByronAddressInEra :: NetworkId +makeByronAddressInEra :: NetworkId -> VerificationKey ByronKey - -> AddressInEra era + -> AddressInEra era makeByronAddressInEra :: NetworkId -> VerificationKey ByronKey -> AddressInEra era -makeByronAddressInEra NetworkId -nw VerificationKey ByronKey -vk = +makeByronAddressInEra NetworkId +nw VerificationKey ByronKey +vk = Address ByronAddr -> AddressInEra era forall era. Address ByronAddr -> AddressInEra era byronAddressInEra (NetworkId -> VerificationKey ByronKey -> Address ByronAddr makeByronAddress NetworkId -nw VerificationKey ByronKey -vk) +nw VerificationKey ByronKey +vk) -makeShelleyAddressInEra :: IsShelleyBasedEra era +makeShelleyAddressInEra :: IsShelleyBasedEra era => NetworkId -> PaymentCredential -> StakeAddressReference - -> AddressInEra era + -> AddressInEra era makeShelleyAddressInEra :: NetworkId -> PaymentCredential -> StakeAddressReference -> AddressInEra era -makeShelleyAddressInEra NetworkId -nw PaymentCredential -pc StakeAddressReference -scr = +makeShelleyAddressInEra NetworkId +nw PaymentCredential +pc StakeAddressReference +scr = Address ShelleyAddr -> AddressInEra era forall era. IsShelleyBasedEra era => @@ -933,9 +933,9 @@ -> StakeAddressReference -> Address ShelleyAddr makeShelleyAddress NetworkId -nw PaymentCredential -pc StakeAddressReference -scr) +nw PaymentCredential +pc StakeAddressReference +scr) -- ---------------------------------------------------------------------------- @@ -948,7 +948,7 @@ :: Shelley.Network -> Shelley.StakeCredential StandardCrypto -> StakeAddress - deriving (StakeAddress -> StakeAddress -> Bool + deriving (StakeAddress -> StakeAddress -> Bool (StakeAddress -> StakeAddress -> Bool) -> (StakeAddress -> StakeAddress -> Bool) -> Eq StakeAddress forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -956,7 +956,7 @@ $c/= :: StakeAddress -> StakeAddress -> Bool == :: StakeAddress -> StakeAddress -> Bool $c== :: StakeAddress -> StakeAddress -> Bool -Eq, Eq StakeAddress +Eq, Eq StakeAddress Eq StakeAddress -> (StakeAddress -> StakeAddress -> Ordering) -> (StakeAddress -> StakeAddress -> Bool) @@ -994,7 +994,7 @@ compare :: StakeAddress -> StakeAddress -> Ordering $ccompare :: StakeAddress -> StakeAddress -> Ordering $cp1Ord :: Eq StakeAddress -Ord, Int -> StakeAddress -> ShowS +Ord, Int -> StakeAddress -> ShowS [StakeAddress] -> ShowS StakeAddress -> String (Int -> StakeAddress -> ShowS) @@ -1014,7 +1014,7 @@ data PaymentCredential = PaymentCredentialByKey (Hash PaymentKey) | PaymentCredentialByScript ScriptHash - deriving (PaymentCredential -> PaymentCredential -> Bool + deriving (PaymentCredential -> PaymentCredential -> Bool (PaymentCredential -> PaymentCredential -> Bool) -> (PaymentCredential -> PaymentCredential -> Bool) -> Eq PaymentCredential @@ -1023,7 +1023,7 @@ $c/= :: PaymentCredential -> PaymentCredential -> Bool == :: PaymentCredential -> PaymentCredential -> Bool $c== :: PaymentCredential -> PaymentCredential -> Bool -Eq, Eq PaymentCredential +Eq, Eq PaymentCredential Eq PaymentCredential -> (PaymentCredential -> PaymentCredential -> Ordering) -> (PaymentCredential -> PaymentCredential -> Bool) @@ -1061,7 +1061,7 @@ compare :: PaymentCredential -> PaymentCredential -> Ordering $ccompare :: PaymentCredential -> PaymentCredential -> Ordering $cp1Ord :: Eq PaymentCredential -Ord, Int -> PaymentCredential -> ShowS +Ord, Int -> PaymentCredential -> ShowS [PaymentCredential] -> ShowS PaymentCredential -> String (Int -> PaymentCredential -> ShowS) @@ -1081,7 +1081,7 @@ data StakeCredential = StakeCredentialByKey (Hash StakeKey) | StakeCredentialByScript ScriptHash - deriving (StakeCredential -> StakeCredential -> Bool + deriving (StakeCredential -> StakeCredential -> Bool (StakeCredential -> StakeCredential -> Bool) -> (StakeCredential -> StakeCredential -> Bool) -> Eq StakeCredential @@ -1090,7 +1090,7 @@ $c/= :: StakeCredential -> StakeCredential -> Bool == :: StakeCredential -> StakeCredential -> Bool $c== :: StakeCredential -> StakeCredential -> Bool -Eq, Eq StakeCredential +Eq, Eq StakeCredential Eq StakeCredential -> (StakeCredential -> StakeCredential -> Ordering) -> (StakeCredential -> StakeCredential -> Bool) @@ -1128,7 +1128,7 @@ compare :: StakeCredential -> StakeCredential -> Ordering $ccompare :: StakeCredential -> StakeCredential -> Ordering $cp1Ord :: Eq StakeCredential -Ord, Int -> StakeCredential -> ShowS +Ord, Int -> StakeCredential -> ShowS [StakeCredential] -> ShowS StakeCredential -> String (Int -> StakeCredential -> ShowS) @@ -1149,7 +1149,7 @@ = StakeAddressByValue StakeCredential | StakeAddressByPointer StakeAddressPointer | NoStakeAddress - deriving (StakeAddressReference -> StakeAddressReference -> Bool + deriving (StakeAddressReference -> StakeAddressReference -> Bool (StakeAddressReference -> StakeAddressReference -> Bool) -> (StakeAddressReference -> StakeAddressReference -> Bool) -> Eq StakeAddressReference @@ -1158,7 +1158,7 @@ $c/= :: StakeAddressReference -> StakeAddressReference -> Bool == :: StakeAddressReference -> StakeAddressReference -> Bool $c== :: StakeAddressReference -> StakeAddressReference -> Bool -Eq, Int -> StakeAddressReference -> ShowS +Eq, Int -> StakeAddressReference -> ShowS [StakeAddressReference] -> ShowS StakeAddressReference -> String (Int -> StakeAddressReference -> ShowS) @@ -1181,17 +1181,17 @@ instance HasTypeProxy StakeAddress where data AsType StakeAddress = AsStakeAddress - proxyToAsType :: Proxy StakeAddress -> AsType StakeAddress -proxyToAsType Proxy StakeAddress + proxyToAsType :: Proxy StakeAddress -> AsType StakeAddress +proxyToAsType Proxy StakeAddress _ = AsType StakeAddress AsStakeAddress instance SerialiseAsRawBytes StakeAddress where - serialiseToRawBytes :: StakeAddress -> ByteString -serialiseToRawBytes (StakeAddress Network -nw StakeCredential StandardCrypto -sc) = + serialiseToRawBytes :: StakeAddress -> ByteString +serialiseToRawBytes (StakeAddress Network +nw StakeCredential StandardCrypto +sc) = RewardAcnt StandardCrypto -> ByteString forall crypto. RewardAcnt crypto -> ByteString Shelley.serialiseRewardAcnt (Network @@ -1199,36 +1199,36 @@ forall crypto. Network -> Credential 'Staking crypto -> RewardAcnt crypto Shelley.RewardAcnt Network -nw StakeCredential StandardCrypto -sc) +nw StakeCredential StandardCrypto +sc) - deserialiseFromRawBytes :: AsType StakeAddress -> ByteString -> Maybe StakeAddress -deserialiseFromRawBytes AsType StakeAddress -AsStakeAddress ByteString -bs = + deserialiseFromRawBytes :: AsType StakeAddress -> ByteString -> Maybe StakeAddress +deserialiseFromRawBytes AsType StakeAddress +AsStakeAddress ByteString +bs = case ByteString -> Maybe (RewardAcnt StandardCrypto) forall crypto. Crypto crypto => ByteString -> Maybe (RewardAcnt crypto) Shelley.deserialiseRewardAcnt ByteString -bs of +bs of Maybe (RewardAcnt StandardCrypto) Nothing -> Maybe StakeAddress forall a. Maybe a Nothing - Just (Shelley.RewardAcnt Network -nw StakeCredential StandardCrypto -sc) -> StakeAddress -> Maybe StakeAddress + Just (Shelley.RewardAcnt Network +nw StakeCredential StandardCrypto +sc) -> StakeAddress -> Maybe StakeAddress forall a. a -> Maybe a Just (Network -> StakeCredential StandardCrypto -> StakeAddress StakeAddress Network -nw StakeCredential StandardCrypto -sc) +nw StakeCredential StandardCrypto +sc) instance SerialiseAsBech32 StakeAddress where - bech32PrefixFor :: StakeAddress -> Text -bech32PrefixFor (StakeAddress Network + bech32PrefixFor :: StakeAddress -> Text +bech32PrefixFor (StakeAddress Network Shelley.Mainnet StakeCredential StandardCrypto _) = Text "stake" @@ -1237,26 +1237,26 @@ _) = Text "stake_test" - bech32PrefixesPermitted :: AsType StakeAddress -> [Text] -bech32PrefixesPermitted AsType StakeAddress + bech32PrefixesPermitted :: AsType StakeAddress -> [Text] +bech32PrefixesPermitted AsType StakeAddress AsStakeAddress = [Text "stake", Text "stake_test"] instance SerialiseAddress StakeAddress where - serialiseAddress :: StakeAddress -> Text -serialiseAddress addr :: StakeAddress -addr@StakeAddress{} = + serialiseAddress :: StakeAddress -> Text +serialiseAddress addr :: StakeAddress +addr@StakeAddress{} = StakeAddress -> Text forall a. SerialiseAsBech32 a => a -> Text serialiseToBech32 StakeAddress -addr +addr - deserialiseAddress :: AsType StakeAddress -> Text -> Maybe StakeAddress -deserialiseAddress AsType StakeAddress -AsStakeAddress Text -t = + deserialiseAddress :: AsType StakeAddress -> Text -> Maybe StakeAddress +deserialiseAddress AsType StakeAddress +AsStakeAddress Text +t = (Bech32DecodeError -> Maybe StakeAddress) -> (StakeAddress -> Maybe StakeAddress) -> Either Bech32DecodeError StakeAddress @@ -1279,47 +1279,47 @@ AsType a -> Text -> Either Bech32DecodeError a deserialiseFromBech32 AsType StakeAddress AsStakeAddress Text -t +t makeStakeAddress :: NetworkId -> StakeCredential -> StakeAddress makeStakeAddress :: NetworkId -> StakeCredential -> StakeAddress -makeStakeAddress NetworkId -nw StakeCredential -sc = +makeStakeAddress NetworkId +nw StakeCredential +sc = Network -> StakeCredential StandardCrypto -> StakeAddress StakeAddress (NetworkId -> Network toShelleyNetwork NetworkId -nw) +nw) (StakeCredential -> StakeCredential StandardCrypto toShelleyStakeCredential StakeCredential -sc) +sc) -- ---------------------------------------------------------------------------- -- Internal conversion functions -- -toShelleyAddr :: AddressInEra era -> Shelley.Addr StandardCrypto +toShelleyAddr :: AddressInEra era -> Shelley.Addr StandardCrypto toShelleyAddr :: AddressInEra era -> Addr StandardCrypto toShelleyAddr (AddressInEra AddressTypeInEra addrtype era -ByronAddressInAnyEra (ByronAddress Address -addr)) = +ByronAddressInAnyEra (ByronAddress Address +addr)) = BootstrapAddress StandardCrypto -> Addr StandardCrypto forall crypto. BootstrapAddress crypto -> Addr crypto Shelley.AddrBootstrap (Address -> BootstrapAddress StandardCrypto forall crypto. Address -> BootstrapAddress crypto Shelley.BootstrapAddress Address -addr) +addr) toShelleyAddr (AddressInEra (ShelleyAddressInEra ShelleyBasedEra era _) - (ShelleyAddress Network -nw PaymentCredential StandardCrypto -pc StakeReference StandardCrypto -scr)) = + (ShelleyAddress Network +nw PaymentCredential StandardCrypto +pc StakeReference StandardCrypto +scr)) = Network -> PaymentCredential StandardCrypto -> StakeReference StandardCrypto @@ -1328,78 +1328,78 @@ Network -> PaymentCredential crypto -> StakeReference crypto -> Addr crypto Shelley.Addr Network -nw PaymentCredential StandardCrypto -pc StakeReference StandardCrypto -scr +nw PaymentCredential StandardCrypto +pc StakeReference StandardCrypto +scr toShelleyStakeAddr :: StakeAddress -> Shelley.RewardAcnt StandardCrypto toShelleyStakeAddr :: StakeAddress -> RewardAcnt StandardCrypto -toShelleyStakeAddr (StakeAddress Network -nw StakeCredential StandardCrypto -sc) = +toShelleyStakeAddr (StakeAddress Network +nw StakeCredential StandardCrypto +sc) = RewardAcnt :: forall crypto. Network -> Credential 'Staking crypto -> RewardAcnt crypto Shelley.RewardAcnt { getRwdNetwork :: Network Shelley.getRwdNetwork = Network -nw, +nw, getRwdCred :: StakeCredential StandardCrypto Shelley.getRwdCred = StakeCredential StandardCrypto -sc +sc } toShelleyPaymentCredential :: PaymentCredential -> Shelley.PaymentCredential StandardCrypto toShelleyPaymentCredential :: PaymentCredential -> PaymentCredential StandardCrypto -toShelleyPaymentCredential (PaymentCredentialByKey (PaymentKeyHash kh)) = +toShelleyPaymentCredential (PaymentCredentialByKey (PaymentKeyHash kh)) = KeyHash 'Payment StandardCrypto -> PaymentCredential StandardCrypto forall (kr :: KeyRole) crypto. KeyHash kr crypto -> Credential kr crypto Shelley.KeyHashObj KeyHash 'Payment StandardCrypto -kh -toShelleyPaymentCredential (PaymentCredentialByScript ScriptHash -sh) = +kh +toShelleyPaymentCredential (PaymentCredentialByScript ScriptHash +sh) = ScriptHash StandardCrypto -> PaymentCredential StandardCrypto forall (kr :: KeyRole) crypto. ScriptHash crypto -> Credential kr crypto Shelley.ScriptHashObj (ScriptHash -> ScriptHash StandardCrypto toShelleyScriptHash ScriptHash -sh) +sh) toShelleyStakeCredential :: StakeCredential -> Shelley.StakeCredential StandardCrypto toShelleyStakeCredential :: StakeCredential -> StakeCredential StandardCrypto -toShelleyStakeCredential (StakeCredentialByKey (StakeKeyHash kh)) = +toShelleyStakeCredential (StakeCredentialByKey (StakeKeyHash kh)) = KeyHash 'Staking StandardCrypto -> StakeCredential StandardCrypto forall (kr :: KeyRole) crypto. KeyHash kr crypto -> Credential kr crypto Shelley.KeyHashObj KeyHash 'Staking StandardCrypto -kh -toShelleyStakeCredential (StakeCredentialByScript ScriptHash -sh) = +kh +toShelleyStakeCredential (StakeCredentialByScript ScriptHash +sh) = ScriptHash StandardCrypto -> StakeCredential StandardCrypto forall (kr :: KeyRole) crypto. ScriptHash crypto -> Credential kr crypto Shelley.ScriptHashObj (ScriptHash -> ScriptHash StandardCrypto toShelleyScriptHash ScriptHash -sh) +sh) toShelleyStakeReference :: StakeAddressReference -> Shelley.StakeReference StandardCrypto toShelleyStakeReference :: StakeAddressReference -> StakeReference StandardCrypto -toShelleyStakeReference (StakeAddressByValue StakeCredential -stakecred) = +toShelleyStakeReference (StakeAddressByValue StakeCredential +stakecred) = StakeCredential StandardCrypto -> StakeReference StandardCrypto forall crypto. StakeCredential crypto -> StakeReference crypto Shelley.StakeRefBase (StakeCredential -> StakeCredential StandardCrypto toShelleyStakeCredential StakeCredential -stakecred) -toShelleyStakeReference (StakeAddressByPointer StakeAddressPointer -ptr) = +stakecred) +toShelleyStakeReference (StakeAddressByPointer StakeAddressPointer +ptr) = StakeAddressPointer -> StakeReference StandardCrypto forall crypto. StakeAddressPointer -> StakeReference crypto Shelley.StakeRefPtr StakeAddressPointer -ptr +ptr toShelleyStakeReference StakeAddressReference NoStakeAddress = StakeReference StandardCrypto @@ -1407,11 +1407,11 @@ Shelley.StakeRefNull -fromShelleyAddr :: IsShelleyBasedEra era - => Shelley.Addr StandardCrypto -> AddressInEra era +fromShelleyAddr :: IsShelleyBasedEra era + => Shelley.Addr StandardCrypto -> AddressInEra era fromShelleyAddr :: Addr StandardCrypto -> AddressInEra era -fromShelleyAddr (Shelley.AddrBootstrap (Shelley.BootstrapAddress Address -addr)) = +fromShelleyAddr (Shelley.AddrBootstrap (Shelley.BootstrapAddress Address +addr)) = AddressTypeInEra ByronAddr era -> Address ByronAddr -> AddressInEra era forall addrtype era. @@ -1421,12 +1421,12 @@ forall era. AddressTypeInEra ByronAddr era ByronAddressInAnyEra (Address -> Address ByronAddr ByronAddress Address -addr) +addr) -fromShelleyAddr (Shelley.Addr Network -nw PaymentCredential StandardCrypto -pc StakeReference StandardCrypto -scr) = +fromShelleyAddr (Shelley.Addr Network +nw PaymentCredential StandardCrypto +pc StakeReference StandardCrypto +scr) = AddressTypeInEra ShelleyAddr era -> Address ShelleyAddr -> AddressInEra era forall addrtype era. @@ -1443,65 +1443,65 @@ -> StakeReference StandardCrypto -> Address ShelleyAddr ShelleyAddress Network -nw PaymentCredential StandardCrypto -pc StakeReference StandardCrypto -scr) +nw PaymentCredential StandardCrypto +pc StakeReference StandardCrypto +scr) fromShelleyStakeAddr :: Shelley.RewardAcnt StandardCrypto -> StakeAddress fromShelleyStakeAddr :: RewardAcnt StandardCrypto -> StakeAddress -fromShelleyStakeAddr (Shelley.RewardAcnt Network -nw StakeCredential StandardCrypto -sc) = Network -> StakeCredential StandardCrypto -> StakeAddress +fromShelleyStakeAddr (Shelley.RewardAcnt Network +nw StakeCredential StandardCrypto +sc) = Network -> StakeCredential StandardCrypto -> StakeAddress StakeAddress Network -nw StakeCredential StandardCrypto -sc +nw StakeCredential StandardCrypto +sc fromShelleyStakeCredential :: Shelley.StakeCredential StandardCrypto -> StakeCredential fromShelleyStakeCredential :: StakeCredential StandardCrypto -> StakeCredential -fromShelleyStakeCredential (Shelley.KeyHashObj KeyHash 'Staking StandardCrypto -kh) = +fromShelleyStakeCredential (Shelley.KeyHashObj KeyHash 'Staking StandardCrypto +kh) = Hash StakeKey -> StakeCredential StakeCredentialByKey (KeyHash 'Staking StandardCrypto -> Hash StakeKey StakeKeyHash KeyHash 'Staking StandardCrypto -kh) -fromShelleyStakeCredential (Shelley.ScriptHashObj ScriptHash StandardCrypto -sh) = +kh) +fromShelleyStakeCredential (Shelley.ScriptHashObj ScriptHash StandardCrypto +sh) = ScriptHash -> StakeCredential StakeCredentialByScript (ScriptHash StandardCrypto -> ScriptHash fromShelleyScriptHash ScriptHash StandardCrypto -sh) +sh) fromShelleyPaymentCredential :: Shelley.PaymentCredential StandardCrypto -> PaymentCredential fromShelleyPaymentCredential :: PaymentCredential StandardCrypto -> PaymentCredential -fromShelleyPaymentCredential (Shelley.KeyHashObj KeyHash 'Payment StandardCrypto -kh) = +fromShelleyPaymentCredential (Shelley.KeyHashObj KeyHash 'Payment StandardCrypto +kh) = Hash PaymentKey -> PaymentCredential PaymentCredentialByKey (KeyHash 'Payment StandardCrypto -> Hash PaymentKey PaymentKeyHash KeyHash 'Payment StandardCrypto -kh) -fromShelleyPaymentCredential (Shelley.ScriptHashObj ScriptHash StandardCrypto -sh) = +kh) +fromShelleyPaymentCredential (Shelley.ScriptHashObj ScriptHash StandardCrypto +sh) = ScriptHash -> PaymentCredential PaymentCredentialByScript (ScriptHash StandardCrypto -> ScriptHash ScriptHash ScriptHash StandardCrypto -sh) +sh) fromShelleyStakeReference :: Shelley.StakeReference StandardCrypto -> StakeAddressReference fromShelleyStakeReference :: StakeReference StandardCrypto -> StakeAddressReference -fromShelleyStakeReference (Shelley.StakeRefBase StakeCredential StandardCrypto -stakecred) = +fromShelleyStakeReference (Shelley.StakeRefBase StakeCredential StandardCrypto +stakecred) = StakeCredential -> StakeAddressReference StakeAddressByValue (StakeCredential StandardCrypto -> StakeCredential fromShelleyStakeCredential StakeCredential StandardCrypto -stakecred) -fromShelleyStakeReference (Shelley.StakeRefPtr StakeAddressPointer -ptr) = +stakecred) +fromShelleyStakeReference (Shelley.StakeRefPtr StakeAddressPointer +ptr) = StakeAddressPointer -> StakeAddressReference StakeAddressByPointer StakeAddressPointer -ptr +ptr fromShelleyStakeReference StakeReference StandardCrypto Shelley.StakeRefNull = StakeAddressReference diff --git a/cardano-api/src/Cardano.Api.Block.html b/cardano-api/src/Cardano.Api.Block.html index 1b005710c24..d04cf0cd3c3 100644 --- a/cardano-api/src/Cardano.Api.Block.html +++ b/cardano-api/src/Cardano.Api.Block.html @@ -87,44 +87,44 @@ -- | A blockchain block in a particular Cardano era. -- -data Block era where +data Block era where ByronBlock :: Consensus.ByronBlock -> Block ByronEra - ShelleyBlock :: ShelleyBasedEra era - -> Consensus.ShelleyBlock (ShelleyLedgerEra era) - -> Block era + ShelleyBlock :: ShelleyBasedEra era + -> Consensus.ShelleyBlock (ShelleyLedgerEra era) + -> Block era -- | A block consists of a header and a body containing transactions. -- -pattern Block :: BlockHeader -> [Tx era] -> Block era +pattern Block :: BlockHeader -> [Tx era] -> Block era pattern $mBlock :: forall r era. Block era -> (BlockHeader -> [Tx era] -> r) -> (Void# -> r) -> r -Block header txs <- (getBlockHeaderAndTxs -> (header, txs)) +Block header txs <- (getBlockHeaderAndTxs -> (header, txs)) {-# COMPLETE Block #-} -getBlockHeaderAndTxs :: Block era -> (BlockHeader, [Tx era]) +getBlockHeaderAndTxs :: Block era -> (BlockHeader, [Tx era]) getBlockHeaderAndTxs :: Block era -> (BlockHeader, [Tx era]) -getBlockHeaderAndTxs Block era -block = (Block era -> BlockHeader +getBlockHeaderAndTxs Block era +block = (Block era -> BlockHeader forall era. Block era -> BlockHeader getBlockHeader Block era -block, Block era -> [Tx era] +block, Block era -> [Tx era] forall era. Block era -> [Tx era] getBlockTxs Block era -block) +block) -- The GADT in the ShelleyBlock case requires a custom instance -instance Show (Block era) where - showsPrec :: Int -> Block era -> ShowS -showsPrec Int -p (ByronBlock ByronBlock -block) = +instance Show (Block era) where + showsPrec :: Int -> Block era -> ShowS +showsPrec Int +p (ByronBlock ByronBlock +block) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -137,16 +137,16 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 ByronBlock -block +block ) - showsPrec Int -p (ShelleyBlock ShelleyBasedEra era -ShelleyBasedEraShelley ShelleyBlock (ShelleyLedgerEra era) -block) = + showsPrec Int +p (ShelleyBlock ShelleyBasedEra era +ShelleyBasedEraShelley ShelleyBlock (ShelleyLedgerEra era) +block) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -160,16 +160,16 @@ showsPrec Int 11 ShelleyBlock StandardShelley ShelleyBlock (ShelleyLedgerEra era) -block +block ) - showsPrec Int -p (ShelleyBlock ShelleyBasedEra era -ShelleyBasedEraAllegra ShelleyBlock (ShelleyLedgerEra era) -block) = + showsPrec Int +p (ShelleyBlock ShelleyBasedEra era +ShelleyBasedEraAllegra ShelleyBlock (ShelleyLedgerEra era) +block) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -183,16 +183,16 @@ showsPrec Int 11 ShelleyBlock StandardAllegra ShelleyBlock (ShelleyLedgerEra era) -block +block ) - showsPrec Int -p (ShelleyBlock ShelleyBasedEra era -ShelleyBasedEraMary ShelleyBlock (ShelleyLedgerEra era) -block) = + showsPrec Int +p (ShelleyBlock ShelleyBasedEra era +ShelleyBasedEraMary ShelleyBlock (ShelleyLedgerEra era) +block) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -206,16 +206,16 @@ showsPrec Int 11 ShelleyBlock StandardMary ShelleyBlock (ShelleyLedgerEra era) -block +block ) - showsPrec Int -p (ShelleyBlock ShelleyBasedEra era -ShelleyBasedEraAlonzo ShelleyBlock (ShelleyLedgerEra era) -block) = + showsPrec Int +p (ShelleyBlock ShelleyBasedEra era +ShelleyBasedEraAlonzo ShelleyBlock (ShelleyLedgerEra era) +block) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -229,34 +229,34 @@ showsPrec Int 11 ShelleyBlock StandardAlonzo ShelleyBlock (ShelleyLedgerEra era) -block +block ) -getBlockTxs :: forall era . Block era -> [Tx era] +getBlockTxs :: forall era . Block era -> [Tx era] getBlockTxs :: Block era -> [Tx era] -getBlockTxs (ByronBlock Consensus.ByronBlock { ABlockOrBoundary ByteString +getBlockTxs (ByronBlock Consensus.ByronBlock { ABlockOrBoundary ByteString byronBlockRaw :: ByronBlock -> ABlockOrBoundary ByteString byronBlockRaw :: ABlockOrBoundary ByteString Consensus.byronBlockRaw }) = case ABlockOrBoundary ByteString -byronBlockRaw of +byronBlockRaw of Byron.ABOBBoundary{} -> [] -- no txs in EBBs Byron.ABOBBlock Byron.ABlock { blockBody :: forall a. ABlock a -> ABody a Byron.blockBody = Byron.ABody { bodyTxPayload :: forall a. ABody a -> ATxPayload a -Byron.bodyTxPayload = Byron.ATxPayload [ATxAux ByteString] -txs +Byron.bodyTxPayload = Byron.ATxPayload [ATxAux ByteString] +txs } } -> (ATxAux ByteString -> Tx ByronEra) -> [ATxAux ByteString] -> [Tx ByronEra] forall a b. (a -> b) -> [a] -> [b] map ATxAux ByteString -> Tx ByronEra ByronTx [ATxAux ByteString] -txs -getBlockTxs (ShelleyBlock ShelleyBasedEra era -era Consensus.ShelleyBlock{Block (ShelleyLedgerEra era) +txs +getBlockTxs (ShelleyBlock ShelleyBasedEra era +era Consensus.ShelleyBlock{Block (ShelleyLedgerEra era) shelleyBlockRaw :: forall era. ShelleyBlock era -> Block era shelleyBlockRaw :: Block (ShelleyLedgerEra era) Consensus.shelleyBlockRaw}) = @@ -266,7 +266,7 @@ (ledgerera ~ ShelleyLedgerEra era) => ShelleyBasedEra era -> (ShelleyBasedEra ledgerera => a) -> a obtainConsensusShelleyBasedEra ShelleyBasedEra era -era ((ShelleyBasedEra (ShelleyLedgerEra era) => [Tx era]) -> [Tx era]) +era ((ShelleyBasedEra (ShelleyLedgerEra era) => [Tx era]) -> [Tx era]) -> (ShelleyBasedEra (ShelleyLedgerEra era) => [Tx era]) -> [Tx era] forall a b. (a -> b) -> a -> b $ @@ -275,64 +275,64 @@ (ledgerera ~ ShelleyLedgerEra era, ShelleyBasedEra ledgerera) => ShelleyBasedEra era -> Block ledgerera -> [Tx era] getShelleyBlockTxs ShelleyBasedEra era -era Block (ShelleyLedgerEra era) -shelleyBlockRaw +era Block (ShelleyLedgerEra era) +shelleyBlockRaw -getShelleyBlockTxs :: forall era ledgerera. - ledgerera ~ ShelleyLedgerEra era - => Consensus.ShelleyBasedEra ledgerera - => ShelleyBasedEra era - -> Ledger.Block ledgerera - -> [Tx era] +getShelleyBlockTxs :: forall era ledgerera. + ledgerera ~ ShelleyLedgerEra era + => Consensus.ShelleyBasedEra ledgerera + => ShelleyBasedEra era + -> Ledger.Block ledgerera + -> [Tx era] getShelleyBlockTxs :: ShelleyBasedEra era -> Block ledgerera -> [Tx era] -getShelleyBlockTxs ShelleyBasedEra era -era (Ledger.Block BHeader (Crypto ledgerera) -_header TxSeq ledgerera -txs) = +getShelleyBlockTxs ShelleyBasedEra era +era (Ledger.Block BHeader (Crypto ledgerera) +_header TxSeq ledgerera +txs) = [ ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era forall era. ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era ShelleyTx ShelleyBasedEra era -era (TxInBlock ledgerera -> Tx ledgerera +era (TxInBlock ledgerera -> Tx ledgerera forall era. ApplyTx era => TxInBlock era -> Tx era Ledger.extractTx TxInBlock ledgerera -txinblock) - | TxInBlock ledgerera -txinblock <- StrictSeq (TxInBlock ledgerera) -> [TxInBlock ledgerera] +txinblock) + | TxInBlock ledgerera +txinblock <- StrictSeq (TxInBlock ledgerera) -> [TxInBlock ledgerera] forall (t :: * -> *) a. Foldable t => t a -> [a] toList (TxSeq ledgerera -> StrictSeq (TxInBlock ledgerera) forall era. SupportsSegWit era => TxSeq era -> StrictSeq (TxInBlock era) -Ledger.fromTxSeq @ledgerera TxSeq ledgerera -txs) ] +Ledger.fromTxSeq @ledgerera TxSeq ledgerera +txs) ] obtainConsensusShelleyBasedEra - :: forall era ledgerera a. - ledgerera ~ ShelleyLedgerEra era - => ShelleyBasedEra era - -> (Consensus.ShelleyBasedEra ledgerera => a) -> a + :: forall era ledgerera a. + ledgerera ~ ShelleyLedgerEra era + => ShelleyBasedEra era + -> (Consensus.ShelleyBasedEra ledgerera => a) -> a obtainConsensusShelleyBasedEra :: ShelleyBasedEra era -> (ShelleyBasedEra ledgerera => a) -> a obtainConsensusShelleyBasedEra ShelleyBasedEra era -ShelleyBasedEraShelley ShelleyBasedEra ledgerera => a -f = a +ShelleyBasedEraShelley ShelleyBasedEra ledgerera => a +f = a ShelleyBasedEra ledgerera => a -f +f obtainConsensusShelleyBasedEra ShelleyBasedEra era -ShelleyBasedEraAllegra ShelleyBasedEra ledgerera => a -f = a +ShelleyBasedEraAllegra ShelleyBasedEra ledgerera => a +f = a ShelleyBasedEra ledgerera => a -f +f obtainConsensusShelleyBasedEra ShelleyBasedEra era -ShelleyBasedEraMary ShelleyBasedEra ledgerera => a -f = a +ShelleyBasedEraMary ShelleyBasedEra ledgerera => a +f = a ShelleyBasedEra ledgerera => a -f +f obtainConsensusShelleyBasedEra ShelleyBasedEra era -ShelleyBasedEraAlonzo ShelleyBasedEra ledgerera => a -f = a +ShelleyBasedEraAlonzo ShelleyBasedEra ledgerera => a +f = a ShelleyBasedEra ledgerera => a -f +f -- ---------------------------------------------------------------------------- @@ -344,36 +344,36 @@ -- For multi-era modes such as the 'CardanoMode' this type is a sum of the -- different block types for all the eras. It is used in the ChainSync protocol. -- -data BlockInMode mode where - BlockInMode :: Block era -> EraInMode era mode -> BlockInMode mode +data BlockInMode mode where + BlockInMode :: Block era -> EraInMode era mode -> BlockInMode mode -deriving instance Show (BlockInMode mode) +deriving instance Show (BlockInMode mode) -fromConsensusBlock :: ConsensusBlockForMode mode ~ block - => ConsensusMode mode -> block -> BlockInMode mode +fromConsensusBlock :: ConsensusBlockForMode mode ~ block + => ConsensusMode mode -> block -> BlockInMode mode fromConsensusBlock :: ConsensusMode mode -> block -> BlockInMode mode fromConsensusBlock ConsensusMode mode ByronMode = - \block -b -> case block -b of - Consensus.DegenBlock b' -> + \block +b -> case block +b of + Consensus.DegenBlock b' -> Block ByronEra -> EraInMode ByronEra ByronMode -> BlockInMode ByronMode forall era mode. Block era -> EraInMode era mode -> BlockInMode mode BlockInMode (ByronBlock -> Block ByronEra ByronBlock ByronBlock -b') EraInMode ByronEra ByronMode +b') EraInMode ByronEra ByronMode ByronEraInByronMode fromConsensusBlock ConsensusMode mode ShelleyMode = - \block -b -> case block -b of - Consensus.DegenBlock b' -> + \block +b -> case block +b of + Consensus.DegenBlock b' -> Block ShelleyEra -> EraInMode ShelleyEra ShelleyMode -> BlockInMode ShelleyMode forall era mode. @@ -386,26 +386,26 @@ ShelleyBlock ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley ShelleyBlock StandardShelley ShelleyBlock (ShelleyLedgerEra ShelleyEra) -b') +b') EraInMode ShelleyEra ShelleyMode ShelleyEraInShelleyMode fromConsensusBlock ConsensusMode mode CardanoMode = - \block -b -> case block -b of - Consensus.BlockByron b' -> + \block +b -> case block +b of + Consensus.BlockByron b' -> Block ByronEra -> EraInMode ByronEra CardanoMode -> BlockInMode CardanoMode forall era mode. Block era -> EraInMode era mode -> BlockInMode mode BlockInMode (ByronBlock -> Block ByronEra ByronBlock ByronBlock -b') EraInMode ByronEra CardanoMode +b') EraInMode ByronEra CardanoMode ByronEraInCardanoMode - Consensus.BlockShelley b' -> + Consensus.BlockShelley b' -> Block ShelleyEra -> EraInMode ShelleyEra CardanoMode -> BlockInMode CardanoMode forall era mode. @@ -418,11 +418,11 @@ ShelleyBlock ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley ShelleyBlock StandardShelley ShelleyBlock (ShelleyLedgerEra ShelleyEra) -b') +b') EraInMode ShelleyEra CardanoMode ShelleyEraInCardanoMode - Consensus.BlockAllegra b' -> + Consensus.BlockAllegra b' -> Block AllegraEra -> EraInMode AllegraEra CardanoMode -> BlockInMode CardanoMode forall era mode. @@ -435,11 +435,11 @@ ShelleyBlock ShelleyBasedEra AllegraEra ShelleyBasedEraAllegra ShelleyBlock StandardAllegra ShelleyBlock (ShelleyLedgerEra AllegraEra) -b') +b') EraInMode AllegraEra CardanoMode AllegraEraInCardanoMode - Consensus.BlockMary b' -> + Consensus.BlockMary b' -> Block MaryEra -> EraInMode MaryEra CardanoMode -> BlockInMode CardanoMode forall era mode. @@ -452,11 +452,11 @@ ShelleyBlock ShelleyBasedEra MaryEra ShelleyBasedEraMary ShelleyBlock StandardMary ShelleyBlock (ShelleyLedgerEra MaryEra) -b') +b') EraInMode MaryEra CardanoMode MaryEraInCardanoMode - Consensus.BlockAlonzo b' -> + Consensus.BlockAlonzo b' -> Block AlonzoEra -> EraInMode AlonzoEra CardanoMode -> BlockInMode CardanoMode forall era mode. @@ -469,7 +469,7 @@ ShelleyBlock ShelleyBasedEra AlonzoEra ShelleyBasedEraAlonzo ShelleyBlock StandardAlonzo ShelleyBlock (ShelleyLedgerEra AlonzoEra) -b') +b') EraInMode AlonzoEra CardanoMode AlonzoEraInCardanoMode @@ -485,7 +485,7 @@ -- The different eras do use different types, but it's all the same underlying -- representation. newtype instance Hash BlockHeader = HeaderHash SBS.ShortByteString - deriving (Hash BlockHeader -> Hash BlockHeader -> Bool + deriving (Hash BlockHeader -> Hash BlockHeader -> Bool (Hash BlockHeader -> Hash BlockHeader -> Bool) -> (Hash BlockHeader -> Hash BlockHeader -> Bool) -> Eq (Hash BlockHeader) @@ -494,7 +494,7 @@ $c/= :: Hash BlockHeader -> Hash BlockHeader -> Bool == :: Hash BlockHeader -> Hash BlockHeader -> Bool $c== :: Hash BlockHeader -> Hash BlockHeader -> Bool -Eq, Eq (Hash BlockHeader) +Eq, Eq (Hash BlockHeader) Eq (Hash BlockHeader) -> (Hash BlockHeader -> Hash BlockHeader -> Ordering) -> (Hash BlockHeader -> Hash BlockHeader -> Bool) @@ -532,7 +532,7 @@ compare :: Hash BlockHeader -> Hash BlockHeader -> Ordering $ccompare :: Hash BlockHeader -> Hash BlockHeader -> Ordering $cp1Ord :: Eq (Hash BlockHeader) -Ord, Int -> Hash BlockHeader -> ShowS +Ord, Int -> Hash BlockHeader -> ShowS [Hash BlockHeader] -> ShowS Hash BlockHeader -> String (Int -> Hash BlockHeader -> ShowS) @@ -550,17 +550,17 @@ Show) instance SerialiseAsRawBytes (Hash BlockHeader) where - serialiseToRawBytes :: Hash BlockHeader -> ByteString -serialiseToRawBytes (HeaderHash bs) = ShortByteString -> ByteString + serialiseToRawBytes :: Hash BlockHeader -> ByteString +serialiseToRawBytes (HeaderHash bs) = ShortByteString -> ByteString SBS.fromShort ShortByteString -bs +bs - deserialiseFromRawBytes :: AsType (Hash BlockHeader) -> ByteString -> Maybe (Hash BlockHeader) -deserialiseFromRawBytes (AsHash AsBlockHeader) ByteString -bs + deserialiseFromRawBytes :: AsType (Hash BlockHeader) -> ByteString -> Maybe (Hash BlockHeader) +deserialiseFromRawBytes (AsHash AsBlockHeader) ByteString +bs | ByteString -> Int BS.length ByteString -bs Int -> Int -> Bool +bs Int -> Int -> Bool forall a. Eq a => a -> a -> Bool == Int 32 = Hash BlockHeader -> Maybe (Hash BlockHeader) @@ -571,7 +571,7 @@ $! ShortByteString -> Hash BlockHeader HeaderHash (ByteString -> ShortByteString SBS.toShort ByteString -bs) +bs) | Bool otherwise = Maybe (Hash BlockHeader) forall a. Maybe a @@ -579,53 +579,53 @@ instance HasTypeProxy BlockHeader where data AsType BlockHeader = AsBlockHeader - proxyToAsType :: Proxy BlockHeader -> AsType BlockHeader + proxyToAsType :: Proxy BlockHeader -> AsType BlockHeader proxyToAsType Proxy BlockHeader _ = AsType BlockHeader AsBlockHeader -getBlockHeader :: forall era . Block era -> BlockHeader +getBlockHeader :: forall era . Block era -> BlockHeader getBlockHeader :: Block era -> BlockHeader -getBlockHeader (ShelleyBlock ShelleyBasedEra era -shelleyEra ShelleyBlock (ShelleyLedgerEra era) -block) = case ShelleyBasedEra era -shelleyEra of +getBlockHeader (ShelleyBlock ShelleyBasedEra era +shelleyEra ShelleyBlock (ShelleyLedgerEra era) +block) = case ShelleyBasedEra era +shelleyEra of ShelleyBasedEra era ShelleyBasedEraShelley -> BlockHeader ShelleyBasedEra (ShelleyLedgerEra era) => BlockHeader -go +go ShelleyBasedEra era ShelleyBasedEraAllegra -> BlockHeader ShelleyBasedEra (ShelleyLedgerEra era) => BlockHeader -go +go ShelleyBasedEra era ShelleyBasedEraMary -> BlockHeader ShelleyBasedEra (ShelleyLedgerEra era) => BlockHeader -go +go ShelleyBasedEra era ShelleyBasedEraAlonzo -> String -> BlockHeader forall a. HasCallStack => String -> a error String "getBlockHeader: Alonzo era not implemented yet" where - go :: Consensus.ShelleyBasedEra (ShelleyLedgerEra era) => BlockHeader - go :: BlockHeader -go = SlotNo -> Hash BlockHeader -> BlockNo -> BlockHeader + go :: Consensus.ShelleyBasedEra (ShelleyLedgerEra era) => BlockHeader + go :: BlockHeader +go = SlotNo -> Hash BlockHeader -> BlockNo -> BlockHeader BlockHeader SlotNo -headerFieldSlot (ShortByteString -> Hash BlockHeader +headerFieldSlot (ShortByteString -> Hash BlockHeader HeaderHash ShortByteString -hashSBS) BlockNo -headerFieldBlockNo +hashSBS) BlockNo +headerFieldBlockNo where Consensus.HeaderFields { headerFieldHash :: forall b. HeaderFields b -> HeaderHash b Consensus.headerFieldHash - = Consensus.ShelleyHash (Ledger.HashHeader (Cardano.Crypto.Hash.Class.UnsafeHash hashSBS)), - SlotNo + = Consensus.ShelleyHash (Ledger.HashHeader (Cardano.Crypto.Hash.Class.UnsafeHash hashSBS)), + SlotNo headerFieldSlot :: forall b. HeaderFields b -> SlotNo headerFieldSlot :: SlotNo Consensus.headerFieldSlot, - BlockNo + BlockNo headerFieldBlockNo :: forall b. HeaderFields b -> BlockNo headerFieldBlockNo :: BlockNo Consensus.headerFieldBlockNo @@ -633,13 +633,13 @@ -> HeaderFields (ShelleyBlock (ShelleyLedgerEra era)) forall b. HasHeader b => b -> HeaderFields b Consensus.getHeaderFields ShelleyBlock (ShelleyLedgerEra era) -block -getBlockHeader (ByronBlock ByronBlock -block) +block +getBlockHeader (ByronBlock ByronBlock +block) = SlotNo -> Hash BlockHeader -> BlockNo -> BlockHeader BlockHeader SlotNo -headerFieldSlot +headerFieldSlot (ShortByteString -> Hash BlockHeader HeaderHash (ShortByteString -> Hash BlockHeader) -> ShortByteString -> Hash BlockHeader @@ -647,25 +647,25 @@ $ AbstractHash Blake2b_256 Header -> ShortByteString forall algo a. AbstractHash algo a -> ShortByteString Cardano.Crypto.Hashing.abstractHashToShort AbstractHash Blake2b_256 Header -byronHeaderHash) +byronHeaderHash) BlockNo -headerFieldBlockNo +headerFieldBlockNo where Consensus.HeaderFields { headerFieldHash :: forall b. HeaderFields b -> HeaderHash b -Consensus.headerFieldHash = Consensus.ByronHash byronHeaderHash, - SlotNo +Consensus.headerFieldHash = Consensus.ByronHash byronHeaderHash, + SlotNo headerFieldSlot :: SlotNo headerFieldSlot :: forall b. HeaderFields b -> SlotNo -Consensus.headerFieldSlot, - BlockNo +Consensus.headerFieldSlot, + BlockNo headerFieldBlockNo :: BlockNo headerFieldBlockNo :: forall b. HeaderFields b -> BlockNo -Consensus.headerFieldBlockNo +Consensus.headerFieldBlockNo } = ByronBlock -> HeaderFields ByronBlock forall b. HasHeader b => b -> HeaderFields b Consensus.getHeaderFields ByronBlock -block +block -- ---------------------------------------------------------------------------- @@ -674,7 +674,7 @@ data ChainPoint = ChainPointAtGenesis | ChainPoint !SlotNo !(Hash BlockHeader) - deriving (ChainPoint -> ChainPoint -> Bool + deriving (ChainPoint -> ChainPoint -> Bool (ChainPoint -> ChainPoint -> Bool) -> (ChainPoint -> ChainPoint -> Bool) -> Eq ChainPoint forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -682,7 +682,7 @@ $c/= :: ChainPoint -> ChainPoint -> Bool == :: ChainPoint -> ChainPoint -> Bool $c== :: ChainPoint -> ChainPoint -> Bool -Eq, Int -> ChainPoint -> ShowS +Eq, Int -> ChainPoint -> ShowS [ChainPoint] -> ShowS ChainPoint -> String (Int -> ChainPoint -> ShowS) @@ -700,9 +700,9 @@ Show) -toConsensusPointInMode :: ConsensusMode mode +toConsensusPointInMode :: ConsensusMode mode -> ChainPoint - -> Consensus.Point (ConsensusBlockForMode mode) + -> Consensus.Point (ConsensusBlockForMode mode) -- It's the same concrete impl in all cases, but we have to show -- individually for each case that we satisfy the type equality constraint -- HeaderHash block ~ OneEraHash xs @@ -727,8 +727,8 @@ ChainPoint -> Point block toConsensusPointHF -fromConsensusPointInMode :: ConsensusMode mode - -> Consensus.Point (ConsensusBlockForMode mode) +fromConsensusPointInMode :: ConsensusMode mode + -> Consensus.Point (ConsensusBlockForMode mode) -> ChainPoint fromConsensusPointInMode :: ConsensusMode mode -> Point (ConsensusBlockForMode mode) -> ChainPoint @@ -754,100 +754,100 @@ -- | Convert a 'Consensus.Point' for multi-era block type -- -toConsensusPointHF :: Consensus.HeaderHash block ~ Consensus.OneEraHash xs - => ChainPoint -> Consensus.Point block +toConsensusPointHF :: Consensus.HeaderHash block ~ Consensus.OneEraHash xs + => ChainPoint -> Consensus.Point block toConsensusPointHF :: ChainPoint -> Point block toConsensusPointHF ChainPoint ChainPointAtGenesis = Point block forall block. Point block Consensus.GenesisPoint -toConsensusPointHF (ChainPoint SlotNo -slot (HeaderHash h)) = +toConsensusPointHF (ChainPoint SlotNo +slot (HeaderHash h)) = SlotNo -> HeaderHash block -> Point block forall block. SlotNo -> HeaderHash block -> Point block Consensus.BlockPoint SlotNo -slot (ShortByteString -> OneEraHash xs +slot (ShortByteString -> OneEraHash xs forall k (xs :: [k]). ShortByteString -> OneEraHash xs Consensus.OneEraHash ShortByteString -h) +h) -- | Convert a 'Consensus.Point' for multi-era block type -- -fromConsensusPointHF :: Consensus.HeaderHash block ~ Consensus.OneEraHash xs - => Consensus.Point block -> ChainPoint +fromConsensusPointHF :: Consensus.HeaderHash block ~ Consensus.OneEraHash xs + => Consensus.Point block -> ChainPoint fromConsensusPointHF :: Point block -> ChainPoint fromConsensusPointHF Point block Consensus.GenesisPoint = ChainPoint ChainPointAtGenesis -fromConsensusPointHF (Consensus.BlockPoint SlotNo -slot (Consensus.OneEraHash h)) = +fromConsensusPointHF (Consensus.BlockPoint SlotNo +slot (Consensus.OneEraHash h)) = SlotNo -> Hash BlockHeader -> ChainPoint ChainPoint SlotNo -slot (ShortByteString -> Hash BlockHeader +slot (ShortByteString -> Hash BlockHeader HeaderHash ShortByteString -h) +h) -- | Convert a 'Consensus.Point' for single Shelley-era block type -- -toConsensusPoint :: forall ledgerera. - Consensus.ShelleyBasedEra ledgerera +toConsensusPoint :: forall ledgerera. + Consensus.ShelleyBasedEra ledgerera => ChainPoint - -> Consensus.Point (Consensus.ShelleyBlock ledgerera) + -> Consensus.Point (Consensus.ShelleyBlock ledgerera) toConsensusPoint :: ChainPoint -> Point (ShelleyBlock ledgerera) toConsensusPoint ChainPoint ChainPointAtGenesis = Point (ShelleyBlock ledgerera) forall block. Point block Consensus.GenesisPoint -toConsensusPoint (ChainPoint SlotNo -slot (HeaderHash h)) = +toConsensusPoint (ChainPoint SlotNo +slot (HeaderHash h)) = SlotNo -> HeaderHash (ShelleyBlock ledgerera) -> Point (ShelleyBlock ledgerera) forall block. SlotNo -> HeaderHash block -> Point block Consensus.BlockPoint SlotNo -slot (Proxy (ShelleyBlock ledgerera) +slot (Proxy (ShelleyBlock ledgerera) -> ShortByteString -> HeaderHash (ShelleyBlock ledgerera) forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> ShortByteString -> HeaderHash blk Consensus.fromShortRawHash Proxy (ShelleyBlock ledgerera) -proxy ShortByteString -h) +proxy ShortByteString +h) where - proxy :: Proxy (Consensus.ShelleyBlock ledgerera) - proxy :: Proxy (ShelleyBlock ledgerera) -proxy = Proxy (ShelleyBlock ledgerera) + proxy :: Proxy (Consensus.ShelleyBlock ledgerera) + proxy :: Proxy (ShelleyBlock ledgerera) +proxy = Proxy (ShelleyBlock ledgerera) forall k (t :: k). Proxy t Proxy -- | Convert a 'Consensus.Point' for single Shelley-era block type -- -fromConsensusPoint :: forall ledgerera. - Consensus.ShelleyBasedEra ledgerera - => Consensus.Point (Consensus.ShelleyBlock ledgerera) +fromConsensusPoint :: forall ledgerera. + Consensus.ShelleyBasedEra ledgerera + => Consensus.Point (Consensus.ShelleyBlock ledgerera) -> ChainPoint fromConsensusPoint :: Point (ShelleyBlock ledgerera) -> ChainPoint fromConsensusPoint Point (ShelleyBlock ledgerera) Consensus.GenesisPoint = ChainPoint ChainPointAtGenesis -fromConsensusPoint (Consensus.BlockPoint SlotNo -slot HeaderHash (ShelleyBlock ledgerera) -h) = +fromConsensusPoint (Consensus.BlockPoint SlotNo +slot HeaderHash (ShelleyBlock ledgerera) +h) = SlotNo -> Hash BlockHeader -> ChainPoint ChainPoint SlotNo -slot (ShortByteString -> Hash BlockHeader +slot (ShortByteString -> Hash BlockHeader HeaderHash (Proxy (ShelleyBlock ledgerera) -> HeaderHash (ShelleyBlock ledgerera) -> ShortByteString forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> HeaderHash blk -> ShortByteString Consensus.toShortRawHash Proxy (ShelleyBlock ledgerera) -proxy HeaderHash (ShelleyBlock ledgerera) -h)) +proxy HeaderHash (ShelleyBlock ledgerera) +h)) where - proxy :: Proxy (Consensus.ShelleyBlock ledgerera) - proxy :: Proxy (ShelleyBlock ledgerera) -proxy = Proxy (ShelleyBlock ledgerera) + proxy :: Proxy (Consensus.ShelleyBlock ledgerera) + proxy :: Proxy (ShelleyBlock ledgerera) +proxy = Proxy (ShelleyBlock ledgerera) forall k (t :: k). Proxy t Proxy @@ -863,7 +863,7 @@ -- data ChainTip = ChainTipAtGenesis | ChainTip !SlotNo !(Hash BlockHeader) !BlockNo - deriving (ChainTip -> ChainTip -> Bool + deriving (ChainTip -> ChainTip -> Bool (ChainTip -> ChainTip -> Bool) -> (ChainTip -> ChainTip -> Bool) -> Eq ChainTip forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -871,7 +871,7 @@ $c/= :: ChainTip -> ChainTip -> Bool == :: ChainTip -> ChainTip -> Bool $c== :: ChainTip -> ChainTip -> Bool -Eq, Int -> ChainTip -> ShowS +Eq, Int -> ChainTip -> ShowS [ChainTip] -> ShowS ChainTip -> String (Int -> ChainTip -> ShowS) @@ -886,33 +886,33 @@ $cshowsPrec :: Int -> ChainTip -> ShowS Show) -instance ToJSON ChainTip where - toJSON :: ChainTip -> Value +instance ToJSON ChainTip where + toJSON :: ChainTip -> Value toJSON ChainTip ChainTipAtGenesis = Value Aeson.Null - toJSON (ChainTip SlotNo -slot Hash BlockHeader -headerHash (Consensus.BlockNo Word64 -bNum)) = + toJSON (ChainTip SlotNo +slot Hash BlockHeader +headerHash (Consensus.BlockNo Word64 +bNum)) = [Pair] -> Value object [ Text "slot" Text -> SlotNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot +slot , Text "hash" Text -> Text -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Hash BlockHeader -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText Hash BlockHeader -headerHash +headerHash , Text "block" Text -> Word64 -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word64 -bNum +bNum ] chainTipToChainPoint :: ChainTip -> ChainPoint @@ -920,81 +920,81 @@ chainTipToChainPoint ChainTip ChainTipAtGenesis = ChainPoint ChainPointAtGenesis -chainTipToChainPoint (ChainTip SlotNo -s Hash BlockHeader -h BlockNo +chainTipToChainPoint (ChainTip SlotNo +s Hash BlockHeader +h BlockNo _) = SlotNo -> Hash BlockHeader -> ChainPoint ChainPoint SlotNo -s Hash BlockHeader -h +s Hash BlockHeader +h -fromConsensusTip :: ConsensusBlockForMode mode ~ block - => ConsensusMode mode - -> Consensus.Tip block +fromConsensusTip :: ConsensusBlockForMode mode ~ block + => ConsensusMode mode + -> Consensus.Tip block -> ChainTip fromConsensusTip :: ConsensusMode mode -> Tip block -> ChainTip fromConsensusTip ConsensusMode mode ByronMode = Tip block -> ChainTip Tip ByronBlockHFC -> ChainTip -conv +conv where - conv :: Consensus.Tip Consensus.ByronBlockHFC -> ChainTip - conv :: Tip ByronBlockHFC -> ChainTip -conv Tip ByronBlockHFC + conv :: Consensus.Tip Consensus.ByronBlockHFC -> ChainTip + conv :: Tip ByronBlockHFC -> ChainTip +conv Tip ByronBlockHFC Consensus.TipGenesis = ChainTip ChainTipAtGenesis - conv (Consensus.Tip SlotNo -slot (Consensus.OneEraHash h) BlockNo -block) = + conv (Consensus.Tip SlotNo +slot (Consensus.OneEraHash h) BlockNo +block) = SlotNo -> Hash BlockHeader -> BlockNo -> ChainTip ChainTip SlotNo -slot (ShortByteString -> Hash BlockHeader +slot (ShortByteString -> Hash BlockHeader HeaderHash ShortByteString -h) BlockNo -block +h) BlockNo +block fromConsensusTip ConsensusMode mode ShelleyMode = Tip block -> ChainTip Tip (ShelleyBlockHFC StandardShelley) -> ChainTip -conv +conv where - conv :: Consensus.Tip (Consensus.ShelleyBlockHFC Consensus.StandardShelley) + conv :: Consensus.Tip (Consensus.ShelleyBlockHFC Consensus.StandardShelley) -> ChainTip - conv :: Tip (ShelleyBlockHFC StandardShelley) -> ChainTip -conv Tip (ShelleyBlockHFC StandardShelley) + conv :: Tip (ShelleyBlockHFC StandardShelley) -> ChainTip +conv Tip (ShelleyBlockHFC StandardShelley) Consensus.TipGenesis = ChainTip ChainTipAtGenesis - conv (Consensus.Tip SlotNo -slot (Consensus.OneEraHash h) BlockNo -block) = + conv (Consensus.Tip SlotNo +slot (Consensus.OneEraHash h) BlockNo +block) = SlotNo -> Hash BlockHeader -> BlockNo -> ChainTip ChainTip SlotNo -slot (ShortByteString -> Hash BlockHeader +slot (ShortByteString -> Hash BlockHeader HeaderHash ShortByteString -h) BlockNo -block +h) BlockNo +block fromConsensusTip ConsensusMode mode CardanoMode = Tip block -> ChainTip Tip (CardanoBlock StandardCrypto) -> ChainTip -conv +conv where - conv :: Consensus.Tip (Consensus.CardanoBlock Consensus.StandardCrypto) + conv :: Consensus.Tip (Consensus.CardanoBlock Consensus.StandardCrypto) -> ChainTip - conv :: Tip (CardanoBlock StandardCrypto) -> ChainTip -conv Tip (CardanoBlock StandardCrypto) + conv :: Tip (CardanoBlock StandardCrypto) -> ChainTip +conv Tip (CardanoBlock StandardCrypto) Consensus.TipGenesis = ChainTip ChainTipAtGenesis - conv (Consensus.Tip SlotNo -slot (Consensus.OneEraHash h) BlockNo -block) = + conv (Consensus.Tip SlotNo +slot (Consensus.OneEraHash h) BlockNo +block) = SlotNo -> Hash BlockHeader -> BlockNo -> ChainTip ChainTip SlotNo -slot (ShortByteString -> Hash BlockHeader +slot (ShortByteString -> Hash BlockHeader HeaderHash ShortByteString -h) BlockNo -block +h) BlockNo +block {- TODO: In principle we should be able to use this common implementation rather diff --git a/cardano-api/src/Cardano.Api.Certificate.html b/cardano-api/src/Cardano.Api.Certificate.html index 4866f372c85..35cd6f1c931 100644 --- a/cardano-api/src/Cardano.Api.Certificate.html +++ b/cardano-api/src/Cardano.Api.Certificate.html @@ -93,7 +93,7 @@ (Hash VrfKey) | MIRCertificate MIRPot MIRTarget - deriving stock (Certificate -> Certificate -> Bool + deriving stock (Certificate -> Certificate -> Bool (Certificate -> Certificate -> Bool) -> (Certificate -> Certificate -> Bool) -> Eq Certificate forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -101,7 +101,7 @@ $c/= :: Certificate -> Certificate -> Bool == :: Certificate -> Certificate -> Bool $c== :: Certificate -> Certificate -> Bool -Eq, Int -> Certificate -> ShowS +Eq, Int -> Certificate -> ShowS [Certificate] -> ShowS Certificate -> String (Int -> Certificate -> ShowS) @@ -117,7 +117,7 @@ showsPrec :: Int -> Certificate -> ShowS $cshowsPrec :: Int -> Certificate -> ShowS Show) - deriving anyclass HasTypeProxy Certificate + deriving anyclass HasTypeProxy Certificate HasTypeProxy Certificate -> (Certificate -> ByteString) -> (AsType Certificate @@ -139,13 +139,13 @@ instance HasTypeProxy Certificate where data AsType Certificate = AsCertificate - proxyToAsType :: Proxy Certificate -> AsType Certificate + proxyToAsType :: Proxy Certificate -> AsType Certificate proxyToAsType Proxy Certificate _ = AsType Certificate AsCertificate -instance ToCBOR Certificate where - toCBOR :: Certificate -> Encoding +instance ToCBOR Certificate where + toCBOR :: Certificate -> Encoding toCBOR = DCert StandardCrypto -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (DCert StandardCrypto -> Encoding) @@ -154,8 +154,8 @@ . Certificate -> DCert StandardCrypto toShelleyCertificate -instance FromCBOR Certificate where - fromCBOR :: Decoder s Certificate +instance FromCBOR Certificate where + fromCBOR :: Decoder s Certificate fromCBOR = DCert StandardCrypto -> Certificate fromShelleyCertificate (DCert StandardCrypto -> Certificate) -> Decoder s (DCert StandardCrypto) -> Decoder s Certificate @@ -165,14 +165,14 @@ fromCBOR instance HasTextEnvelope Certificate where - textEnvelopeType :: AsType Certificate -> TextEnvelopeType + textEnvelopeType :: AsType Certificate -> TextEnvelopeType textEnvelopeType AsType Certificate _ = TextEnvelopeType "CertificateShelley" - textEnvelopeDefaultDescr :: Certificate -> TextEnvelopeDescr -textEnvelopeDefaultDescr Certificate -cert = case Certificate -cert of + textEnvelopeDefaultDescr :: Certificate -> TextEnvelopeDescr +textEnvelopeDefaultDescr Certificate +cert = case Certificate +cert of StakeAddressRegistrationCertificate{} -> TextEnvelopeDescr "Stake address registration" StakeAddressDeregistrationCertificate{} -> TextEnvelopeDescr @@ -204,7 +204,7 @@ -- | Use 'SendToTreasuryMIR' to make the target of a 'MIRCertificate' -- the treasury pot. | SendToTreasuryMIR Lovelace - deriving stock (MIRTarget -> MIRTarget -> Bool + deriving stock (MIRTarget -> MIRTarget -> Bool (MIRTarget -> MIRTarget -> Bool) -> (MIRTarget -> MIRTarget -> Bool) -> Eq MIRTarget forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -212,7 +212,7 @@ $c/= :: MIRTarget -> MIRTarget -> Bool == :: MIRTarget -> MIRTarget -> Bool $c== :: MIRTarget -> MIRTarget -> Bool -Eq, Int -> MIRTarget -> ShowS +Eq, Int -> MIRTarget -> ShowS [MIRTarget] -> ShowS MIRTarget -> String (Int -> MIRTarget -> ShowS) @@ -256,7 +256,7 @@ StakePoolParameters -> Maybe StakePoolMetadataReference stakePoolMetadata :: Maybe StakePoolMetadataReference } - deriving (StakePoolParameters -> StakePoolParameters -> Bool + deriving (StakePoolParameters -> StakePoolParameters -> Bool (StakePoolParameters -> StakePoolParameters -> Bool) -> (StakePoolParameters -> StakePoolParameters -> Bool) -> Eq StakePoolParameters @@ -265,7 +265,7 @@ $c/= :: StakePoolParameters -> StakePoolParameters -> Bool == :: StakePoolParameters -> StakePoolParameters -> Bool $c== :: StakePoolParameters -> StakePoolParameters -> Bool -Eq, Int -> StakePoolParameters -> ShowS +Eq, Int -> StakePoolParameters -> ShowS [StakePoolParameters] -> ShowS StakePoolParameters -> String (Int -> StakePoolParameters -> ShowS) @@ -296,7 +296,7 @@ | StakePoolRelayDnsSrvRecord ByteString - deriving (StakePoolRelay -> StakePoolRelay -> Bool + deriving (StakePoolRelay -> StakePoolRelay -> Bool (StakePoolRelay -> StakePoolRelay -> Bool) -> (StakePoolRelay -> StakePoolRelay -> Bool) -> Eq StakePoolRelay forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -304,7 +304,7 @@ $c/= :: StakePoolRelay -> StakePoolRelay -> Bool == :: StakePoolRelay -> StakePoolRelay -> Bool $c== :: StakePoolRelay -> StakePoolRelay -> Bool -Eq, Int -> StakePoolRelay -> ShowS +Eq, Int -> StakePoolRelay -> ShowS [StakePoolRelay] -> ShowS StakePoolRelay -> String (Int -> StakePoolRelay -> ShowS) @@ -328,7 +328,7 @@ StakePoolMetadataReference -> Hash StakePoolMetadata stakePoolMetadataHash :: Hash StakePoolMetadata } - deriving (StakePoolMetadataReference -> StakePoolMetadataReference -> Bool + deriving (StakePoolMetadataReference -> StakePoolMetadataReference -> Bool (StakePoolMetadataReference -> StakePoolMetadataReference -> Bool) -> (StakePoolMetadataReference -> StakePoolMetadataReference -> Bool) @@ -338,7 +338,7 @@ $c/= :: StakePoolMetadataReference -> StakePoolMetadataReference -> Bool == :: StakePoolMetadataReference -> StakePoolMetadataReference -> Bool $c== :: StakePoolMetadataReference -> StakePoolMetadataReference -> Bool -Eq, Int -> StakePoolMetadataReference -> ShowS +Eq, Int -> StakePoolMetadataReference -> ShowS [StakePoolMetadataReference] -> ShowS StakePoolMetadataReference -> String (Int -> StakePoolMetadataReference -> ShowS) @@ -407,8 +407,8 @@ toShelleyCertificate :: Certificate -> Shelley.DCert StandardCrypto toShelleyCertificate :: Certificate -> DCert StandardCrypto -toShelleyCertificate (StakeAddressRegistrationCertificate StakeCredential -stakecred) = +toShelleyCertificate (StakeAddressRegistrationCertificate StakeCredential +stakecred) = DelegCert StandardCrypto -> DCert StandardCrypto forall crypto. DelegCert crypto -> DCert crypto Shelley.DCertDeleg (DelegCert StandardCrypto -> DCert StandardCrypto) @@ -420,10 +420,10 @@ Shelley.RegKey (StakeCredential -> StakeCredential StandardCrypto toShelleyStakeCredential StakeCredential -stakecred) +stakecred) -toShelleyCertificate (StakeAddressDeregistrationCertificate StakeCredential -stakecred) = +toShelleyCertificate (StakeAddressDeregistrationCertificate StakeCredential +stakecred) = DelegCert StandardCrypto -> DCert StandardCrypto forall crypto. DelegCert crypto -> DCert crypto Shelley.DCertDeleg (DelegCert StandardCrypto -> DCert StandardCrypto) @@ -435,11 +435,11 @@ Shelley.DeRegKey (StakeCredential -> StakeCredential StandardCrypto toShelleyStakeCredential StakeCredential -stakecred) +stakecred) toShelleyCertificate (StakeAddressDelegationCertificate - StakeCredential -stakecred (StakePoolKeyHash poolid)) = + StakeCredential +stakecred (StakePoolKeyHash poolid)) = DelegCert StandardCrypto -> DCert StandardCrypto forall crypto. DelegCert crypto -> DCert crypto Shelley.DCertDeleg (DelegCert StandardCrypto -> DCert StandardCrypto) @@ -460,12 +460,12 @@ Shelley.Delegation (StakeCredential -> StakeCredential StandardCrypto toShelleyStakeCredential StakeCredential -stakecred) +stakecred) KeyHash 'StakePool StandardCrypto -poolid +poolid -toShelleyCertificate (StakePoolRegistrationCertificate StakePoolParameters -poolparams) = +toShelleyCertificate (StakePoolRegistrationCertificate StakePoolParameters +poolparams) = PoolCert StandardCrypto -> DCert StandardCrypto forall crypto. PoolCert crypto -> DCert crypto Shelley.DCertPool (PoolCert StandardCrypto -> DCert StandardCrypto) @@ -477,11 +477,11 @@ Shelley.RegPool (StakePoolParameters -> PoolParams StandardCrypto toShelleyPoolParams StakePoolParameters -poolparams) +poolparams) toShelleyCertificate (StakePoolRetirementCertificate - (StakePoolKeyHash poolid) EpochNo -epochno) = + (StakePoolKeyHash poolid) EpochNo +epochno) = PoolCert StandardCrypto -> DCert StandardCrypto forall crypto. PoolCert crypto -> DCert crypto Shelley.DCertPool (PoolCert StandardCrypto -> DCert StandardCrypto) @@ -494,14 +494,14 @@ KeyHash 'StakePool crypto -> EpochNo -> PoolCert crypto Shelley.RetirePool KeyHash 'StakePool StandardCrypto -poolid +poolid EpochNo -epochno +epochno toShelleyCertificate (GenesisKeyDelegationCertificate - (GenesisKeyHash genesiskh) - (GenesisDelegateKeyHash delegatekh) - (VrfKeyHash vrfkh)) = + (GenesisKeyHash genesiskh) + (GenesisDelegateKeyHash delegatekh) + (VrfKeyHash vrfkh)) = GenesisDelegCert StandardCrypto -> DCert StandardCrypto forall crypto. GenesisDelegCert crypto -> DCert crypto Shelley.DCertGenesis (GenesisDelegCert StandardCrypto -> DCert StandardCrypto) @@ -519,15 +519,15 @@ -> GenesisDelegCert crypto Shelley.GenesisDelegCert KeyHash 'Genesis StandardCrypto -genesiskh +genesiskh KeyHash 'GenesisDelegate StandardCrypto -delegatekh +delegatekh Hash StandardCrypto (VerKeyVRF StandardCrypto) -vrfkh +vrfkh -toShelleyCertificate (MIRCertificate MIRPot -mirpot (StakeAddressesMIR [(StakeCredential, Lovelace)] -amounts)) = +toShelleyCertificate (MIRCertificate MIRPot +mirpot (StakeAddressesMIR [(StakeCredential, Lovelace)] +amounts)) = MIRCert StandardCrypto -> DCert StandardCrypto forall crypto. MIRCert crypto -> DCert crypto Shelley.DCertMir (MIRCert StandardCrypto -> DCert StandardCrypto) @@ -538,7 +538,7 @@ forall crypto. MIRPot -> MIRTarget crypto -> MIRCert crypto Shelley.MIRCert MIRPot -mirpot +mirpot (Map (StakeCredential StandardCrypto) DeltaCoin -> MIRTarget StandardCrypto forall crypto. @@ -557,24 +557,24 @@ (<>) [ (StakeCredential -> StakeCredential StandardCrypto toShelleyStakeCredential StakeCredential -sc, Coin -> DeltaCoin +sc, Coin -> DeltaCoin Shelley.toDeltaCoin (Coin -> DeltaCoin) -> (Lovelace -> Coin) -> Lovelace -> DeltaCoin forall b c a. (b -> c) -> (a -> b) -> a -> c . Lovelace -> Coin toShelleyLovelace (Lovelace -> DeltaCoin) -> Lovelace -> DeltaCoin forall a b. (a -> b) -> a -> b $ Lovelace -v) - | (StakeCredential -sc, Lovelace -v) <- [(StakeCredential, Lovelace)] -amounts ]) +v) + | (StakeCredential +sc, Lovelace +v) <- [(StakeCredential, Lovelace)] +amounts ]) -toShelleyCertificate (MIRCertificate MIRPot -mirPot (SendToReservesMIR Lovelace -amount)) = +toShelleyCertificate (MIRCertificate MIRPot +mirPot (SendToReservesMIR Lovelace +amount)) = case MIRPot -mirPot of +mirPot of MIRPot TreasuryMIR -> MIRCert StandardCrypto -> DCert StandardCrypto @@ -595,7 +595,7 @@ forall a b. (a -> b) -> a -> b $ Lovelace -> Coin toShelleyLovelace Lovelace -amount) +amount) MIRPot ReservesMIR -> String -> DCert StandardCrypto @@ -603,11 +603,11 @@ error String "toShelleyCertificate: Incorrect MIRPot specified. Expected TreasuryMIR but got ReservesMIR" -toShelleyCertificate (MIRCertificate MIRPot -mirPot (SendToTreasuryMIR Lovelace -amount)) = +toShelleyCertificate (MIRCertificate MIRPot +mirPot (SendToTreasuryMIR Lovelace +amount)) = case MIRPot -mirPot of +mirPot of MIRPot ReservesMIR -> MIRCert StandardCrypto -> DCert StandardCrypto @@ -628,7 +628,7 @@ forall a b. (a -> b) -> a -> b $ Lovelace -> Coin toShelleyLovelace Lovelace -amount) +amount) MIRPot TreasuryMIR -> String -> DCert StandardCrypto @@ -639,99 +639,99 @@ fromShelleyCertificate :: Shelley.DCert StandardCrypto -> Certificate fromShelleyCertificate :: DCert StandardCrypto -> Certificate -fromShelleyCertificate (Shelley.DCertDeleg (Shelley.RegKey StakeCredential StandardCrypto -stakecred)) = +fromShelleyCertificate (Shelley.DCertDeleg (Shelley.RegKey StakeCredential StandardCrypto +stakecred)) = StakeCredential -> Certificate StakeAddressRegistrationCertificate (StakeCredential StandardCrypto -> StakeCredential fromShelleyStakeCredential StakeCredential StandardCrypto -stakecred) +stakecred) -fromShelleyCertificate (Shelley.DCertDeleg (Shelley.DeRegKey StakeCredential StandardCrypto -stakecred)) = +fromShelleyCertificate (Shelley.DCertDeleg (Shelley.DeRegKey StakeCredential StandardCrypto +stakecred)) = StakeCredential -> Certificate StakeAddressDeregistrationCertificate (StakeCredential StandardCrypto -> StakeCredential fromShelleyStakeCredential StakeCredential StandardCrypto -stakecred) +stakecred) fromShelleyCertificate (Shelley.DCertDeleg - (Shelley.Delegate (Shelley.Delegation StakeCredential StandardCrypto -stakecred KeyHash 'StakePool StandardCrypto -poolid))) = + (Shelley.Delegate (Shelley.Delegation StakeCredential StandardCrypto +stakecred KeyHash 'StakePool StandardCrypto +poolid))) = StakeCredential -> PoolId -> Certificate StakeAddressDelegationCertificate (StakeCredential StandardCrypto -> StakeCredential fromShelleyStakeCredential StakeCredential StandardCrypto -stakecred) +stakecred) (KeyHash 'StakePool StandardCrypto -> PoolId StakePoolKeyHash KeyHash 'StakePool StandardCrypto -poolid) +poolid) -fromShelleyCertificate (Shelley.DCertPool (Shelley.RegPool PoolParams StandardCrypto -poolparams)) = +fromShelleyCertificate (Shelley.DCertPool (Shelley.RegPool PoolParams StandardCrypto +poolparams)) = StakePoolParameters -> Certificate StakePoolRegistrationCertificate (PoolParams StandardCrypto -> StakePoolParameters fromShelleyPoolParams PoolParams StandardCrypto -poolparams) +poolparams) -fromShelleyCertificate (Shelley.DCertPool (Shelley.RetirePool KeyHash 'StakePool StandardCrypto -poolid EpochNo -epochno)) = +fromShelleyCertificate (Shelley.DCertPool (Shelley.RetirePool KeyHash 'StakePool StandardCrypto +poolid EpochNo +epochno)) = PoolId -> EpochNo -> Certificate StakePoolRetirementCertificate (KeyHash 'StakePool StandardCrypto -> PoolId StakePoolKeyHash KeyHash 'StakePool StandardCrypto -poolid) +poolid) EpochNo -epochno +epochno fromShelleyCertificate (Shelley.DCertGenesis - (Shelley.GenesisDelegCert KeyHash 'Genesis StandardCrypto -genesiskh KeyHash 'GenesisDelegate StandardCrypto -delegatekh Hash StandardCrypto (VerKeyVRF StandardCrypto) -vrfkh)) = + (Shelley.GenesisDelegCert KeyHash 'Genesis StandardCrypto +genesiskh KeyHash 'GenesisDelegate StandardCrypto +delegatekh Hash StandardCrypto (VerKeyVRF StandardCrypto) +vrfkh)) = Hash GenesisKey -> Hash GenesisDelegateKey -> Hash VrfKey -> Certificate GenesisKeyDelegationCertificate (KeyHash 'Genesis StandardCrypto -> Hash GenesisKey GenesisKeyHash KeyHash 'Genesis StandardCrypto -genesiskh) +genesiskh) (KeyHash 'GenesisDelegate StandardCrypto -> Hash GenesisDelegateKey GenesisDelegateKeyHash KeyHash 'GenesisDelegate StandardCrypto -delegatekh) +delegatekh) (Hash StandardCrypto (VerKeyVRF StandardCrypto) -> Hash VrfKey VrfKeyHash Hash StandardCrypto (VerKeyVRF StandardCrypto) -vrfkh) +vrfkh) fromShelleyCertificate (Shelley.DCertMir - (Shelley.MIRCert MIRPot -mirpot (Shelley.StakeAddressesMIR Map (StakeCredential StandardCrypto) DeltaCoin -amounts))) = + (Shelley.MIRCert MIRPot +mirpot (Shelley.StakeAddressesMIR Map (StakeCredential StandardCrypto) DeltaCoin +amounts))) = MIRPot -> MIRTarget -> Certificate MIRCertificate MIRPot -mirpot +mirpot ([(StakeCredential, Lovelace)] -> MIRTarget StakeAddressesMIR [ (StakeCredential StandardCrypto -> StakeCredential fromShelleyStakeCredential StakeCredential StandardCrypto -sc, DeltaCoin -> Lovelace +sc, DeltaCoin -> Lovelace fromShelleyDeltaLovelace DeltaCoin -v) - | (StakeCredential StandardCrypto -sc, DeltaCoin -v) <- Map (StakeCredential StandardCrypto) DeltaCoin +v) + | (StakeCredential StandardCrypto +sc, DeltaCoin +v) <- Map (StakeCredential StandardCrypto) DeltaCoin -> [(StakeCredential StandardCrypto, DeltaCoin)] forall k a. Map k a -> [(k, a)] Map.toList Map (StakeCredential StandardCrypto) DeltaCoin -amounts ] +amounts ] ) fromShelleyCertificate (Shelley.DCertMir (Shelley.MIRCert MIRPot -ReservesMIR (Shelley.SendToOppositePotMIR Coin -amount))) = +ReservesMIR (Shelley.SendToOppositePotMIR Coin +amount))) = MIRPot -> MIRTarget -> Certificate MIRCertificate MIRPot ReservesMIR @@ -740,12 +740,12 @@ forall a b. (a -> b) -> a -> b $ Coin -> Lovelace fromShelleyLovelace Coin -amount) +amount) fromShelleyCertificate (Shelley.DCertMir (Shelley.MIRCert MIRPot -TreasuryMIR (Shelley.SendToOppositePotMIR Coin -amount))) = +TreasuryMIR (Shelley.SendToOppositePotMIR Coin +amount))) = MIRPot -> MIRTarget -> Certificate MIRCertificate MIRPot TreasuryMIR @@ -754,43 +754,43 @@ forall a b. (a -> b) -> a -> b $ Coin -> Lovelace fromShelleyLovelace Coin -amount) +amount) toShelleyPoolParams :: StakePoolParameters -> Shelley.PoolParams StandardCrypto toShelleyPoolParams :: StakePoolParameters -> PoolParams StandardCrypto toShelleyPoolParams StakePoolParameters { stakePoolId :: StakePoolParameters -> PoolId -stakePoolId = StakePoolKeyHash poolkh +stakePoolId = StakePoolKeyHash poolkh , stakePoolVRF :: StakePoolParameters -> Hash VrfKey -stakePoolVRF = VrfKeyHash vrfkh - , Lovelace +stakePoolVRF = VrfKeyHash vrfkh + , Lovelace stakePoolCost :: Lovelace stakePoolCost :: StakePoolParameters -> Lovelace -stakePoolCost - , Rational +stakePoolCost + , Rational stakePoolMargin :: Rational stakePoolMargin :: StakePoolParameters -> Rational -stakePoolMargin - , StakeAddress +stakePoolMargin + , StakeAddress stakePoolRewardAccount :: StakeAddress stakePoolRewardAccount :: StakePoolParameters -> StakeAddress -stakePoolRewardAccount - , Lovelace +stakePoolRewardAccount + , Lovelace stakePoolPledge :: Lovelace stakePoolPledge :: StakePoolParameters -> Lovelace -stakePoolPledge - , [Hash StakeKey] +stakePoolPledge + , [Hash StakeKey] stakePoolOwners :: [Hash StakeKey] stakePoolOwners :: StakePoolParameters -> [Hash StakeKey] -stakePoolOwners - , [StakePoolRelay] +stakePoolOwners + , [StakePoolRelay] stakePoolRelays :: [StakePoolRelay] stakePoolRelays :: StakePoolParameters -> [StakePoolRelay] -stakePoolRelays - , Maybe StakePoolMetadataReference +stakePoolRelays + , Maybe StakePoolMetadataReference stakePoolMetadata :: Maybe StakePoolMetadataReference stakePoolMetadata :: StakePoolParameters -> Maybe StakePoolMetadataReference -stakePoolMetadata +stakePoolMetadata } = --TODO: validate pool parameters PoolParams :: forall crypto. @@ -807,34 +807,34 @@ Shelley.PoolParams { _poolId :: KeyHash 'StakePool StandardCrypto Shelley._poolId = KeyHash 'StakePool StandardCrypto -poolkh +poolkh , _poolVrf :: Hash StandardCrypto (VerKeyVRF StandardCrypto) Shelley._poolVrf = Hash StandardCrypto (VerKeyVRF StandardCrypto) -vrfkh +vrfkh , _poolPledge :: Coin Shelley._poolPledge = Lovelace -> Coin toShelleyLovelace Lovelace -stakePoolPledge +stakePoolPledge , _poolCost :: Coin Shelley._poolCost = Lovelace -> Coin toShelleyLovelace Lovelace -stakePoolCost +stakePoolCost , _poolMargin :: UnitInterval Shelley._poolMargin = Rational -> UnitInterval Shelley.unitIntervalFromRational Rational -stakePoolMargin +stakePoolMargin , _poolRAcnt :: RewardAcnt StandardCrypto Shelley._poolRAcnt = StakeAddress -> RewardAcnt StandardCrypto toShelleyStakeAddr StakeAddress -stakePoolRewardAccount +stakePoolRewardAccount , _poolOwners :: Set (KeyHash 'Staking StandardCrypto) Shelley._poolOwners = [KeyHash 'Staking StandardCrypto] -> Set (KeyHash 'Staking StandardCrypto) forall a. Ord a => [a] -> Set a Set.fromList [ KeyHash 'Staking StandardCrypto -kh | StakeKeyHash kh <- [Hash StakeKey] -stakePoolOwners ] +kh | StakeKeyHash kh <- [Hash StakeKey] +stakePoolOwners ] , _poolRelays :: StrictSeq StakePoolRelay Shelley._poolRelays = [StakePoolRelay] -> StrictSeq StakePoolRelay forall a. [a] -> StrictSeq a @@ -843,11 +843,11 @@ -> [StakePoolRelay] -> [StakePoolRelay] forall a b. (a -> b) -> [a] -> [b] map StakePoolRelay -> StakePoolRelay -toShelleyStakePoolRelay [StakePoolRelay] -stakePoolRelays) +toShelleyStakePoolRelay [StakePoolRelay] +stakePoolRelays) , _poolMD :: StrictMaybe PoolMetadata Shelley._poolMD = StakePoolMetadataReference -> PoolMetadata -toShelleyPoolMetadata (StakePoolMetadataReference -> PoolMetadata) +toShelleyPoolMetadata (StakePoolMetadataReference -> PoolMetadata) -> StrictMaybe StakePoolMetadataReference -> StrictMaybe PoolMetadata forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -856,15 +856,15 @@ -> StrictMaybe StakePoolMetadataReference forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe StakePoolMetadataReference -stakePoolMetadata +stakePoolMetadata } where - toShelleyStakePoolRelay :: StakePoolRelay -> Shelley.StakePoolRelay - toShelleyStakePoolRelay :: StakePoolRelay -> StakePoolRelay -toShelleyStakePoolRelay (StakePoolRelayIp Maybe IPv4 -mipv4 Maybe IPv6 -mipv6 Maybe PortNumber -mport) = + toShelleyStakePoolRelay :: StakePoolRelay -> Shelley.StakePoolRelay + toShelleyStakePoolRelay :: StakePoolRelay -> StakePoolRelay +toShelleyStakePoolRelay (StakePoolRelayIp Maybe IPv4 +mipv4 Maybe IPv6 +mipv6 Maybe PortNumber +mport) = StrictMaybe Port -> StrictMaybe IPv4 -> StrictMaybe IPv6 -> StakePoolRelay Shelley.SingleHostAddr @@ -875,19 +875,19 @@ <$> Maybe PortNumber -> StrictMaybe PortNumber forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe PortNumber -mport) +mport) (Maybe IPv4 -> StrictMaybe IPv4 forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe IPv4 -mipv4) +mipv4) (Maybe IPv6 -> StrictMaybe IPv6 forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe IPv6 -mipv6) +mipv6) - toShelleyStakePoolRelay (StakePoolRelayDnsARecord ByteString -dnsname Maybe PortNumber -mport) = + toShelleyStakePoolRelay (StakePoolRelayDnsARecord ByteString +dnsname Maybe PortNumber +mport) = StrictMaybe Port -> DnsName -> StakePoolRelay Shelley.SingleHostName (PortNumber -> Port @@ -897,46 +897,46 @@ <$> Maybe PortNumber -> StrictMaybe PortNumber forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe PortNumber -mport) +mport) (ByteString -> DnsName -toShelleyDnsName ByteString -dnsname) +toShelleyDnsName ByteString +dnsname) - toShelleyStakePoolRelay (StakePoolRelayDnsSrvRecord ByteString -dnsname) = + toShelleyStakePoolRelay (StakePoolRelayDnsSrvRecord ByteString +dnsname) = DnsName -> StakePoolRelay Shelley.MultiHostName (ByteString -> DnsName -toShelleyDnsName ByteString -dnsname) +toShelleyDnsName ByteString +dnsname) - toShelleyPoolMetadata :: StakePoolMetadataReference -> Shelley.PoolMetadata - toShelleyPoolMetadata :: StakePoolMetadataReference -> PoolMetadata -toShelleyPoolMetadata StakePoolMetadataReference { - Text + toShelleyPoolMetadata :: StakePoolMetadataReference -> Shelley.PoolMetadata + toShelleyPoolMetadata :: StakePoolMetadataReference -> PoolMetadata +toShelleyPoolMetadata StakePoolMetadataReference { + Text stakePoolMetadataURL :: Text stakePoolMetadataURL :: StakePoolMetadataReference -> Text -stakePoolMetadataURL +stakePoolMetadataURL , stakePoolMetadataHash :: StakePoolMetadataReference -> Hash StakePoolMetadata -stakePoolMetadataHash = StakePoolMetadataHash mdh +stakePoolMetadataHash = StakePoolMetadataHash mdh } = PoolMetadata :: Url -> ByteString -> PoolMetadata Shelley.PoolMetadata { _poolMDUrl :: Url Shelley._poolMDUrl = Text -> Url -toShelleyUrl Text -stakePoolMetadataURL +toShelleyUrl Text +stakePoolMetadataURL , _poolMDHash :: ByteString Shelley._poolMDHash = Hash Blake2b_256 ByteString -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash StandardCrypto ByteString Hash Blake2b_256 ByteString -mdh +mdh } - toShelleyDnsName :: ByteString -> Shelley.DnsName - toShelleyDnsName :: ByteString -> DnsName -toShelleyDnsName = DnsName -> Maybe DnsName -> DnsName + toShelleyDnsName :: ByteString -> Shelley.DnsName + toShelleyDnsName :: ByteString -> DnsName +toShelleyDnsName = DnsName -> Maybe DnsName -> DnsName forall a. a -> Maybe a -> a fromMaybe (String -> DnsName forall a. HasCallStack => String -> a @@ -953,9 +953,9 @@ . ByteString -> Text Text.decodeLatin1 - toShelleyUrl :: Text -> Shelley.Url - toShelleyUrl :: Text -> Url -toShelleyUrl = Url -> Maybe Url -> Url + toShelleyUrl :: Text -> Shelley.Url + toShelleyUrl :: Text -> Url +toShelleyUrl = Url -> Maybe Url -> Url forall a. a -> Maybe a -> a fromMaybe (String -> Url forall a. HasCallStack => String -> a @@ -972,42 +972,42 @@ fromShelleyPoolParams :: PoolParams StandardCrypto -> StakePoolParameters fromShelleyPoolParams Shelley.PoolParams { - KeyHash 'StakePool StandardCrypto + KeyHash 'StakePool StandardCrypto _poolId :: KeyHash 'StakePool StandardCrypto _poolId :: forall crypto. PoolParams crypto -> KeyHash 'StakePool crypto -Shelley._poolId - , Hash StandardCrypto (VerKeyVRF StandardCrypto) +Shelley._poolId + , Hash StandardCrypto (VerKeyVRF StandardCrypto) _poolVrf :: Hash StandardCrypto (VerKeyVRF StandardCrypto) _poolVrf :: forall crypto. PoolParams crypto -> Hash crypto (VerKeyVRF crypto) -Shelley._poolVrf - , Coin +Shelley._poolVrf + , Coin _poolPledge :: Coin _poolPledge :: forall crypto. PoolParams crypto -> Coin -Shelley._poolPledge - , Coin +Shelley._poolPledge + , Coin _poolCost :: Coin _poolCost :: forall crypto. PoolParams crypto -> Coin -Shelley._poolCost - , UnitInterval +Shelley._poolCost + , UnitInterval _poolMargin :: UnitInterval _poolMargin :: forall crypto. PoolParams crypto -> UnitInterval -Shelley._poolMargin - , RewardAcnt StandardCrypto +Shelley._poolMargin + , RewardAcnt StandardCrypto _poolRAcnt :: RewardAcnt StandardCrypto _poolRAcnt :: forall crypto. PoolParams crypto -> RewardAcnt crypto -Shelley._poolRAcnt - , Set (KeyHash 'Staking StandardCrypto) +Shelley._poolRAcnt + , Set (KeyHash 'Staking StandardCrypto) _poolOwners :: Set (KeyHash 'Staking StandardCrypto) _poolOwners :: forall crypto. PoolParams crypto -> Set (KeyHash 'Staking crypto) -Shelley._poolOwners - , StrictSeq StakePoolRelay +Shelley._poolOwners + , StrictSeq StakePoolRelay _poolRelays :: StrictSeq StakePoolRelay _poolRelays :: forall crypto. PoolParams crypto -> StrictSeq StakePoolRelay -Shelley._poolRelays - , StrictMaybe PoolMetadata +Shelley._poolRelays + , StrictMaybe PoolMetadata _poolMD :: StrictMaybe PoolMetadata _poolMD :: forall crypto. PoolParams crypto -> StrictMaybe PoolMetadata -Shelley._poolMD +Shelley._poolMD } = StakePoolParameters :: PoolId -> Hash VrfKey @@ -1023,27 +1023,27 @@ stakePoolId :: PoolId stakePoolId = KeyHash 'StakePool StandardCrypto -> PoolId StakePoolKeyHash KeyHash 'StakePool StandardCrypto -_poolId +_poolId , stakePoolVRF :: Hash VrfKey stakePoolVRF = Hash StandardCrypto (VerKeyVRF StandardCrypto) -> Hash VrfKey VrfKeyHash Hash StandardCrypto (VerKeyVRF StandardCrypto) -_poolVrf +_poolVrf , stakePoolCost :: Lovelace stakePoolCost = Coin -> Lovelace fromShelleyLovelace Coin -_poolCost +_poolCost , stakePoolMargin :: Rational stakePoolMargin = UnitInterval -> Rational Shelley.unitIntervalToRational UnitInterval -_poolMargin +_poolMargin , stakePoolRewardAccount :: StakeAddress stakePoolRewardAccount = RewardAcnt StandardCrypto -> StakeAddress fromShelleyStakeAddr RewardAcnt StandardCrypto -_poolRAcnt +_poolRAcnt , stakePoolPledge :: Lovelace stakePoolPledge = Coin -> Lovelace fromShelleyLovelace Coin -_poolPledge +_poolPledge , stakePoolOwners :: [Hash StakeKey] stakePoolOwners = (KeyHash 'Staking StandardCrypto -> Hash StakeKey) -> [KeyHash 'Staking StandardCrypto] -> [Hash StakeKey] @@ -1053,45 +1053,45 @@ -> [KeyHash 'Staking StandardCrypto] forall a. Set a -> [a] Set.toList Set (KeyHash 'Staking StandardCrypto) -_poolOwners) +_poolOwners) , stakePoolRelays :: [StakePoolRelay] stakePoolRelays = (StakePoolRelay -> StakePoolRelay) -> [StakePoolRelay] -> [StakePoolRelay] forall a b. (a -> b) -> [a] -> [b] map StakePoolRelay -> StakePoolRelay -fromShelleyStakePoolRelay +fromShelleyStakePoolRelay (StrictSeq StakePoolRelay -> [StakePoolRelay] forall (t :: * -> *) a. Foldable t => t a -> [a] Foldable.toList StrictSeq StakePoolRelay -_poolRelays) +_poolRelays) , stakePoolMetadata :: Maybe StakePoolMetadataReference stakePoolMetadata = PoolMetadata -> StakePoolMetadataReference -fromShelleyPoolMetadata (PoolMetadata -> StakePoolMetadataReference) +fromShelleyPoolMetadata (PoolMetadata -> StakePoolMetadataReference) -> Maybe PoolMetadata -> Maybe StakePoolMetadataReference forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> StrictMaybe PoolMetadata -> Maybe PoolMetadata forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe PoolMetadata -_poolMD +_poolMD } where - fromShelleyStakePoolRelay :: Shelley.StakePoolRelay -> StakePoolRelay - fromShelleyStakePoolRelay :: StakePoolRelay -> StakePoolRelay -fromShelleyStakePoolRelay (Shelley.SingleHostAddr StrictMaybe Port -mport StrictMaybe IPv4 -mipv4 StrictMaybe IPv6 -mipv6) = + fromShelleyStakePoolRelay :: Shelley.StakePoolRelay -> StakePoolRelay + fromShelleyStakePoolRelay :: StakePoolRelay -> StakePoolRelay +fromShelleyStakePoolRelay (Shelley.SingleHostAddr StrictMaybe Port +mport StrictMaybe IPv4 +mipv4 StrictMaybe IPv6 +mipv6) = Maybe IPv4 -> Maybe IPv6 -> Maybe PortNumber -> StakePoolRelay StakePoolRelayIp (StrictMaybe IPv4 -> Maybe IPv4 forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe IPv4 -mipv4) +mipv4) (StrictMaybe IPv6 -> Maybe IPv6 forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe IPv6 -mipv6) +mipv6) (Word16 -> PortNumber forall a b. (Integral a, Num b) => a -> b fromIntegral (Word16 -> PortNumber) -> (Port -> Word16) -> Port -> PortNumber @@ -1102,16 +1102,16 @@ <$> StrictMaybe Port -> Maybe Port forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Port -mport) +mport) - fromShelleyStakePoolRelay (Shelley.SingleHostName StrictMaybe Port -mport DnsName -dnsname) = + fromShelleyStakePoolRelay (Shelley.SingleHostName StrictMaybe Port +mport DnsName +dnsname) = ByteString -> Maybe PortNumber -> StakePoolRelay StakePoolRelayDnsARecord (DnsName -> ByteString -fromShelleyDnsName DnsName -dnsname) +fromShelleyDnsName DnsName +dnsname) (Word16 -> PortNumber forall a b. (Integral a, Num b) => a -> b fromIntegral (Word16 -> PortNumber) -> (Port -> Word16) -> Port -> PortNumber @@ -1122,34 +1122,34 @@ <$> StrictMaybe Port -> Maybe Port forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Port -mport) +mport) - fromShelleyStakePoolRelay (Shelley.MultiHostName DnsName -dnsname) = + fromShelleyStakePoolRelay (Shelley.MultiHostName DnsName +dnsname) = ByteString -> StakePoolRelay StakePoolRelayDnsSrvRecord (DnsName -> ByteString -fromShelleyDnsName DnsName -dnsname) +fromShelleyDnsName DnsName +dnsname) - fromShelleyPoolMetadata :: Shelley.PoolMetadata -> StakePoolMetadataReference - fromShelleyPoolMetadata :: PoolMetadata -> StakePoolMetadataReference -fromShelleyPoolMetadata Shelley.PoolMetadata { - Url + fromShelleyPoolMetadata :: Shelley.PoolMetadata -> StakePoolMetadataReference + fromShelleyPoolMetadata :: PoolMetadata -> StakePoolMetadataReference +fromShelleyPoolMetadata Shelley.PoolMetadata { + Url _poolMDUrl :: Url _poolMDUrl :: PoolMetadata -> Url -Shelley._poolMDUrl - , ByteString +Shelley._poolMDUrl + , ByteString _poolMDHash :: ByteString _poolMDHash :: PoolMetadata -> ByteString -Shelley._poolMDHash +Shelley._poolMDHash } = StakePoolMetadataReference :: Text -> Hash StakePoolMetadata -> StakePoolMetadataReference StakePoolMetadataReference { stakePoolMetadataURL :: Text stakePoolMetadataURL = Url -> Text Shelley.urlToText Url -_poolMDUrl +_poolMDUrl , stakePoolMetadataHash :: Hash StakePoolMetadata stakePoolMetadataHash = Hash StandardCrypto ByteString -> Hash StakePoolMetadata Hash Blake2b_256 ByteString -> Hash StakePoolMetadata @@ -1180,13 +1180,13 @@ -> ByteString -> Hash StakePoolMetadata forall a b. (a -> b) -> a -> b $ ByteString -_poolMDHash +_poolMDHash } --TODO: change the ledger rep of the DNS name to use ShortByteString - fromShelleyDnsName :: Shelley.DnsName -> ByteString - fromShelleyDnsName :: DnsName -> ByteString -fromShelleyDnsName = Text -> ByteString + fromShelleyDnsName :: Shelley.DnsName -> ByteString + fromShelleyDnsName :: DnsName -> ByteString +fromShelleyDnsName = Text -> ByteString Text.encodeUtf8 (Text -> ByteString) -> (DnsName -> Text) -> DnsName -> ByteString forall b c a. (b -> c) -> (a -> b) -> a -> c diff --git a/cardano-api/src/Cardano.Api.Crypto.Ed25519Bip32.html b/cardano-api/src/Cardano.Api.Crypto.Ed25519Bip32.html index 0a6318a1d4b..220f20ee5a9 100644 --- a/cardano-api/src/Cardano.Api.Crypto.Ed25519Bip32.html +++ b/cardano-api/src/Cardano.Api.Crypto.Ed25519Bip32.html @@ -38,7 +38,7 @@ data Ed25519Bip32DSIGN -instance DSIGNAlgorithm Ed25519Bip32DSIGN where +instance DSIGNAlgorithm Ed25519Bip32DSIGN where type SeedSizeDSIGN Ed25519Bip32DSIGN = 32 @@ -56,7 +56,7 @@ -- newtype VerKeyDSIGN Ed25519Bip32DSIGN = VerKeyEd25519Bip32DSIGN CC.XPub - deriving (Int -> VerKeyDSIGN Ed25519Bip32DSIGN -> ShowS + deriving (Int -> VerKeyDSIGN Ed25519Bip32DSIGN -> ShowS [VerKeyDSIGN Ed25519Bip32DSIGN] -> ShowS VerKeyDSIGN Ed25519Bip32DSIGN -> String (Int -> VerKeyDSIGN Ed25519Bip32DSIGN -> ShowS) @@ -71,7 +71,7 @@ $cshow :: VerKeyDSIGN Ed25519Bip32DSIGN -> String showsPrec :: Int -> VerKeyDSIGN Ed25519Bip32DSIGN -> ShowS $cshowsPrec :: Int -> VerKeyDSIGN Ed25519Bip32DSIGN -> ShowS -Show, VerKeyDSIGN Ed25519Bip32DSIGN +Show, VerKeyDSIGN Ed25519Bip32DSIGN -> VerKeyDSIGN Ed25519Bip32DSIGN -> Bool (VerKeyDSIGN Ed25519Bip32DSIGN -> VerKeyDSIGN Ed25519Bip32DSIGN -> Bool) @@ -109,14 +109,14 @@ VerKeyDSIGN Ed25519Bip32DSIGN -> Rep (VerKeyDSIGN Ed25519Bip32DSIGN) x Generic) - deriving newtype VerKeyDSIGN Ed25519Bip32DSIGN -> () + deriving newtype VerKeyDSIGN Ed25519Bip32DSIGN -> () (VerKeyDSIGN Ed25519Bip32DSIGN -> ()) -> NFData (VerKeyDSIGN Ed25519Bip32DSIGN) forall a. (a -> ()) -> NFData a rnf :: VerKeyDSIGN Ed25519Bip32DSIGN -> () $crnf :: VerKeyDSIGN Ed25519Bip32DSIGN -> () NFData - deriving Context -> VerKeyDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) + deriving Context -> VerKeyDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) -> String (Context -> VerKeyDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo)) -> (Context @@ -158,7 +158,7 @@ $cfrom :: forall x. SignKeyDSIGN Ed25519Bip32DSIGN -> Rep (SignKeyDSIGN Ed25519Bip32DSIGN) x -Generic, SignKeyDSIGN Ed25519Bip32DSIGN -> Int +Generic, SignKeyDSIGN Ed25519Bip32DSIGN -> Int SignKeyDSIGN Ed25519Bip32DSIGN -> Ptr p -> IO () SignKeyDSIGN Ed25519Bip32DSIGN -> (Ptr p -> IO a) -> IO a (SignKeyDSIGN Ed25519Bip32DSIGN -> Int) @@ -182,14 +182,14 @@ length :: SignKeyDSIGN Ed25519Bip32DSIGN -> Int $clength :: SignKeyDSIGN Ed25519Bip32DSIGN -> Int ByteArrayAccess) - deriving newtype SignKeyDSIGN Ed25519Bip32DSIGN -> () + deriving newtype SignKeyDSIGN Ed25519Bip32DSIGN -> () (SignKeyDSIGN Ed25519Bip32DSIGN -> ()) -> NFData (SignKeyDSIGN Ed25519Bip32DSIGN) forall a. (a -> ()) -> NFData a rnf :: SignKeyDSIGN Ed25519Bip32DSIGN -> () $crnf :: SignKeyDSIGN Ed25519Bip32DSIGN -> () -NFData - deriving Context -> SignKeyDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) +NFData + deriving Context -> SignKeyDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) -> String (Context -> SignKeyDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo)) -> (Context @@ -207,10 +207,10 @@ $cwNoThunks :: Context -> SignKeyDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) noThunks :: Context -> SignKeyDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) $cnoThunks :: Context -> SignKeyDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) -NoThunks via InspectHeap CC.XPrv +NoThunks via InspectHeap CC.XPrv newtype SigDSIGN Ed25519Bip32DSIGN = SigEd25519Bip32DSIGN CC.XSignature - deriving (Int -> SigDSIGN Ed25519Bip32DSIGN -> ShowS + deriving (Int -> SigDSIGN Ed25519Bip32DSIGN -> ShowS [SigDSIGN Ed25519Bip32DSIGN] -> ShowS SigDSIGN Ed25519Bip32DSIGN -> String (Int -> SigDSIGN Ed25519Bip32DSIGN -> ShowS) @@ -225,7 +225,7 @@ $cshow :: SigDSIGN Ed25519Bip32DSIGN -> String showsPrec :: Int -> SigDSIGN Ed25519Bip32DSIGN -> ShowS $cshowsPrec :: Int -> SigDSIGN Ed25519Bip32DSIGN -> ShowS -Show, SigDSIGN Ed25519Bip32DSIGN -> SigDSIGN Ed25519Bip32DSIGN -> Bool +Show, SigDSIGN Ed25519Bip32DSIGN -> SigDSIGN Ed25519Bip32DSIGN -> Bool (SigDSIGN Ed25519Bip32DSIGN -> SigDSIGN Ed25519Bip32DSIGN -> Bool) -> (SigDSIGN Ed25519Bip32DSIGN -> SigDSIGN Ed25519Bip32DSIGN -> Bool) @@ -250,7 +250,7 @@ Rep (SigDSIGN Ed25519Bip32DSIGN) x -> SigDSIGN Ed25519Bip32DSIGN $cfrom :: forall x. SigDSIGN Ed25519Bip32DSIGN -> Rep (SigDSIGN Ed25519Bip32DSIGN) x -Generic, SigDSIGN Ed25519Bip32DSIGN -> Int +Generic, SigDSIGN Ed25519Bip32DSIGN -> Int SigDSIGN Ed25519Bip32DSIGN -> Ptr p -> IO () SigDSIGN Ed25519Bip32DSIGN -> (Ptr p -> IO a) -> IO a (SigDSIGN Ed25519Bip32DSIGN -> Int) @@ -271,8 +271,8 @@ $cwithByteArray :: forall p a. SigDSIGN Ed25519Bip32DSIGN -> (Ptr p -> IO a) -> IO a length :: SigDSIGN Ed25519Bip32DSIGN -> Int $clength :: SigDSIGN Ed25519Bip32DSIGN -> Int -ByteArrayAccess) - deriving Context -> SigDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) +ByteArrayAccess) + deriving Context -> SigDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) Proxy (SigDSIGN Ed25519Bip32DSIGN) -> String (Context -> SigDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo)) -> (Context -> SigDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo)) @@ -289,19 +289,19 @@ $cwNoThunks :: Context -> SigDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) noThunks :: Context -> SigDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) $cnoThunks :: Context -> SigDSIGN Ed25519Bip32DSIGN -> IO (Maybe ThunkInfo) -NoThunks via InspectHeap CC.XSignature +NoThunks via InspectHeap CC.XSignature -- -- Metadata and basic key operations -- - algorithmNameDSIGN :: proxy Ed25519Bip32DSIGN -> String + algorithmNameDSIGN :: proxy Ed25519Bip32DSIGN -> String algorithmNameDSIGN proxy Ed25519Bip32DSIGN _ = String "ed25519_bip32" - deriveVerKeyDSIGN :: SignKeyDSIGN Ed25519Bip32DSIGN -> VerKeyDSIGN Ed25519Bip32DSIGN -deriveVerKeyDSIGN (SignKeyEd25519Bip32DSIGN sk) = + deriveVerKeyDSIGN :: SignKeyDSIGN Ed25519Bip32DSIGN -> VerKeyDSIGN Ed25519Bip32DSIGN +deriveVerKeyDSIGN (SignKeyEd25519Bip32DSIGN sk) = XPub -> VerKeyDSIGN Ed25519Bip32DSIGN VerKeyEd25519Bip32DSIGN (XPub -> VerKeyDSIGN Ed25519Bip32DSIGN) -> XPub -> VerKeyDSIGN Ed25519Bip32DSIGN @@ -309,7 +309,7 @@ $ HasCallStack => XPrv -> XPub XPrv -> XPub CC.toXPub XPrv -sk +sk -- -- Core algorithm operations @@ -317,12 +317,12 @@ type Signable Ed25519Bip32DSIGN = SignableRepresentation - signDSIGN :: ContextDSIGN Ed25519Bip32DSIGN + signDSIGN :: ContextDSIGN Ed25519Bip32DSIGN -> a -> SignKeyDSIGN Ed25519Bip32DSIGN -> SigDSIGN Ed25519Bip32DSIGN -signDSIGN () a -a (SignKeyEd25519Bip32DSIGN sk) = +signDSIGN () a +a (SignKeyEd25519Bip32DSIGN sk) = XSignature -> SigDSIGN Ed25519Bip32DSIGN SigEd25519Bip32DSIGN (XSignature -> SigDSIGN Ed25519Bip32DSIGN) -> XSignature -> SigDSIGN Ed25519Bip32DSIGN @@ -335,28 +335,28 @@ CC.sign (ScrubbedBytes forall a. Monoid a => a mempty :: ScrubbedBytes) XPrv -sk (a -> ByteString +sk (a -> ByteString forall a. SignableRepresentation a => a -> ByteString getSignableRepresentation a -a) +a) - verifyDSIGN :: ContextDSIGN Ed25519Bip32DSIGN + verifyDSIGN :: ContextDSIGN Ed25519Bip32DSIGN -> VerKeyDSIGN Ed25519Bip32DSIGN -> a -> SigDSIGN Ed25519Bip32DSIGN -> Either String () -verifyDSIGN () (VerKeyEd25519Bip32DSIGN vk) a -a (SigEd25519Bip32DSIGN sig) = +verifyDSIGN () (VerKeyEd25519Bip32DSIGN vk) a +a (SigEd25519Bip32DSIGN sig) = if XPub -> ByteString -> XSignature -> Bool forall msg. ByteArrayAccess msg => XPub -> msg -> XSignature -> Bool CC.verify XPub -vk (a -> ByteString +vk (a -> ByteString forall a. SignableRepresentation a => a -> ByteString getSignableRepresentation a -a) XSignature -sig +a) XSignature +sig then () -> Either String () forall a b. b -> Either a b Right () @@ -369,9 +369,9 @@ -- Key generation -- - genKeyDSIGN :: Seed -> SignKeyDSIGN Ed25519Bip32DSIGN -genKeyDSIGN Seed -seed = + genKeyDSIGN :: Seed -> SignKeyDSIGN Ed25519Bip32DSIGN +genKeyDSIGN Seed +seed = XPrv -> SignKeyDSIGN Ed25519Bip32DSIGN SignKeyEd25519Bip32DSIGN (XPrv -> SignKeyDSIGN Ed25519Bip32DSIGN) -> XPrv -> SignKeyDSIGN Ed25519Bip32DSIGN @@ -385,7 +385,7 @@ CC.generateNew (Seed -> ByteString getSeedBytes Seed -seed) +seed) (ScrubbedBytes forall a. Monoid a => a mempty :: ScrubbedBytes) @@ -397,22 +397,22 @@ -- raw serialise/deserialise -- - rawSerialiseVerKeyDSIGN :: VerKeyDSIGN Ed25519Bip32DSIGN -> ByteString -rawSerialiseVerKeyDSIGN (VerKeyEd25519Bip32DSIGN vk) = XPub -> ByteString + rawSerialiseVerKeyDSIGN :: VerKeyDSIGN Ed25519Bip32DSIGN -> ByteString +rawSerialiseVerKeyDSIGN (VerKeyEd25519Bip32DSIGN vk) = XPub -> ByteString CC.unXPub XPub -vk - rawSerialiseSignKeyDSIGN :: SignKeyDSIGN Ed25519Bip32DSIGN -> ByteString -rawSerialiseSignKeyDSIGN (SignKeyEd25519Bip32DSIGN sk) = XPrv -> ByteString +vk + rawSerialiseSignKeyDSIGN :: SignKeyDSIGN Ed25519Bip32DSIGN -> ByteString +rawSerialiseSignKeyDSIGN (SignKeyEd25519Bip32DSIGN sk) = XPrv -> ByteString xPrvToBytes XPrv -sk - rawSerialiseSigDSIGN :: SigDSIGN Ed25519Bip32DSIGN -> ByteString +sk + rawSerialiseSigDSIGN :: SigDSIGN Ed25519Bip32DSIGN -> ByteString rawSerialiseSigDSIGN = SigDSIGN Ed25519Bip32DSIGN -> ByteString forall bin bout. (ByteArrayAccess bin, ByteArray bout) => bin -> bout BA.convert - rawDeserialiseVerKeyDSIGN :: ByteString -> Maybe (VerKeyDSIGN Ed25519Bip32DSIGN) + rawDeserialiseVerKeyDSIGN :: ByteString -> Maybe (VerKeyDSIGN Ed25519Bip32DSIGN) rawDeserialiseVerKeyDSIGN = (String -> Maybe (VerKeyDSIGN Ed25519Bip32DSIGN)) -> (XPub -> Maybe (VerKeyDSIGN Ed25519Bip32DSIGN)) @@ -445,7 +445,7 @@ cat b c -> cat a b -> cat a c . ByteString -> Either String XPub CC.xpub - rawDeserialiseSignKeyDSIGN :: ByteString -> Maybe (SignKeyDSIGN Ed25519Bip32DSIGN) + rawDeserialiseSignKeyDSIGN :: ByteString -> Maybe (SignKeyDSIGN Ed25519Bip32DSIGN) rawDeserialiseSignKeyDSIGN = (XPrv -> SignKeyDSIGN Ed25519Bip32DSIGN) -> Maybe XPrv -> Maybe (SignKeyDSIGN Ed25519Bip32DSIGN) @@ -460,7 +460,7 @@ cat b c -> cat a b -> cat a c . ByteString -> Maybe XPrv xPrvFromBytes - rawDeserialiseSigDSIGN :: ByteString -> Maybe (SigDSIGN Ed25519Bip32DSIGN) + rawDeserialiseSigDSIGN :: ByteString -> Maybe (SigDSIGN Ed25519Bip32DSIGN) rawDeserialiseSigDSIGN = (String -> Maybe (SigDSIGN Ed25519Bip32DSIGN)) -> (XSignature -> Maybe (SigDSIGN Ed25519Bip32DSIGN)) @@ -493,67 +493,67 @@ CC.xsignature -instance Show (SignKeyDSIGN Ed25519Bip32DSIGN) where - show :: SignKeyDSIGN Ed25519Bip32DSIGN -> String -show (SignKeyEd25519Bip32DSIGN sk) = ByteString -> String +instance Show (SignKeyDSIGN Ed25519Bip32DSIGN) where + show :: SignKeyDSIGN Ed25519Bip32DSIGN -> String +show (SignKeyEd25519Bip32DSIGN sk) = ByteString -> String forall a. Show a => a -> String show (ByteString -> String) -> ByteString -> String forall a b. (a -> b) -> a -> b $ XPrv -> ByteString xPrvToBytes XPrv -sk +sk -instance ToCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) where - toCBOR :: VerKeyDSIGN Ed25519Bip32DSIGN -> Encoding +instance ToCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) where + toCBOR :: VerKeyDSIGN Ed25519Bip32DSIGN -> Encoding toCBOR = VerKeyDSIGN Ed25519Bip32DSIGN -> Encoding forall v. DSIGNAlgorithm v => VerKeyDSIGN v -> Encoding encodeVerKeyDSIGN - encodedSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) + encodedSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) -> Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) -> Size encodedSizeExpr forall t. ToCBOR t => Proxy t -> Size _ = Proxy (VerKeyDSIGN Ed25519Bip32DSIGN) -> Size forall v. DSIGNAlgorithm v => Proxy (VerKeyDSIGN v) -> Size encodedVerKeyDSIGNSizeExpr -instance FromCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) where - fromCBOR :: Decoder s (VerKeyDSIGN Ed25519Bip32DSIGN) +instance FromCBOR (VerKeyDSIGN Ed25519Bip32DSIGN) where + fromCBOR :: Decoder s (VerKeyDSIGN Ed25519Bip32DSIGN) fromCBOR = Decoder s (VerKeyDSIGN Ed25519Bip32DSIGN) forall v s. DSIGNAlgorithm v => Decoder s (VerKeyDSIGN v) decodeVerKeyDSIGN -instance ToCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) where - toCBOR :: SignKeyDSIGN Ed25519Bip32DSIGN -> Encoding -toCBOR = SignKeyDSIGN Ed25519Bip32DSIGN -> Encoding +instance ToCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) where + toCBOR :: SignKeyDSIGN Ed25519Bip32DSIGN -> Encoding +toCBOR = SignKeyDSIGN Ed25519Bip32DSIGN -> Encoding forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> Encoding encodeSignKeyDSIGN - encodedSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) + encodedSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) -> Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) -> Size -encodedSizeExpr forall t. ToCBOR t => Proxy t -> Size +encodedSizeExpr forall t. ToCBOR t => Proxy t -> Size _ = Proxy (SignKeyDSIGN Ed25519Bip32DSIGN) -> Size forall v. DSIGNAlgorithm v => Proxy (SignKeyDSIGN v) -> Size encodedSignKeyDESIGNSizeExpr -instance FromCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) where - fromCBOR :: Decoder s (SignKeyDSIGN Ed25519Bip32DSIGN) -fromCBOR = Decoder s (SignKeyDSIGN Ed25519Bip32DSIGN) +instance FromCBOR (SignKeyDSIGN Ed25519Bip32DSIGN) where + fromCBOR :: Decoder s (SignKeyDSIGN Ed25519Bip32DSIGN) +fromCBOR = Decoder s (SignKeyDSIGN Ed25519Bip32DSIGN) forall v s. DSIGNAlgorithm v => Decoder s (SignKeyDSIGN v) decodeSignKeyDSIGN -instance ToCBOR (SigDSIGN Ed25519Bip32DSIGN) where - toCBOR :: SigDSIGN Ed25519Bip32DSIGN -> Encoding -toCBOR = SigDSIGN Ed25519Bip32DSIGN -> Encoding +instance ToCBOR (SigDSIGN Ed25519Bip32DSIGN) where + toCBOR :: SigDSIGN Ed25519Bip32DSIGN -> Encoding +toCBOR = SigDSIGN Ed25519Bip32DSIGN -> Encoding forall v. DSIGNAlgorithm v => SigDSIGN v -> Encoding encodeSigDSIGN - encodedSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) + encodedSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) -> Proxy (SigDSIGN Ed25519Bip32DSIGN) -> Size -encodedSizeExpr forall t. ToCBOR t => Proxy t -> Size +encodedSizeExpr forall t. ToCBOR t => Proxy t -> Size _ = Proxy (SigDSIGN Ed25519Bip32DSIGN) -> Size forall v. DSIGNAlgorithm v => Proxy (SigDSIGN v) -> Size encodedSigDSIGNSizeExpr -instance FromCBOR (SigDSIGN Ed25519Bip32DSIGN) where - fromCBOR :: Decoder s (SigDSIGN Ed25519Bip32DSIGN) -fromCBOR = Decoder s (SigDSIGN Ed25519Bip32DSIGN) +instance FromCBOR (SigDSIGN Ed25519Bip32DSIGN) where + fromCBOR :: Decoder s (SigDSIGN Ed25519Bip32DSIGN) +fromCBOR = Decoder s (SigDSIGN Ed25519Bip32DSIGN) forall v s. DSIGNAlgorithm v => Decoder s (SigDSIGN v) decodeSigDSIGN @@ -576,28 +576,28 @@ -- xPrvToBytes :: CC.XPrv -> ByteString xPrvToBytes :: XPrv -> ByteString -xPrvToBytes XPrv -xPrv = ByteString -privateKeyBytes ByteString -> ByteString -> ByteString +xPrvToBytes XPrv +xPrv = ByteString +privateKeyBytes ByteString -> ByteString -> ByteString forall a. Semigroup a => a -> a -> a <> ByteString -chainCodeBytes +chainCodeBytes where - privateKeyBytes :: ByteString - privateKeyBytes :: ByteString -privateKeyBytes = Int -> ByteString -> ByteString + privateKeyBytes :: ByteString + privateKeyBytes :: ByteString +privateKeyBytes = Int -> ByteString -> ByteString BS.take Int 64 (XPrv -> ByteString CC.unXPrv XPrv -xPrv) +xPrv) - chainCodeBytes :: ByteString - chainCodeBytes :: ByteString -chainCodeBytes = Int -> ByteString -> ByteString + chainCodeBytes :: ByteString + chainCodeBytes :: ByteString +chainCodeBytes = Int -> ByteString -> ByteString BS.drop Int 96 (XPrv -> ByteString CC.unXPrv XPrv -xPrv) +xPrv) -- | Deserialise an 'CC.XPrv' from a 'ByteString' (96 bytes). -- @@ -617,11 +617,11 @@ -- xPrvFromBytes :: ByteString -> Maybe CC.XPrv xPrvFromBytes :: ByteString -> Maybe XPrv -xPrvFromBytes ByteString -bytes +xPrvFromBytes ByteString +bytes | ByteString -> Int BS.length ByteString -bytes Int -> Int -> Bool +bytes Int -> Int -> Bool forall a. Eq a => a -> a -> Bool /= Int 96 = Maybe XPrv @@ -629,21 +629,21 @@ Nothing | Bool otherwise = do - let (ByteString -prv, ByteString -cc) = Int -> ByteString -> (ByteString, ByteString) + let (ByteString +prv, ByteString +cc) = Int -> ByteString -> (ByteString, ByteString) BS.splitAt Int 64 ByteString -bytes - ByteString -pub <- ByteString -> Maybe ByteString -ed25519ScalarMult (Int -> ByteString -> ByteString +bytes + ByteString +pub <- ByteString -> Maybe ByteString +ed25519ScalarMult (Int -> ByteString -> ByteString BS.take Int 32 ByteString -prv) +prv) Either String XPrv -> Maybe XPrv forall a b. Either a b -> Maybe b -eitherToMaybe (Either String XPrv -> Maybe XPrv) +eitherToMaybe (Either String XPrv -> Maybe XPrv) -> Either String XPrv -> Maybe XPrv forall a b. (a -> b) -> a -> b $ ByteString -> Either String XPrv @@ -652,17 +652,17 @@ -> ByteString -> Either String XPrv forall a b. (a -> b) -> a -> b $ ByteString -prv ByteString -> ByteString -> ByteString +prv ByteString -> ByteString -> ByteString forall a. Semigroup a => a -> a -> a <> ByteString -pub ByteString -> ByteString -> ByteString +pub ByteString -> ByteString -> ByteString forall a. Semigroup a => a -> a -> a <> ByteString -cc +cc where - eitherToMaybe :: Either a b -> Maybe b - eitherToMaybe :: Either a b -> Maybe b -eitherToMaybe = (a -> Maybe b) -> (b -> Maybe b) -> Either a b -> Maybe b + eitherToMaybe :: Either a b -> Maybe b + eitherToMaybe :: Either a b -> Maybe b +eitherToMaybe = (a -> Maybe b) -> (b -> Maybe b) -> Either a b -> Maybe b forall a c b. (a -> c) -> (b -> c) -> Either a b -> c either (Maybe b -> a -> Maybe b forall a b. a -> b -> a @@ -672,14 +672,14 @@ forall a. a -> Maybe a Just - ed25519ScalarMult :: ByteString -> Maybe ByteString - ed25519ScalarMult :: ByteString -> Maybe ByteString -ed25519ScalarMult ByteString -bs = do - Scalar -scalar <- Either CryptoError Scalar -> Maybe Scalar + ed25519ScalarMult :: ByteString -> Maybe ByteString + ed25519ScalarMult :: ByteString -> Maybe ByteString +ed25519ScalarMult ByteString +bs = do + Scalar +scalar <- Either CryptoError Scalar -> Maybe Scalar forall a b. Either a b -> Maybe b -eitherToMaybe (Either CryptoError Scalar -> Maybe Scalar) +eitherToMaybe (Either CryptoError Scalar -> Maybe Scalar) -> (CryptoFailable Scalar -> Either CryptoError Scalar) -> CryptoFailable Scalar -> Maybe Scalar @@ -694,7 +694,7 @@ $ ByteString -> CryptoFailable Scalar forall bs. ByteArrayAccess bs => bs -> CryptoFailable Scalar Ed25519.scalarDecodeLong ByteString -bs +bs ByteString -> Maybe ByteString forall (f :: * -> *) a. Applicative f => a -> f a pure (ByteString -> Maybe ByteString) -> ByteString -> Maybe ByteString @@ -705,5 +705,5 @@ forall a b. (a -> b) -> a -> b $ Scalar -> Point Ed25519.toPoint Scalar -scalar +scalar \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Eras.html b/cardano-api/src/Cardano.Api.Eras.html index 2c1d1345313..d2e4db097cb 100644 --- a/cardano-api/src/Cardano.Api.Eras.html +++ b/cardano-api/src/Cardano.Api.Eras.html @@ -74,36 +74,36 @@ instance HasTypeProxy ByronEra where data AsType ByronEra = AsByronEra - proxyToAsType :: Proxy ByronEra -> AsType ByronEra + proxyToAsType :: Proxy ByronEra -> AsType ByronEra proxyToAsType Proxy ByronEra _ = AsType ByronEra AsByronEra instance HasTypeProxy ShelleyEra where data AsType ShelleyEra = AsShelleyEra - proxyToAsType :: Proxy ShelleyEra -> AsType ShelleyEra -proxyToAsType Proxy ShelleyEra + proxyToAsType :: Proxy ShelleyEra -> AsType ShelleyEra +proxyToAsType Proxy ShelleyEra _ = AsType ShelleyEra AsShelleyEra instance HasTypeProxy AllegraEra where data AsType AllegraEra = AsAllegraEra - proxyToAsType :: Proxy AllegraEra -> AsType AllegraEra -proxyToAsType Proxy AllegraEra + proxyToAsType :: Proxy AllegraEra -> AsType AllegraEra +proxyToAsType Proxy AllegraEra _ = AsType AllegraEra AsAllegraEra instance HasTypeProxy MaryEra where data AsType MaryEra = AsMaryEra - proxyToAsType :: Proxy MaryEra -> AsType MaryEra -proxyToAsType Proxy MaryEra + proxyToAsType :: Proxy MaryEra -> AsType MaryEra +proxyToAsType Proxy MaryEra _ = AsType MaryEra AsMaryEra instance HasTypeProxy AlonzoEra where data AsType AlonzoEra = AsAlonzoEra - proxyToAsType :: Proxy AlonzoEra -> AsType AlonzoEra -proxyToAsType Proxy AlonzoEra + proxyToAsType :: Proxy AlonzoEra -> AsType AlonzoEra +proxyToAsType Proxy AlonzoEra _ = AsType AlonzoEra AsAlonzoEra @@ -161,20 +161,20 @@ -- In combination this can often enable code that handles all eras, and does -- so uniformly where possible, and non-uniformly where necessary. -- -data CardanoEra era where +data CardanoEra era where ByronEra :: CardanoEra ByronEra ShelleyEra :: CardanoEra ShelleyEra AllegraEra :: CardanoEra AllegraEra MaryEra :: CardanoEra MaryEra AlonzoEra :: CardanoEra AlonzoEra -deriving instance Eq (CardanoEra era) -deriving instance Ord (CardanoEra era) -deriving instance Show (CardanoEra era) +deriving instance Eq (CardanoEra era) +deriving instance Ord (CardanoEra era) +deriving instance Show (CardanoEra era) -instance ToJSON (CardanoEra era) where - toJSON :: CardanoEra era -> Value -toJSON CardanoEra era +instance ToJSON (CardanoEra era) where + toJSON :: CardanoEra era -> Value +toJSON CardanoEra era ByronEra = Value "Byron" toJSON CardanoEra era @@ -191,7 +191,7 @@ "Alonzo" instance TestEquality CardanoEra where - testEquality :: CardanoEra a -> CardanoEra b -> Maybe (a :~: b) + testEquality :: CardanoEra a -> CardanoEra b -> Maybe (a :~: b) testEquality CardanoEra a ByronEra CardanoEra b ByronEra = (a :~: a) -> Maybe (a :~: a) @@ -238,53 +238,53 @@ -- eras, but also non-uniform by making case distinctions on the 'CardanoEra' -- constructors, or the 'CardanoEraStyle' constructors via `cardanoEraStyle`. -- -class HasTypeProxy era => IsCardanoEra era where - cardanoEra :: CardanoEra era +class HasTypeProxy era => IsCardanoEra era where + cardanoEra :: CardanoEra era instance IsCardanoEra ByronEra where - cardanoEra :: CardanoEra ByronEra -cardanoEra = CardanoEra ByronEra + cardanoEra :: CardanoEra ByronEra +cardanoEra = CardanoEra ByronEra ByronEra instance IsCardanoEra ShelleyEra where - cardanoEra :: CardanoEra ShelleyEra -cardanoEra = CardanoEra ShelleyEra + cardanoEra :: CardanoEra ShelleyEra +cardanoEra = CardanoEra ShelleyEra ShelleyEra instance IsCardanoEra AllegraEra where - cardanoEra :: CardanoEra AllegraEra -cardanoEra = CardanoEra AllegraEra + cardanoEra :: CardanoEra AllegraEra +cardanoEra = CardanoEra AllegraEra AllegraEra instance IsCardanoEra MaryEra where - cardanoEra :: CardanoEra MaryEra -cardanoEra = CardanoEra MaryEra + cardanoEra :: CardanoEra MaryEra +cardanoEra = CardanoEra MaryEra MaryEra instance IsCardanoEra AlonzoEra where - cardanoEra :: CardanoEra AlonzoEra -cardanoEra = CardanoEra AlonzoEra + cardanoEra :: CardanoEra AlonzoEra +cardanoEra = CardanoEra AlonzoEra AlonzoEra data AnyCardanoEra where - AnyCardanoEra :: IsCardanoEra era -- Provide class constraint - => CardanoEra era -- and explicit value. + AnyCardanoEra :: IsCardanoEra era -- Provide class constraint + => CardanoEra era -- and explicit value. -> AnyCardanoEra -deriving instance Show AnyCardanoEra +deriving instance Show AnyCardanoEra -instance Eq AnyCardanoEra where - AnyCardanoEra CardanoEra era -era == :: AnyCardanoEra -> AnyCardanoEra -> Bool -== AnyCardanoEra CardanoEra era -era' = +instance Eq AnyCardanoEra where + AnyCardanoEra CardanoEra era +era == :: AnyCardanoEra -> AnyCardanoEra -> Bool +== AnyCardanoEra CardanoEra era +era' = case CardanoEra era -> CardanoEra era -> Maybe (era :~: era) forall k (f :: k -> *) (a :: k) (b :: k). TestEquality f => f a -> f b -> Maybe (a :~: b) testEquality CardanoEra era -era CardanoEra era -era' of +era CardanoEra era +era' of Maybe (era :~: era) Nothing -> Bool False @@ -292,18 +292,18 @@ Refl -> Bool True -- since no constructors share types -instance ToJSON AnyCardanoEra where - toJSON :: AnyCardanoEra -> Value -toJSON (AnyCardanoEra CardanoEra era -era) = CardanoEra era -> Value +instance ToJSON AnyCardanoEra where + toJSON :: AnyCardanoEra -> Value +toJSON (AnyCardanoEra CardanoEra era +era) = CardanoEra era -> Value forall a. ToJSON a => a -> Value toJSON CardanoEra era -era +era -- | Like the 'AnyCardanoEra' constructor but does not demand a 'IsCardanoEra' -- class constraint. -- -anyCardanoEra :: CardanoEra era -> AnyCardanoEra +anyCardanoEra :: CardanoEra era -> AnyCardanoEra anyCardanoEra :: CardanoEra era -> AnyCardanoEra anyCardanoEra CardanoEra era ByronEra = CardanoEra ByronEra -> AnyCardanoEra @@ -335,11 +335,11 @@ -- us what era it is, but hides the era type. This is useful when the era is -- not statically known, for example when deserialising from a file. -- -data InAnyCardanoEra thing where - InAnyCardanoEra :: IsCardanoEra era -- Provide class constraint - => CardanoEra era -- and explicit value. - -> thing era - -> InAnyCardanoEra thing +data InAnyCardanoEra thing where + InAnyCardanoEra :: IsCardanoEra era -- Provide class constraint + => CardanoEra era -- and explicit value. + -> thing era + -> InAnyCardanoEra thing -- ---------------------------------------------------------------------------- @@ -354,56 +354,56 @@ -- can be used to constrain the era to being a Shelley-based on. It allows -- non-uniform handling making case distinctions on the constructor. -- -data ShelleyBasedEra era where +data ShelleyBasedEra era where ShelleyBasedEraShelley :: ShelleyBasedEra ShelleyEra ShelleyBasedEraAllegra :: ShelleyBasedEra AllegraEra ShelleyBasedEraMary :: ShelleyBasedEra MaryEra ShelleyBasedEraAlonzo :: ShelleyBasedEra AlonzoEra -deriving instance Eq (ShelleyBasedEra era) -deriving instance Ord (ShelleyBasedEra era) -deriving instance Show (ShelleyBasedEra era) +deriving instance Eq (ShelleyBasedEra era) +deriving instance Ord (ShelleyBasedEra era) +deriving instance Show (ShelleyBasedEra era) -- | The class of eras that are based on Shelley. This allows uniform handling -- of Shelley-based eras, but also non-uniform by making case distinctions on -- the 'ShelleyBasedEra' constructors. -- -class (IsCardanoEra era, Ledger.Crypto (ShelleyLedgerEra era) ~ StandardCrypto) - => IsShelleyBasedEra era where - shelleyBasedEra :: ShelleyBasedEra era +class (IsCardanoEra era, Ledger.Crypto (ShelleyLedgerEra era) ~ StandardCrypto) + => IsShelleyBasedEra era where + shelleyBasedEra :: ShelleyBasedEra era instance IsShelleyBasedEra ShelleyEra where - shelleyBasedEra :: ShelleyBasedEra ShelleyEra -shelleyBasedEra = ShelleyBasedEra ShelleyEra + shelleyBasedEra :: ShelleyBasedEra ShelleyEra +shelleyBasedEra = ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley instance IsShelleyBasedEra AllegraEra where - shelleyBasedEra :: ShelleyBasedEra AllegraEra -shelleyBasedEra = ShelleyBasedEra AllegraEra + shelleyBasedEra :: ShelleyBasedEra AllegraEra +shelleyBasedEra = ShelleyBasedEra AllegraEra ShelleyBasedEraAllegra instance IsShelleyBasedEra MaryEra where - shelleyBasedEra :: ShelleyBasedEra MaryEra -shelleyBasedEra = ShelleyBasedEra MaryEra + shelleyBasedEra :: ShelleyBasedEra MaryEra +shelleyBasedEra = ShelleyBasedEra MaryEra ShelleyBasedEraMary instance IsShelleyBasedEra AlonzoEra where - shelleyBasedEra :: ShelleyBasedEra AlonzoEra -shelleyBasedEra = ShelleyBasedEra AlonzoEra + shelleyBasedEra :: ShelleyBasedEra AlonzoEra +shelleyBasedEra = ShelleyBasedEra AlonzoEra ShelleyBasedEraAlonzo -- | This pairs up some era-dependent type with a 'ShelleyBasedEra' value that -- tells us what era it is, but hides the era type. This is useful when the era -- is not statically known, for example when deserialising from a file. -- -data InAnyShelleyBasedEra thing where - InAnyShelleyBasedEra :: IsShelleyBasedEra era -- Provide class constraint - => ShelleyBasedEra era -- and explicit value. - -> thing era - -> InAnyShelleyBasedEra thing +data InAnyShelleyBasedEra thing where + InAnyShelleyBasedEra :: IsShelleyBasedEra era -- Provide class constraint + => ShelleyBasedEra era -- and explicit value. + -> thing era + -> InAnyShelleyBasedEra thing -shelleyBasedToCardanoEra :: ShelleyBasedEra era -> CardanoEra era +shelleyBasedToCardanoEra :: ShelleyBasedEra era -> CardanoEra era shelleyBasedToCardanoEra :: ShelleyBasedEra era -> CardanoEra era shelleyBasedToCardanoEra ShelleyBasedEra era ShelleyBasedEraShelley = CardanoEra era @@ -435,19 +435,19 @@ -- major differences are between the Byron and Shelley-based eras, and -- the Shelley-based eras can often be treated uniformly. -- -data CardanoEraStyle era where +data CardanoEraStyle era where LegacyByronEra :: CardanoEraStyle ByronEra - ShelleyBasedEra :: IsShelleyBasedEra era -- Also provide class constraint - => ShelleyBasedEra era - -> CardanoEraStyle era + ShelleyBasedEra :: IsShelleyBasedEra era -- Also provide class constraint + => ShelleyBasedEra era + -> CardanoEraStyle era -deriving instance Eq (CardanoEraStyle era) -deriving instance Ord (CardanoEraStyle era) -deriving instance Show (CardanoEraStyle era) +deriving instance Eq (CardanoEraStyle era) +deriving instance Ord (CardanoEraStyle era) +deriving instance Show (CardanoEraStyle era) -- | The 'CardanoEraStyle' for a 'CardanoEra'. -- -cardanoEraStyle :: CardanoEra era -> CardanoEraStyle era +cardanoEraStyle :: CardanoEra era -> CardanoEraStyle era cardanoEraStyle :: CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era ByronEra = CardanoEraStyle era @@ -494,7 +494,7 @@ -- ledger library which allows writing conversion functions in a more generic -- way. -- -type family ShelleyLedgerEra era where +type family ShelleyLedgerEra era where ShelleyLedgerEra ShelleyEra = Ledger.StandardShelley ShelleyLedgerEra AllegraEra = Ledger.StandardAllegra diff --git a/cardano-api/src/Cardano.Api.Error.html b/cardano-api/src/Cardano.Api.Error.html index 83a349a5787..fa909a34604 100644 --- a/cardano-api/src/Cardano.Api.Error.html +++ b/cardano-api/src/Cardano.Api.Error.html @@ -16,50 +16,50 @@ import System.IO (Handle) -class Show e => Error e where +class Show e => Error e where - displayError :: e -> String + displayError :: e -> String instance Error () where - displayError :: () -> String -displayError () = String + displayError :: () -> String +displayError () = String "" -- | The preferred approach is to use 'Except' or 'ExceptT', but you can if -- necessary use IO exceptions. -- -throwErrorAsException :: Error e => e -> IO a +throwErrorAsException :: Error e => e -> IO a throwErrorAsException :: e -> IO a -throwErrorAsException e -e = ErrorAsException -> IO a +throwErrorAsException e +e = ErrorAsException -> IO a forall e a. Exception e => e -> IO a throwIO (e -> ErrorAsException forall e. Error e => e -> ErrorAsException ErrorAsException e -e) +e) data ErrorAsException where - ErrorAsException :: Error e => e -> ErrorAsException + ErrorAsException :: Error e => e -> ErrorAsException -instance Show ErrorAsException where - show :: ErrorAsException -> String -show (ErrorAsException e -e) = e -> String +instance Show ErrorAsException where + show :: ErrorAsException -> String +show (ErrorAsException e +e) = e -> String forall a. Show a => a -> String show e -e +e -instance Exception ErrorAsException where - displayException :: ErrorAsException -> String -displayException (ErrorAsException e -e) = e -> String +instance Exception ErrorAsException where + displayException :: ErrorAsException -> String +displayException (ErrorAsException e +e) = e -> String forall e. Error e => e -> String displayError e -e +e -data FileError e = FileError FilePath e +data FileError e = FileError FilePath e | FileErrorTempFile FilePath -- ^ Target path @@ -67,7 +67,7 @@ -- ^ Temporary path Handle | FileIOError FilePath IOException - deriving Int -> FileError e -> ShowS + deriving Int -> FileError e -> ShowS [FileError e] -> ShowS FileError e -> String (Int -> FileError e -> ShowS) @@ -87,17 +87,17 @@ $cshowsPrec :: forall e. Show e => Int -> FileError e -> ShowS Show -instance Error e => Error (FileError e) where - displayError :: FileError e -> String -displayError (FileErrorTempFile String -targetPath String -tempPath Handle -h)= +instance Error e => Error (FileError e) where + displayError :: FileError e -> String +displayError (FileErrorTempFile String +targetPath String +tempPath Handle +h)= String "Error creating temporary file at: " String -> ShowS forall a. [a] -> [a] -> [a] ++ String -tempPath String -> ShowS +tempPath String -> ShowS forall a. [a] -> [a] -> [a] ++ String @@ -107,7 +107,7 @@ "Target path: " String -> ShowS forall a. [a] -> [a] -> [a] ++ String -targetPath String -> ShowS +targetPath String -> ShowS forall a. [a] -> [a] -> [a] ++ String @@ -119,12 +119,12 @@ ++ Handle -> String forall a. Show a => a -> String show Handle -h - displayError (FileIOError String -path IOException -ioe) = +h + displayError (FileIOError String +path IOException +ioe) = String -path String -> ShowS +path String -> ShowS forall a. [a] -> [a] -> [a] ++ String ": " String -> ShowS @@ -132,12 +132,12 @@ ++ IOException -> String forall e. Exception e => e -> String displayException IOException -ioe - displayError (FileError String -path e -e) = +ioe + displayError (FileError String +path e +e) = String -path String -> ShowS +path String -> ShowS forall a. [a] -> [a] -> [a] ++ String ": " String -> ShowS @@ -145,7 +145,7 @@ ++ e -> String forall e. Error e => e -> String displayError e -e +e \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Fees.html b/cardano-api/src/Cardano.Api.Fees.html index 0a94a78b1fb..a41b2d4bf95 100644 --- a/cardano-api/src/Cardano.Api.Fees.html +++ b/cardano-api/src/Cardano.Api.Fees.html @@ -36,45 +36,45 @@ -- This function is simple, but if you are doing input selection then you -- probably want to consider estimateTransactionFee. -- -transactionFee :: forall era. - IsShelleyBasedEra era +transactionFee :: forall era. + IsShelleyBasedEra era => Natural -- ^ The fixed tx fee -> Natural -- ^ The tx fee per byte - -> Tx era + -> Tx era -> Lovelace transactionFee :: Natural -> Natural -> Tx era -> Lovelace -transactionFee Natural -txFeeFixed Natural -txFeePerByte Tx era -tx = - let a :: Integer -a = Natural -> Integer +transactionFee Natural +txFeeFixed Natural +txFeePerByte Tx era +tx = + let a :: Integer +a = Natural -> Integer forall a. Integral a => a -> Integer toInteger Natural -txFeePerByte - b :: Integer -b = Natural -> Integer +txFeePerByte + b :: Integer +b = Natural -> Integer forall a. Integral a => a -> Integer toInteger Natural -txFeeFixed +txFeeFixed in case Tx era -tx of +tx of ShelleyTx ShelleyBasedEra era -_ Tx (ShelleyLedgerEra era) -tx' -> let x :: Integer -x = Tx (ShelleyLedgerEra era) -> Integer +_ Tx (ShelleyLedgerEra era) +tx' -> let x :: Integer +x = Tx (ShelleyLedgerEra era) -> Integer forall k (x :: k) r a. HasField x r a => r -> a getField @"txsize" Tx (ShelleyLedgerEra era) -tx' +tx' in Integer -> Lovelace Lovelace (Integer -a Integer -> Integer -> Integer +a Integer -> Integer -> Integer forall a. Num a => a -> a -> a * Integer -x Integer -> Integer -> Integer +x Integer -> Integer -> Integer forall a. Num a => a -> a -> a + Integer -b) +b) --TODO: This can be made to work for Byron txs too. Do that: fill in this case -- and remove the IsShelleyBasedEra constraint. ByronTx ATxAux ByteString @@ -94,12 +94,12 @@ -- contain all the things not subject to coin selection (such as script inputs, -- metadata, withdrawals, certs etc) -- -estimateTransactionFee :: forall era. - IsShelleyBasedEra era +estimateTransactionFee :: forall era. + IsShelleyBasedEra era => NetworkId -> Natural -- ^ The fixed tx fee -> Natural -- ^ The tx fee per byte - -> Tx era + -> Tx era -> Int -- ^ The number of extra UTxO transaction inputs -> Int -- ^ The number of extra transaction outputs -> Int -- ^ The number of extra Shelley key witnesses @@ -114,194 +114,194 @@ -> Int -> Int -> Lovelace -estimateTransactionFee NetworkId -nw Natural -txFeeFixed Natural -txFeePerByte (ShelleyTx ShelleyBasedEra era -era Tx (ShelleyLedgerEra era) -tx) = - let Lovelace Integer -baseFee = Natural -> Natural -> Tx era -> Lovelace +estimateTransactionFee NetworkId +nw Natural +txFeeFixed Natural +txFeePerByte (ShelleyTx ShelleyBasedEra era +era Tx (ShelleyLedgerEra era) +tx) = + let Lovelace Integer +baseFee = Natural -> Natural -> Tx era -> Lovelace forall era. IsShelleyBasedEra era => Natural -> Natural -> Tx era -> Lovelace transactionFee Natural -txFeeFixed Natural -txFeePerByte (ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era +txFeeFixed Natural +txFeePerByte (ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era forall era. ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era ShelleyTx ShelleyBasedEra era -era Tx (ShelleyLedgerEra era) -tx) - in \Int -nInputs Int -nOutputs Int -nShelleyKeyWitnesses Int -nByronKeyWitnesses -> +era Tx (ShelleyLedgerEra era) +tx) + in \Int +nInputs Int +nOutputs Int +nShelleyKeyWitnesses Int +nByronKeyWitnesses -> --TODO: this is fragile. Move something like this to the ledger and -- make it robust, based on the txsize calculation. - let extraBytes :: Int - extraBytes :: Int -extraBytes = Int -nInputs Int -> Int -> Int + let extraBytes :: Int + extraBytes :: Int +extraBytes = Int +nInputs Int -> Int -> Int forall a. Num a => a -> a -> a * Int -sizeInput +sizeInput Int -> Int -> Int forall a. Num a => a -> a -> a + Int -nOutputs Int -> Int -> Int +nOutputs Int -> Int -> Int forall a. Num a => a -> a -> a * Int -sizeOutput +sizeOutput Int -> Int -> Int forall a. Num a => a -> a -> a + Int -nByronKeyWitnesses Int -> Int -> Int +nByronKeyWitnesses Int -> Int -> Int forall a. Num a => a -> a -> a * Int -sizeByronKeyWitnesses +sizeByronKeyWitnesses Int -> Int -> Int forall a. Num a => a -> a -> a + Int -nShelleyKeyWitnesses Int -> Int -> Int +nShelleyKeyWitnesses Int -> Int -> Int forall a. Num a => a -> a -> a * Int -sizeShelleyKeyWitnesses +sizeShelleyKeyWitnesses in Integer -> Lovelace Lovelace (Integer -baseFee Integer -> Integer -> Integer +baseFee Integer -> Integer -> Integer forall a. Num a => a -> a -> a + Natural -> Integer forall a. Integral a => a -> Integer toInteger Natural -txFeePerByte Integer -> Integer -> Integer +txFeePerByte Integer -> Integer -> Integer forall a. Num a => a -> a -> a * Int -> Integer forall a. Integral a => a -> Integer toInteger Int -extraBytes) +extraBytes) where - sizeInput :: Int -sizeInput = Int -smallArray Int -> Int -> Int + sizeInput :: Int +sizeInput = Int +smallArray Int -> Int -> Int forall a. Num a => a -> a -> a + Int -uint Int -> Int -> Int +uint Int -> Int -> Int forall a. Num a => a -> a -> a + Int -hashObj - sizeOutput :: Int -sizeOutput = Int -smallArray Int -> Int -> Int +hashObj + sizeOutput :: Int +sizeOutput = Int +smallArray Int -> Int -> Int forall a. Num a => a -> a -> a + Int -uint Int -> Int -> Int +uint Int -> Int -> Int forall a. Num a => a -> a -> a + Int -address - sizeByronKeyWitnesses :: Int -sizeByronKeyWitnesses = Int -smallArray Int -> Int -> Int +address + sizeByronKeyWitnesses :: Int +sizeByronKeyWitnesses = Int +smallArray Int -> Int -> Int forall a. Num a => a -> a -> a + Int -keyObj Int -> Int -> Int +keyObj Int -> Int -> Int forall a. Num a => a -> a -> a + Int -sigObj Int -> Int -> Int +sigObj Int -> Int -> Int forall a. Num a => a -> a -> a + Int -ccodeObj Int -> Int -> Int +ccodeObj Int -> Int -> Int forall a. Num a => a -> a -> a + Int -attrsObj - sizeShelleyKeyWitnesses :: Int -sizeShelleyKeyWitnesses = Int -smallArray Int -> Int -> Int +attrsObj + sizeShelleyKeyWitnesses :: Int +sizeShelleyKeyWitnesses = Int +smallArray Int -> Int -> Int forall a. Num a => a -> a -> a + Int -keyObj Int -> Int -> Int +keyObj Int -> Int -> Int forall a. Num a => a -> a -> a + Int -sigObj +sigObj - smallArray :: Int -smallArray = Int + smallArray :: Int +smallArray = Int 1 - uint :: Int -uint = Int + uint :: Int +uint = Int 5 - hashObj :: Int -hashObj = Int + hashObj :: Int +hashObj = Int 2 Int -> Int -> Int forall a. Num a => a -> a -> a + Int -hashLen - hashLen :: Int -hashLen = Int +hashLen + hashLen :: Int +hashLen = Int 32 - keyObj :: Int -keyObj = Int + keyObj :: Int +keyObj = Int 2 Int -> Int -> Int forall a. Num a => a -> a -> a + Int -keyLen - keyLen :: Int -keyLen = Int +keyLen + keyLen :: Int +keyLen = Int 32 - sigObj :: Int -sigObj = Int + sigObj :: Int +sigObj = Int 2 Int -> Int -> Int forall a. Num a => a -> a -> a + Int -sigLen - sigLen :: Int -sigLen = Int +sigLen + sigLen :: Int +sigLen = Int 64 - ccodeObj :: Int -ccodeObj = Int + ccodeObj :: Int +ccodeObj = Int 2 Int -> Int -> Int forall a. Num a => a -> a -> a + Int -ccodeLen - ccodeLen :: Int -ccodeLen = Int +ccodeLen + ccodeLen :: Int +ccodeLen = Int 32 - address :: Int -address = Int + address :: Int +address = Int 2 Int -> Int -> Int forall a. Num a => a -> a -> a + Int -addrHeader Int -> Int -> Int +addrHeader Int -> Int -> Int forall a. Num a => a -> a -> a + Int 2 Int -> Int -> Int forall a. Num a => a -> a -> a * Int -addrHashLen - addrHeader :: Int -addrHeader = Int +addrHashLen + addrHeader :: Int +addrHeader = Int 1 - addrHashLen :: Int -addrHashLen = Int + addrHashLen :: Int +addrHashLen = Int 28 - attrsObj :: Int -attrsObj = Int + attrsObj :: Int +attrsObj = Int 2 Int -> Int -> Int forall a. Num a => a -> a -> a + ByteString -> Int BS.length ByteString -attributes - attributes :: ByteString -attributes = Attributes AddrAttributes -> ByteString +attributes + attributes :: ByteString +attributes = Attributes AddrAttributes -> ByteString forall a. ToCBOR a => a -> ByteString CBOR.serialize' (Attributes AddrAttributes -> ByteString) -> Attributes AddrAttributes -> ByteString @@ -312,13 +312,13 @@ Byron.mkAttributes AddrAttributes :: Maybe HDAddressPayload -> NetworkMagic -> AddrAttributes Byron.AddrAttributes { aaVKDerivationPath :: Maybe HDAddressPayload -Byron.aaVKDerivationPath = Maybe HDAddressPayload +Byron.aaVKDerivationPath = Maybe HDAddressPayload forall a. Maybe a Nothing, aaNetworkMagic :: NetworkMagic -Byron.aaNetworkMagic = NetworkId -> NetworkMagic +Byron.aaNetworkMagic = NetworkId -> NetworkMagic toByronNetworkMagic NetworkId -nw +nw } --TODO: This can be made to work for Byron txs too. Do that: fill in this case @@ -330,6 +330,6 @@ _) = case ShelleyBasedEra era forall era. IsShelleyBasedEra era => ShelleyBasedEra era -shelleyBasedEra :: ShelleyBasedEra era of {} +shelleyBasedEra :: ShelleyBasedEra era of {} \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.GenesisParameters.html b/cardano-api/src/Cardano.Api.GenesisParameters.html index 2f4ef19f141..8a8d4837955 100644 --- a/cardano-api/src/Cardano.Api.GenesisParameters.html +++ b/cardano-api/src/Cardano.Api.GenesisParameters.html @@ -111,55 +111,55 @@ -- Conversion functions -- -fromShelleyGenesis :: Shelley.ShelleyGenesis era -> GenesisParameters +fromShelleyGenesis :: Shelley.ShelleyGenesis era -> GenesisParameters fromShelleyGenesis :: ShelleyGenesis era -> GenesisParameters fromShelleyGenesis Shelley.ShelleyGenesis { - UTCTime + UTCTime sgSystemStart :: forall era. ShelleyGenesis era -> UTCTime sgSystemStart :: UTCTime Shelley.sgSystemStart - , Word32 + , Word32 sgNetworkMagic :: forall era. ShelleyGenesis era -> Word32 sgNetworkMagic :: Word32 Shelley.sgNetworkMagic - , Network + , Network sgNetworkId :: forall era. ShelleyGenesis era -> Network sgNetworkId :: Network Shelley.sgNetworkId - , Rational + , Rational sgActiveSlotsCoeff :: forall era. ShelleyGenesis era -> Rational sgActiveSlotsCoeff :: Rational Shelley.sgActiveSlotsCoeff - , Word64 + , Word64 sgSecurityParam :: forall era. ShelleyGenesis era -> Word64 sgSecurityParam :: Word64 Shelley.sgSecurityParam - , EpochSize + , EpochSize sgEpochLength :: forall era. ShelleyGenesis era -> EpochSize sgEpochLength :: EpochSize Shelley.sgEpochLength - , Word64 + , Word64 sgSlotsPerKESPeriod :: forall era. ShelleyGenesis era -> Word64 sgSlotsPerKESPeriod :: Word64 Shelley.sgSlotsPerKESPeriod - , Word64 + , Word64 sgMaxKESEvolutions :: forall era. ShelleyGenesis era -> Word64 sgMaxKESEvolutions :: Word64 Shelley.sgMaxKESEvolutions - , NominalDiffTime + , NominalDiffTime sgSlotLength :: forall era. ShelleyGenesis era -> NominalDiffTime sgSlotLength :: NominalDiffTime Shelley.sgSlotLength - , Word64 + , Word64 sgUpdateQuorum :: forall era. ShelleyGenesis era -> Word64 sgUpdateQuorum :: Word64 Shelley.sgUpdateQuorum - , Word64 + , Word64 sgMaxLovelaceSupply :: forall era. ShelleyGenesis era -> Word64 sgMaxLovelaceSupply :: Word64 Shelley.sgMaxLovelaceSupply - , PParams era + , PParams era sgProtocolParams :: forall era. ShelleyGenesis era -> PParams era sgProtocolParams :: PParams era Shelley.sgProtocolParams @@ -191,56 +191,56 @@ GenesisParameters { protocolParamSystemStart :: UTCTime protocolParamSystemStart = UTCTime -sgSystemStart +sgSystemStart , protocolParamNetworkId :: NetworkId protocolParamNetworkId = Network -> NetworkMagic -> NetworkId fromShelleyNetwork Network -sgNetworkId +sgNetworkId (Word32 -> NetworkMagic NetworkMagic Word32 -sgNetworkMagic) +sgNetworkMagic) , protocolParamActiveSlotsCoefficient :: Rational protocolParamActiveSlotsCoefficient = Rational -sgActiveSlotsCoeff +sgActiveSlotsCoeff , protocolParamSecurity :: Int protocolParamSecurity = Word64 -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Word64 -sgSecurityParam +sgSecurityParam , protocolParamEpochLength :: EpochSize protocolParamEpochLength = EpochSize -sgEpochLength +sgEpochLength , protocolParamSlotLength :: NominalDiffTime protocolParamSlotLength = NominalDiffTime -sgSlotLength +sgSlotLength , protocolParamSlotsPerKESPeriod :: Int protocolParamSlotsPerKESPeriod = Word64 -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Word64 -sgSlotsPerKESPeriod +sgSlotsPerKESPeriod , protocolParamMaxKESEvolutions :: Int protocolParamMaxKESEvolutions = Word64 -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Word64 -sgMaxKESEvolutions +sgMaxKESEvolutions , protocolParamUpdateQuorum :: Int protocolParamUpdateQuorum = Word64 -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Word64 -sgUpdateQuorum +sgUpdateQuorum , protocolParamMaxLovelaceSupply :: Lovelace protocolParamMaxLovelaceSupply = Integer -> Lovelace Lovelace (Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral Word64 -sgMaxLovelaceSupply) +sgMaxLovelaceSupply) , protocolInitialUpdateableProtocolParameters :: ProtocolParameters protocolInitialUpdateableProtocolParameters = PParams era -> ProtocolParameters forall ledgerera. PParams ledgerera -> ProtocolParameters fromShelleyPParams PParams era -sgProtocolParams +sgProtocolParams } \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.HasTypeProxy.html b/cardano-api/src/Cardano.Api.HasTypeProxy.html index 74a7dc6f68b..22c03d8bbf3 100644 --- a/cardano-api/src/Cardano.Api.HasTypeProxy.html +++ b/cardano-api/src/Cardano.Api.HasTypeProxy.html @@ -12,18 +12,18 @@ import Data.Kind (Type, Constraint) -class HasTypeProxy t where +class HasTypeProxy t where -- | A family of singleton types used in this API to indicate which type to -- use where it would otherwise be ambiguous or merely unclear. -- -- Values of this type are passed to deserialisation functions for example. -- - data AsType t + data AsType t - proxyToAsType :: Proxy t -> AsType t + proxyToAsType :: Proxy t -> AsType t -data FromSomeType (c :: Type -> Constraint) b where - FromSomeType :: c a => AsType a -> (a -> b) -> FromSomeType c b +data FromSomeType (c :: Type -> Constraint) b where + FromSomeType :: c a => AsType a -> (a -> b) -> FromSomeType c b \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Hash.html b/cardano-api/src/Cardano.Api.Hash.html index f3bd01b4fb3..177c729ff42 100644 --- a/cardano-api/src/Cardano.Api.Hash.html +++ b/cardano-api/src/Cardano.Api.Hash.html @@ -12,23 +12,23 @@ import Cardano.Api.HasTypeProxy -data family Hash keyrole :: Type +data family Hash keyrole :: Type -class CastHash roleA roleB where +class CastHash roleA roleB where - castHash :: Hash roleA -> Hash roleB + castHash :: Hash roleA -> Hash roleB -instance HasTypeProxy a => HasTypeProxy (Hash a) where - data AsType (Hash a) = AsHash (AsType a) - proxyToAsType :: Proxy (Hash a) -> AsType (Hash a) +instance HasTypeProxy a => HasTypeProxy (Hash a) where + data AsType (Hash a) = AsHash (AsType a) + proxyToAsType :: Proxy (Hash a) -> AsType (Hash a) proxyToAsType Proxy (Hash a) _ = AsType a -> AsType (Hash a) forall a. AsType a -> AsType (Hash a) AsHash (Proxy a -> AsType a forall t. HasTypeProxy t => Proxy t -> AsType t -proxyToAsType (forall a. Proxy a +proxyToAsType (forall a. Proxy a forall k (t :: k). Proxy t -Proxy :: Proxy a)) +Proxy :: Proxy a)) \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.IPC.html b/cardano-api/src/Cardano.Api.IPC.html index ba513cbf55f..3c61020e7f6 100644 --- a/cardano-api/src/Cardano.Api.IPC.html +++ b/cardano-api/src/Cardano.Api.IPC.html @@ -120,63 +120,63 @@ -- to\/from the types used by the underlying wire formats is handled by -- 'connectToLocalNode'. -- -data LocalNodeClientProtocols block point tip tx txerr query m = +data LocalNodeClientProtocols block point tip tx txerr query m = LocalNodeClientProtocols { LocalNodeClientProtocols block point tip tx txerr query m -> LocalChainSyncClient block point tip m localChainSyncClient - :: LocalChainSyncClient block point tip m + :: LocalChainSyncClient block point tip m , LocalNodeClientProtocols block point tip tx txerr query m -> Maybe (LocalTxSubmissionClient tx txerr m ()) localTxSubmissionClient - :: Maybe (LocalTxSubmissionClient tx txerr m ()) + :: Maybe (LocalTxSubmissionClient tx txerr m ()) , LocalNodeClientProtocols block point tip tx txerr query m -> Maybe (LocalStateQueryClient block point query m ()) localStateQueryClient - :: Maybe (LocalStateQueryClient block point query m ()) + :: Maybe (LocalStateQueryClient block point query m ()) } -data LocalChainSyncClient block point tip m +data LocalChainSyncClient block point tip m = NoLocalChainSyncClient - | LocalChainSyncClientPipelined (ChainSyncClientPipelined block point tip m ()) - | LocalChainSyncClient (ChainSyncClient block point tip m ()) + | LocalChainSyncClientPipelined (ChainSyncClientPipelined block point tip m ()) + | LocalChainSyncClient (ChainSyncClient block point tip m ()) -- public, exported -type LocalNodeClientProtocolsInMode mode = +type LocalNodeClientProtocolsInMode mode = LocalNodeClientProtocols - (BlockInMode mode) + (BlockInMode mode) ChainPoint ChainTip - (TxInMode mode) - (TxValidationErrorInMode mode) - (QueryInMode mode) + (TxInMode mode) + (TxValidationErrorInMode mode) + (QueryInMode mode) IO -data LocalNodeConnectInfo mode = +data LocalNodeConnectInfo mode = LocalNodeConnectInfo { LocalNodeConnectInfo mode -> ConsensusModeParams mode -localConsensusModeParams :: ConsensusModeParams mode, +localConsensusModeParams :: ConsensusModeParams mode, LocalNodeConnectInfo mode -> NetworkId localNodeNetworkId :: NetworkId, LocalNodeConnectInfo mode -> FilePath localNodeSocketPath :: FilePath } -localConsensusMode :: LocalNodeConnectInfo mode -> ConsensusMode mode +localConsensusMode :: LocalNodeConnectInfo mode -> ConsensusMode mode localConsensusMode :: LocalNodeConnectInfo mode -> ConsensusMode mode -localConsensusMode LocalNodeConnectInfo {ConsensusModeParams mode +localConsensusMode LocalNodeConnectInfo {ConsensusModeParams mode localConsensusModeParams :: ConsensusModeParams mode localConsensusModeParams :: forall mode. LocalNodeConnectInfo mode -> ConsensusModeParams mode -localConsensusModeParams} = +localConsensusModeParams} = ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -localConsensusModeParams +localConsensusModeParams -consensusModeOnly :: ConsensusModeParams mode - -> ConsensusMode mode +consensusModeOnly :: ConsensusModeParams mode + -> ConsensusMode mode consensusModeOnly :: ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ByronModeParams{} = ConsensusMode mode ConsensusMode ByronMode @@ -196,32 +196,32 @@ -- | Establish a connection to a local node and execute the given set of -- protocol handlers. -- -connectToLocalNode :: LocalNodeConnectInfo mode - -> LocalNodeClientProtocolsInMode mode +connectToLocalNode :: LocalNodeConnectInfo mode + -> LocalNodeClientProtocolsInMode mode -> IO () connectToLocalNode :: LocalNodeConnectInfo mode -> LocalNodeClientProtocolsInMode mode -> IO () connectToLocalNode LocalNodeConnectInfo { - FilePath + FilePath localNodeSocketPath :: FilePath localNodeSocketPath :: forall mode. LocalNodeConnectInfo mode -> FilePath -localNodeSocketPath, - NetworkId +localNodeSocketPath, + NetworkId localNodeNetworkId :: NetworkId localNodeNetworkId :: forall mode. LocalNodeConnectInfo mode -> NetworkId -localNodeNetworkId, - ConsensusModeParams mode +localNodeNetworkId, + ConsensusModeParams mode localConsensusModeParams :: ConsensusModeParams mode localConsensusModeParams :: forall mode. LocalNodeConnectInfo mode -> ConsensusModeParams mode -localConsensusModeParams - } LocalNodeClientProtocolsInMode mode -clients = +localConsensusModeParams + } LocalNodeClientProtocolsInMode mode +clients = (IOManager -> IO ()) -> IO () WithIOManager Net.withIOManager ((IOManager -> IO ()) -> IO ()) -> (IOManager -> IO ()) -> IO () forall a b. (a -> b) -> a -> b -$ \IOManager -iomgr -> +$ \IOManager +iomgr -> LocalSnocket -> NetworkConnectTracers LocalAddress NodeToClientVersion -> Versions @@ -244,8 +244,8 @@ Net.connectTo (IOManager -> FilePath -> LocalSnocket Net.localSnocket IOManager -iomgr FilePath -localNodeSocketPath) +iomgr FilePath +localNodeSocketPath) NetworkConnectTracers :: forall addr vNumber. Tracer IO (WithMuxBearer (ConnectionId addr) MuxTrace) -> Tracer @@ -276,16 +276,16 @@ NodeToClientVersionData (OuroborosApplication 'InitiatorMode LocalAddress ByteString IO () Void) -versionedProtocls +versionedProtocls FilePath -localNodeSocketPath +localNodeSocketPath where - versionedProtocls :: Versions + versionedProtocls :: Versions NodeToClientVersion NodeToClientVersionData (OuroborosApplication 'InitiatorMode LocalAddress ByteString IO () Void) -versionedProtocls = +versionedProtocls = -- First convert from the mode-parametrised view of things to the -- block-parametrised view and then do the final setup for the versioned -- bundles of mini-protocols. @@ -296,11 +296,11 @@ ConsensusModeParams mode -> LocalNodeClientProtocolsInMode mode -> LocalNodeClientParams mkLocalNodeClientParams ConsensusModeParams mode -localConsensusModeParams LocalNodeClientProtocolsInMode mode -clients of - LocalNodeClientParams ProtocolClientInfoArgs block -ptcl LocalNodeClientProtocolsForBlock block -clients' -> +localConsensusModeParams LocalNodeClientProtocolsInMode mode +clients of + LocalNodeClientParams ProtocolClientInfoArgs block +ptcl LocalNodeClientProtocolsForBlock block +clients' -> NetworkId -> ProtocolClientInfoArgs block -> LocalNodeClientProtocolsForBlock block @@ -320,18 +320,18 @@ (OuroborosApplication 'InitiatorMode LocalAddress ByteString IO () Void) mkVersionedProtocols NetworkId -localNodeNetworkId ProtocolClientInfoArgs block -ptcl LocalNodeClientProtocolsForBlock block -clients' +localNodeNetworkId ProtocolClientInfoArgs block +ptcl LocalNodeClientProtocolsForBlock block +clients' -mkVersionedProtocols :: forall block. - ( Consensus.ShowQuery (Consensus.Query block), - ProtocolClient block +mkVersionedProtocols :: forall block. + ( Consensus.ShowQuery (Consensus.Query block), + ProtocolClient block ) => NetworkId - -> ProtocolClientInfoArgs block - -> LocalNodeClientProtocolsForBlock block + -> ProtocolClientInfoArgs block + -> LocalNodeClientProtocolsForBlock block -> Net.Versions Net.NodeToClientVersion Net.NodeToClientVersionData @@ -347,17 +347,17 @@ NodeToClientVersionData (OuroborosApplication 'InitiatorMode LocalAddress ByteString IO () Void) -mkVersionedProtocols NetworkId -networkid ProtocolClientInfoArgs block -ptcl +mkVersionedProtocols NetworkId +networkid ProtocolClientInfoArgs block +ptcl LocalNodeClientProtocolsForBlock { - LocalChainSyncClient block (Point block) (Tip block) IO + LocalChainSyncClient block (Point block) (Tip block) IO localChainSyncClientForBlock :: forall block. LocalNodeClientProtocolsForBlock block -> LocalChainSyncClient block (Point block) (Tip block) IO localChainSyncClientForBlock :: LocalChainSyncClient block (Point block) (Tip block) IO localChainSyncClientForBlock, - Maybe + Maybe (LocalTxSubmissionClient (GenTx block) (ApplyTxErr block) IO ()) localTxSubmissionClientForBlock :: forall block. LocalNodeClientProtocolsForBlock block @@ -366,7 +366,7 @@ localTxSubmissionClientForBlock :: Maybe (LocalTxSubmissionClient (GenTx block) (ApplyTxErr block) IO ()) localTxSubmissionClientForBlock, - Maybe + Maybe (LocalStateQueryClient block (Point block) (Query block) IO ()) localStateQueryClientForBlock :: forall block. LocalNodeClientProtocolsForBlock block @@ -395,9 +395,9 @@ (Ord vNum, Foldable f, HasCallStack) => (x -> Versions vNum extra r) -> f x -> Versions vNum extra r Net.foldMapVersions - (\(NodeToClientVersion -ptclVersion, BlockNodeToClientVersion block -ptclBlockVersion) -> + (\(NodeToClientVersion +ptclVersion, BlockNodeToClientVersion block +ptclBlockVersion) -> NodeToClientVersion -> NodeToClientVersionData -> (ConnectionId LocalAddress @@ -420,22 +420,22 @@ (OuroborosApplication appType LocalAddress bytes m a b) Net.versionedNodeToClientProtocols NodeToClientVersion -ptclVersion +ptclVersion NodeToClientVersionData :: NetworkMagic -> NodeToClientVersionData NodeToClientVersionData { networkMagic :: NetworkMagic networkMagic = NetworkId -> NetworkMagic toNetworkMagic NetworkId -networkid +networkid } - (\ConnectionId LocalAddress -_connid STM IO ControlMessage -_ctl -> BlockNodeToClientVersion block + (\ConnectionId LocalAddress +_connid STM IO ControlMessage +_ctl -> BlockNodeToClientVersion block -> NodeToClientVersion -> NodeToClientProtocols 'InitiatorMode ByteString IO () Void -protocols BlockNodeToClientVersion block -ptclBlockVersion NodeToClientVersion -ptclVersion)) +protocols BlockNodeToClientVersion block +ptclBlockVersion NodeToClientVersion +ptclVersion)) (Map NodeToClientVersion (BlockNodeToClientVersion block) -> [(NodeToClientVersion, BlockNodeToClientVersion block)] forall k a. Map k a -> [(k, a)] @@ -445,23 +445,23 @@ SupportedNetworkProtocolVersion blk => Proxy blk -> Map NodeToClientVersion (BlockNodeToClientVersion blk) Consensus.supportedNodeToClientVersions Proxy block -proxy)) +proxy)) where - proxy :: Proxy block - proxy :: Proxy block -proxy = Proxy block + proxy :: Proxy block + proxy :: Proxy block +proxy = Proxy block forall k (t :: k). Proxy t Proxy - protocols :: Consensus.BlockNodeToClientVersion block + protocols :: Consensus.BlockNodeToClientVersion block -> Consensus.NodeToClientVersion -> NodeToClientProtocols Net.InitiatorMode LBS.ByteString IO () Void - protocols :: BlockNodeToClientVersion block + protocols :: BlockNodeToClientVersion block -> NodeToClientVersion -> NodeToClientProtocols 'InitiatorMode ByteString IO () Void -protocols BlockNodeToClientVersion block -ptclBlockVersion NodeToClientVersion -ptclVersion = +protocols BlockNodeToClientVersion block +ptclBlockVersion NodeToClientVersion +ptclVersion = NodeToClientProtocols :: forall (appType :: MuxMode) bytes (m :: * -> *) a b. RunMiniProtocol appType bytes m a b -> RunMiniProtocol appType bytes m a b @@ -480,7 +480,7 @@ -> RunMiniProtocol 'InitiatorMode ByteString IO () Void forall a b. (a -> b) -> a -> b $ case LocalChainSyncClient block (Point block) (Tip block) IO -localChainSyncClientForBlock of +localChainSyncClientForBlock of LocalChainSyncClient block (Point block) (Tip block) IO NoLocalChainSyncClient -> Tracer @@ -509,14 +509,14 @@ DeserialiseFailure IO ByteString -cChainSyncCodec Peer +cChainSyncCodec Peer (ChainSync block (Point block) (Tip block)) 'AsClient 'StIdle IO () forall header point tip (m :: * -> *) a. MonadTimer m => Peer (ChainSync header point tip) 'AsClient 'StIdle m a Net.chainSyncPeerNull - LocalChainSyncClient ChainSyncClient block (Point block) (Tip block) IO () -client + LocalChainSyncClient ChainSyncClient block (Point block) (Tip block) IO () +client -> Tracer IO (TraceSendRecv (ChainSync block (Point block) (Tip block))) -> Codec @@ -545,7 +545,7 @@ DeserialiseFailure IO ByteString -cChainSyncCodec +cChainSyncCodec (ChainSyncClient block (Point block) (Tip block) IO () -> Peer (ChainSync block (Point block) (Tip block)) 'AsClient 'StIdle IO () @@ -554,9 +554,9 @@ ChainSyncClient header point tip m a -> Peer (ChainSync header point tip) 'AsClient 'StIdle m a Net.Sync.chainSyncClientPeer ChainSyncClient block (Point block) (Tip block) IO () -client) - LocalChainSyncClientPipelined ChainSyncClientPipelined block (Point block) (Tip block) IO () -clientPipelined +client) + LocalChainSyncClientPipelined ChainSyncClientPipelined block (Point block) (Tip block) IO () +clientPipelined -> Tracer IO (TraceSendRecv (ChainSync block (Point block) (Tip block))) -> Codec @@ -585,7 +585,7 @@ DeserialiseFailure IO ByteString -cChainSyncCodec +cChainSyncCodec (ChainSyncClientPipelined block (Point block) (Tip block) IO () -> PeerPipelined (ChainSync block (Point block) (Tip block)) 'AsClient 'StIdle IO () @@ -594,7 +594,7 @@ ChainSyncClientPipelined header point tip m a -> PeerPipelined (ChainSync header point tip) 'AsClient 'StIdle m a Net.SyncP.chainSyncClientPeerPipelined ChainSyncClientPipelined block (Point block) (Tip block) IO () -clientPipelined) +clientPipelined) , localTxSubmissionProtocol :: RunMiniProtocol 'InitiatorMode ByteString IO () Void localTxSubmissionProtocol = @@ -644,7 +644,7 @@ DeserialiseFailure IO ByteString -cTxSubmissionCodec +cTxSubmissionCodec (Peer (LocalTxSubmission (GenTx block) (ApplyTxErr block)) 'AsClient @@ -691,7 +691,7 @@ Net.Tx.localTxSubmissionClientPeer Maybe (LocalTxSubmissionClient (GenTx block) (ApplyTxErr block) IO ()) -localTxSubmissionClientForBlock) +localTxSubmissionClientForBlock) , localStateQueryProtocol :: RunMiniProtocol 'InitiatorMode ByteString IO () Void localStateQueryProtocol = @@ -739,7 +739,7 @@ DeserialiseFailure IO ByteString -cStateQueryCodec +cStateQueryCodec (Peer (LocalStateQuery block (Point block) (Query block)) 'AsClient @@ -786,11 +786,11 @@ Net.Query.localStateQueryClientPeer Maybe (LocalStateQueryClient block (Point block) (Query block) IO ()) -localStateQueryClientForBlock) +localStateQueryClientForBlock) } where Consensus.Codecs { - Codec + Codec (ChainSync block (Point block) (Tip block)) DeserialiseFailure IO @@ -804,7 +804,7 @@ IO ByteString Consensus.cChainSyncCodec, - Codec + Codec (LocalTxSubmission (GenTx block) (ApplyTxErr block)) DeserialiseFailure IO @@ -818,7 +818,7 @@ IO ByteString Consensus.cTxSubmissionCodec, - Codec + Codec (LocalStateQuery block (Point block) (Query block)) DeserialiseFailure IO @@ -845,13 +845,13 @@ -> NodeToClientVersion -> ClientCodecs blk m Consensus.clientCodecs CodecConfig block -codecConfig BlockNodeToClientVersion block -ptclBlockVersion NodeToClientVersion -ptclVersion +codecConfig BlockNodeToClientVersion block +ptclBlockVersion NodeToClientVersion +ptclVersion - codecConfig :: Consensus.CodecConfig block - codecConfig :: CodecConfig block -codecConfig = ProtocolClientInfo block -> CodecConfig block + codecConfig :: Consensus.CodecConfig block + codecConfig :: CodecConfig block +codecConfig = ProtocolClientInfo block -> CodecConfig block forall b. ProtocolClientInfo b -> CodecConfig b Consensus.pClientInfoCodecConfig (ProtocolClientInfoArgs block -> ProtocolClientInfo block @@ -859,7 +859,7 @@ ProtocolClient blk => ProtocolClientInfoArgs blk -> ProtocolClientInfo blk protocolClientInfo ProtocolClientInfoArgs block -ptcl) +ptcl) -- | This type defines the boundary between the mode-parametrised style used in @@ -874,59 +874,59 @@ -- handlers for the node-to-client protocol. -- data LocalNodeClientParams where - LocalNodeClientParams - :: (Consensus.SerialiseNodeToClientConstraints block, - Consensus.SupportedNetworkProtocolVersion block, - ShowProxy block, ShowProxy (Consensus.ApplyTxErr block), - ShowProxy (Consensus.GenTx block), ShowProxy (Consensus.Query block), - Consensus.ShowQuery (Consensus.Query block), - ProtocolClient block + LocalNodeClientParams + :: (Consensus.SerialiseNodeToClientConstraints block, + Consensus.SupportedNetworkProtocolVersion block, + ShowProxy block, ShowProxy (Consensus.ApplyTxErr block), + ShowProxy (Consensus.GenTx block), ShowProxy (Consensus.Query block), + Consensus.ShowQuery (Consensus.Query block), + ProtocolClient block ) - => ProtocolClientInfoArgs block - -> LocalNodeClientProtocolsForBlock block + => ProtocolClientInfoArgs block + -> LocalNodeClientProtocolsForBlock block -> LocalNodeClientParams -data LocalNodeClientProtocolsForBlock block = +data LocalNodeClientProtocolsForBlock block = LocalNodeClientProtocolsForBlock { LocalNodeClientProtocolsForBlock block -> LocalChainSyncClient block (Point block) (Tip block) IO localChainSyncClientForBlock - :: LocalChainSyncClient block - (Consensus.Point block) - (Net.Tip block) + :: LocalChainSyncClient block + (Consensus.Point block) + (Net.Tip block) IO , LocalNodeClientProtocolsForBlock block -> Maybe (LocalStateQueryClient block (Point block) (Query block) IO ()) localStateQueryClientForBlock - :: Maybe (LocalStateQueryClient block - (Consensus.Point block) - (Consensus.Query block) + :: Maybe (LocalStateQueryClient block + (Consensus.Point block) + (Consensus.Query block) IO ()) , LocalNodeClientProtocolsForBlock block -> Maybe (LocalTxSubmissionClient (GenTx block) (ApplyTxErr block) IO ()) localTxSubmissionClientForBlock - :: Maybe (LocalTxSubmissionClient (Consensus.GenTx block) - (Consensus.ApplyTxErr block) + :: Maybe (LocalTxSubmissionClient (Consensus.GenTx block) + (Consensus.ApplyTxErr block) IO ()) } -- | Convert from the mode-parametrised style to the block-parametrised style. -- -mkLocalNodeClientParams :: forall mode block. - ConsensusBlockForMode mode ~ block - => ConsensusModeParams mode - -> LocalNodeClientProtocolsInMode mode +mkLocalNodeClientParams :: forall mode block. + ConsensusBlockForMode mode ~ block + => ConsensusModeParams mode + -> LocalNodeClientProtocolsInMode mode -> LocalNodeClientParams mkLocalNodeClientParams :: ConsensusModeParams mode -> LocalNodeClientProtocolsInMode mode -> LocalNodeClientParams -mkLocalNodeClientParams ConsensusModeParams mode -modeparams LocalNodeClientProtocolsInMode mode -clients = +mkLocalNodeClientParams ConsensusModeParams mode +modeparams LocalNodeClientProtocolsInMode mode +clients = -- For each of the possible consensus modes we pick the concrete block type -- (by picking the appropriate 'ProtocolClient' value). -- @@ -939,9 +939,9 @@ -- block type monomorphic. -- case ConsensusModeParams mode -modeparams of - ByronModeParams EpochSlots -epochSlots -> +modeparams of + ByronModeParams EpochSlots +epochSlots -> ProtocolClientInfoArgs ByronBlockHFC -> LocalNodeClientProtocolsForBlock ByronBlockHFC -> LocalNodeClientParams @@ -956,7 +956,7 @@ LocalNodeClientParams (EpochSlots -> ProtocolClientInfoArgs ByronBlockHFC ProtocolClientInfoArgsByron EpochSlots -epochSlots) +epochSlots) (ConsensusMode ByronMode -> LocalNodeClientProtocolsInMode ByronMode -> LocalNodeClientProtocolsForBlock ByronBlockHFC @@ -968,7 +968,7 @@ convLocalNodeClientProtocols ConsensusMode ByronMode ByronMode LocalNodeClientProtocolsInMode mode LocalNodeClientProtocolsInMode ByronMode -clients) +clients) ConsensusModeParams mode ShelleyModeParams -> @@ -999,10 +999,10 @@ convLocalNodeClientProtocols ConsensusMode ShelleyMode ShelleyMode LocalNodeClientProtocolsInMode mode LocalNodeClientProtocolsInMode ShelleyMode -clients) +clients) - CardanoModeParams EpochSlots -epochSlots -> + CardanoModeParams EpochSlots +epochSlots -> ProtocolClientInfoArgs (CardanoBlock StandardCrypto) -> LocalNodeClientProtocolsForBlock (CardanoBlock StandardCrypto) -> LocalNodeClientParams @@ -1017,7 +1017,7 @@ LocalNodeClientParams (EpochSlots -> ProtocolClientInfoArgs (CardanoBlock StandardCrypto) ProtocolClientInfoArgsCardano EpochSlots -epochSlots) +epochSlots) (ConsensusMode CardanoMode -> LocalNodeClientProtocolsInMode CardanoMode -> LocalNodeClientProtocolsForBlock (CardanoBlock StandardCrypto) @@ -1029,28 +1029,28 @@ convLocalNodeClientProtocols ConsensusMode CardanoMode CardanoMode LocalNodeClientProtocolsInMode mode LocalNodeClientProtocolsInMode CardanoMode -clients) +clients) -convLocalNodeClientProtocols :: forall mode block. - ConsensusBlockForMode mode ~ block - => ConsensusMode mode - -> LocalNodeClientProtocolsInMode mode - -> LocalNodeClientProtocolsForBlock block +convLocalNodeClientProtocols :: forall mode block. + ConsensusBlockForMode mode ~ block + => ConsensusMode mode + -> LocalNodeClientProtocolsInMode mode + -> LocalNodeClientProtocolsForBlock block convLocalNodeClientProtocols :: ConsensusMode mode -> LocalNodeClientProtocolsInMode mode -> LocalNodeClientProtocolsForBlock block convLocalNodeClientProtocols - ConsensusMode mode -mode + ConsensusMode mode +mode LocalNodeClientProtocols { - LocalChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO + LocalChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO localChainSyncClient :: LocalChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO localChainSyncClient :: forall block point tip tx txerr (query :: * -> *) (m :: * -> *). LocalNodeClientProtocols block point tip tx txerr query m -> LocalChainSyncClient block point tip m -localChainSyncClient, - Maybe +localChainSyncClient, + Maybe (LocalTxSubmissionClient (TxInMode mode) (TxValidationErrorInMode mode) IO ()) localTxSubmissionClient :: Maybe @@ -1059,8 +1059,8 @@ localTxSubmissionClient :: forall block point tip tx txerr (query :: * -> *) (m :: * -> *). LocalNodeClientProtocols block point tip tx txerr query m -> Maybe (LocalTxSubmissionClient tx txerr m ()) -localTxSubmissionClient, - Maybe +localTxSubmissionClient, + Maybe (LocalStateQueryClient (BlockInMode mode) ChainPoint (QueryInMode mode) IO ()) localStateQueryClient :: Maybe @@ -1069,7 +1069,7 @@ localStateQueryClient :: forall block point tip tx txerr (query :: * -> *) (m :: * -> *). LocalNodeClientProtocols block point tip tx txerr query m -> Maybe (LocalStateQueryClient block point query m ()) -localStateQueryClient +localStateQueryClient } = LocalNodeClientProtocolsForBlock :: forall block. LocalChainSyncClient block (Point block) (Tip block) IO @@ -1081,15 +1081,15 @@ LocalNodeClientProtocolsForBlock { localChainSyncClientForBlock :: LocalChainSyncClient block (Point block) (Tip block) IO localChainSyncClientForBlock = case LocalChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO -localChainSyncClient of +localChainSyncClient of LocalChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO NoLocalChainSyncClient -> LocalChainSyncClient block (Point block) (Tip block) IO forall block point tip (m :: * -> *). LocalChainSyncClient block point tip m NoLocalChainSyncClient - LocalChainSyncClientPipelined ChainSyncClientPipelined + LocalChainSyncClientPipelined ChainSyncClientPipelined (BlockInMode mode) ChainPoint ChainTip IO () -clientPipelined -> ChainSyncClientPipelined block (Point block) (Tip block) IO () +clientPipelined -> ChainSyncClientPipelined block (Point block) (Tip block) IO () -> LocalChainSyncClient block (Point block) (Tip block) IO forall block point tip (m :: * -> *). ChainSyncClientPipelined block point tip m () @@ -1110,11 +1110,11 @@ (BlockInMode mode) ChainPoint ChainTip m a -> ChainSyncClientPipelined block (Point block) (Tip block) m a convLocalChainSyncClientPipelined ConsensusMode mode -mode ChainSyncClientPipelined +mode ChainSyncClientPipelined (BlockInMode mode) ChainPoint ChainTip IO () -clientPipelined - LocalChainSyncClient ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () -client -> ChainSyncClient block (Point block) (Tip block) IO () +clientPipelined + LocalChainSyncClient ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () +client -> ChainSyncClient block (Point block) (Tip block) IO () -> LocalChainSyncClient block (Point block) (Tip block) IO forall block point tip (m :: * -> *). ChainSyncClient block point tip m () @@ -1133,8 +1133,8 @@ -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip m a -> ChainSyncClient block (Point block) (Tip block) m a convLocalChainSyncClient ConsensusMode mode -mode ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () -client, +mode ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () +client, localTxSubmissionClientForBlock :: Maybe (LocalTxSubmissionClient (GenTx block) (ApplyTxErr block) IO ()) @@ -1149,7 +1149,7 @@ (TxInMode mode) (TxValidationErrorInMode mode) m a -> LocalTxSubmissionClient (GenTx block) (ApplyTxErr block) m a convLocalTxSubmissionClient ConsensusMode mode -mode (LocalTxSubmissionClient +mode (LocalTxSubmissionClient (TxInMode mode) (TxValidationErrorInMode mode) IO () -> LocalTxSubmissionClient (GenTx block) (ApplyTxErr block) IO ()) -> Maybe @@ -1162,7 +1162,7 @@ Maybe (LocalTxSubmissionClient (TxInMode mode) (TxValidationErrorInMode mode) IO ()) -localTxSubmissionClient, +localTxSubmissionClient, localStateQueryClientForBlock :: Maybe (LocalStateQueryClient block (Point block) (Query block) IO ()) @@ -1177,7 +1177,7 @@ (BlockInMode mode) ChainPoint (QueryInMode mode) m a -> LocalStateQueryClient block (Point block) (Query block) m a convLocalStateQueryClient ConsensusMode mode -mode (LocalStateQueryClient +mode (LocalStateQueryClient (BlockInMode mode) ChainPoint (QueryInMode mode) IO () -> LocalStateQueryClient block (Point block) (Query block) IO ()) -> Maybe @@ -1190,21 +1190,21 @@ Maybe (LocalStateQueryClient (BlockInMode mode) ChainPoint (QueryInMode mode) IO ()) -localStateQueryClient +localStateQueryClient } convLocalChainSyncClient - :: forall mode block m a. - (ConsensusBlockForMode mode ~ block, Functor m) - => ConsensusMode mode - -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip m a - -> ChainSyncClient block (Net.Point block) (Net.Tip block) m a + :: forall mode block m a. + (ConsensusBlockForMode mode ~ block, Functor m) + => ConsensusMode mode + -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip m a + -> ChainSyncClient block (Net.Point block) (Net.Tip block) m a convLocalChainSyncClient :: ConsensusMode mode -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip m a -> ChainSyncClient block (Point block) (Tip block) m a -convLocalChainSyncClient ConsensusMode mode -mode = +convLocalChainSyncClient ConsensusMode mode +mode = (ChainPoint -> Point block) -> (Point block -> ChainPoint) -> (block -> BlockInMode mode) @@ -1226,39 +1226,39 @@ ConsensusMode mode -> ChainPoint -> Point (ConsensusBlockForMode mode) toConsensusPointInMode ConsensusMode mode -mode) +mode) (ConsensusMode mode -> Point (ConsensusBlockForMode mode) -> ChainPoint forall mode. ConsensusMode mode -> Point (ConsensusBlockForMode mode) -> ChainPoint fromConsensusPointInMode ConsensusMode mode -mode) +mode) (ConsensusMode mode -> block -> BlockInMode mode forall mode block. (ConsensusBlockForMode mode ~ block) => ConsensusMode mode -> block -> BlockInMode mode fromConsensusBlock ConsensusMode mode -mode) +mode) (ConsensusMode mode -> Tip block -> ChainTip forall mode block. (ConsensusBlockForMode mode ~ block) => ConsensusMode mode -> Tip block -> ChainTip fromConsensusTip ConsensusMode mode -mode) +mode) convLocalChainSyncClientPipelined - :: forall mode block m a. - (ConsensusBlockForMode mode ~ block, Functor m) - => ConsensusMode mode - -> ChainSyncClientPipelined (BlockInMode mode) ChainPoint ChainTip m a - -> ChainSyncClientPipelined block (Net.Point block) (Net.Tip block) m a + :: forall mode block m a. + (ConsensusBlockForMode mode ~ block, Functor m) + => ConsensusMode mode + -> ChainSyncClientPipelined (BlockInMode mode) ChainPoint ChainTip m a + -> ChainSyncClientPipelined block (Net.Point block) (Net.Tip block) m a convLocalChainSyncClientPipelined :: ConsensusMode mode -> ChainSyncClientPipelined (BlockInMode mode) ChainPoint ChainTip m a -> ChainSyncClientPipelined block (Point block) (Tip block) m a -convLocalChainSyncClientPipelined ConsensusMode mode -mode = +convLocalChainSyncClientPipelined ConsensusMode mode +mode = (ChainPoint -> Point block) -> (Point block -> ChainPoint) -> (block -> BlockInMode mode) @@ -1281,40 +1281,40 @@ ConsensusMode mode -> ChainPoint -> Point (ConsensusBlockForMode mode) toConsensusPointInMode ConsensusMode mode -mode) +mode) (ConsensusMode mode -> Point (ConsensusBlockForMode mode) -> ChainPoint forall mode. ConsensusMode mode -> Point (ConsensusBlockForMode mode) -> ChainPoint fromConsensusPointInMode ConsensusMode mode -mode) +mode) (ConsensusMode mode -> block -> BlockInMode mode forall mode block. (ConsensusBlockForMode mode ~ block) => ConsensusMode mode -> block -> BlockInMode mode fromConsensusBlock ConsensusMode mode -mode) +mode) (ConsensusMode mode -> Tip block -> ChainTip forall mode block. (ConsensusBlockForMode mode ~ block) => ConsensusMode mode -> Tip block -> ChainTip fromConsensusTip ConsensusMode mode -mode) +mode) convLocalTxSubmissionClient - :: forall mode block m a. - (ConsensusBlockForMode mode ~ block, Functor m) - => ConsensusMode mode - -> LocalTxSubmissionClient (TxInMode mode) (TxValidationErrorInMode mode) m a - -> LocalTxSubmissionClient (Consensus.GenTx block) - (Consensus.ApplyTxErr block) m a + :: forall mode block m a. + (ConsensusBlockForMode mode ~ block, Functor m) + => ConsensusMode mode + -> LocalTxSubmissionClient (TxInMode mode) (TxValidationErrorInMode mode) m a + -> LocalTxSubmissionClient (Consensus.GenTx block) + (Consensus.ApplyTxErr block) m a convLocalTxSubmissionClient :: ConsensusMode mode -> LocalTxSubmissionClient (TxInMode mode) (TxValidationErrorInMode mode) m a -> LocalTxSubmissionClient (GenTx block) (ApplyTxErr block) m a -convLocalTxSubmissionClient ConsensusMode mode -mode = +convLocalTxSubmissionClient ConsensusMode mode +mode = (TxInMode mode -> GenTx block) -> (ApplyTxErr block -> TxValidationErrorInMode mode) -> LocalTxSubmissionClient @@ -1339,22 +1339,22 @@ ConsensusMode mode -> ApplyTxErr block -> TxValidationErrorInMode mode fromConsensusApplyTxErr ConsensusMode mode -mode) +mode) convLocalStateQueryClient - :: forall mode block m a. - (ConsensusBlockForMode mode ~ block, Functor m) - => ConsensusMode mode - -> LocalStateQueryClient (BlockInMode mode) ChainPoint (QueryInMode mode) m a - -> LocalStateQueryClient block (Consensus.Point block) - (Consensus.Query block) m a + :: forall mode block m a. + (ConsensusBlockForMode mode ~ block, Functor m) + => ConsensusMode mode + -> LocalStateQueryClient (BlockInMode mode) ChainPoint (QueryInMode mode) m a + -> LocalStateQueryClient block (Consensus.Point block) + (Consensus.Query block) m a convLocalStateQueryClient :: ConsensusMode mode -> LocalStateQueryClient (BlockInMode mode) ChainPoint (QueryInMode mode) m a -> LocalStateQueryClient block (Point block) (Query block) m a -convLocalStateQueryClient ConsensusMode mode -mode = +convLocalStateQueryClient ConsensusMode mode +mode = (ChainPoint -> Point block) -> (forall result. QueryInMode mode result -> Some (Query block)) -> (forall result result'. @@ -1379,7 +1379,7 @@ ConsensusMode mode -> ChainPoint -> Point (ConsensusBlockForMode mode) toConsensusPointInMode ConsensusMode mode -mode) +mode) forall result. QueryInMode mode result -> Some (Query block) forall mode block result. (ConsensusBlockForMode mode ~ block) => @@ -1404,21 +1404,21 @@ -- | Establish a connection to a node and execute a single query using the -- local state query protocol. -- -queryNodeLocalState :: forall mode result. - LocalNodeConnectInfo mode +queryNodeLocalState :: forall mode result. + LocalNodeConnectInfo mode -> Maybe ChainPoint - -> QueryInMode mode result - -> IO (Either Net.Query.AcquireFailure result) + -> QueryInMode mode result + -> IO (Either Net.Query.AcquireFailure result) queryNodeLocalState :: LocalNodeConnectInfo mode -> Maybe ChainPoint -> QueryInMode mode result -> IO (Either AcquireFailure result) -queryNodeLocalState LocalNodeConnectInfo mode -connctInfo Maybe ChainPoint -mpoint QueryInMode mode result -query = do - TMVar (Either AcquireFailure result) -resultVar <- IO (TMVar (Either AcquireFailure result)) +queryNodeLocalState LocalNodeConnectInfo mode +connctInfo Maybe ChainPoint +mpoint QueryInMode mode result +query = do + TMVar (Either AcquireFailure result) +resultVar <- IO (TMVar (Either AcquireFailure result)) forall a. IO (TMVar a) newEmptyTMVarIO LocalNodeConnectInfo mode @@ -1428,7 +1428,7 @@ -> LocalNodeClientProtocolsInMode mode -> IO () connectToLocalNode LocalNodeConnectInfo mode -connctInfo +connctInfo LocalNodeClientProtocols :: forall block point tip tx txerr (query :: * -> *) (m :: * -> *). LocalChainSyncClient block point tip m -> Maybe (LocalTxSubmissionClient tx txerr m ()) @@ -1453,9 +1453,9 @@ -> TMVar (Either AcquireFailure result) -> LocalStateQueryClient (BlockInMode mode) ChainPoint (QueryInMode mode) IO () -singleQuery Maybe ChainPoint -mpoint TMVar (Either AcquireFailure result) -resultVar), +singleQuery Maybe ChainPoint +mpoint TMVar (Either AcquireFailure result) +resultVar), localTxSubmissionClient :: Maybe (LocalTxSubmissionClient (TxInMode mode) (TxValidationErrorInMode mode) IO ()) @@ -1472,20 +1472,20 @@ -> STM (Either AcquireFailure result) forall a. TMVar a -> STM a takeTMVar TMVar (Either AcquireFailure result) -resultVar) +resultVar) where - singleQuery + singleQuery :: Maybe ChainPoint - -> TMVar (Either Net.Query.AcquireFailure result) - -> Net.Query.LocalStateQueryClient (BlockInMode mode) ChainPoint - (QueryInMode mode) IO () - singleQuery :: Maybe ChainPoint + -> TMVar (Either Net.Query.AcquireFailure result) + -> Net.Query.LocalStateQueryClient (BlockInMode mode) ChainPoint + (QueryInMode mode) IO () + singleQuery :: Maybe ChainPoint -> TMVar (Either AcquireFailure result) -> LocalStateQueryClient (BlockInMode mode) ChainPoint (QueryInMode mode) IO () -singleQuery Maybe ChainPoint -mPointVar' TMVar (Either AcquireFailure result) -resultVar' = +singleQuery Maybe ChainPoint +mPointVar' TMVar (Either AcquireFailure result) +resultVar' = IO (ClientStIdle (BlockInMode mode) ChainPoint (QueryInMode mode) IO ()) @@ -1533,7 +1533,7 @@ -> ClientStAcquiring block point query m a -> ClientStIdle block point query m a Net.Query.SendMsgAcquire Maybe ChainPoint -mPointVar' (ClientStAcquiring +mPointVar' (ClientStAcquiring (BlockInMode mode) ChainPoint (QueryInMode mode) IO () -> ClientStIdle (BlockInMode mode) ChainPoint (QueryInMode mode) IO ()) @@ -1579,7 +1579,7 @@ -> ClientStQuerying block point query m a result -> ClientStAcquired block point query m a Net.Query.SendMsgQuery QueryInMode mode result -query (ClientStQuerying +query (ClientStQuerying (BlockInMode mode) ChainPoint (QueryInMode mode) IO () result -> ClientStAcquired (BlockInMode mode) ChainPoint (QueryInMode mode) IO ()) @@ -1597,8 +1597,8 @@ -> IO (ClientStAcquired (BlockInMode mode) ChainPoint (QueryInMode mode) IO ()) -Net.Query.recvMsgResult = \result -result -> do +Net.Query.recvMsgResult = \result +result -> do STM () -> IO () forall a. STM a -> IO a atomically (STM () -> IO ()) -> STM () -> IO () @@ -1607,10 +1607,10 @@ -> Either AcquireFailure result -> STM () forall a. TMVar a -> a -> STM () putTMVar TMVar (Either AcquireFailure result) -resultVar' (result -> Either AcquireFailure result +resultVar' (result -> Either AcquireFailure result forall a b. b -> Either a b Right result -result) +result) ClientStAcquired (BlockInMode mode) ChainPoint (QueryInMode mode) IO () @@ -1676,8 +1676,8 @@ -> IO (ClientStIdle (BlockInMode mode) ChainPoint (QueryInMode mode) IO ()) -Net.Query.recvMsgFailure = \AcquireFailure -failure -> do +Net.Query.recvMsgFailure = \AcquireFailure +failure -> do STM () -> IO () forall a. STM a -> IO a atomically (STM () -> IO ()) -> STM () -> IO () @@ -1686,10 +1686,10 @@ -> Either AcquireFailure result -> STM () forall a. TMVar a -> a -> STM () putTMVar TMVar (Either AcquireFailure result) -resultVar' (AcquireFailure -> Either AcquireFailure result +resultVar' (AcquireFailure -> Either AcquireFailure result forall a b. a -> Either a b Left AcquireFailure -failure) +failure) ClientStIdle (BlockInMode mode) ChainPoint (QueryInMode mode) IO () -> IO (ClientStIdle @@ -1715,18 +1715,18 @@ } -submitTxToNodeLocal :: forall mode. - LocalNodeConnectInfo mode - -> TxInMode mode - -> IO (Net.Tx.SubmitResult (TxValidationErrorInMode mode)) +submitTxToNodeLocal :: forall mode. + LocalNodeConnectInfo mode + -> TxInMode mode + -> IO (Net.Tx.SubmitResult (TxValidationErrorInMode mode)) submitTxToNodeLocal :: LocalNodeConnectInfo mode -> TxInMode mode -> IO (SubmitResult (TxValidationErrorInMode mode)) -submitTxToNodeLocal LocalNodeConnectInfo mode -connctInfo TxInMode mode -tx = do - TMVar (SubmitResult (TxValidationErrorInMode mode)) -resultVar <- IO (TMVar (SubmitResult (TxValidationErrorInMode mode))) +submitTxToNodeLocal LocalNodeConnectInfo mode +connctInfo TxInMode mode +tx = do + TMVar (SubmitResult (TxValidationErrorInMode mode)) +resultVar <- IO (TMVar (SubmitResult (TxValidationErrorInMode mode))) forall a. IO (TMVar a) newEmptyTMVarIO LocalNodeConnectInfo mode @@ -1736,7 +1736,7 @@ -> LocalNodeClientProtocolsInMode mode -> IO () connectToLocalNode LocalNodeConnectInfo mode -connctInfo +connctInfo LocalNodeClientProtocols :: forall block point tip tx txerr (query :: * -> *) (m :: * -> *). LocalChainSyncClient block point tip m -> Maybe (LocalTxSubmissionClient tx txerr m ()) @@ -1760,8 +1760,8 @@ Just (TMVar (SubmitResult (TxValidationErrorInMode mode)) -> LocalTxSubmissionClient (TxInMode mode) (TxValidationErrorInMode mode) IO () -localTxSubmissionClientSingle TMVar (SubmitResult (TxValidationErrorInMode mode)) -resultVar), +localTxSubmissionClientSingle TMVar (SubmitResult (TxValidationErrorInMode mode)) +resultVar), localStateQueryClient :: Maybe (LocalStateQueryClient (BlockInMode mode) ChainPoint (QueryInMode mode) IO ()) @@ -1779,18 +1779,18 @@ -> STM (SubmitResult (TxValidationErrorInMode mode)) forall a. TMVar a -> STM a takeTMVar TMVar (SubmitResult (TxValidationErrorInMode mode)) -resultVar) +resultVar) where - localTxSubmissionClientSingle - :: TMVar (Net.Tx.SubmitResult (TxValidationErrorInMode mode)) - -> Net.Tx.LocalTxSubmissionClient (TxInMode mode) - (TxValidationErrorInMode mode) + localTxSubmissionClientSingle + :: TMVar (Net.Tx.SubmitResult (TxValidationErrorInMode mode)) + -> Net.Tx.LocalTxSubmissionClient (TxInMode mode) + (TxValidationErrorInMode mode) IO () - localTxSubmissionClientSingle :: TMVar (SubmitResult (TxValidationErrorInMode mode)) + localTxSubmissionClientSingle :: TMVar (SubmitResult (TxValidationErrorInMode mode)) -> LocalTxSubmissionClient (TxInMode mode) (TxValidationErrorInMode mode) IO () -localTxSubmissionClientSingle TMVar (SubmitResult (TxValidationErrorInMode mode)) -resultVar = +localTxSubmissionClientSingle TMVar (SubmitResult (TxValidationErrorInMode mode)) +resultVar = IO (LocalTxClientStIdle (TxInMode mode) (TxValidationErrorInMode mode) IO ()) @@ -1840,7 +1840,7 @@ -> (SubmitResult reject -> m (LocalTxClientStIdle tx reject m a)) -> LocalTxClientStIdle tx reject m a Net.Tx.SendMsgSubmitTx TxInMode mode -tx ((SubmitResult (TxValidationErrorInMode mode) +tx ((SubmitResult (TxValidationErrorInMode mode) -> IO (LocalTxClientStIdle (TxInMode mode) (TxValidationErrorInMode mode) IO ())) @@ -1853,8 +1853,8 @@ -> LocalTxClientStIdle (TxInMode mode) (TxValidationErrorInMode mode) IO () forall a b. (a -> b) -> a -> b -$ \SubmitResult (TxValidationErrorInMode mode) -result -> do +$ \SubmitResult (TxValidationErrorInMode mode) +result -> do STM () -> IO () forall a. STM a -> IO a atomically (STM () -> IO ()) -> STM () -> IO () @@ -1863,8 +1863,8 @@ -> SubmitResult (TxValidationErrorInMode mode) -> STM () forall a. TMVar a -> a -> STM () putTMVar TMVar (SubmitResult (TxValidationErrorInMode mode)) -resultVar SubmitResult (TxValidationErrorInMode mode) -result +resultVar SubmitResult (TxValidationErrorInMode mode) +result LocalTxClientStIdle (TxInMode mode) (TxValidationErrorInMode mode) IO () -> IO @@ -1883,12 +1883,12 @@ -- -getLocalChainTip :: LocalNodeConnectInfo mode -> IO ChainTip +getLocalChainTip :: LocalNodeConnectInfo mode -> IO ChainTip getLocalChainTip :: LocalNodeConnectInfo mode -> IO ChainTip -getLocalChainTip LocalNodeConnectInfo mode -localNodeConInfo = do - TMVar ChainTip -resultVar <- IO (TMVar ChainTip) +getLocalChainTip LocalNodeConnectInfo mode +localNodeConInfo = do + TMVar ChainTip +resultVar <- IO (TMVar ChainTip) forall a. IO (TMVar a) newEmptyTMVarIO LocalNodeConnectInfo mode @@ -1898,7 +1898,7 @@ -> LocalNodeClientProtocolsInMode mode -> IO () connectToLocalNode LocalNodeConnectInfo mode -localNodeConInfo +localNodeConInfo LocalNodeClientProtocols :: forall block point tip tx txerr (query :: * -> *) (m :: * -> *). LocalChainSyncClient block point tip m -> Maybe (LocalTxSubmissionClient tx txerr m ()) @@ -1922,7 +1922,7 @@ TMVar ChainTip -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () chainSyncGetCurrentTip TMVar ChainTip -resultVar +resultVar , localTxSubmissionClient :: Maybe (LocalTxSubmissionClient (TxInMode mode) (TxValidationErrorInMode mode) IO ()) @@ -1947,15 +1947,15 @@ $ TMVar ChainTip -> STM ChainTip forall a. TMVar a -> STM a takeTMVar TMVar ChainTip -resultVar +resultVar chainSyncGetCurrentTip - :: forall mode. TMVar ChainTip - -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () + :: forall mode. TMVar ChainTip + -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () chainSyncGetCurrentTip :: TMVar ChainTip -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () -chainSyncGetCurrentTip TMVar ChainTip -tipVar = +chainSyncGetCurrentTip TMVar ChainTip +tipVar = IO (ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO ()) -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () forall header point tip (m :: * -> *) a. @@ -1970,11 +1970,11 @@ -> IO (ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO ()) forall (f :: * -> *) a. Applicative f => a -> f a pure ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO () -clientStIdle +clientStIdle where - clientStIdle :: Net.Sync.ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO () - clientStIdle :: ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO () -clientStIdle = + clientStIdle :: Net.Sync.ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO () + clientStIdle :: ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO () +clientStIdle = ClientStNext (BlockInMode mode) ChainPoint ChainTip IO () -> IO (ClientStNext (BlockInMode mode) ChainPoint ChainTip IO ()) -> ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO () @@ -1983,15 +1983,15 @@ -> m (ClientStNext header point tip m a) -> ClientStIdle header point tip m a Net.Sync.SendMsgRequestNext ClientStNext (BlockInMode mode) ChainPoint ChainTip IO () -clientStNext (ClientStNext (BlockInMode mode) ChainPoint ChainTip IO () +clientStNext (ClientStNext (BlockInMode mode) ChainPoint ChainTip IO () -> IO (ClientStNext (BlockInMode mode) ChainPoint ChainTip IO ()) forall (f :: * -> *) a. Applicative f => a -> f a pure ClientStNext (BlockInMode mode) ChainPoint ChainTip IO () -clientStNext) +clientStNext) - clientStNext :: Net.Sync.ClientStNext (BlockInMode mode) ChainPoint ChainTip IO () - clientStNext :: ClientStNext (BlockInMode mode) ChainPoint ChainTip IO () -clientStNext = ClientStNext :: forall header point tip (m :: * -> *) a. + clientStNext :: Net.Sync.ClientStNext (BlockInMode mode) ChainPoint ChainTip IO () + clientStNext :: ClientStNext (BlockInMode mode) ChainPoint ChainTip IO () +clientStNext = ClientStNext :: forall header point tip (m :: * -> *) a. (header -> tip -> ChainSyncClient header point tip m a) -> (point -> tip -> ChainSyncClient header point tip m a) -> ClientStNext header point tip m a @@ -1999,9 +1999,9 @@ { recvMsgRollForward :: BlockInMode mode -> ChainTip -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () -Net.Sync.recvMsgRollForward = \BlockInMode mode -_block ChainTip -tip -> IO (ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO ()) +Net.Sync.recvMsgRollForward = \BlockInMode mode +_block ChainTip +tip -> IO (ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO ()) -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () forall header point tip (m :: * -> *) a. m (ClientStIdle header point tip m a) @@ -2023,8 +2023,8 @@ $ TMVar ChainTip -> ChainTip -> STM Bool forall a. TMVar a -> a -> STM Bool tryPutTMVar TMVar ChainTip -tipVar ChainTip -tip +tipVar ChainTip +tip ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO () -> IO (ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO ()) forall (f :: * -> *) a. Applicative f => a -> f a @@ -2040,9 +2040,9 @@ , recvMsgRollBackward :: ChainPoint -> ChainTip -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () -Net.Sync.recvMsgRollBackward = \ChainPoint -_point ChainTip -tip -> IO (ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO ()) +Net.Sync.recvMsgRollBackward = \ChainPoint +_point ChainTip +tip -> IO (ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO ()) -> ChainSyncClient (BlockInMode mode) ChainPoint ChainTip IO () forall header point tip (m :: * -> *) a. m (ClientStIdle header point tip m a) @@ -2064,8 +2064,8 @@ $ TMVar ChainTip -> ChainTip -> STM Bool forall a. TMVar a -> a -> STM Bool tryPutTMVar TMVar ChainTip -tipVar ChainTip -tip +tipVar ChainTip +tip ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO () -> IO (ClientStIdle (BlockInMode mode) ChainPoint ChainTip IO ()) forall (f :: * -> *) a. Applicative f => a -> f a diff --git a/cardano-api/src/Cardano.Api.Key.html b/cardano-api/src/Cardano.Api.Key.html index 57ebc7d72c5..9883e8ddd19 100644 --- a/cardano-api/src/Cardano.Api.Key.html +++ b/cardano-api/src/Cardano.Api.Key.html @@ -30,43 +30,43 @@ -- this API is concerned with the management of keys: generating and -- serialising. -- -class (Eq (VerificationKey keyrole), - Show (VerificationKey keyrole), - SerialiseAsRawBytes (Hash keyrole), - HasTextEnvelope (VerificationKey keyrole), - HasTextEnvelope (SigningKey keyrole)) - => Key keyrole where +class (Eq (VerificationKey keyrole), + Show (VerificationKey keyrole), + SerialiseAsRawBytes (Hash keyrole), + HasTextEnvelope (VerificationKey keyrole), + HasTextEnvelope (SigningKey keyrole)) + => Key keyrole where -- | The type of cryptographic verification key, for each key role. - data VerificationKey keyrole :: Type + data VerificationKey keyrole :: Type -- | The type of cryptographic signing key, for each key role. - data SigningKey keyrole :: Type + data SigningKey keyrole :: Type -- | Get the corresponding verification key from a signing key. - getVerificationKey :: SigningKey keyrole -> VerificationKey keyrole + getVerificationKey :: SigningKey keyrole -> VerificationKey keyrole -- | Generate a 'SigningKey' deterministically, given a 'Crypto.Seed'. The -- required size of the seed is given by 'deterministicSigningKeySeedSize'. -- - deterministicSigningKey :: AsType keyrole -> Crypto.Seed -> SigningKey keyrole - deterministicSigningKeySeedSize :: AsType keyrole -> Word + deterministicSigningKey :: AsType keyrole -> Crypto.Seed -> SigningKey keyrole + deterministicSigningKeySeedSize :: AsType keyrole -> Word - verificationKeyHash :: VerificationKey keyrole -> Hash keyrole + verificationKeyHash :: VerificationKey keyrole -> Hash keyrole -- TODO: We should move this into the Key type class, with the existing impl as the default impl. -- For KES we can then override it to keep the seed and key in mlocked memory at all times. -- | Generate a 'SigningKey' using a seed from operating system entropy. -- -generateSigningKey :: Key keyrole => AsType keyrole -> IO (SigningKey keyrole) +generateSigningKey :: Key keyrole => AsType keyrole -> IO (SigningKey keyrole) generateSigningKey :: AsType keyrole -> IO (SigningKey keyrole) -generateSigningKey AsType keyrole -keytype = do - Seed -seed <- Word -> IO Seed +generateSigningKey AsType keyrole +keytype = do + Seed +seed <- Word -> IO Seed Crypto.readSeedFromSystemEntropy Word -seedSize +seedSize SigningKey keyrole -> IO (SigningKey keyrole) forall (m :: * -> *) a. Monad m => a -> m a return (SigningKey keyrole -> IO (SigningKey keyrole)) @@ -77,52 +77,52 @@ Key keyrole => AsType keyrole -> Seed -> SigningKey keyrole deterministicSigningKey AsType keyrole -keytype Seed -seed +keytype Seed +seed where - seedSize :: Word -seedSize = AsType keyrole -> Word + seedSize :: Word +seedSize = AsType keyrole -> Word forall keyrole. Key keyrole => AsType keyrole -> Word deterministicSigningKeySeedSize AsType keyrole -keytype +keytype -instance HasTypeProxy a => HasTypeProxy (VerificationKey a) where - data AsType (VerificationKey a) = AsVerificationKey (AsType a) - proxyToAsType :: Proxy (VerificationKey a) -> AsType (VerificationKey a) +instance HasTypeProxy a => HasTypeProxy (VerificationKey a) where + data AsType (VerificationKey a) = AsVerificationKey (AsType a) + proxyToAsType :: Proxy (VerificationKey a) -> AsType (VerificationKey a) proxyToAsType Proxy (VerificationKey a) _ = AsType a -> AsType (VerificationKey a) forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey (Proxy a -> AsType a forall t. HasTypeProxy t => Proxy t -> AsType t -proxyToAsType (forall a. Proxy a +proxyToAsType (forall a. Proxy a forall k (t :: k). Proxy t -Proxy :: Proxy a)) +Proxy :: Proxy a)) -instance HasTypeProxy a => HasTypeProxy (SigningKey a) where - data AsType (SigningKey a) = AsSigningKey (AsType a) - proxyToAsType :: Proxy (SigningKey a) -> AsType (SigningKey a) -proxyToAsType Proxy (SigningKey a) +instance HasTypeProxy a => HasTypeProxy (SigningKey a) where + data AsType (SigningKey a) = AsSigningKey (AsType a) + proxyToAsType :: Proxy (SigningKey a) -> AsType (SigningKey a) +proxyToAsType Proxy (SigningKey a) _ = AsType a -> AsType (SigningKey a) forall a. AsType a -> AsType (SigningKey a) AsSigningKey (Proxy a -> AsType a forall t. HasTypeProxy t => Proxy t -> AsType t -proxyToAsType (forall a. Proxy a +proxyToAsType (forall a. Proxy a forall k (t :: k). Proxy t -Proxy :: Proxy a)) +Proxy :: Proxy a)) -- | Some key roles share the same representation and it is sometimes -- legitimate to change the role of a key. -- -class CastVerificationKeyRole keyroleA keyroleB where +class CastVerificationKeyRole keyroleA keyroleB where -- | Change the role of a 'VerificationKey', if the representation permits. - castVerificationKey :: VerificationKey keyroleA -> VerificationKey keyroleB + castVerificationKey :: VerificationKey keyroleA -> VerificationKey keyroleB -class CastSigningKeyRole keyroleA keyroleB where +class CastSigningKeyRole keyroleA keyroleB where -- | Change the role of a 'SigningKey', if the representation permits. - castSigningKey :: SigningKey keyroleA -> SigningKey keyroleB + castSigningKey :: SigningKey keyroleA -> SigningKey keyroleB \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.KeysByron.html b/cardano-api/src/Cardano.Api.KeysByron.html index 700113e0c6d..b3194ef0402 100644 --- a/cardano-api/src/Cardano.Api.KeysByron.html +++ b/cardano-api/src/Cardano.Api.KeysByron.html @@ -74,10 +74,10 @@ data ByronKey data ByronKeyLegacy -class IsByronKey key where - byronKeyFormat :: ByronKeyFormat key +class IsByronKey key where + byronKeyFormat :: ByronKeyFormat key -data ByronKeyFormat key where +data ByronKeyFormat key where ByronLegacyKeyFormat :: ByronKeyFormat ByronKeyLegacy ByronModernKeyFormat :: ByronKeyFormat ByronKey @@ -87,14 +87,14 @@ toByronSigningKey :: SomeByronSigningKey -> Byron.SigningKey toByronSigningKey :: SomeByronSigningKey -> SigningKey -toByronSigningKey SomeByronSigningKey -bWit = +toByronSigningKey SomeByronSigningKey +bWit = case SomeByronSigningKey -bWit of - AByronSigningKeyLegacy (ByronSigningKeyLegacy sKey) -> SigningKey -sKey - AByronSigningKey (ByronSigningKey sKey) -> SigningKey -sKey +bWit of + AByronSigningKeyLegacy (ByronSigningKeyLegacy sKey) -> SigningKey +sKey + AByronSigningKey (ByronSigningKey sKey) -> SigningKey +sKey -- -- Byron key @@ -104,7 +104,7 @@ newtype VerificationKey ByronKey = ByronVerificationKey Byron.VerificationKey - deriving stock VerificationKey ByronKey -> VerificationKey ByronKey -> Bool + deriving stock VerificationKey ByronKey -> VerificationKey ByronKey -> Bool (VerificationKey ByronKey -> VerificationKey ByronKey -> Bool) -> (VerificationKey ByronKey -> VerificationKey ByronKey -> Bool) -> Eq (VerificationKey ByronKey) @@ -114,7 +114,7 @@ == :: VerificationKey ByronKey -> VerificationKey ByronKey -> Bool $c== :: VerificationKey ByronKey -> VerificationKey ByronKey -> Bool Eq - deriving (Int -> VerificationKey ByronKey -> ShowS + deriving (Int -> VerificationKey ByronKey -> ShowS [VerificationKey ByronKey] -> ShowS VerificationKey ByronKey -> String (Int -> VerificationKey ByronKey -> ShowS) @@ -129,14 +129,14 @@ $cshow :: VerificationKey ByronKey -> String showsPrec :: Int -> VerificationKey ByronKey -> ShowS $cshowsPrec :: Int -> VerificationKey ByronKey -> ShowS -Show, String -> VerificationKey ByronKey +Show, String -> VerificationKey ByronKey (String -> VerificationKey ByronKey) -> IsString (VerificationKey ByronKey) forall a. (String -> a) -> IsString a fromString :: String -> VerificationKey ByronKey $cfromString :: String -> VerificationKey ByronKey IsString) via UsingRawBytesHex (VerificationKey ByronKey) - deriving newtype (Typeable (VerificationKey ByronKey) + deriving newtype (Typeable (VerificationKey ByronKey) Typeable (VerificationKey ByronKey) -> (VerificationKey ByronKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -166,7 +166,7 @@ toCBOR :: VerificationKey ByronKey -> Encoding $ctoCBOR :: VerificationKey ByronKey -> Encoding $cp1ToCBOR :: Typeable (VerificationKey ByronKey) -ToCBOR, Typeable (VerificationKey ByronKey) +ToCBOR, Typeable (VerificationKey ByronKey) Decoder s (VerificationKey ByronKey) Typeable (VerificationKey ByronKey) -> (forall s. Decoder s (VerificationKey ByronKey)) @@ -183,7 +183,7 @@ $cfromCBOR :: forall s. Decoder s (VerificationKey ByronKey) $cp1FromCBOR :: Typeable (VerificationKey ByronKey) FromCBOR) - deriving anyclass HasTypeProxy (VerificationKey ByronKey) + deriving anyclass HasTypeProxy (VerificationKey ByronKey) HasTypeProxy (VerificationKey ByronKey) -> (VerificationKey ByronKey -> ByteString) -> (AsType (VerificationKey ByronKey) @@ -208,7 +208,7 @@ newtype SigningKey ByronKey = ByronSigningKey Byron.SigningKey - deriving (Int -> SigningKey ByronKey -> ShowS + deriving (Int -> SigningKey ByronKey -> ShowS [SigningKey ByronKey] -> ShowS SigningKey ByronKey -> String (Int -> SigningKey ByronKey -> ShowS) @@ -223,13 +223,13 @@ $cshow :: SigningKey ByronKey -> String showsPrec :: Int -> SigningKey ByronKey -> ShowS $cshowsPrec :: Int -> SigningKey ByronKey -> ShowS -Show, String -> SigningKey ByronKey +Show, String -> SigningKey ByronKey (String -> SigningKey ByronKey) -> IsString (SigningKey ByronKey) forall a. (String -> a) -> IsString a fromString :: String -> SigningKey ByronKey $cfromString :: String -> SigningKey ByronKey IsString) via UsingRawBytesHex (SigningKey ByronKey) - deriving newtype (Typeable (SigningKey ByronKey) + deriving newtype (Typeable (SigningKey ByronKey) Typeable (SigningKey ByronKey) -> (SigningKey ByronKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -259,7 +259,7 @@ toCBOR :: SigningKey ByronKey -> Encoding $ctoCBOR :: SigningKey ByronKey -> Encoding $cp1ToCBOR :: Typeable (SigningKey ByronKey) -ToCBOR, Typeable (SigningKey ByronKey) +ToCBOR, Typeable (SigningKey ByronKey) Decoder s (SigningKey ByronKey) Typeable (SigningKey ByronKey) -> (forall s. Decoder s (SigningKey ByronKey)) @@ -275,8 +275,8 @@ fromCBOR :: Decoder s (SigningKey ByronKey) $cfromCBOR :: forall s. Decoder s (SigningKey ByronKey) $cp1FromCBOR :: Typeable (SigningKey ByronKey) -FromCBOR) - deriving anyclass HasTypeProxy (SigningKey ByronKey) +FromCBOR) + deriving anyclass HasTypeProxy (SigningKey ByronKey) HasTypeProxy (SigningKey ByronKey) -> (SigningKey ByronKey -> ByteString) -> (AsType (SigningKey ByronKey) @@ -297,13 +297,13 @@ serialiseToCBOR :: SigningKey ByronKey -> ByteString $cserialiseToCBOR :: SigningKey ByronKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey ByronKey) -SerialiseAsCBOR +SerialiseAsCBOR deterministicSigningKey :: AsType ByronKey -> Crypto.Seed -> SigningKey ByronKey - deterministicSigningKey :: AsType ByronKey -> Seed -> SigningKey ByronKey -deterministicSigningKey AsType ByronKey -AsByronKey Seed -seed = + deterministicSigningKey :: AsType ByronKey -> Seed -> SigningKey ByronKey +deterministicSigningKey AsType ByronKey +AsByronKey Seed +seed = SigningKey -> SigningKey ByronKey ByronSigningKey ((VerificationKey, SigningKey) -> SigningKey forall a b. (a, b) -> b @@ -314,63 +314,63 @@ -> (VerificationKey, SigningKey) forall a. Seed -> (forall (m :: * -> *). MonadRandom m => m a) -> a Crypto.runMonadRandomWithSeed Seed -seed forall (m :: * -> *). +seed forall (m :: * -> *). MonadRandom m => m (VerificationKey, SigningKey) Byron.keyGen)) deterministicSigningKeySeedSize :: AsType ByronKey -> Word - deterministicSigningKeySeedSize :: AsType ByronKey -> Word -deterministicSigningKeySeedSize AsType ByronKey + deterministicSigningKeySeedSize :: AsType ByronKey -> Word +deterministicSigningKeySeedSize AsType ByronKey AsByronKey = Word 32 getVerificationKey :: SigningKey ByronKey -> VerificationKey ByronKey - getVerificationKey :: SigningKey ByronKey -> VerificationKey ByronKey -getVerificationKey (ByronSigningKey sk) = + getVerificationKey :: SigningKey ByronKey -> VerificationKey ByronKey +getVerificationKey (ByronSigningKey sk) = VerificationKey -> VerificationKey ByronKey ByronVerificationKey (SigningKey -> VerificationKey Byron.toVerification SigningKey -sk) +sk) verificationKeyHash :: VerificationKey ByronKey -> Hash ByronKey - verificationKeyHash :: VerificationKey ByronKey -> Hash ByronKey -verificationKeyHash (ByronVerificationKey vkey) = + verificationKeyHash :: VerificationKey ByronKey -> Hash ByronKey +verificationKeyHash (ByronVerificationKey vkey) = KeyHash -> Hash ByronKey ByronKeyHash (VerificationKey -> KeyHash Byron.hashKey VerificationKey -vkey) +vkey) instance HasTypeProxy ByronKey where data AsType ByronKey = AsByronKey - proxyToAsType :: Proxy ByronKey -> AsType ByronKey + proxyToAsType :: Proxy ByronKey -> AsType ByronKey proxyToAsType Proxy ByronKey _ = AsType ByronKey AsByronKey -instance HasTextEnvelope (VerificationKey ByronKey) where - textEnvelopeType :: AsType (VerificationKey ByronKey) -> TextEnvelopeType +instance HasTextEnvelope (VerificationKey ByronKey) where + textEnvelopeType :: AsType (VerificationKey ByronKey) -> TextEnvelopeType textEnvelopeType AsType (VerificationKey ByronKey) _ = TextEnvelopeType "PaymentVerificationKeyByron_ed25519_bip32" -instance HasTextEnvelope (SigningKey ByronKey) where - textEnvelopeType :: AsType (SigningKey ByronKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey ByronKey) +instance HasTextEnvelope (SigningKey ByronKey) where + textEnvelopeType :: AsType (SigningKey ByronKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey ByronKey) _ = TextEnvelopeType "PaymentSigningKeyByron_ed25519_bip32" instance SerialiseAsRawBytes (VerificationKey ByronKey) where - serialiseToRawBytes :: VerificationKey ByronKey -> ByteString -serialiseToRawBytes (ByronVerificationKey (Byron.VerificationKey xvk)) = + serialiseToRawBytes :: VerificationKey ByronKey -> ByteString +serialiseToRawBytes (ByronVerificationKey (Byron.VerificationKey xvk)) = XPub -> ByteString Crypto.HD.unXPub XPub -xvk +xvk - deserialiseFromRawBytes :: AsType (VerificationKey ByronKey) + deserialiseFromRawBytes :: AsType (VerificationKey ByronKey) -> ByteString -> Maybe (VerificationKey ByronKey) -deserialiseFromRawBytes (AsVerificationKey AsByronKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsByronKey) ByteString +bs = (String -> Maybe (VerificationKey ByronKey)) -> (XPub -> Maybe (VerificationKey ByronKey)) -> Either String XPub @@ -396,22 +396,22 @@ Byron.VerificationKey) (ByteString -> Either String XPub Crypto.HD.xpub ByteString -bs) +bs) instance SerialiseAsRawBytes (SigningKey ByronKey) where - serialiseToRawBytes :: SigningKey ByronKey -> ByteString -serialiseToRawBytes (ByronSigningKey (Byron.SigningKey xsk)) = + serialiseToRawBytes :: SigningKey ByronKey -> ByteString +serialiseToRawBytes (ByronSigningKey (Byron.SigningKey xsk)) = Encoding -> ByteString toStrictByteString (Encoding -> ByteString) -> Encoding -> ByteString forall a b. (a -> b) -> a -> b $ XPrv -> Encoding Crypto.toCBORXPrv XPrv -xsk +xsk - deserialiseFromRawBytes :: AsType (SigningKey ByronKey) + deserialiseFromRawBytes :: AsType (SigningKey ByronKey) -> ByteString -> Maybe (SigningKey ByronKey) -deserialiseFromRawBytes (AsSigningKey AsByronKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsByronKey) ByteString +bs = (DeserialiseFailure -> Maybe (SigningKey ByronKey)) -> (XPrv -> Maybe (SigningKey ByronKey)) -> Either DeserialiseFailure XPrv @@ -449,10 +449,10 @@ CBOR.deserialiseFromBytes forall s. Decoder s XPrv Byron.fromCBORXPrv (ByteString -> ByteString LB.fromStrict ByteString -bs)) +bs)) newtype instance Hash ByronKey = ByronKeyHash Byron.KeyHash - deriving (Hash ByronKey -> Hash ByronKey -> Bool + deriving (Hash ByronKey -> Hash ByronKey -> Bool (Hash ByronKey -> Hash ByronKey -> Bool) -> (Hash ByronKey -> Hash ByronKey -> Bool) -> Eq (Hash ByronKey) forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -460,7 +460,7 @@ $c/= :: Hash ByronKey -> Hash ByronKey -> Bool == :: Hash ByronKey -> Hash ByronKey -> Bool $c== :: Hash ByronKey -> Hash ByronKey -> Bool -Eq, Eq (Hash ByronKey) +Eq, Eq (Hash ByronKey) Eq (Hash ByronKey) -> (Hash ByronKey -> Hash ByronKey -> Ordering) -> (Hash ByronKey -> Hash ByronKey -> Bool) @@ -499,7 +499,7 @@ $ccompare :: Hash ByronKey -> Hash ByronKey -> Ordering $cp1Ord :: Eq (Hash ByronKey) Ord) - deriving (Int -> Hash ByronKey -> ShowS + deriving (Int -> Hash ByronKey -> ShowS [Hash ByronKey] -> ShowS Hash ByronKey -> String (Int -> Hash ByronKey -> ShowS) @@ -514,7 +514,7 @@ $cshow :: Hash ByronKey -> String showsPrec :: Int -> Hash ByronKey -> ShowS $cshowsPrec :: Int -> Hash ByronKey -> ShowS -Show, String -> Hash ByronKey +Show, String -> Hash ByronKey (String -> Hash ByronKey) -> IsString (Hash ByronKey) forall a. (String -> a) -> IsString a fromString :: String -> Hash ByronKey @@ -522,16 +522,16 @@ IsString) via UsingRawBytesHex (Hash ByronKey) instance SerialiseAsRawBytes (Hash ByronKey) where - serialiseToRawBytes :: Hash ByronKey -> ByteString -serialiseToRawBytes (ByronKeyHash (Byron.KeyHash vkh)) = + serialiseToRawBytes :: Hash ByronKey -> ByteString +serialiseToRawBytes (ByronKeyHash (Byron.KeyHash vkh)) = AbstractHash Blake2b_224 VerificationKey -> ByteString forall algo a. AbstractHash algo a -> ByteString Byron.abstractHashToBytes AbstractHash Blake2b_224 VerificationKey -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash ByronKey) -> ByteString -> Maybe (Hash ByronKey) -deserialiseFromRawBytes (AsHash AsByronKey) ByteString -bs = + deserialiseFromRawBytes :: AsType (Hash ByronKey) -> ByteString -> Maybe (Hash ByronKey) +deserialiseFromRawBytes (AsHash AsByronKey) ByteString +bs = KeyHash -> Hash ByronKey ByronKeyHash (KeyHash -> Hash ByronKey) -> (AbstractHash Blake2b_224 VerificationKey -> KeyHash) @@ -548,20 +548,20 @@ HashAlgorithm algo => ByteString -> Maybe (AbstractHash algo a) Byron.abstractHashFromBytes ByteString -bs +bs instance CastVerificationKeyRole ByronKey PaymentExtendedKey where - castVerificationKey :: VerificationKey ByronKey -> VerificationKey PaymentExtendedKey -castVerificationKey (ByronVerificationKey vk) = + castVerificationKey :: VerificationKey ByronKey -> VerificationKey PaymentExtendedKey +castVerificationKey (ByronVerificationKey vk) = XPub -> VerificationKey PaymentExtendedKey PaymentExtendedVerificationKey (VerificationKey -> XPub Byron.unVerificationKey VerificationKey -vk) +vk) instance CastVerificationKeyRole ByronKey PaymentKey where - castVerificationKey :: VerificationKey ByronKey -> VerificationKey PaymentKey -castVerificationKey = + castVerificationKey :: VerificationKey ByronKey -> VerificationKey PaymentKey +castVerificationKey = (VerificationKey PaymentExtendedKey -> VerificationKey PaymentKey forall keyroleA keyroleB. CastVerificationKeyRole keyroleA keyroleB => @@ -581,8 +581,8 @@ -> VerificationKey PaymentExtendedKey) instance IsByronKey ByronKey where - byronKeyFormat :: ByronKeyFormat ByronKey -byronKeyFormat = ByronKeyFormat ByronKey + byronKeyFormat :: ByronKeyFormat ByronKey +byronKeyFormat = ByronKeyFormat ByronKey ByronModernKeyFormat -- @@ -593,7 +593,7 @@ newtype VerificationKey ByronKeyLegacy = ByronVerificationKeyLegacy Byron.VerificationKey - deriving stock (VerificationKey ByronKeyLegacy + deriving stock (VerificationKey ByronKeyLegacy -> VerificationKey ByronKeyLegacy -> Bool (VerificationKey ByronKeyLegacy -> VerificationKey ByronKeyLegacy -> Bool) @@ -610,7 +610,7 @@ $c== :: VerificationKey ByronKeyLegacy -> VerificationKey ByronKeyLegacy -> Bool Eq) - deriving (Int -> VerificationKey ByronKeyLegacy -> ShowS + deriving (Int -> VerificationKey ByronKeyLegacy -> ShowS [VerificationKey ByronKeyLegacy] -> ShowS VerificationKey ByronKeyLegacy -> String (Int -> VerificationKey ByronKeyLegacy -> ShowS) @@ -625,14 +625,14 @@ $cshow :: VerificationKey ByronKeyLegacy -> String showsPrec :: Int -> VerificationKey ByronKeyLegacy -> ShowS $cshowsPrec :: Int -> VerificationKey ByronKeyLegacy -> ShowS -Show, String -> VerificationKey ByronKeyLegacy +Show, String -> VerificationKey ByronKeyLegacy (String -> VerificationKey ByronKeyLegacy) -> IsString (VerificationKey ByronKeyLegacy) forall a. (String -> a) -> IsString a fromString :: String -> VerificationKey ByronKeyLegacy $cfromString :: String -> VerificationKey ByronKeyLegacy IsString) via UsingRawBytesHex (VerificationKey ByronKeyLegacy) - deriving newtype (Typeable (VerificationKey ByronKeyLegacy) + deriving newtype (Typeable (VerificationKey ByronKeyLegacy) Typeable (VerificationKey ByronKeyLegacy) -> (VerificationKey ByronKeyLegacy -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -662,7 +662,7 @@ toCBOR :: VerificationKey ByronKeyLegacy -> Encoding $ctoCBOR :: VerificationKey ByronKeyLegacy -> Encoding $cp1ToCBOR :: Typeable (VerificationKey ByronKeyLegacy) -ToCBOR, Typeable (VerificationKey ByronKeyLegacy) +ToCBOR, Typeable (VerificationKey ByronKeyLegacy) Decoder s (VerificationKey ByronKeyLegacy) Typeable (VerificationKey ByronKeyLegacy) -> (forall s. Decoder s (VerificationKey ByronKeyLegacy)) @@ -678,8 +678,8 @@ fromCBOR :: Decoder s (VerificationKey ByronKeyLegacy) $cfromCBOR :: forall s. Decoder s (VerificationKey ByronKeyLegacy) $cp1FromCBOR :: Typeable (VerificationKey ByronKeyLegacy) -FromCBOR) - deriving anyclass HasTypeProxy (VerificationKey ByronKeyLegacy) +FromCBOR) + deriving anyclass HasTypeProxy (VerificationKey ByronKeyLegacy) HasTypeProxy (VerificationKey ByronKeyLegacy) -> (VerificationKey ByronKeyLegacy -> ByteString) -> (AsType (VerificationKey ByronKeyLegacy) @@ -704,11 +704,11 @@ serialiseToCBOR :: VerificationKey ByronKeyLegacy -> ByteString $cserialiseToCBOR :: VerificationKey ByronKeyLegacy -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey ByronKeyLegacy) -SerialiseAsCBOR +SerialiseAsCBOR newtype SigningKey ByronKeyLegacy = ByronSigningKeyLegacy Byron.SigningKey - deriving (Int -> SigningKey ByronKeyLegacy -> ShowS + deriving (Int -> SigningKey ByronKeyLegacy -> ShowS [SigningKey ByronKeyLegacy] -> ShowS SigningKey ByronKeyLegacy -> String (Int -> SigningKey ByronKeyLegacy -> ShowS) @@ -723,14 +723,14 @@ $cshow :: SigningKey ByronKeyLegacy -> String showsPrec :: Int -> SigningKey ByronKeyLegacy -> ShowS $cshowsPrec :: Int -> SigningKey ByronKeyLegacy -> ShowS -Show, String -> SigningKey ByronKeyLegacy +Show, String -> SigningKey ByronKeyLegacy (String -> SigningKey ByronKeyLegacy) -> IsString (SigningKey ByronKeyLegacy) forall a. (String -> a) -> IsString a fromString :: String -> SigningKey ByronKeyLegacy $cfromString :: String -> SigningKey ByronKeyLegacy IsString) via UsingRawBytesHex (SigningKey ByronKeyLegacy) - deriving newtype (Typeable (SigningKey ByronKeyLegacy) + deriving newtype (Typeable (SigningKey ByronKeyLegacy) Typeable (SigningKey ByronKeyLegacy) -> (SigningKey ByronKeyLegacy -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -760,7 +760,7 @@ toCBOR :: SigningKey ByronKeyLegacy -> Encoding $ctoCBOR :: SigningKey ByronKeyLegacy -> Encoding $cp1ToCBOR :: Typeable (SigningKey ByronKeyLegacy) -ToCBOR, Typeable (SigningKey ByronKeyLegacy) +ToCBOR, Typeable (SigningKey ByronKeyLegacy) Decoder s (SigningKey ByronKeyLegacy) Typeable (SigningKey ByronKeyLegacy) -> (forall s. Decoder s (SigningKey ByronKeyLegacy)) @@ -776,8 +776,8 @@ fromCBOR :: Decoder s (SigningKey ByronKeyLegacy) $cfromCBOR :: forall s. Decoder s (SigningKey ByronKeyLegacy) $cp1FromCBOR :: Typeable (SigningKey ByronKeyLegacy) -FromCBOR) - deriving anyclass HasTypeProxy (SigningKey ByronKeyLegacy) +FromCBOR) + deriving anyclass HasTypeProxy (SigningKey ByronKeyLegacy) HasTypeProxy (SigningKey ByronKeyLegacy) -> (SigningKey ByronKeyLegacy -> ByteString) -> (AsType (SigningKey ByronKeyLegacy) @@ -798,11 +798,11 @@ serialiseToCBOR :: SigningKey ByronKeyLegacy -> ByteString $cserialiseToCBOR :: SigningKey ByronKeyLegacy -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey ByronKeyLegacy) -SerialiseAsCBOR +SerialiseAsCBOR deterministicSigningKey :: AsType ByronKeyLegacy -> Crypto.Seed -> SigningKey ByronKeyLegacy - deterministicSigningKey :: AsType ByronKeyLegacy -> Seed -> SigningKey ByronKeyLegacy -deterministicSigningKey AsType ByronKeyLegacy + deterministicSigningKey :: AsType ByronKeyLegacy -> Seed -> SigningKey ByronKeyLegacy +deterministicSigningKey AsType ByronKeyLegacy _ Seed _ = String -> SigningKey ByronKeyLegacy forall a. HasCallStack => String -> a @@ -810,48 +810,48 @@ "Please generate a non legacy Byron key instead" deterministicSigningKeySeedSize :: AsType ByronKeyLegacy -> Word - deterministicSigningKeySeedSize :: AsType ByronKeyLegacy -> Word -deterministicSigningKeySeedSize AsType ByronKeyLegacy + deterministicSigningKeySeedSize :: AsType ByronKeyLegacy -> Word +deterministicSigningKeySeedSize AsType ByronKeyLegacy AsByronKeyLegacy = Word 32 getVerificationKey :: SigningKey ByronKeyLegacy -> VerificationKey ByronKeyLegacy - getVerificationKey :: SigningKey ByronKeyLegacy -> VerificationKey ByronKeyLegacy -getVerificationKey (ByronSigningKeyLegacy sk) = + getVerificationKey :: SigningKey ByronKeyLegacy -> VerificationKey ByronKeyLegacy +getVerificationKey (ByronSigningKeyLegacy sk) = VerificationKey -> VerificationKey ByronKeyLegacy ByronVerificationKeyLegacy (SigningKey -> VerificationKey Byron.toVerification SigningKey -sk) +sk) verificationKeyHash :: VerificationKey ByronKeyLegacy -> Hash ByronKeyLegacy - verificationKeyHash :: VerificationKey ByronKeyLegacy -> Hash ByronKeyLegacy -verificationKeyHash (ByronVerificationKeyLegacy vkey) = + verificationKeyHash :: VerificationKey ByronKeyLegacy -> Hash ByronKeyLegacy +verificationKeyHash (ByronVerificationKeyLegacy vkey) = KeyHash -> Hash ByronKeyLegacy ByronKeyHashLegacy (VerificationKey -> KeyHash Byron.hashKey VerificationKey -vkey) +vkey) instance HasTypeProxy ByronKeyLegacy where data AsType ByronKeyLegacy = AsByronKeyLegacy - proxyToAsType :: Proxy ByronKeyLegacy -> AsType ByronKeyLegacy -proxyToAsType Proxy ByronKeyLegacy + proxyToAsType :: Proxy ByronKeyLegacy -> AsType ByronKeyLegacy +proxyToAsType Proxy ByronKeyLegacy _ = AsType ByronKeyLegacy AsByronKeyLegacy -instance HasTextEnvelope (VerificationKey ByronKeyLegacy) where - textEnvelopeType :: AsType (VerificationKey ByronKeyLegacy) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey ByronKeyLegacy) +instance HasTextEnvelope (VerificationKey ByronKeyLegacy) where + textEnvelopeType :: AsType (VerificationKey ByronKeyLegacy) -> TextEnvelopeType +textEnvelopeType AsType (VerificationKey ByronKeyLegacy) _ = TextEnvelopeType "PaymentVerificationKeyByronLegacy_ed25519_bip32" -instance HasTextEnvelope (SigningKey ByronKeyLegacy) where - textEnvelopeType :: AsType (SigningKey ByronKeyLegacy) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey ByronKeyLegacy) +instance HasTextEnvelope (SigningKey ByronKeyLegacy) where + textEnvelopeType :: AsType (SigningKey ByronKeyLegacy) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey ByronKeyLegacy) _ = TextEnvelopeType "PaymentSigningKeyByronLegacy_ed25519_bip32" newtype instance Hash ByronKeyLegacy = ByronKeyHashLegacy Byron.KeyHash - deriving (Hash ByronKeyLegacy -> Hash ByronKeyLegacy -> Bool + deriving (Hash ByronKeyLegacy -> Hash ByronKeyLegacy -> Bool (Hash ByronKeyLegacy -> Hash ByronKeyLegacy -> Bool) -> (Hash ByronKeyLegacy -> Hash ByronKeyLegacy -> Bool) -> Eq (Hash ByronKeyLegacy) @@ -860,7 +860,7 @@ $c/= :: Hash ByronKeyLegacy -> Hash ByronKeyLegacy -> Bool == :: Hash ByronKeyLegacy -> Hash ByronKeyLegacy -> Bool $c== :: Hash ByronKeyLegacy -> Hash ByronKeyLegacy -> Bool -Eq, Eq (Hash ByronKeyLegacy) +Eq, Eq (Hash ByronKeyLegacy) Eq (Hash ByronKeyLegacy) -> (Hash ByronKeyLegacy -> Hash ByronKeyLegacy -> Ordering) -> (Hash ByronKeyLegacy -> Hash ByronKeyLegacy -> Bool) @@ -901,7 +901,7 @@ $ccompare :: Hash ByronKeyLegacy -> Hash ByronKeyLegacy -> Ordering $cp1Ord :: Eq (Hash ByronKeyLegacy) Ord) - deriving (Int -> Hash ByronKeyLegacy -> ShowS + deriving (Int -> Hash ByronKeyLegacy -> ShowS [Hash ByronKeyLegacy] -> ShowS Hash ByronKeyLegacy -> String (Int -> Hash ByronKeyLegacy -> ShowS) @@ -916,7 +916,7 @@ $cshow :: Hash ByronKeyLegacy -> String showsPrec :: Int -> Hash ByronKeyLegacy -> ShowS $cshowsPrec :: Int -> Hash ByronKeyLegacy -> ShowS -Show, String -> Hash ByronKeyLegacy +Show, String -> Hash ByronKeyLegacy (String -> Hash ByronKeyLegacy) -> IsString (Hash ByronKeyLegacy) forall a. (String -> a) -> IsString a fromString :: String -> Hash ByronKeyLegacy @@ -924,17 +924,17 @@ IsString) via UsingRawBytesHex (Hash ByronKeyLegacy) instance SerialiseAsRawBytes (Hash ByronKeyLegacy) where - serialiseToRawBytes :: Hash ByronKeyLegacy -> ByteString -serialiseToRawBytes (ByronKeyHashLegacy (Byron.KeyHash vkh)) = + serialiseToRawBytes :: Hash ByronKeyLegacy -> ByteString +serialiseToRawBytes (ByronKeyHashLegacy (Byron.KeyHash vkh)) = AbstractHash Blake2b_224 VerificationKey -> ByteString forall algo a. AbstractHash algo a -> ByteString Byron.abstractHashToBytes AbstractHash Blake2b_224 VerificationKey -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash ByronKeyLegacy) + deserialiseFromRawBytes :: AsType (Hash ByronKeyLegacy) -> ByteString -> Maybe (Hash ByronKeyLegacy) -deserialiseFromRawBytes (AsHash AsByronKeyLegacy) ByteString -bs = +deserialiseFromRawBytes (AsHash AsByronKeyLegacy) ByteString +bs = KeyHash -> Hash ByronKeyLegacy ByronKeyHashLegacy (KeyHash -> Hash ByronKeyLegacy) -> (AbstractHash Blake2b_224 VerificationKey -> KeyHash) @@ -951,19 +951,19 @@ HashAlgorithm algo => ByteString -> Maybe (AbstractHash algo a) Byron.abstractHashFromBytes ByteString -bs +bs instance SerialiseAsRawBytes (VerificationKey ByronKeyLegacy) where - serialiseToRawBytes :: VerificationKey ByronKeyLegacy -> ByteString -serialiseToRawBytes (ByronVerificationKeyLegacy (Byron.VerificationKey xvk)) = + serialiseToRawBytes :: VerificationKey ByronKeyLegacy -> ByteString +serialiseToRawBytes (ByronVerificationKeyLegacy (Byron.VerificationKey xvk)) = XPub -> ByteString Crypto.HD.unXPub XPub -xvk +xvk - deserialiseFromRawBytes :: AsType (VerificationKey ByronKeyLegacy) + deserialiseFromRawBytes :: AsType (VerificationKey ByronKeyLegacy) -> ByteString -> Maybe (VerificationKey ByronKeyLegacy) -deserialiseFromRawBytes (AsVerificationKey AsByronKeyLegacy) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsByronKeyLegacy) ByteString +bs = (String -> Maybe (VerificationKey ByronKeyLegacy)) -> (XPub -> Maybe (VerificationKey ByronKeyLegacy)) -> Either String XPub @@ -993,19 +993,19 @@ Byron.VerificationKey) (ByteString -> Either String XPub Crypto.HD.xpub ByteString -bs) +bs) instance SerialiseAsRawBytes (SigningKey ByronKeyLegacy) where - serialiseToRawBytes :: SigningKey ByronKeyLegacy -> ByteString -serialiseToRawBytes (ByronSigningKeyLegacy (Byron.SigningKey xsk)) = + serialiseToRawBytes :: SigningKey ByronKeyLegacy -> ByteString +serialiseToRawBytes (ByronSigningKeyLegacy (Byron.SigningKey xsk)) = XPrv -> ByteString Crypto.HD.unXPrv XPrv -xsk +xsk - deserialiseFromRawBytes :: AsType (SigningKey ByronKeyLegacy) + deserialiseFromRawBytes :: AsType (SigningKey ByronKeyLegacy) -> ByteString -> Maybe (SigningKey ByronKeyLegacy) -deserialiseFromRawBytes (AsSigningKey AsByronKeyLegacy) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsByronKeyLegacy) ByteString +bs = (DeserialiseFailure -> Maybe (SigningKey ByronKeyLegacy)) -> ((ByteString, SigningKey) -> Maybe (SigningKey ByronKeyLegacy)) -> Either DeserialiseFailure (ByteString, SigningKey) @@ -1038,51 +1038,51 @@ (forall s. Decoder s a) -> ByteString -> Either DeserialiseFailure (ByteString, a) CBOR.deserialiseFromBytes forall s. Decoder s SigningKey -decodeLegacyDelegateKey (ByteString -> Either DeserialiseFailure (ByteString, SigningKey)) +decodeLegacyDelegateKey (ByteString -> Either DeserialiseFailure (ByteString, SigningKey)) -> ByteString -> Either DeserialiseFailure (ByteString, SigningKey) forall a b. (a -> b) -> a -> b $ ByteString -> ByteString LB.fromStrict ByteString -bs) +bs) where -- Stolen from: cardano-sl/binary/src/Pos/Binary/Class/Core.hs -- | Enforces that the input size is the same as the decoded one, failing in -- case it's not. - enforceSize :: Text -> Int -> CBOR.Decoder s () - enforceSize :: Text -> Int -> Decoder s () -enforceSize Text -lbl Int -requestedSize = Decoder s Int + enforceSize :: Text -> Int -> CBOR.Decoder s () + enforceSize :: Text -> Int -> Decoder s () +enforceSize Text +lbl Int +requestedSize = Decoder s Int forall s. Decoder s Int CBOR.decodeListLenCanonical Decoder s Int -> (Int -> Decoder s ()) -> Decoder s () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= Int -> Text -> Int -> Decoder s () forall s. Int -> Text -> Int -> Decoder s () -matchSize Int -requestedSize Text -lbl +matchSize Int +requestedSize Text +lbl -- Stolen from: cardano-sl/binary/src/Pos/Binary/Class/Core.hs -- | Compare two sizes, failing if they are not equal. - matchSize :: Int -> Text -> Int -> CBOR.Decoder s () - matchSize :: Int -> Text -> Int -> Decoder s () -matchSize Int -requestedSize Text -lbl Int -actualSize = + matchSize :: Int -> Text -> Int -> CBOR.Decoder s () + matchSize :: Int -> Text -> Int -> Decoder s () +matchSize Int +requestedSize Text +lbl Int +actualSize = Bool -> Decoder s () -> Decoder s () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Int -actualSize Int -> Int -> Bool +actualSize Int -> Int -> Bool forall a. Eq a => a -> a -> Bool /= Int -requestedSize) (Decoder s () -> Decoder s ()) -> Decoder s () -> Decoder s () +requestedSize) (Decoder s () -> Decoder s ()) -> Decoder s () -> Decoder s () forall a b. (a -> b) -> a -> b $ Text -> Decoder s () forall e s a. Buildable e => e -> Decoder s a cborError ( Text -lbl Text -> Text -> Text +lbl Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " failed the size check. Expected " Text -> Text -> Text @@ -1091,7 +1091,7 @@ Text.pack (Int -> String forall a. Show a => a -> String show Int -requestedSize) +requestedSize) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -1101,12 +1101,12 @@ Text.pack (Int -> String forall a. Show a => a -> String show Int -actualSize) +actualSize) ) - decodeXPrv :: CBOR.Decoder s Wallet.XPrv - decodeXPrv :: Decoder s XPrv -decodeXPrv = Decoder s ByteString + decodeXPrv :: CBOR.Decoder s Wallet.XPrv + decodeXPrv :: Decoder s XPrv +decodeXPrv = Decoder s ByteString forall s. Decoder s ByteString CBOR.decodeBytesCanonical Decoder s ByteString -> (ByteString -> Decoder s XPrv) -> Decoder s XPrv @@ -1125,29 +1125,29 @@ -- | Decoder for a Byron/Classic signing key. -- Lifted from cardano-sl legacy codebase. - decodeLegacyDelegateKey :: CBOR.Decoder s Byron.SigningKey - decodeLegacyDelegateKey :: Decoder s SigningKey -decodeLegacyDelegateKey = do + decodeLegacyDelegateKey :: CBOR.Decoder s Byron.SigningKey + decodeLegacyDelegateKey :: Decoder s SigningKey +decodeLegacyDelegateKey = do Text -> Int -> Decoder s () forall s. Text -> Int -> Decoder s () -enforceSize Text +enforceSize Text "UserSecret" Int 4 ByteString _ <- do Text -> Int -> Decoder s () forall s. Text -> Int -> Decoder s () -enforceSize Text +enforceSize Text "vss" Int 1 Decoder s ByteString forall s. Decoder s ByteString CBOR.decodeBytes - SigningKey -pkey <- do + SigningKey +pkey <- do Text -> Int -> Decoder s () forall s. Text -> Int -> Decoder s () -enforceSize Text +enforceSize Text "pkey" Int 1 XPrv -> SigningKey @@ -1155,7 +1155,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Decoder s XPrv forall s. Decoder s XPrv -decodeXPrv +decodeXPrv [()] _ <- do Decoder s () @@ -1176,23 +1176,23 @@ _ <- do Text -> Int -> Decoder s () forall s. Text -> Int -> Decoder s () -enforceSize Text +enforceSize Text "wallet" Int 0 SigningKey -> Decoder s SigningKey forall (f :: * -> *) a. Applicative f => a -> f a pure SigningKey -pkey +pkey instance CastVerificationKeyRole ByronKeyLegacy ByronKey where - castVerificationKey :: VerificationKey ByronKeyLegacy -> VerificationKey ByronKey -castVerificationKey (ByronVerificationKeyLegacy vk) = + castVerificationKey :: VerificationKey ByronKeyLegacy -> VerificationKey ByronKey +castVerificationKey (ByronVerificationKeyLegacy vk) = VerificationKey -> VerificationKey ByronKey ByronVerificationKey VerificationKey -vk +vk instance IsByronKey ByronKeyLegacy where - byronKeyFormat :: ByronKeyFormat ByronKeyLegacy -byronKeyFormat = ByronKeyFormat ByronKeyLegacy + byronKeyFormat :: ByronKeyFormat ByronKeyLegacy +byronKeyFormat = ByronKeyFormat ByronKeyLegacy ByronLegacyKeyFormat \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.KeysPraos.html b/cardano-api/src/Cardano.Api.KeysPraos.html index 24dd88dcc0d..cc7a30f8431 100644 --- a/cardano-api/src/Cardano.Api.KeysPraos.html +++ b/cardano-api/src/Cardano.Api.KeysPraos.html @@ -51,7 +51,7 @@ instance HasTypeProxy KesKey where data AsType KesKey = AsKesKey - proxyToAsType :: Proxy KesKey -> AsType KesKey + proxyToAsType :: Proxy KesKey -> AsType KesKey proxyToAsType Proxy KesKey _ = AsType KesKey AsKesKey @@ -60,7 +60,7 @@ newtype VerificationKey KesKey = KesVerificationKey (Shelley.VerKeyKES StandardCrypto) - deriving stock (VerificationKey KesKey -> VerificationKey KesKey -> Bool + deriving stock (VerificationKey KesKey -> VerificationKey KesKey -> Bool (VerificationKey KesKey -> VerificationKey KesKey -> Bool) -> (VerificationKey KesKey -> VerificationKey KesKey -> Bool) -> Eq (VerificationKey KesKey) @@ -70,7 +70,7 @@ == :: VerificationKey KesKey -> VerificationKey KesKey -> Bool $c== :: VerificationKey KesKey -> VerificationKey KesKey -> Bool Eq) - deriving (Int -> VerificationKey KesKey -> ShowS + deriving (Int -> VerificationKey KesKey -> ShowS [VerificationKey KesKey] -> ShowS VerificationKey KesKey -> String (Int -> VerificationKey KesKey -> ShowS) @@ -85,14 +85,14 @@ $cshow :: VerificationKey KesKey -> String showsPrec :: Int -> VerificationKey KesKey -> ShowS $cshowsPrec :: Int -> VerificationKey KesKey -> ShowS -Show, String -> VerificationKey KesKey +Show, String -> VerificationKey KesKey (String -> VerificationKey KesKey) -> IsString (VerificationKey KesKey) forall a. (String -> a) -> IsString a fromString :: String -> VerificationKey KesKey $cfromString :: String -> VerificationKey KesKey IsString) via UsingRawBytesHex (VerificationKey KesKey) - deriving newtype (Typeable (VerificationKey KesKey) + deriving newtype (Typeable (VerificationKey KesKey) Typeable (VerificationKey KesKey) -> (VerificationKey KesKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -122,7 +122,7 @@ toCBOR :: VerificationKey KesKey -> Encoding $ctoCBOR :: VerificationKey KesKey -> Encoding $cp1ToCBOR :: Typeable (VerificationKey KesKey) -ToCBOR, Typeable (VerificationKey KesKey) +ToCBOR, Typeable (VerificationKey KesKey) Decoder s (VerificationKey KesKey) Typeable (VerificationKey KesKey) -> (forall s. Decoder s (VerificationKey KesKey)) @@ -139,7 +139,7 @@ $cfromCBOR :: forall s. Decoder s (VerificationKey KesKey) $cp1FromCBOR :: Typeable (VerificationKey KesKey) FromCBOR) - deriving anyclass HasTypeProxy (VerificationKey KesKey) + deriving anyclass HasTypeProxy (VerificationKey KesKey) HasTypeProxy (VerificationKey KesKey) -> (VerificationKey KesKey -> ByteString) -> (AsType (VerificationKey KesKey) @@ -164,7 +164,7 @@ newtype SigningKey KesKey = KesSigningKey (Shelley.SignKeyKES StandardCrypto) - deriving (Int -> SigningKey KesKey -> ShowS + deriving (Int -> SigningKey KesKey -> ShowS [SigningKey KesKey] -> ShowS SigningKey KesKey -> String (Int -> SigningKey KesKey -> ShowS) @@ -179,13 +179,13 @@ $cshow :: SigningKey KesKey -> String showsPrec :: Int -> SigningKey KesKey -> ShowS $cshowsPrec :: Int -> SigningKey KesKey -> ShowS -Show, String -> SigningKey KesKey +Show, String -> SigningKey KesKey (String -> SigningKey KesKey) -> IsString (SigningKey KesKey) forall a. (String -> a) -> IsString a fromString :: String -> SigningKey KesKey $cfromString :: String -> SigningKey KesKey IsString) via UsingRawBytesHex (SigningKey KesKey) - deriving newtype (Typeable (SigningKey KesKey) + deriving newtype (Typeable (SigningKey KesKey) Typeable (SigningKey KesKey) -> (SigningKey KesKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -215,7 +215,7 @@ toCBOR :: SigningKey KesKey -> Encoding $ctoCBOR :: SigningKey KesKey -> Encoding $cp1ToCBOR :: Typeable (SigningKey KesKey) -ToCBOR, Typeable (SigningKey KesKey) +ToCBOR, Typeable (SigningKey KesKey) Decoder s (SigningKey KesKey) Typeable (SigningKey KesKey) -> (forall s. Decoder s (SigningKey KesKey)) @@ -231,8 +231,8 @@ fromCBOR :: Decoder s (SigningKey KesKey) $cfromCBOR :: forall s. Decoder s (SigningKey KesKey) $cp1FromCBOR :: Typeable (SigningKey KesKey) -FromCBOR) - deriving anyclass HasTypeProxy (SigningKey KesKey) +FromCBOR) + deriving anyclass HasTypeProxy (SigningKey KesKey) HasTypeProxy (SigningKey KesKey) -> (SigningKey KesKey -> ByteString) -> (AsType (SigningKey KesKey) @@ -253,12 +253,12 @@ serialiseToCBOR :: SigningKey KesKey -> ByteString $cserialiseToCBOR :: SigningKey KesKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey KesKey) -SerialiseAsCBOR +SerialiseAsCBOR --This loses the mlock safety of the seed, since it starts from a normal in-memory seed. deterministicSigningKey :: AsType KesKey -> Crypto.Seed -> SigningKey KesKey - deterministicSigningKey :: AsType KesKey -> Seed -> SigningKey KesKey -deterministicSigningKey AsType KesKey + deterministicSigningKey :: AsType KesKey -> Seed -> SigningKey KesKey +deterministicSigningKey AsType KesKey AsKesKey = SignKeyKES StandardCrypto -> SigningKey KesKey SignKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -> SigningKey KesKey @@ -273,35 +273,35 @@ Crypto.genKeyKES deterministicSigningKeySeedSize :: AsType KesKey -> Word - deterministicSigningKeySeedSize :: AsType KesKey -> Word -deterministicSigningKeySeedSize AsType KesKey + deterministicSigningKeySeedSize :: AsType KesKey -> Word +deterministicSigningKeySeedSize AsType KesKey AsKesKey = Proxy (Sum6KES Ed25519DSIGN Blake2b_256) -> Word forall v (proxy :: * -> *). KESAlgorithm v => proxy v -> Word Crypto.seedSizeKES Proxy (KES StandardCrypto) Proxy (Sum6KES Ed25519DSIGN Blake2b_256) -proxy +proxy where - proxy :: Proxy (Shelley.KES StandardCrypto) - proxy :: Proxy (KES StandardCrypto) -proxy = Proxy (KES StandardCrypto) + proxy :: Proxy (Shelley.KES StandardCrypto) + proxy :: Proxy (KES StandardCrypto) +proxy = Proxy (KES StandardCrypto) forall k (t :: k). Proxy t Proxy getVerificationKey :: SigningKey KesKey -> VerificationKey KesKey - getVerificationKey :: SigningKey KesKey -> VerificationKey KesKey -getVerificationKey (KesSigningKey sk) = + getVerificationKey :: SigningKey KesKey -> VerificationKey KesKey +getVerificationKey (KesSigningKey sk) = VerKeyKES StandardCrypto -> VerificationKey KesKey KesVerificationKey (SignKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -> VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) forall v. KESAlgorithm v => SignKeyKES v -> VerKeyKES v Crypto.deriveVerKeyKES SignKeyKES StandardCrypto SignKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -sk) +sk) verificationKeyHash :: VerificationKey KesKey -> Hash KesKey - verificationKeyHash :: VerificationKey KesKey -> Hash KesKey -verificationKeyHash (KesVerificationKey vkey) = + verificationKeyHash :: VerificationKey KesKey -> Hash KesKey +verificationKeyHash (KesVerificationKey vkey) = Hash StandardCrypto (VerKeyKES StandardCrypto) -> Hash KesKey KesKeyHash (VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -> Hash Blake2b_256 (VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256)) @@ -310,22 +310,22 @@ VerKeyKES v -> Hash h (VerKeyKES v) Crypto.hashVerKeyKES VerKeyKES StandardCrypto VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -vkey) +vkey) instance SerialiseAsRawBytes (VerificationKey KesKey) where - serialiseToRawBytes :: VerificationKey KesKey -> ByteString -serialiseToRawBytes (KesVerificationKey vk) = + serialiseToRawBytes :: VerificationKey KesKey -> ByteString +serialiseToRawBytes (KesVerificationKey vk) = VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -> ByteString forall v. KESAlgorithm v => VerKeyKES v -> ByteString Crypto.rawSerialiseVerKeyKES VerKeyKES StandardCrypto VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -vk +vk - deserialiseFromRawBytes :: AsType (VerificationKey KesKey) + deserialiseFromRawBytes :: AsType (VerificationKey KesKey) -> ByteString -> Maybe (VerificationKey KesKey) -deserialiseFromRawBytes (AsVerificationKey AsKesKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsKesKey) ByteString +bs = VerKeyKES StandardCrypto -> VerificationKey KesKey VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -> VerificationKey KesKey @@ -338,21 +338,21 @@ ByteString -> Maybe (VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256)) forall v. KESAlgorithm v => ByteString -> Maybe (VerKeyKES v) Crypto.rawDeserialiseVerKeyKES ByteString -bs +bs instance SerialiseAsRawBytes (SigningKey KesKey) where - serialiseToRawBytes :: SigningKey KesKey -> ByteString -serialiseToRawBytes (KesSigningKey sk) = + serialiseToRawBytes :: SigningKey KesKey -> ByteString +serialiseToRawBytes (KesSigningKey sk) = SignKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -> ByteString forall v. KESAlgorithm v => SignKeyKES v -> ByteString Crypto.rawSerialiseSignKeyKES SignKeyKES StandardCrypto SignKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -sk +sk - deserialiseFromRawBytes :: AsType (SigningKey KesKey) + deserialiseFromRawBytes :: AsType (SigningKey KesKey) -> ByteString -> Maybe (SigningKey KesKey) -deserialiseFromRawBytes (AsSigningKey AsKesKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsKesKey) ByteString +bs = SignKeyKES StandardCrypto -> SigningKey KesKey SignKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) -> SigningKey KesKey KesSigningKey (SignKeyKES (Sum6KES Ed25519DSIGN Blake2b_256) @@ -363,25 +363,25 @@ <$> ByteString -> Maybe (SignKeyKES (Sum6KES Ed25519DSIGN Blake2b_256)) forall v. KESAlgorithm v => ByteString -> Maybe (SignKeyKES v) Crypto.rawDeserialiseSignKeyKES ByteString -bs +bs instance SerialiseAsBech32 (VerificationKey KesKey) where - bech32PrefixFor :: VerificationKey KesKey -> Text + bech32PrefixFor :: VerificationKey KesKey -> Text bech32PrefixFor VerificationKey KesKey _ = Text "kes_vk" - bech32PrefixesPermitted :: AsType (VerificationKey KesKey) -> [Text] + bech32PrefixesPermitted :: AsType (VerificationKey KesKey) -> [Text] bech32PrefixesPermitted AsType (VerificationKey KesKey) _ = [Text "kes_vk"] instance SerialiseAsBech32 (SigningKey KesKey) where - bech32PrefixFor :: SigningKey KesKey -> Text -bech32PrefixFor SigningKey KesKey + bech32PrefixFor :: SigningKey KesKey -> Text +bech32PrefixFor SigningKey KesKey _ = Text "kes_sk" - bech32PrefixesPermitted :: AsType (SigningKey KesKey) -> [Text] -bech32PrefixesPermitted AsType (SigningKey KesKey) + bech32PrefixesPermitted :: AsType (SigningKey KesKey) -> [Text] +bech32PrefixesPermitted AsType (SigningKey KesKey) _ = [Text "kes_sk"] @@ -389,7 +389,7 @@ newtype instance Hash KesKey = KesKeyHash (Shelley.Hash StandardCrypto (Shelley.VerKeyKES StandardCrypto)) - deriving stock (Hash KesKey -> Hash KesKey -> Bool + deriving stock (Hash KesKey -> Hash KesKey -> Bool (Hash KesKey -> Hash KesKey -> Bool) -> (Hash KesKey -> Hash KesKey -> Bool) -> Eq (Hash KesKey) forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -397,7 +397,7 @@ $c/= :: Hash KesKey -> Hash KesKey -> Bool == :: Hash KesKey -> Hash KesKey -> Bool $c== :: Hash KesKey -> Hash KesKey -> Bool -Eq, Eq (Hash KesKey) +Eq, Eq (Hash KesKey) Eq (Hash KesKey) -> (Hash KesKey -> Hash KesKey -> Ordering) -> (Hash KesKey -> Hash KesKey -> Bool) @@ -436,7 +436,7 @@ $ccompare :: Hash KesKey -> Hash KesKey -> Ordering $cp1Ord :: Eq (Hash KesKey) Ord) - deriving (Int -> Hash KesKey -> ShowS + deriving (Int -> Hash KesKey -> ShowS [Hash KesKey] -> ShowS Hash KesKey -> String (Int -> Hash KesKey -> ShowS) @@ -451,7 +451,7 @@ $cshow :: Hash KesKey -> String showsPrec :: Int -> Hash KesKey -> ShowS $cshowsPrec :: Int -> Hash KesKey -> ShowS -Show, String -> Hash KesKey +Show, String -> Hash KesKey (String -> Hash KesKey) -> IsString (Hash KesKey) forall a. (String -> a) -> IsString a fromString :: String -> Hash KesKey @@ -459,18 +459,18 @@ IsString) via UsingRawBytesHex (Hash VrfKey) instance SerialiseAsRawBytes (Hash KesKey) where - serialiseToRawBytes :: Hash KesKey -> ByteString -serialiseToRawBytes (KesKeyHash vkh) = + serialiseToRawBytes :: Hash KesKey -> ByteString +serialiseToRawBytes (KesKeyHash vkh) = Hash Blake2b_256 (VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256)) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash StandardCrypto (VerKeyKES StandardCrypto) Hash Blake2b_256 (VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256)) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash KesKey) -> ByteString -> Maybe (Hash KesKey) -deserialiseFromRawBytes (AsHash AsKesKey) ByteString -bs = + deserialiseFromRawBytes :: AsType (Hash KesKey) -> ByteString -> Maybe (Hash KesKey) +deserialiseFromRawBytes (AsHash AsKesKey) ByteString +bs = Hash StandardCrypto (VerKeyKES StandardCrypto) -> Hash KesKey Hash Blake2b_256 (VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256)) -> Hash KesKey @@ -485,10 +485,10 @@ (Hash Blake2b_256 (VerKeyKES (Sum6KES Ed25519DSIGN Blake2b_256))) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey KesKey) where - textEnvelopeType :: AsType (VerificationKey KesKey) -> TextEnvelopeType +instance HasTextEnvelope (VerificationKey KesKey) where + textEnvelopeType :: AsType (VerificationKey KesKey) -> TextEnvelopeType textEnvelopeType AsType (VerificationKey KesKey) _ = TextEnvelopeType "KesVerificationKey_" @@ -500,17 +500,17 @@ forall v (proxy :: * -> *). KESAlgorithm v => proxy v -> String Crypto.algorithmNameKES Proxy (KES StandardCrypto) Proxy (Sum6KES Ed25519DSIGN Blake2b_256) -proxy) +proxy) where - proxy :: Proxy (Shelley.KES StandardCrypto) - proxy :: Proxy (KES StandardCrypto) -proxy = Proxy (KES StandardCrypto) + proxy :: Proxy (Shelley.KES StandardCrypto) + proxy :: Proxy (KES StandardCrypto) +proxy = Proxy (KES StandardCrypto) forall k (t :: k). Proxy t Proxy -instance HasTextEnvelope (SigningKey KesKey) where - textEnvelopeType :: AsType (SigningKey KesKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey KesKey) +instance HasTextEnvelope (SigningKey KesKey) where + textEnvelopeType :: AsType (SigningKey KesKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey KesKey) _ = TextEnvelopeType "KesSigningKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -521,11 +521,11 @@ forall v (proxy :: * -> *). KESAlgorithm v => proxy v -> String Crypto.algorithmNameKES Proxy (KES StandardCrypto) Proxy (Sum6KES Ed25519DSIGN Blake2b_256) -proxy) +proxy) where - proxy :: Proxy (Shelley.KES StandardCrypto) - proxy :: Proxy (KES StandardCrypto) -proxy = Proxy (KES StandardCrypto) + proxy :: Proxy (Shelley.KES StandardCrypto) + proxy :: Proxy (KES StandardCrypto) +proxy = Proxy (KES StandardCrypto) forall k (t :: k). Proxy t Proxy @@ -538,8 +538,8 @@ instance HasTypeProxy VrfKey where data AsType VrfKey = AsVrfKey - proxyToAsType :: Proxy VrfKey -> AsType VrfKey -proxyToAsType Proxy VrfKey + proxyToAsType :: Proxy VrfKey -> AsType VrfKey +proxyToAsType Proxy VrfKey _ = AsType VrfKey AsVrfKey @@ -547,7 +547,7 @@ newtype VerificationKey VrfKey = VrfVerificationKey (Shelley.VerKeyVRF StandardCrypto) - deriving stock (VerificationKey VrfKey -> VerificationKey VrfKey -> Bool + deriving stock (VerificationKey VrfKey -> VerificationKey VrfKey -> Bool (VerificationKey VrfKey -> VerificationKey VrfKey -> Bool) -> (VerificationKey VrfKey -> VerificationKey VrfKey -> Bool) -> Eq (VerificationKey VrfKey) @@ -557,7 +557,7 @@ == :: VerificationKey VrfKey -> VerificationKey VrfKey -> Bool $c== :: VerificationKey VrfKey -> VerificationKey VrfKey -> Bool Eq) - deriving (Int -> VerificationKey VrfKey -> ShowS + deriving (Int -> VerificationKey VrfKey -> ShowS [VerificationKey VrfKey] -> ShowS VerificationKey VrfKey -> String (Int -> VerificationKey VrfKey -> ShowS) @@ -572,14 +572,14 @@ $cshow :: VerificationKey VrfKey -> String showsPrec :: Int -> VerificationKey VrfKey -> ShowS $cshowsPrec :: Int -> VerificationKey VrfKey -> ShowS -Show, String -> VerificationKey VrfKey +Show, String -> VerificationKey VrfKey (String -> VerificationKey VrfKey) -> IsString (VerificationKey VrfKey) forall a. (String -> a) -> IsString a fromString :: String -> VerificationKey VrfKey $cfromString :: String -> VerificationKey VrfKey IsString) via UsingRawBytesHex (VerificationKey VrfKey) - deriving newtype (Typeable (VerificationKey VrfKey) + deriving newtype (Typeable (VerificationKey VrfKey) Typeable (VerificationKey VrfKey) -> (VerificationKey VrfKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -609,7 +609,7 @@ toCBOR :: VerificationKey VrfKey -> Encoding $ctoCBOR :: VerificationKey VrfKey -> Encoding $cp1ToCBOR :: Typeable (VerificationKey VrfKey) -ToCBOR, Typeable (VerificationKey VrfKey) +ToCBOR, Typeable (VerificationKey VrfKey) Decoder s (VerificationKey VrfKey) Typeable (VerificationKey VrfKey) -> (forall s. Decoder s (VerificationKey VrfKey)) @@ -625,8 +625,8 @@ fromCBOR :: Decoder s (VerificationKey VrfKey) $cfromCBOR :: forall s. Decoder s (VerificationKey VrfKey) $cp1FromCBOR :: Typeable (VerificationKey VrfKey) -FromCBOR) - deriving anyclass HasTypeProxy (VerificationKey VrfKey) +FromCBOR) + deriving anyclass HasTypeProxy (VerificationKey VrfKey) HasTypeProxy (VerificationKey VrfKey) -> (VerificationKey VrfKey -> ByteString) -> (AsType (VerificationKey VrfKey) @@ -647,11 +647,11 @@ serialiseToCBOR :: VerificationKey VrfKey -> ByteString $cserialiseToCBOR :: VerificationKey VrfKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey VrfKey) -SerialiseAsCBOR +SerialiseAsCBOR newtype SigningKey VrfKey = VrfSigningKey (Shelley.SignKeyVRF StandardCrypto) - deriving (Int -> SigningKey VrfKey -> ShowS + deriving (Int -> SigningKey VrfKey -> ShowS [SigningKey VrfKey] -> ShowS SigningKey VrfKey -> String (Int -> SigningKey VrfKey -> ShowS) @@ -666,13 +666,13 @@ $cshow :: SigningKey VrfKey -> String showsPrec :: Int -> SigningKey VrfKey -> ShowS $cshowsPrec :: Int -> SigningKey VrfKey -> ShowS -Show, String -> SigningKey VrfKey +Show, String -> SigningKey VrfKey (String -> SigningKey VrfKey) -> IsString (SigningKey VrfKey) forall a. (String -> a) -> IsString a fromString :: String -> SigningKey VrfKey $cfromString :: String -> SigningKey VrfKey IsString) via UsingRawBytesHex (SigningKey VrfKey) - deriving newtype (Typeable (SigningKey VrfKey) + deriving newtype (Typeable (SigningKey VrfKey) Typeable (SigningKey VrfKey) -> (SigningKey VrfKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -702,7 +702,7 @@ toCBOR :: SigningKey VrfKey -> Encoding $ctoCBOR :: SigningKey VrfKey -> Encoding $cp1ToCBOR :: Typeable (SigningKey VrfKey) -ToCBOR, Typeable (SigningKey VrfKey) +ToCBOR, Typeable (SigningKey VrfKey) Decoder s (SigningKey VrfKey) Typeable (SigningKey VrfKey) -> (forall s. Decoder s (SigningKey VrfKey)) @@ -718,8 +718,8 @@ fromCBOR :: Decoder s (SigningKey VrfKey) $cfromCBOR :: forall s. Decoder s (SigningKey VrfKey) $cp1FromCBOR :: Typeable (SigningKey VrfKey) -FromCBOR) - deriving anyclass HasTypeProxy (SigningKey VrfKey) +FromCBOR) + deriving anyclass HasTypeProxy (SigningKey VrfKey) HasTypeProxy (SigningKey VrfKey) -> (SigningKey VrfKey -> ByteString) -> (AsType (SigningKey VrfKey) @@ -740,48 +740,48 @@ serialiseToCBOR :: SigningKey VrfKey -> ByteString $cserialiseToCBOR :: SigningKey VrfKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey VrfKey) -SerialiseAsCBOR +SerialiseAsCBOR deterministicSigningKey :: AsType VrfKey -> Crypto.Seed -> SigningKey VrfKey - deterministicSigningKey :: AsType VrfKey -> Seed -> SigningKey VrfKey -deterministicSigningKey AsType VrfKey -AsVrfKey Seed -seed = + deterministicSigningKey :: AsType VrfKey -> Seed -> SigningKey VrfKey +deterministicSigningKey AsType VrfKey +AsVrfKey Seed +seed = SignKeyVRF StandardCrypto -> SigningKey VrfKey VrfSigningKey (Seed -> SignKeyVRF PraosVRF forall v. VRFAlgorithm v => Seed -> SignKeyVRF v Crypto.genKeyVRF Seed -seed) +seed) deterministicSigningKeySeedSize :: AsType VrfKey -> Word - deterministicSigningKeySeedSize :: AsType VrfKey -> Word -deterministicSigningKeySeedSize AsType VrfKey + deterministicSigningKeySeedSize :: AsType VrfKey -> Word +deterministicSigningKeySeedSize AsType VrfKey AsVrfKey = Proxy PraosVRF -> Word forall v (proxy :: * -> *). VRFAlgorithm v => proxy v -> Word Crypto.seedSizeVRF Proxy (VRF StandardCrypto) Proxy PraosVRF -proxy +proxy where - proxy :: Proxy (Shelley.VRF StandardCrypto) - proxy :: Proxy (VRF StandardCrypto) -proxy = Proxy (VRF StandardCrypto) + proxy :: Proxy (Shelley.VRF StandardCrypto) + proxy :: Proxy (VRF StandardCrypto) +proxy = Proxy (VRF StandardCrypto) forall k (t :: k). Proxy t Proxy getVerificationKey :: SigningKey VrfKey -> VerificationKey VrfKey - getVerificationKey :: SigningKey VrfKey -> VerificationKey VrfKey -getVerificationKey (VrfSigningKey sk) = + getVerificationKey :: SigningKey VrfKey -> VerificationKey VrfKey +getVerificationKey (VrfSigningKey sk) = VerKeyVRF StandardCrypto -> VerificationKey VrfKey VrfVerificationKey (SignKeyVRF PraosVRF -> VerKeyVRF PraosVRF forall v. VRFAlgorithm v => SignKeyVRF v -> VerKeyVRF v Crypto.deriveVerKeyVRF SignKeyVRF StandardCrypto SignKeyVRF PraosVRF -sk) +sk) verificationKeyHash :: VerificationKey VrfKey -> Hash VrfKey - verificationKeyHash :: VerificationKey VrfKey -> Hash VrfKey -verificationKeyHash (VrfVerificationKey vkey) = + verificationKeyHash :: VerificationKey VrfKey -> Hash VrfKey +verificationKeyHash (VrfVerificationKey vkey) = Hash StandardCrypto (VerKeyVRF StandardCrypto) -> Hash VrfKey VrfKeyHash (VerKeyVRF PraosVRF -> Hash Blake2b_256 (VerKeyVRF PraosVRF) forall v h. @@ -789,21 +789,21 @@ VerKeyVRF v -> Hash h (VerKeyVRF v) Shelley.hashVerKeyVRF VerKeyVRF StandardCrypto VerKeyVRF PraosVRF -vkey) +vkey) instance SerialiseAsRawBytes (VerificationKey VrfKey) where - serialiseToRawBytes :: VerificationKey VrfKey -> ByteString -serialiseToRawBytes (VrfVerificationKey vk) = + serialiseToRawBytes :: VerificationKey VrfKey -> ByteString +serialiseToRawBytes (VrfVerificationKey vk) = VerKeyVRF PraosVRF -> ByteString forall v. VRFAlgorithm v => VerKeyVRF v -> ByteString Crypto.rawSerialiseVerKeyVRF VerKeyVRF StandardCrypto VerKeyVRF PraosVRF -vk +vk - deserialiseFromRawBytes :: AsType (VerificationKey VrfKey) + deserialiseFromRawBytes :: AsType (VerificationKey VrfKey) -> ByteString -> Maybe (VerificationKey VrfKey) -deserialiseFromRawBytes (AsVerificationKey AsVrfKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsVrfKey) ByteString +bs = VerKeyVRF StandardCrypto -> VerificationKey VrfKey VerKeyVRF PraosVRF -> VerificationKey VrfKey VrfVerificationKey (VerKeyVRF PraosVRF -> VerificationKey VrfKey) @@ -812,21 +812,21 @@ <$> ByteString -> Maybe (VerKeyVRF PraosVRF) forall v. VRFAlgorithm v => ByteString -> Maybe (VerKeyVRF v) Crypto.rawDeserialiseVerKeyVRF ByteString -bs +bs instance SerialiseAsRawBytes (SigningKey VrfKey) where - serialiseToRawBytes :: SigningKey VrfKey -> ByteString -serialiseToRawBytes (VrfSigningKey sk) = + serialiseToRawBytes :: SigningKey VrfKey -> ByteString +serialiseToRawBytes (VrfSigningKey sk) = SignKeyVRF PraosVRF -> ByteString forall v. VRFAlgorithm v => SignKeyVRF v -> ByteString Crypto.rawSerialiseSignKeyVRF SignKeyVRF StandardCrypto SignKeyVRF PraosVRF -sk +sk - deserialiseFromRawBytes :: AsType (SigningKey VrfKey) + deserialiseFromRawBytes :: AsType (SigningKey VrfKey) -> ByteString -> Maybe (SigningKey VrfKey) -deserialiseFromRawBytes (AsSigningKey AsVrfKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsVrfKey) ByteString +bs = SignKeyVRF StandardCrypto -> SigningKey VrfKey SignKeyVRF PraosVRF -> SigningKey VrfKey VrfSigningKey (SignKeyVRF PraosVRF -> SigningKey VrfKey) @@ -835,32 +835,32 @@ <$> ByteString -> Maybe (SignKeyVRF PraosVRF) forall v. VRFAlgorithm v => ByteString -> Maybe (SignKeyVRF v) Crypto.rawDeserialiseSignKeyVRF ByteString -bs +bs instance SerialiseAsBech32 (VerificationKey VrfKey) where - bech32PrefixFor :: VerificationKey VrfKey -> Text -bech32PrefixFor VerificationKey VrfKey + bech32PrefixFor :: VerificationKey VrfKey -> Text +bech32PrefixFor VerificationKey VrfKey _ = Text "vrf_vk" - bech32PrefixesPermitted :: AsType (VerificationKey VrfKey) -> [Text] -bech32PrefixesPermitted AsType (VerificationKey VrfKey) + bech32PrefixesPermitted :: AsType (VerificationKey VrfKey) -> [Text] +bech32PrefixesPermitted AsType (VerificationKey VrfKey) _ = [Text "vrf_vk"] instance SerialiseAsBech32 (SigningKey VrfKey) where - bech32PrefixFor :: SigningKey VrfKey -> Text -bech32PrefixFor SigningKey VrfKey + bech32PrefixFor :: SigningKey VrfKey -> Text +bech32PrefixFor SigningKey VrfKey _ = Text "vrf_sk" - bech32PrefixesPermitted :: AsType (SigningKey VrfKey) -> [Text] -bech32PrefixesPermitted AsType (SigningKey VrfKey) + bech32PrefixesPermitted :: AsType (SigningKey VrfKey) -> [Text] +bech32PrefixesPermitted AsType (SigningKey VrfKey) _ = [Text "vrf_sk"] newtype instance Hash VrfKey = VrfKeyHash (Shelley.Hash StandardCrypto (Shelley.VerKeyVRF StandardCrypto)) - deriving stock (Hash VrfKey -> Hash VrfKey -> Bool + deriving stock (Hash VrfKey -> Hash VrfKey -> Bool (Hash VrfKey -> Hash VrfKey -> Bool) -> (Hash VrfKey -> Hash VrfKey -> Bool) -> Eq (Hash VrfKey) forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -868,7 +868,7 @@ $c/= :: Hash VrfKey -> Hash VrfKey -> Bool == :: Hash VrfKey -> Hash VrfKey -> Bool $c== :: Hash VrfKey -> Hash VrfKey -> Bool -Eq, Eq (Hash VrfKey) +Eq, Eq (Hash VrfKey) Eq (Hash VrfKey) -> (Hash VrfKey -> Hash VrfKey -> Ordering) -> (Hash VrfKey -> Hash VrfKey -> Bool) @@ -907,7 +907,7 @@ $ccompare :: Hash VrfKey -> Hash VrfKey -> Ordering $cp1Ord :: Eq (Hash VrfKey) Ord) - deriving (Int -> Hash VrfKey -> ShowS + deriving (Int -> Hash VrfKey -> ShowS [Hash VrfKey] -> ShowS Hash VrfKey -> String (Int -> Hash VrfKey -> ShowS) @@ -922,7 +922,7 @@ $cshow :: Hash VrfKey -> String showsPrec :: Int -> Hash VrfKey -> ShowS $cshowsPrec :: Int -> Hash VrfKey -> ShowS -Show, String -> Hash VrfKey +Show, String -> Hash VrfKey (String -> Hash VrfKey) -> IsString (Hash VrfKey) forall a. (String -> a) -> IsString a fromString :: String -> Hash VrfKey @@ -930,17 +930,17 @@ IsString) via UsingRawBytesHex (Hash VrfKey) instance SerialiseAsRawBytes (Hash VrfKey) where - serialiseToRawBytes :: Hash VrfKey -> ByteString -serialiseToRawBytes (VrfKeyHash vkh) = + serialiseToRawBytes :: Hash VrfKey -> ByteString +serialiseToRawBytes (VrfKeyHash vkh) = Hash Blake2b_256 (VerKeyVRF PraosVRF) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash StandardCrypto (VerKeyVRF StandardCrypto) Hash Blake2b_256 (VerKeyVRF PraosVRF) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash VrfKey) -> ByteString -> Maybe (Hash VrfKey) -deserialiseFromRawBytes (AsHash AsVrfKey) ByteString -bs = + deserialiseFromRawBytes :: AsType (Hash VrfKey) -> ByteString -> Maybe (Hash VrfKey) +deserialiseFromRawBytes (AsHash AsVrfKey) ByteString +bs = Hash StandardCrypto (VerKeyVRF StandardCrypto) -> Hash VrfKey Hash Blake2b_256 (VerKeyVRF PraosVRF) -> Hash VrfKey VrfKeyHash (Hash Blake2b_256 (VerKeyVRF PraosVRF) -> Hash VrfKey) @@ -950,11 +950,11 @@ <$> ByteString -> Maybe (Hash Blake2b_256 (VerKeyVRF PraosVRF)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey VrfKey) where - textEnvelopeType :: AsType (VerificationKey VrfKey) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey VrfKey) +instance HasTextEnvelope (VerificationKey VrfKey) where + textEnvelopeType :: AsType (VerificationKey VrfKey) -> TextEnvelopeType +textEnvelopeType AsType (VerificationKey VrfKey) _ = TextEnvelopeType "VrfVerificationKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType forall a. Semigroup a => a -> a -> a @@ -964,17 +964,17 @@ forall v (proxy :: * -> *). VRFAlgorithm v => proxy v -> String Crypto.algorithmNameVRF Proxy (VRF StandardCrypto) Proxy PraosVRF -proxy) +proxy) where - proxy :: Proxy (Shelley.VRF StandardCrypto) - proxy :: Proxy (VRF StandardCrypto) -proxy = Proxy (VRF StandardCrypto) + proxy :: Proxy (Shelley.VRF StandardCrypto) + proxy :: Proxy (VRF StandardCrypto) +proxy = Proxy (VRF StandardCrypto) forall k (t :: k). Proxy t Proxy -instance HasTextEnvelope (SigningKey VrfKey) where - textEnvelopeType :: AsType (SigningKey VrfKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey VrfKey) +instance HasTextEnvelope (SigningKey VrfKey) where + textEnvelopeType :: AsType (SigningKey VrfKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey VrfKey) _ = TextEnvelopeType "VrfSigningKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType forall a. Semigroup a => a -> a -> a @@ -984,11 +984,11 @@ forall v (proxy :: * -> *). VRFAlgorithm v => proxy v -> String Crypto.algorithmNameVRF Proxy (VRF StandardCrypto) Proxy PraosVRF -proxy) +proxy) where - proxy :: Proxy (Shelley.VRF StandardCrypto) - proxy :: Proxy (VRF StandardCrypto) -proxy = Proxy (VRF StandardCrypto) + proxy :: Proxy (Shelley.VRF StandardCrypto) + proxy :: Proxy (VRF StandardCrypto) +proxy = Proxy (VRF StandardCrypto) forall k (t :: k). Proxy t Proxy diff --git a/cardano-api/src/Cardano.Api.KeysShelley.html b/cardano-api/src/Cardano.Api.KeysShelley.html index cf4e99d4603..acc9727067b 100644 --- a/cardano-api/src/Cardano.Api.KeysShelley.html +++ b/cardano-api/src/Cardano.Api.KeysShelley.html @@ -75,7 +75,7 @@ instance HasTypeProxy PaymentKey where data AsType PaymentKey = AsPaymentKey - proxyToAsType :: Proxy PaymentKey -> AsType PaymentKey + proxyToAsType :: Proxy PaymentKey -> AsType PaymentKey proxyToAsType Proxy PaymentKey _ = AsType PaymentKey AsPaymentKey @@ -84,7 +84,7 @@ newtype VerificationKey PaymentKey = PaymentVerificationKey (Shelley.VKey Shelley.Payment StandardCrypto) - deriving stock (VerificationKey PaymentKey -> VerificationKey PaymentKey -> Bool + deriving stock (VerificationKey PaymentKey -> VerificationKey PaymentKey -> Bool (VerificationKey PaymentKey -> VerificationKey PaymentKey -> Bool) -> (VerificationKey PaymentKey -> VerificationKey PaymentKey -> Bool) @@ -95,7 +95,7 @@ == :: VerificationKey PaymentKey -> VerificationKey PaymentKey -> Bool $c== :: VerificationKey PaymentKey -> VerificationKey PaymentKey -> Bool Eq) - deriving (Int -> VerificationKey PaymentKey -> ShowS + deriving (Int -> VerificationKey PaymentKey -> ShowS [VerificationKey PaymentKey] -> ShowS VerificationKey PaymentKey -> String (Int -> VerificationKey PaymentKey -> ShowS) @@ -110,14 +110,14 @@ $cshow :: VerificationKey PaymentKey -> String showsPrec :: Int -> VerificationKey PaymentKey -> ShowS $cshowsPrec :: Int -> VerificationKey PaymentKey -> ShowS -Show, String -> VerificationKey PaymentKey +Show, String -> VerificationKey PaymentKey (String -> VerificationKey PaymentKey) -> IsString (VerificationKey PaymentKey) forall a. (String -> a) -> IsString a fromString :: String -> VerificationKey PaymentKey $cfromString :: String -> VerificationKey PaymentKey IsString) via UsingRawBytesHex (VerificationKey PaymentKey) - deriving newtype (Typeable (VerificationKey PaymentKey) + deriving newtype (Typeable (VerificationKey PaymentKey) Typeable (VerificationKey PaymentKey) -> (VerificationKey PaymentKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -147,7 +147,7 @@ toCBOR :: VerificationKey PaymentKey -> Encoding $ctoCBOR :: VerificationKey PaymentKey -> Encoding $cp1ToCBOR :: Typeable (VerificationKey PaymentKey) -ToCBOR, Typeable (VerificationKey PaymentKey) +ToCBOR, Typeable (VerificationKey PaymentKey) Decoder s (VerificationKey PaymentKey) Typeable (VerificationKey PaymentKey) -> (forall s. Decoder s (VerificationKey PaymentKey)) @@ -164,7 +164,7 @@ $cfromCBOR :: forall s. Decoder s (VerificationKey PaymentKey) $cp1FromCBOR :: Typeable (VerificationKey PaymentKey) FromCBOR) - deriving anyclass HasTypeProxy (VerificationKey PaymentKey) + deriving anyclass HasTypeProxy (VerificationKey PaymentKey) HasTypeProxy (VerificationKey PaymentKey) -> (VerificationKey PaymentKey -> ByteString) -> (AsType (VerificationKey PaymentKey) @@ -189,7 +189,7 @@ newtype SigningKey PaymentKey = PaymentSigningKey (Shelley.SignKeyDSIGN StandardCrypto) - deriving (Int -> SigningKey PaymentKey -> ShowS + deriving (Int -> SigningKey PaymentKey -> ShowS [SigningKey PaymentKey] -> ShowS SigningKey PaymentKey -> String (Int -> SigningKey PaymentKey -> ShowS) @@ -204,14 +204,14 @@ $cshow :: SigningKey PaymentKey -> String showsPrec :: Int -> SigningKey PaymentKey -> ShowS $cshowsPrec :: Int -> SigningKey PaymentKey -> ShowS -Show, String -> SigningKey PaymentKey +Show, String -> SigningKey PaymentKey (String -> SigningKey PaymentKey) -> IsString (SigningKey PaymentKey) forall a. (String -> a) -> IsString a fromString :: String -> SigningKey PaymentKey $cfromString :: String -> SigningKey PaymentKey IsString) via UsingRawBytesHex (SigningKey PaymentKey) - deriving newtype (Typeable (SigningKey PaymentKey) + deriving newtype (Typeable (SigningKey PaymentKey) Typeable (SigningKey PaymentKey) -> (SigningKey PaymentKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -241,7 +241,7 @@ toCBOR :: SigningKey PaymentKey -> Encoding $ctoCBOR :: SigningKey PaymentKey -> Encoding $cp1ToCBOR :: Typeable (SigningKey PaymentKey) -ToCBOR, Typeable (SigningKey PaymentKey) +ToCBOR, Typeable (SigningKey PaymentKey) Decoder s (SigningKey PaymentKey) Typeable (SigningKey PaymentKey) -> (forall s. Decoder s (SigningKey PaymentKey)) @@ -257,8 +257,8 @@ fromCBOR :: Decoder s (SigningKey PaymentKey) $cfromCBOR :: forall s. Decoder s (SigningKey PaymentKey) $cp1FromCBOR :: Typeable (SigningKey PaymentKey) -FromCBOR) - deriving anyclass HasTypeProxy (SigningKey PaymentKey) +FromCBOR) + deriving anyclass HasTypeProxy (SigningKey PaymentKey) HasTypeProxy (SigningKey PaymentKey) -> (SigningKey PaymentKey -> ByteString) -> (AsType (SigningKey PaymentKey) @@ -279,38 +279,38 @@ serialiseToCBOR :: SigningKey PaymentKey -> ByteString $cserialiseToCBOR :: SigningKey PaymentKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey PaymentKey) -SerialiseAsCBOR +SerialiseAsCBOR deterministicSigningKey :: AsType PaymentKey -> Crypto.Seed -> SigningKey PaymentKey - deterministicSigningKey :: AsType PaymentKey -> Seed -> SigningKey PaymentKey -deterministicSigningKey AsType PaymentKey -AsPaymentKey Seed -seed = + deterministicSigningKey :: AsType PaymentKey -> Seed -> SigningKey PaymentKey +deterministicSigningKey AsType PaymentKey +AsPaymentKey Seed +seed = SignKeyDSIGN StandardCrypto -> SigningKey PaymentKey PaymentSigningKey (Seed -> SignKeyDSIGN Ed25519DSIGN forall v. DSIGNAlgorithm v => Seed -> SignKeyDSIGN v Crypto.genKeyDSIGN Seed -seed) +seed) deterministicSigningKeySeedSize :: AsType PaymentKey -> Word - deterministicSigningKeySeedSize :: AsType PaymentKey -> Word -deterministicSigningKeySeedSize AsType PaymentKey + deterministicSigningKeySeedSize :: AsType PaymentKey -> Word +deterministicSigningKeySeedSize AsType PaymentKey AsPaymentKey = Proxy Ed25519DSIGN -> Word forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> Word Crypto.seedSizeDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy +proxy where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy getVerificationKey :: SigningKey PaymentKey -> VerificationKey PaymentKey - getVerificationKey :: SigningKey PaymentKey -> VerificationKey PaymentKey -getVerificationKey (PaymentSigningKey sk) = + getVerificationKey :: SigningKey PaymentKey -> VerificationKey PaymentKey +getVerificationKey (PaymentSigningKey sk) = VKey 'Payment StandardCrypto -> VerificationKey PaymentKey PaymentVerificationKey (VerKeyDSIGN (DSIGN StandardCrypto) -> VKey 'Payment StandardCrypto forall (kd :: KeyRole) crypto. @@ -319,32 +319,32 @@ forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> VerKeyDSIGN v Crypto.deriveVerKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk)) +sk)) verificationKeyHash :: VerificationKey PaymentKey -> Hash PaymentKey - verificationKeyHash :: VerificationKey PaymentKey -> Hash PaymentKey -verificationKeyHash (PaymentVerificationKey vkey) = + verificationKeyHash :: VerificationKey PaymentKey -> Hash PaymentKey +verificationKeyHash (PaymentVerificationKey vkey) = KeyHash 'Payment StandardCrypto -> Hash PaymentKey PaymentKeyHash (VKey 'Payment StandardCrypto -> KeyHash 'Payment StandardCrypto forall crypto (kd :: KeyRole). Crypto crypto => VKey kd crypto -> KeyHash kd crypto Shelley.hashKey VKey 'Payment StandardCrypto -vkey) +vkey) instance SerialiseAsRawBytes (VerificationKey PaymentKey) where - serialiseToRawBytes :: VerificationKey PaymentKey -> ByteString -serialiseToRawBytes (PaymentVerificationKey (Shelley.VKey vk)) = + serialiseToRawBytes :: VerificationKey PaymentKey -> ByteString +serialiseToRawBytes (PaymentVerificationKey (Shelley.VKey vk)) = VerKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => VerKeyDSIGN v -> ByteString Crypto.rawSerialiseVerKeyDSIGN VerKeyDSIGN (DSIGN StandardCrypto) VerKeyDSIGN Ed25519DSIGN -vk +vk - deserialiseFromRawBytes :: AsType (VerificationKey PaymentKey) + deserialiseFromRawBytes :: AsType (VerificationKey PaymentKey) -> ByteString -> Maybe (VerificationKey PaymentKey) -deserialiseFromRawBytes (AsVerificationKey AsPaymentKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsPaymentKey) ByteString +bs = VKey 'Payment StandardCrypto -> VerificationKey PaymentKey PaymentVerificationKey (VKey 'Payment StandardCrypto -> VerificationKey PaymentKey) -> (VerKeyDSIGN Ed25519DSIGN -> VKey 'Payment StandardCrypto) @@ -362,21 +362,21 @@ ByteString -> Maybe (VerKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (VerKeyDSIGN v) Crypto.rawDeserialiseVerKeyDSIGN ByteString -bs +bs instance SerialiseAsRawBytes (SigningKey PaymentKey) where - serialiseToRawBytes :: SigningKey PaymentKey -> ByteString -serialiseToRawBytes (PaymentSigningKey sk) = + serialiseToRawBytes :: SigningKey PaymentKey -> ByteString +serialiseToRawBytes (PaymentSigningKey sk) = SignKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> ByteString Crypto.rawSerialiseSignKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk +sk - deserialiseFromRawBytes :: AsType (SigningKey PaymentKey) + deserialiseFromRawBytes :: AsType (SigningKey PaymentKey) -> ByteString -> Maybe (SigningKey PaymentKey) -deserialiseFromRawBytes (AsSigningKey AsPaymentKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsPaymentKey) ByteString +bs = SignKeyDSIGN StandardCrypto -> SigningKey PaymentKey SignKeyDSIGN Ed25519DSIGN -> SigningKey PaymentKey PaymentSigningKey (SignKeyDSIGN Ed25519DSIGN -> SigningKey PaymentKey) @@ -386,31 +386,31 @@ <$> ByteString -> Maybe (SignKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (SignKeyDSIGN v) Crypto.rawDeserialiseSignKeyDSIGN ByteString -bs +bs instance SerialiseAsBech32 (VerificationKey PaymentKey) where - bech32PrefixFor :: VerificationKey PaymentKey -> Text + bech32PrefixFor :: VerificationKey PaymentKey -> Text bech32PrefixFor VerificationKey PaymentKey _ = Text "addr_vk" - bech32PrefixesPermitted :: AsType (VerificationKey PaymentKey) -> [Text] + bech32PrefixesPermitted :: AsType (VerificationKey PaymentKey) -> [Text] bech32PrefixesPermitted AsType (VerificationKey PaymentKey) _ = [Text "addr_vk"] instance SerialiseAsBech32 (SigningKey PaymentKey) where - bech32PrefixFor :: SigningKey PaymentKey -> Text -bech32PrefixFor SigningKey PaymentKey + bech32PrefixFor :: SigningKey PaymentKey -> Text +bech32PrefixFor SigningKey PaymentKey _ = Text "addr_sk" - bech32PrefixesPermitted :: AsType (SigningKey PaymentKey) -> [Text] -bech32PrefixesPermitted AsType (SigningKey PaymentKey) + bech32PrefixesPermitted :: AsType (SigningKey PaymentKey) -> [Text] +bech32PrefixesPermitted AsType (SigningKey PaymentKey) _ = [Text "addr_sk"] newtype instance Hash PaymentKey = PaymentKeyHash (Shelley.KeyHash Shelley.Payment StandardCrypto) - deriving stock (Hash PaymentKey -> Hash PaymentKey -> Bool + deriving stock (Hash PaymentKey -> Hash PaymentKey -> Bool (Hash PaymentKey -> Hash PaymentKey -> Bool) -> (Hash PaymentKey -> Hash PaymentKey -> Bool) -> Eq (Hash PaymentKey) @@ -419,7 +419,7 @@ $c/= :: Hash PaymentKey -> Hash PaymentKey -> Bool == :: Hash PaymentKey -> Hash PaymentKey -> Bool $c== :: Hash PaymentKey -> Hash PaymentKey -> Bool -Eq, Eq (Hash PaymentKey) +Eq, Eq (Hash PaymentKey) Eq (Hash PaymentKey) -> (Hash PaymentKey -> Hash PaymentKey -> Ordering) -> (Hash PaymentKey -> Hash PaymentKey -> Bool) @@ -458,7 +458,7 @@ $ccompare :: Hash PaymentKey -> Hash PaymentKey -> Ordering $cp1Ord :: Eq (Hash PaymentKey) Ord) - deriving (Int -> Hash PaymentKey -> ShowS + deriving (Int -> Hash PaymentKey -> ShowS [Hash PaymentKey] -> ShowS Hash PaymentKey -> String (Int -> Hash PaymentKey -> ShowS) @@ -473,7 +473,7 @@ $cshow :: Hash PaymentKey -> String showsPrec :: Int -> Hash PaymentKey -> ShowS $cshowsPrec :: Int -> Hash PaymentKey -> ShowS -Show, String -> Hash PaymentKey +Show, String -> Hash PaymentKey (String -> Hash PaymentKey) -> IsString (Hash PaymentKey) forall a. (String -> a) -> IsString a fromString :: String -> Hash PaymentKey @@ -481,17 +481,17 @@ IsString) via UsingRawBytesHex (Hash PaymentKey) instance SerialiseAsRawBytes (Hash PaymentKey) where - serialiseToRawBytes :: Hash PaymentKey -> ByteString -serialiseToRawBytes (PaymentKeyHash (Shelley.KeyHash vkh)) = + serialiseToRawBytes :: Hash PaymentKey -> ByteString +serialiseToRawBytes (PaymentKeyHash (Shelley.KeyHash vkh)) = Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) (VerKeyDSIGN (DSIGN StandardCrypto)) Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash PaymentKey) -> ByteString -> Maybe (Hash PaymentKey) -deserialiseFromRawBytes (AsHash AsPaymentKey) ByteString -bs = + deserialiseFromRawBytes :: AsType (Hash PaymentKey) -> ByteString -> Maybe (Hash PaymentKey) +deserialiseFromRawBytes (AsHash AsPaymentKey) ByteString +bs = KeyHash 'Payment StandardCrypto -> Hash PaymentKey PaymentKeyHash (KeyHash 'Payment StandardCrypto -> Hash PaymentKey) -> (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) @@ -511,10 +511,10 @@ <$> ByteString -> Maybe (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey PaymentKey) where - textEnvelopeType :: AsType (VerificationKey PaymentKey) -> TextEnvelopeType +instance HasTextEnvelope (VerificationKey PaymentKey) where + textEnvelopeType :: AsType (VerificationKey PaymentKey) -> TextEnvelopeType textEnvelopeType AsType (VerificationKey PaymentKey) _ = TextEnvelopeType "PaymentVerificationKeyShelley_" @@ -526,17 +526,17 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy -instance HasTextEnvelope (SigningKey PaymentKey) where - textEnvelopeType :: AsType (SigningKey PaymentKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey PaymentKey) +instance HasTextEnvelope (SigningKey PaymentKey) where + textEnvelopeType :: AsType (SigningKey PaymentKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey PaymentKey) _ = TextEnvelopeType "PaymentSigningKeyShelley_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -547,11 +547,11 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy @@ -580,8 +580,8 @@ instance HasTypeProxy PaymentExtendedKey where data AsType PaymentExtendedKey = AsPaymentExtendedKey - proxyToAsType :: Proxy PaymentExtendedKey -> AsType PaymentExtendedKey -proxyToAsType Proxy PaymentExtendedKey + proxyToAsType :: Proxy PaymentExtendedKey -> AsType PaymentExtendedKey +proxyToAsType Proxy PaymentExtendedKey _ = AsType PaymentExtendedKey AsPaymentExtendedKey @@ -589,7 +589,7 @@ newtype VerificationKey PaymentExtendedKey = PaymentExtendedVerificationKey Crypto.HD.XPub - deriving stock (VerificationKey PaymentExtendedKey + deriving stock (VerificationKey PaymentExtendedKey -> VerificationKey PaymentExtendedKey -> Bool (VerificationKey PaymentExtendedKey -> VerificationKey PaymentExtendedKey -> Bool) @@ -606,7 +606,7 @@ $c== :: VerificationKey PaymentExtendedKey -> VerificationKey PaymentExtendedKey -> Bool Eq) - deriving anyclass HasTypeProxy (VerificationKey PaymentExtendedKey) + deriving anyclass HasTypeProxy (VerificationKey PaymentExtendedKey) HasTypeProxy (VerificationKey PaymentExtendedKey) -> (VerificationKey PaymentExtendedKey -> ByteString) -> (AsType (VerificationKey PaymentExtendedKey) @@ -631,8 +631,8 @@ serialiseToCBOR :: VerificationKey PaymentExtendedKey -> ByteString $cserialiseToCBOR :: VerificationKey PaymentExtendedKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey PaymentExtendedKey) -SerialiseAsCBOR - deriving (Int -> VerificationKey PaymentExtendedKey -> ShowS +SerialiseAsCBOR + deriving (Int -> VerificationKey PaymentExtendedKey -> ShowS [VerificationKey PaymentExtendedKey] -> ShowS VerificationKey PaymentExtendedKey -> String (Int -> VerificationKey PaymentExtendedKey -> ShowS) @@ -647,7 +647,7 @@ $cshow :: VerificationKey PaymentExtendedKey -> String showsPrec :: Int -> VerificationKey PaymentExtendedKey -> ShowS $cshowsPrec :: Int -> VerificationKey PaymentExtendedKey -> ShowS -Show, String -> VerificationKey PaymentExtendedKey +Show, String -> VerificationKey PaymentExtendedKey (String -> VerificationKey PaymentExtendedKey) -> IsString (VerificationKey PaymentExtendedKey) forall a. (String -> a) -> IsString a @@ -657,7 +657,7 @@ newtype SigningKey PaymentExtendedKey = PaymentExtendedSigningKey Crypto.HD.XPrv - deriving anyclass HasTypeProxy (SigningKey PaymentExtendedKey) + deriving anyclass HasTypeProxy (SigningKey PaymentExtendedKey) HasTypeProxy (SigningKey PaymentExtendedKey) -> (SigningKey PaymentExtendedKey -> ByteString) -> (AsType (SigningKey PaymentExtendedKey) @@ -682,8 +682,8 @@ serialiseToCBOR :: SigningKey PaymentExtendedKey -> ByteString $cserialiseToCBOR :: SigningKey PaymentExtendedKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey PaymentExtendedKey) -SerialiseAsCBOR - deriving (Int -> SigningKey PaymentExtendedKey -> ShowS +SerialiseAsCBOR + deriving (Int -> SigningKey PaymentExtendedKey -> ShowS [SigningKey PaymentExtendedKey] -> ShowS SigningKey PaymentExtendedKey -> String (Int -> SigningKey PaymentExtendedKey -> ShowS) @@ -698,7 +698,7 @@ $cshow :: SigningKey PaymentExtendedKey -> String showsPrec :: Int -> SigningKey PaymentExtendedKey -> ShowS $cshowsPrec :: Int -> SigningKey PaymentExtendedKey -> ShowS -Show, String -> SigningKey PaymentExtendedKey +Show, String -> SigningKey PaymentExtendedKey (String -> SigningKey PaymentExtendedKey) -> IsString (SigningKey PaymentExtendedKey) forall a. (String -> a) -> IsString a @@ -709,10 +709,10 @@ deterministicSigningKey :: AsType PaymentExtendedKey -> Crypto.Seed -> SigningKey PaymentExtendedKey - deterministicSigningKey :: AsType PaymentExtendedKey -> Seed -> SigningKey PaymentExtendedKey -deterministicSigningKey AsType PaymentExtendedKey -AsPaymentExtendedKey Seed -seed = + deterministicSigningKey :: AsType PaymentExtendedKey -> Seed -> SigningKey PaymentExtendedKey +deterministicSigningKey AsType PaymentExtendedKey +AsPaymentExtendedKey Seed +seed = XPrv -> SigningKey PaymentExtendedKey PaymentExtendedSigningKey (ByteString -> ByteString -> XPrv @@ -720,39 +720,39 @@ (ByteArrayAccess passPhrase, ByteArrayAccess seed) => seed -> passPhrase -> XPrv Crypto.HD.generate ByteString -seedbs ByteString +seedbs ByteString BS.empty) where - (ByteString -seedbs, Seed + (ByteString +seedbs, Seed _) = Word -> Seed -> (ByteString, Seed) Crypto.getBytesFromSeedT Word 32 Seed -seed +seed deterministicSigningKeySeedSize :: AsType PaymentExtendedKey -> Word - deterministicSigningKeySeedSize :: AsType PaymentExtendedKey -> Word -deterministicSigningKeySeedSize AsType PaymentExtendedKey + deterministicSigningKeySeedSize :: AsType PaymentExtendedKey -> Word +deterministicSigningKeySeedSize AsType PaymentExtendedKey AsPaymentExtendedKey = Word 32 getVerificationKey :: SigningKey PaymentExtendedKey -> VerificationKey PaymentExtendedKey - getVerificationKey :: SigningKey PaymentExtendedKey -> VerificationKey PaymentExtendedKey -getVerificationKey (PaymentExtendedSigningKey sk) = + getVerificationKey :: SigningKey PaymentExtendedKey -> VerificationKey PaymentExtendedKey +getVerificationKey (PaymentExtendedSigningKey sk) = XPub -> VerificationKey PaymentExtendedKey PaymentExtendedVerificationKey (HasCallStack => XPrv -> XPub XPrv -> XPub Crypto.HD.toXPub XPrv -sk) +sk) -- | We use the hash of the normal non-extended pub key so that it is -- consistent with the one used in addresses and signatures. -- verificationKeyHash :: VerificationKey PaymentExtendedKey -> Hash PaymentExtendedKey - verificationKeyHash :: VerificationKey PaymentExtendedKey -> Hash PaymentExtendedKey -verificationKeyHash (PaymentExtendedVerificationKey vk) = + verificationKeyHash :: VerificationKey PaymentExtendedKey -> Hash PaymentExtendedKey +verificationKeyHash (PaymentExtendedVerificationKey vk) = KeyHash 'Payment StandardCrypto -> Hash PaymentExtendedKey PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto -> Hash PaymentExtendedKey) @@ -784,23 +784,23 @@ forall h a. HashAlgorithm h => (a -> ByteString) -> a -> Hash h a Crypto.hashWith XPub -> ByteString Crypto.HD.xpubPublicKey XPub -vk +vk -instance ToCBOR (VerificationKey PaymentExtendedKey) where - toCBOR :: VerificationKey PaymentExtendedKey -> Encoding -toCBOR (PaymentExtendedVerificationKey xpub) = +instance ToCBOR (VerificationKey PaymentExtendedKey) where + toCBOR :: VerificationKey PaymentExtendedKey -> Encoding +toCBOR (PaymentExtendedVerificationKey xpub) = ByteString -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (XPub -> ByteString Crypto.HD.unXPub XPub -xpub) +xpub) -instance FromCBOR (VerificationKey PaymentExtendedKey) where - fromCBOR :: Decoder s (VerificationKey PaymentExtendedKey) +instance FromCBOR (VerificationKey PaymentExtendedKey) where + fromCBOR :: Decoder s (VerificationKey PaymentExtendedKey) fromCBOR = do - ByteString -bs <- Decoder s ByteString + ByteString +bs <- Decoder s ByteString forall a s. FromCBOR a => Decoder s a fromCBOR (String -> Decoder s (VerificationKey PaymentExtendedKey)) @@ -823,22 +823,22 @@ PaymentExtendedVerificationKey) (ByteString -> Either String XPub Crypto.HD.xpub (ByteString -bs :: ByteString)) +bs :: ByteString)) -instance ToCBOR (SigningKey PaymentExtendedKey) where - toCBOR :: SigningKey PaymentExtendedKey -> Encoding -toCBOR (PaymentExtendedSigningKey xprv) = +instance ToCBOR (SigningKey PaymentExtendedKey) where + toCBOR :: SigningKey PaymentExtendedKey -> Encoding +toCBOR (PaymentExtendedSigningKey xprv) = ByteString -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (XPrv -> ByteString Crypto.HD.unXPrv XPrv -xprv) +xprv) -instance FromCBOR (SigningKey PaymentExtendedKey) where - fromCBOR :: Decoder s (SigningKey PaymentExtendedKey) -fromCBOR = do - ByteString -bs <- Decoder s ByteString +instance FromCBOR (SigningKey PaymentExtendedKey) where + fromCBOR :: Decoder s (SigningKey PaymentExtendedKey) +fromCBOR = do + ByteString +bs <- Decoder s ByteString forall a s. FromCBOR a => Decoder s a fromCBOR (String -> Decoder s (SigningKey PaymentExtendedKey)) @@ -862,19 +862,19 @@ (ByteString -> Either String XPrv forall bin. ByteArrayAccess bin => bin -> Either String XPrv Crypto.HD.xprv (ByteString -bs :: ByteString)) +bs :: ByteString)) instance SerialiseAsRawBytes (VerificationKey PaymentExtendedKey) where - serialiseToRawBytes :: VerificationKey PaymentExtendedKey -> ByteString -serialiseToRawBytes (PaymentExtendedVerificationKey xpub) = + serialiseToRawBytes :: VerificationKey PaymentExtendedKey -> ByteString +serialiseToRawBytes (PaymentExtendedVerificationKey xpub) = XPub -> ByteString Crypto.HD.unXPub XPub -xpub +xpub - deserialiseFromRawBytes :: AsType (VerificationKey PaymentExtendedKey) + deserialiseFromRawBytes :: AsType (VerificationKey PaymentExtendedKey) -> ByteString -> Maybe (VerificationKey PaymentExtendedKey) -deserialiseFromRawBytes (AsVerificationKey AsPaymentExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsPaymentExtendedKey) ByteString +bs = (String -> Maybe (VerificationKey PaymentExtendedKey)) -> (XPub -> Maybe (VerificationKey PaymentExtendedKey)) -> Either String XPub @@ -898,19 +898,19 @@ PaymentExtendedVerificationKey) (ByteString -> Either String XPub Crypto.HD.xpub ByteString -bs) +bs) instance SerialiseAsRawBytes (SigningKey PaymentExtendedKey) where - serialiseToRawBytes :: SigningKey PaymentExtendedKey -> ByteString -serialiseToRawBytes (PaymentExtendedSigningKey xprv) = + serialiseToRawBytes :: SigningKey PaymentExtendedKey -> ByteString +serialiseToRawBytes (PaymentExtendedSigningKey xprv) = XPrv -> ByteString Crypto.HD.unXPrv XPrv -xprv +xprv - deserialiseFromRawBytes :: AsType (SigningKey PaymentExtendedKey) + deserialiseFromRawBytes :: AsType (SigningKey PaymentExtendedKey) -> ByteString -> Maybe (SigningKey PaymentExtendedKey) -deserialiseFromRawBytes (AsSigningKey AsPaymentExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsPaymentExtendedKey) ByteString +bs = (String -> Maybe (SigningKey PaymentExtendedKey)) -> (XPrv -> Maybe (SigningKey PaymentExtendedKey)) -> Either String XPrv @@ -935,32 +935,32 @@ (ByteString -> Either String XPrv forall bin. ByteArrayAccess bin => bin -> Either String XPrv Crypto.HD.xprv ByteString -bs) +bs) instance SerialiseAsBech32 (VerificationKey PaymentExtendedKey) where - bech32PrefixFor :: VerificationKey PaymentExtendedKey -> Text -bech32PrefixFor VerificationKey PaymentExtendedKey + bech32PrefixFor :: VerificationKey PaymentExtendedKey -> Text +bech32PrefixFor VerificationKey PaymentExtendedKey _ = Text "addr_xvk" - bech32PrefixesPermitted :: AsType (VerificationKey PaymentExtendedKey) -> [Text] -bech32PrefixesPermitted AsType (VerificationKey PaymentExtendedKey) + bech32PrefixesPermitted :: AsType (VerificationKey PaymentExtendedKey) -> [Text] +bech32PrefixesPermitted AsType (VerificationKey PaymentExtendedKey) _ = [Text "addr_xvk"] instance SerialiseAsBech32 (SigningKey PaymentExtendedKey) where - bech32PrefixFor :: SigningKey PaymentExtendedKey -> Text -bech32PrefixFor SigningKey PaymentExtendedKey + bech32PrefixFor :: SigningKey PaymentExtendedKey -> Text +bech32PrefixFor SigningKey PaymentExtendedKey _ = Text "addr_xsk" - bech32PrefixesPermitted :: AsType (SigningKey PaymentExtendedKey) -> [Text] -bech32PrefixesPermitted AsType (SigningKey PaymentExtendedKey) + bech32PrefixesPermitted :: AsType (SigningKey PaymentExtendedKey) -> [Text] +bech32PrefixesPermitted AsType (SigningKey PaymentExtendedKey) _ = [Text "addr_xsk"] newtype instance Hash PaymentExtendedKey = PaymentExtendedKeyHash (Shelley.KeyHash Shelley.Payment StandardCrypto) - deriving stock (Hash PaymentExtendedKey -> Hash PaymentExtendedKey -> Bool + deriving stock (Hash PaymentExtendedKey -> Hash PaymentExtendedKey -> Bool (Hash PaymentExtendedKey -> Hash PaymentExtendedKey -> Bool) -> (Hash PaymentExtendedKey -> Hash PaymentExtendedKey -> Bool) -> Eq (Hash PaymentExtendedKey) @@ -969,7 +969,7 @@ $c/= :: Hash PaymentExtendedKey -> Hash PaymentExtendedKey -> Bool == :: Hash PaymentExtendedKey -> Hash PaymentExtendedKey -> Bool $c== :: Hash PaymentExtendedKey -> Hash PaymentExtendedKey -> Bool -Eq, Eq (Hash PaymentExtendedKey) +Eq, Eq (Hash PaymentExtendedKey) Eq (Hash PaymentExtendedKey) -> (Hash PaymentExtendedKey -> Hash PaymentExtendedKey -> Ordering) -> (Hash PaymentExtendedKey -> Hash PaymentExtendedKey -> Bool) @@ -1015,7 +1015,7 @@ $ccompare :: Hash PaymentExtendedKey -> Hash PaymentExtendedKey -> Ordering $cp1Ord :: Eq (Hash PaymentExtendedKey) Ord) - deriving (Int -> Hash PaymentExtendedKey -> ShowS + deriving (Int -> Hash PaymentExtendedKey -> ShowS [Hash PaymentExtendedKey] -> ShowS Hash PaymentExtendedKey -> String (Int -> Hash PaymentExtendedKey -> ShowS) @@ -1030,7 +1030,7 @@ $cshow :: Hash PaymentExtendedKey -> String showsPrec :: Int -> Hash PaymentExtendedKey -> ShowS $cshowsPrec :: Int -> Hash PaymentExtendedKey -> ShowS -Show, String -> Hash PaymentExtendedKey +Show, String -> Hash PaymentExtendedKey (String -> Hash PaymentExtendedKey) -> IsString (Hash PaymentExtendedKey) forall a. (String -> a) -> IsString a @@ -1039,18 +1039,18 @@ IsString) via UsingRawBytesHex (Hash PaymentKey) instance SerialiseAsRawBytes (Hash PaymentExtendedKey) where - serialiseToRawBytes :: Hash PaymentExtendedKey -> ByteString -serialiseToRawBytes (PaymentExtendedKeyHash (Shelley.KeyHash vkh)) = + serialiseToRawBytes :: Hash PaymentExtendedKey -> ByteString +serialiseToRawBytes (PaymentExtendedKeyHash (Shelley.KeyHash vkh)) = Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) (VerKeyDSIGN (DSIGN StandardCrypto)) Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash PaymentExtendedKey) + deserialiseFromRawBytes :: AsType (Hash PaymentExtendedKey) -> ByteString -> Maybe (Hash PaymentExtendedKey) -deserialiseFromRawBytes (AsHash AsPaymentExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsHash AsPaymentExtendedKey) ByteString +bs = KeyHash 'Payment StandardCrypto -> Hash PaymentExtendedKey PaymentExtendedKeyHash (KeyHash 'Payment StandardCrypto -> Hash PaymentExtendedKey) -> (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) @@ -1071,23 +1071,23 @@ <$> ByteString -> Maybe (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey PaymentExtendedKey) where - textEnvelopeType :: AsType (VerificationKey PaymentExtendedKey) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey PaymentExtendedKey) +instance HasTextEnvelope (VerificationKey PaymentExtendedKey) where + textEnvelopeType :: AsType (VerificationKey PaymentExtendedKey) -> TextEnvelopeType +textEnvelopeType AsType (VerificationKey PaymentExtendedKey) _ = TextEnvelopeType "PaymentExtendedVerificationKeyShelley_ed25519_bip32" -instance HasTextEnvelope (SigningKey PaymentExtendedKey) where - textEnvelopeType :: AsType (SigningKey PaymentExtendedKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey PaymentExtendedKey) +instance HasTextEnvelope (SigningKey PaymentExtendedKey) where + textEnvelopeType :: AsType (SigningKey PaymentExtendedKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey PaymentExtendedKey) _ = TextEnvelopeType "PaymentExtendedSigningKeyShelley_ed25519_bip32" instance CastVerificationKeyRole PaymentExtendedKey PaymentKey where - castVerificationKey :: VerificationKey PaymentExtendedKey -> VerificationKey PaymentKey -castVerificationKey (PaymentExtendedVerificationKey vk) = + castVerificationKey :: VerificationKey PaymentExtendedKey -> VerificationKey PaymentKey +castVerificationKey (PaymentExtendedVerificationKey vk) = VKey 'Payment StandardCrypto -> VerificationKey PaymentKey PaymentVerificationKey (VKey 'Payment StandardCrypto -> VerificationKey PaymentKey) @@ -1109,7 +1109,7 @@ forall a. a -> Maybe a -> a fromMaybe VerKeyDSIGN Ed25519DSIGN forall a. a -impossible +impossible (Maybe (VerKeyDSIGN Ed25519DSIGN) -> VerKeyDSIGN Ed25519DSIGN) -> (XPub -> Maybe (VerKeyDSIGN Ed25519DSIGN)) -> XPub @@ -1127,10 +1127,10 @@ -> XPub -> VerificationKey PaymentKey forall a b. (a -> b) -> a -> b $ XPub -vk +vk where - impossible :: a -impossible = + impossible :: a +impossible = String -> a forall a. HasCallStack => String -> a error String @@ -1145,8 +1145,8 @@ instance HasTypeProxy StakeKey where data AsType StakeKey = AsStakeKey - proxyToAsType :: Proxy StakeKey -> AsType StakeKey -proxyToAsType Proxy StakeKey + proxyToAsType :: Proxy StakeKey -> AsType StakeKey +proxyToAsType Proxy StakeKey _ = AsType StakeKey AsStakeKey @@ -1154,7 +1154,7 @@ newtype VerificationKey StakeKey = StakeVerificationKey (Shelley.VKey Shelley.Staking StandardCrypto) - deriving stock (VerificationKey StakeKey -> VerificationKey StakeKey -> Bool + deriving stock (VerificationKey StakeKey -> VerificationKey StakeKey -> Bool (VerificationKey StakeKey -> VerificationKey StakeKey -> Bool) -> (VerificationKey StakeKey -> VerificationKey StakeKey -> Bool) -> Eq (VerificationKey StakeKey) @@ -1164,7 +1164,7 @@ == :: VerificationKey StakeKey -> VerificationKey StakeKey -> Bool $c== :: VerificationKey StakeKey -> VerificationKey StakeKey -> Bool Eq) - deriving newtype (Typeable (VerificationKey StakeKey) + deriving newtype (Typeable (VerificationKey StakeKey) Typeable (VerificationKey StakeKey) -> (VerificationKey StakeKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -1194,7 +1194,7 @@ toCBOR :: VerificationKey StakeKey -> Encoding $ctoCBOR :: VerificationKey StakeKey -> Encoding $cp1ToCBOR :: Typeable (VerificationKey StakeKey) -ToCBOR, Typeable (VerificationKey StakeKey) +ToCBOR, Typeable (VerificationKey StakeKey) Decoder s (VerificationKey StakeKey) Typeable (VerificationKey StakeKey) -> (forall s. Decoder s (VerificationKey StakeKey)) @@ -1210,8 +1210,8 @@ fromCBOR :: Decoder s (VerificationKey StakeKey) $cfromCBOR :: forall s. Decoder s (VerificationKey StakeKey) $cp1FromCBOR :: Typeable (VerificationKey StakeKey) -FromCBOR) - deriving anyclass HasTypeProxy (VerificationKey StakeKey) +FromCBOR) + deriving anyclass HasTypeProxy (VerificationKey StakeKey) HasTypeProxy (VerificationKey StakeKey) -> (VerificationKey StakeKey -> ByteString) -> (AsType (VerificationKey StakeKey) @@ -1232,8 +1232,8 @@ serialiseToCBOR :: VerificationKey StakeKey -> ByteString $cserialiseToCBOR :: VerificationKey StakeKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey StakeKey) -SerialiseAsCBOR - deriving (Int -> VerificationKey StakeKey -> ShowS +SerialiseAsCBOR + deriving (Int -> VerificationKey StakeKey -> ShowS [VerificationKey StakeKey] -> ShowS VerificationKey StakeKey -> String (Int -> VerificationKey StakeKey -> ShowS) @@ -1248,7 +1248,7 @@ $cshow :: VerificationKey StakeKey -> String showsPrec :: Int -> VerificationKey StakeKey -> ShowS $cshowsPrec :: Int -> VerificationKey StakeKey -> ShowS -Show, String -> VerificationKey StakeKey +Show, String -> VerificationKey StakeKey (String -> VerificationKey StakeKey) -> IsString (VerificationKey StakeKey) forall a. (String -> a) -> IsString a @@ -1258,7 +1258,7 @@ newtype SigningKey StakeKey = StakeSigningKey (Shelley.SignKeyDSIGN StandardCrypto) - deriving newtype (Typeable (SigningKey StakeKey) + deriving newtype (Typeable (SigningKey StakeKey) Typeable (SigningKey StakeKey) -> (SigningKey StakeKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -1288,7 +1288,7 @@ toCBOR :: SigningKey StakeKey -> Encoding $ctoCBOR :: SigningKey StakeKey -> Encoding $cp1ToCBOR :: Typeable (SigningKey StakeKey) -ToCBOR, Typeable (SigningKey StakeKey) +ToCBOR, Typeable (SigningKey StakeKey) Decoder s (SigningKey StakeKey) Typeable (SigningKey StakeKey) -> (forall s. Decoder s (SigningKey StakeKey)) @@ -1304,8 +1304,8 @@ fromCBOR :: Decoder s (SigningKey StakeKey) $cfromCBOR :: forall s. Decoder s (SigningKey StakeKey) $cp1FromCBOR :: Typeable (SigningKey StakeKey) -FromCBOR) - deriving anyclass HasTypeProxy (SigningKey StakeKey) +FromCBOR) + deriving anyclass HasTypeProxy (SigningKey StakeKey) HasTypeProxy (SigningKey StakeKey) -> (SigningKey StakeKey -> ByteString) -> (AsType (SigningKey StakeKey) @@ -1326,8 +1326,8 @@ serialiseToCBOR :: SigningKey StakeKey -> ByteString $cserialiseToCBOR :: SigningKey StakeKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey StakeKey) -SerialiseAsCBOR - deriving (Int -> SigningKey StakeKey -> ShowS +SerialiseAsCBOR + deriving (Int -> SigningKey StakeKey -> ShowS [SigningKey StakeKey] -> ShowS SigningKey StakeKey -> String (Int -> SigningKey StakeKey -> ShowS) @@ -1342,7 +1342,7 @@ $cshow :: SigningKey StakeKey -> String showsPrec :: Int -> SigningKey StakeKey -> ShowS $cshowsPrec :: Int -> SigningKey StakeKey -> ShowS -Show, String -> SigningKey StakeKey +Show, String -> SigningKey StakeKey (String -> SigningKey StakeKey) -> IsString (SigningKey StakeKey) forall a. (String -> a) -> IsString a fromString :: String -> SigningKey StakeKey @@ -1350,35 +1350,35 @@ IsString) via UsingRawBytesHex (SigningKey StakeKey) deterministicSigningKey :: AsType StakeKey -> Crypto.Seed -> SigningKey StakeKey - deterministicSigningKey :: AsType StakeKey -> Seed -> SigningKey StakeKey -deterministicSigningKey AsType StakeKey -AsStakeKey Seed -seed = + deterministicSigningKey :: AsType StakeKey -> Seed -> SigningKey StakeKey +deterministicSigningKey AsType StakeKey +AsStakeKey Seed +seed = SignKeyDSIGN StandardCrypto -> SigningKey StakeKey StakeSigningKey (Seed -> SignKeyDSIGN Ed25519DSIGN forall v. DSIGNAlgorithm v => Seed -> SignKeyDSIGN v Crypto.genKeyDSIGN Seed -seed) +seed) deterministicSigningKeySeedSize :: AsType StakeKey -> Word - deterministicSigningKeySeedSize :: AsType StakeKey -> Word -deterministicSigningKeySeedSize AsType StakeKey + deterministicSigningKeySeedSize :: AsType StakeKey -> Word +deterministicSigningKeySeedSize AsType StakeKey AsStakeKey = Proxy Ed25519DSIGN -> Word forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> Word Crypto.seedSizeDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy +proxy where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy getVerificationKey :: SigningKey StakeKey -> VerificationKey StakeKey - getVerificationKey :: SigningKey StakeKey -> VerificationKey StakeKey -getVerificationKey (StakeSigningKey sk) = + getVerificationKey :: SigningKey StakeKey -> VerificationKey StakeKey +getVerificationKey (StakeSigningKey sk) = VKey 'Staking StandardCrypto -> VerificationKey StakeKey StakeVerificationKey (VerKeyDSIGN (DSIGN StandardCrypto) -> VKey 'Staking StandardCrypto forall (kd :: KeyRole) crypto. @@ -1387,33 +1387,33 @@ forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> VerKeyDSIGN v Crypto.deriveVerKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk)) +sk)) verificationKeyHash :: VerificationKey StakeKey -> Hash StakeKey - verificationKeyHash :: VerificationKey StakeKey -> Hash StakeKey -verificationKeyHash (StakeVerificationKey vkey) = + verificationKeyHash :: VerificationKey StakeKey -> Hash StakeKey +verificationKeyHash (StakeVerificationKey vkey) = KeyHash 'Staking StandardCrypto -> Hash StakeKey StakeKeyHash (VKey 'Staking StandardCrypto -> KeyHash 'Staking StandardCrypto forall crypto (kd :: KeyRole). Crypto crypto => VKey kd crypto -> KeyHash kd crypto Shelley.hashKey VKey 'Staking StandardCrypto -vkey) +vkey) instance SerialiseAsRawBytes (VerificationKey StakeKey) where - serialiseToRawBytes :: VerificationKey StakeKey -> ByteString -serialiseToRawBytes (StakeVerificationKey (Shelley.VKey vk)) = + serialiseToRawBytes :: VerificationKey StakeKey -> ByteString +serialiseToRawBytes (StakeVerificationKey (Shelley.VKey vk)) = VerKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => VerKeyDSIGN v -> ByteString Crypto.rawSerialiseVerKeyDSIGN VerKeyDSIGN (DSIGN StandardCrypto) VerKeyDSIGN Ed25519DSIGN -vk +vk - deserialiseFromRawBytes :: AsType (VerificationKey StakeKey) + deserialiseFromRawBytes :: AsType (VerificationKey StakeKey) -> ByteString -> Maybe (VerificationKey StakeKey) -deserialiseFromRawBytes (AsVerificationKey AsStakeKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsStakeKey) ByteString +bs = VKey 'Staking StandardCrypto -> VerificationKey StakeKey StakeVerificationKey (VKey 'Staking StandardCrypto -> VerificationKey StakeKey) -> (VerKeyDSIGN Ed25519DSIGN -> VKey 'Staking StandardCrypto) @@ -1431,21 +1431,21 @@ ByteString -> Maybe (VerKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (VerKeyDSIGN v) Crypto.rawDeserialiseVerKeyDSIGN ByteString -bs +bs instance SerialiseAsRawBytes (SigningKey StakeKey) where - serialiseToRawBytes :: SigningKey StakeKey -> ByteString -serialiseToRawBytes (StakeSigningKey sk) = + serialiseToRawBytes :: SigningKey StakeKey -> ByteString +serialiseToRawBytes (StakeSigningKey sk) = SignKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> ByteString Crypto.rawSerialiseSignKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk +sk - deserialiseFromRawBytes :: AsType (SigningKey StakeKey) + deserialiseFromRawBytes :: AsType (SigningKey StakeKey) -> ByteString -> Maybe (SigningKey StakeKey) -deserialiseFromRawBytes (AsSigningKey AsStakeKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsStakeKey) ByteString +bs = SignKeyDSIGN StandardCrypto -> SigningKey StakeKey SignKeyDSIGN Ed25519DSIGN -> SigningKey StakeKey StakeSigningKey (SignKeyDSIGN Ed25519DSIGN -> SigningKey StakeKey) @@ -1454,32 +1454,32 @@ <$> ByteString -> Maybe (SignKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (SignKeyDSIGN v) Crypto.rawDeserialiseSignKeyDSIGN ByteString -bs +bs instance SerialiseAsBech32 (VerificationKey StakeKey) where - bech32PrefixFor :: VerificationKey StakeKey -> Text -bech32PrefixFor VerificationKey StakeKey + bech32PrefixFor :: VerificationKey StakeKey -> Text +bech32PrefixFor VerificationKey StakeKey _ = Text "stake_vk" - bech32PrefixesPermitted :: AsType (VerificationKey StakeKey) -> [Text] -bech32PrefixesPermitted AsType (VerificationKey StakeKey) + bech32PrefixesPermitted :: AsType (VerificationKey StakeKey) -> [Text] +bech32PrefixesPermitted AsType (VerificationKey StakeKey) _ = [Text "stake_vk"] instance SerialiseAsBech32 (SigningKey StakeKey) where - bech32PrefixFor :: SigningKey StakeKey -> Text -bech32PrefixFor SigningKey StakeKey + bech32PrefixFor :: SigningKey StakeKey -> Text +bech32PrefixFor SigningKey StakeKey _ = Text "stake_sk" - bech32PrefixesPermitted :: AsType (SigningKey StakeKey) -> [Text] -bech32PrefixesPermitted AsType (SigningKey StakeKey) + bech32PrefixesPermitted :: AsType (SigningKey StakeKey) -> [Text] +bech32PrefixesPermitted AsType (SigningKey StakeKey) _ = [Text "stake_sk"] newtype instance Hash StakeKey = StakeKeyHash (Shelley.KeyHash Shelley.Staking StandardCrypto) - deriving stock (Hash StakeKey -> Hash StakeKey -> Bool + deriving stock (Hash StakeKey -> Hash StakeKey -> Bool (Hash StakeKey -> Hash StakeKey -> Bool) -> (Hash StakeKey -> Hash StakeKey -> Bool) -> Eq (Hash StakeKey) forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -1487,7 +1487,7 @@ $c/= :: Hash StakeKey -> Hash StakeKey -> Bool == :: Hash StakeKey -> Hash StakeKey -> Bool $c== :: Hash StakeKey -> Hash StakeKey -> Bool -Eq, Eq (Hash StakeKey) +Eq, Eq (Hash StakeKey) Eq (Hash StakeKey) -> (Hash StakeKey -> Hash StakeKey -> Ordering) -> (Hash StakeKey -> Hash StakeKey -> Bool) @@ -1526,7 +1526,7 @@ $ccompare :: Hash StakeKey -> Hash StakeKey -> Ordering $cp1Ord :: Eq (Hash StakeKey) Ord) - deriving (Int -> Hash StakeKey -> ShowS + deriving (Int -> Hash StakeKey -> ShowS [Hash StakeKey] -> ShowS Hash StakeKey -> String (Int -> Hash StakeKey -> ShowS) @@ -1541,7 +1541,7 @@ $cshow :: Hash StakeKey -> String showsPrec :: Int -> Hash StakeKey -> ShowS $cshowsPrec :: Int -> Hash StakeKey -> ShowS -Show, String -> Hash StakeKey +Show, String -> Hash StakeKey (String -> Hash StakeKey) -> IsString (Hash StakeKey) forall a. (String -> a) -> IsString a fromString :: String -> Hash StakeKey @@ -1549,17 +1549,17 @@ IsString) via UsingRawBytesHex (Hash PaymentKey) instance SerialiseAsRawBytes (Hash StakeKey) where - serialiseToRawBytes :: Hash StakeKey -> ByteString -serialiseToRawBytes (StakeKeyHash (Shelley.KeyHash vkh)) = + serialiseToRawBytes :: Hash StakeKey -> ByteString +serialiseToRawBytes (StakeKeyHash (Shelley.KeyHash vkh)) = Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) (VerKeyDSIGN (DSIGN StandardCrypto)) Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash StakeKey) -> ByteString -> Maybe (Hash StakeKey) -deserialiseFromRawBytes (AsHash AsStakeKey) ByteString -bs = + deserialiseFromRawBytes :: AsType (Hash StakeKey) -> ByteString -> Maybe (Hash StakeKey) +deserialiseFromRawBytes (AsHash AsStakeKey) ByteString +bs = KeyHash 'Staking StandardCrypto -> Hash StakeKey StakeKeyHash (KeyHash 'Staking StandardCrypto -> Hash StakeKey) -> (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) @@ -1579,11 +1579,11 @@ <$> ByteString -> Maybe (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey StakeKey) where - textEnvelopeType :: AsType (VerificationKey StakeKey) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey StakeKey) +instance HasTextEnvelope (VerificationKey StakeKey) where + textEnvelopeType :: AsType (VerificationKey StakeKey) -> TextEnvelopeType +textEnvelopeType AsType (VerificationKey StakeKey) _ = TextEnvelopeType "StakeVerificationKeyShelley_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -1594,17 +1594,17 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy -instance HasTextEnvelope (SigningKey StakeKey) where - textEnvelopeType :: AsType (SigningKey StakeKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey StakeKey) +instance HasTextEnvelope (SigningKey StakeKey) where + textEnvelopeType :: AsType (SigningKey StakeKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey StakeKey) _ = TextEnvelopeType "StakeSigningKeyShelley_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -1615,11 +1615,11 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy @@ -1648,8 +1648,8 @@ instance HasTypeProxy StakeExtendedKey where data AsType StakeExtendedKey = AsStakeExtendedKey - proxyToAsType :: Proxy StakeExtendedKey -> AsType StakeExtendedKey -proxyToAsType Proxy StakeExtendedKey + proxyToAsType :: Proxy StakeExtendedKey -> AsType StakeExtendedKey +proxyToAsType Proxy StakeExtendedKey _ = AsType StakeExtendedKey AsStakeExtendedKey @@ -1657,7 +1657,7 @@ newtype VerificationKey StakeExtendedKey = StakeExtendedVerificationKey Crypto.HD.XPub - deriving stock (VerificationKey StakeExtendedKey + deriving stock (VerificationKey StakeExtendedKey -> VerificationKey StakeExtendedKey -> Bool (VerificationKey StakeExtendedKey -> VerificationKey StakeExtendedKey -> Bool) @@ -1674,7 +1674,7 @@ $c== :: VerificationKey StakeExtendedKey -> VerificationKey StakeExtendedKey -> Bool Eq) - deriving anyclass HasTypeProxy (VerificationKey StakeExtendedKey) + deriving anyclass HasTypeProxy (VerificationKey StakeExtendedKey) HasTypeProxy (VerificationKey StakeExtendedKey) -> (VerificationKey StakeExtendedKey -> ByteString) -> (AsType (VerificationKey StakeExtendedKey) @@ -1699,8 +1699,8 @@ serialiseToCBOR :: VerificationKey StakeExtendedKey -> ByteString $cserialiseToCBOR :: VerificationKey StakeExtendedKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey StakeExtendedKey) -SerialiseAsCBOR - deriving (Int -> VerificationKey StakeExtendedKey -> ShowS +SerialiseAsCBOR + deriving (Int -> VerificationKey StakeExtendedKey -> ShowS [VerificationKey StakeExtendedKey] -> ShowS VerificationKey StakeExtendedKey -> String (Int -> VerificationKey StakeExtendedKey -> ShowS) @@ -1715,7 +1715,7 @@ $cshow :: VerificationKey StakeExtendedKey -> String showsPrec :: Int -> VerificationKey StakeExtendedKey -> ShowS $cshowsPrec :: Int -> VerificationKey StakeExtendedKey -> ShowS -Show, String -> VerificationKey StakeExtendedKey +Show, String -> VerificationKey StakeExtendedKey (String -> VerificationKey StakeExtendedKey) -> IsString (VerificationKey StakeExtendedKey) forall a. (String -> a) -> IsString a @@ -1725,7 +1725,7 @@ newtype SigningKey StakeExtendedKey = StakeExtendedSigningKey Crypto.HD.XPrv - deriving anyclass HasTypeProxy (SigningKey StakeExtendedKey) + deriving anyclass HasTypeProxy (SigningKey StakeExtendedKey) HasTypeProxy (SigningKey StakeExtendedKey) -> (SigningKey StakeExtendedKey -> ByteString) -> (AsType (SigningKey StakeExtendedKey) @@ -1746,8 +1746,8 @@ serialiseToCBOR :: SigningKey StakeExtendedKey -> ByteString $cserialiseToCBOR :: SigningKey StakeExtendedKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey StakeExtendedKey) -SerialiseAsCBOR - deriving (Int -> SigningKey StakeExtendedKey -> ShowS +SerialiseAsCBOR + deriving (Int -> SigningKey StakeExtendedKey -> ShowS [SigningKey StakeExtendedKey] -> ShowS SigningKey StakeExtendedKey -> String (Int -> SigningKey StakeExtendedKey -> ShowS) @@ -1762,7 +1762,7 @@ $cshow :: SigningKey StakeExtendedKey -> String showsPrec :: Int -> SigningKey StakeExtendedKey -> ShowS $cshowsPrec :: Int -> SigningKey StakeExtendedKey -> ShowS -Show, String -> SigningKey StakeExtendedKey +Show, String -> SigningKey StakeExtendedKey (String -> SigningKey StakeExtendedKey) -> IsString (SigningKey StakeExtendedKey) forall a. (String -> a) -> IsString a @@ -1773,10 +1773,10 @@ deterministicSigningKey :: AsType StakeExtendedKey -> Crypto.Seed -> SigningKey StakeExtendedKey - deterministicSigningKey :: AsType StakeExtendedKey -> Seed -> SigningKey StakeExtendedKey -deterministicSigningKey AsType StakeExtendedKey -AsStakeExtendedKey Seed -seed = + deterministicSigningKey :: AsType StakeExtendedKey -> Seed -> SigningKey StakeExtendedKey +deterministicSigningKey AsType StakeExtendedKey +AsStakeExtendedKey Seed +seed = XPrv -> SigningKey StakeExtendedKey StakeExtendedSigningKey (ByteString -> ByteString -> XPrv @@ -1784,39 +1784,39 @@ (ByteArrayAccess passPhrase, ByteArrayAccess seed) => seed -> passPhrase -> XPrv Crypto.HD.generate ByteString -seedbs ByteString +seedbs ByteString BS.empty) where - (ByteString -seedbs, Seed + (ByteString +seedbs, Seed _) = Word -> Seed -> (ByteString, Seed) Crypto.getBytesFromSeedT Word 32 Seed -seed +seed deterministicSigningKeySeedSize :: AsType StakeExtendedKey -> Word - deterministicSigningKeySeedSize :: AsType StakeExtendedKey -> Word -deterministicSigningKeySeedSize AsType StakeExtendedKey + deterministicSigningKeySeedSize :: AsType StakeExtendedKey -> Word +deterministicSigningKeySeedSize AsType StakeExtendedKey AsStakeExtendedKey = Word 32 getVerificationKey :: SigningKey StakeExtendedKey -> VerificationKey StakeExtendedKey - getVerificationKey :: SigningKey StakeExtendedKey -> VerificationKey StakeExtendedKey -getVerificationKey (StakeExtendedSigningKey sk) = + getVerificationKey :: SigningKey StakeExtendedKey -> VerificationKey StakeExtendedKey +getVerificationKey (StakeExtendedSigningKey sk) = XPub -> VerificationKey StakeExtendedKey StakeExtendedVerificationKey (HasCallStack => XPrv -> XPub XPrv -> XPub Crypto.HD.toXPub XPrv -sk) +sk) -- | We use the hash of the normal non-extended pub key so that it is -- consistent with the one used in addresses and signatures. -- verificationKeyHash :: VerificationKey StakeExtendedKey -> Hash StakeExtendedKey - verificationKeyHash :: VerificationKey StakeExtendedKey -> Hash StakeExtendedKey -verificationKeyHash (StakeExtendedVerificationKey vk) = + verificationKeyHash :: VerificationKey StakeExtendedKey -> Hash StakeExtendedKey +verificationKeyHash (StakeExtendedVerificationKey vk) = KeyHash 'Staking StandardCrypto -> Hash StakeExtendedKey StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto -> Hash StakeExtendedKey) @@ -1848,23 +1848,23 @@ forall h a. HashAlgorithm h => (a -> ByteString) -> a -> Hash h a Crypto.hashWith XPub -> ByteString Crypto.HD.xpubPublicKey XPub -vk +vk -instance ToCBOR (VerificationKey StakeExtendedKey) where - toCBOR :: VerificationKey StakeExtendedKey -> Encoding -toCBOR (StakeExtendedVerificationKey xpub) = +instance ToCBOR (VerificationKey StakeExtendedKey) where + toCBOR :: VerificationKey StakeExtendedKey -> Encoding +toCBOR (StakeExtendedVerificationKey xpub) = ByteString -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (XPub -> ByteString Crypto.HD.unXPub XPub -xpub) +xpub) -instance FromCBOR (VerificationKey StakeExtendedKey) where - fromCBOR :: Decoder s (VerificationKey StakeExtendedKey) -fromCBOR = do - ByteString -bs <- Decoder s ByteString +instance FromCBOR (VerificationKey StakeExtendedKey) where + fromCBOR :: Decoder s (VerificationKey StakeExtendedKey) +fromCBOR = do + ByteString +bs <- Decoder s ByteString forall a s. FromCBOR a => Decoder s a fromCBOR (String -> Decoder s (VerificationKey StakeExtendedKey)) @@ -1887,22 +1887,22 @@ StakeExtendedVerificationKey) (ByteString -> Either String XPub Crypto.HD.xpub (ByteString -bs :: ByteString)) +bs :: ByteString)) -instance ToCBOR (SigningKey StakeExtendedKey) where - toCBOR :: SigningKey StakeExtendedKey -> Encoding -toCBOR (StakeExtendedSigningKey xprv) = +instance ToCBOR (SigningKey StakeExtendedKey) where + toCBOR :: SigningKey StakeExtendedKey -> Encoding +toCBOR (StakeExtendedSigningKey xprv) = ByteString -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (XPrv -> ByteString Crypto.HD.unXPrv XPrv -xprv) +xprv) -instance FromCBOR (SigningKey StakeExtendedKey) where - fromCBOR :: Decoder s (SigningKey StakeExtendedKey) -fromCBOR = do - ByteString -bs <- Decoder s ByteString +instance FromCBOR (SigningKey StakeExtendedKey) where + fromCBOR :: Decoder s (SigningKey StakeExtendedKey) +fromCBOR = do + ByteString +bs <- Decoder s ByteString forall a s. FromCBOR a => Decoder s a fromCBOR (String -> Decoder s (SigningKey StakeExtendedKey)) @@ -1926,19 +1926,19 @@ (ByteString -> Either String XPrv forall bin. ByteArrayAccess bin => bin -> Either String XPrv Crypto.HD.xprv (ByteString -bs :: ByteString)) +bs :: ByteString)) instance SerialiseAsRawBytes (VerificationKey StakeExtendedKey) where - serialiseToRawBytes :: VerificationKey StakeExtendedKey -> ByteString -serialiseToRawBytes (StakeExtendedVerificationKey xpub) = + serialiseToRawBytes :: VerificationKey StakeExtendedKey -> ByteString +serialiseToRawBytes (StakeExtendedVerificationKey xpub) = XPub -> ByteString Crypto.HD.unXPub XPub -xpub +xpub - deserialiseFromRawBytes :: AsType (VerificationKey StakeExtendedKey) + deserialiseFromRawBytes :: AsType (VerificationKey StakeExtendedKey) -> ByteString -> Maybe (VerificationKey StakeExtendedKey) -deserialiseFromRawBytes (AsVerificationKey AsStakeExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsStakeExtendedKey) ByteString +bs = (String -> Maybe (VerificationKey StakeExtendedKey)) -> (XPub -> Maybe (VerificationKey StakeExtendedKey)) -> Either String XPub @@ -1962,19 +1962,19 @@ StakeExtendedVerificationKey) (ByteString -> Either String XPub Crypto.HD.xpub ByteString -bs) +bs) instance SerialiseAsRawBytes (SigningKey StakeExtendedKey) where - serialiseToRawBytes :: SigningKey StakeExtendedKey -> ByteString -serialiseToRawBytes (StakeExtendedSigningKey xprv) = + serialiseToRawBytes :: SigningKey StakeExtendedKey -> ByteString +serialiseToRawBytes (StakeExtendedSigningKey xprv) = XPrv -> ByteString Crypto.HD.unXPrv XPrv -xprv +xprv - deserialiseFromRawBytes :: AsType (SigningKey StakeExtendedKey) + deserialiseFromRawBytes :: AsType (SigningKey StakeExtendedKey) -> ByteString -> Maybe (SigningKey StakeExtendedKey) -deserialiseFromRawBytes (AsSigningKey AsStakeExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsStakeExtendedKey) ByteString +bs = (String -> Maybe (SigningKey StakeExtendedKey)) -> (XPrv -> Maybe (SigningKey StakeExtendedKey)) -> Either String XPrv @@ -1998,32 +1998,32 @@ (ByteString -> Either String XPrv forall bin. ByteArrayAccess bin => bin -> Either String XPrv Crypto.HD.xprv ByteString -bs) +bs) instance SerialiseAsBech32 (VerificationKey StakeExtendedKey) where - bech32PrefixFor :: VerificationKey StakeExtendedKey -> Text -bech32PrefixFor VerificationKey StakeExtendedKey + bech32PrefixFor :: VerificationKey StakeExtendedKey -> Text +bech32PrefixFor VerificationKey StakeExtendedKey _ = Text "stake_xvk" - bech32PrefixesPermitted :: AsType (VerificationKey StakeExtendedKey) -> [Text] -bech32PrefixesPermitted AsType (VerificationKey StakeExtendedKey) + bech32PrefixesPermitted :: AsType (VerificationKey StakeExtendedKey) -> [Text] +bech32PrefixesPermitted AsType (VerificationKey StakeExtendedKey) _ = [Text "stake_xvk"] instance SerialiseAsBech32 (SigningKey StakeExtendedKey) where - bech32PrefixFor :: SigningKey StakeExtendedKey -> Text -bech32PrefixFor SigningKey StakeExtendedKey + bech32PrefixFor :: SigningKey StakeExtendedKey -> Text +bech32PrefixFor SigningKey StakeExtendedKey _ = Text "stake_xsk" - bech32PrefixesPermitted :: AsType (SigningKey StakeExtendedKey) -> [Text] -bech32PrefixesPermitted AsType (SigningKey StakeExtendedKey) + bech32PrefixesPermitted :: AsType (SigningKey StakeExtendedKey) -> [Text] +bech32PrefixesPermitted AsType (SigningKey StakeExtendedKey) _ = [Text "stake_xsk"] newtype instance Hash StakeExtendedKey = StakeExtendedKeyHash (Shelley.KeyHash Shelley.Staking StandardCrypto) - deriving stock (Hash StakeExtendedKey -> Hash StakeExtendedKey -> Bool + deriving stock (Hash StakeExtendedKey -> Hash StakeExtendedKey -> Bool (Hash StakeExtendedKey -> Hash StakeExtendedKey -> Bool) -> (Hash StakeExtendedKey -> Hash StakeExtendedKey -> Bool) -> Eq (Hash StakeExtendedKey) @@ -2032,7 +2032,7 @@ $c/= :: Hash StakeExtendedKey -> Hash StakeExtendedKey -> Bool == :: Hash StakeExtendedKey -> Hash StakeExtendedKey -> Bool $c== :: Hash StakeExtendedKey -> Hash StakeExtendedKey -> Bool -Eq, Eq (Hash StakeExtendedKey) +Eq, Eq (Hash StakeExtendedKey) Eq (Hash StakeExtendedKey) -> (Hash StakeExtendedKey -> Hash StakeExtendedKey -> Ordering) -> (Hash StakeExtendedKey -> Hash StakeExtendedKey -> Bool) @@ -2078,7 +2078,7 @@ $ccompare :: Hash StakeExtendedKey -> Hash StakeExtendedKey -> Ordering $cp1Ord :: Eq (Hash StakeExtendedKey) Ord) - deriving (Int -> Hash StakeExtendedKey -> ShowS + deriving (Int -> Hash StakeExtendedKey -> ShowS [Hash StakeExtendedKey] -> ShowS Hash StakeExtendedKey -> String (Int -> Hash StakeExtendedKey -> ShowS) @@ -2093,7 +2093,7 @@ $cshow :: Hash StakeExtendedKey -> String showsPrec :: Int -> Hash StakeExtendedKey -> ShowS $cshowsPrec :: Int -> Hash StakeExtendedKey -> ShowS -Show, String -> Hash StakeExtendedKey +Show, String -> Hash StakeExtendedKey (String -> Hash StakeExtendedKey) -> IsString (Hash StakeExtendedKey) forall a. (String -> a) -> IsString a @@ -2102,18 +2102,18 @@ IsString) via UsingRawBytesHex (Hash PaymentKey) instance SerialiseAsRawBytes (Hash StakeExtendedKey) where - serialiseToRawBytes :: Hash StakeExtendedKey -> ByteString -serialiseToRawBytes (StakeExtendedKeyHash (Shelley.KeyHash vkh)) = + serialiseToRawBytes :: Hash StakeExtendedKey -> ByteString +serialiseToRawBytes (StakeExtendedKeyHash (Shelley.KeyHash vkh)) = Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) (VerKeyDSIGN (DSIGN StandardCrypto)) Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash StakeExtendedKey) + deserialiseFromRawBytes :: AsType (Hash StakeExtendedKey) -> ByteString -> Maybe (Hash StakeExtendedKey) -deserialiseFromRawBytes (AsHash AsStakeExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsHash AsStakeExtendedKey) ByteString +bs = KeyHash 'Staking StandardCrypto -> Hash StakeExtendedKey StakeExtendedKeyHash (KeyHash 'Staking StandardCrypto -> Hash StakeExtendedKey) -> (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) @@ -2134,23 +2134,23 @@ <$> ByteString -> Maybe (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey StakeExtendedKey) where - textEnvelopeType :: AsType (VerificationKey StakeExtendedKey) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey StakeExtendedKey) +instance HasTextEnvelope (VerificationKey StakeExtendedKey) where + textEnvelopeType :: AsType (VerificationKey StakeExtendedKey) -> TextEnvelopeType +textEnvelopeType AsType (VerificationKey StakeExtendedKey) _ = TextEnvelopeType "StakeExtendedVerificationKeyShelley_ed25519_bip32" -instance HasTextEnvelope (SigningKey StakeExtendedKey) where - textEnvelopeType :: AsType (SigningKey StakeExtendedKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey StakeExtendedKey) +instance HasTextEnvelope (SigningKey StakeExtendedKey) where + textEnvelopeType :: AsType (SigningKey StakeExtendedKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey StakeExtendedKey) _ = TextEnvelopeType "StakeExtendedSigningKeyShelley_ed25519_bip32" instance CastVerificationKeyRole StakeExtendedKey StakeKey where - castVerificationKey :: VerificationKey StakeExtendedKey -> VerificationKey StakeKey -castVerificationKey (StakeExtendedVerificationKey vk) = + castVerificationKey :: VerificationKey StakeExtendedKey -> VerificationKey StakeKey +castVerificationKey (StakeExtendedVerificationKey vk) = VKey 'Staking StandardCrypto -> VerificationKey StakeKey StakeVerificationKey (VKey 'Staking StandardCrypto -> VerificationKey StakeKey) @@ -2172,7 +2172,7 @@ forall a. a -> Maybe a -> a fromMaybe VerKeyDSIGN Ed25519DSIGN forall a. a -impossible +impossible (Maybe (VerKeyDSIGN Ed25519DSIGN) -> VerKeyDSIGN Ed25519DSIGN) -> (XPub -> Maybe (VerKeyDSIGN Ed25519DSIGN)) -> XPub @@ -2190,10 +2190,10 @@ -> XPub -> VerificationKey StakeKey forall a b. (a -> b) -> a -> b $ XPub -vk +vk where - impossible :: a -impossible = + impossible :: a +impossible = String -> a forall a. HasCallStack => String -> a error String @@ -2208,8 +2208,8 @@ instance HasTypeProxy GenesisKey where data AsType GenesisKey = AsGenesisKey - proxyToAsType :: Proxy GenesisKey -> AsType GenesisKey -proxyToAsType Proxy GenesisKey + proxyToAsType :: Proxy GenesisKey -> AsType GenesisKey +proxyToAsType Proxy GenesisKey _ = AsType GenesisKey AsGenesisKey @@ -2217,7 +2217,7 @@ newtype VerificationKey GenesisKey = GenesisVerificationKey (Shelley.VKey Shelley.Genesis StandardCrypto) - deriving stock (VerificationKey GenesisKey -> VerificationKey GenesisKey -> Bool + deriving stock (VerificationKey GenesisKey -> VerificationKey GenesisKey -> Bool (VerificationKey GenesisKey -> VerificationKey GenesisKey -> Bool) -> (VerificationKey GenesisKey -> VerificationKey GenesisKey -> Bool) @@ -2228,7 +2228,7 @@ == :: VerificationKey GenesisKey -> VerificationKey GenesisKey -> Bool $c== :: VerificationKey GenesisKey -> VerificationKey GenesisKey -> Bool Eq) - deriving (Int -> VerificationKey GenesisKey -> ShowS + deriving (Int -> VerificationKey GenesisKey -> ShowS [VerificationKey GenesisKey] -> ShowS VerificationKey GenesisKey -> String (Int -> VerificationKey GenesisKey -> ShowS) @@ -2243,14 +2243,14 @@ $cshow :: VerificationKey GenesisKey -> String showsPrec :: Int -> VerificationKey GenesisKey -> ShowS $cshowsPrec :: Int -> VerificationKey GenesisKey -> ShowS -Show, String -> VerificationKey GenesisKey +Show, String -> VerificationKey GenesisKey (String -> VerificationKey GenesisKey) -> IsString (VerificationKey GenesisKey) forall a. (String -> a) -> IsString a fromString :: String -> VerificationKey GenesisKey $cfromString :: String -> VerificationKey GenesisKey IsString) via UsingRawBytesHex (VerificationKey GenesisKey) - deriving newtype (Typeable (VerificationKey GenesisKey) + deriving newtype (Typeable (VerificationKey GenesisKey) Typeable (VerificationKey GenesisKey) -> (VerificationKey GenesisKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -2280,7 +2280,7 @@ toCBOR :: VerificationKey GenesisKey -> Encoding $ctoCBOR :: VerificationKey GenesisKey -> Encoding $cp1ToCBOR :: Typeable (VerificationKey GenesisKey) -ToCBOR, Typeable (VerificationKey GenesisKey) +ToCBOR, Typeable (VerificationKey GenesisKey) Decoder s (VerificationKey GenesisKey) Typeable (VerificationKey GenesisKey) -> (forall s. Decoder s (VerificationKey GenesisKey)) @@ -2296,8 +2296,8 @@ fromCBOR :: Decoder s (VerificationKey GenesisKey) $cfromCBOR :: forall s. Decoder s (VerificationKey GenesisKey) $cp1FromCBOR :: Typeable (VerificationKey GenesisKey) -FromCBOR) - deriving anyclass HasTypeProxy (VerificationKey GenesisKey) +FromCBOR) + deriving anyclass HasTypeProxy (VerificationKey GenesisKey) HasTypeProxy (VerificationKey GenesisKey) -> (VerificationKey GenesisKey -> ByteString) -> (AsType (VerificationKey GenesisKey) @@ -2318,11 +2318,11 @@ serialiseToCBOR :: VerificationKey GenesisKey -> ByteString $cserialiseToCBOR :: VerificationKey GenesisKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey GenesisKey) -SerialiseAsCBOR +SerialiseAsCBOR newtype SigningKey GenesisKey = GenesisSigningKey (Shelley.SignKeyDSIGN StandardCrypto) - deriving (Int -> SigningKey GenesisKey -> ShowS + deriving (Int -> SigningKey GenesisKey -> ShowS [SigningKey GenesisKey] -> ShowS SigningKey GenesisKey -> String (Int -> SigningKey GenesisKey -> ShowS) @@ -2337,14 +2337,14 @@ $cshow :: SigningKey GenesisKey -> String showsPrec :: Int -> SigningKey GenesisKey -> ShowS $cshowsPrec :: Int -> SigningKey GenesisKey -> ShowS -Show, String -> SigningKey GenesisKey +Show, String -> SigningKey GenesisKey (String -> SigningKey GenesisKey) -> IsString (SigningKey GenesisKey) forall a. (String -> a) -> IsString a fromString :: String -> SigningKey GenesisKey $cfromString :: String -> SigningKey GenesisKey IsString) via UsingRawBytesHex (SigningKey GenesisKey) - deriving newtype (Typeable (SigningKey GenesisKey) + deriving newtype (Typeable (SigningKey GenesisKey) Typeable (SigningKey GenesisKey) -> (SigningKey GenesisKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -2374,7 +2374,7 @@ toCBOR :: SigningKey GenesisKey -> Encoding $ctoCBOR :: SigningKey GenesisKey -> Encoding $cp1ToCBOR :: Typeable (SigningKey GenesisKey) -ToCBOR, Typeable (SigningKey GenesisKey) +ToCBOR, Typeable (SigningKey GenesisKey) Decoder s (SigningKey GenesisKey) Typeable (SigningKey GenesisKey) -> (forall s. Decoder s (SigningKey GenesisKey)) @@ -2390,8 +2390,8 @@ fromCBOR :: Decoder s (SigningKey GenesisKey) $cfromCBOR :: forall s. Decoder s (SigningKey GenesisKey) $cp1FromCBOR :: Typeable (SigningKey GenesisKey) -FromCBOR) - deriving anyclass HasTypeProxy (SigningKey GenesisKey) +FromCBOR) + deriving anyclass HasTypeProxy (SigningKey GenesisKey) HasTypeProxy (SigningKey GenesisKey) -> (SigningKey GenesisKey -> ByteString) -> (AsType (SigningKey GenesisKey) @@ -2412,38 +2412,38 @@ serialiseToCBOR :: SigningKey GenesisKey -> ByteString $cserialiseToCBOR :: SigningKey GenesisKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey GenesisKey) -SerialiseAsCBOR +SerialiseAsCBOR deterministicSigningKey :: AsType GenesisKey -> Crypto.Seed -> SigningKey GenesisKey - deterministicSigningKey :: AsType GenesisKey -> Seed -> SigningKey GenesisKey -deterministicSigningKey AsType GenesisKey -AsGenesisKey Seed -seed = + deterministicSigningKey :: AsType GenesisKey -> Seed -> SigningKey GenesisKey +deterministicSigningKey AsType GenesisKey +AsGenesisKey Seed +seed = SignKeyDSIGN StandardCrypto -> SigningKey GenesisKey GenesisSigningKey (Seed -> SignKeyDSIGN Ed25519DSIGN forall v. DSIGNAlgorithm v => Seed -> SignKeyDSIGN v Crypto.genKeyDSIGN Seed -seed) +seed) deterministicSigningKeySeedSize :: AsType GenesisKey -> Word - deterministicSigningKeySeedSize :: AsType GenesisKey -> Word -deterministicSigningKeySeedSize AsType GenesisKey + deterministicSigningKeySeedSize :: AsType GenesisKey -> Word +deterministicSigningKeySeedSize AsType GenesisKey AsGenesisKey = Proxy Ed25519DSIGN -> Word forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> Word Crypto.seedSizeDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy +proxy where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy getVerificationKey :: SigningKey GenesisKey -> VerificationKey GenesisKey - getVerificationKey :: SigningKey GenesisKey -> VerificationKey GenesisKey -getVerificationKey (GenesisSigningKey sk) = + getVerificationKey :: SigningKey GenesisKey -> VerificationKey GenesisKey +getVerificationKey (GenesisSigningKey sk) = VKey 'Genesis StandardCrypto -> VerificationKey GenesisKey GenesisVerificationKey (VerKeyDSIGN (DSIGN StandardCrypto) -> VKey 'Genesis StandardCrypto forall (kd :: KeyRole) crypto. @@ -2452,33 +2452,33 @@ forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> VerKeyDSIGN v Crypto.deriveVerKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk)) +sk)) verificationKeyHash :: VerificationKey GenesisKey -> Hash GenesisKey - verificationKeyHash :: VerificationKey GenesisKey -> Hash GenesisKey -verificationKeyHash (GenesisVerificationKey vkey) = + verificationKeyHash :: VerificationKey GenesisKey -> Hash GenesisKey +verificationKeyHash (GenesisVerificationKey vkey) = KeyHash 'Genesis StandardCrypto -> Hash GenesisKey GenesisKeyHash (VKey 'Genesis StandardCrypto -> KeyHash 'Genesis StandardCrypto forall crypto (kd :: KeyRole). Crypto crypto => VKey kd crypto -> KeyHash kd crypto Shelley.hashKey VKey 'Genesis StandardCrypto -vkey) +vkey) instance SerialiseAsRawBytes (VerificationKey GenesisKey) where - serialiseToRawBytes :: VerificationKey GenesisKey -> ByteString -serialiseToRawBytes (GenesisVerificationKey (Shelley.VKey vk)) = + serialiseToRawBytes :: VerificationKey GenesisKey -> ByteString +serialiseToRawBytes (GenesisVerificationKey (Shelley.VKey vk)) = VerKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => VerKeyDSIGN v -> ByteString Crypto.rawSerialiseVerKeyDSIGN VerKeyDSIGN (DSIGN StandardCrypto) VerKeyDSIGN Ed25519DSIGN -vk +vk - deserialiseFromRawBytes :: AsType (VerificationKey GenesisKey) + deserialiseFromRawBytes :: AsType (VerificationKey GenesisKey) -> ByteString -> Maybe (VerificationKey GenesisKey) -deserialiseFromRawBytes (AsVerificationKey AsGenesisKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsGenesisKey) ByteString +bs = VKey 'Genesis StandardCrypto -> VerificationKey GenesisKey GenesisVerificationKey (VKey 'Genesis StandardCrypto -> VerificationKey GenesisKey) -> (VerKeyDSIGN Ed25519DSIGN -> VKey 'Genesis StandardCrypto) @@ -2496,21 +2496,21 @@ ByteString -> Maybe (VerKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (VerKeyDSIGN v) Crypto.rawDeserialiseVerKeyDSIGN ByteString -bs +bs instance SerialiseAsRawBytes (SigningKey GenesisKey) where - serialiseToRawBytes :: SigningKey GenesisKey -> ByteString -serialiseToRawBytes (GenesisSigningKey sk) = + serialiseToRawBytes :: SigningKey GenesisKey -> ByteString +serialiseToRawBytes (GenesisSigningKey sk) = SignKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> ByteString Crypto.rawSerialiseSignKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk +sk - deserialiseFromRawBytes :: AsType (SigningKey GenesisKey) + deserialiseFromRawBytes :: AsType (SigningKey GenesisKey) -> ByteString -> Maybe (SigningKey GenesisKey) -deserialiseFromRawBytes (AsSigningKey AsGenesisKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsGenesisKey) ByteString +bs = SignKeyDSIGN StandardCrypto -> SigningKey GenesisKey SignKeyDSIGN Ed25519DSIGN -> SigningKey GenesisKey GenesisSigningKey (SignKeyDSIGN Ed25519DSIGN -> SigningKey GenesisKey) @@ -2520,12 +2520,12 @@ <$> ByteString -> Maybe (SignKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (SignKeyDSIGN v) Crypto.rawDeserialiseSignKeyDSIGN ByteString -bs +bs newtype instance Hash GenesisKey = GenesisKeyHash (Shelley.KeyHash Shelley.Genesis StandardCrypto) - deriving stock (Hash GenesisKey -> Hash GenesisKey -> Bool + deriving stock (Hash GenesisKey -> Hash GenesisKey -> Bool (Hash GenesisKey -> Hash GenesisKey -> Bool) -> (Hash GenesisKey -> Hash GenesisKey -> Bool) -> Eq (Hash GenesisKey) @@ -2534,7 +2534,7 @@ $c/= :: Hash GenesisKey -> Hash GenesisKey -> Bool == :: Hash GenesisKey -> Hash GenesisKey -> Bool $c== :: Hash GenesisKey -> Hash GenesisKey -> Bool -Eq, Eq (Hash GenesisKey) +Eq, Eq (Hash GenesisKey) Eq (Hash GenesisKey) -> (Hash GenesisKey -> Hash GenesisKey -> Ordering) -> (Hash GenesisKey -> Hash GenesisKey -> Bool) @@ -2573,7 +2573,7 @@ $ccompare :: Hash GenesisKey -> Hash GenesisKey -> Ordering $cp1Ord :: Eq (Hash GenesisKey) Ord) - deriving (Int -> Hash GenesisKey -> ShowS + deriving (Int -> Hash GenesisKey -> ShowS [Hash GenesisKey] -> ShowS Hash GenesisKey -> String (Int -> Hash GenesisKey -> ShowS) @@ -2588,7 +2588,7 @@ $cshow :: Hash GenesisKey -> String showsPrec :: Int -> Hash GenesisKey -> ShowS $cshowsPrec :: Int -> Hash GenesisKey -> ShowS -Show, String -> Hash GenesisKey +Show, String -> Hash GenesisKey (String -> Hash GenesisKey) -> IsString (Hash GenesisKey) forall a. (String -> a) -> IsString a fromString :: String -> Hash GenesisKey @@ -2596,17 +2596,17 @@ IsString) via UsingRawBytesHex (Hash PaymentKey) instance SerialiseAsRawBytes (Hash GenesisKey) where - serialiseToRawBytes :: Hash GenesisKey -> ByteString -serialiseToRawBytes (GenesisKeyHash (Shelley.KeyHash vkh)) = + serialiseToRawBytes :: Hash GenesisKey -> ByteString +serialiseToRawBytes (GenesisKeyHash (Shelley.KeyHash vkh)) = Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) (VerKeyDSIGN (DSIGN StandardCrypto)) Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash GenesisKey) -> ByteString -> Maybe (Hash GenesisKey) -deserialiseFromRawBytes (AsHash AsGenesisKey) ByteString -bs = + deserialiseFromRawBytes :: AsType (Hash GenesisKey) -> ByteString -> Maybe (Hash GenesisKey) +deserialiseFromRawBytes (AsHash AsGenesisKey) ByteString +bs = KeyHash 'Genesis StandardCrypto -> Hash GenesisKey GenesisKeyHash (KeyHash 'Genesis StandardCrypto -> Hash GenesisKey) -> (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) @@ -2626,11 +2626,11 @@ <$> ByteString -> Maybe (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey GenesisKey) where - textEnvelopeType :: AsType (VerificationKey GenesisKey) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey GenesisKey) +instance HasTextEnvelope (VerificationKey GenesisKey) where + textEnvelopeType :: AsType (VerificationKey GenesisKey) -> TextEnvelopeType +textEnvelopeType AsType (VerificationKey GenesisKey) _ = TextEnvelopeType "GenesisVerificationKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -2641,17 +2641,17 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy -instance HasTextEnvelope (SigningKey GenesisKey) where - textEnvelopeType :: AsType (SigningKey GenesisKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey GenesisKey) +instance HasTextEnvelope (SigningKey GenesisKey) where + textEnvelopeType :: AsType (SigningKey GenesisKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey GenesisKey) _ = TextEnvelopeType "GenesisSigningKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -2662,11 +2662,11 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy @@ -2692,8 +2692,8 @@ instance HasTypeProxy GenesisExtendedKey where data AsType GenesisExtendedKey = AsGenesisExtendedKey - proxyToAsType :: Proxy GenesisExtendedKey -> AsType GenesisExtendedKey -proxyToAsType Proxy GenesisExtendedKey + proxyToAsType :: Proxy GenesisExtendedKey -> AsType GenesisExtendedKey +proxyToAsType Proxy GenesisExtendedKey _ = AsType GenesisExtendedKey AsGenesisExtendedKey @@ -2701,7 +2701,7 @@ newtype VerificationKey GenesisExtendedKey = GenesisExtendedVerificationKey Crypto.HD.XPub - deriving stock (VerificationKey GenesisExtendedKey + deriving stock (VerificationKey GenesisExtendedKey -> VerificationKey GenesisExtendedKey -> Bool (VerificationKey GenesisExtendedKey -> VerificationKey GenesisExtendedKey -> Bool) @@ -2718,7 +2718,7 @@ $c== :: VerificationKey GenesisExtendedKey -> VerificationKey GenesisExtendedKey -> Bool Eq) - deriving anyclass HasTypeProxy (VerificationKey GenesisExtendedKey) + deriving anyclass HasTypeProxy (VerificationKey GenesisExtendedKey) HasTypeProxy (VerificationKey GenesisExtendedKey) -> (VerificationKey GenesisExtendedKey -> ByteString) -> (AsType (VerificationKey GenesisExtendedKey) @@ -2743,8 +2743,8 @@ serialiseToCBOR :: VerificationKey GenesisExtendedKey -> ByteString $cserialiseToCBOR :: VerificationKey GenesisExtendedKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey GenesisExtendedKey) -SerialiseAsCBOR - deriving (Int -> VerificationKey GenesisExtendedKey -> ShowS +SerialiseAsCBOR + deriving (Int -> VerificationKey GenesisExtendedKey -> ShowS [VerificationKey GenesisExtendedKey] -> ShowS VerificationKey GenesisExtendedKey -> String (Int -> VerificationKey GenesisExtendedKey -> ShowS) @@ -2759,7 +2759,7 @@ $cshow :: VerificationKey GenesisExtendedKey -> String showsPrec :: Int -> VerificationKey GenesisExtendedKey -> ShowS $cshowsPrec :: Int -> VerificationKey GenesisExtendedKey -> ShowS -Show, String -> VerificationKey GenesisExtendedKey +Show, String -> VerificationKey GenesisExtendedKey (String -> VerificationKey GenesisExtendedKey) -> IsString (VerificationKey GenesisExtendedKey) forall a. (String -> a) -> IsString a @@ -2769,7 +2769,7 @@ newtype SigningKey GenesisExtendedKey = GenesisExtendedSigningKey Crypto.HD.XPrv - deriving anyclass HasTypeProxy (SigningKey GenesisExtendedKey) + deriving anyclass HasTypeProxy (SigningKey GenesisExtendedKey) HasTypeProxy (SigningKey GenesisExtendedKey) -> (SigningKey GenesisExtendedKey -> ByteString) -> (AsType (SigningKey GenesisExtendedKey) @@ -2794,8 +2794,8 @@ serialiseToCBOR :: SigningKey GenesisExtendedKey -> ByteString $cserialiseToCBOR :: SigningKey GenesisExtendedKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey GenesisExtendedKey) -SerialiseAsCBOR - deriving (Int -> SigningKey GenesisExtendedKey -> ShowS +SerialiseAsCBOR + deriving (Int -> SigningKey GenesisExtendedKey -> ShowS [SigningKey GenesisExtendedKey] -> ShowS SigningKey GenesisExtendedKey -> String (Int -> SigningKey GenesisExtendedKey -> ShowS) @@ -2810,7 +2810,7 @@ $cshow :: SigningKey GenesisExtendedKey -> String showsPrec :: Int -> SigningKey GenesisExtendedKey -> ShowS $cshowsPrec :: Int -> SigningKey GenesisExtendedKey -> ShowS -Show, String -> SigningKey GenesisExtendedKey +Show, String -> SigningKey GenesisExtendedKey (String -> SigningKey GenesisExtendedKey) -> IsString (SigningKey GenesisExtendedKey) forall a. (String -> a) -> IsString a @@ -2821,10 +2821,10 @@ deterministicSigningKey :: AsType GenesisExtendedKey -> Crypto.Seed -> SigningKey GenesisExtendedKey - deterministicSigningKey :: AsType GenesisExtendedKey -> Seed -> SigningKey GenesisExtendedKey -deterministicSigningKey AsType GenesisExtendedKey -AsGenesisExtendedKey Seed -seed = + deterministicSigningKey :: AsType GenesisExtendedKey -> Seed -> SigningKey GenesisExtendedKey +deterministicSigningKey AsType GenesisExtendedKey +AsGenesisExtendedKey Seed +seed = XPrv -> SigningKey GenesisExtendedKey GenesisExtendedSigningKey (ByteString -> ByteString -> XPrv @@ -2832,39 +2832,39 @@ (ByteArrayAccess passPhrase, ByteArrayAccess seed) => seed -> passPhrase -> XPrv Crypto.HD.generate ByteString -seedbs ByteString +seedbs ByteString BS.empty) where - (ByteString -seedbs, Seed + (ByteString +seedbs, Seed _) = Word -> Seed -> (ByteString, Seed) Crypto.getBytesFromSeedT Word 32 Seed -seed +seed deterministicSigningKeySeedSize :: AsType GenesisExtendedKey -> Word - deterministicSigningKeySeedSize :: AsType GenesisExtendedKey -> Word -deterministicSigningKeySeedSize AsType GenesisExtendedKey + deterministicSigningKeySeedSize :: AsType GenesisExtendedKey -> Word +deterministicSigningKeySeedSize AsType GenesisExtendedKey AsGenesisExtendedKey = Word 32 getVerificationKey :: SigningKey GenesisExtendedKey -> VerificationKey GenesisExtendedKey - getVerificationKey :: SigningKey GenesisExtendedKey -> VerificationKey GenesisExtendedKey -getVerificationKey (GenesisExtendedSigningKey sk) = + getVerificationKey :: SigningKey GenesisExtendedKey -> VerificationKey GenesisExtendedKey +getVerificationKey (GenesisExtendedSigningKey sk) = XPub -> VerificationKey GenesisExtendedKey GenesisExtendedVerificationKey (HasCallStack => XPrv -> XPub XPrv -> XPub Crypto.HD.toXPub XPrv -sk) +sk) -- | We use the hash of the normal non-extended pub key so that it is -- consistent with the one used in addresses and signatures. -- verificationKeyHash :: VerificationKey GenesisExtendedKey -> Hash GenesisExtendedKey - verificationKeyHash :: VerificationKey GenesisExtendedKey -> Hash GenesisExtendedKey -verificationKeyHash (GenesisExtendedVerificationKey vk) = + verificationKeyHash :: VerificationKey GenesisExtendedKey -> Hash GenesisExtendedKey +verificationKeyHash (GenesisExtendedVerificationKey vk) = KeyHash 'Staking StandardCrypto -> Hash GenesisExtendedKey GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto -> Hash GenesisExtendedKey) @@ -2896,23 +2896,23 @@ forall h a. HashAlgorithm h => (a -> ByteString) -> a -> Hash h a Crypto.hashWith XPub -> ByteString Crypto.HD.xpubPublicKey XPub -vk +vk -instance ToCBOR (VerificationKey GenesisExtendedKey) where - toCBOR :: VerificationKey GenesisExtendedKey -> Encoding -toCBOR (GenesisExtendedVerificationKey xpub) = +instance ToCBOR (VerificationKey GenesisExtendedKey) where + toCBOR :: VerificationKey GenesisExtendedKey -> Encoding +toCBOR (GenesisExtendedVerificationKey xpub) = ByteString -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (XPub -> ByteString Crypto.HD.unXPub XPub -xpub) +xpub) -instance FromCBOR (VerificationKey GenesisExtendedKey) where - fromCBOR :: Decoder s (VerificationKey GenesisExtendedKey) -fromCBOR = do - ByteString -bs <- Decoder s ByteString +instance FromCBOR (VerificationKey GenesisExtendedKey) where + fromCBOR :: Decoder s (VerificationKey GenesisExtendedKey) +fromCBOR = do + ByteString +bs <- Decoder s ByteString forall a s. FromCBOR a => Decoder s a fromCBOR (String -> Decoder s (VerificationKey GenesisExtendedKey)) @@ -2935,22 +2935,22 @@ GenesisExtendedVerificationKey) (ByteString -> Either String XPub Crypto.HD.xpub (ByteString -bs :: ByteString)) +bs :: ByteString)) -instance ToCBOR (SigningKey GenesisExtendedKey) where - toCBOR :: SigningKey GenesisExtendedKey -> Encoding -toCBOR (GenesisExtendedSigningKey xprv) = +instance ToCBOR (SigningKey GenesisExtendedKey) where + toCBOR :: SigningKey GenesisExtendedKey -> Encoding +toCBOR (GenesisExtendedSigningKey xprv) = ByteString -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (XPrv -> ByteString Crypto.HD.unXPrv XPrv -xprv) +xprv) -instance FromCBOR (SigningKey GenesisExtendedKey) where - fromCBOR :: Decoder s (SigningKey GenesisExtendedKey) -fromCBOR = do - ByteString -bs <- Decoder s ByteString +instance FromCBOR (SigningKey GenesisExtendedKey) where + fromCBOR :: Decoder s (SigningKey GenesisExtendedKey) +fromCBOR = do + ByteString +bs <- Decoder s ByteString forall a s. FromCBOR a => Decoder s a fromCBOR (String -> Decoder s (SigningKey GenesisExtendedKey)) @@ -2974,19 +2974,19 @@ (ByteString -> Either String XPrv forall bin. ByteArrayAccess bin => bin -> Either String XPrv Crypto.HD.xprv (ByteString -bs :: ByteString)) +bs :: ByteString)) instance SerialiseAsRawBytes (VerificationKey GenesisExtendedKey) where - serialiseToRawBytes :: VerificationKey GenesisExtendedKey -> ByteString -serialiseToRawBytes (GenesisExtendedVerificationKey xpub) = + serialiseToRawBytes :: VerificationKey GenesisExtendedKey -> ByteString +serialiseToRawBytes (GenesisExtendedVerificationKey xpub) = XPub -> ByteString Crypto.HD.unXPub XPub -xpub +xpub - deserialiseFromRawBytes :: AsType (VerificationKey GenesisExtendedKey) + deserialiseFromRawBytes :: AsType (VerificationKey GenesisExtendedKey) -> ByteString -> Maybe (VerificationKey GenesisExtendedKey) -deserialiseFromRawBytes (AsVerificationKey AsGenesisExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsGenesisExtendedKey) ByteString +bs = (String -> Maybe (VerificationKey GenesisExtendedKey)) -> (XPub -> Maybe (VerificationKey GenesisExtendedKey)) -> Either String XPub @@ -3010,19 +3010,19 @@ GenesisExtendedVerificationKey) (ByteString -> Either String XPub Crypto.HD.xpub ByteString -bs) +bs) instance SerialiseAsRawBytes (SigningKey GenesisExtendedKey) where - serialiseToRawBytes :: SigningKey GenesisExtendedKey -> ByteString -serialiseToRawBytes (GenesisExtendedSigningKey xprv) = + serialiseToRawBytes :: SigningKey GenesisExtendedKey -> ByteString +serialiseToRawBytes (GenesisExtendedSigningKey xprv) = XPrv -> ByteString Crypto.HD.unXPrv XPrv -xprv +xprv - deserialiseFromRawBytes :: AsType (SigningKey GenesisExtendedKey) + deserialiseFromRawBytes :: AsType (SigningKey GenesisExtendedKey) -> ByteString -> Maybe (SigningKey GenesisExtendedKey) -deserialiseFromRawBytes (AsSigningKey AsGenesisExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsGenesisExtendedKey) ByteString +bs = (String -> Maybe (SigningKey GenesisExtendedKey)) -> (XPrv -> Maybe (SigningKey GenesisExtendedKey)) -> Either String XPrv @@ -3047,12 +3047,12 @@ (ByteString -> Either String XPrv forall bin. ByteArrayAccess bin => bin -> Either String XPrv Crypto.HD.xprv ByteString -bs) +bs) newtype instance Hash GenesisExtendedKey = GenesisExtendedKeyHash (Shelley.KeyHash Shelley.Staking StandardCrypto) - deriving stock (Hash GenesisExtendedKey -> Hash GenesisExtendedKey -> Bool + deriving stock (Hash GenesisExtendedKey -> Hash GenesisExtendedKey -> Bool (Hash GenesisExtendedKey -> Hash GenesisExtendedKey -> Bool) -> (Hash GenesisExtendedKey -> Hash GenesisExtendedKey -> Bool) -> Eq (Hash GenesisExtendedKey) @@ -3061,7 +3061,7 @@ $c/= :: Hash GenesisExtendedKey -> Hash GenesisExtendedKey -> Bool == :: Hash GenesisExtendedKey -> Hash GenesisExtendedKey -> Bool $c== :: Hash GenesisExtendedKey -> Hash GenesisExtendedKey -> Bool -Eq, Eq (Hash GenesisExtendedKey) +Eq, Eq (Hash GenesisExtendedKey) Eq (Hash GenesisExtendedKey) -> (Hash GenesisExtendedKey -> Hash GenesisExtendedKey -> Ordering) -> (Hash GenesisExtendedKey -> Hash GenesisExtendedKey -> Bool) @@ -3107,7 +3107,7 @@ $ccompare :: Hash GenesisExtendedKey -> Hash GenesisExtendedKey -> Ordering $cp1Ord :: Eq (Hash GenesisExtendedKey) Ord) - deriving (Int -> Hash GenesisExtendedKey -> ShowS + deriving (Int -> Hash GenesisExtendedKey -> ShowS [Hash GenesisExtendedKey] -> ShowS Hash GenesisExtendedKey -> String (Int -> Hash GenesisExtendedKey -> ShowS) @@ -3122,7 +3122,7 @@ $cshow :: Hash GenesisExtendedKey -> String showsPrec :: Int -> Hash GenesisExtendedKey -> ShowS $cshowsPrec :: Int -> Hash GenesisExtendedKey -> ShowS -Show, String -> Hash GenesisExtendedKey +Show, String -> Hash GenesisExtendedKey (String -> Hash GenesisExtendedKey) -> IsString (Hash GenesisExtendedKey) forall a. (String -> a) -> IsString a @@ -3131,18 +3131,18 @@ IsString) via UsingRawBytesHex (Hash PaymentKey) instance SerialiseAsRawBytes (Hash GenesisExtendedKey) where - serialiseToRawBytes :: Hash GenesisExtendedKey -> ByteString -serialiseToRawBytes (GenesisExtendedKeyHash (Shelley.KeyHash vkh)) = + serialiseToRawBytes :: Hash GenesisExtendedKey -> ByteString +serialiseToRawBytes (GenesisExtendedKeyHash (Shelley.KeyHash vkh)) = Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) (VerKeyDSIGN (DSIGN StandardCrypto)) Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash GenesisExtendedKey) + deserialiseFromRawBytes :: AsType (Hash GenesisExtendedKey) -> ByteString -> Maybe (Hash GenesisExtendedKey) -deserialiseFromRawBytes (AsHash AsGenesisExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsHash AsGenesisExtendedKey) ByteString +bs = KeyHash 'Staking StandardCrypto -> Hash GenesisExtendedKey GenesisExtendedKeyHash (KeyHash 'Staking StandardCrypto -> Hash GenesisExtendedKey) -> (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) @@ -3163,23 +3163,23 @@ <$> ByteString -> Maybe (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey GenesisExtendedKey) where - textEnvelopeType :: AsType (VerificationKey GenesisExtendedKey) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey GenesisExtendedKey) +instance HasTextEnvelope (VerificationKey GenesisExtendedKey) where + textEnvelopeType :: AsType (VerificationKey GenesisExtendedKey) -> TextEnvelopeType +textEnvelopeType AsType (VerificationKey GenesisExtendedKey) _ = TextEnvelopeType "GenesisExtendedVerificationKey_ed25519_bip32" -instance HasTextEnvelope (SigningKey GenesisExtendedKey) where - textEnvelopeType :: AsType (SigningKey GenesisExtendedKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey GenesisExtendedKey) +instance HasTextEnvelope (SigningKey GenesisExtendedKey) where + textEnvelopeType :: AsType (SigningKey GenesisExtendedKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey GenesisExtendedKey) _ = TextEnvelopeType "GenesisExtendedSigningKey_ed25519_bip32" instance CastVerificationKeyRole GenesisExtendedKey GenesisKey where - castVerificationKey :: VerificationKey GenesisExtendedKey -> VerificationKey GenesisKey -castVerificationKey (GenesisExtendedVerificationKey vk) = + castVerificationKey :: VerificationKey GenesisExtendedKey -> VerificationKey GenesisKey +castVerificationKey (GenesisExtendedVerificationKey vk) = VKey 'Genesis StandardCrypto -> VerificationKey GenesisKey GenesisVerificationKey (VKey 'Genesis StandardCrypto -> VerificationKey GenesisKey) @@ -3201,7 +3201,7 @@ forall a. a -> Maybe a -> a fromMaybe VerKeyDSIGN Ed25519DSIGN forall a. a -impossible +impossible (Maybe (VerKeyDSIGN Ed25519DSIGN) -> VerKeyDSIGN Ed25519DSIGN) -> (XPub -> Maybe (VerKeyDSIGN Ed25519DSIGN)) -> XPub @@ -3219,10 +3219,10 @@ -> XPub -> VerificationKey GenesisKey forall a b. (a -> b) -> a -> b $ XPub -vk +vk where - impossible :: a -impossible = + impossible :: a +impossible = String -> a forall a. HasCallStack => String -> a error String @@ -3237,8 +3237,8 @@ instance HasTypeProxy GenesisDelegateKey where data AsType GenesisDelegateKey = AsGenesisDelegateKey - proxyToAsType :: Proxy GenesisDelegateKey -> AsType GenesisDelegateKey -proxyToAsType Proxy GenesisDelegateKey + proxyToAsType :: Proxy GenesisDelegateKey -> AsType GenesisDelegateKey +proxyToAsType Proxy GenesisDelegateKey _ = AsType GenesisDelegateKey AsGenesisDelegateKey @@ -3247,7 +3247,7 @@ newtype VerificationKey GenesisDelegateKey = GenesisDelegateVerificationKey (Shelley.VKey Shelley.GenesisDelegate StandardCrypto) - deriving stock (VerificationKey GenesisDelegateKey + deriving stock (VerificationKey GenesisDelegateKey -> VerificationKey GenesisDelegateKey -> Bool (VerificationKey GenesisDelegateKey -> VerificationKey GenesisDelegateKey -> Bool) @@ -3264,7 +3264,7 @@ $c== :: VerificationKey GenesisDelegateKey -> VerificationKey GenesisDelegateKey -> Bool Eq) - deriving (Int -> VerificationKey GenesisDelegateKey -> ShowS + deriving (Int -> VerificationKey GenesisDelegateKey -> ShowS [VerificationKey GenesisDelegateKey] -> ShowS VerificationKey GenesisDelegateKey -> String (Int -> VerificationKey GenesisDelegateKey -> ShowS) @@ -3279,14 +3279,14 @@ $cshow :: VerificationKey GenesisDelegateKey -> String showsPrec :: Int -> VerificationKey GenesisDelegateKey -> ShowS $cshowsPrec :: Int -> VerificationKey GenesisDelegateKey -> ShowS -Show, String -> VerificationKey GenesisDelegateKey +Show, String -> VerificationKey GenesisDelegateKey (String -> VerificationKey GenesisDelegateKey) -> IsString (VerificationKey GenesisDelegateKey) forall a. (String -> a) -> IsString a fromString :: String -> VerificationKey GenesisDelegateKey $cfromString :: String -> VerificationKey GenesisDelegateKey IsString) via UsingRawBytesHex (VerificationKey GenesisDelegateKey) - deriving newtype (Typeable (VerificationKey GenesisDelegateKey) + deriving newtype (Typeable (VerificationKey GenesisDelegateKey) Typeable (VerificationKey GenesisDelegateKey) -> (VerificationKey GenesisDelegateKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -3316,7 +3316,7 @@ toCBOR :: VerificationKey GenesisDelegateKey -> Encoding $ctoCBOR :: VerificationKey GenesisDelegateKey -> Encoding $cp1ToCBOR :: Typeable (VerificationKey GenesisDelegateKey) -ToCBOR, Typeable (VerificationKey GenesisDelegateKey) +ToCBOR, Typeable (VerificationKey GenesisDelegateKey) Decoder s (VerificationKey GenesisDelegateKey) Typeable (VerificationKey GenesisDelegateKey) -> (forall s. Decoder s (VerificationKey GenesisDelegateKey)) @@ -3332,8 +3332,8 @@ fromCBOR :: Decoder s (VerificationKey GenesisDelegateKey) $cfromCBOR :: forall s. Decoder s (VerificationKey GenesisDelegateKey) $cp1FromCBOR :: Typeable (VerificationKey GenesisDelegateKey) -FromCBOR) - deriving anyclass HasTypeProxy (VerificationKey GenesisDelegateKey) +FromCBOR) + deriving anyclass HasTypeProxy (VerificationKey GenesisDelegateKey) HasTypeProxy (VerificationKey GenesisDelegateKey) -> (VerificationKey GenesisDelegateKey -> ByteString) -> (AsType (VerificationKey GenesisDelegateKey) @@ -3358,11 +3358,11 @@ serialiseToCBOR :: VerificationKey GenesisDelegateKey -> ByteString $cserialiseToCBOR :: VerificationKey GenesisDelegateKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey GenesisDelegateKey) -SerialiseAsCBOR +SerialiseAsCBOR newtype SigningKey GenesisDelegateKey = GenesisDelegateSigningKey (Shelley.SignKeyDSIGN StandardCrypto) - deriving (Int -> SigningKey GenesisDelegateKey -> ShowS + deriving (Int -> SigningKey GenesisDelegateKey -> ShowS [SigningKey GenesisDelegateKey] -> ShowS SigningKey GenesisDelegateKey -> String (Int -> SigningKey GenesisDelegateKey -> ShowS) @@ -3377,14 +3377,14 @@ $cshow :: SigningKey GenesisDelegateKey -> String showsPrec :: Int -> SigningKey GenesisDelegateKey -> ShowS $cshowsPrec :: Int -> SigningKey GenesisDelegateKey -> ShowS -Show, String -> SigningKey GenesisDelegateKey +Show, String -> SigningKey GenesisDelegateKey (String -> SigningKey GenesisDelegateKey) -> IsString (SigningKey GenesisDelegateKey) forall a. (String -> a) -> IsString a fromString :: String -> SigningKey GenesisDelegateKey $cfromString :: String -> SigningKey GenesisDelegateKey IsString) via UsingRawBytesHex (SigningKey GenesisDelegateKey) - deriving newtype (Typeable (SigningKey GenesisDelegateKey) + deriving newtype (Typeable (SigningKey GenesisDelegateKey) Typeable (SigningKey GenesisDelegateKey) -> (SigningKey GenesisDelegateKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -3414,7 +3414,7 @@ toCBOR :: SigningKey GenesisDelegateKey -> Encoding $ctoCBOR :: SigningKey GenesisDelegateKey -> Encoding $cp1ToCBOR :: Typeable (SigningKey GenesisDelegateKey) -ToCBOR, Typeable (SigningKey GenesisDelegateKey) +ToCBOR, Typeable (SigningKey GenesisDelegateKey) Decoder s (SigningKey GenesisDelegateKey) Typeable (SigningKey GenesisDelegateKey) -> (forall s. Decoder s (SigningKey GenesisDelegateKey)) @@ -3430,8 +3430,8 @@ fromCBOR :: Decoder s (SigningKey GenesisDelegateKey) $cfromCBOR :: forall s. Decoder s (SigningKey GenesisDelegateKey) $cp1FromCBOR :: Typeable (SigningKey GenesisDelegateKey) -FromCBOR) - deriving anyclass HasTypeProxy (SigningKey GenesisDelegateKey) +FromCBOR) + deriving anyclass HasTypeProxy (SigningKey GenesisDelegateKey) HasTypeProxy (SigningKey GenesisDelegateKey) -> (SigningKey GenesisDelegateKey -> ByteString) -> (AsType (SigningKey GenesisDelegateKey) @@ -3456,38 +3456,38 @@ serialiseToCBOR :: SigningKey GenesisDelegateKey -> ByteString $cserialiseToCBOR :: SigningKey GenesisDelegateKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey GenesisDelegateKey) -SerialiseAsCBOR +SerialiseAsCBOR deterministicSigningKey :: AsType GenesisDelegateKey -> Crypto.Seed -> SigningKey GenesisDelegateKey - deterministicSigningKey :: AsType GenesisDelegateKey -> Seed -> SigningKey GenesisDelegateKey -deterministicSigningKey AsType GenesisDelegateKey -AsGenesisDelegateKey Seed -seed = + deterministicSigningKey :: AsType GenesisDelegateKey -> Seed -> SigningKey GenesisDelegateKey +deterministicSigningKey AsType GenesisDelegateKey +AsGenesisDelegateKey Seed +seed = SignKeyDSIGN StandardCrypto -> SigningKey GenesisDelegateKey GenesisDelegateSigningKey (Seed -> SignKeyDSIGN Ed25519DSIGN forall v. DSIGNAlgorithm v => Seed -> SignKeyDSIGN v Crypto.genKeyDSIGN Seed -seed) +seed) deterministicSigningKeySeedSize :: AsType GenesisDelegateKey -> Word - deterministicSigningKeySeedSize :: AsType GenesisDelegateKey -> Word -deterministicSigningKeySeedSize AsType GenesisDelegateKey + deterministicSigningKeySeedSize :: AsType GenesisDelegateKey -> Word +deterministicSigningKeySeedSize AsType GenesisDelegateKey AsGenesisDelegateKey = Proxy Ed25519DSIGN -> Word forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> Word Crypto.seedSizeDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy +proxy where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy getVerificationKey :: SigningKey GenesisDelegateKey -> VerificationKey GenesisDelegateKey - getVerificationKey :: SigningKey GenesisDelegateKey -> VerificationKey GenesisDelegateKey -getVerificationKey (GenesisDelegateSigningKey sk) = + getVerificationKey :: SigningKey GenesisDelegateKey -> VerificationKey GenesisDelegateKey +getVerificationKey (GenesisDelegateSigningKey sk) = VKey 'GenesisDelegate StandardCrypto -> VerificationKey GenesisDelegateKey GenesisDelegateVerificationKey (VerKeyDSIGN (DSIGN StandardCrypto) @@ -3498,11 +3498,11 @@ forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> VerKeyDSIGN v Crypto.deriveVerKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk)) +sk)) verificationKeyHash :: VerificationKey GenesisDelegateKey -> Hash GenesisDelegateKey - verificationKeyHash :: VerificationKey GenesisDelegateKey -> Hash GenesisDelegateKey -verificationKeyHash (GenesisDelegateVerificationKey vkey) = + verificationKeyHash :: VerificationKey GenesisDelegateKey -> Hash GenesisDelegateKey +verificationKeyHash (GenesisDelegateVerificationKey vkey) = KeyHash 'GenesisDelegate StandardCrypto -> Hash GenesisDelegateKey GenesisDelegateKeyHash (VKey 'GenesisDelegate StandardCrypto -> KeyHash 'GenesisDelegate StandardCrypto @@ -3510,22 +3510,22 @@ Crypto crypto => VKey kd crypto -> KeyHash kd crypto Shelley.hashKey VKey 'GenesisDelegate StandardCrypto -vkey) +vkey) instance SerialiseAsRawBytes (VerificationKey GenesisDelegateKey) where - serialiseToRawBytes :: VerificationKey GenesisDelegateKey -> ByteString -serialiseToRawBytes (GenesisDelegateVerificationKey (Shelley.VKey vk)) = + serialiseToRawBytes :: VerificationKey GenesisDelegateKey -> ByteString +serialiseToRawBytes (GenesisDelegateVerificationKey (Shelley.VKey vk)) = VerKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => VerKeyDSIGN v -> ByteString Crypto.rawSerialiseVerKeyDSIGN VerKeyDSIGN (DSIGN StandardCrypto) VerKeyDSIGN Ed25519DSIGN -vk +vk - deserialiseFromRawBytes :: AsType (VerificationKey GenesisDelegateKey) + deserialiseFromRawBytes :: AsType (VerificationKey GenesisDelegateKey) -> ByteString -> Maybe (VerificationKey GenesisDelegateKey) -deserialiseFromRawBytes (AsVerificationKey AsGenesisDelegateKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsGenesisDelegateKey) ByteString +bs = VKey 'GenesisDelegate StandardCrypto -> VerificationKey GenesisDelegateKey GenesisDelegateVerificationKey (VKey 'GenesisDelegate StandardCrypto @@ -3546,21 +3546,21 @@ ByteString -> Maybe (VerKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (VerKeyDSIGN v) Crypto.rawDeserialiseVerKeyDSIGN ByteString -bs +bs instance SerialiseAsRawBytes (SigningKey GenesisDelegateKey) where - serialiseToRawBytes :: SigningKey GenesisDelegateKey -> ByteString -serialiseToRawBytes (GenesisDelegateSigningKey sk) = + serialiseToRawBytes :: SigningKey GenesisDelegateKey -> ByteString +serialiseToRawBytes (GenesisDelegateSigningKey sk) = SignKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> ByteString Crypto.rawSerialiseSignKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk +sk - deserialiseFromRawBytes :: AsType (SigningKey GenesisDelegateKey) + deserialiseFromRawBytes :: AsType (SigningKey GenesisDelegateKey) -> ByteString -> Maybe (SigningKey GenesisDelegateKey) -deserialiseFromRawBytes (AsSigningKey AsGenesisDelegateKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsGenesisDelegateKey) ByteString +bs = SignKeyDSIGN StandardCrypto -> SigningKey GenesisDelegateKey SignKeyDSIGN Ed25519DSIGN -> SigningKey GenesisDelegateKey GenesisDelegateSigningKey (SignKeyDSIGN Ed25519DSIGN -> SigningKey GenesisDelegateKey) @@ -3570,12 +3570,12 @@ <$> ByteString -> Maybe (SignKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (SignKeyDSIGN v) Crypto.rawDeserialiseSignKeyDSIGN ByteString -bs +bs newtype instance Hash GenesisDelegateKey = GenesisDelegateKeyHash (Shelley.KeyHash Shelley.GenesisDelegate StandardCrypto) - deriving stock (Hash GenesisDelegateKey -> Hash GenesisDelegateKey -> Bool + deriving stock (Hash GenesisDelegateKey -> Hash GenesisDelegateKey -> Bool (Hash GenesisDelegateKey -> Hash GenesisDelegateKey -> Bool) -> (Hash GenesisDelegateKey -> Hash GenesisDelegateKey -> Bool) -> Eq (Hash GenesisDelegateKey) @@ -3584,7 +3584,7 @@ $c/= :: Hash GenesisDelegateKey -> Hash GenesisDelegateKey -> Bool == :: Hash GenesisDelegateKey -> Hash GenesisDelegateKey -> Bool $c== :: Hash GenesisDelegateKey -> Hash GenesisDelegateKey -> Bool -Eq, Eq (Hash GenesisDelegateKey) +Eq, Eq (Hash GenesisDelegateKey) Eq (Hash GenesisDelegateKey) -> (Hash GenesisDelegateKey -> Hash GenesisDelegateKey -> Ordering) -> (Hash GenesisDelegateKey -> Hash GenesisDelegateKey -> Bool) @@ -3630,7 +3630,7 @@ $ccompare :: Hash GenesisDelegateKey -> Hash GenesisDelegateKey -> Ordering $cp1Ord :: Eq (Hash GenesisDelegateKey) Ord) - deriving (Int -> Hash GenesisDelegateKey -> ShowS + deriving (Int -> Hash GenesisDelegateKey -> ShowS [Hash GenesisDelegateKey] -> ShowS Hash GenesisDelegateKey -> String (Int -> Hash GenesisDelegateKey -> ShowS) @@ -3645,7 +3645,7 @@ $cshow :: Hash GenesisDelegateKey -> String showsPrec :: Int -> Hash GenesisDelegateKey -> ShowS $cshowsPrec :: Int -> Hash GenesisDelegateKey -> ShowS -Show, String -> Hash GenesisDelegateKey +Show, String -> Hash GenesisDelegateKey (String -> Hash GenesisDelegateKey) -> IsString (Hash GenesisDelegateKey) forall a. (String -> a) -> IsString a @@ -3654,18 +3654,18 @@ IsString) via UsingRawBytesHex (Hash PaymentKey) instance SerialiseAsRawBytes (Hash GenesisDelegateKey) where - serialiseToRawBytes :: Hash GenesisDelegateKey -> ByteString -serialiseToRawBytes (GenesisDelegateKeyHash (Shelley.KeyHash vkh)) = + serialiseToRawBytes :: Hash GenesisDelegateKey -> ByteString +serialiseToRawBytes (GenesisDelegateKeyHash (Shelley.KeyHash vkh)) = Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) (VerKeyDSIGN (DSIGN StandardCrypto)) Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash GenesisDelegateKey) + deserialiseFromRawBytes :: AsType (Hash GenesisDelegateKey) -> ByteString -> Maybe (Hash GenesisDelegateKey) -deserialiseFromRawBytes (AsHash AsGenesisDelegateKey) ByteString -bs = +deserialiseFromRawBytes (AsHash AsGenesisDelegateKey) ByteString +bs = KeyHash 'GenesisDelegate StandardCrypto -> Hash GenesisDelegateKey GenesisDelegateKeyHash (KeyHash 'GenesisDelegate StandardCrypto -> Hash GenesisDelegateKey) @@ -3687,11 +3687,11 @@ <$> ByteString -> Maybe (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey GenesisDelegateKey) where - textEnvelopeType :: AsType (VerificationKey GenesisDelegateKey) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey GenesisDelegateKey) +instance HasTextEnvelope (VerificationKey GenesisDelegateKey) where + textEnvelopeType :: AsType (VerificationKey GenesisDelegateKey) -> TextEnvelopeType +textEnvelopeType AsType (VerificationKey GenesisDelegateKey) _ = TextEnvelopeType "GenesisDelegateVerificationKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -3702,17 +3702,17 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy -instance HasTextEnvelope (SigningKey GenesisDelegateKey) where - textEnvelopeType :: AsType (SigningKey GenesisDelegateKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey GenesisDelegateKey) +instance HasTextEnvelope (SigningKey GenesisDelegateKey) where + textEnvelopeType :: AsType (SigningKey GenesisDelegateKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey GenesisDelegateKey) _ = TextEnvelopeType "GenesisDelegateSigningKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -3723,31 +3723,31 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy instance CastVerificationKeyRole GenesisDelegateKey StakePoolKey where - castVerificationKey :: VerificationKey GenesisDelegateKey -> VerificationKey StakePoolKey -castVerificationKey (GenesisDelegateVerificationKey (Shelley.VKey vkey)) = + castVerificationKey :: VerificationKey GenesisDelegateKey -> VerificationKey StakePoolKey +castVerificationKey (GenesisDelegateVerificationKey (Shelley.VKey vkey)) = VKey 'StakePool StandardCrypto -> VerificationKey StakePoolKey StakePoolVerificationKey (VerKeyDSIGN (DSIGN StandardCrypto) -> VKey 'StakePool StandardCrypto forall (kd :: KeyRole) crypto. VerKeyDSIGN (DSIGN crypto) -> VKey kd crypto Shelley.VKey VerKeyDSIGN (DSIGN StandardCrypto) -vkey) +vkey) instance CastSigningKeyRole GenesisDelegateKey StakePoolKey where - castSigningKey :: SigningKey GenesisDelegateKey -> SigningKey StakePoolKey -castSigningKey (GenesisDelegateSigningKey skey) = + castSigningKey :: SigningKey GenesisDelegateKey -> SigningKey StakePoolKey +castSigningKey (GenesisDelegateSigningKey skey) = SignKeyDSIGN StandardCrypto -> SigningKey StakePoolKey StakePoolSigningKey SignKeyDSIGN StandardCrypto -skey +skey -- @@ -3771,9 +3771,9 @@ instance HasTypeProxy GenesisDelegateExtendedKey where data AsType GenesisDelegateExtendedKey = AsGenesisDelegateExtendedKey - proxyToAsType :: Proxy GenesisDelegateExtendedKey + proxyToAsType :: Proxy GenesisDelegateExtendedKey -> AsType GenesisDelegateExtendedKey -proxyToAsType Proxy GenesisDelegateExtendedKey +proxyToAsType Proxy GenesisDelegateExtendedKey _ = AsType GenesisDelegateExtendedKey AsGenesisDelegateExtendedKey @@ -3781,7 +3781,7 @@ newtype VerificationKey GenesisDelegateExtendedKey = GenesisDelegateExtendedVerificationKey Crypto.HD.XPub - deriving stock (VerificationKey GenesisDelegateExtendedKey + deriving stock (VerificationKey GenesisDelegateExtendedKey -> VerificationKey GenesisDelegateExtendedKey -> Bool (VerificationKey GenesisDelegateExtendedKey -> VerificationKey GenesisDelegateExtendedKey -> Bool) @@ -3798,7 +3798,7 @@ $c== :: VerificationKey GenesisDelegateExtendedKey -> VerificationKey GenesisDelegateExtendedKey -> Bool Eq) - deriving anyclass HasTypeProxy (VerificationKey GenesisDelegateExtendedKey) + deriving anyclass HasTypeProxy (VerificationKey GenesisDelegateExtendedKey) HasTypeProxy (VerificationKey GenesisDelegateExtendedKey) -> (VerificationKey GenesisDelegateExtendedKey -> ByteString) -> (AsType (VerificationKey GenesisDelegateExtendedKey) @@ -3824,8 +3824,8 @@ serialiseToCBOR :: VerificationKey GenesisDelegateExtendedKey -> ByteString $cserialiseToCBOR :: VerificationKey GenesisDelegateExtendedKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey GenesisDelegateExtendedKey) -SerialiseAsCBOR - deriving (Int -> VerificationKey GenesisDelegateExtendedKey -> ShowS +SerialiseAsCBOR + deriving (Int -> VerificationKey GenesisDelegateExtendedKey -> ShowS [VerificationKey GenesisDelegateExtendedKey] -> ShowS VerificationKey GenesisDelegateExtendedKey -> String (Int -> VerificationKey GenesisDelegateExtendedKey -> ShowS) @@ -3840,7 +3840,7 @@ $cshow :: VerificationKey GenesisDelegateExtendedKey -> String showsPrec :: Int -> VerificationKey GenesisDelegateExtendedKey -> ShowS $cshowsPrec :: Int -> VerificationKey GenesisDelegateExtendedKey -> ShowS -Show, String -> VerificationKey GenesisDelegateExtendedKey +Show, String -> VerificationKey GenesisDelegateExtendedKey (String -> VerificationKey GenesisDelegateExtendedKey) -> IsString (VerificationKey GenesisDelegateExtendedKey) forall a. (String -> a) -> IsString a @@ -3850,7 +3850,7 @@ newtype SigningKey GenesisDelegateExtendedKey = GenesisDelegateExtendedSigningKey Crypto.HD.XPrv - deriving anyclass HasTypeProxy (SigningKey GenesisDelegateExtendedKey) + deriving anyclass HasTypeProxy (SigningKey GenesisDelegateExtendedKey) HasTypeProxy (SigningKey GenesisDelegateExtendedKey) -> (SigningKey GenesisDelegateExtendedKey -> ByteString) -> (AsType (SigningKey GenesisDelegateExtendedKey) @@ -3875,8 +3875,8 @@ serialiseToCBOR :: SigningKey GenesisDelegateExtendedKey -> ByteString $cserialiseToCBOR :: SigningKey GenesisDelegateExtendedKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey GenesisDelegateExtendedKey) -SerialiseAsCBOR - deriving (Int -> SigningKey GenesisDelegateExtendedKey -> ShowS +SerialiseAsCBOR + deriving (Int -> SigningKey GenesisDelegateExtendedKey -> ShowS [SigningKey GenesisDelegateExtendedKey] -> ShowS SigningKey GenesisDelegateExtendedKey -> String (Int -> SigningKey GenesisDelegateExtendedKey -> ShowS) @@ -3891,7 +3891,7 @@ $cshow :: SigningKey GenesisDelegateExtendedKey -> String showsPrec :: Int -> SigningKey GenesisDelegateExtendedKey -> ShowS $cshowsPrec :: Int -> SigningKey GenesisDelegateExtendedKey -> ShowS -Show, String -> SigningKey GenesisDelegateExtendedKey +Show, String -> SigningKey GenesisDelegateExtendedKey (String -> SigningKey GenesisDelegateExtendedKey) -> IsString (SigningKey GenesisDelegateExtendedKey) forall a. (String -> a) -> IsString a @@ -3902,11 +3902,11 @@ deterministicSigningKey :: AsType GenesisDelegateExtendedKey -> Crypto.Seed -> SigningKey GenesisDelegateExtendedKey - deterministicSigningKey :: AsType GenesisDelegateExtendedKey + deterministicSigningKey :: AsType GenesisDelegateExtendedKey -> Seed -> SigningKey GenesisDelegateExtendedKey -deterministicSigningKey AsType GenesisDelegateExtendedKey -AsGenesisDelegateExtendedKey Seed -seed = +deterministicSigningKey AsType GenesisDelegateExtendedKey +AsGenesisDelegateExtendedKey Seed +seed = XPrv -> SigningKey GenesisDelegateExtendedKey GenesisDelegateExtendedSigningKey (ByteString -> ByteString -> XPrv @@ -3914,41 +3914,41 @@ (ByteArrayAccess passPhrase, ByteArrayAccess seed) => seed -> passPhrase -> XPrv Crypto.HD.generate ByteString -seedbs ByteString +seedbs ByteString BS.empty) where - (ByteString -seedbs, Seed + (ByteString +seedbs, Seed _) = Word -> Seed -> (ByteString, Seed) Crypto.getBytesFromSeedT Word 32 Seed -seed +seed deterministicSigningKeySeedSize :: AsType GenesisDelegateExtendedKey -> Word - deterministicSigningKeySeedSize :: AsType GenesisDelegateExtendedKey -> Word -deterministicSigningKeySeedSize AsType GenesisDelegateExtendedKey + deterministicSigningKeySeedSize :: AsType GenesisDelegateExtendedKey -> Word +deterministicSigningKeySeedSize AsType GenesisDelegateExtendedKey AsGenesisDelegateExtendedKey = Word 32 getVerificationKey :: SigningKey GenesisDelegateExtendedKey -> VerificationKey GenesisDelegateExtendedKey - getVerificationKey :: SigningKey GenesisDelegateExtendedKey + getVerificationKey :: SigningKey GenesisDelegateExtendedKey -> VerificationKey GenesisDelegateExtendedKey -getVerificationKey (GenesisDelegateExtendedSigningKey sk) = +getVerificationKey (GenesisDelegateExtendedSigningKey sk) = XPub -> VerificationKey GenesisDelegateExtendedKey GenesisDelegateExtendedVerificationKey (HasCallStack => XPrv -> XPub XPrv -> XPub Crypto.HD.toXPub XPrv -sk) +sk) -- | We use the hash of the normal non-extended pub key so that it is -- consistent with the one used in addresses and signatures. -- verificationKeyHash :: VerificationKey GenesisDelegateExtendedKey -> Hash GenesisDelegateExtendedKey - verificationKeyHash :: VerificationKey GenesisDelegateExtendedKey + verificationKeyHash :: VerificationKey GenesisDelegateExtendedKey -> Hash GenesisDelegateExtendedKey -verificationKeyHash (GenesisDelegateExtendedVerificationKey vk) = +verificationKeyHash (GenesisDelegateExtendedVerificationKey vk) = KeyHash 'Staking StandardCrypto -> Hash GenesisDelegateExtendedKey GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto @@ -3981,23 +3981,23 @@ forall h a. HashAlgorithm h => (a -> ByteString) -> a -> Hash h a Crypto.hashWith XPub -> ByteString Crypto.HD.xpubPublicKey XPub -vk +vk -instance ToCBOR (VerificationKey GenesisDelegateExtendedKey) where - toCBOR :: VerificationKey GenesisDelegateExtendedKey -> Encoding -toCBOR (GenesisDelegateExtendedVerificationKey xpub) = +instance ToCBOR (VerificationKey GenesisDelegateExtendedKey) where + toCBOR :: VerificationKey GenesisDelegateExtendedKey -> Encoding +toCBOR (GenesisDelegateExtendedVerificationKey xpub) = ByteString -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (XPub -> ByteString Crypto.HD.unXPub XPub -xpub) +xpub) -instance FromCBOR (VerificationKey GenesisDelegateExtendedKey) where - fromCBOR :: Decoder s (VerificationKey GenesisDelegateExtendedKey) -fromCBOR = do - ByteString -bs <- Decoder s ByteString +instance FromCBOR (VerificationKey GenesisDelegateExtendedKey) where + fromCBOR :: Decoder s (VerificationKey GenesisDelegateExtendedKey) +fromCBOR = do + ByteString +bs <- Decoder s ByteString forall a s. FromCBOR a => Decoder s a fromCBOR (String -> Decoder s (VerificationKey GenesisDelegateExtendedKey)) @@ -4020,22 +4020,22 @@ GenesisDelegateExtendedVerificationKey) (ByteString -> Either String XPub Crypto.HD.xpub (ByteString -bs :: ByteString)) +bs :: ByteString)) -instance ToCBOR (SigningKey GenesisDelegateExtendedKey) where - toCBOR :: SigningKey GenesisDelegateExtendedKey -> Encoding -toCBOR (GenesisDelegateExtendedSigningKey xprv) = +instance ToCBOR (SigningKey GenesisDelegateExtendedKey) where + toCBOR :: SigningKey GenesisDelegateExtendedKey -> Encoding +toCBOR (GenesisDelegateExtendedSigningKey xprv) = ByteString -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (XPrv -> ByteString Crypto.HD.unXPrv XPrv -xprv) +xprv) -instance FromCBOR (SigningKey GenesisDelegateExtendedKey) where - fromCBOR :: Decoder s (SigningKey GenesisDelegateExtendedKey) -fromCBOR = do - ByteString -bs <- Decoder s ByteString +instance FromCBOR (SigningKey GenesisDelegateExtendedKey) where + fromCBOR :: Decoder s (SigningKey GenesisDelegateExtendedKey) +fromCBOR = do + ByteString +bs <- Decoder s ByteString forall a s. FromCBOR a => Decoder s a fromCBOR (String -> Decoder s (SigningKey GenesisDelegateExtendedKey)) @@ -4059,19 +4059,19 @@ (ByteString -> Either String XPrv forall bin. ByteArrayAccess bin => bin -> Either String XPrv Crypto.HD.xprv (ByteString -bs :: ByteString)) +bs :: ByteString)) instance SerialiseAsRawBytes (VerificationKey GenesisDelegateExtendedKey) where - serialiseToRawBytes :: VerificationKey GenesisDelegateExtendedKey -> ByteString -serialiseToRawBytes (GenesisDelegateExtendedVerificationKey xpub) = + serialiseToRawBytes :: VerificationKey GenesisDelegateExtendedKey -> ByteString +serialiseToRawBytes (GenesisDelegateExtendedVerificationKey xpub) = XPub -> ByteString Crypto.HD.unXPub XPub -xpub +xpub - deserialiseFromRawBytes :: AsType (VerificationKey GenesisDelegateExtendedKey) + deserialiseFromRawBytes :: AsType (VerificationKey GenesisDelegateExtendedKey) -> ByteString -> Maybe (VerificationKey GenesisDelegateExtendedKey) -deserialiseFromRawBytes (AsVerificationKey AsGenesisDelegateExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsGenesisDelegateExtendedKey) ByteString +bs = (String -> Maybe (VerificationKey GenesisDelegateExtendedKey)) -> (XPub -> Maybe (VerificationKey GenesisDelegateExtendedKey)) -> Either String XPub @@ -4095,19 +4095,19 @@ GenesisDelegateExtendedVerificationKey) (ByteString -> Either String XPub Crypto.HD.xpub ByteString -bs) +bs) instance SerialiseAsRawBytes (SigningKey GenesisDelegateExtendedKey) where - serialiseToRawBytes :: SigningKey GenesisDelegateExtendedKey -> ByteString -serialiseToRawBytes (GenesisDelegateExtendedSigningKey xprv) = + serialiseToRawBytes :: SigningKey GenesisDelegateExtendedKey -> ByteString +serialiseToRawBytes (GenesisDelegateExtendedSigningKey xprv) = XPrv -> ByteString Crypto.HD.unXPrv XPrv -xprv +xprv - deserialiseFromRawBytes :: AsType (SigningKey GenesisDelegateExtendedKey) + deserialiseFromRawBytes :: AsType (SigningKey GenesisDelegateExtendedKey) -> ByteString -> Maybe (SigningKey GenesisDelegateExtendedKey) -deserialiseFromRawBytes (AsSigningKey AsGenesisDelegateExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsGenesisDelegateExtendedKey) ByteString +bs = (String -> Maybe (SigningKey GenesisDelegateExtendedKey)) -> (XPrv -> Maybe (SigningKey GenesisDelegateExtendedKey)) -> Either String XPrv @@ -4132,12 +4132,12 @@ (ByteString -> Either String XPrv forall bin. ByteArrayAccess bin => bin -> Either String XPrv Crypto.HD.xprv ByteString -bs) +bs) newtype instance Hash GenesisDelegateExtendedKey = GenesisDelegateExtendedKeyHash (Shelley.KeyHash Shelley.Staking StandardCrypto) - deriving stock (Hash GenesisDelegateExtendedKey + deriving stock (Hash GenesisDelegateExtendedKey -> Hash GenesisDelegateExtendedKey -> Bool (Hash GenesisDelegateExtendedKey -> Hash GenesisDelegateExtendedKey -> Bool) @@ -4153,7 +4153,7 @@ -> Hash GenesisDelegateExtendedKey -> Bool $c== :: Hash GenesisDelegateExtendedKey -> Hash GenesisDelegateExtendedKey -> Bool -Eq, Eq (Hash GenesisDelegateExtendedKey) +Eq, Eq (Hash GenesisDelegateExtendedKey) Eq (Hash GenesisDelegateExtendedKey) -> (Hash GenesisDelegateExtendedKey -> Hash GenesisDelegateExtendedKey -> Ordering) @@ -4223,7 +4223,7 @@ -> Hash GenesisDelegateExtendedKey -> Ordering $cp1Ord :: Eq (Hash GenesisDelegateExtendedKey) Ord) - deriving (Int -> Hash GenesisDelegateExtendedKey -> ShowS + deriving (Int -> Hash GenesisDelegateExtendedKey -> ShowS [Hash GenesisDelegateExtendedKey] -> ShowS Hash GenesisDelegateExtendedKey -> String (Int -> Hash GenesisDelegateExtendedKey -> ShowS) @@ -4238,7 +4238,7 @@ $cshow :: Hash GenesisDelegateExtendedKey -> String showsPrec :: Int -> Hash GenesisDelegateExtendedKey -> ShowS $cshowsPrec :: Int -> Hash GenesisDelegateExtendedKey -> ShowS -Show, String -> Hash GenesisDelegateExtendedKey +Show, String -> Hash GenesisDelegateExtendedKey (String -> Hash GenesisDelegateExtendedKey) -> IsString (Hash GenesisDelegateExtendedKey) forall a. (String -> a) -> IsString a @@ -4247,18 +4247,18 @@ IsString) via UsingRawBytesHex (Hash PaymentKey) instance SerialiseAsRawBytes (Hash GenesisDelegateExtendedKey) where - serialiseToRawBytes :: Hash GenesisDelegateExtendedKey -> ByteString -serialiseToRawBytes (GenesisDelegateExtendedKeyHash (Shelley.KeyHash vkh)) = + serialiseToRawBytes :: Hash GenesisDelegateExtendedKey -> ByteString +serialiseToRawBytes (GenesisDelegateExtendedKeyHash (Shelley.KeyHash vkh)) = Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) (VerKeyDSIGN (DSIGN StandardCrypto)) Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash GenesisDelegateExtendedKey) + deserialiseFromRawBytes :: AsType (Hash GenesisDelegateExtendedKey) -> ByteString -> Maybe (Hash GenesisDelegateExtendedKey) -deserialiseFromRawBytes (AsHash AsGenesisDelegateExtendedKey) ByteString -bs = +deserialiseFromRawBytes (AsHash AsGenesisDelegateExtendedKey) ByteString +bs = KeyHash 'Staking StandardCrypto -> Hash GenesisDelegateExtendedKey GenesisDelegateExtendedKeyHash (KeyHash 'Staking StandardCrypto -> Hash GenesisDelegateExtendedKey) @@ -4280,25 +4280,25 @@ <$> ByteString -> Maybe (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey GenesisDelegateExtendedKey) where - textEnvelopeType :: AsType (VerificationKey GenesisDelegateExtendedKey) +instance HasTextEnvelope (VerificationKey GenesisDelegateExtendedKey) where + textEnvelopeType :: AsType (VerificationKey GenesisDelegateExtendedKey) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey GenesisDelegateExtendedKey) +textEnvelopeType AsType (VerificationKey GenesisDelegateExtendedKey) _ = TextEnvelopeType "GenesisDelegateExtendedVerificationKey_ed25519_bip32" -instance HasTextEnvelope (SigningKey GenesisDelegateExtendedKey) where - textEnvelopeType :: AsType (SigningKey GenesisDelegateExtendedKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey GenesisDelegateExtendedKey) +instance HasTextEnvelope (SigningKey GenesisDelegateExtendedKey) where + textEnvelopeType :: AsType (SigningKey GenesisDelegateExtendedKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey GenesisDelegateExtendedKey) _ = TextEnvelopeType "GenesisDelegateExtendedSigningKey_ed25519_bip32" instance CastVerificationKeyRole GenesisDelegateExtendedKey GenesisDelegateKey where - castVerificationKey :: VerificationKey GenesisDelegateExtendedKey + castVerificationKey :: VerificationKey GenesisDelegateExtendedKey -> VerificationKey GenesisDelegateKey -castVerificationKey (GenesisDelegateExtendedVerificationKey vk) = +castVerificationKey (GenesisDelegateExtendedVerificationKey vk) = VKey 'GenesisDelegate StandardCrypto -> VerificationKey GenesisDelegateKey GenesisDelegateVerificationKey @@ -4322,7 +4322,7 @@ forall a. a -> Maybe a -> a fromMaybe VerKeyDSIGN Ed25519DSIGN forall a. a -impossible +impossible (Maybe (VerKeyDSIGN Ed25519DSIGN) -> VerKeyDSIGN Ed25519DSIGN) -> (XPub -> Maybe (VerKeyDSIGN Ed25519DSIGN)) -> XPub @@ -4340,10 +4340,10 @@ -> XPub -> VerificationKey GenesisDelegateKey forall a b. (a -> b) -> a -> b $ XPub -vk +vk where - impossible :: a -impossible = + impossible :: a +impossible = String -> a forall a. HasCallStack => String -> a error String @@ -4358,8 +4358,8 @@ instance HasTypeProxy GenesisUTxOKey where data AsType GenesisUTxOKey = AsGenesisUTxOKey - proxyToAsType :: Proxy GenesisUTxOKey -> AsType GenesisUTxOKey -proxyToAsType Proxy GenesisUTxOKey + proxyToAsType :: Proxy GenesisUTxOKey -> AsType GenesisUTxOKey +proxyToAsType Proxy GenesisUTxOKey _ = AsType GenesisUTxOKey AsGenesisUTxOKey @@ -4368,7 +4368,7 @@ newtype VerificationKey GenesisUTxOKey = GenesisUTxOVerificationKey (Shelley.VKey Shelley.Payment StandardCrypto) - deriving stock (VerificationKey GenesisUTxOKey + deriving stock (VerificationKey GenesisUTxOKey -> VerificationKey GenesisUTxOKey -> Bool (VerificationKey GenesisUTxOKey -> VerificationKey GenesisUTxOKey -> Bool) @@ -4385,7 +4385,7 @@ $c== :: VerificationKey GenesisUTxOKey -> VerificationKey GenesisUTxOKey -> Bool Eq) - deriving (Int -> VerificationKey GenesisUTxOKey -> ShowS + deriving (Int -> VerificationKey GenesisUTxOKey -> ShowS [VerificationKey GenesisUTxOKey] -> ShowS VerificationKey GenesisUTxOKey -> String (Int -> VerificationKey GenesisUTxOKey -> ShowS) @@ -4400,14 +4400,14 @@ $cshow :: VerificationKey GenesisUTxOKey -> String showsPrec :: Int -> VerificationKey GenesisUTxOKey -> ShowS $cshowsPrec :: Int -> VerificationKey GenesisUTxOKey -> ShowS -Show, String -> VerificationKey GenesisUTxOKey +Show, String -> VerificationKey GenesisUTxOKey (String -> VerificationKey GenesisUTxOKey) -> IsString (VerificationKey GenesisUTxOKey) forall a. (String -> a) -> IsString a fromString :: String -> VerificationKey GenesisUTxOKey $cfromString :: String -> VerificationKey GenesisUTxOKey IsString) via UsingRawBytesHex (VerificationKey GenesisUTxOKey) - deriving newtype (Typeable (VerificationKey GenesisUTxOKey) + deriving newtype (Typeable (VerificationKey GenesisUTxOKey) Typeable (VerificationKey GenesisUTxOKey) -> (VerificationKey GenesisUTxOKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -4437,7 +4437,7 @@ toCBOR :: VerificationKey GenesisUTxOKey -> Encoding $ctoCBOR :: VerificationKey GenesisUTxOKey -> Encoding $cp1ToCBOR :: Typeable (VerificationKey GenesisUTxOKey) -ToCBOR, Typeable (VerificationKey GenesisUTxOKey) +ToCBOR, Typeable (VerificationKey GenesisUTxOKey) Decoder s (VerificationKey GenesisUTxOKey) Typeable (VerificationKey GenesisUTxOKey) -> (forall s. Decoder s (VerificationKey GenesisUTxOKey)) @@ -4453,8 +4453,8 @@ fromCBOR :: Decoder s (VerificationKey GenesisUTxOKey) $cfromCBOR :: forall s. Decoder s (VerificationKey GenesisUTxOKey) $cp1FromCBOR :: Typeable (VerificationKey GenesisUTxOKey) -FromCBOR) - deriving anyclass HasTypeProxy (VerificationKey GenesisUTxOKey) +FromCBOR) + deriving anyclass HasTypeProxy (VerificationKey GenesisUTxOKey) HasTypeProxy (VerificationKey GenesisUTxOKey) -> (VerificationKey GenesisUTxOKey -> ByteString) -> (AsType (VerificationKey GenesisUTxOKey) @@ -4479,11 +4479,11 @@ serialiseToCBOR :: VerificationKey GenesisUTxOKey -> ByteString $cserialiseToCBOR :: VerificationKey GenesisUTxOKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey GenesisUTxOKey) -SerialiseAsCBOR +SerialiseAsCBOR newtype SigningKey GenesisUTxOKey = GenesisUTxOSigningKey (Shelley.SignKeyDSIGN StandardCrypto) - deriving (Int -> SigningKey GenesisUTxOKey -> ShowS + deriving (Int -> SigningKey GenesisUTxOKey -> ShowS [SigningKey GenesisUTxOKey] -> ShowS SigningKey GenesisUTxOKey -> String (Int -> SigningKey GenesisUTxOKey -> ShowS) @@ -4498,14 +4498,14 @@ $cshow :: SigningKey GenesisUTxOKey -> String showsPrec :: Int -> SigningKey GenesisUTxOKey -> ShowS $cshowsPrec :: Int -> SigningKey GenesisUTxOKey -> ShowS -Show, String -> SigningKey GenesisUTxOKey +Show, String -> SigningKey GenesisUTxOKey (String -> SigningKey GenesisUTxOKey) -> IsString (SigningKey GenesisUTxOKey) forall a. (String -> a) -> IsString a fromString :: String -> SigningKey GenesisUTxOKey $cfromString :: String -> SigningKey GenesisUTxOKey IsString) via UsingRawBytesHex (SigningKey GenesisUTxOKey) - deriving newtype (Typeable (SigningKey GenesisUTxOKey) + deriving newtype (Typeable (SigningKey GenesisUTxOKey) Typeable (SigningKey GenesisUTxOKey) -> (SigningKey GenesisUTxOKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -4535,7 +4535,7 @@ toCBOR :: SigningKey GenesisUTxOKey -> Encoding $ctoCBOR :: SigningKey GenesisUTxOKey -> Encoding $cp1ToCBOR :: Typeable (SigningKey GenesisUTxOKey) -ToCBOR, Typeable (SigningKey GenesisUTxOKey) +ToCBOR, Typeable (SigningKey GenesisUTxOKey) Decoder s (SigningKey GenesisUTxOKey) Typeable (SigningKey GenesisUTxOKey) -> (forall s. Decoder s (SigningKey GenesisUTxOKey)) @@ -4551,8 +4551,8 @@ fromCBOR :: Decoder s (SigningKey GenesisUTxOKey) $cfromCBOR :: forall s. Decoder s (SigningKey GenesisUTxOKey) $cp1FromCBOR :: Typeable (SigningKey GenesisUTxOKey) -FromCBOR) - deriving anyclass HasTypeProxy (SigningKey GenesisUTxOKey) +FromCBOR) + deriving anyclass HasTypeProxy (SigningKey GenesisUTxOKey) HasTypeProxy (SigningKey GenesisUTxOKey) -> (SigningKey GenesisUTxOKey -> ByteString) -> (AsType (SigningKey GenesisUTxOKey) @@ -4573,38 +4573,38 @@ serialiseToCBOR :: SigningKey GenesisUTxOKey -> ByteString $cserialiseToCBOR :: SigningKey GenesisUTxOKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey GenesisUTxOKey) -SerialiseAsCBOR +SerialiseAsCBOR deterministicSigningKey :: AsType GenesisUTxOKey -> Crypto.Seed -> SigningKey GenesisUTxOKey - deterministicSigningKey :: AsType GenesisUTxOKey -> Seed -> SigningKey GenesisUTxOKey -deterministicSigningKey AsType GenesisUTxOKey -AsGenesisUTxOKey Seed -seed = + deterministicSigningKey :: AsType GenesisUTxOKey -> Seed -> SigningKey GenesisUTxOKey +deterministicSigningKey AsType GenesisUTxOKey +AsGenesisUTxOKey Seed +seed = SignKeyDSIGN StandardCrypto -> SigningKey GenesisUTxOKey GenesisUTxOSigningKey (Seed -> SignKeyDSIGN Ed25519DSIGN forall v. DSIGNAlgorithm v => Seed -> SignKeyDSIGN v Crypto.genKeyDSIGN Seed -seed) +seed) deterministicSigningKeySeedSize :: AsType GenesisUTxOKey -> Word - deterministicSigningKeySeedSize :: AsType GenesisUTxOKey -> Word -deterministicSigningKeySeedSize AsType GenesisUTxOKey + deterministicSigningKeySeedSize :: AsType GenesisUTxOKey -> Word +deterministicSigningKeySeedSize AsType GenesisUTxOKey AsGenesisUTxOKey = Proxy Ed25519DSIGN -> Word forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> Word Crypto.seedSizeDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy +proxy where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy getVerificationKey :: SigningKey GenesisUTxOKey -> VerificationKey GenesisUTxOKey - getVerificationKey :: SigningKey GenesisUTxOKey -> VerificationKey GenesisUTxOKey -getVerificationKey (GenesisUTxOSigningKey sk) = + getVerificationKey :: SigningKey GenesisUTxOKey -> VerificationKey GenesisUTxOKey +getVerificationKey (GenesisUTxOSigningKey sk) = VKey 'Payment StandardCrypto -> VerificationKey GenesisUTxOKey GenesisUTxOVerificationKey (VerKeyDSIGN (DSIGN StandardCrypto) -> VKey 'Payment StandardCrypto forall (kd :: KeyRole) crypto. @@ -4613,33 +4613,33 @@ forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> VerKeyDSIGN v Crypto.deriveVerKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk)) +sk)) verificationKeyHash :: VerificationKey GenesisUTxOKey -> Hash GenesisUTxOKey - verificationKeyHash :: VerificationKey GenesisUTxOKey -> Hash GenesisUTxOKey -verificationKeyHash (GenesisUTxOVerificationKey vkey) = + verificationKeyHash :: VerificationKey GenesisUTxOKey -> Hash GenesisUTxOKey +verificationKeyHash (GenesisUTxOVerificationKey vkey) = KeyHash 'Payment StandardCrypto -> Hash GenesisUTxOKey GenesisUTxOKeyHash (VKey 'Payment StandardCrypto -> KeyHash 'Payment StandardCrypto forall crypto (kd :: KeyRole). Crypto crypto => VKey kd crypto -> KeyHash kd crypto Shelley.hashKey VKey 'Payment StandardCrypto -vkey) +vkey) instance SerialiseAsRawBytes (VerificationKey GenesisUTxOKey) where - serialiseToRawBytes :: VerificationKey GenesisUTxOKey -> ByteString -serialiseToRawBytes (GenesisUTxOVerificationKey (Shelley.VKey vk)) = + serialiseToRawBytes :: VerificationKey GenesisUTxOKey -> ByteString +serialiseToRawBytes (GenesisUTxOVerificationKey (Shelley.VKey vk)) = VerKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => VerKeyDSIGN v -> ByteString Crypto.rawSerialiseVerKeyDSIGN VerKeyDSIGN (DSIGN StandardCrypto) VerKeyDSIGN Ed25519DSIGN -vk +vk - deserialiseFromRawBytes :: AsType (VerificationKey GenesisUTxOKey) + deserialiseFromRawBytes :: AsType (VerificationKey GenesisUTxOKey) -> ByteString -> Maybe (VerificationKey GenesisUTxOKey) -deserialiseFromRawBytes (AsVerificationKey AsGenesisUTxOKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsGenesisUTxOKey) ByteString +bs = VKey 'Payment StandardCrypto -> VerificationKey GenesisUTxOKey GenesisUTxOVerificationKey (VKey 'Payment StandardCrypto -> VerificationKey GenesisUTxOKey) -> (VerKeyDSIGN Ed25519DSIGN -> VKey 'Payment StandardCrypto) @@ -4657,21 +4657,21 @@ ByteString -> Maybe (VerKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (VerKeyDSIGN v) Crypto.rawDeserialiseVerKeyDSIGN ByteString -bs +bs instance SerialiseAsRawBytes (SigningKey GenesisUTxOKey) where - serialiseToRawBytes :: SigningKey GenesisUTxOKey -> ByteString -serialiseToRawBytes (GenesisUTxOSigningKey sk) = + serialiseToRawBytes :: SigningKey GenesisUTxOKey -> ByteString +serialiseToRawBytes (GenesisUTxOSigningKey sk) = SignKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> ByteString Crypto.rawSerialiseSignKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk +sk - deserialiseFromRawBytes :: AsType (SigningKey GenesisUTxOKey) + deserialiseFromRawBytes :: AsType (SigningKey GenesisUTxOKey) -> ByteString -> Maybe (SigningKey GenesisUTxOKey) -deserialiseFromRawBytes (AsSigningKey AsGenesisUTxOKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsGenesisUTxOKey) ByteString +bs = SignKeyDSIGN StandardCrypto -> SigningKey GenesisUTxOKey SignKeyDSIGN Ed25519DSIGN -> SigningKey GenesisUTxOKey GenesisUTxOSigningKey (SignKeyDSIGN Ed25519DSIGN -> SigningKey GenesisUTxOKey) @@ -4681,12 +4681,12 @@ <$> ByteString -> Maybe (SignKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (SignKeyDSIGN v) Crypto.rawDeserialiseSignKeyDSIGN ByteString -bs +bs newtype instance Hash GenesisUTxOKey = GenesisUTxOKeyHash (Shelley.KeyHash Shelley.Payment StandardCrypto) - deriving stock (Hash GenesisUTxOKey -> Hash GenesisUTxOKey -> Bool + deriving stock (Hash GenesisUTxOKey -> Hash GenesisUTxOKey -> Bool (Hash GenesisUTxOKey -> Hash GenesisUTxOKey -> Bool) -> (Hash GenesisUTxOKey -> Hash GenesisUTxOKey -> Bool) -> Eq (Hash GenesisUTxOKey) @@ -4695,7 +4695,7 @@ $c/= :: Hash GenesisUTxOKey -> Hash GenesisUTxOKey -> Bool == :: Hash GenesisUTxOKey -> Hash GenesisUTxOKey -> Bool $c== :: Hash GenesisUTxOKey -> Hash GenesisUTxOKey -> Bool -Eq, Eq (Hash GenesisUTxOKey) +Eq, Eq (Hash GenesisUTxOKey) Eq (Hash GenesisUTxOKey) -> (Hash GenesisUTxOKey -> Hash GenesisUTxOKey -> Ordering) -> (Hash GenesisUTxOKey -> Hash GenesisUTxOKey -> Bool) @@ -4736,7 +4736,7 @@ $ccompare :: Hash GenesisUTxOKey -> Hash GenesisUTxOKey -> Ordering $cp1Ord :: Eq (Hash GenesisUTxOKey) Ord) - deriving (Int -> Hash GenesisUTxOKey -> ShowS + deriving (Int -> Hash GenesisUTxOKey -> ShowS [Hash GenesisUTxOKey] -> ShowS Hash GenesisUTxOKey -> String (Int -> Hash GenesisUTxOKey -> ShowS) @@ -4751,7 +4751,7 @@ $cshow :: Hash GenesisUTxOKey -> String showsPrec :: Int -> Hash GenesisUTxOKey -> ShowS $cshowsPrec :: Int -> Hash GenesisUTxOKey -> ShowS -Show, String -> Hash GenesisUTxOKey +Show, String -> Hash GenesisUTxOKey (String -> Hash GenesisUTxOKey) -> IsString (Hash GenesisUTxOKey) forall a. (String -> a) -> IsString a fromString :: String -> Hash GenesisUTxOKey @@ -4759,18 +4759,18 @@ IsString) via UsingRawBytesHex (Hash PaymentKey) instance SerialiseAsRawBytes (Hash GenesisUTxOKey) where - serialiseToRawBytes :: Hash GenesisUTxOKey -> ByteString -serialiseToRawBytes (GenesisUTxOKeyHash (Shelley.KeyHash vkh)) = + serialiseToRawBytes :: Hash GenesisUTxOKey -> ByteString +serialiseToRawBytes (GenesisUTxOKeyHash (Shelley.KeyHash vkh)) = Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) (VerKeyDSIGN (DSIGN StandardCrypto)) Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash GenesisUTxOKey) + deserialiseFromRawBytes :: AsType (Hash GenesisUTxOKey) -> ByteString -> Maybe (Hash GenesisUTxOKey) -deserialiseFromRawBytes (AsHash AsGenesisUTxOKey) ByteString -bs = +deserialiseFromRawBytes (AsHash AsGenesisUTxOKey) ByteString +bs = KeyHash 'Payment StandardCrypto -> Hash GenesisUTxOKey GenesisUTxOKeyHash (KeyHash 'Payment StandardCrypto -> Hash GenesisUTxOKey) -> (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) @@ -4791,11 +4791,11 @@ <$> ByteString -> Maybe (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance HasTextEnvelope (VerificationKey GenesisUTxOKey) where - textEnvelopeType :: AsType (VerificationKey GenesisUTxOKey) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey GenesisUTxOKey) +instance HasTextEnvelope (VerificationKey GenesisUTxOKey) where + textEnvelopeType :: AsType (VerificationKey GenesisUTxOKey) -> TextEnvelopeType +textEnvelopeType AsType (VerificationKey GenesisUTxOKey) _ = TextEnvelopeType "GenesisUTxOVerificationKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -4806,17 +4806,17 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy -instance HasTextEnvelope (SigningKey GenesisUTxOKey) where - textEnvelopeType :: AsType (SigningKey GenesisUTxOKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey GenesisUTxOKey) +instance HasTextEnvelope (SigningKey GenesisUTxOKey) where + textEnvelopeType :: AsType (SigningKey GenesisUTxOKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey GenesisUTxOKey) _ = TextEnvelopeType "GenesisUTxOSigningKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -4827,32 +4827,32 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy -- TODO: use a different type from the stake pool key, since some operations -- need a genesis key specifically instance CastVerificationKeyRole GenesisUTxOKey PaymentKey where - castVerificationKey :: VerificationKey GenesisUTxOKey -> VerificationKey PaymentKey -castVerificationKey (GenesisUTxOVerificationKey (Shelley.VKey vkey)) = + castVerificationKey :: VerificationKey GenesisUTxOKey -> VerificationKey PaymentKey +castVerificationKey (GenesisUTxOVerificationKey (Shelley.VKey vkey)) = VKey 'Payment StandardCrypto -> VerificationKey PaymentKey PaymentVerificationKey (VerKeyDSIGN (DSIGN StandardCrypto) -> VKey 'Payment StandardCrypto forall (kd :: KeyRole) crypto. VerKeyDSIGN (DSIGN crypto) -> VKey kd crypto Shelley.VKey VerKeyDSIGN (DSIGN StandardCrypto) -vkey) +vkey) instance CastSigningKeyRole GenesisUTxOKey PaymentKey where - castSigningKey :: SigningKey GenesisUTxOKey -> SigningKey PaymentKey -castSigningKey (GenesisUTxOSigningKey skey) = + castSigningKey :: SigningKey GenesisUTxOKey -> SigningKey PaymentKey +castSigningKey (GenesisUTxOSigningKey skey) = SignKeyDSIGN StandardCrypto -> SigningKey PaymentKey PaymentSigningKey SignKeyDSIGN StandardCrypto -skey +skey -- @@ -4863,8 +4863,8 @@ instance HasTypeProxy StakePoolKey where data AsType StakePoolKey = AsStakePoolKey - proxyToAsType :: Proxy StakePoolKey -> AsType StakePoolKey -proxyToAsType Proxy StakePoolKey + proxyToAsType :: Proxy StakePoolKey -> AsType StakePoolKey +proxyToAsType Proxy StakePoolKey _ = AsType StakePoolKey AsStakePoolKey @@ -4872,7 +4872,7 @@ newtype VerificationKey StakePoolKey = StakePoolVerificationKey (Shelley.VKey Shelley.StakePool StandardCrypto) - deriving stock (VerificationKey StakePoolKey + deriving stock (VerificationKey StakePoolKey -> VerificationKey StakePoolKey -> Bool (VerificationKey StakePoolKey -> VerificationKey StakePoolKey -> Bool) @@ -4889,7 +4889,7 @@ $c== :: VerificationKey StakePoolKey -> VerificationKey StakePoolKey -> Bool Eq) - deriving (Int -> VerificationKey StakePoolKey -> ShowS + deriving (Int -> VerificationKey StakePoolKey -> ShowS [VerificationKey StakePoolKey] -> ShowS VerificationKey StakePoolKey -> String (Int -> VerificationKey StakePoolKey -> ShowS) @@ -4904,14 +4904,14 @@ $cshow :: VerificationKey StakePoolKey -> String showsPrec :: Int -> VerificationKey StakePoolKey -> ShowS $cshowsPrec :: Int -> VerificationKey StakePoolKey -> ShowS -Show, String -> VerificationKey StakePoolKey +Show, String -> VerificationKey StakePoolKey (String -> VerificationKey StakePoolKey) -> IsString (VerificationKey StakePoolKey) forall a. (String -> a) -> IsString a fromString :: String -> VerificationKey StakePoolKey $cfromString :: String -> VerificationKey StakePoolKey IsString) via UsingRawBytesHex (VerificationKey StakePoolKey) - deriving newtype (Typeable (VerificationKey StakePoolKey) + deriving newtype (Typeable (VerificationKey StakePoolKey) Typeable (VerificationKey StakePoolKey) -> (VerificationKey StakePoolKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -4941,7 +4941,7 @@ toCBOR :: VerificationKey StakePoolKey -> Encoding $ctoCBOR :: VerificationKey StakePoolKey -> Encoding $cp1ToCBOR :: Typeable (VerificationKey StakePoolKey) -ToCBOR, Typeable (VerificationKey StakePoolKey) +ToCBOR, Typeable (VerificationKey StakePoolKey) Decoder s (VerificationKey StakePoolKey) Typeable (VerificationKey StakePoolKey) -> (forall s. Decoder s (VerificationKey StakePoolKey)) @@ -4957,8 +4957,8 @@ fromCBOR :: Decoder s (VerificationKey StakePoolKey) $cfromCBOR :: forall s. Decoder s (VerificationKey StakePoolKey) $cp1FromCBOR :: Typeable (VerificationKey StakePoolKey) -FromCBOR) - deriving anyclass HasTypeProxy (VerificationKey StakePoolKey) +FromCBOR) + deriving anyclass HasTypeProxy (VerificationKey StakePoolKey) HasTypeProxy (VerificationKey StakePoolKey) -> (VerificationKey StakePoolKey -> ByteString) -> (AsType (VerificationKey StakePoolKey) @@ -4980,11 +4980,11 @@ serialiseToCBOR :: VerificationKey StakePoolKey -> ByteString $cserialiseToCBOR :: VerificationKey StakePoolKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (VerificationKey StakePoolKey) -SerialiseAsCBOR +SerialiseAsCBOR newtype SigningKey StakePoolKey = StakePoolSigningKey (Shelley.SignKeyDSIGN StandardCrypto) - deriving (Int -> SigningKey StakePoolKey -> ShowS + deriving (Int -> SigningKey StakePoolKey -> ShowS [SigningKey StakePoolKey] -> ShowS SigningKey StakePoolKey -> String (Int -> SigningKey StakePoolKey -> ShowS) @@ -4999,14 +4999,14 @@ $cshow :: SigningKey StakePoolKey -> String showsPrec :: Int -> SigningKey StakePoolKey -> ShowS $cshowsPrec :: Int -> SigningKey StakePoolKey -> ShowS -Show, String -> SigningKey StakePoolKey +Show, String -> SigningKey StakePoolKey (String -> SigningKey StakePoolKey) -> IsString (SigningKey StakePoolKey) forall a. (String -> a) -> IsString a fromString :: String -> SigningKey StakePoolKey $cfromString :: String -> SigningKey StakePoolKey IsString) via UsingRawBytesHex (SigningKey StakePoolKey) - deriving newtype (Typeable (SigningKey StakePoolKey) + deriving newtype (Typeable (SigningKey StakePoolKey) Typeable (SigningKey StakePoolKey) -> (SigningKey StakePoolKey -> Encoding) -> ((forall t. ToCBOR t => Proxy t -> Size) @@ -5036,7 +5036,7 @@ toCBOR :: SigningKey StakePoolKey -> Encoding $ctoCBOR :: SigningKey StakePoolKey -> Encoding $cp1ToCBOR :: Typeable (SigningKey StakePoolKey) -ToCBOR, Typeable (SigningKey StakePoolKey) +ToCBOR, Typeable (SigningKey StakePoolKey) Decoder s (SigningKey StakePoolKey) Typeable (SigningKey StakePoolKey) -> (forall s. Decoder s (SigningKey StakePoolKey)) @@ -5052,8 +5052,8 @@ fromCBOR :: Decoder s (SigningKey StakePoolKey) $cfromCBOR :: forall s. Decoder s (SigningKey StakePoolKey) $cp1FromCBOR :: Typeable (SigningKey StakePoolKey) -FromCBOR) - deriving anyclass HasTypeProxy (SigningKey StakePoolKey) +FromCBOR) + deriving anyclass HasTypeProxy (SigningKey StakePoolKey) HasTypeProxy (SigningKey StakePoolKey) -> (SigningKey StakePoolKey -> ByteString) -> (AsType (SigningKey StakePoolKey) @@ -5074,38 +5074,38 @@ serialiseToCBOR :: SigningKey StakePoolKey -> ByteString $cserialiseToCBOR :: SigningKey StakePoolKey -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy (SigningKey StakePoolKey) -SerialiseAsCBOR +SerialiseAsCBOR deterministicSigningKey :: AsType StakePoolKey -> Crypto.Seed -> SigningKey StakePoolKey - deterministicSigningKey :: AsType StakePoolKey -> Seed -> SigningKey StakePoolKey -deterministicSigningKey AsType StakePoolKey -AsStakePoolKey Seed -seed = + deterministicSigningKey :: AsType StakePoolKey -> Seed -> SigningKey StakePoolKey +deterministicSigningKey AsType StakePoolKey +AsStakePoolKey Seed +seed = SignKeyDSIGN StandardCrypto -> SigningKey StakePoolKey StakePoolSigningKey (Seed -> SignKeyDSIGN Ed25519DSIGN forall v. DSIGNAlgorithm v => Seed -> SignKeyDSIGN v Crypto.genKeyDSIGN Seed -seed) +seed) deterministicSigningKeySeedSize :: AsType StakePoolKey -> Word - deterministicSigningKeySeedSize :: AsType StakePoolKey -> Word -deterministicSigningKeySeedSize AsType StakePoolKey + deterministicSigningKeySeedSize :: AsType StakePoolKey -> Word +deterministicSigningKeySeedSize AsType StakePoolKey AsStakePoolKey = Proxy Ed25519DSIGN -> Word forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> Word Crypto.seedSizeDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy +proxy where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy getVerificationKey :: SigningKey StakePoolKey -> VerificationKey StakePoolKey - getVerificationKey :: SigningKey StakePoolKey -> VerificationKey StakePoolKey -getVerificationKey (StakePoolSigningKey sk) = + getVerificationKey :: SigningKey StakePoolKey -> VerificationKey StakePoolKey +getVerificationKey (StakePoolSigningKey sk) = VKey 'StakePool StandardCrypto -> VerificationKey StakePoolKey StakePoolVerificationKey (VerKeyDSIGN (DSIGN StandardCrypto) -> VKey 'StakePool StandardCrypto @@ -5115,32 +5115,32 @@ forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> VerKeyDSIGN v Crypto.deriveVerKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk)) +sk)) verificationKeyHash :: VerificationKey StakePoolKey -> Hash StakePoolKey - verificationKeyHash :: VerificationKey StakePoolKey -> Hash StakePoolKey -verificationKeyHash (StakePoolVerificationKey vkey) = + verificationKeyHash :: VerificationKey StakePoolKey -> Hash StakePoolKey +verificationKeyHash (StakePoolVerificationKey vkey) = KeyHash 'StakePool StandardCrypto -> Hash StakePoolKey StakePoolKeyHash (VKey 'StakePool StandardCrypto -> KeyHash 'StakePool StandardCrypto forall crypto (kd :: KeyRole). Crypto crypto => VKey kd crypto -> KeyHash kd crypto Shelley.hashKey VKey 'StakePool StandardCrypto -vkey) +vkey) instance SerialiseAsRawBytes (VerificationKey StakePoolKey) where - serialiseToRawBytes :: VerificationKey StakePoolKey -> ByteString -serialiseToRawBytes (StakePoolVerificationKey (Shelley.VKey vk)) = + serialiseToRawBytes :: VerificationKey StakePoolKey -> ByteString +serialiseToRawBytes (StakePoolVerificationKey (Shelley.VKey vk)) = VerKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => VerKeyDSIGN v -> ByteString Crypto.rawSerialiseVerKeyDSIGN VerKeyDSIGN (DSIGN StandardCrypto) VerKeyDSIGN Ed25519DSIGN -vk +vk - deserialiseFromRawBytes :: AsType (VerificationKey StakePoolKey) + deserialiseFromRawBytes :: AsType (VerificationKey StakePoolKey) -> ByteString -> Maybe (VerificationKey StakePoolKey) -deserialiseFromRawBytes (AsVerificationKey AsStakePoolKey) ByteString -bs = +deserialiseFromRawBytes (AsVerificationKey AsStakePoolKey) ByteString +bs = VKey 'StakePool StandardCrypto -> VerificationKey StakePoolKey StakePoolVerificationKey (VKey 'StakePool StandardCrypto -> VerificationKey StakePoolKey) -> (VerKeyDSIGN Ed25519DSIGN -> VKey 'StakePool StandardCrypto) @@ -5158,21 +5158,21 @@ ByteString -> Maybe (VerKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (VerKeyDSIGN v) Crypto.rawDeserialiseVerKeyDSIGN ByteString -bs +bs instance SerialiseAsRawBytes (SigningKey StakePoolKey) where - serialiseToRawBytes :: SigningKey StakePoolKey -> ByteString -serialiseToRawBytes (StakePoolSigningKey sk) = + serialiseToRawBytes :: SigningKey StakePoolKey -> ByteString +serialiseToRawBytes (StakePoolSigningKey sk) = SignKeyDSIGN Ed25519DSIGN -> ByteString forall v. DSIGNAlgorithm v => SignKeyDSIGN v -> ByteString Crypto.rawSerialiseSignKeyDSIGN SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk +sk - deserialiseFromRawBytes :: AsType (SigningKey StakePoolKey) + deserialiseFromRawBytes :: AsType (SigningKey StakePoolKey) -> ByteString -> Maybe (SigningKey StakePoolKey) -deserialiseFromRawBytes (AsSigningKey AsStakePoolKey) ByteString -bs = +deserialiseFromRawBytes (AsSigningKey AsStakePoolKey) ByteString +bs = SignKeyDSIGN StandardCrypto -> SigningKey StakePoolKey SignKeyDSIGN Ed25519DSIGN -> SigningKey StakePoolKey StakePoolSigningKey (SignKeyDSIGN Ed25519DSIGN -> SigningKey StakePoolKey) @@ -5182,31 +5182,31 @@ <$> ByteString -> Maybe (SignKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (SignKeyDSIGN v) Crypto.rawDeserialiseSignKeyDSIGN ByteString -bs +bs instance SerialiseAsBech32 (VerificationKey StakePoolKey) where - bech32PrefixFor :: VerificationKey StakePoolKey -> Text -bech32PrefixFor VerificationKey StakePoolKey + bech32PrefixFor :: VerificationKey StakePoolKey -> Text +bech32PrefixFor VerificationKey StakePoolKey _ = Text "pool_vk" - bech32PrefixesPermitted :: AsType (VerificationKey StakePoolKey) -> [Text] -bech32PrefixesPermitted AsType (VerificationKey StakePoolKey) + bech32PrefixesPermitted :: AsType (VerificationKey StakePoolKey) -> [Text] +bech32PrefixesPermitted AsType (VerificationKey StakePoolKey) _ = [Text "pool_vk"] instance SerialiseAsBech32 (SigningKey StakePoolKey) where - bech32PrefixFor :: SigningKey StakePoolKey -> Text -bech32PrefixFor SigningKey StakePoolKey + bech32PrefixFor :: SigningKey StakePoolKey -> Text +bech32PrefixFor SigningKey StakePoolKey _ = Text "pool_sk" - bech32PrefixesPermitted :: AsType (SigningKey StakePoolKey) -> [Text] -bech32PrefixesPermitted AsType (SigningKey StakePoolKey) + bech32PrefixesPermitted :: AsType (SigningKey StakePoolKey) -> [Text] +bech32PrefixesPermitted AsType (SigningKey StakePoolKey) _ = [Text "pool_sk"] newtype instance Hash StakePoolKey = StakePoolKeyHash (Shelley.KeyHash Shelley.StakePool StandardCrypto) - deriving stock (Hash StakePoolKey -> Hash StakePoolKey -> Bool + deriving stock (Hash StakePoolKey -> Hash StakePoolKey -> Bool (Hash StakePoolKey -> Hash StakePoolKey -> Bool) -> (Hash StakePoolKey -> Hash StakePoolKey -> Bool) -> Eq (Hash StakePoolKey) @@ -5215,7 +5215,7 @@ $c/= :: Hash StakePoolKey -> Hash StakePoolKey -> Bool == :: Hash StakePoolKey -> Hash StakePoolKey -> Bool $c== :: Hash StakePoolKey -> Hash StakePoolKey -> Bool -Eq, Eq (Hash StakePoolKey) +Eq, Eq (Hash StakePoolKey) Eq (Hash StakePoolKey) -> (Hash StakePoolKey -> Hash StakePoolKey -> Ordering) -> (Hash StakePoolKey -> Hash StakePoolKey -> Bool) @@ -5254,7 +5254,7 @@ $ccompare :: Hash StakePoolKey -> Hash StakePoolKey -> Ordering $cp1Ord :: Eq (Hash StakePoolKey) Ord) - deriving (Int -> Hash StakePoolKey -> ShowS + deriving (Int -> Hash StakePoolKey -> ShowS [Hash StakePoolKey] -> ShowS Hash StakePoolKey -> String (Int -> Hash StakePoolKey -> ShowS) @@ -5269,7 +5269,7 @@ $cshow :: Hash StakePoolKey -> String showsPrec :: Int -> Hash StakePoolKey -> ShowS $cshowsPrec :: Int -> Hash StakePoolKey -> ShowS -Show, String -> Hash StakePoolKey +Show, String -> Hash StakePoolKey (String -> Hash StakePoolKey) -> IsString (Hash StakePoolKey) forall a. (String -> a) -> IsString a fromString :: String -> Hash StakePoolKey @@ -5277,18 +5277,18 @@ IsString) via UsingRawBytesHex (Hash PaymentKey) instance SerialiseAsRawBytes (Hash StakePoolKey) where - serialiseToRawBytes :: Hash StakePoolKey -> ByteString -serialiseToRawBytes (StakePoolKeyHash (Shelley.KeyHash vkh)) = + serialiseToRawBytes :: Hash StakePoolKey -> ByteString +serialiseToRawBytes (StakePoolKeyHash (Shelley.KeyHash vkh)) = Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) (VerKeyDSIGN (DSIGN StandardCrypto)) Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) -vkh +vkh - deserialiseFromRawBytes :: AsType (Hash StakePoolKey) + deserialiseFromRawBytes :: AsType (Hash StakePoolKey) -> ByteString -> Maybe (Hash StakePoolKey) -deserialiseFromRawBytes (AsHash AsStakePoolKey) ByteString -bs = +deserialiseFromRawBytes (AsHash AsStakePoolKey) ByteString +bs = KeyHash 'StakePool StandardCrypto -> Hash StakePoolKey StakePoolKeyHash (KeyHash 'StakePool StandardCrypto -> Hash StakePoolKey) -> (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN) @@ -5308,20 +5308,20 @@ <$> ByteString -> Maybe (Hash Blake2b_224 (VerKeyDSIGN Ed25519DSIGN)) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs instance SerialiseAsBech32 (Hash StakePoolKey) where - bech32PrefixFor :: Hash StakePoolKey -> Text -bech32PrefixFor Hash StakePoolKey + bech32PrefixFor :: Hash StakePoolKey -> Text +bech32PrefixFor Hash StakePoolKey _ = Text "pool" - bech32PrefixesPermitted :: AsType (Hash StakePoolKey) -> [Text] -bech32PrefixesPermitted AsType (Hash StakePoolKey) + bech32PrefixesPermitted :: AsType (Hash StakePoolKey) -> [Text] +bech32PrefixesPermitted AsType (Hash StakePoolKey) _ = [Text "pool"] -instance ToJSON (Hash StakePoolKey) where - toJSON :: Hash StakePoolKey -> Value +instance ToJSON (Hash StakePoolKey) where + toJSON :: Hash StakePoolKey -> Value toJSON = Text -> Value forall a. ToJSON a => a -> Value toJSON (Text -> Value) @@ -5331,8 +5331,8 @@ forall a. SerialiseAsBech32 a => a -> Text serialiseToBech32 -instance ToJSONKey (Hash StakePoolKey) where - toJSONKey :: ToJSONKeyFunction (Hash StakePoolKey) +instance ToJSONKey (Hash StakePoolKey) where + toJSONKey :: ToJSONKeyFunction (Hash StakePoolKey) toJSONKey = (Hash StakePoolKey -> Text) -> ToJSONKeyFunction (Hash StakePoolKey) forall a. (a -> Text) -> ToJSONKeyFunction a @@ -5340,9 +5340,9 @@ forall a. SerialiseAsBech32 a => a -> Text serialiseToBech32 -instance HasTextEnvelope (VerificationKey StakePoolKey) where - textEnvelopeType :: AsType (VerificationKey StakePoolKey) -> TextEnvelopeType -textEnvelopeType AsType (VerificationKey StakePoolKey) +instance HasTextEnvelope (VerificationKey StakePoolKey) where + textEnvelopeType :: AsType (VerificationKey StakePoolKey) -> TextEnvelopeType +textEnvelopeType AsType (VerificationKey StakePoolKey) _ = TextEnvelopeType "StakePoolVerificationKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -5353,17 +5353,17 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy -instance HasTextEnvelope (SigningKey StakePoolKey) where - textEnvelopeType :: AsType (SigningKey StakePoolKey) -> TextEnvelopeType -textEnvelopeType AsType (SigningKey StakePoolKey) +instance HasTextEnvelope (SigningKey StakePoolKey) where + textEnvelopeType :: AsType (SigningKey StakePoolKey) -> TextEnvelopeType +textEnvelopeType AsType (SigningKey StakePoolKey) _ = TextEnvelopeType "StakePoolSigningKey_" TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType @@ -5374,11 +5374,11 @@ forall v (proxy :: * -> *). DSIGNAlgorithm v => proxy v -> String Crypto.algorithmNameDSIGN Proxy (DSIGN StandardCrypto) Proxy Ed25519DSIGN -proxy) +proxy) where - proxy :: Proxy (Shelley.DSIGN StandardCrypto) - proxy :: Proxy (DSIGN StandardCrypto) -proxy = Proxy (DSIGN StandardCrypto) + proxy :: Proxy (Shelley.DSIGN StandardCrypto) + proxy :: Proxy (DSIGN StandardCrypto) +proxy = Proxy (DSIGN StandardCrypto) forall k (t :: k). Proxy t Proxy diff --git a/cardano-api/src/Cardano.Api.LedgerState.html b/cardano-api/src/Cardano.Api.LedgerState.html index 290177241d5..8f5b41083ef 100644 --- a/cardano-api/src/Cardano.Api.LedgerState.html +++ b/cardano-api/src/Cardano.Api.LedgerState.html @@ -114,34 +114,34 @@ renderInitialLedgerStateError :: InitialLedgerStateError -> Text renderInitialLedgerStateError :: InitialLedgerStateError -> Text -renderInitialLedgerStateError InitialLedgerStateError -ilse = case InitialLedgerStateError -ilse of - ILSEConfigFile Text -err -> +renderInitialLedgerStateError InitialLedgerStateError +ilse = case InitialLedgerStateError +ilse of + ILSEConfigFile Text +err -> Text "Failed to read or parse the network config file: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -err - ILSEGenesisFile GenesisConfigError -err -> +err + ILSEGenesisFile GenesisConfigError +err -> Text "Failed to read or parse a genesis file linked from the network config file: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> GenesisConfigError -> Text renderGenesisConfigError GenesisConfigError -err - ILSELedgerConsensusConfig GenesisConfigError -err -> +err + ILSELedgerConsensusConfig GenesisConfigError +err -> Text "Failed to derive the Ledger or Consensus config: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> GenesisConfigError -> Text renderGenesisConfigError GenesisConfigError -err +err -- | Get the environment and initial ledger state. initialLedgerState @@ -150,13 +150,13 @@ -> ExceptT InitialLedgerStateError IO (Env, LedgerState) -- ^ The environment and initial ledger state initialLedgerState :: FilePath -> ExceptT InitialLedgerStateError IO (Env, LedgerState) -initialLedgerState FilePath -networkConfigFile = do +initialLedgerState FilePath +networkConfigFile = do -- TODO Once support for querying the ledger config is added to the node, we -- can remove the networkConfigFile argument and much of the code in this -- module. - NodeConfig -config <- (Text -> InitialLedgerStateError) + NodeConfig +config <- (Text -> InitialLedgerStateError) -> ExceptT Text IO NodeConfig -> ExceptT InitialLedgerStateError IO NodeConfig forall (m :: * -> *) e e' a. @@ -167,9 +167,9 @@ (NetworkConfigFile -> ExceptT Text IO NodeConfig readNetworkConfig (FilePath -> NetworkConfigFile NetworkConfigFile FilePath -networkConfigFile)) - GenesisConfig -genesisConfig <- (GenesisConfigError -> InitialLedgerStateError) +networkConfigFile)) + GenesisConfig +genesisConfig <- (GenesisConfigError -> InitialLedgerStateError) -> ExceptT GenesisConfigError IO GenesisConfig -> ExceptT InitialLedgerStateError IO GenesisConfig forall (m :: * -> *) e e' a. @@ -178,9 +178,9 @@ withExceptT GenesisConfigError -> InitialLedgerStateError ILSEGenesisFile (NodeConfig -> ExceptT GenesisConfigError IO GenesisConfig readCardanoGenesisConfig NodeConfig -config) - Env -env <- (GenesisConfigError -> InitialLedgerStateError) +config) + Env +env <- (GenesisConfigError -> InitialLedgerStateError) -> ExceptT GenesisConfigError IO Env -> ExceptT InitialLedgerStateError IO Env forall (m :: * -> *) e e' a. @@ -191,20 +191,20 @@ forall (m :: * -> *) e a. Monad m => Either e a -> ExceptT e m a except (GenesisConfig -> Either GenesisConfigError Env genesisConfigToEnv GenesisConfig -genesisConfig)) - let ledgerState :: LedgerState -ledgerState = GenesisConfig -> LedgerState +genesisConfig)) + let ledgerState :: LedgerState +ledgerState = GenesisConfig -> LedgerState initLedgerStateVar GenesisConfig -genesisConfig +genesisConfig (Env, LedgerState) -> ExceptT InitialLedgerStateError IO (Env, LedgerState) forall (m :: * -> *) a. Monad m => a -> m a return (Env -env, LedgerState -ledgerState) +env, LedgerState +ledgerState) -- | Apply a single block to the current ledger state. -applyBlock +applyBlock :: Env -- ^ The environment returned by @initialLedgerState@ -> LedgerState @@ -212,75 +212,75 @@ -> Bool -- ^ True to perform validation. If True, `tickThenApply` will be used instead -- of `tickThenReapply`. - -> Block era + -> Block era -- ^ Some block to apply -> Either Text LedgerState -- ^ The new ledger state (or an error). applyBlock :: Env -> LedgerState -> Bool -> Block era -> Either Text LedgerState -applyBlock Env -env LedgerState -oldState Bool -enableValidation Block era -block +applyBlock Env +env LedgerState +oldState Bool +enableValidation Block era +block = Env -> LedgerState -> Bool -> HardForkBlock (CardanoEras StandardCrypto) -> Either Text LedgerState applyBlock' Env -env LedgerState -oldState Bool -enableValidation (HardForkBlock (CardanoEras StandardCrypto) +env LedgerState +oldState Bool +enableValidation (HardForkBlock (CardanoEras StandardCrypto) -> Either Text LedgerState) -> HardForkBlock (CardanoEras StandardCrypto) -> Either Text LedgerState forall a b. (a -> b) -> a -> b $ case Block era -block of - ByronBlock ByronBlock -byronBlock -> ByronBlock -> HardForkBlock (CardanoEras StandardCrypto) +block of + ByronBlock ByronBlock +byronBlock -> ByronBlock -> HardForkBlock (CardanoEras StandardCrypto) forall c. ByronBlock -> CardanoBlock c Consensus.BlockByron ByronBlock -byronBlock - ShelleyBlock ShelleyBasedEra era -blockEra ShelleyBlock (ShelleyLedgerEra era) -shelleyBlock -> case ShelleyBasedEra era -blockEra of +byronBlock + ShelleyBlock ShelleyBasedEra era +blockEra ShelleyBlock (ShelleyLedgerEra era) +shelleyBlock -> case ShelleyBasedEra era +blockEra of ShelleyBasedEra era ShelleyBasedEraShelley -> ShelleyBlock (ShelleyEra StandardCrypto) -> HardForkBlock (CardanoEras StandardCrypto) forall c. ShelleyBlock (ShelleyEra c) -> CardanoBlock c Consensus.BlockShelley ShelleyBlock (ShelleyEra StandardCrypto) ShelleyBlock (ShelleyLedgerEra era) -shelleyBlock +shelleyBlock ShelleyBasedEra era ShelleyBasedEraAllegra -> ShelleyBlock (AllegraEra StandardCrypto) -> HardForkBlock (CardanoEras StandardCrypto) forall c. ShelleyBlock (AllegraEra c) -> CardanoBlock c Consensus.BlockAllegra ShelleyBlock (AllegraEra StandardCrypto) ShelleyBlock (ShelleyLedgerEra era) -shelleyBlock +shelleyBlock ShelleyBasedEra era ShelleyBasedEraMary -> ShelleyBlock (MaryEra StandardCrypto) -> HardForkBlock (CardanoEras StandardCrypto) forall c. ShelleyBlock (MaryEra c) -> CardanoBlock c Consensus.BlockMary ShelleyBlock (MaryEra StandardCrypto) ShelleyBlock (ShelleyLedgerEra era) -shelleyBlock +shelleyBlock ShelleyBasedEra era ShelleyBasedEraAlonzo -> ShelleyBlock (AlonzoEra StandardCrypto) -> HardForkBlock (CardanoEras StandardCrypto) forall c. ShelleyBlock (AlonzoEra c) -> CardanoBlock c Consensus.BlockAlonzo ShelleyBlock (AlonzoEra StandardCrypto) ShelleyBlock (ShelleyLedgerEra era) -shelleyBlock +shelleyBlock pattern LedgerStateByron :: Ledger.LedgerState Byron.ByronBlock -> LedgerState pattern $mLedgerStateByron :: forall r. LedgerState -> (LedgerState ByronBlock -> r) -> (Void# -> r) -> r -LedgerStateByron st <- LedgerState (Consensus.LedgerStateByron st) +LedgerStateByron st <- LedgerState (Consensus.LedgerStateByron st) pattern LedgerStateShelley :: Ledger.LedgerState (Shelley.ShelleyBlock (Shelley.ShelleyEra Shelley.StandardCrypto)) @@ -290,7 +290,7 @@ -> (LedgerState (ShelleyBlock (ShelleyEra StandardCrypto)) -> r) -> (Void# -> r) -> r -LedgerStateShelley st <- LedgerState (Consensus.LedgerStateShelley st) +LedgerStateShelley st <- LedgerState (Consensus.LedgerStateShelley st) pattern LedgerStateAllegra :: Ledger.LedgerState (Shelley.ShelleyBlock (Shelley.AllegraEra Shelley.StandardCrypto)) @@ -300,7 +300,7 @@ -> (LedgerState (ShelleyBlock (AllegraEra StandardCrypto)) -> r) -> (Void# -> r) -> r -LedgerStateAllegra st <- LedgerState (Consensus.LedgerStateAllegra st) +LedgerStateAllegra st <- LedgerState (Consensus.LedgerStateAllegra st) pattern LedgerStateMary :: Ledger.LedgerState (Shelley.ShelleyBlock (Shelley.MaryEra Shelley.StandardCrypto)) @@ -310,7 +310,7 @@ -> (LedgerState (ShelleyBlock (MaryEra StandardCrypto)) -> r) -> (Void# -> r) -> r -LedgerStateMary st <- LedgerState (Consensus.LedgerStateMary st) +LedgerStateMary st <- LedgerState (Consensus.LedgerStateMary st) {-# COMPLETE LedgerStateByron , LedgerStateShelley @@ -323,24 +323,24 @@ renderFoldBlocksError :: FoldBlocksError -> Text renderFoldBlocksError :: FoldBlocksError -> Text -renderFoldBlocksError FoldBlocksError -fbe = case FoldBlocksError -fbe of - FoldBlocksInitialLedgerStateError InitialLedgerStateError -err -> InitialLedgerStateError -> Text +renderFoldBlocksError FoldBlocksError +fbe = case FoldBlocksError +fbe of + FoldBlocksInitialLedgerStateError InitialLedgerStateError +err -> InitialLedgerStateError -> Text renderInitialLedgerStateError InitialLedgerStateError -err - FoldBlocksApplyBlockError Text -err -> Text +err + FoldBlocksApplyBlockError Text +err -> Text "Failed when applying a block: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -err +err -- | Monadic fold over all blocks and ledger states. Stopping @k@ blocks before -- the node's tip where @k@ is the security parameter. foldBlocks - :: forall a. + :: forall a. FilePath -- ^ Path to the cardano-node config file (e.g. <path to cardano-node project>/configuration/cardano/mainnet-config.json) -> FilePath @@ -350,9 +350,9 @@ -> Bool -- ^ True to enable validation. Under the hood this will use @applyBlock@ -- instead of @reapplyBlock@ from the @ApplyBlock@ type class. - -> a + -> a -- ^ The initial accumulator state. - -> (Env -> LedgerState -> BlockInMode CardanoMode -> a -> IO a) + -> (Env -> LedgerState -> BlockInMode CardanoMode -> a -> IO a) -- ^ Accumulator function Takes: -- * Environment (this is a constant over the whole fold) -- * The current Ledger state (with the current block applied) @@ -366,7 +366,7 @@ -- rollback. This is achieved by only calling the accumulator on states/blocks -- that are older than the security parameter, k. This has the side effect of -- truncating the last k blocks before the node's tip. - -> ExceptT FoldBlocksError IO a + -> ExceptT FoldBlocksError IO a -- ^ The final state foldBlocks :: FilePath -> FilePath @@ -375,21 +375,21 @@ -> a -> (Env -> LedgerState -> BlockInMode CardanoMode -> a -> IO a) -> ExceptT FoldBlocksError IO a -foldBlocks FilePath -nodeConfigFilePath FilePath -socketPath NetworkId -networkId Bool -enableValidation a -state0 Env -> LedgerState -> BlockInMode CardanoMode -> a -> IO a -accumulate = do +foldBlocks FilePath +nodeConfigFilePath FilePath +socketPath NetworkId +networkId Bool +enableValidation a +state0 Env -> LedgerState -> BlockInMode CardanoMode -> a -> IO a +accumulate = do -- NOTE this was originally implemented with a non-pipelined client then -- changed to a pipelined client for a modest speedup: -- * Non-pipelined: 1h 0m 19s -- * Pipelined: 46m 23s - (Env -env, LedgerState -ledgerState) <- (InitialLedgerStateError -> FoldBlocksError) + (Env +env, LedgerState +ledgerState) <- (InitialLedgerStateError -> FoldBlocksError) -> ExceptT InitialLedgerStateError IO (Env, LedgerState) -> ExceptT FoldBlocksError IO (Env, LedgerState) forall (m :: * -> *) e e' a. @@ -399,12 +399,12 @@ FoldBlocksInitialLedgerStateError (FilePath -> ExceptT InitialLedgerStateError IO (Env, LedgerState) initialLedgerState FilePath -nodeConfigFilePath) +nodeConfigFilePath) -- Place to store the accumulated state -- This is a bit ugly, but easy. - IORef (Maybe Text) -errorIORef <- IO (IORef (Maybe Text)) + IORef (Maybe Text) +errorIORef <- IO (IORef (Maybe Text)) -> ExceptT FoldBlocksError IO (IORef (Maybe Text)) forall (t :: (* -> *) -> * -> *) (m :: * -> *) a. (MonadTrans t, Monad m) => @@ -419,8 +419,8 @@ newIORef Maybe Text forall a. Maybe a Nothing - IORef a -stateIORef <- IO (IORef a) -> ExceptT FoldBlocksError IO (IORef a) + IORef a +stateIORef <- IO (IORef a) -> ExceptT FoldBlocksError IO (IORef a) forall (t :: (* -> *) -> * -> *) (m :: * -> *) a. (MonadTrans t, Monad m) => m a -> t m a @@ -430,7 +430,7 @@ $ a -> IO (IORef a) forall a. a -> IO (IORef a) newIORef a -state0 +state0 -- Connect to the node. IO () -> ExceptT FoldBlocksError IO () @@ -447,17 +447,17 @@ -> LocalNodeClientProtocolsInMode mode -> IO () connectToLocalNode LocalNodeConnectInfo CardanoMode -connectInfo +connectInfo (IORef a -> IORef (Maybe Text) -> Env -> LedgerState -> LocalNodeClientProtocolsInMode CardanoMode -protocols IORef a -stateIORef IORef (Maybe Text) -errorIORef Env -env LedgerState -ledgerState) +protocols IORef a +stateIORef IORef (Maybe Text) +errorIORef Env +env LedgerState +ledgerState) IO (Maybe Text) -> ExceptT FoldBlocksError IO (Maybe Text) forall (t :: (* -> *) -> * -> *) (m :: * -> *) a. @@ -466,17 +466,17 @@ lift (IORef (Maybe Text) -> IO (Maybe Text) forall a. IORef a -> IO a readIORef IORef (Maybe Text) -errorIORef) ExceptT FoldBlocksError IO (Maybe Text) +errorIORef) ExceptT FoldBlocksError IO (Maybe Text) -> (Maybe Text -> ExceptT FoldBlocksError IO a) -> ExceptT FoldBlocksError IO a forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= \case - Just Text -err -> FoldBlocksError -> ExceptT FoldBlocksError IO a + Just Text +err -> FoldBlocksError -> ExceptT FoldBlocksError IO a forall (m :: * -> *) e a. Monad m => e -> ExceptT e m a throwE (Text -> FoldBlocksError FoldBlocksApplyBlockError Text -err) +err) Maybe Text Nothing -> IO a -> ExceptT FoldBlocksError IO a forall (t :: (* -> *) -> * -> *) (m :: * -> *) a. @@ -488,11 +488,11 @@ $ IORef a -> IO a forall a. IORef a -> IO a readIORef IORef a -stateIORef +stateIORef where - connectInfo :: LocalNodeConnectInfo CardanoMode - connectInfo :: LocalNodeConnectInfo CardanoMode -connectInfo = + connectInfo :: LocalNodeConnectInfo CardanoMode + connectInfo :: LocalNodeConnectInfo CardanoMode +connectInfo = LocalNodeConnectInfo :: forall mode. ConsensusModeParams mode -> NetworkId -> FilePath -> LocalNodeConnectInfo mode @@ -504,23 +504,23 @@ 21600), localNodeNetworkId :: NetworkId localNodeNetworkId = NetworkId -networkId, +networkId, localNodeSocketPath :: FilePath localNodeSocketPath = FilePath -socketPath +socketPath } - protocols :: IORef a -> IORef (Maybe Text) -> Env -> LedgerState -> LocalNodeClientProtocolsInMode CardanoMode - protocols :: IORef a + protocols :: IORef a -> IORef (Maybe Text) -> Env -> LedgerState -> LocalNodeClientProtocolsInMode CardanoMode + protocols :: IORef a -> IORef (Maybe Text) -> Env -> LedgerState -> LocalNodeClientProtocolsInMode CardanoMode -protocols IORef a -stateIORef IORef (Maybe Text) -errorIORef Env -env LedgerState -ledgerState = +protocols IORef a +stateIORef IORef (Maybe Text) +errorIORef Env +env LedgerState +ledgerState = LocalNodeClientProtocols :: forall block point tip tx txerr (query :: * -> *) (m :: * -> *). LocalChainSyncClient block point tip m -> Maybe (LocalTxSubmissionClient tx txerr m ()) @@ -543,12 +543,12 @@ -> LedgerState -> ChainSyncClientPipelined (BlockInMode CardanoMode) ChainPoint ChainTip IO () -chainSyncClient Word32 +chainSyncClient Word32 50 IORef a -stateIORef IORef (Maybe Text) -errorIORef Env -env LedgerState -ledgerState), +stateIORef IORef (Maybe Text) +errorIORef Env +env LedgerState +ledgerState), localTxSubmissionClient :: Maybe (LocalTxSubmissionClient (TxInMode CardanoMode) (TxValidationErrorInMode CardanoMode) IO ()) @@ -576,7 +576,7 @@ } -- | Add a new ledger state to the history - pushLedgerState + pushLedgerState :: Env -- ^ Environement used to get the security param, k. -> LedgerStateHistory -- ^ History of k ledger states. -> SlotNo -- ^ Slot number of the new ledger state. @@ -589,18 +589,18 @@ -- , Any exisiting ledger states that are now past the security parameter -- and hence can no longer be rolled back. -- ) - pushLedgerState :: Env + pushLedgerState :: Env -> LedgerStateHistory -> SlotNo -> LedgerState -> BlockInMode CardanoMode -> (LedgerStateHistory, LedgerStateHistory) -pushLedgerState Env -env LedgerStateHistory -hist SlotNo -ix LedgerState -st BlockInMode CardanoMode -block +pushLedgerState Env +env LedgerStateHistory +hist SlotNo +ix LedgerState +st BlockInMode CardanoMode +block = Int -> LedgerStateHistory -> (LedgerStateHistory, LedgerStateHistory) forall a. Int -> Seq a -> (Seq a, Seq a) @@ -611,49 +611,49 @@ forall a b. (a -> b) -> a -> b $ Env -> Word64 envSecurityParam Env -env Word64 -> Word64 -> Word64 +env Word64 -> Word64 -> Word64 forall a. Num a => a -> a -> a + Word64 1) ((SlotNo -ix, LedgerState -st, BlockInMode CardanoMode -> WithOrigin (BlockInMode CardanoMode) +ix, LedgerState +st, BlockInMode CardanoMode -> WithOrigin (BlockInMode CardanoMode) forall t. t -> WithOrigin t At BlockInMode CardanoMode -block) (SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) +block) (SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) -> LedgerStateHistory -> LedgerStateHistory forall a. a -> Seq a -> Seq a Seq.:<| LedgerStateHistory -hist) +hist) - rollBackLedgerStateHist :: LedgerStateHistory -> SlotNo -> LedgerStateHistory - rollBackLedgerStateHist :: LedgerStateHistory -> SlotNo -> LedgerStateHistory -rollBackLedgerStateHist LedgerStateHistory -hist SlotNo -maxInc = ((SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) + rollBackLedgerStateHist :: LedgerStateHistory -> SlotNo -> LedgerStateHistory + rollBackLedgerStateHist :: LedgerStateHistory -> SlotNo -> LedgerStateHistory +rollBackLedgerStateHist LedgerStateHistory +hist SlotNo +maxInc = ((SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) -> Bool) -> LedgerStateHistory -> LedgerStateHistory forall a. (a -> Bool) -> Seq a -> Seq a Seq.dropWhileL ((SlotNo -> SlotNo -> Bool forall a. Ord a => a -> a -> Bool > SlotNo -maxInc) (SlotNo -> Bool) +maxInc) (SlotNo -> Bool) -> ((SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) -> SlotNo) -> (SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) -> Bool forall b c a. (b -> c) -> (a -> b) -> a -> c -. (\(SlotNo -x,LedgerState +. (\(SlotNo +x,LedgerState _,WithOrigin (BlockInMode CardanoMode) _) -> SlotNo -x)) LedgerStateHistory -hist +x)) LedgerStateHistory +hist -- | Defines the client side of the chain sync protocol. - chainSyncClient :: Word32 + chainSyncClient :: Word32 -- ^ The maximum number of concurrent requests. - -> IORef a + -> IORef a -> IORef (Maybe Text) -- ^ Resulting error if any. Written to once on protocol -- completion. @@ -665,19 +665,19 @@ ChainTip IO () -- ^ Client returns maybe an error. - chainSyncClient :: Word32 + chainSyncClient :: Word32 -> IORef a -> IORef (Maybe Text) -> Env -> LedgerState -> ChainSyncClientPipelined (BlockInMode CardanoMode) ChainPoint ChainTip IO () -chainSyncClient Word32 -pipelineSize IORef a -stateIORef IORef (Maybe Text) -errorIORef Env -env LedgerState -ledgerState0 +chainSyncClient Word32 +pipelineSize IORef a +stateIORef IORef (Maybe Text) +errorIORef Env +env LedgerState +ledgerState0 = IO (ClientPipelinedStIdle 'Z (BlockInMode CardanoMode) ChainPoint ChainTip IO ()) @@ -727,56 +727,56 @@ -> LedgerStateHistory -> ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO () -clientIdle_RequestMoreN WithOrigin BlockNo +clientIdle_RequestMoreN WithOrigin BlockNo forall t. WithOrigin t Origin WithOrigin BlockNo forall t. WithOrigin t Origin Nat 'Z forall (n :: N). ('Z ~ n) => Nat n Zero LedgerStateHistory -initialLedgerStateHistory +initialLedgerStateHistory where - initialLedgerStateHistory :: LedgerStateHistory -initialLedgerStateHistory = (SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) + initialLedgerStateHistory :: LedgerStateHistory +initialLedgerStateHistory = (SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) -> LedgerStateHistory forall a. a -> Seq a Seq.singleton (SlotNo 0, LedgerState -ledgerState0, WithOrigin (BlockInMode CardanoMode) +ledgerState0, WithOrigin (BlockInMode CardanoMode) forall t. WithOrigin t Origin) - pushLedgerState' :: LedgerStateHistory + pushLedgerState' :: LedgerStateHistory -> SlotNo -> LedgerState -> BlockInMode CardanoMode -> (LedgerStateHistory, LedgerStateHistory) -pushLedgerState' = Env +pushLedgerState' = Env -> LedgerStateHistory -> SlotNo -> LedgerState -> BlockInMode CardanoMode -> (LedgerStateHistory, LedgerStateHistory) -pushLedgerState Env -env +pushLedgerState Env +env - clientIdle_RequestMoreN + clientIdle_RequestMoreN :: WithOrigin BlockNo -> WithOrigin BlockNo - -> Nat n -- Number of requests inflight. + -> Nat n -- Number of requests inflight. -> LedgerStateHistory - -> ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO () - clientIdle_RequestMoreN :: WithOrigin BlockNo + -> ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO () + clientIdle_RequestMoreN :: WithOrigin BlockNo -> WithOrigin BlockNo -> Nat n -> LedgerStateHistory -> ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO () -clientIdle_RequestMoreN WithOrigin BlockNo -clientTip WithOrigin BlockNo -serverTip Nat n -n LedgerStateHistory -knownLedgerStates +clientIdle_RequestMoreN WithOrigin BlockNo +clientTip WithOrigin BlockNo +serverTip Nat n +n LedgerStateHistory +knownLedgerStates = case Word32 -> Nat n -> WithOrigin BlockNo @@ -789,15 +789,15 @@ -> WithOrigin BlockNo -> PipelineDecision n pipelineDecisionMax Word32 -pipelineSize Nat n -n WithOrigin BlockNo -clientTip WithOrigin BlockNo -serverTip of +pipelineSize Nat n +n WithOrigin BlockNo +clientTip WithOrigin BlockNo +serverTip of PipelineDecision n Collect -> case Nat n -n of - Succ Nat n -predN -> Maybe +n of + Succ Nat n +predN -> Maybe (IO (ClientPipelinedStIdle ('S n) (BlockInMode CardanoMode) ChainPoint ChainTip IO ())) @@ -823,9 +823,9 @@ -> LedgerStateHistory -> ClientStNext n (BlockInMode CardanoMode) ChainPoint ChainTip IO () -clientNextN Nat n -predN LedgerStateHistory -knownLedgerStates) +clientNextN Nat n +predN LedgerStateHistory +knownLedgerStates) PipelineDecision n _ -> ClientPipelinedStIdle ('S n) (BlockInMode CardanoMode) ChainPoint ChainTip IO () @@ -847,25 +847,25 @@ -> LedgerStateHistory -> ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO () -clientIdle_RequestMoreN WithOrigin BlockNo -clientTip WithOrigin BlockNo -serverTip (Nat n -> Nat ('S n) +clientIdle_RequestMoreN WithOrigin BlockNo +clientTip WithOrigin BlockNo +serverTip (Nat n -> Nat ('S n) forall (m :: N) (n :: N). (m ~ 'S n) => Nat n -> Nat m Succ Nat n -n) LedgerStateHistory -knownLedgerStates) +n) LedgerStateHistory +knownLedgerStates) - clientNextN - :: Nat n -- Number of requests inflight. + clientNextN + :: Nat n -- Number of requests inflight. -> LedgerStateHistory - -> ClientStNext n (BlockInMode CardanoMode) ChainPoint ChainTip IO () - clientNextN :: Nat n + -> ClientStNext n (BlockInMode CardanoMode) ChainPoint ChainTip IO () + clientNextN :: Nat n -> LedgerStateHistory -> ClientStNext n (BlockInMode CardanoMode) ChainPoint ChainTip IO () -clientNextN Nat n -n LedgerStateHistory -knownLedgerStates = +clientNextN Nat n +n LedgerStateHistory +knownLedgerStates = ClientStNext :: forall (n :: N) header point tip (m :: * -> *) a. (header -> tip -> m (ClientPipelinedStIdle n header point tip m a)) -> (point @@ -877,22 +877,22 @@ -> IO (ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO ()) -recvMsgRollForward = \blockInMode :: BlockInMode CardanoMode -blockInMode@(BlockInMode block :: Block era -block@(Block (BlockHeader SlotNo -slotNo Hash BlockHeader -_ BlockNo -currBlockNo) [Tx era] -_) EraInMode era CardanoMode -_era) ChainTip -serverChainTip -> do - let newLedgerStateE :: Either Text LedgerState -newLedgerStateE = Env -> LedgerState -> Bool -> Block era -> Either Text LedgerState +recvMsgRollForward = \blockInMode :: BlockInMode CardanoMode +blockInMode@(BlockInMode block :: Block era +block@(Block (BlockHeader SlotNo +slotNo Hash BlockHeader +_ BlockNo +currBlockNo) [Tx era] +_) EraInMode era CardanoMode +_era) ChainTip +serverChainTip -> do + let newLedgerStateE :: Either Text LedgerState +newLedgerStateE = Env -> LedgerState -> Bool -> Block era -> Either Text LedgerState forall era. Env -> LedgerState -> Bool -> Block era -> Either Text LedgerState applyBlock Env -env +env (LedgerState -> ((SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) -> LedgerState) @@ -906,10 +906,10 @@ error FilePath "Impossible! Missing Ledger state") (\(SlotNo -_,LedgerState -x,WithOrigin (BlockInMode CardanoMode) +_,LedgerState +x,WithOrigin (BlockInMode CardanoMode) _) -> LedgerState -x) +x) (Int -> LedgerStateHistory -> Maybe @@ -917,16 +917,16 @@ forall a. Int -> Seq a -> Maybe a Seq.lookup Int 0 LedgerStateHistory -knownLedgerStates) +knownLedgerStates) ) Bool -enableValidation +enableValidation Block era -block +block case Either Text LedgerState -newLedgerStateE of - Left Text -err -> Nat n +newLedgerStateE of + Left Text +err -> Nat n -> Maybe Text -> IO (ClientPipelinedStIdle @@ -937,34 +937,34 @@ -> IO (ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO ()) -clientIdle_DoneN Nat n -n (Text -> Maybe Text +clientIdle_DoneN Nat n +n (Text -> Maybe Text forall a. a -> Maybe a Just Text -err) - Right LedgerState -newLedgerState -> do - let (LedgerStateHistory -knownLedgerStates', LedgerStateHistory -committedStates) = LedgerStateHistory +err) + Right LedgerState +newLedgerState -> do + let (LedgerStateHistory +knownLedgerStates', LedgerStateHistory +committedStates) = LedgerStateHistory -> SlotNo -> LedgerState -> BlockInMode CardanoMode -> (LedgerStateHistory, LedgerStateHistory) -pushLedgerState' LedgerStateHistory -knownLedgerStates SlotNo -slotNo LedgerState -newLedgerState BlockInMode CardanoMode -blockInMode - newClientTip :: WithOrigin BlockNo -newClientTip = BlockNo -> WithOrigin BlockNo +pushLedgerState' LedgerStateHistory +knownLedgerStates SlotNo +slotNo LedgerState +newLedgerState BlockInMode CardanoMode +blockInMode + newClientTip :: WithOrigin BlockNo +newClientTip = BlockNo -> WithOrigin BlockNo forall t. t -> WithOrigin t At BlockNo -currBlockNo - newServerTip :: WithOrigin BlockNo -newServerTip = ChainTip -> WithOrigin BlockNo -fromChainTip ChainTip -serverChainTip +currBlockNo + newServerTip :: WithOrigin BlockNo +newServerTip = ChainTip -> WithOrigin BlockNo +fromChainTip ChainTip +serverChainTip LedgerStateHistory -> ((SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) -> IO ()) @@ -973,7 +973,7 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ LedgerStateHistory -committedStates (((SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) +committedStates (((SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) -> IO ()) -> IO ()) -> ((SlotNo, LedgerState, WithOrigin (BlockInMode CardanoMode)) @@ -981,37 +981,37 @@ -> IO () forall a b. (a -> b) -> a -> b $ \(SlotNo -_, LedgerState -currLedgerState, WithOrigin (BlockInMode CardanoMode) -currBlockMay) -> case WithOrigin (BlockInMode CardanoMode) -currBlockMay of +_, LedgerState +currLedgerState, WithOrigin (BlockInMode CardanoMode) +currBlockMay) -> case WithOrigin (BlockInMode CardanoMode) +currBlockMay of WithOrigin (BlockInMode CardanoMode) Origin -> () -> IO () forall (m :: * -> *) a. Monad m => a -> m a return () - At BlockInMode CardanoMode -currBlock -> do - a -newState <- Env -> LedgerState -> BlockInMode CardanoMode -> a -> IO a -accumulate Env -env LedgerState -currLedgerState BlockInMode CardanoMode -currBlock (a -> IO a) -> IO a -> IO a + At BlockInMode CardanoMode +currBlock -> do + a +newState <- Env -> LedgerState -> BlockInMode CardanoMode -> a -> IO a +accumulate Env +env LedgerState +currLedgerState BlockInMode CardanoMode +currBlock (a -> IO a) -> IO a -> IO a forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< IORef a -> IO a forall a. IORef a -> IO a readIORef IORef a -stateIORef +stateIORef IORef a -> a -> IO () forall a. IORef a -> a -> IO () writeIORef IORef a -stateIORef a -newState +stateIORef a +newState if WithOrigin BlockNo -newClientTip WithOrigin BlockNo -> WithOrigin BlockNo -> Bool +newClientTip WithOrigin BlockNo -> WithOrigin BlockNo -> Bool forall a. Eq a => a -> a -> Bool == WithOrigin BlockNo -newServerTip +newServerTip then Nat n -> Maybe Text -> IO @@ -1023,8 +1023,8 @@ -> IO (ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO ()) -clientIdle_DoneN Nat n -n Maybe Text +clientIdle_DoneN Nat n +n Maybe Text forall a. Maybe a Nothing else ClientPipelinedStIdle @@ -1046,39 +1046,39 @@ -> LedgerStateHistory -> ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO () -clientIdle_RequestMoreN WithOrigin BlockNo -newClientTip WithOrigin BlockNo -newServerTip Nat n -n LedgerStateHistory -knownLedgerStates') +clientIdle_RequestMoreN WithOrigin BlockNo +newClientTip WithOrigin BlockNo +newServerTip Nat n +n LedgerStateHistory +knownLedgerStates') , recvMsgRollBackward :: ChainPoint -> ChainTip -> IO (ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO ()) -recvMsgRollBackward = \ChainPoint -chainPoint ChainTip -serverChainTip -> do - let newClientTip :: WithOrigin t -newClientTip = WithOrigin t +recvMsgRollBackward = \ChainPoint +chainPoint ChainTip +serverChainTip -> do + let newClientTip :: WithOrigin t +newClientTip = WithOrigin t forall t. WithOrigin t Origin -- We don't actually keep track of blocks so we temporarily "forget" the tip. - newServerTip :: WithOrigin BlockNo -newServerTip = ChainTip -> WithOrigin BlockNo -fromChainTip ChainTip -serverChainTip - truncatedKnownLedgerStates :: LedgerStateHistory -truncatedKnownLedgerStates = case ChainPoint -chainPoint of + newServerTip :: WithOrigin BlockNo +newServerTip = ChainTip -> WithOrigin BlockNo +fromChainTip ChainTip +serverChainTip + truncatedKnownLedgerStates :: LedgerStateHistory +truncatedKnownLedgerStates = case ChainPoint +chainPoint of ChainPoint ChainPointAtGenesis -> LedgerStateHistory -initialLedgerStateHistory - ChainPoint SlotNo -slotNo Hash BlockHeader +initialLedgerStateHistory + ChainPoint SlotNo +slotNo Hash BlockHeader _ -> LedgerStateHistory -> SlotNo -> LedgerStateHistory -rollBackLedgerStateHist LedgerStateHistory -knownLedgerStates SlotNo -slotNo +rollBackLedgerStateHist LedgerStateHistory +knownLedgerStates SlotNo +slotNo ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO () -> IO @@ -1098,29 +1098,29 @@ -> LedgerStateHistory -> ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO () -clientIdle_RequestMoreN WithOrigin BlockNo +clientIdle_RequestMoreN WithOrigin BlockNo forall t. WithOrigin t -newClientTip WithOrigin BlockNo -newServerTip Nat n -n LedgerStateHistory -truncatedKnownLedgerStates) +newClientTip WithOrigin BlockNo +newServerTip Nat n +n LedgerStateHistory +truncatedKnownLedgerStates) } - clientIdle_DoneN - :: Nat n -- Number of requests inflight. + clientIdle_DoneN + :: Nat n -- Number of requests inflight. -> Maybe Text -- Return value (maybe an error) - -> IO (ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO ()) - clientIdle_DoneN :: Nat n + -> IO (ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO ()) + clientIdle_DoneN :: Nat n -> Maybe Text -> IO (ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO ()) -clientIdle_DoneN Nat n -n Maybe Text -errorMay = case Nat n -n of - Succ Nat n -predN -> ClientPipelinedStIdle +clientIdle_DoneN Nat n +n Maybe Text +errorMay = case Nat n +n of + Succ Nat n +predN -> ClientPipelinedStIdle ('S n) (BlockInMode CardanoMode) ChainPoint ChainTip IO () -> IO (ClientPipelinedStIdle @@ -1152,16 +1152,16 @@ -> Maybe Text -> ClientStNext n (BlockInMode CardanoMode) ChainPoint ChainTip IO () -clientNext_DoneN Nat n -predN Maybe Text -errorMay)) -- Ignore remaining message responses +clientNext_DoneN Nat n +predN Maybe Text +errorMay)) -- Ignore remaining message responses Nat n Zero -> do IORef (Maybe Text) -> Maybe Text -> IO () forall a. IORef a -> a -> IO () writeIORef IORef (Maybe Text) -errorIORef Maybe Text -errorMay +errorIORef Maybe Text +errorMay ClientPipelinedStIdle 'Z (BlockInMode CardanoMode) ChainPoint ChainTip IO () -> IO @@ -1175,17 +1175,17 @@ a -> ClientPipelinedStIdle 'Z header point tip m a SendMsgDone ()) - clientNext_DoneN - :: Nat n -- Number of requests inflight. + clientNext_DoneN + :: Nat n -- Number of requests inflight. -> Maybe Text -- Return value (maybe an error) - -> ClientStNext n (BlockInMode CardanoMode) ChainPoint ChainTip IO () - clientNext_DoneN :: Nat n + -> ClientStNext n (BlockInMode CardanoMode) ChainPoint ChainTip IO () + clientNext_DoneN :: Nat n -> Maybe Text -> ClientStNext n (BlockInMode CardanoMode) ChainPoint ChainTip IO () -clientNext_DoneN Nat n -n Maybe Text -errorMay = +clientNext_DoneN Nat n +n Maybe Text +errorMay = ClientStNext :: forall (n :: N) header point tip (m :: * -> *) a. (header -> tip -> m (ClientPipelinedStIdle n header point tip m a)) -> (point @@ -1210,9 +1210,9 @@ -> IO (ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO ()) -clientIdle_DoneN Nat n -n Maybe Text -errorMay +clientIdle_DoneN Nat n +n Maybe Text +errorMay , recvMsgRollBackward :: ChainPoint -> ChainTip -> IO @@ -1231,27 +1231,27 @@ -> IO (ClientPipelinedStIdle n (BlockInMode CardanoMode) ChainPoint ChainTip IO ()) -clientIdle_DoneN Nat n -n Maybe Text -errorMay +clientIdle_DoneN Nat n +n Maybe Text +errorMay } - fromChainTip :: ChainTip -> WithOrigin BlockNo - fromChainTip :: ChainTip -> WithOrigin BlockNo -fromChainTip ChainTip -ct = case ChainTip -ct of + fromChainTip :: ChainTip -> WithOrigin BlockNo + fromChainTip :: ChainTip -> WithOrigin BlockNo +fromChainTip ChainTip +ct = case ChainTip +ct of ChainTip ChainTipAtGenesis -> WithOrigin BlockNo forall t. WithOrigin t Origin ChainTip SlotNo _ Hash BlockHeader -_ BlockNo -bno -> BlockNo -> WithOrigin BlockNo +_ BlockNo +bno -> BlockNo -> WithOrigin BlockNo forall t. t -> WithOrigin t At BlockNo -bno +bno -- | A history of k (security parameter) recent ledger states. The head is the -- most recent item. Elements are: @@ -1272,24 +1272,24 @@ genesisConfigToEnv :: GenesisConfig -> Either GenesisConfigError Env genesisConfigToEnv -- enp - GenesisConfig -genCfg = + GenesisConfig +genCfg = case GenesisConfig -genCfg of +genCfg of GenesisCardano NodeConfig -_ Config -bCfg ShelleyConfig -sCfg +_ Config +bCfg ShelleyConfig +sCfg | ProtocolMagicId -> Word32 Cardano.Crypto.ProtocolMagic.unProtocolMagicId (Config -> ProtocolMagicId Cardano.Chain.Genesis.configProtocolMagicId Config -bCfg) Word32 -> Word32 -> Bool +bCfg) Word32 -> Word32 -> Bool forall a. Eq a => a -> a -> Bool /= ShelleyGenesis (ShelleyEra StandardCrypto) -> Word32 forall era. ShelleyGenesis era -> Word32 Shelley.Spec.sgNetworkMagic (ShelleyConfig -> ShelleyGenesis (ShelleyEra StandardCrypto) scConfig ShelleyConfig -sCfg) -> +sCfg) -> GenesisConfigError -> Either GenesisConfigError Env forall a b. a -> Either a b Left (GenesisConfigError -> Either GenesisConfigError Env) @@ -1313,7 +1313,7 @@ forall a b. (a -> b) -> a -> b $ Config -> ProtocolMagicId Cardano.Chain.Genesis.configProtocolMagicId Config -bCfg) +bCfg) , Text " /= ", Word32 -> Text forall a. Show a => a -> Text @@ -1324,18 +1324,18 @@ forall a b. (a -> b) -> a -> b $ ShelleyConfig -> ShelleyGenesis (ShelleyEra StandardCrypto) scConfig ShelleyConfig -sCfg) +sCfg) ] | GenesisData -> UTCTime Cardano.Chain.Genesis.gdStartTime (Config -> GenesisData Cardano.Chain.Genesis.configGenesisData Config -bCfg) UTCTime -> UTCTime -> Bool +bCfg) UTCTime -> UTCTime -> Bool forall a. Eq a => a -> a -> Bool /= ShelleyGenesis (ShelleyEra StandardCrypto) -> UTCTime forall era. ShelleyGenesis era -> UTCTime Shelley.Spec.sgSystemStart (ShelleyConfig -> ShelleyGenesis (ShelleyEra StandardCrypto) scConfig ShelleyConfig -sCfg) -> +sCfg) -> GenesisConfigError -> Either GenesisConfigError Env forall a b. a -> Either a b Left (GenesisConfigError -> Either GenesisConfigError Env) @@ -1359,7 +1359,7 @@ forall a b. (a -> b) -> a -> b $ Config -> GenesisData Cardano.Chain.Genesis.configGenesisData Config -bCfg) +bCfg) , Text " /= ", UTCTime -> Text forall a. Show a => a -> Text @@ -1370,19 +1370,19 @@ forall a b. (a -> b) -> a -> b $ ShelleyConfig -> ShelleyGenesis (ShelleyEra StandardCrypto) scConfig ShelleyConfig -sCfg) +sCfg) ] | Bool otherwise -> let - topLevelConfig :: TopLevelConfig (HardForkBlock (CardanoEras StandardCrypto)) -topLevelConfig = ProtocolInfo IO (HardForkBlock (CardanoEras StandardCrypto)) + topLevelConfig :: TopLevelConfig (HardForkBlock (CardanoEras StandardCrypto)) +topLevelConfig = ProtocolInfo IO (HardForkBlock (CardanoEras StandardCrypto)) -> TopLevelConfig (HardForkBlock (CardanoEras StandardCrypto)) forall (m :: * -> *) b. ProtocolInfo m b -> TopLevelConfig b Consensus.pInfoConfig (GenesisConfig -> ProtocolInfo IO (HardForkBlock (CardanoEras StandardCrypto)) mkProtocolInfoCardano GenesisConfig -genCfg) +genCfg) in Env -> Either GenesisConfigError Env forall a b. b -> Either a b @@ -1398,7 +1398,7 @@ -> LedgerConfig (HardForkBlock (CardanoEras StandardCrypto)) forall blk. TopLevelConfig blk -> LedgerConfig blk Consensus.topLevelConfigLedger TopLevelConfig (HardForkBlock (CardanoEras StandardCrypto)) -topLevelConfig +topLevelConfig , envProtocolConfig :: ConsensusConfig (HardForkProtocol (CardanoEras StandardCrypto)) envProtocolConfig = TopLevelConfig (HardForkBlock (CardanoEras StandardCrypto)) -> ConsensusConfig @@ -1406,15 +1406,15 @@ forall blk. TopLevelConfig blk -> ConsensusConfig (BlockProtocol blk) Consensus.topLevelConfigProtocol TopLevelConfig (HardForkBlock (CardanoEras StandardCrypto)) -topLevelConfig +topLevelConfig } readNetworkConfig :: NetworkConfigFile -> ExceptT Text IO NodeConfig readNetworkConfig :: NetworkConfigFile -> ExceptT Text IO NodeConfig -readNetworkConfig (NetworkConfigFile FilePath -ncf) = do - NodeConfig -ncfg <- (Either Text NodeConfig -> ExceptT Text IO NodeConfig +readNetworkConfig (NetworkConfigFile FilePath +ncf) = do + NodeConfig +ncfg <- (Either Text NodeConfig -> ExceptT Text IO NodeConfig forall (m :: * -> *) e a. Monad m => Either e a -> ExceptT e m a except (Either Text NodeConfig -> ExceptT Text IO NodeConfig) -> (ByteString -> Either Text NodeConfig) @@ -1427,26 +1427,26 @@ forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< FilePath -> Text -> ExceptT Text IO ByteString readByteString FilePath -ncf Text +ncf Text "node" NodeConfig -> ExceptT Text IO NodeConfig forall (m :: * -> *) a. Monad m => a -> m a return NodeConfig -ncfg +ncfg { ncByronGenesisFile :: GenesisFile ncByronGenesisFile = (FilePath -> FilePath) -> GenesisFile -> GenesisFile adjustGenesisFilePath (FilePath -> FilePath -> FilePath mkAdjustPath FilePath -ncf) (NodeConfig -> GenesisFile +ncf) (NodeConfig -> GenesisFile ncByronGenesisFile NodeConfig -ncfg) +ncfg) , ncShelleyGenesisFile :: GenesisFile ncShelleyGenesisFile = (FilePath -> FilePath) -> GenesisFile -> GenesisFile adjustGenesisFilePath (FilePath -> FilePath -> FilePath mkAdjustPath FilePath -ncf) (NodeConfig -> GenesisFile +ncf) (NodeConfig -> GenesisFile ncShelleyGenesisFile NodeConfig -ncfg) +ncfg) } data NodeConfig = NodeConfig @@ -1485,22 +1485,22 @@ -- Shelley.StandardAlonzo) } -instance FromJSON NodeConfig where - parseJSON :: Value -> Parser NodeConfig -parseJSON Value -v = +instance FromJSON NodeConfig where + parseJSON :: Value -> Parser NodeConfig +parseJSON Value +v = FilePath -> (Object -> Parser NodeConfig) -> Value -> Parser NodeConfig forall a. FilePath -> (Object -> Parser a) -> Value -> Parser a Aeson.withObject FilePath "NodeConfig" Object -> Parser NodeConfig -parse Value -v +parse Value +v where - parse :: Object -> Data.Aeson.Types.Internal.Parser NodeConfig - parse :: Object -> Parser NodeConfig -parse Object -o = + parse :: Object -> Data.Aeson.Types.Internal.Parser NodeConfig + parse :: Object -> Parser NodeConfig +parse Object +o = Maybe Double -> GenesisFile -> GenesisHashByron @@ -1541,7 +1541,7 @@ -> NodeConfig) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -o Object -> Text -> Parser (Maybe Double) +o Object -> Text -> Parser (Maybe Double) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "PBftSignatureThreshold" @@ -1574,7 +1574,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap FilePath -> GenesisFile GenesisFile (Object -o Object -> Text -> Parser FilePath +o Object -> Text -> Parser FilePath forall a. FromJSON a => Object -> Text -> Parser a .: Text "ByronGenesisFile") @@ -1606,7 +1606,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap Text -> GenesisHashByron GenesisHashByron (Object -o Object -> Text -> Parser Text +o Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "ByronGenesisHash") @@ -1635,7 +1635,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap FilePath -> GenesisFile GenesisFile (Object -o Object -> Text -> Parser FilePath +o Object -> Text -> Parser FilePath forall a. FromJSON a => Object -> Text -> Parser a .: Text "ShelleyGenesisFile") @@ -1664,7 +1664,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap Hash Blake2b_256 ByteString -> GenesisHashShelley GenesisHashShelley (Object -o Object -> Text -> Parser (Hash Blake2b_256 ByteString) +o Object -> Text -> Parser (Hash Blake2b_256 ByteString) forall a. FromJSON a => Object -> Text -> Parser a .: Text "ShelleyGenesisHash") @@ -1686,7 +1686,7 @@ -> NodeConfig) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser RequiresNetworkMagic +o Object -> Text -> Parser RequiresNetworkMagic forall a. FromJSON a => Object -> Text -> Parser a .: Text "RequiresNetworkMagic" @@ -1706,8 +1706,8 @@ -> NodeConfig) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -> Parser SoftwareVersion -parseByronSoftwareVersion Object -o +parseByronSoftwareVersion Object +o Parser (ProtocolVersion -> ProtocolTransitionParamsShelleyBased (ShelleyEra StandardCrypto) @@ -1722,8 +1722,8 @@ -> NodeConfig) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -> Parser ProtocolVersion -parseByronProtocolVersion Object -o +parseByronProtocolVersion Object +o Parser (ProtocolTransitionParamsShelleyBased (ShelleyEra StandardCrypto) -> ProtocolTransitionParamsShelleyBased (AllegraEra StandardCrypto) @@ -1751,8 +1751,8 @@ (ProtocolTransitionParamsShelleyBased (ShelleyEra StandardCrypto)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -> Parser TriggerHardFork -parseShelleyHardForkEpoch Object -o) +parseShelleyHardForkEpoch Object +o) Parser (ProtocolTransitionParamsShelleyBased (AllegraEra StandardCrypto) -> ProtocolTransitionParamsShelleyBased (MaryEra StandardCrypto) @@ -1778,8 +1778,8 @@ (ProtocolTransitionParamsShelleyBased (AllegraEra StandardCrypto)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -> Parser TriggerHardFork -parseAllegraHardForkEpoch Object -o) +parseAllegraHardForkEpoch Object +o) Parser (ProtocolTransitionParamsShelleyBased (MaryEra StandardCrypto) -> NodeConfig) @@ -1801,22 +1801,22 @@ (ProtocolTransitionParamsShelleyBased (MaryEra StandardCrypto)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -> Parser TriggerHardFork -parseMaryHardForkEpoch Object -o) +parseMaryHardForkEpoch Object +o) -- <*> (Consensus.ProtocolTransitionParamsShelleyBased ({-alonzo genesis-}) -- <$> parseAlonzoHardForkEpoch o) - parseByronProtocolVersion :: Object -> Data.Aeson.Types.Internal.Parser Cardano.Chain.Update.ProtocolVersion - parseByronProtocolVersion :: Object -> Parser ProtocolVersion -parseByronProtocolVersion Object -o = + parseByronProtocolVersion :: Object -> Data.Aeson.Types.Internal.Parser Cardano.Chain.Update.ProtocolVersion + parseByronProtocolVersion :: Object -> Parser ProtocolVersion +parseByronProtocolVersion Object +o = Word16 -> Word16 -> Word8 -> ProtocolVersion Cardano.Chain.Update.ProtocolVersion (Word16 -> Word16 -> Word8 -> ProtocolVersion) -> Parser Word16 -> Parser (Word16 -> Word8 -> ProtocolVersion) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -o Object -> Text -> Parser Word16 +o Object -> Text -> Parser Word16 forall a. FromJSON a => Object -> Text -> Parser a .: Text "LastKnownBlockVersion-Major" @@ -1824,7 +1824,7 @@ -> Parser Word16 -> Parser (Word8 -> ProtocolVersion) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Word16 +o Object -> Text -> Parser Word16 forall a. FromJSON a => Object -> Text -> Parser a .: Text "LastKnownBlockVersion-Minor" @@ -1832,15 +1832,15 @@ -> Parser Word8 -> Parser ProtocolVersion forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Word8 +o Object -> Text -> Parser Word8 forall a. FromJSON a => Object -> Text -> Parser a .: Text "LastKnownBlockVersion-Alt" - parseByronSoftwareVersion :: Object -> Data.Aeson.Types.Internal.Parser Cardano.Chain.Update.SoftwareVersion - parseByronSoftwareVersion :: Object -> Parser SoftwareVersion -parseByronSoftwareVersion Object -o = + parseByronSoftwareVersion :: Object -> Data.Aeson.Types.Internal.Parser Cardano.Chain.Update.SoftwareVersion + parseByronSoftwareVersion :: Object -> Parser SoftwareVersion +parseByronSoftwareVersion Object +o = ApplicationName -> Word32 -> SoftwareVersion Cardano.Chain.Update.SoftwareVersion (ApplicationName -> Word32 -> SoftwareVersion) @@ -1850,7 +1850,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap Text -> ApplicationName Cardano.Chain.Update.ApplicationName (Object -o Object -> Text -> Parser Text +o Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "ApplicationName") @@ -1858,15 +1858,15 @@ -> Parser Word32 -> Parser SoftwareVersion forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Word32 +o Object -> Text -> Parser Word32 forall a. FromJSON a => Object -> Text -> Parser a .: Text "ApplicationVersion" - parseShelleyHardForkEpoch :: Object -> Data.Aeson.Types.Internal.Parser Consensus.TriggerHardFork - parseShelleyHardForkEpoch :: Object -> Parser TriggerHardFork -parseShelleyHardForkEpoch Object -o = + parseShelleyHardForkEpoch :: Object -> Data.Aeson.Types.Internal.Parser Consensus.TriggerHardFork + parseShelleyHardForkEpoch :: Object -> Parser TriggerHardFork +parseShelleyHardForkEpoch Object +o = [Parser TriggerHardFork] -> Parser TriggerHardFork forall (t :: * -> *) (f :: * -> *) a. (Foldable t, Alternative f) => @@ -1877,7 +1877,7 @@ -> Parser EpochNo -> Parser TriggerHardFork forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -o Object -> Text -> Parser EpochNo +o Object -> Text -> Parser EpochNo forall a. FromJSON a => Object -> Text -> Parser a .: Text "TestShelleyHardForkAtEpoch" @@ -1891,10 +1891,10 @@ 2 -- Mainnet default ] - parseAllegraHardForkEpoch :: Object -> Data.Aeson.Types.Internal.Parser Consensus.TriggerHardFork - parseAllegraHardForkEpoch :: Object -> Parser TriggerHardFork -parseAllegraHardForkEpoch Object -o = + parseAllegraHardForkEpoch :: Object -> Data.Aeson.Types.Internal.Parser Consensus.TriggerHardFork + parseAllegraHardForkEpoch :: Object -> Parser TriggerHardFork +parseAllegraHardForkEpoch Object +o = [Parser TriggerHardFork] -> Parser TriggerHardFork forall (t :: * -> *) (f :: * -> *) a. (Foldable t, Alternative f) => @@ -1905,7 +1905,7 @@ -> Parser EpochNo -> Parser TriggerHardFork forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -o Object -> Text -> Parser EpochNo +o Object -> Text -> Parser EpochNo forall a. FromJSON a => Object -> Text -> Parser a .: Text "TestAllegraHardForkAtEpoch" @@ -1919,10 +1919,10 @@ 3 -- Mainnet default ] - parseMaryHardForkEpoch :: Object -> Data.Aeson.Types.Internal.Parser Consensus.TriggerHardFork - parseMaryHardForkEpoch :: Object -> Parser TriggerHardFork -parseMaryHardForkEpoch Object -o = + parseMaryHardForkEpoch :: Object -> Data.Aeson.Types.Internal.Parser Consensus.TriggerHardFork + parseMaryHardForkEpoch :: Object -> Parser TriggerHardFork +parseMaryHardForkEpoch Object +o = [Parser TriggerHardFork] -> Parser TriggerHardFork forall (t :: * -> *) (f :: * -> *) a. (Foldable t, Alternative f) => @@ -1933,7 +1933,7 @@ -> Parser EpochNo -> Parser TriggerHardFork forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -o Object -> Text -> Parser EpochNo +o Object -> Text -> Parser EpochNo forall a. FromJSON a => Object -> Text -> Parser a .: Text "TestMaryHardForkAtEpoch" @@ -1949,14 +1949,14 @@ parseNodeConfig :: ByteString -> Either Text NodeConfig parseNodeConfig :: ByteString -> Either Text NodeConfig -parseNodeConfig ByteString -bs = +parseNodeConfig ByteString +bs = case ByteString -> Either ParseException NodeConfig forall a. FromJSON a => ByteString -> Either ParseException a Yaml.decodeEither' ByteString -bs of - Left ParseException -err -> Text -> Either Text NodeConfig +bs of + Left ParseException +err -> Text -> Either Text NodeConfig forall a b. a -> Either a b Left (Text -> Either Text NodeConfig) -> Text -> Either Text NodeConfig forall a b. (a -> b) -> a -> b @@ -1966,37 +1966,37 @@ <> ParseException -> Text forall a. Show a => a -> Text textShow ParseException -err - Right NodeConfig -nc -> NodeConfig -> Either Text NodeConfig +err + Right NodeConfig +nc -> NodeConfig -> Either Text NodeConfig forall a b. b -> Either a b Right NodeConfig -nc +nc adjustGenesisFilePath :: (FilePath -> FilePath) -> GenesisFile -> GenesisFile adjustGenesisFilePath :: (FilePath -> FilePath) -> GenesisFile -> GenesisFile -adjustGenesisFilePath FilePath -> FilePath -f (GenesisFile FilePath -p) = FilePath -> GenesisFile +adjustGenesisFilePath FilePath -> FilePath +f (GenesisFile FilePath +p) = FilePath -> GenesisFile GenesisFile (FilePath -> FilePath -f FilePath -p) +f FilePath +p) mkAdjustPath :: FilePath -> (FilePath -> FilePath) mkAdjustPath :: FilePath -> FilePath -> FilePath -mkAdjustPath FilePath -nodeConfigFilePath FilePath -fp = FilePath -> FilePath +mkAdjustPath FilePath +nodeConfigFilePath FilePath +fp = FilePath -> FilePath takeDirectory FilePath -nodeConfigFilePath FilePath -> FilePath -> FilePath +nodeConfigFilePath FilePath -> FilePath -> FilePath </> FilePath -fp +fp readByteString :: FilePath -> Text -> ExceptT Text IO ByteString readByteString :: FilePath -> Text -> ExceptT Text IO ByteString -readByteString FilePath -fp Text -cfgType = IO (Either Text ByteString) -> ExceptT Text IO ByteString +readByteString FilePath +fp Text +cfgType = IO (Either Text ByteString) -> ExceptT Text IO ByteString forall e (m :: * -> *) a. m (Either e a) -> ExceptT e m a ExceptT (IO (Either Text ByteString) -> ExceptT Text IO ByteString) -> IO (Either Text ByteString) -> ExceptT Text IO ByteString @@ -2013,7 +2013,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> FilePath -> IO ByteString BS.readFile FilePath -fp) ((IOException -> IO (Either Text ByteString)) +fp) ((IOException -> IO (Either Text ByteString)) -> IO (Either Text ByteString)) -> (IOException -> IO (Either Text ByteString)) -> IO (Either Text ByteString) @@ -2034,15 +2034,15 @@ mconcat [ Text "Cannot read the ", Text -cfgType, Text +cfgType, Text " configuration file at : ", FilePath -> Text Text.pack FilePath -fp ] +fp ] initLedgerStateVar :: GenesisConfig -> LedgerState initLedgerStateVar :: GenesisConfig -> LedgerState -initLedgerStateVar GenesisConfig -genesisConfig = LedgerState :: LedgerState (HardForkBlock (CardanoEras StandardCrypto)) +initLedgerStateVar GenesisConfig +genesisConfig = LedgerState :: LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -> LedgerState LedgerState { clsState :: LedgerState (HardForkBlock (CardanoEras StandardCrypto)) @@ -2058,14 +2058,14 @@ -> ExtLedgerState (HardForkBlock (CardanoEras StandardCrypto)) forall (m :: * -> *) b. ProtocolInfo m b -> ExtLedgerState b Consensus.pInfoInitLedger ProtocolInfo IO (HardForkBlock (CardanoEras StandardCrypto)) -protocolInfo +protocolInfo } where - protocolInfo :: ProtocolInfo IO (HardForkBlock (CardanoEras StandardCrypto)) -protocolInfo = GenesisConfig + protocolInfo :: ProtocolInfo IO (HardForkBlock (CardanoEras StandardCrypto)) +protocolInfo = GenesisConfig -> ProtocolInfo IO (HardForkBlock (CardanoEras StandardCrypto)) mkProtocolInfoCardano GenesisConfig -genesisConfig +genesisConfig newtype LedgerState = LedgerState { LedgerState @@ -2090,7 +2090,7 @@ newtype GenesisFile = GenesisFile { GenesisFile -> FilePath unGenesisFile :: FilePath - } deriving Int -> GenesisFile -> FilePath -> FilePath + } deriving Int -> GenesisFile -> FilePath -> FilePath [GenesisFile] -> FilePath -> FilePath GenesisFile -> FilePath (Int -> GenesisFile -> FilePath -> FilePath) @@ -2111,7 +2111,7 @@ newtype GenesisHashByron = GenesisHashByron { GenesisHashByron -> Text unGenesisHashByron :: Text - } deriving newtype (GenesisHashByron -> GenesisHashByron -> Bool + } deriving newtype (GenesisHashByron -> GenesisHashByron -> Bool (GenesisHashByron -> GenesisHashByron -> Bool) -> (GenesisHashByron -> GenesisHashByron -> Bool) -> Eq GenesisHashByron @@ -2120,7 +2120,7 @@ $c/= :: GenesisHashByron -> GenesisHashByron -> Bool == :: GenesisHashByron -> GenesisHashByron -> Bool $c== :: GenesisHashByron -> GenesisHashByron -> Bool -Eq, Int -> GenesisHashByron -> FilePath -> FilePath +Eq, Int -> GenesisHashByron -> FilePath -> FilePath [GenesisHashByron] -> FilePath -> FilePath GenesisHashByron -> FilePath (Int -> GenesisHashByron -> FilePath -> FilePath) @@ -2141,7 +2141,7 @@ newtype GenesisHashShelley = GenesisHashShelley { GenesisHashShelley -> Hash Blake2b_256 ByteString unGenesisHashShelley :: Cardano.Crypto.Hash.Class.Hash Cardano.Crypto.Hash.Blake2b.Blake2b_256 ByteString - } deriving newtype (GenesisHashShelley -> GenesisHashShelley -> Bool + } deriving newtype (GenesisHashShelley -> GenesisHashShelley -> Bool (GenesisHashShelley -> GenesisHashShelley -> Bool) -> (GenesisHashShelley -> GenesisHashShelley -> Bool) -> Eq GenesisHashShelley @@ -2150,7 +2150,7 @@ $c/= :: GenesisHashShelley -> GenesisHashShelley -> Bool == :: GenesisHashShelley -> GenesisHashShelley -> Bool $c== :: GenesisHashShelley -> GenesisHashShelley -> Bool -Eq, Int -> GenesisHashShelley -> FilePath -> FilePath +Eq, Int -> GenesisHashShelley -> FilePath -> FilePath [GenesisHashShelley] -> FilePath -> FilePath GenesisHashShelley -> FilePath (Int -> GenesisHashShelley -> FilePath -> FilePath) @@ -2171,7 +2171,7 @@ newtype LedgerStateDir = LedgerStateDir { LedgerStateDir -> FilePath unLedgerStateDir :: FilePath - } deriving Int -> LedgerStateDir -> FilePath -> FilePath + } deriving Int -> LedgerStateDir -> FilePath -> FilePath [LedgerStateDir] -> FilePath -> FilePath LedgerStateDir -> FilePath (Int -> LedgerStateDir -> FilePath -> FilePath) @@ -2192,7 +2192,7 @@ newtype NetworkName = NetworkName { NetworkName -> Text unNetworkName :: Text - } deriving Int -> NetworkName -> FilePath -> FilePath + } deriving Int -> NetworkName -> FilePath -> FilePath [NetworkName] -> FilePath -> FilePath NetworkName -> FilePath (Int -> NetworkName -> FilePath -> FilePath) @@ -2213,7 +2213,7 @@ newtype NetworkConfigFile = NetworkConfigFile { NetworkConfigFile -> FilePath unNetworkConfigFile :: FilePath - } deriving Int -> NetworkConfigFile -> FilePath -> FilePath + } deriving Int -> NetworkConfigFile -> FilePath -> FilePath [NetworkConfigFile] -> FilePath -> FilePath NetworkConfigFile -> FilePath (Int -> NetworkConfigFile -> FilePath -> FilePath) @@ -2234,7 +2234,7 @@ newtype SocketPath = SocketPath { SocketPath -> FilePath unSocketPath :: FilePath - } deriving Int -> SocketPath -> FilePath -> FilePath + } deriving Int -> SocketPath -> FilePath -> FilePath [SocketPath] -> FilePath -> FilePath SocketPath -> FilePath (Int -> SocketPath -> FilePath -> FilePath) @@ -2260,10 +2260,10 @@ (Consensus.CardanoEras Consensus.StandardCrypto)) mkProtocolInfoCardano :: GenesisConfig -> ProtocolInfo IO (HardForkBlock (CardanoEras StandardCrypto)) -mkProtocolInfoCardano (GenesisCardano NodeConfig -dnc Config -byronGenesis ShelleyConfig -shelleyGenesis) +mkProtocolInfoCardano (GenesisCardano NodeConfig +dnc Config +byronGenesis ShelleyConfig +shelleyGenesis) = ProtocolParamsByron -> ProtocolParamsShelleyBased (ShelleyEra StandardCrypto) -> ProtocolParamsShelley @@ -2298,7 +2298,7 @@ Consensus.ProtocolParamsByron { $sel:byronGenesis:ProtocolParamsByron :: Config Consensus.byronGenesis = Config -byronGenesis +byronGenesis , $sel:byronPbftSignatureThreshold:ProtocolParamsByron :: Maybe PBftSignatureThreshold Consensus.byronPbftSignatureThreshold = Double -> PBftSignatureThreshold Consensus.PBftSignatureThreshold (Double -> PBftSignatureThreshold) @@ -2306,15 +2306,15 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> NodeConfig -> Maybe Double ncPBftSignatureThreshold NodeConfig -dnc +dnc , $sel:byronProtocolVersion:ProtocolParamsByron :: ProtocolVersion Consensus.byronProtocolVersion = NodeConfig -> ProtocolVersion ncByronProtocolVersion NodeConfig -dnc +dnc , $sel:byronSoftwareVersion:ProtocolParamsByron :: SoftwareVersion Consensus.byronSoftwareVersion = NodeConfig -> SoftwareVersion ncByronSoftwareVersion NodeConfig -dnc +dnc , $sel:byronLeaderCredentials:ProtocolParamsByron :: Maybe ByronLeaderCredentials Consensus.byronLeaderCredentials = Maybe ByronLeaderCredentials forall a. Maybe a @@ -2329,11 +2329,11 @@ { $sel:shelleyBasedGenesis:ProtocolParamsShelleyBased :: ShelleyGenesis (ShelleyEra StandardCrypto) Consensus.shelleyBasedGenesis = ShelleyConfig -> ShelleyGenesis (ShelleyEra StandardCrypto) scConfig ShelleyConfig -shelleyGenesis +shelleyGenesis , $sel:shelleyBasedInitialNonce:ProtocolParamsShelleyBased :: Nonce Consensus.shelleyBasedInitialNonce = ShelleyConfig -> Nonce shelleyPraosNonce ShelleyConfig -shelleyGenesis +shelleyGenesis , $sel:shelleyBasedLeaderCredentials:ProtocolParamsShelleyBased :: [TPraosLeaderCredentials (EraCrypto (ShelleyEra StandardCrypto))] Consensus.shelleyBasedLeaderCredentials = [] } @@ -2342,21 +2342,21 @@ { $sel:shelleyProtVer:ProtocolParamsShelley :: ProtVer Consensus.shelleyProtVer = NodeConfig -> ProtVer shelleyProtVer NodeConfig -dnc +dnc } ProtocolParamsAllegra :: ProtVer -> ProtocolParamsAllegra Consensus.ProtocolParamsAllegra { $sel:allegraProtVer:ProtocolParamsAllegra :: ProtVer Consensus.allegraProtVer = NodeConfig -> ProtVer shelleyProtVer NodeConfig -dnc +dnc } ProtocolParamsMary :: ProtVer -> ProtocolParamsMary Consensus.ProtocolParamsMary { $sel:maryProtVer:ProtocolParamsMary :: ProtVer Consensus.maryProtVer = NodeConfig -> ProtVer shelleyProtVer NodeConfig -dnc +dnc } ProtocolParamsAlonzo :: ProtVer -> ProtocolParamsAlonzo Consensus.ProtocolParamsAlonzo @@ -2369,15 +2369,15 @@ (NodeConfig -> ProtocolTransitionParamsShelleyBased (ShelleyEra StandardCrypto) ncByronToShelley NodeConfig -dnc) +dnc) (NodeConfig -> ProtocolTransitionParamsShelleyBased (AllegraEra StandardCrypto) ncShelleyToAllegra NodeConfig -dnc) +dnc) (NodeConfig -> ProtocolTransitionParamsShelleyBased (MaryEra StandardCrypto) ncAllegraToMary NodeConfig -dnc) +dnc) (FilePath -> ProtocolTransitionParamsShelleyBased (AlonzoEra StandardCrypto) forall a. HasCallStack => FilePath -> a @@ -2386,8 +2386,8 @@ shelleyPraosNonce :: ShelleyConfig -> Shelley.Spec.Nonce shelleyPraosNonce :: ShelleyConfig -> Nonce -shelleyPraosNonce ShelleyConfig -sCfg = Hash Blake2b_256 Nonce -> Nonce +shelleyPraosNonce ShelleyConfig +sCfg = Hash Blake2b_256 Nonce -> Nonce Shelley.Spec.Nonce (Hash Blake2b_256 ByteString -> Hash Blake2b_256 Nonce forall h a b. Hash h a -> Hash h b Cardano.Crypto.Hash.Class.castHash (Hash Blake2b_256 ByteString -> Hash Blake2b_256 Nonce) @@ -2401,16 +2401,16 @@ forall a b. (a -> b) -> a -> b $ ShelleyConfig -> GenesisHashShelley scGenesisHash ShelleyConfig -sCfg) +sCfg) shelleyProtVer :: NodeConfig -> Shelley.Spec.ProtVer shelleyProtVer :: NodeConfig -> ProtVer -shelleyProtVer NodeConfig -dnc = - let bver :: ProtocolVersion -bver = NodeConfig -> ProtocolVersion +shelleyProtVer NodeConfig +dnc = + let bver :: ProtocolVersion +bver = NodeConfig -> ProtocolVersion ncByronProtocolVersion NodeConfig -dnc in +dnc in Natural -> Natural -> ProtVer Shelley.Spec.ProtVer (Word16 -> Natural @@ -2419,36 +2419,36 @@ forall a b. (a -> b) -> a -> b $ ProtocolVersion -> Word16 Cardano.Chain.Update.pvMajor ProtocolVersion -bver) +bver) (Word16 -> Natural forall a b. (Integral a, Num b) => a -> b fromIntegral (Word16 -> Natural) -> Word16 -> Natural forall a b. (a -> b) -> a -> b $ ProtocolVersion -> Word16 Cardano.Chain.Update.pvMinor ProtocolVersion -bver) +bver) readCardanoGenesisConfig :: NodeConfig -> ExceptT GenesisConfigError IO GenesisConfig readCardanoGenesisConfig :: NodeConfig -> ExceptT GenesisConfigError IO GenesisConfig -readCardanoGenesisConfig NodeConfig -enc = +readCardanoGenesisConfig NodeConfig +enc = NodeConfig -> Config -> ShelleyConfig -> GenesisConfig GenesisCardano NodeConfig -enc (Config -> ShelleyConfig -> GenesisConfig) +enc (Config -> ShelleyConfig -> GenesisConfig) -> ExceptT GenesisConfigError IO Config -> ExceptT GenesisConfigError IO (ShelleyConfig -> GenesisConfig) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> NodeConfig -> ExceptT GenesisConfigError IO Config readByronGenesisConfig NodeConfig -enc ExceptT GenesisConfigError IO (ShelleyConfig -> GenesisConfig) +enc ExceptT GenesisConfigError IO (ShelleyConfig -> GenesisConfig) -> ExceptT GenesisConfigError IO ShelleyConfig -> ExceptT GenesisConfigError IO GenesisConfig forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> NodeConfig -> ExceptT GenesisConfigError IO ShelleyConfig readShelleyGenesisConfig NodeConfig -enc +enc data GenesisConfigError = NEError !Text @@ -2458,19 +2458,19 @@ renderGenesisConfigError :: GenesisConfigError -> Text renderGenesisConfigError :: GenesisConfigError -> Text -renderGenesisConfigError GenesisConfigError -ne = +renderGenesisConfigError GenesisConfigError +ne = case GenesisConfigError -ne of - NEError Text -t -> Text +ne of + NEError Text +t -> Text "Error: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -t - NEByronConfig FilePath -fp ConfigurationError -ce -> +t + NEByronConfig FilePath +fp ConfigurationError +ce -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat @@ -2478,15 +2478,15 @@ "Failed reading Byron genesis file ", FilePath -> Text forall a. Show a => a -> Text textShow FilePath -fp, Text +fp, Text ": ", ConfigurationError -> Text forall a. Show a => a -> Text textShow ConfigurationError -ce +ce ] - NEShelleyConfig FilePath -fp Text -txt -> + NEShelleyConfig FilePath +fp Text +txt -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat @@ -2494,12 +2494,12 @@ "Failed reading Shelley genesis file ", FilePath -> Text forall a. Show a => a -> Text textShow FilePath -fp, Text +fp, Text ": ", Text -txt +txt ] - NECardanoConfig Text -err -> + NECardanoConfig Text +err -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat @@ -2507,7 +2507,7 @@ "With Cardano protocol, Byron/Shelley config mismatch:\n" , Text " ", Text -err +err ] data LookupFail @@ -2520,7 +2520,7 @@ | DbLookupSlotNo !Word64 | DbMetaEmpty | DbMetaMultipleRows - deriving (LookupFail -> LookupFail -> Bool + deriving (LookupFail -> LookupFail -> Bool (LookupFail -> LookupFail -> Bool) -> (LookupFail -> LookupFail -> Bool) -> Eq LookupFail forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -2528,7 +2528,7 @@ $c/= :: LookupFail -> LookupFail -> Bool == :: LookupFail -> LookupFail -> Bool $c== :: LookupFail -> LookupFail -> Bool -Eq, Int -> LookupFail -> FilePath -> FilePath +Eq, Int -> LookupFail -> FilePath -> FilePath [LookupFail] -> FilePath -> FilePath LookupFail -> FilePath (Int -> LookupFail -> FilePath -> FilePath) @@ -2550,17 +2550,17 @@ :: NodeConfig -> ExceptT GenesisConfigError IO Cardano.Chain.Genesis.Config readByronGenesisConfig :: NodeConfig -> ExceptT GenesisConfigError IO Config -readByronGenesisConfig NodeConfig -enc = do - let file :: FilePath -file = GenesisFile -> FilePath +readByronGenesisConfig NodeConfig +enc = do + let file :: FilePath +file = GenesisFile -> FilePath unGenesisFile (GenesisFile -> FilePath) -> GenesisFile -> FilePath forall a b. (a -> b) -> a -> b $ NodeConfig -> GenesisFile ncByronGenesisFile NodeConfig -enc - AbstractHash Blake2b_256 Raw -genHash <- (Text -> GenesisConfigError) +enc + AbstractHash Blake2b_256 Raw +genHash <- (Text -> GenesisConfigError) -> ExceptT Text IO (AbstractHash Blake2b_256 Raw) -> ExceptT GenesisConfigError IO (AbstractHash Blake2b_256 Raw) forall (m :: * -> *) e e' a. @@ -2593,7 +2593,7 @@ forall a b. (a -> b) -> a -> b $ NodeConfig -> GenesisHashByron ncByronGenesisHash NodeConfig -enc) +enc) (ConfigurationError -> GenesisConfigError) -> ExceptT ConfigurationError IO Config -> ExceptT GenesisConfigError IO Config @@ -2602,7 +2602,7 @@ (e -> e') -> ExceptT e m a -> ExceptT e' m a firstExceptT (FilePath -> ConfigurationError -> GenesisConfigError NEByronConfig FilePath -file) +file) (ExceptT ConfigurationError IO Config -> ExceptT GenesisConfigError IO Config) -> ExceptT ConfigurationError IO Config @@ -2618,23 +2618,23 @@ -> FilePath -> AbstractHash Blake2b_256 Raw -> m Config Cardano.Chain.Genesis.mkConfigFromFile (NodeConfig -> RequiresNetworkMagic ncRequiresNetworkMagic NodeConfig -enc) FilePath -file AbstractHash Blake2b_256 Raw -genHash +enc) FilePath +file AbstractHash Blake2b_256 Raw +genHash readShelleyGenesisConfig :: NodeConfig -> ExceptT GenesisConfigError IO ShelleyConfig readShelleyGenesisConfig :: NodeConfig -> ExceptT GenesisConfigError IO ShelleyConfig -readShelleyGenesisConfig NodeConfig -enc = do - let file :: FilePath -file = GenesisFile -> FilePath +readShelleyGenesisConfig NodeConfig +enc = do + let file :: FilePath +file = GenesisFile -> FilePath unGenesisFile (GenesisFile -> FilePath) -> GenesisFile -> FilePath forall a b. (a -> b) -> a -> b $ NodeConfig -> GenesisFile ncShelleyGenesisFile NodeConfig -enc +enc (ShelleyGenesisError -> GenesisConfigError) -> ExceptT ShelleyGenesisError IO ShelleyConfig -> ExceptT GenesisConfigError IO ShelleyConfig @@ -2643,7 +2643,7 @@ (e -> e') -> ExceptT e m a -> ExceptT e' m a firstExceptT (FilePath -> Text -> GenesisConfigError NEShelleyConfig FilePath -file (Text -> GenesisConfigError) +file (Text -> GenesisConfigError) -> (ShelleyGenesisError -> Text) -> ShelleyGenesisError -> GenesisConfigError @@ -2660,11 +2660,11 @@ -> ExceptT ShelleyGenesisError IO ShelleyConfig readGenesis (FilePath -> GenesisFile GenesisFile FilePath -file) (NodeConfig -> GenesisHashShelley +file) (NodeConfig -> GenesisHashShelley ncShelleyGenesisHash NodeConfig -enc) +enc) -textShow :: Show a => a -> Text +textShow :: Show a => a -> Text textShow :: a -> Text textShow = FilePath -> Text Text.pack (FilePath -> Text) -> (a -> FilePath) -> a -> Text @@ -2679,18 +2679,18 @@ readGenesis :: GenesisFile -> GenesisHashShelley -> ExceptT ShelleyGenesisError IO ShelleyConfig -readGenesis (GenesisFile FilePath -file) GenesisHashShelley -expectedGenesisHash = do - ByteString -content <- (IOException -> ShelleyGenesisError) +readGenesis (GenesisFile FilePath +file) GenesisHashShelley +expectedGenesisHash = do + ByteString +content <- (IOException -> ShelleyGenesisError) -> IO ByteString -> ExceptT ShelleyGenesisError IO ByteString forall (m :: * -> *) x a. MonadIO m => (IOException -> x) -> IO a -> ExceptT x m a handleIOExceptT (FilePath -> Text -> ShelleyGenesisError GenesisReadError FilePath -file (Text -> ShelleyGenesisError) +file (Text -> ShelleyGenesisError) -> (IOException -> Text) -> IOException -> ShelleyGenesisError forall b c a. (b -> c) -> (a -> b) -> a -> c . IOException -> Text @@ -2700,21 +2700,21 @@ forall a b. (a -> b) -> a -> b $ FilePath -> IO ByteString BS.readFile FilePath -file - let genesisHash :: GenesisHashShelley -genesisHash = Hash Blake2b_256 ByteString -> GenesisHashShelley +file + let genesisHash :: GenesisHashShelley +genesisHash = Hash Blake2b_256 ByteString -> GenesisHashShelley GenesisHashShelley ((ByteString -> ByteString) -> ByteString -> Hash Blake2b_256 ByteString forall h a. HashAlgorithm h => (a -> ByteString) -> a -> Hash h a Cardano.Crypto.Hash.Class.hashWith ByteString -> ByteString forall a. a -> a id ByteString -content) +content) GenesisHashShelley -> ExceptT ShelleyGenesisError IO () -checkExpectedGenesisHash GenesisHashShelley -genesisHash - ShelleyGenesis (ShelleyEra StandardCrypto) -genesis <- (FilePath -> ShelleyGenesisError) +checkExpectedGenesisHash GenesisHashShelley +genesisHash + ShelleyGenesis (ShelleyEra StandardCrypto) +genesis <- (FilePath -> ShelleyGenesisError) -> ExceptT FilePath IO (ShelleyGenesis (ShelleyEra StandardCrypto)) -> ExceptT ShelleyGenesisError IO (ShelleyGenesis (ShelleyEra StandardCrypto)) @@ -2723,7 +2723,7 @@ (e -> e') -> ExceptT e m a -> ExceptT e' m a firstExceptT (FilePath -> Text -> ShelleyGenesisError GenesisDecodeError FilePath -file (Text -> ShelleyGenesisError) +file (Text -> ShelleyGenesisError) -> (FilePath -> Text) -> FilePath -> ShelleyGenesisError forall b c a. (b -> c) -> (a -> b) -> a -> c . FilePath -> Text @@ -2757,7 +2757,7 @@ -> Either FilePath (ShelleyGenesis (ShelleyEra StandardCrypto)) forall a. FromJSON a => ByteString -> Either FilePath a Aeson.eitherDecodeStrict' ByteString -content +content ShelleyConfig -> ExceptT ShelleyGenesisError IO ShelleyConfig forall (f :: * -> *) a. Applicative f => a -> f a pure (ShelleyConfig -> ExceptT ShelleyGenesisError IO ShelleyConfig) @@ -2766,24 +2766,24 @@ $ ShelleyGenesis (ShelleyEra StandardCrypto) -> GenesisHashShelley -> ShelleyConfig ShelleyConfig ShelleyGenesis (ShelleyEra StandardCrypto) -genesis GenesisHashShelley -genesisHash +genesis GenesisHashShelley +genesisHash where - checkExpectedGenesisHash :: GenesisHashShelley -> ExceptT ShelleyGenesisError IO () - checkExpectedGenesisHash :: GenesisHashShelley -> ExceptT ShelleyGenesisError IO () -checkExpectedGenesisHash GenesisHashShelley -actual = + checkExpectedGenesisHash :: GenesisHashShelley -> ExceptT ShelleyGenesisError IO () + checkExpectedGenesisHash :: GenesisHashShelley -> ExceptT ShelleyGenesisError IO () +checkExpectedGenesisHash GenesisHashShelley +actual = if GenesisHashShelley -actual GenesisHashShelley -> GenesisHashShelley -> Bool +actual GenesisHashShelley -> GenesisHashShelley -> Bool forall a. Eq a => a -> a -> Bool /= GenesisHashShelley -expectedGenesisHash +expectedGenesisHash then ShelleyGenesisError -> ExceptT ShelleyGenesisError IO () forall (m :: * -> *) e a. Monad m => e -> ExceptT e m a left (GenesisHashShelley -> GenesisHashShelley -> ShelleyGenesisError GenesisHashMismatch GenesisHashShelley -actual GenesisHashShelley -expectedGenesisHash) +actual GenesisHashShelley +expectedGenesisHash) else () -> ExceptT ShelleyGenesisError IO () forall (f :: * -> *) a. Applicative f => a -> f a pure () @@ -2792,7 +2792,7 @@ = GenesisReadError !FilePath !Text | GenesisHashMismatch !GenesisHashShelley !GenesisHashShelley -- actual, expected | GenesisDecodeError !FilePath !Text - deriving Int -> ShelleyGenesisError -> FilePath -> FilePath + deriving Int -> ShelleyGenesisError -> FilePath -> FilePath [ShelleyGenesisError] -> FilePath -> FilePath ShelleyGenesisError -> FilePath (Int -> ShelleyGenesisError -> FilePath -> FilePath) @@ -2812,75 +2812,75 @@ renderShelleyGenesisError :: ShelleyGenesisError -> Text renderShelleyGenesisError :: ShelleyGenesisError -> Text -renderShelleyGenesisError ShelleyGenesisError -sge = +renderShelleyGenesisError ShelleyGenesisError +sge = case ShelleyGenesisError -sge of - GenesisReadError FilePath -fp Text -err -> +sge of + GenesisReadError FilePath +fp Text +err -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat [ Text "There was an error reading the genesis file: ", FilePath -> Text Text.pack FilePath -fp +fp , Text " Error: ", Text -err +err ] - GenesisHashMismatch GenesisHashShelley -actual GenesisHashShelley -expected -> + GenesisHashMismatch GenesisHashShelley +actual GenesisHashShelley +expected -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat [ Text "Wrong Shelley genesis file: the actual hash is ", GenesisHashShelley -> Text -renderHash GenesisHashShelley -actual +renderHash GenesisHashShelley +actual , Text ", but the expected Shelley genesis hash given in the node " , Text "configuration file is ", GenesisHashShelley -> Text -renderHash GenesisHashShelley -expected, Text +renderHash GenesisHashShelley +expected, Text "." ] - GenesisDecodeError FilePath -fp Text -err -> + GenesisDecodeError FilePath +fp Text +err -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat [ Text "There was an error parsing the genesis file: ", FilePath -> Text Text.pack FilePath -fp +fp , Text " Error: ", Text -err +err ] where - renderHash :: GenesisHashShelley -> Text - renderHash :: GenesisHashShelley -> Text -renderHash (GenesisHashShelley Hash Blake2b_256 ByteString -h) = ByteString -> Text + renderHash :: GenesisHashShelley -> Text + renderHash :: GenesisHashShelley -> Text +renderHash (GenesisHashShelley Hash Blake2b_256 ByteString +h) = ByteString -> Text Text.decodeUtf8 (ByteString -> Text) -> ByteString -> Text forall a b. (a -> b) -> a -> b $ ByteString -> ByteString Base16.encode (Hash Blake2b_256 ByteString -> ByteString forall h a. Hash h a -> ByteString Cardano.Crypto.Hash.Class.hashToBytes Hash Blake2b_256 ByteString -h) +h) newtype StakeCred = StakeCred { StakeCred -> Credential 'Staking StandardCrypto _unStakeCred :: Shelley.Spec.Credential 'Shelley.Spec.Staking Consensus.StandardCrypto } - deriving (StakeCred -> StakeCred -> Bool + deriving (StakeCred -> StakeCred -> Bool (StakeCred -> StakeCred -> Bool) -> (StakeCred -> StakeCred -> Bool) -> Eq StakeCred forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -2888,7 +2888,7 @@ $c/= :: StakeCred -> StakeCred -> Bool == :: StakeCred -> StakeCred -> Bool $c== :: StakeCred -> StakeCred -> Bool -Eq, Eq StakeCred +Eq, Eq StakeCred Eq StakeCred -> (StakeCred -> StakeCred -> Ordering) -> (StakeCred -> StakeCred -> Bool) @@ -2938,12 +2938,12 @@ envSecurityParam :: Env -> Word64 envSecurityParam :: Env -> Word64 -envSecurityParam Env -env = Word64 -k +envSecurityParam Env +env = Word64 +k where - Consensus.SecurityParam Word64 -k + Consensus.SecurityParam Word64 +k = ConsensusConfig (HardForkProtocol (CardanoEras StandardCrypto)) -> SecurityParam forall (xs :: [*]). @@ -2957,7 +2957,7 @@ $ Env -> ConsensusConfig (HardForkProtocol (CardanoEras StandardCrypto)) envProtocolConfig Env -env +env -- The function 'tickThenReapply' does zero validation, so add minimal -- validation ('blockPrevHash' matches the tip hash of the 'LedgerState'). This @@ -2975,47 +2975,47 @@ -> Bool -> HardForkBlock (CardanoEras StandardCrypto) -> Either Text LedgerState -applyBlock' Env -env LedgerState -oldState Bool -enableValidation HardForkBlock (CardanoEras StandardCrypto) -block = do - let config :: HardForkLedgerConfig (CardanoEras StandardCrypto) -config = Env -> HardForkLedgerConfig (CardanoEras StandardCrypto) +applyBlock' Env +env LedgerState +oldState Bool +enableValidation HardForkBlock (CardanoEras StandardCrypto) +block = do + let config :: HardForkLedgerConfig (CardanoEras StandardCrypto) +config = Env -> HardForkLedgerConfig (CardanoEras StandardCrypto) envLedgerConfig Env -env - stateOld :: LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -stateOld = LedgerState +env + stateOld :: LedgerState (HardForkBlock (CardanoEras StandardCrypto)) +stateOld = LedgerState -> LedgerState (HardForkBlock (CardanoEras StandardCrypto)) clsState LedgerState -oldState - LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -stateNew <- if Bool -enableValidation +oldState + LedgerState (HardForkBlock (CardanoEras StandardCrypto)) +stateNew <- if Bool +enableValidation then HardForkLedgerConfig (CardanoEras StandardCrypto) -> HardForkBlock (CardanoEras StandardCrypto) -> LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -> Either Text (LedgerState (HardForkBlock (CardanoEras StandardCrypto))) tickThenApply HardForkLedgerConfig (CardanoEras StandardCrypto) -config HardForkBlock (CardanoEras StandardCrypto) -block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -stateOld +config HardForkBlock (CardanoEras StandardCrypto) +block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) +stateOld else HardForkLedgerConfig (CardanoEras StandardCrypto) -> HardForkBlock (CardanoEras StandardCrypto) -> LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -> Either Text (LedgerState (HardForkBlock (CardanoEras StandardCrypto))) tickThenReapplyCheckHash HardForkLedgerConfig (CardanoEras StandardCrypto) -config HardForkBlock (CardanoEras StandardCrypto) -block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -stateOld +config HardForkBlock (CardanoEras StandardCrypto) +block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) +stateOld LedgerState -> Either Text LedgerState forall (m :: * -> *) a. Monad m => a -> m a return LedgerState -oldState { clsState :: LedgerState (HardForkBlock (CardanoEras StandardCrypto)) +oldState { clsState :: LedgerState (HardForkBlock (CardanoEras StandardCrypto)) clsState = LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -stateNew } +stateNew } -- Like 'Consensus.tickThenReapply' but also checks that the previous hash from -- the block matches the head hash of the ledger state. @@ -3034,22 +3034,22 @@ -> LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -> Either Text (LedgerState (HardForkBlock (CardanoEras StandardCrypto))) -tickThenReapplyCheckHash HardForkLedgerConfig (CardanoEras StandardCrypto) -cfg HardForkBlock (CardanoEras StandardCrypto) -block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -lsb = +tickThenReapplyCheckHash HardForkLedgerConfig (CardanoEras StandardCrypto) +cfg HardForkBlock (CardanoEras StandardCrypto) +block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) +lsb = if HardForkBlock (CardanoEras StandardCrypto) -> ChainHash (HardForkBlock (CardanoEras StandardCrypto)) forall blk. GetPrevHash blk => blk -> ChainHash blk Consensus.blockPrevHash HardForkBlock (CardanoEras StandardCrypto) -block ChainHash (HardForkBlock (CardanoEras StandardCrypto)) +block ChainHash (HardForkBlock (CardanoEras StandardCrypto)) -> ChainHash (HardForkBlock (CardanoEras StandardCrypto)) -> Bool forall a. Eq a => a -> a -> Bool == LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -> ChainHash (HardForkBlock (CardanoEras StandardCrypto)) forall blk. UpdateLedger blk => LedgerState blk -> ChainHash blk Ledger.ledgerTipHash LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -lsb +lsb then LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -> Either Text (LedgerState (HardForkBlock (CardanoEras StandardCrypto))) @@ -3068,9 +3068,9 @@ forall l blk. ApplyBlock l blk => LedgerCfg l -> blk -> l -> l Ledger.tickThenReapply HardForkLedgerConfig (CardanoEras StandardCrypto) LedgerConfig (HardForkBlock (CardanoEras StandardCrypto)) -cfg HardForkBlock (CardanoEras StandardCrypto) -block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -lsb +cfg HardForkBlock (CardanoEras StandardCrypto) +block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) +lsb else Text -> Either Text (LedgerState (HardForkBlock (CardanoEras StandardCrypto))) @@ -3108,7 +3108,7 @@ UpdateLedger blk => LedgerState blk -> WithOrigin SlotNo Ledger.ledgerTipSlot LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -lsb) +lsb) , Text " hash " , ByteString -> Text @@ -3129,7 +3129,7 @@ -> ChainHash (HardForkBlock (CardanoEras StandardCrypto)) forall blk. UpdateLedger blk => LedgerState blk -> ChainHash blk Ledger.ledgerTipHash LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -lsb +lsb , Text " but block previous hash is " , ByteString -> Text @@ -3146,7 +3146,7 @@ -> ChainHash (HardForkBlock (CardanoEras StandardCrypto)) forall blk. GetPrevHash blk => blk -> ChainHash blk Consensus.blockPrevHash HardForkBlock (CardanoEras StandardCrypto) -block) +block) , Text " and block current hash is " , ByteString -> Text @@ -3168,7 +3168,7 @@ -> HeaderHash (HardForkBlock (CardanoEras StandardCrypto)) forall b. HasHeader b => b -> HeaderHash b Ouroboros.Network.Block.blockHash HardForkBlock (CardanoEras StandardCrypto) -block +block , Text "." ] @@ -3190,10 +3190,10 @@ -> LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -> Either Text (LedgerState (HardForkBlock (CardanoEras StandardCrypto))) -tickThenApply HardForkLedgerConfig (CardanoEras StandardCrypto) -cfg HardForkBlock (CardanoEras StandardCrypto) -block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -lsb +tickThenApply HardForkLedgerConfig (CardanoEras StandardCrypto) +cfg HardForkBlock (CardanoEras StandardCrypto) +block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) +lsb = (HardForkLedgerError (CardanoEras StandardCrypto) -> Either Text (LedgerState (HardForkBlock (CardanoEras StandardCrypto)))) @@ -3275,11 +3275,11 @@ LedgerCfg l -> blk -> l -> Except (LedgerErr l) l Ledger.tickThenApply HardForkLedgerConfig (CardanoEras StandardCrypto) LedgerConfig (HardForkBlock (CardanoEras StandardCrypto)) -cfg HardForkBlock (CardanoEras StandardCrypto) -block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) -lsb +cfg HardForkBlock (CardanoEras StandardCrypto) +block LedgerState (HardForkBlock (CardanoEras StandardCrypto)) +lsb -renderByteArray :: ByteArrayAccess bin => bin -> Text +renderByteArray :: ByteArrayAccess bin => bin -> Text renderByteArray :: bin -> Text renderByteArray = ByteString -> Text @@ -3295,17 +3295,17 @@ bin -> bout Data.ByteArray.convert -unChainHash :: Ouroboros.Network.Block.ChainHash (Consensus.CardanoBlock era) -> ByteString +unChainHash :: Ouroboros.Network.Block.ChainHash (Consensus.CardanoBlock era) -> ByteString unChainHash :: ChainHash (CardanoBlock era) -> ByteString -unChainHash ChainHash (CardanoBlock era) -ch = +unChainHash ChainHash (CardanoBlock era) +ch = case ChainHash (CardanoBlock era) -ch of +ch of ChainHash (CardanoBlock era) Ouroboros.Network.Block.GenesisHash -> ByteString "genesis" - Ouroboros.Network.Block.BlockHash HeaderHash (CardanoBlock era) -bh -> ShortByteString -> ByteString + Ouroboros.Network.Block.BlockHash HeaderHash (CardanoBlock era) +bh -> ShortByteString -> ByteString BSS.fromShort (OneEraHash '[ByronBlock, ShelleyBlock (ShelleyEra era), ShelleyBlock (AllegraEra era), ShelleyBlock (MaryEra era), @@ -3317,6 +3317,6 @@ '[ByronBlock, ShelleyBlock (ShelleyEra era), ShelleyBlock (AllegraEra era), ShelleyBlock (MaryEra era), ShelleyBlock (AlonzoEra era)] -bh) +bh) \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Modes.html b/cardano-api/src/Cardano.Api.Modes.html index 474561c9903..ae65bc1f3a3 100644 --- a/cardano-api/src/Cardano.Api.Modes.html +++ b/cardano-api/src/Cardano.Api.Modes.html @@ -92,26 +92,26 @@ data CardanoMode data AnyConsensusModeParams where - AnyConsensusModeParams :: ConsensusModeParams mode -> AnyConsensusModeParams + AnyConsensusModeParams :: ConsensusModeParams mode -> AnyConsensusModeParams -deriving instance Show AnyConsensusModeParams +deriving instance Show AnyConsensusModeParams -- | This GADT provides a value-level representation of all the consensus modes. -- This enables pattern matching on the era to allow them to be treated in a -- non-uniform way. -- -data ConsensusMode mode where +data ConsensusMode mode where ByronMode :: ConsensusMode ByronMode ShelleyMode :: ConsensusMode ShelleyMode CardanoMode :: ConsensusMode CardanoMode -deriving instance Show (ConsensusMode mode) +deriving instance Show (ConsensusMode mode) data AnyConsensusMode where - AnyConsensusMode :: ConsensusMode mode -> AnyConsensusMode + AnyConsensusMode :: ConsensusMode mode -> AnyConsensusMode -deriving instance Show AnyConsensusMode +deriving instance Show AnyConsensusMode renderMode :: AnyConsensusMode -> Text renderMode :: AnyConsensusMode -> Text @@ -129,12 +129,12 @@ -- are not supported in single-era modes (for exact compatibility with not -- using the hard fork combinatior at all). -- -data ConsensusModeIsMultiEra mode where +data ConsensusModeIsMultiEra mode where CardanoModeIsMultiEra :: ConsensusModeIsMultiEra CardanoMode -deriving instance Show (ConsensusModeIsMultiEra mode) +deriving instance Show (ConsensusModeIsMultiEra mode) -toEraInMode :: CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) +toEraInMode :: CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode :: CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era ByronEra ConsensusMode mode @@ -195,7 +195,7 @@ -- | A representation of which 'CardanoEra's are included in each -- 'ConsensusMode'. -- -data EraInMode era mode where +data EraInMode era mode where ByronEraInByronMode :: EraInMode ByronEra ByronMode ShelleyEraInShelleyMode :: EraInMode ShelleyEra ShelleyMode @@ -206,10 +206,10 @@ MaryEraInCardanoMode :: EraInMode MaryEra CardanoMode AlonzoEraInCardanoMode :: EraInMode AlonzoEra CardanoMode -deriving instance Show (EraInMode era mode) +deriving instance Show (EraInMode era mode) -eraInModeToEra :: EraInMode era mode -> CardanoEra era +eraInModeToEra :: EraInMode era mode -> CardanoEra era eraInModeToEra :: EraInMode era mode -> CardanoEra era eraInModeToEra EraInMode era mode ByronEraInByronMode = CardanoEra era @@ -241,18 +241,18 @@ AlonzoEra -data AnyEraInMode mode where - AnyEraInMode :: EraInMode era mode -> AnyEraInMode mode +data AnyEraInMode mode where + AnyEraInMode :: EraInMode era mode -> AnyEraInMode mode -deriving instance Show (AnyEraInMode mode) +deriving instance Show (AnyEraInMode mode) -anyEraInModeToAnyEra :: AnyEraInMode mode -> AnyCardanoEra +anyEraInModeToAnyEra :: AnyEraInMode mode -> AnyCardanoEra anyEraInModeToAnyEra :: AnyEraInMode mode -> AnyCardanoEra -anyEraInModeToAnyEra (AnyEraInMode EraInMode era mode -erainmode) = +anyEraInModeToAnyEra (AnyEraInMode EraInMode era mode +erainmode) = case EraInMode era mode -erainmode of +erainmode of EraInMode era mode ByronEraInByronMode -> CardanoEra ByronEra -> AnyCardanoEra forall era. IsCardanoEra era => CardanoEra era -> AnyCardanoEra @@ -302,7 +302,7 @@ -- It is possible in future that we may be able to eliminate this parameter by -- discovering it from the node during the initial handshake. -- -data ConsensusModeParams mode where +data ConsensusModeParams mode where ByronModeParams :: Byron.EpochSlots @@ -315,7 +315,7 @@ :: Byron.EpochSlots -> ConsensusModeParams CardanoMode -deriving instance Show (ConsensusModeParams mode) +deriving instance Show (ConsensusModeParams mode) -- ---------------------------------------------------------------------------- -- Consensus conversion functions @@ -324,12 +324,12 @@ -- | A closed type family that maps between the consensus mode (from this API) -- and the block type used by the consensus libraries. -- -type family ConsensusBlockForMode mode where +type family ConsensusBlockForMode mode where ConsensusBlockForMode ByronMode = Consensus.ByronBlockHFC ConsensusBlockForMode ShelleyMode = Consensus.ShelleyBlockHFC StandardShelley ConsensusBlockForMode CardanoMode = Consensus.CardanoBlock StandardCrypto -type family ConsensusBlockForEra era where +type family ConsensusBlockForEra era where ConsensusBlockForEra ByronEra = Consensus.ByronBlock ConsensusBlockForEra ShelleyEra = Consensus.ShelleyBlock StandardShelley ConsensusBlockForEra AllegraEra = Consensus.ShelleyBlock StandardAllegra @@ -338,13 +338,13 @@ -eraIndex0 :: Consensus.EraIndex (x0 : xs) +eraIndex0 :: Consensus.EraIndex (x0 : xs) eraIndex0 :: EraIndex (x0 : xs) eraIndex0 = EraIndex (x0 : xs) forall x (xs :: [*]). EraIndex (x : xs) Consensus.eraIndexZero -eraIndex1 :: Consensus.EraIndex (x1 : x0 : xs) +eraIndex1 :: Consensus.EraIndex (x1 : x0 : xs) eraIndex1 :: EraIndex (x1 : x0 : xs) eraIndex1 = EraIndex (x0 : xs) -> EraIndex (x1 : x0 : xs) forall (xs :: [*]) x. EraIndex xs -> EraIndex (x : xs) @@ -352,7 +352,7 @@ forall x (xs :: [*]). EraIndex (x : xs) eraIndex0 -eraIndex2 :: Consensus.EraIndex (x2 : x1 : x0 : xs) +eraIndex2 :: Consensus.EraIndex (x2 : x1 : x0 : xs) eraIndex2 :: EraIndex (x2 : x1 : x0 : xs) eraIndex2 = EraIndex (x1 : x0 : xs) -> EraIndex (x2 : x1 : x0 : xs) forall (xs :: [*]) x. EraIndex xs -> EraIndex (x : xs) @@ -360,7 +360,7 @@ forall x1 x0 (xs :: [*]). EraIndex (x1 : x0 : xs) eraIndex1 -eraIndex3 :: Consensus.EraIndex (x3 : x2 : x1 : x0 : xs) +eraIndex3 :: Consensus.EraIndex (x3 : x2 : x1 : x0 : xs) eraIndex3 :: EraIndex (x3 : x2 : x1 : x0 : xs) eraIndex3 = EraIndex (x2 : x1 : x0 : xs) -> EraIndex (x3 : x2 : x1 : x0 : xs) forall (xs :: [*]) x. EraIndex xs -> EraIndex (x : xs) @@ -368,7 +368,7 @@ forall x2 x1 x0 (xs :: [*]). EraIndex (x2 : x1 : x0 : xs) eraIndex2 -eraIndex4 :: Consensus.EraIndex (x4 : x3 : x2 : x1 : x0 : xs) +eraIndex4 :: Consensus.EraIndex (x4 : x3 : x2 : x1 : x0 : xs) eraIndex4 :: EraIndex (x4 : x3 : x2 : x1 : x0 : xs) eraIndex4 = EraIndex (x3 : x2 : x1 : x0 : xs) -> EraIndex (x4 : x3 : x2 : x1 : x0 : xs) @@ -377,9 +377,9 @@ forall x3 x2 x1 x0 (xs :: [*]). EraIndex (x3 : x2 : x1 : x0 : xs) eraIndex3 -toConsensusEraIndex :: ConsensusBlockForMode mode ~ Consensus.HardForkBlock xs - => EraInMode era mode - -> Consensus.EraIndex xs +toConsensusEraIndex :: ConsensusBlockForMode mode ~ Consensus.HardForkBlock xs + => EraInMode era mode + -> Consensus.EraIndex xs toConsensusEraIndex :: EraInMode era mode -> EraIndex xs toConsensusEraIndex EraInMode era mode ByronEraInByronMode = EraIndex xs @@ -413,21 +413,21 @@ eraIndex4 -fromConsensusEraIndex :: ConsensusBlockForMode mode ~ Consensus.HardForkBlock xs - => ConsensusMode mode - -> Consensus.EraIndex xs - -> AnyEraInMode mode +fromConsensusEraIndex :: ConsensusBlockForMode mode ~ Consensus.HardForkBlock xs + => ConsensusMode mode + -> Consensus.EraIndex xs + -> AnyEraInMode mode fromConsensusEraIndex :: ConsensusMode mode -> EraIndex xs -> AnyEraInMode mode fromConsensusEraIndex ConsensusMode mode ByronMode = EraIndex xs -> AnyEraInMode mode EraIndex '[ByronBlock] -> AnyEraInMode ByronMode -fromByronEraIndex +fromByronEraIndex where - fromByronEraIndex :: Consensus.EraIndex + fromByronEraIndex :: Consensus.EraIndex '[Consensus.ByronBlock] -> AnyEraInMode ByronMode - fromByronEraIndex :: EraIndex '[ByronBlock] -> AnyEraInMode ByronMode -fromByronEraIndex (Consensus.EraIndex (Z (K ()))) = + fromByronEraIndex :: EraIndex '[ByronBlock] -> AnyEraInMode ByronMode +fromByronEraIndex (Consensus.EraIndex (Z (K ()))) = EraInMode ByronEra ByronMode -> AnyEraInMode ByronMode forall era mode. EraInMode era mode -> AnyEraInMode mode AnyEraInMode EraInMode ByronEra ByronMode @@ -437,14 +437,14 @@ ShelleyMode = EraIndex xs -> AnyEraInMode mode EraIndex '[ShelleyBlock StandardShelley] -> AnyEraInMode ShelleyMode -fromShelleyEraIndex +fromShelleyEraIndex where - fromShelleyEraIndex :: Consensus.EraIndex + fromShelleyEraIndex :: Consensus.EraIndex '[Consensus.ShelleyBlock StandardShelley] -> AnyEraInMode ShelleyMode - fromShelleyEraIndex :: EraIndex '[ShelleyBlock StandardShelley] + fromShelleyEraIndex :: EraIndex '[ShelleyBlock StandardShelley] -> AnyEraInMode ShelleyMode -fromShelleyEraIndex (Consensus.EraIndex (Z (K ()))) = +fromShelleyEraIndex (Consensus.EraIndex (Z (K ()))) = EraInMode ShelleyEra ShelleyMode -> AnyEraInMode ShelleyMode forall era mode. EraInMode era mode -> AnyEraInMode mode AnyEraInMode EraInMode ShelleyEra ShelleyMode @@ -454,37 +454,37 @@ fromConsensusEraIndex ConsensusMode mode CardanoMode = EraIndex xs -> AnyEraInMode mode EraIndex (CardanoEras StandardCrypto) -> AnyEraInMode CardanoMode -fromShelleyEraIndex +fromShelleyEraIndex where - fromShelleyEraIndex :: Consensus.EraIndex + fromShelleyEraIndex :: Consensus.EraIndex (Consensus.CardanoEras StandardCrypto) -> AnyEraInMode CardanoMode - fromShelleyEraIndex :: EraIndex (CardanoEras StandardCrypto) -> AnyEraInMode CardanoMode -fromShelleyEraIndex (Consensus.EraIndex (Z (K ()))) = + fromShelleyEraIndex :: EraIndex (CardanoEras StandardCrypto) -> AnyEraInMode CardanoMode +fromShelleyEraIndex (Consensus.EraIndex (Z (K ()))) = EraInMode ByronEra CardanoMode -> AnyEraInMode CardanoMode forall era mode. EraInMode era mode -> AnyEraInMode mode AnyEraInMode EraInMode ByronEra CardanoMode ByronEraInCardanoMode - fromShelleyEraIndex (Consensus.EraIndex (S (Z (K ())))) = + fromShelleyEraIndex (Consensus.EraIndex (S (Z (K ())))) = EraInMode ShelleyEra CardanoMode -> AnyEraInMode CardanoMode forall era mode. EraInMode era mode -> AnyEraInMode mode AnyEraInMode EraInMode ShelleyEra CardanoMode ShelleyEraInCardanoMode - fromShelleyEraIndex (Consensus.EraIndex (S (S (Z (K ()))))) = + fromShelleyEraIndex (Consensus.EraIndex (S (S (Z (K ()))))) = EraInMode AllegraEra CardanoMode -> AnyEraInMode CardanoMode forall era mode. EraInMode era mode -> AnyEraInMode mode AnyEraInMode EraInMode AllegraEra CardanoMode AllegraEraInCardanoMode - fromShelleyEraIndex (Consensus.EraIndex (S (S (S (Z (K ())))))) = + fromShelleyEraIndex (Consensus.EraIndex (S (S (S (Z (K ())))))) = EraInMode MaryEra CardanoMode -> AnyEraInMode CardanoMode forall era mode. EraInMode era mode -> AnyEraInMode mode AnyEraInMode EraInMode MaryEra CardanoMode MaryEraInCardanoMode - fromShelleyEraIndex (Consensus.EraIndex (S (S (S (S (Z (K ()))))))) = + fromShelleyEraIndex (Consensus.EraIndex (S (S (S (S (Z (K ()))))))) = EraInMode AlonzoEra CardanoMode -> AnyEraInMode CardanoMode forall era mode. EraInMode era mode -> AnyEraInMode mode AnyEraInMode EraInMode AlonzoEra CardanoMode diff --git a/cardano-api/src/Cardano.Api.NetworkId.html b/cardano-api/src/Cardano.Api.NetworkId.html index da08cc83191..1162c7886ce 100644 --- a/cardano-api/src/Cardano.Api.NetworkId.html +++ b/cardano-api/src/Cardano.Api.NetworkId.html @@ -32,7 +32,7 @@ data NetworkId = Mainnet | Testnet !NetworkMagic - deriving (NetworkId -> NetworkId -> Bool + deriving (NetworkId -> NetworkId -> Bool (NetworkId -> NetworkId -> Bool) -> (NetworkId -> NetworkId -> Bool) -> Eq NetworkId forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -40,7 +40,7 @@ $c/= :: NetworkId -> NetworkId -> Bool == :: NetworkId -> NetworkId -> Bool $c== :: NetworkId -> NetworkId -> Bool -Eq, Int -> NetworkId -> ShowS +Eq, Int -> NetworkId -> ShowS [NetworkId] -> ShowS NetworkId -> String (Int -> NetworkId -> ShowS) @@ -59,9 +59,9 @@ toNetworkMagic :: NetworkId -> NetworkMagic toNetworkMagic :: NetworkId -> NetworkMagic -toNetworkMagic (Testnet NetworkMagic -nm) = NetworkMagic -nm +toNetworkMagic (Testnet NetworkMagic +nm) = NetworkMagic +nm toNetworkMagic NetworkId Mainnet = NetworkMagic mainnetNetworkMagic @@ -91,20 +91,20 @@ toByronProtocolMagicId NetworkId Mainnet = ProtocolMagicId Byron.mainnetProtocolMagicId -toByronProtocolMagicId (Testnet (NetworkMagic Word32 -pm)) = Word32 -> ProtocolMagicId +toByronProtocolMagicId (Testnet (NetworkMagic Word32 +pm)) = Word32 -> ProtocolMagicId Byron.ProtocolMagicId Word32 -pm +pm toByronNetworkMagic :: NetworkId -> Byron.NetworkMagic toByronNetworkMagic :: NetworkId -> NetworkMagic toByronNetworkMagic NetworkId Mainnet = NetworkMagic Byron.NetworkMainOrStage -toByronNetworkMagic (Testnet (NetworkMagic Word32 -nm)) = Word32 -> NetworkMagic +toByronNetworkMagic (Testnet (NetworkMagic Word32 +nm)) = Word32 -> NetworkMagic Byron.NetworkTestnet Word32 -nm +nm toByronRequiresNetworkMagic :: NetworkId -> Byron.RequiresNetworkMagic toByronRequiresNetworkMagic :: NetworkId -> RequiresNetworkMagic @@ -131,15 +131,15 @@ fromShelleyNetwork :: Shelley.Network -> NetworkMagic -> NetworkId fromShelleyNetwork :: Network -> NetworkMagic -> NetworkId fromShelleyNetwork Network -Shelley.Testnet NetworkMagic -nm = NetworkMagic -> NetworkId +Shelley.Testnet NetworkMagic +nm = NetworkMagic -> NetworkId Testnet NetworkMagic -nm +nm fromShelleyNetwork Network -Shelley.Mainnet NetworkMagic -nm +Shelley.Mainnet NetworkMagic +nm | NetworkMagic -nm NetworkMagic -> NetworkMagic -> Bool +nm NetworkMagic -> NetworkMagic -> Bool forall a. Eq a => a -> a -> Bool == NetworkMagic mainnetNetworkMagic = NetworkId diff --git a/cardano-api/src/Cardano.Api.OperationalCertificate.html b/cardano-api/src/Cardano.Api.OperationalCertificate.html index 0d6d9b5d07f..2fbf2eba7ed 100644 --- a/cardano-api/src/Cardano.Api.OperationalCertificate.html +++ b/cardano-api/src/Cardano.Api.OperationalCertificate.html @@ -46,7 +46,7 @@ OperationalCertificate !(Shelley.OCert StandardCrypto) !(VerificationKey StakePoolKey) - deriving (OperationalCertificate -> OperationalCertificate -> Bool + deriving (OperationalCertificate -> OperationalCertificate -> Bool (OperationalCertificate -> OperationalCertificate -> Bool) -> (OperationalCertificate -> OperationalCertificate -> Bool) -> Eq OperationalCertificate @@ -55,7 +55,7 @@ $c/= :: OperationalCertificate -> OperationalCertificate -> Bool == :: OperationalCertificate -> OperationalCertificate -> Bool $c== :: OperationalCertificate -> OperationalCertificate -> Bool -Eq, Int -> OperationalCertificate -> ShowS +Eq, Int -> OperationalCertificate -> ShowS [OperationalCertificate] -> ShowS OperationalCertificate -> String (Int -> OperationalCertificate -> ShowS) @@ -71,7 +71,7 @@ showsPrec :: Int -> OperationalCertificate -> ShowS $cshowsPrec :: Int -> OperationalCertificate -> ShowS Show) - deriving anyclass HasTypeProxy OperationalCertificate + deriving anyclass HasTypeProxy OperationalCertificate HasTypeProxy OperationalCertificate -> (OperationalCertificate -> ByteString) -> (AsType OperationalCertificate @@ -98,7 +98,7 @@ OperationalCertificateIssueCounter !Word64 !(VerificationKey StakePoolKey) -- For consistency checking - deriving (OperationalCertificateIssueCounter + deriving (OperationalCertificateIssueCounter -> OperationalCertificateIssueCounter -> Bool (OperationalCertificateIssueCounter -> OperationalCertificateIssueCounter -> Bool) @@ -114,7 +114,7 @@ -> OperationalCertificateIssueCounter -> Bool $c== :: OperationalCertificateIssueCounter -> OperationalCertificateIssueCounter -> Bool -Eq, Int -> OperationalCertificateIssueCounter -> ShowS +Eq, Int -> OperationalCertificateIssueCounter -> ShowS [OperationalCertificateIssueCounter] -> ShowS OperationalCertificateIssueCounter -> String (Int -> OperationalCertificateIssueCounter -> ShowS) @@ -130,7 +130,7 @@ showsPrec :: Int -> OperationalCertificateIssueCounter -> ShowS $cshowsPrec :: Int -> OperationalCertificateIssueCounter -> ShowS Show) - deriving anyclass HasTypeProxy OperationalCertificateIssueCounter + deriving anyclass HasTypeProxy OperationalCertificateIssueCounter HasTypeProxy OperationalCertificateIssueCounter -> (OperationalCertificateIssueCounter -> ByteString) -> (AsType OperationalCertificateIssueCounter @@ -155,28 +155,28 @@ serialiseToCBOR :: OperationalCertificateIssueCounter -> ByteString $cserialiseToCBOR :: OperationalCertificateIssueCounter -> ByteString $cp1SerialiseAsCBOR :: HasTypeProxy OperationalCertificateIssueCounter -SerialiseAsCBOR +SerialiseAsCBOR -instance ToCBOR OperationalCertificate where - toCBOR :: OperationalCertificate -> Encoding -toCBOR (OperationalCertificate OCert StandardCrypto -ocert VerificationKey StakePoolKey -vkey) = +instance ToCBOR OperationalCertificate where + toCBOR :: OperationalCertificate -> Encoding +toCBOR (OperationalCertificate OCert StandardCrypto +ocert VerificationKey StakePoolKey +vkey) = (CBORGroup (OCert StandardCrypto), VerificationKey StakePoolKey) -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (OCert StandardCrypto -> CBORGroup (OCert StandardCrypto) forall a. a -> CBORGroup a CBOR.CBORGroup OCert StandardCrypto -ocert, VerificationKey StakePoolKey -vkey) +ocert, VerificationKey StakePoolKey +vkey) -instance FromCBOR OperationalCertificate where - fromCBOR :: Decoder s OperationalCertificate +instance FromCBOR OperationalCertificate where + fromCBOR :: Decoder s OperationalCertificate fromCBOR = do - (CBOR.CBORGroup OCert StandardCrypto -ocert, VerificationKey StakePoolKey -vkey) <- Decoder + (CBOR.CBORGroup OCert StandardCrypto +ocert, VerificationKey StakePoolKey +vkey) <- Decoder s (CBORGroup (OCert StandardCrypto), VerificationKey StakePoolKey) forall a s. FromCBOR a => Decoder s a fromCBOR @@ -185,26 +185,26 @@ return (OCert StandardCrypto -> VerificationKey StakePoolKey -> OperationalCertificate OperationalCertificate OCert StandardCrypto -ocert VerificationKey StakePoolKey -vkey) +ocert VerificationKey StakePoolKey +vkey) -instance ToCBOR OperationalCertificateIssueCounter where - toCBOR :: OperationalCertificateIssueCounter -> Encoding -toCBOR (OperationalCertificateIssueCounter Word64 -counter VerificationKey StakePoolKey -vkey) = +instance ToCBOR OperationalCertificateIssueCounter where + toCBOR :: OperationalCertificateIssueCounter -> Encoding +toCBOR (OperationalCertificateIssueCounter Word64 +counter VerificationKey StakePoolKey +vkey) = (Word64, VerificationKey StakePoolKey) -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR (Word64 -counter, VerificationKey StakePoolKey -vkey) +counter, VerificationKey StakePoolKey +vkey) -instance FromCBOR OperationalCertificateIssueCounter where - fromCBOR :: Decoder s OperationalCertificateIssueCounter -fromCBOR = do - (Word64 -counter, VerificationKey StakePoolKey -vkey) <- Decoder s (Word64, VerificationKey StakePoolKey) +instance FromCBOR OperationalCertificateIssueCounter where + fromCBOR :: Decoder s OperationalCertificateIssueCounter +fromCBOR = do + (Word64 +counter, VerificationKey StakePoolKey +vkey) <- Decoder s (Word64, VerificationKey StakePoolKey) forall a s. FromCBOR a => Decoder s a fromCBOR OperationalCertificateIssueCounter @@ -214,33 +214,33 @@ -> VerificationKey StakePoolKey -> OperationalCertificateIssueCounter OperationalCertificateIssueCounter Word64 -counter VerificationKey StakePoolKey -vkey) +counter VerificationKey StakePoolKey +vkey) instance HasTypeProxy OperationalCertificate where data AsType OperationalCertificate = AsOperationalCertificate - proxyToAsType :: Proxy OperationalCertificate -> AsType OperationalCertificate + proxyToAsType :: Proxy OperationalCertificate -> AsType OperationalCertificate proxyToAsType Proxy OperationalCertificate _ = AsType OperationalCertificate AsOperationalCertificate instance HasTypeProxy OperationalCertificateIssueCounter where data AsType OperationalCertificateIssueCounter = AsOperationalCertificateIssueCounter - proxyToAsType :: Proxy OperationalCertificateIssueCounter + proxyToAsType :: Proxy OperationalCertificateIssueCounter -> AsType OperationalCertificateIssueCounter -proxyToAsType Proxy OperationalCertificateIssueCounter +proxyToAsType Proxy OperationalCertificateIssueCounter _ = AsType OperationalCertificateIssueCounter AsOperationalCertificateIssueCounter -instance HasTextEnvelope OperationalCertificate where - textEnvelopeType :: AsType OperationalCertificate -> TextEnvelopeType +instance HasTextEnvelope OperationalCertificate where + textEnvelopeType :: AsType OperationalCertificate -> TextEnvelopeType textEnvelopeType AsType OperationalCertificate _ = TextEnvelopeType "NodeOperationalCertificate" -instance HasTextEnvelope OperationalCertificateIssueCounter where - textEnvelopeType :: AsType OperationalCertificateIssueCounter -> TextEnvelopeType -textEnvelopeType AsType OperationalCertificateIssueCounter +instance HasTextEnvelope OperationalCertificateIssueCounter where + textEnvelopeType :: AsType OperationalCertificateIssueCounter -> TextEnvelopeType +textEnvelopeType AsType OperationalCertificateIssueCounter _ = TextEnvelopeType "NodeOperationalCertificateIssueCounter" @@ -253,7 +253,7 @@ -- OperationalCertKeyMismatch (VerificationKey StakePoolKey) (VerificationKey StakePoolKey) - deriving Int -> OperationalCertIssueError -> ShowS + deriving Int -> OperationalCertIssueError -> ShowS [OperationalCertIssueError] -> ShowS OperationalCertIssueError -> String (Int -> OperationalCertIssueError -> ShowS) @@ -271,10 +271,10 @@ Show instance Error OperationalCertIssueError where - displayError :: OperationalCertIssueError -> String -displayError (OperationalCertKeyMismatch VerificationKey StakePoolKey -_counterKey VerificationKey StakePoolKey -_signingKey) = + displayError :: OperationalCertIssueError -> String +displayError (OperationalCertKeyMismatch VerificationKey StakePoolKey +_counterKey VerificationKey StakePoolKey +_signingKey) = String "Key mismatch: the signing key does not match the one that goes with the counter" --TODO: include key ids @@ -298,21 +298,21 @@ -> Either OperationalCertIssueError (OperationalCertificate, OperationalCertificateIssueCounter) -issueOperationalCertificate (KesVerificationKey kesVKey) - Either +issueOperationalCertificate (KesVerificationKey kesVKey) + Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) -skey - KESPeriod -kesPeriod - (OperationalCertificateIssueCounter Word64 -counter VerificationKey StakePoolKey -poolVKey) +skey + KESPeriod +kesPeriod + (OperationalCertificateIssueCounter Word64 +counter VerificationKey StakePoolKey +poolVKey) | VerificationKey StakePoolKey -poolVKey VerificationKey StakePoolKey +poolVKey VerificationKey StakePoolKey -> VerificationKey StakePoolKey -> Bool forall a. Eq a => a -> a -> Bool /= VerificationKey StakePoolKey -poolVKey' +poolVKey' = OperationalCertIssueError -> Either OperationalCertIssueError @@ -321,8 +321,8 @@ Left (VerificationKey StakePoolKey -> VerificationKey StakePoolKey -> OperationalCertIssueError OperationalCertKeyMismatch VerificationKey StakePoolKey -poolVKey VerificationKey StakePoolKey -poolVKey') +poolVKey VerificationKey StakePoolKey +poolVKey') | Bool otherwise @@ -334,20 +334,20 @@ Right (OCert StandardCrypto -> VerificationKey StakePoolKey -> OperationalCertificate OperationalCertificate OCert StandardCrypto -ocert VerificationKey StakePoolKey -poolVKey, +ocert VerificationKey StakePoolKey +poolVKey, Word64 -> VerificationKey StakePoolKey -> OperationalCertificateIssueCounter OperationalCertificateIssueCounter (Word64 -> Word64 forall a. Enum a => a -> a succ Word64 -counter) VerificationKey StakePoolKey -poolVKey) +counter) VerificationKey StakePoolKey +poolVKey) where - poolVKey' :: VerificationKey StakePoolKey - poolVKey' :: VerificationKey StakePoolKey -poolVKey' = (SigningKey StakePoolKey -> VerificationKey StakePoolKey) + poolVKey' :: VerificationKey StakePoolKey + poolVKey' :: VerificationKey StakePoolKey +poolVKey' = (SigningKey StakePoolKey -> VerificationKey StakePoolKey) -> (SigningKey GenesisDelegateExtendedKey -> VerificationKey StakePoolKey) -> Either @@ -360,7 +360,7 @@ SigningKey keyrole -> VerificationKey keyrole getVerificationKey (VerificationKey GenesisDelegateExtendedKey -> VerificationKey StakePoolKey -convert (VerificationKey GenesisDelegateExtendedKey +convert (VerificationKey GenesisDelegateExtendedKey -> VerificationKey StakePoolKey) -> (SigningKey GenesisDelegateExtendedKey -> VerificationKey GenesisDelegateExtendedKey) @@ -374,13 +374,13 @@ SigningKey keyrole -> VerificationKey keyrole getVerificationKey) Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) -skey +skey where - convert :: VerificationKey GenesisDelegateExtendedKey + convert :: VerificationKey GenesisDelegateExtendedKey -> VerificationKey StakePoolKey - convert :: VerificationKey GenesisDelegateExtendedKey + convert :: VerificationKey GenesisDelegateExtendedKey -> VerificationKey StakePoolKey -convert = (VerificationKey GenesisDelegateKey -> VerificationKey StakePoolKey +convert = (VerificationKey GenesisDelegateKey -> VerificationKey StakePoolKey forall keyroleA keyroleB. CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB @@ -401,9 +401,9 @@ castVerificationKey :: VerificationKey GenesisDelegateExtendedKey -> VerificationKey GenesisDelegateKey) - ocert :: Shelley.OCert StandardCrypto - ocert :: OCert StandardCrypto -ocert = VerKeyKES StandardCrypto + ocert :: Shelley.OCert StandardCrypto + ocert :: OCert StandardCrypto +ocert = VerKeyKES StandardCrypto -> Word64 -> KESPeriod -> SignedDSIGN StandardCrypto (OCertSignable StandardCrypto) @@ -415,16 +415,16 @@ -> SignedDSIGN crypto (OCertSignable crypto) -> OCert crypto Shelley.OCert VerKeyKES StandardCrypto -kesVKey Word64 -counter KESPeriod -kesPeriod SignedDSIGN StandardCrypto (OCertSignable StandardCrypto) -signature +kesVKey Word64 +counter KESPeriod +kesPeriod SignedDSIGN StandardCrypto (OCertSignable StandardCrypto) +signature - signature :: Shelley.SignedDSIGN + signature :: Shelley.SignedDSIGN StandardCrypto (Shelley.OCertSignable StandardCrypto) - signature :: SignedDSIGN StandardCrypto (OCertSignable StandardCrypto) -signature = OCertSignable StandardCrypto + signature :: SignedDSIGN StandardCrypto (OCertSignable StandardCrypto) +signature = OCertSignable StandardCrypto -> ShelleySigningKey -> SignedDSIGN StandardCrypto (OCertSignable StandardCrypto) forall tosign. @@ -436,24 +436,24 @@ forall crypto. VerKeyKES crypto -> Word64 -> KESPeriod -> OCertSignable crypto Shelley.OCertSignable VerKeyKES StandardCrypto -kesVKey Word64 -counter KESPeriod -kesPeriod) +kesVKey Word64 +counter KESPeriod +kesPeriod) ShelleySigningKey -skey' +skey' where - skey' :: ShelleySigningKey - skey' :: ShelleySigningKey -skey' = case Either + skey' :: ShelleySigningKey + skey' :: ShelleySigningKey +skey' = case Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) -skey of - Left (StakePoolSigningKey poolSKey) -> +skey of + Left (StakePoolSigningKey poolSKey) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto -poolSKey - Right (GenesisDelegateExtendedSigningKey delegSKey) -> +poolSKey + Right (GenesisDelegateExtendedSigningKey delegSKey) -> XPrv -> ShelleySigningKey ShelleyExtendedSigningKey XPrv -delegSKey +delegSKey \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Orphans.html b/cardano-api/src/Cardano.Api.Orphans.html index b972eb5b537..daa5d106418 100644 --- a/cardano-api/src/Cardano.Api.Orphans.html +++ b/cardano-api/src/Cardano.Api.Orphans.html @@ -59,11 +59,11 @@ -- Orphan instances involved in the JSON output of the API queries. -- We will remove/replace these as we provide more API wrapper types -instance ToJSON (Mary.Value era) where - toJSON :: Value era -> Value -toJSON (Mary.Value Integer -l Map (PolicyID era) (Map AssetName Integer) -ps) = +instance ToJSON (Mary.Value era) where + toJSON :: Value era -> Value +toJSON (Mary.Value Integer +l Map (PolicyID era) (Map AssetName Integer) +ps) = [Pair] -> Value object [ Text @@ -72,25 +72,25 @@ .= Integer -> Value forall a. ToJSON a => a -> Value toJSON Integer -l +l , Text "policies" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Map (PolicyID era) (Map AssetName Integer) -> Value forall a. ToJSON a => a -> Value toJSON Map (PolicyID era) (Map AssetName Integer) -ps +ps ] -instance ToJSONKey Mary.AssetName where - toJSONKey :: ToJSONKeyFunction AssetName +instance ToJSONKey Mary.AssetName where + toJSONKey :: ToJSONKeyFunction AssetName toJSONKey = (AssetName -> Text) -> ToJSONKeyFunction AssetName forall a. (a -> Text) -> ToJSONKeyFunction a toJSONKeyText AssetName -> Text -render +render where - render :: AssetName -> Text -render = ByteString -> Text + render :: AssetName -> Text +render = ByteString -> Text Text.decodeLatin1 (ByteString -> Text) -> (AssetName -> ByteString) -> AssetName -> Text forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -101,33 +101,33 @@ . AssetName -> ByteString Mary.assetName -instance ToJSON (Mary.PolicyID era) where - toJSON :: PolicyID era -> Value -toJSON (Mary.PolicyID (Shelley.ScriptHash Hash (ADDRHASH era) EraIndependentScript -h)) = Text -> Value +instance ToJSON (Mary.PolicyID era) where + toJSON :: PolicyID era -> Value +toJSON (Mary.PolicyID (Shelley.ScriptHash Hash (ADDRHASH era) EraIndependentScript +h)) = Text -> Value Aeson.String (Hash (ADDRHASH era) EraIndependentScript -> Text forall crypto a. Hash crypto a -> Text hashToText Hash (ADDRHASH era) EraIndependentScript -h) +h) -instance ToJSONKey (Mary.PolicyID era) where - toJSONKey :: ToJSONKeyFunction (PolicyID era) -toJSONKey = (PolicyID era -> Text) -> ToJSONKeyFunction (PolicyID era) +instance ToJSONKey (Mary.PolicyID era) where + toJSONKey :: ToJSONKeyFunction (PolicyID era) +toJSONKey = (PolicyID era -> Text) -> ToJSONKeyFunction (PolicyID era) forall a. (a -> Text) -> ToJSONKeyFunction a toJSONKeyText PolicyID era -> Text forall crypto. PolicyID crypto -> Text -render +render where - render :: PolicyID crypto -> Text -render (Mary.PolicyID (Shelley.ScriptHash Hash (ADDRHASH crypto) EraIndependentScript -h)) = Hash (ADDRHASH crypto) EraIndependentScript -> Text + render :: PolicyID crypto -> Text +render (Mary.PolicyID (Shelley.ScriptHash Hash (ADDRHASH crypto) EraIndependentScript +h)) = Hash (ADDRHASH crypto) EraIndependentScript -> Text forall crypto a. Hash crypto a -> Text hashToText Hash (ADDRHASH crypto) EraIndependentScript -h +h -instance ToJSON Mary.AssetName where - toJSON :: AssetName -> Value -toJSON = Text -> Value +instance ToJSON Mary.AssetName where + toJSON :: AssetName -> Value +toJSON = Text -> Value Aeson.String (Text -> Value) -> (AssetName -> Text) -> AssetName -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c . ByteString -> Text @@ -141,163 +141,163 @@ . AssetName -> ByteString Mary.assetName -instance ToJSON Shelley.AccountState where - toJSON :: AccountState -> Value -toJSON (Shelley.AccountState Coin -tr Coin -rs) = [Pair] -> Value +instance ToJSON Shelley.AccountState where + toJSON :: AccountState -> Value +toJSON (Shelley.AccountState Coin +tr Coin +rs) = [Pair] -> Value object [ Text "treasury" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -tr +tr , Text "reserves" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -rs +rs ] -instance ( Consensus.ShelleyBasedEra era - , ToJSON (Core.TxOut era) - , ToJSON (Core.PParams era) - , ToJSON (Core.PParamsDelta era) - ) => ToJSON (Shelley.EpochState era) where - toJSON :: EpochState era -> Value -toJSON EpochState era -eState = [Pair] -> Value +instance ( Consensus.ShelleyBasedEra era + , ToJSON (Core.TxOut era) + , ToJSON (Core.PParams era) + , ToJSON (Core.PParamsDelta era) + ) => ToJSON (Shelley.EpochState era) where + toJSON :: EpochState era -> Value +toJSON EpochState era +eState = [Pair] -> Value object [ Text "esAccountState" Text -> AccountState -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochState era -> AccountState forall era. EpochState era -> AccountState Shelley.esAccountState EpochState era -eState +eState , Text "esSnapshots" Text -> SnapShots (Crypto era) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochState era -> SnapShots (Crypto era) forall era. EpochState era -> SnapShots (Crypto era) Shelley.esSnapshots EpochState era -eState +eState , Text "esLState" Text -> LedgerState era -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochState era -> LedgerState era forall era. EpochState era -> LedgerState era Shelley.esLState EpochState era -eState +eState , Text "esPrevPp" Text -> PParams era -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochState era -> PParams era forall era. EpochState era -> PParams era Shelley.esPrevPp EpochState era -eState +eState , Text "esPp" Text -> PParams era -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochState era -> PParams era forall era. EpochState era -> PParams era Shelley.esPp EpochState era -eState +eState , Text "esNonMyopic" Text -> NonMyopic (Crypto era) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochState era -> NonMyopic (Crypto era) forall era. EpochState era -> NonMyopic (Crypto era) Shelley.esNonMyopic EpochState era -eState +eState ] -instance ( Consensus.ShelleyBasedEra era - , ToJSON (Core.TxOut era) - , ToJSON (Core.PParamsDelta era) - ) => ToJSON (Shelley.LedgerState era) where - toJSON :: LedgerState era -> Value -toJSON LedgerState era -lState = [Pair] -> Value +instance ( Consensus.ShelleyBasedEra era + , ToJSON (Core.TxOut era) + , ToJSON (Core.PParamsDelta era) + ) => ToJSON (Shelley.LedgerState era) where + toJSON :: LedgerState era -> Value +toJSON LedgerState era +lState = [Pair] -> Value object [ Text "utxoState" Text -> UTxOState era -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= LedgerState era -> UTxOState era forall era. LedgerState era -> UTxOState era Shelley._utxoState LedgerState era -lState +lState , Text "delegationState" Text -> DPState (Crypto era) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= LedgerState era -> DPState (Crypto era) forall era. LedgerState era -> DPState (Crypto era) Shelley._delegationState LedgerState era -lState +lState ] -instance ( Consensus.ShelleyBasedEra era - , ToJSON (Core.TxOut era) - , ToJSON (Core.PParamsDelta era) - ) => ToJSON (Shelley.UTxOState era) where - toJSON :: UTxOState era -> Value -toJSON UTxOState era -utxoState = [Pair] -> Value +instance ( Consensus.ShelleyBasedEra era + , ToJSON (Core.TxOut era) + , ToJSON (Core.PParamsDelta era) + ) => ToJSON (Shelley.UTxOState era) where + toJSON :: UTxOState era -> Value +toJSON UTxOState era +utxoState = [Pair] -> Value object [ Text "utxo" Text -> UTxO era -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= UTxOState era -> UTxO era forall era. UTxOState era -> UTxO era Shelley._utxo UTxOState era -utxoState +utxoState , Text "deposited" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= UTxOState era -> Coin forall era. UTxOState era -> Coin Shelley._deposited UTxOState era -utxoState +utxoState , Text "fees" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= UTxOState era -> Coin forall era. UTxOState era -> Coin Shelley._fees UTxOState era -utxoState +utxoState , Text "ppups" Text -> PPUPState era -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= UTxOState era -> State (EraRule "PPUP" era) forall era. UTxOState era -> State (EraRule "PPUP" era) Shelley._ppups UTxOState era -utxoState +utxoState ] -instance ( ToJSON (Core.PParamsDelta era) - , Shelley.UsesPParams era - ) => ToJSON (Shelley.PPUPState era) where - toJSON :: PPUPState era -> Value -toJSON PPUPState era -ppUpState = [Pair] -> Value +instance ( ToJSON (Core.PParamsDelta era) + , Shelley.UsesPParams era + ) => ToJSON (Shelley.PPUPState era) where + toJSON :: PPUPState era -> Value +toJSON PPUPState era +ppUpState = [Pair] -> Value object [ Text "proposals" Text -> ProposedPPUpdates era -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PPUPState era -> ProposedPPUpdates era forall era. PPUPState era -> ProposedPPUpdates era Shelley.proposals PPUPState era -ppUpState +ppUpState , Text "futureProposals" Text -> ProposedPPUpdates era -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PPUPState era -> ProposedPPUpdates era forall era. PPUPState era -> ProposedPPUpdates era Shelley.futureProposals PPUPState era -ppUpState +ppUpState ] -instance ( ToJSON (Core.PParamsDelta era) - , Shelley.UsesPParams era - ) => ToJSON (Shelley.ProposedPPUpdates era) where - toJSON :: ProposedPPUpdates era -> Value -toJSON (Shelley.ProposedPPUpdates Map (KeyHash 'Genesis (Crypto era)) (PParamsDelta era) -ppUpdates) = [(KeyHash 'Genesis (Crypto era), PParamsDelta era)] -> Value +instance ( ToJSON (Core.PParamsDelta era) + , Shelley.UsesPParams era + ) => ToJSON (Shelley.ProposedPPUpdates era) where + toJSON :: ProposedPPUpdates era -> Value +toJSON (Shelley.ProposedPPUpdates Map (KeyHash 'Genesis (Crypto era)) (PParamsDelta era) +ppUpdates) = [(KeyHash 'Genesis (Crypto era), PParamsDelta era)] -> Value forall a. ToJSON a => a -> Value toJSON ([(KeyHash 'Genesis (Crypto era), PParamsDelta era)] -> Value) -> [(KeyHash 'Genesis (Crypto era), PParamsDelta era)] -> Value @@ -306,12 +306,12 @@ -> [(KeyHash 'Genesis (Crypto era), PParamsDelta era)] forall k a. Map k a -> [(k, a)] Map.toList Map (KeyHash 'Genesis (Crypto era)) (PParamsDelta era) -ppUpdates +ppUpdates -instance ToJSON (PParamsUpdate era) where - toJSON :: PParamsUpdate era -> Value -toJSON PParamsUpdate era -pp = +instance ToJSON (PParamsUpdate era) where + toJSON :: PParamsUpdate era -> Value +toJSON PParamsUpdate era +pp = [Pair] -> Value Aeson.object ([Pair] -> Value) -> [Pair] -> Value forall a b. (a -> b) -> a -> b @@ -320,117 +320,117 @@ "minFeeA" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -x | Natural -x <- StrictMaybe Natural -> [Natural] +x | Natural +x <- StrictMaybe Natural -> [Natural] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Natural +mbfield (PParamsUpdate era -> HKD StrictMaybe Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Shelley._minfeeA PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "minFeeB" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -x | Natural -x <- StrictMaybe Natural -> [Natural] +x | Natural +x <- StrictMaybe Natural -> [Natural] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Natural +mbfield (PParamsUpdate era -> HKD StrictMaybe Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Shelley._minfeeB PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "maxBlockBodySize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -x | Natural -x <- StrictMaybe Natural -> [Natural] +x | Natural +x <- StrictMaybe Natural -> [Natural] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Natural +mbfield (PParamsUpdate era -> HKD StrictMaybe Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Shelley._maxBBSize PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "maxTxSize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -x | Natural -x <- StrictMaybe Natural -> [Natural] +x | Natural +x <- StrictMaybe Natural -> [Natural] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Natural +mbfield (PParamsUpdate era -> HKD StrictMaybe Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Shelley._maxTxSize PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "maxBlockHeaderSize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -x | Natural -x <- StrictMaybe Natural -> [Natural] +x | Natural +x <- StrictMaybe Natural -> [Natural] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Natural +mbfield (PParamsUpdate era -> HKD StrictMaybe Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Shelley._maxBHSize PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "keyDeposit" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -x | Coin -x <- StrictMaybe Coin -> [Coin] +x | Coin +x <- StrictMaybe Coin -> [Coin] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Coin +mbfield (PParamsUpdate era -> HKD StrictMaybe Coin forall (f :: * -> *) era. PParams' f era -> HKD f Coin Shelley._keyDeposit PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "poolDeposit" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -x | Coin -x <- StrictMaybe Coin -> [Coin] +x | Coin +x <- StrictMaybe Coin -> [Coin] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Coin +mbfield (PParamsUpdate era -> HKD StrictMaybe Coin forall (f :: * -> *) era. PParams' f era -> HKD f Coin Shelley._poolDeposit PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "eMax" Text -> EpochNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -x | EpochNo -x <- StrictMaybe EpochNo -> [EpochNo] +x | EpochNo +x <- StrictMaybe EpochNo -> [EpochNo] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe EpochNo +mbfield (PParamsUpdate era -> HKD StrictMaybe EpochNo forall (f :: * -> *) era. PParams' f era -> HKD f EpochNo Shelley._eMax PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "nOpt" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -x | Natural -x <- StrictMaybe Natural -> [Natural] +x | Natural +x <- StrictMaybe Natural -> [Natural] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Natural +mbfield (PParamsUpdate era -> HKD StrictMaybe Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Shelley._nOpt PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text @@ -439,144 +439,144 @@ .= (Rational -> Scientific forall a. Fractional a => Rational -> a fromRational Rational -x :: Scientific) - | Rational -x <- StrictMaybe Rational -> [Rational] +x :: Scientific) + | Rational +x <- StrictMaybe Rational -> [Rational] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Rational +mbfield (PParamsUpdate era -> HKD StrictMaybe Rational forall (f :: * -> *) era. PParams' f era -> HKD f Rational Shelley._a0 PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "rho" Text -> UnitInterval -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= UnitInterval -x | UnitInterval -x <- StrictMaybe UnitInterval -> [UnitInterval] +x | UnitInterval +x <- StrictMaybe UnitInterval -> [UnitInterval] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe UnitInterval +mbfield (PParamsUpdate era -> HKD StrictMaybe UnitInterval forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval Shelley._rho PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "tau" Text -> UnitInterval -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= UnitInterval -x | UnitInterval -x <- StrictMaybe UnitInterval -> [UnitInterval] +x | UnitInterval +x <- StrictMaybe UnitInterval -> [UnitInterval] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe UnitInterval +mbfield (PParamsUpdate era -> HKD StrictMaybe UnitInterval forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval Shelley._tau PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "decentralisationParam" Text -> UnitInterval -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= UnitInterval -x | UnitInterval -x <- StrictMaybe UnitInterval -> [UnitInterval] +x | UnitInterval +x <- StrictMaybe UnitInterval -> [UnitInterval] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe UnitInterval +mbfield (PParamsUpdate era -> HKD StrictMaybe UnitInterval forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval Shelley._d PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "extraEntropy" Text -> Nonce -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Nonce -x | Nonce -x <- StrictMaybe Nonce -> [Nonce] +x | Nonce +x <- StrictMaybe Nonce -> [Nonce] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Nonce +mbfield (PParamsUpdate era -> HKD StrictMaybe Nonce forall (f :: * -> *) era. PParams' f era -> HKD f Nonce Shelley._extraEntropy PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "protocolVersion" Text -> ProtVer -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ProtVer -x | ProtVer -x <- StrictMaybe ProtVer -> [ProtVer] +x | ProtVer +x <- StrictMaybe ProtVer -> [ProtVer] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe ProtVer +mbfield (PParamsUpdate era -> HKD StrictMaybe ProtVer forall (f :: * -> *) era. PParams' f era -> HKD f ProtVer Shelley._protocolVersion PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "minUTxOValue" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -x | Coin -x <- StrictMaybe Coin -> [Coin] +x | Coin +x <- StrictMaybe Coin -> [Coin] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Coin +mbfield (PParamsUpdate era -> HKD StrictMaybe Coin forall (f :: * -> *) era. PParams' f era -> HKD f Coin Shelley._minUTxOValue PParamsUpdate era -pp) ] +pp) ] [Pair] -> [Pair] -> [Pair] forall a. [a] -> [a] -> [a] ++ [ Text "minPoolCost" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -x | Coin -x <- StrictMaybe Coin -> [Coin] +x | Coin +x <- StrictMaybe Coin -> [Coin] forall a. StrictMaybe a -> [a] -mbfield (PParamsUpdate era -> HKD StrictMaybe Coin +mbfield (PParamsUpdate era -> HKD StrictMaybe Coin forall (f :: * -> *) era. PParams' f era -> HKD f Coin Shelley._minPoolCost PParamsUpdate era -pp) ] +pp) ] where - mbfield :: StrictMaybe a -> [a] -mbfield StrictMaybe a + mbfield :: StrictMaybe a -> [a] +mbfield StrictMaybe a SNothing = [] - mbfield (SJust a -x) = [a -x] + mbfield (SJust a +x) = [a +x] -instance Crypto.Crypto crypto => ToJSON (Shelley.DPState crypto) where - toJSON :: DPState crypto -> Value -toJSON DPState crypto -dpState = [Pair] -> Value +instance Crypto.Crypto crypto => ToJSON (Shelley.DPState crypto) where + toJSON :: DPState crypto -> Value +toJSON DPState crypto +dpState = [Pair] -> Value object [ Text "dstate" Text -> DState crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= DPState crypto -> DState crypto forall crypto. DPState crypto -> DState crypto Shelley._dstate DPState crypto -dpState +dpState , Text "pstate" Text -> PState crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= DPState crypto -> PState crypto forall crypto. DPState crypto -> PState crypto Shelley._pstate DPState crypto -dpState +dpState ] -instance Crypto.Crypto crypto => ToJSON (Shelley.DState crypto) where - toJSON :: DState crypto -> Value -toJSON DState crypto -dState = [Pair] -> Value +instance Crypto.Crypto crypto => ToJSON (Shelley.DState crypto) where + toJSON :: DState crypto -> Value +toJSON DState crypto +dState = [Pair] -> Value object [ Text "rewards" Text -> RewardAccounts crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= DState crypto -> RewardAccounts crypto forall crypto. DState crypto -> RewardAccounts crypto Shelley._rewards DState crypto -dState +dState , Text "delegations" Text -> Map (Credential 'Staking crypto) (KeyHash 'StakePool crypto) @@ -588,7 +588,7 @@ DState crypto -> Map (Credential 'Staking crypto) (KeyHash 'StakePool crypto) ShelleyLedger._delegations DState crypto -dState +dState , Text "ptrs" Text -> Bimap Ptr (Credential 'Staking crypto) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -596,7 +596,7 @@ forall crypto. DState crypto -> Bimap Ptr (Credential 'Staking crypto) Shelley._ptrs DState crypto -dState +dState , Text "fGenDelegs" Text -> [(FutureGenDeleg crypto, GenDelegPair crypto)] -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -607,27 +607,27 @@ forall crypto. DState crypto -> Map (FutureGenDeleg crypto) (GenDelegPair crypto) Shelley._fGenDelegs DState crypto -dState) +dState) , Text "genDelegs" Text -> GenDelegs crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= DState crypto -> GenDelegs crypto forall crypto. DState crypto -> GenDelegs crypto Shelley._genDelegs DState crypto -dState +dState , Text "irwd" Text -> InstantaneousRewards crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= DState crypto -> InstantaneousRewards crypto forall crypto. DState crypto -> InstantaneousRewards crypto Shelley._irwd DState crypto -dState +dState ] -instance ToJSON (ShelleyLedger.FutureGenDeleg crypto) where - toJSON :: FutureGenDeleg crypto -> Value -toJSON FutureGenDeleg crypto -fGenDeleg = +instance ToJSON (ShelleyLedger.FutureGenDeleg crypto) where + toJSON :: FutureGenDeleg crypto -> Value +toJSON FutureGenDeleg crypto +fGenDeleg = [Pair] -> Value object [ Text "fGenDelegSlot" Text -> SlotNo -> Pair @@ -635,28 +635,28 @@ .= FutureGenDeleg crypto -> SlotNo forall crypto. FutureGenDeleg crypto -> SlotNo ShelleyLedger.fGenDelegSlot FutureGenDeleg crypto -fGenDeleg +fGenDeleg , Text "fGenDelegGenKeyHash" Text -> KeyHash 'Genesis crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= FutureGenDeleg crypto -> KeyHash 'Genesis crypto forall crypto. FutureGenDeleg crypto -> KeyHash 'Genesis crypto ShelleyLedger.fGenDelegGenKeyHash FutureGenDeleg crypto -fGenDeleg +fGenDeleg ] -instance Crypto.Crypto crypto => ToJSON (Shelley.GenDelegs crypto) where - toJSON :: GenDelegs crypto -> Value -toJSON (Shelley.GenDelegs Map (KeyHash 'Genesis crypto) (GenDelegPair crypto) -delegs) = Map (KeyHash 'Genesis crypto) (GenDelegPair crypto) -> Value +instance Crypto.Crypto crypto => ToJSON (Shelley.GenDelegs crypto) where + toJSON :: GenDelegs crypto -> Value +toJSON (Shelley.GenDelegs Map (KeyHash 'Genesis crypto) (GenDelegPair crypto) +delegs) = Map (KeyHash 'Genesis crypto) (GenDelegPair crypto) -> Value forall a. ToJSON a => a -> Value toJSON Map (KeyHash 'Genesis crypto) (GenDelegPair crypto) -delegs +delegs -instance ToJSON (Shelley.InstantaneousRewards crypto) where - toJSON :: InstantaneousRewards crypto -> Value -toJSON InstantaneousRewards crypto -iRwds = [Pair] -> Value +instance ToJSON (Shelley.InstantaneousRewards crypto) where + toJSON :: InstantaneousRewards crypto -> Value +toJSON InstantaneousRewards crypto +iRwds = [Pair] -> Value object [ Text "iRReserves" Text -> Map (Credential 'Staking crypto) Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -666,7 +666,7 @@ InstantaneousRewards crypto -> Map (Credential 'Staking crypto) Coin Shelley.iRReserves InstantaneousRewards crypto -iRwds +iRwds , Text "iRTreasury" Text -> Map (Credential 'Staking crypto) Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -676,14 +676,14 @@ InstantaneousRewards crypto -> Map (Credential 'Staking crypto) Coin Shelley.iRTreasury InstantaneousRewards crypto -iRwds +iRwds ] -instance ToJSON (Bimap Shelley.Ptr (Shelley.Credential Shelley.Staking crypto)) where - toJSON :: Bimap Ptr (Credential 'Staking crypto) -> Value -toJSON (MkBiMap Map Ptr (Credential 'Staking crypto) -ptsStakeM Map (Credential 'Staking crypto) (Set Ptr) -stakePtrSetM) = +instance ToJSON (Bimap Shelley.Ptr (Shelley.Credential Shelley.Staking crypto)) where + toJSON :: Bimap Ptr (Credential 'Staking crypto) -> Value +toJSON (MkBiMap Map Ptr (Credential 'Staking crypto) +ptsStakeM Map (Credential 'Staking crypto) (Set Ptr) +stakePtrSetM) = [Pair] -> Value object [ Text "stakedCreds" Text -> [(Ptr, Credential 'Staking crypto)] -> Pair @@ -692,45 +692,45 @@ -> [(Ptr, Credential 'Staking crypto)] forall k a. Map k a -> [(k, a)] Map.toList Map Ptr (Credential 'Staking crypto) -ptsStakeM +ptsStakeM , Text "credPtrR" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Map (Credential 'Staking crypto) (Set Ptr) -> Value forall a. ToJSON a => a -> Value toJSON Map (Credential 'Staking crypto) (Set Ptr) -stakePtrSetM +stakePtrSetM ] -instance ToJSON Shelley.Ptr where - toJSON :: Ptr -> Value -toJSON (Shelley.Ptr SlotNo -slotNo Natural -txIndex Natural -certIndex) = +instance ToJSON Shelley.Ptr where + toJSON :: Ptr -> Value +toJSON (Shelley.Ptr SlotNo +slotNo Natural +txIndex Natural +certIndex) = [Pair] -> Value object [ Text "slot" Text -> Word64 -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -> Word64 unSlotNo SlotNo -slotNo +slotNo , Text "txIndex" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -txIndex +txIndex , Text "certIndex" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -certIndex +certIndex ] -instance Crypto.Crypto crypto => ToJSON (Shelley.PState crypto) where - toJSON :: PState crypto -> Value -toJSON PState crypto -pState = [Pair] -> Value +instance Crypto.Crypto crypto => ToJSON (Shelley.PState crypto) where + toJSON :: PState crypto -> Value +toJSON PState crypto +pState = [Pair] -> Value object [ Text "pParams pState" Text -> Map (KeyHash 'StakePool crypto) (PoolParams crypto) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -740,7 +740,7 @@ PState crypto -> Map (KeyHash 'StakePool crypto) (PoolParams crypto) Shelley._pParams PState crypto -pState +pState , Text "fPParams pState" Text -> Map (KeyHash 'StakePool crypto) (PoolParams crypto) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -750,7 +750,7 @@ PState crypto -> Map (KeyHash 'StakePool crypto) (PoolParams crypto) Shelley._fPParams PState crypto -pState +pState , Text "retiring pState" Text -> Map (KeyHash 'StakePool crypto) EpochNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -758,43 +758,43 @@ forall crypto. PState crypto -> Map (KeyHash 'StakePool crypto) EpochNo Shelley._retiring PState crypto -pState +pState ] -instance ( Consensus.ShelleyBasedEra era - , ToJSON (Core.TxOut era) - ) => ToJSON (Shelley.UTxO era) where - toJSON :: UTxO era -> Value -toJSON (Shelley.UTxO Map (TxIn (Crypto era)) (TxOut era) -utxo) = Map (TxIn (Crypto era)) (TxOut era) -> Value +instance ( Consensus.ShelleyBasedEra era + , ToJSON (Core.TxOut era) + ) => ToJSON (Shelley.UTxO era) where + toJSON :: UTxO era -> Value +toJSON (Shelley.UTxO Map (TxIn (Crypto era)) (TxOut era) +utxo) = Map (TxIn (Crypto era)) (TxOut era) -> Value forall a. ToJSON a => a -> Value toJSON Map (TxIn (Crypto era)) (TxOut era) -utxo +utxo -instance ( Consensus.ShelleyBasedEra era - , ToJSON (Core.Value era) - ) => ToJSON (Shelley.TxOut era) where - toJSON :: TxOut era -> Value -toJSON (Shelley.TxOut Addr (Crypto era) -addr Value era -amount) = +instance ( Consensus.ShelleyBasedEra era + , ToJSON (Core.Value era) + ) => ToJSON (Shelley.TxOut era) where + toJSON :: TxOut era -> Value +toJSON (Shelley.TxOut Addr (Crypto era) +addr Value era +amount) = [Pair] -> Value object [ Text "address" Text -> Addr (Crypto era) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Addr (Crypto era) -addr +addr , Text "amount" Text -> Value era -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value era -amount +amount ] -instance Crypto.Crypto crypto => ToJSON (Shelley.TxIn crypto) where - toJSON :: TxIn crypto -> Value -toJSON = Text -> Value +instance Crypto.Crypto crypto => ToJSON (Shelley.TxIn crypto) where + toJSON :: TxIn crypto -> Value +toJSON = Text -> Value forall a. ToJSON a => a -> Value toJSON (Text -> Value) -> (TxIn crypto -> Text) -> TxIn crypto -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -802,26 +802,26 @@ forall crypto. Crypto crypto => TxIn crypto -> Text txInToText -instance Crypto.Crypto crypto => ToJSONKey (Shelley.TxIn crypto) where - toJSONKey :: ToJSONKeyFunction (TxIn crypto) -toJSONKey = (TxIn crypto -> Text) -> ToJSONKeyFunction (TxIn crypto) +instance Crypto.Crypto crypto => ToJSONKey (Shelley.TxIn crypto) where + toJSONKey :: ToJSONKeyFunction (TxIn crypto) +toJSONKey = (TxIn crypto -> Text) -> ToJSONKeyFunction (TxIn crypto) forall a. (a -> Text) -> ToJSONKeyFunction a toJSONKeyText TxIn crypto -> Text forall crypto. Crypto crypto => TxIn crypto -> Text txInToText -txInToText :: Crypto.Crypto crypto => Shelley.TxIn crypto -> Text +txInToText :: Crypto.Crypto crypto => Shelley.TxIn crypto -> Text txInToText :: TxIn crypto -> Text -txInToText (Shelley.TxIn (Shelley.TxId SafeHash crypto EraIndependentTxBody -txidHash) Natural -ix) = +txInToText (Shelley.TxIn (Shelley.TxId SafeHash crypto EraIndependentTxBody +txidHash) Natural +ix) = Hash (HASH crypto) EraIndependentTxBody -> Text forall crypto a. Hash crypto a -> Text hashToText (SafeHash crypto EraIndependentTxBody -> Hash (HASH crypto) EraIndependentTxBody forall crypto i. SafeHash crypto i -> Hash (HASH crypto) i SafeHash.extractHash SafeHash crypto EraIndependentTxBody -txidHash) +txidHash) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text @@ -833,9 +833,9 @@ Text.pack (Natural -> String forall a. Show a => a -> String show Natural -ix) +ix) -hashToText :: Crypto.Hash crypto a -> Text +hashToText :: Crypto.Hash crypto a -> Text hashToText :: Hash crypto a -> Text hashToText = ByteString -> Text Text.decodeLatin1 (ByteString -> Text) @@ -845,10 +845,10 @@ forall h a. Hash h a -> ByteString Crypto.hashToBytesAsHex -instance Crypto.Crypto crypto => ToJSON (Shelley.NonMyopic crypto) where - toJSON :: NonMyopic crypto -> Value -toJSON NonMyopic crypto -nonMy = [Pair] -> Value +instance Crypto.Crypto crypto => ToJSON (Shelley.NonMyopic crypto) where + toJSON :: NonMyopic crypto -> Value +toJSON NonMyopic crypto +nonMy = [Pair] -> Value object [ Text "likelihoodsNM" Text -> Map (KeyHash 'StakePool crypto) Likelihood -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -856,82 +856,82 @@ forall crypto. NonMyopic crypto -> Map (KeyHash 'StakePool crypto) Likelihood Shelley.likelihoodsNM NonMyopic crypto -nonMy +nonMy , Text "rewardPotNM" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= NonMyopic crypto -> Coin forall crypto. NonMyopic crypto -> Coin Shelley.rewardPotNM NonMyopic crypto -nonMy +nonMy ] -instance ToJSON Shelley.Likelihood where - toJSON :: Likelihood -> Value -toJSON (Shelley.Likelihood StrictSeq LogWeight -llhd) = +instance ToJSON Shelley.Likelihood where + toJSON :: Likelihood -> Value +toJSON (Shelley.Likelihood StrictSeq LogWeight +llhd) = StrictSeq Double -> Value forall a. ToJSON a => a -> Value toJSON (StrictSeq Double -> Value) -> StrictSeq Double -> Value forall a b. (a -> b) -> a -> b $ (LogWeight -> Double) -> StrictSeq LogWeight -> StrictSeq Double forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b -fmap (\(Shelley.LogWeight Float -f) -> Double -> Double +fmap (\(Shelley.LogWeight Float +f) -> Double -> Double forall a. Floating a => a -> a exp (Double -> Double) -> Double -> Double forall a b. (a -> b) -> a -> b $ Float -> Double forall a b. (Real a, Fractional b) => a -> b realToFrac Float -f :: Double) StrictSeq LogWeight -llhd +f :: Double) StrictSeq LogWeight +llhd -instance Crypto.Crypto crypto => ToJSON (Shelley.SnapShots crypto) where - toJSON :: SnapShots crypto -> Value -toJSON SnapShots crypto -ss = [Pair] -> Value +instance Crypto.Crypto crypto => ToJSON (Shelley.SnapShots crypto) where + toJSON :: SnapShots crypto -> Value +toJSON SnapShots crypto +ss = [Pair] -> Value object [ Text "pstakeMark" Text -> SnapShot crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SnapShots crypto -> SnapShot crypto forall crypto. SnapShots crypto -> SnapShot crypto Shelley._pstakeMark SnapShots crypto -ss +ss , Text "pstakeSet" Text -> SnapShot crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SnapShots crypto -> SnapShot crypto forall crypto. SnapShots crypto -> SnapShot crypto Shelley._pstakeSet SnapShots crypto -ss +ss , Text "pstakeGo" Text -> SnapShot crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SnapShots crypto -> SnapShot crypto forall crypto. SnapShots crypto -> SnapShot crypto Shelley._pstakeGo SnapShots crypto -ss +ss , Text "feeSS" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SnapShots crypto -> Coin forall crypto. SnapShots crypto -> Coin Shelley._feeSS SnapShots crypto -ss +ss ] -instance Crypto.Crypto crypto => ToJSON (Shelley.SnapShot crypto) where - toJSON :: SnapShot crypto -> Value -toJSON SnapShot crypto -ss = [Pair] -> Value +instance Crypto.Crypto crypto => ToJSON (Shelley.SnapShot crypto) where + toJSON :: SnapShot crypto -> Value +toJSON SnapShot crypto +ss = [Pair] -> Value object [ Text "stake" Text -> Stake crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SnapShot crypto -> Stake crypto forall crypto. SnapShot crypto -> Stake crypto Shelley._stake SnapShot crypto -ss +ss , Text "delegations" Text -> Map (Credential 'Staking crypto) (KeyHash 'StakePool crypto) @@ -943,7 +943,7 @@ SnapShot crypto -> Map (Credential 'Staking crypto) (KeyHash 'StakePool crypto) ShelleyEpoch._delegations SnapShot crypto -ss +ss , Text "poolParams" Text -> Map (KeyHash 'StakePool crypto) (PoolParams crypto) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -953,35 +953,35 @@ SnapShot crypto -> Map (KeyHash 'StakePool crypto) (PoolParams crypto) Shelley._poolParams SnapShot crypto -ss +ss ] -instance ToJSON (Shelley.Stake crypto) where - toJSON :: Stake crypto -> Value -toJSON (Shelley.Stake Map (Credential 'Staking crypto) Coin -s) = Map (Credential 'Staking crypto) Coin -> Value +instance ToJSON (Shelley.Stake crypto) where + toJSON :: Stake crypto -> Value +toJSON (Shelley.Stake Map (Credential 'Staking crypto) Coin +s) = Map (Credential 'Staking crypto) Coin -> Value forall a. ToJSON a => a -> Value toJSON Map (Credential 'Staking crypto) Coin -s +s -instance Crypto.Crypto crypto => ToJSON (Shelley.RewardUpdate crypto) where - toJSON :: RewardUpdate crypto -> Value -toJSON RewardUpdate crypto -rUpdate = [Pair] -> Value +instance Crypto.Crypto crypto => ToJSON (Shelley.RewardUpdate crypto) where + toJSON :: RewardUpdate crypto -> Value +toJSON RewardUpdate crypto +rUpdate = [Pair] -> Value object [ Text "deltaT" Text -> DeltaCoin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= RewardUpdate crypto -> DeltaCoin forall crypto. RewardUpdate crypto -> DeltaCoin Shelley.deltaT RewardUpdate crypto -rUpdate +rUpdate , Text "deltaR" Text -> DeltaCoin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= RewardUpdate crypto -> DeltaCoin forall crypto. RewardUpdate crypto -> DeltaCoin Shelley.deltaR RewardUpdate crypto -rUpdate +rUpdate , Text "rs" Text -> Map (Credential 'Staking crypto) (Set (Reward crypto)) -> Pair @@ -992,56 +992,56 @@ RewardUpdate crypto -> Map (Credential 'Staking crypto) (Set (Reward crypto)) Shelley.rs RewardUpdate crypto -rUpdate +rUpdate , Text "deltaF" Text -> DeltaCoin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= RewardUpdate crypto -> DeltaCoin forall crypto. RewardUpdate crypto -> DeltaCoin Shelley.deltaF RewardUpdate crypto -rUpdate +rUpdate , Text "nonMyopic" Text -> NonMyopic crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= RewardUpdate crypto -> NonMyopic crypto forall crypto. RewardUpdate crypto -> NonMyopic crypto Shelley.nonMyopic RewardUpdate crypto -rUpdate +rUpdate ] -instance Crypto.Crypto crypto => ToJSON (Shelley.PulsingRewUpdate crypto) where - toJSON :: PulsingRewUpdate crypto -> Value -toJSON (Shelley.Pulsing RewardSnapShot crypto +instance Crypto.Crypto crypto => ToJSON (Shelley.PulsingRewUpdate crypto) where + toJSON :: PulsingRewUpdate crypto -> Value +toJSON (Shelley.Pulsing RewardSnapShot crypto _ Pulser crypto _) = Value Aeson.Null - toJSON (Shelley.Complete RewardUpdate crypto -ru) = RewardUpdate crypto -> Value + toJSON (Shelley.Complete RewardUpdate crypto +ru) = RewardUpdate crypto -> Value forall a. ToJSON a => a -> Value toJSON RewardUpdate crypto -ru +ru -instance ToJSON Shelley.DeltaCoin where - toJSON :: DeltaCoin -> Value -toJSON (Shelley.DeltaCoin Integer -i) = Integer -> Value +instance ToJSON Shelley.DeltaCoin where + toJSON :: DeltaCoin -> Value +toJSON (Shelley.DeltaCoin Integer +i) = Integer -> Value forall a. ToJSON a => a -> Value toJSON Integer -i +i -instance Crypto.Crypto crypto => ToJSON (Shelley.PoolDistr crypto) where - toJSON :: PoolDistr crypto -> Value -toJSON (Shelley.PoolDistr Map (KeyHash 'StakePool crypto) (IndividualPoolStake crypto) -m) = Map (KeyHash 'StakePool crypto) (IndividualPoolStake crypto) +instance Crypto.Crypto crypto => ToJSON (Shelley.PoolDistr crypto) where + toJSON :: PoolDistr crypto -> Value +toJSON (Shelley.PoolDistr Map (KeyHash 'StakePool crypto) (IndividualPoolStake crypto) +m) = Map (KeyHash 'StakePool crypto) (IndividualPoolStake crypto) -> Value forall a. ToJSON a => a -> Value toJSON Map (KeyHash 'StakePool crypto) (IndividualPoolStake crypto) -m +m -instance ToJSON (Shelley.IndividualPoolStake crypto) where - toJSON :: IndividualPoolStake crypto -> Value -toJSON IndividualPoolStake crypto -indivPoolStake = +instance ToJSON (Shelley.IndividualPoolStake crypto) where + toJSON :: IndividualPoolStake crypto -> Value +toJSON IndividualPoolStake crypto +indivPoolStake = [Pair] -> Value object [ Text "individualPoolStake" Text -> Rational -> Pair @@ -1049,7 +1049,7 @@ .= IndividualPoolStake crypto -> Rational forall crypto. IndividualPoolStake crypto -> Rational Shelley.individualPoolStake IndividualPoolStake crypto -indivPoolStake +indivPoolStake , Text "individualPoolStakeVrf" Text -> Hash (HASH crypto) (VerKeyVRF (VRF crypto)) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1058,13 +1058,13 @@ forall crypto. IndividualPoolStake crypto -> Hash crypto (VerKeyVRF crypto) Shelley.individualPoolStakeVrf IndividualPoolStake crypto -indivPoolStake +indivPoolStake ] -instance ToJSON (Shelley.Reward crypto) where - toJSON :: Reward crypto -> Value -toJSON Reward crypto -reward = +instance ToJSON (Shelley.Reward crypto) where + toJSON :: Reward crypto -> Value +toJSON Reward crypto +reward = [Pair] -> Value object [ Text "rewardType" Text -> RewardType -> Pair @@ -1072,35 +1072,35 @@ .= Reward crypto -> RewardType forall crypto. Reward crypto -> RewardType Shelley.rewardType Reward crypto -reward +reward , Text "rewardPool" Text -> KeyHash 'StakePool crypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Reward crypto -> KeyHash 'StakePool crypto forall crypto. Reward crypto -> KeyHash 'StakePool crypto Shelley.rewardPool Reward crypto -reward +reward , Text "rewardAmount" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Reward crypto -> Coin forall crypto. Reward crypto -> Coin Shelley.rewardAmount Reward crypto -reward +reward ] -instance ToJSON Shelley.RewardType where - toJSON :: RewardType -> Value -toJSON RewardType +instance ToJSON Shelley.RewardType where + toJSON :: RewardType -> Value +toJSON RewardType Shelley.MemberReward = Value "MemberReward" toJSON RewardType Shelley.LeaderReward = Value "LeaderReward" -instance ToJSON (SafeHash.SafeHash c a) where - toJSON :: SafeHash c a -> Value -toJSON = Hash (HASH c) a -> Value +instance ToJSON (SafeHash.SafeHash c a) where + toJSON :: SafeHash c a -> Value +toJSON = Hash (HASH c) a -> Value forall a. ToJSON a => a -> Value toJSON (Hash (HASH c) a -> Value) -> (SafeHash c a -> Hash (HASH c) a) -> SafeHash c a -> Value @@ -1111,27 +1111,27 @@ ----- -instance ToJSON Alonzo.ExUnits -deriving instance FromJSON Alonzo.ExUnits +instance ToJSON Alonzo.ExUnits +deriving instance FromJSON Alonzo.ExUnits -deriving instance ToJSON Alonzo.Prices -deriving instance FromJSON Alonzo.Prices +deriving instance ToJSON Alonzo.Prices +deriving instance FromJSON Alonzo.Prices -deriving newtype instance FromJSON Alonzo.CostModel -deriving newtype instance ToJSON Alonzo.CostModel +deriving newtype instance FromJSON Alonzo.CostModel +deriving newtype instance ToJSON Alonzo.CostModel -instance FromJSON Alonzo.Language where - parseJSON :: Value -> Parser Language -parseJSON Value -v = case Value -v of +instance FromJSON Alonzo.Language where + parseJSON :: Value -> Parser Language +parseJSON Value +v = case Value +v of Aeson.String Text "PlutusV1" -> Language -> Parser Language forall (m :: * -> *) a. Monad m => a -> m a return Language Alonzo.PlutusV1 - Value -wrong -> String -> Parser Language + Value +wrong -> String -> Parser Language forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser Language) -> String -> Parser Language forall a b. (a -> b) -> a -> b @@ -1141,17 +1141,17 @@ <> Value -> String forall a. Show a => a -> String show Value -wrong -instance ToJSON Alonzo.Language where - toJSON :: Language -> Value -toJSON Language +wrong +instance ToJSON Alonzo.Language where + toJSON :: Language -> Value +toJSON Language Alonzo.PlutusV1 = Text -> Value Aeson.String Text "PlutusV1" -instance ToJSONKey Alonzo.Language where - toJSONKey :: ToJSONKeyFunction Language -toJSONKey = (Language -> Text) -> ToJSONKeyFunction Language +instance ToJSONKey Alonzo.Language where + toJSONKey :: ToJSONKeyFunction Language +toJSONKey = (Language -> Text) -> ToJSONKeyFunction Language forall a. (a -> Text) -> ToJSONKeyFunction a toJSONKeyText (ByteString -> Text Text.decodeLatin1 (ByteString -> Text) @@ -1165,17 +1165,17 @@ forall a. ToJSON a => a -> ByteString Aeson.encode) -instance FromJSONKey Alonzo.Language where - fromJSONKey :: FromJSONKeyFunction Language +instance FromJSONKey Alonzo.Language where + fromJSONKey :: FromJSONKeyFunction Language fromJSONKey = (Text -> Language) -> FromJSONKeyFunction Language forall a. (Text -> a) -> FromJSONKeyFunction a Aeson.FromJSONKeyText Text -> Language -parseLang +parseLang where - parseLang :: Text -> Alonzo.Language - parseLang :: Text -> Language -parseLang Text -lang = case ByteString -> Either String Language + parseLang :: Text -> Alonzo.Language + parseLang :: Text -> Language +parseLang Text +lang = case ByteString -> Either String Language forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecode (ByteString -> Either String Language) -> ByteString -> Either String Language @@ -1185,25 +1185,25 @@ forall a b. (a -> b) -> a -> b $ Text -> ByteString Text.encodeUtf8 Text -lang of - Left String -err -> Text -> Language +lang of + Left String +err -> Text -> Language forall a. HasCallStack => Text -> a panic (Text -> Language) -> Text -> Language forall a b. (a -> b) -> a -> b $ String -> Text Text.pack String -err - Right Language -lang' -> Language -lang' +err + Right Language +lang' -> Language +lang' -- We defer parsing of the cost model so that we can -- read it as a filepath. This is to reduce further pollution -- of the genesis file. -instance FromJSON Alonzo.AlonzoGenesis where - parseJSON :: Value -> Parser AlonzoGenesis -parseJSON = String +instance FromJSON Alonzo.AlonzoGenesis where + parseJSON :: Value -> Parser AlonzoGenesis +parseJSON = String -> (Object -> Parser AlonzoGenesis) -> Value -> Parser AlonzoGenesis @@ -1214,63 +1214,63 @@ -> Value -> Parser AlonzoGenesis forall a b. (a -> b) -> a -> b -$ \Object -o -> do - Coin -adaPerUTxOWord <- Object -o Object -> Text -> Parser Coin +$ \Object +o -> do + Coin +adaPerUTxOWord <- Object +o Object -> Text -> Parser Coin forall a. FromJSON a => Object -> Text -> Parser a .: Text "adaPerUTxOWord" - Maybe (Map Language CostModel) -cModels <- Object -o Object -> Text -> Parser (Maybe (Map Language CostModel)) + Maybe (Map Language CostModel) +cModels <- Object +o Object -> Text -> Parser (Maybe (Map Language CostModel)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "costModels" - Prices -prices <- Object -o Object -> Text -> Parser Prices + Prices +prices <- Object +o Object -> Text -> Parser Prices forall a. FromJSON a => Object -> Text -> Parser a .: Text "executionPrices" - ExUnits -maxTxExUnits <- Object -o Object -> Text -> Parser ExUnits + ExUnits +maxTxExUnits <- Object +o Object -> Text -> Parser ExUnits forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxTxExUnits" - ExUnits -maxBlockExUnits <- Object -o Object -> Text -> Parser ExUnits + ExUnits +maxBlockExUnits <- Object +o Object -> Text -> Parser ExUnits forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxBlockExUnits" - Natural -maxValSize <- Object -o Object -> Text -> Parser Natural + Natural +maxValSize <- Object +o Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxValueSize" - Natural -collateralPercentage <- Object -o Object -> Text -> Parser Natural + Natural +collateralPercentage <- Object +o Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "collateralPercentage" - Natural -maxCollateralInputs <- Object -o Object -> Text -> Parser Natural + Natural +maxCollateralInputs <- Object +o Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxCollateralInputs" case Maybe (Map Language CostModel) -cModels of +cModels of Maybe (Map Language CostModel) Nothing -> case Maybe CostModelParams Plutus.defaultCostModelParams of - Just CostModelParams -m -> AlonzoGenesis -> Parser AlonzoGenesis + Just CostModelParams +m -> AlonzoGenesis -> Parser AlonzoGenesis forall (m :: * -> *) a. Monad m => a -> m a return AlonzoGenesis :: Coin -> Map Language CostModel @@ -1292,7 +1292,7 @@ Map.singleton Language Alonzo.PlutusV1 (CostModelParams -> CostModel Alonzo.CostModel CostModelParams -m) +m) , Prices prices :: Prices prices :: Prices @@ -1323,8 +1323,8 @@ forall (m :: * -> *) a. MonadFail m => String -> m a fail String "Failed to extract the cost model params from Plutus.defaultCostModel" - Just Map Language CostModel -costmdls -> AlonzoGenesis -> Parser AlonzoGenesis + Just Map Language CostModel +costmdls -> AlonzoGenesis -> Parser AlonzoGenesis forall (m :: * -> *) a. Monad m => a -> m a return AlonzoGenesis :: Coin -> Map Language CostModel @@ -1343,7 +1343,7 @@ , Map Language CostModel costmdls :: Map Language CostModel costmdls :: Map Language CostModel -Alonzo.costmdls +Alonzo.costmdls , Prices prices :: Prices prices :: Prices @@ -1373,65 +1373,65 @@ -- We don't render the cost model so that we can -- render it later in 'AlonzoGenWrapper' as a filepath -- and keep the cost model (which is chunky) as a separate file. -instance ToJSON Alonzo.AlonzoGenesis where - toJSON :: AlonzoGenesis -> Value -toJSON AlonzoGenesis -v = [Pair] -> Value +instance ToJSON Alonzo.AlonzoGenesis where + toJSON :: AlonzoGenesis -> Value +toJSON AlonzoGenesis +v = [Pair] -> Value object [ Text "adaPerUTxOWord" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AlonzoGenesis -> Coin Alonzo.adaPerUTxOWord AlonzoGenesis -v +v , Text "costModels" Text -> Map Language CostModel -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AlonzoGenesis -> Map Language CostModel Alonzo.costmdls AlonzoGenesis -v +v , Text "executionPrices" Text -> Prices -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AlonzoGenesis -> Prices Alonzo.prices AlonzoGenesis -v +v , Text "maxTxExUnits" Text -> ExUnits -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AlonzoGenesis -> ExUnits Alonzo.maxTxExUnits AlonzoGenesis -v +v , Text "maxBlockExUnits" Text -> ExUnits -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AlonzoGenesis -> ExUnits Alonzo.maxBlockExUnits AlonzoGenesis -v +v , Text "maxValueSize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AlonzoGenesis -> Natural Alonzo.maxValSize AlonzoGenesis -v +v , Text "collateralPercentage" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AlonzoGenesis -> Natural Alonzo.collateralPercentage AlonzoGenesis -v +v , Text "maxCollateralInputs" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AlonzoGenesis -> Natural Alonzo.maxCollateralInputs AlonzoGenesis -v +v ] -instance ToJSON (Alonzo.PParams era) where - toJSON :: PParams era -> Value -toJSON PParams era -pp = +instance ToJSON (Alonzo.PParams era) where + toJSON :: PParams era -> Value +toJSON PParams era +pp = [Pair] -> Value Aeson.object [ Text @@ -1440,63 +1440,63 @@ .= PParams era -> HKD Identity Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Alonzo._minfeeA PParams era -pp +pp , Text "minFeeB" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Alonzo._minfeeB PParams era -pp +pp , Text "maxBlockBodySize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Alonzo._maxBBSize PParams era -pp +pp , Text "maxTxSize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Alonzo._maxTxSize PParams era -pp +pp , Text "maxBlockHeaderSize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Alonzo._maxBHSize PParams era -pp +pp , Text "keyDeposit" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Coin forall (f :: * -> *) era. PParams' f era -> HKD f Coin Alonzo._keyDeposit PParams era -pp +pp , Text "poolDeposit" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Coin forall (f :: * -> *) era. PParams' f era -> HKD f Coin Alonzo._poolDeposit PParams era -pp +pp , Text "eMax" Text -> EpochNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity EpochNo forall (f :: * -> *) era. PParams' f era -> HKD f EpochNo Alonzo._eMax PParams era -pp +pp , Text "nOpt" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Alonzo._nOpt PParams era -pp +pp , Text "a0" Text -> Scientific -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1505,56 +1505,56 @@ fromRational (PParams era -> HKD Identity Rational forall (f :: * -> *) era. PParams' f era -> HKD f Rational Alonzo._a0 PParams era -pp) :: Scientific) +pp) :: Scientific) , Text "rho" Text -> UnitInterval -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity UnitInterval forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval Alonzo._rho PParams era -pp +pp , Text "tau" Text -> UnitInterval -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity UnitInterval forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval Alonzo._tau PParams era -pp +pp , Text "decentralisationParam" Text -> UnitInterval -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity UnitInterval forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval Alonzo._d PParams era -pp +pp , Text "extraEntropy" Text -> Nonce -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Nonce forall (f :: * -> *) era. PParams' f era -> HKD f Nonce Alonzo._extraEntropy PParams era -pp +pp , Text "protocolVersion" Text -> ProtVer -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity ProtVer forall (f :: * -> *) era. PParams' f era -> HKD f ProtVer Alonzo._protocolVersion PParams era -pp +pp , Text "minPoolCost" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Coin forall (f :: * -> *) era. PParams' f era -> HKD f Coin Alonzo._minPoolCost PParams era -pp +pp , Text "adaPerUTxOWord" Text -> Coin -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Coin forall (f :: * -> *) era. PParams' f era -> HKD f Coin Alonzo._adaPerUTxOWord PParams era -pp +pp , Text "costmdls" Text -> Map Language CostModel -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1562,54 +1562,54 @@ forall (f :: * -> *) era. PParams' f era -> HKD f (Map Language CostModel) Alonzo._costmdls PParams era -pp +pp , Text "prices" Text -> Prices -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Prices forall (f :: * -> *) era. PParams' f era -> HKD f Prices Alonzo._prices PParams era -pp +pp , Text "maxTxExUnits" Text -> ExUnits -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity ExUnits forall (f :: * -> *) era. PParams' f era -> HKD f ExUnits Alonzo._maxTxExUnits PParams era -pp +pp , Text "maxBlockExUnits" Text -> ExUnits -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity ExUnits forall (f :: * -> *) era. PParams' f era -> HKD f ExUnits Alonzo._maxBlockExUnits PParams era -pp +pp , Text "maxValSize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Alonzo._maxValSize PParams era -pp +pp , Text "collateralPercentage" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Alonzo._collateralPercentage PParams era -pp +pp , Text "maxCollateralInputs " Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParams era -> HKD Identity Natural forall (f :: * -> *) era. PParams' f era -> HKD f Natural Alonzo._maxCollateralInputs PParams era -pp +pp ] -instance FromJSON (Alonzo.PParams era) where - parseJSON :: Value -> Parser (PParams era) -parseJSON = +instance FromJSON (Alonzo.PParams era) where + parseJSON :: Value -> Parser (PParams era) +parseJSON = String -> (Object -> Parser (PParams era)) -> Value @@ -1621,8 +1621,8 @@ -> Value -> Parser (PParams era) forall a b. (a -> b) -> a -> b -$ \Object -obj -> +$ \Object +obj -> Natural -> Natural -> Natural @@ -1728,7 +1728,7 @@ -> PParams era) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -obj Object -> Text -> Parser Natural +obj Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "minFeeA" @@ -1784,7 +1784,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Natural +obj Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "minFeeB" @@ -1838,7 +1838,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Natural +obj Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxBlockBodySize" @@ -1890,7 +1890,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Natural +obj Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxTxSize" @@ -1940,7 +1940,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Natural +obj Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxBlockHeaderSize" @@ -1988,7 +1988,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Coin +obj Object -> Text -> Parser Coin forall a. FromJSON a => Object -> Text -> Parser a .: Text "keyDeposit" @@ -2034,7 +2034,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Coin +obj Object -> Text -> Parser Coin forall a. FromJSON a => Object -> Text -> Parser a .: Text "poolDeposit" @@ -2078,7 +2078,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser EpochNo +obj Object -> Text -> Parser EpochNo forall a. FromJSON a => Object -> Text -> Parser a .: Text "eMax" @@ -2120,7 +2120,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Natural +obj Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "nOpt" @@ -2165,7 +2165,7 @@ (Scientific -> Rational) -> Parser Scientific -> Parser Rational forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -obj Object -> Text -> Parser Scientific +obj Object -> Text -> Parser Scientific forall a. FromJSON a => Object -> Text -> Parser a .: Text "a0" @@ -2204,7 +2204,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser UnitInterval +obj Object -> Text -> Parser UnitInterval forall a. FromJSON a => Object -> Text -> Parser a .: Text "rho" @@ -2240,7 +2240,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser UnitInterval +obj Object -> Text -> Parser UnitInterval forall a. FromJSON a => Object -> Text -> Parser a .: Text "tau" @@ -2274,7 +2274,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser UnitInterval +obj Object -> Text -> Parser UnitInterval forall a. FromJSON a => Object -> Text -> Parser a .: Text "decentralisationParam" @@ -2306,7 +2306,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Nonce +obj Object -> Text -> Parser Nonce forall a. FromJSON a => Object -> Text -> Parser a .: Text "extraEntropy" @@ -2336,7 +2336,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser ProtVer +obj Object -> Text -> Parser ProtVer forall a. FromJSON a => Object -> Text -> Parser a .: Text "protocolVersion" @@ -2364,7 +2364,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser (Maybe Coin) +obj Object -> Text -> Parser (Maybe Coin) forall a. FromJSON a => Object -> Text -> Parser a .: Text "minPoolCost" Parser (Maybe Coin) -> Coin -> Parser Coin @@ -2394,7 +2394,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Coin +obj Object -> Text -> Parser Coin forall a. FromJSON a => Object -> Text -> Parser a .: Text "adaPerUTxOWord" @@ -2418,7 +2418,7 @@ -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser (Map Language CostModel) +obj Object -> Text -> Parser (Map Language CostModel) forall a. FromJSON a => Object -> Text -> Parser a .: Text "costmdls" @@ -2436,7 +2436,7 @@ -> ExUnits -> Natural -> Natural -> Natural -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Prices +obj Object -> Text -> Parser Prices forall a. FromJSON a => Object -> Text -> Parser a .: Text "prices" @@ -2447,7 +2447,7 @@ -> Parser (ExUnits -> Natural -> Natural -> Natural -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser ExUnits +obj Object -> Text -> Parser ExUnits forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxTxExUnits" @@ -2456,7 +2456,7 @@ -> Parser (Natural -> Natural -> Natural -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser ExUnits +obj Object -> Text -> Parser ExUnits forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxBlockExUnits" @@ -2464,7 +2464,7 @@ -> Parser Natural -> Parser (Natural -> Natural -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Natural +obj Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxValSize" @@ -2472,7 +2472,7 @@ -> Parser Natural -> Parser (Natural -> PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Natural +obj Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "collateralPercentage" @@ -2480,20 +2480,20 @@ -> Parser Natural -> Parser (PParams era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Natural +obj Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxCollateralInputs" -deriving instance ToJSON (Alonzo.PParamsUpdate (Alonzo.AlonzoEra StandardCrypto)) +deriving instance ToJSON (Alonzo.PParamsUpdate (Alonzo.AlonzoEra StandardCrypto)) -instance (Ledger.Era era, Show (Ledger.Value era), ToJSON (Ledger.Value era)) - => ToJSON (Alonzo.TxOut era) where - toJSON :: TxOut era -> Value -toJSON (Alonzo.TxOut Addr (Crypto era) -addr Value era -v StrictMaybe (DataHash (Crypto era)) -dataHash) = +instance (Ledger.Era era, Show (Ledger.Value era), ToJSON (Ledger.Value era)) + => ToJSON (Alonzo.TxOut era) where + toJSON :: TxOut era -> Value +toJSON (Alonzo.TxOut Addr (Crypto era) +addr Value era +v StrictMaybe (DataHash (Crypto era)) +dataHash) = [Pair] -> Value object [ Text "address" Text -> Value -> Pair @@ -2501,14 +2501,14 @@ .= Addr (Crypto era) -> Value forall a. ToJSON a => a -> Value toJSON Addr (Crypto era) -addr +addr , Text "value" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value era -> Value forall a. ToJSON a => a -> Value toJSON Value era -v +v , Text "datahash" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2516,12 +2516,12 @@ -> Maybe (DataHash (Crypto era)) forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe (DataHash (Crypto era)) -dataHash of +dataHash of Maybe (DataHash (Crypto era)) Nothing -> Value Aeson.Null - Just DataHash (Crypto era) -dHash -> + Just DataHash (Crypto era) +dHash -> Text -> Value Aeson.String (Text -> Value) -> (Hash (HASH (Crypto era)) EraIndependentData -> Text) @@ -2538,8 +2538,8 @@ -> Hash (HASH (Crypto era)) EraIndependentData forall crypto i. SafeHash crypto i -> Hash (HASH crypto) i SafeHash.extractHash DataHash (Crypto era) -dHash +dHash ] -deriving instance Show Alonzo.AlonzoGenesis +deriving instance Show Alonzo.AlonzoGenesis \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Protocol.Byron.html b/cardano-api/src/Cardano.Api.Protocol.Byron.html index 2ad9c0fa37e..a896c6eafa8 100644 --- a/cardano-api/src/Cardano.Api.Protocol.Byron.html +++ b/cardano-api/src/Cardano.Api.Protocol.Byron.html @@ -21,8 +21,8 @@ mkSomeNodeClientProtocolByron :: EpochSlots -> SomeNodeClientProtocol mkSomeNodeClientProtocolByron :: EpochSlots -> SomeNodeClientProtocol -mkSomeNodeClientProtocolByron EpochSlots -epochSlots = +mkSomeNodeClientProtocolByron EpochSlots +epochSlots = ProtocolClientInfoArgs ByronBlockHFC -> SomeNodeClientProtocol forall blk. (RunNode blk, ProtocolClient blk) => @@ -30,5 +30,5 @@ SomeNodeClientProtocol (EpochSlots -> ProtocolClientInfoArgs ByronBlockHFC mkNodeClientProtocolByron EpochSlots -epochSlots) +epochSlots) \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Protocol.Cardano.html b/cardano-api/src/Cardano.Api.Protocol.Cardano.html index 058e17764cd..604bc9440d6 100644 --- a/cardano-api/src/Cardano.Api.Protocol.Cardano.html +++ b/cardano-api/src/Cardano.Api.Protocol.Cardano.html @@ -22,8 +22,8 @@ mkSomeNodeClientProtocolCardano :: EpochSlots -> SomeNodeClientProtocol mkSomeNodeClientProtocolCardano :: EpochSlots -> SomeNodeClientProtocol -mkSomeNodeClientProtocolCardano EpochSlots -epochSlots = +mkSomeNodeClientProtocolCardano EpochSlots +epochSlots = ProtocolClientInfoArgs (CardanoBlock StandardCrypto) -> SomeNodeClientProtocol forall blk. @@ -32,5 +32,5 @@ SomeNodeClientProtocol (EpochSlots -> ProtocolClientInfoArgs (CardanoBlock StandardCrypto) mkNodeClientProtocolCardano EpochSlots -epochSlots) +epochSlots) \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Protocol.Types.html b/cardano-api/src/Cardano.Api.Protocol.Types.html index 5eacd8ff79b..cfcbed573e1 100644 --- a/cardano-api/src/Cardano.Api.Protocol.Types.html +++ b/cardano-api/src/Cardano.Api.Protocol.Types.html @@ -30,25 +30,25 @@ import Ouroboros.Consensus.Shelley.ShelleyHFC (ShelleyBlockHFC) import Ouroboros.Consensus.Util.IOLike (IOLike) -class (RunNode blk, IOLike m) => Protocol m blk where - data ProtocolInfoArgs m blk - protocolInfo :: ProtocolInfoArgs m blk -> ProtocolInfo m blk +class (RunNode blk, IOLike m) => Protocol m blk where + data ProtocolInfoArgs m blk + protocolInfo :: ProtocolInfoArgs m blk -> ProtocolInfo m blk -- | Node client support for each consensus protocol. -- -- This is like 'Protocol' but for clients of the node, so with less onerous -- requirements than to run a node. -- -class (RunNode blk) => ProtocolClient blk where - data ProtocolClientInfoArgs blk - protocolClientInfo :: ProtocolClientInfoArgs blk -> ProtocolClientInfo blk +class (RunNode blk) => ProtocolClient blk where + data ProtocolClientInfoArgs blk + protocolClientInfo :: ProtocolClientInfoArgs blk -> ProtocolClientInfo blk -- | Run PBFT against the Byron ledger -instance IOLike m => Protocol m ByronBlockHFC where - data ProtocolInfoArgs m ByronBlockHFC = ProtocolInfoArgsByron ProtocolParamsByron - protocolInfo :: ProtocolInfoArgs m ByronBlockHFC -> ProtocolInfo m ByronBlockHFC -protocolInfo (ProtocolInfoArgsByron params) = ProtocolInfo m ByronBlock -> ProtocolInfo m ByronBlockHFC +instance IOLike m => Protocol m ByronBlockHFC where + data ProtocolInfoArgs m ByronBlockHFC = ProtocolInfoArgsByron ProtocolParamsByron + protocolInfo :: ProtocolInfoArgs m ByronBlockHFC -> ProtocolInfo m ByronBlockHFC +protocolInfo (ProtocolInfoArgsByron params) = ProtocolInfo m ByronBlock -> ProtocolInfo m ByronBlockHFC forall (f :: * -> *) blk. (Isomorphic f, NoHardForks blk) => f blk -> f (HardForkBlock '[blk]) @@ -60,10 +60,10 @@ Monad m => ProtocolParamsByron -> ProtocolInfo m ByronBlock protocolInfoByron ProtocolParamsByron -params +params -instance IOLike m => Protocol m (CardanoBlock StandardCrypto) where - data ProtocolInfoArgs m (CardanoBlock StandardCrypto) = +instance IOLike m => Protocol m (CardanoBlock StandardCrypto) where + data ProtocolInfoArgs m (CardanoBlock StandardCrypto) = ProtocolInfoArgsCardano ProtocolParamsByron (ProtocolParamsShelleyBased StandardShelley) @@ -76,19 +76,19 @@ (ProtocolTransitionParamsShelleyBased StandardMary) (ProtocolTransitionParamsShelleyBased StandardAlonzo) - protocolInfo :: ProtocolInfoArgs m (CardanoBlock StandardCrypto) + protocolInfo :: ProtocolInfoArgs m (CardanoBlock StandardCrypto) -> ProtocolInfo m (CardanoBlock StandardCrypto) -protocolInfo (ProtocolInfoArgsCardano - paramsByron - paramsShelleyBased - paramsShelley - paramsAllegra - paramsMary - paramsAlonzo - paramsByronShelley - paramsShelleyAllegra - paramsAllegraMary - paramsMaryAlonzo) = +protocolInfo (ProtocolInfoArgsCardano + paramsByron + paramsShelleyBased + paramsShelley + paramsAllegra + paramsMary + paramsAlonzo + paramsByronShelley + paramsShelleyAllegra + paramsAllegraMary + paramsMaryAlonzo) = ProtocolParamsByron -> ProtocolParamsShelleyBased (ShelleyEra StandardCrypto) -> ProtocolParamsShelley @@ -115,32 +115,32 @@ -> ProtocolInfo m (CardanoBlock c) protocolInfoCardano ProtocolParamsByron -paramsByron +paramsByron ProtocolParamsShelleyBased (ShelleyEra StandardCrypto) -paramsShelleyBased +paramsShelleyBased ProtocolParamsShelley -paramsShelley +paramsShelley ProtocolParamsAllegra -paramsAllegra +paramsAllegra ProtocolParamsMary -paramsMary +paramsMary ProtocolParamsAlonzo -paramsAlonzo +paramsAlonzo ProtocolTransitionParamsShelleyBased (ShelleyEra StandardCrypto) -paramsByronShelley +paramsByronShelley ProtocolTransitionParamsShelleyBased (AllegraEra StandardCrypto) -paramsShelleyAllegra +paramsShelleyAllegra ProtocolTransitionParamsShelleyBased (MaryEra StandardCrypto) -paramsAllegraMary +paramsAllegraMary ProtocolTransitionParamsShelleyBased (AlonzoEra StandardCrypto) -paramsMaryAlonzo +paramsMaryAlonzo instance ProtocolClient ByronBlockHFC where data ProtocolClientInfoArgs ByronBlockHFC = ProtocolClientInfoArgsByron EpochSlots - protocolClientInfo :: ProtocolClientInfoArgs ByronBlockHFC + protocolClientInfo :: ProtocolClientInfoArgs ByronBlockHFC -> ProtocolClientInfo ByronBlockHFC -protocolClientInfo (ProtocolClientInfoArgsByron epochSlots) = +protocolClientInfo (ProtocolClientInfoArgsByron epochSlots) = ProtocolClientInfo ByronBlock -> ProtocolClientInfo ByronBlockHFC forall (f :: * -> *) blk. (Isomorphic f, NoHardForks blk) => @@ -151,26 +151,26 @@ forall a b. (a -> b) -> a -> b $ EpochSlots -> ProtocolClientInfo ByronBlock protocolClientInfoByron EpochSlots -epochSlots +epochSlots instance ProtocolClient (CardanoBlock StandardCrypto) where data ProtocolClientInfoArgs (CardanoBlock StandardCrypto) = ProtocolClientInfoArgsCardano EpochSlots - protocolClientInfo :: ProtocolClientInfoArgs (CardanoBlock StandardCrypto) + protocolClientInfo :: ProtocolClientInfoArgs (CardanoBlock StandardCrypto) -> ProtocolClientInfo (CardanoBlock StandardCrypto) -protocolClientInfo (ProtocolClientInfoArgsCardano epochSlots) = +protocolClientInfo (ProtocolClientInfoArgsCardano epochSlots) = EpochSlots -> ProtocolClientInfo (CardanoBlock StandardCrypto) forall c. EpochSlots -> ProtocolClientInfo (CardanoBlock c) protocolClientInfoCardano EpochSlots -epochSlots +epochSlots -instance IOLike m => Protocol m (ShelleyBlockHFC StandardShelley) where - data ProtocolInfoArgs m (ShelleyBlockHFC StandardShelley) = ProtocolInfoArgsShelley +instance IOLike m => Protocol m (ShelleyBlockHFC StandardShelley) where + data ProtocolInfoArgs m (ShelleyBlockHFC StandardShelley) = ProtocolInfoArgsShelley (ProtocolParamsShelleyBased StandardShelley) ProtocolParamsShelley - protocolInfo :: ProtocolInfoArgs m (ShelleyBlockHFC (ShelleyEra StandardCrypto)) + protocolInfo :: ProtocolInfoArgs m (ShelleyBlockHFC (ShelleyEra StandardCrypto)) -> ProtocolInfo m (ShelleyBlockHFC (ShelleyEra StandardCrypto)) -protocolInfo (ProtocolInfoArgsShelley paramsShelleyBased paramsShelley) = +protocolInfo (ProtocolInfoArgsShelley paramsShelleyBased paramsShelley) = ProtocolInfo m (ShelleyBlock (ShelleyEra StandardCrypto)) -> ProtocolInfo m (ShelleyBlockHFC (ShelleyEra StandardCrypto)) forall (f :: * -> *) blk. @@ -190,16 +190,16 @@ -> ProtocolParamsShelley -> ProtocolInfo m (ShelleyBlock (ShelleyEra c)) protocolInfoShelley ProtocolParamsShelleyBased (ShelleyEra StandardCrypto) -paramsShelleyBased ProtocolParamsShelley -paramsShelley +paramsShelleyBased ProtocolParamsShelley +paramsShelley instance ProtocolClient (ShelleyBlockHFC StandardShelley) where data ProtocolClientInfoArgs (ShelleyBlockHFC StandardShelley) = ProtocolClientInfoArgsShelley - protocolClientInfo :: ProtocolClientInfoArgs + protocolClientInfo :: ProtocolClientInfoArgs (ShelleyBlockHFC (ShelleyEra StandardCrypto)) -> ProtocolClientInfo (ShelleyBlockHFC (ShelleyEra StandardCrypto)) -protocolClientInfo ProtocolClientInfoArgs +protocolClientInfo ProtocolClientInfoArgs (ShelleyBlockHFC (ShelleyEra StandardCrypto)) ProtocolClientInfoArgsShelley = ProtocolClientInfo (ShelleyBlock (ShelleyEra StandardCrypto)) @@ -211,18 +211,18 @@ forall era. ProtocolClientInfo (ShelleyBlock era) protocolClientInfoShelley -data BlockType blk where +data BlockType blk where ByronBlockType :: BlockType ByronBlockHFC ShelleyBlockType :: BlockType (ShelleyBlockHFC StandardShelley) CardanoBlockType :: BlockType (CardanoBlock StandardCrypto) -deriving instance Eq (BlockType blk) -deriving instance Show (BlockType blk) +deriving instance Eq (BlockType blk) +deriving instance Show (BlockType blk) data SomeNodeClientProtocol where - SomeNodeClientProtocol - :: (RunNode blk, ProtocolClient blk) - => ProtocolClientInfoArgs blk + SomeNodeClientProtocol + :: (RunNode blk, ProtocolClient blk) + => ProtocolClientInfoArgs blk -> SomeNodeClientProtocol \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.ProtocolParameters.html b/cardano-api/src/Cardano.Api.ProtocolParameters.html index 81a02b0398d..f06e0c43bd2 100644 --- a/cardano-api/src/Cardano.Api.ProtocolParameters.html +++ b/cardano-api/src/Cardano.Api.ProtocolParameters.html @@ -120,7 +120,7 @@ -- -- There are also paramaters fixed in the Genesis file. See 'GenesisParameters'. -- -data ProtocolParameters = +data ProtocolParameters = ProtocolParameters { -- | Protocol version, major and minor. Updating the major version is @@ -299,7 +299,7 @@ ProtocolParameters -> Maybe Natural protocolParamMaxCollateralInputs :: Maybe Natural } - deriving (ProtocolParameters -> ProtocolParameters -> Bool + deriving (ProtocolParameters -> ProtocolParameters -> Bool (ProtocolParameters -> ProtocolParameters -> Bool) -> (ProtocolParameters -> ProtocolParameters -> Bool) -> Eq ProtocolParameters @@ -317,7 +317,7 @@ (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep ProtocolParameters x -> ProtocolParameters $cfrom :: forall x. ProtocolParameters -> Rep ProtocolParameters x -Generic, Int -> ProtocolParameters -> ShowS +Generic, Int -> ProtocolParameters -> ShowS [ProtocolParameters] -> ShowS ProtocolParameters -> String (Int -> ProtocolParameters -> ShowS) @@ -334,8 +334,8 @@ $cshowsPrec :: Int -> ProtocolParameters -> ShowS Show) -instance FromJSON ProtocolParameters where - parseJSON :: Value -> Parser ProtocolParameters +instance FromJSON ProtocolParameters where + parseJSON :: Value -> Parser ProtocolParameters parseJSON = String -> (Object -> Parser ProtocolParameters) @@ -349,11 +349,11 @@ -> Value -> Parser ProtocolParameters forall a b. (a -> b) -> a -> b -$ \Object -o -> do - Object -v <- Object -o Object -> Text -> Parser Object +$ \Object +o -> do + Object +v <- Object +o Object -> Text -> Parser Object forall a. FromJSON a => Object -> Text -> Parser a .: Text "protocolVersion" @@ -442,14 +442,14 @@ -> Parser Natural -> Parser (Natural -> (Natural, Natural)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser Natural +v Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "major" Parser (Natural -> (Natural, Natural)) -> Parser Natural -> Parser (Natural, Natural) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser Natural +v Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "minor") @@ -507,7 +507,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Rational +o Object -> Text -> Parser Rational forall a. FromJSON a => Object -> Text -> Parser a .: Text "decentralization" @@ -563,7 +563,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe PraosNonce) +o Object -> Text -> Parser (Maybe PraosNonce) forall a. FromJSON a => Object -> Text -> Parser a .: Text "extraPraosEntropy" @@ -617,7 +617,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Natural +o Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxBlockHeaderSize" @@ -669,7 +669,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Natural +o Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxBlockBodySize" @@ -719,7 +719,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Natural +o Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "maxTxSize" @@ -767,7 +767,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Natural +o Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "txFeeFixed" @@ -813,7 +813,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Natural +o Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "txFeePerByte" @@ -857,7 +857,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe Lovelace) +o Object -> Text -> Parser (Maybe Lovelace) forall a. FromJSON a => Object -> Text -> Parser a .: Text "minUTxOValue" @@ -899,7 +899,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Lovelace +o Object -> Text -> Parser Lovelace forall a. FromJSON a => Object -> Text -> Parser a .: Text "stakeAddressDeposit" @@ -939,7 +939,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Lovelace +o Object -> Text -> Parser Lovelace forall a. FromJSON a => Object -> Text -> Parser a .: Text "stakePoolDeposit" @@ -977,7 +977,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Lovelace +o Object -> Text -> Parser Lovelace forall a. FromJSON a => Object -> Text -> Parser a .: Text "minPoolCost" @@ -1013,7 +1013,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser EpochNo +o Object -> Text -> Parser EpochNo forall a. FromJSON a => Object -> Text -> Parser a .: Text "poolRetireMaxEpoch" @@ -1047,7 +1047,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Natural +o Object -> Text -> Parser Natural forall a. FromJSON a => Object -> Text -> Parser a .: Text "stakePoolTargetNum" @@ -1079,7 +1079,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Rational +o Object -> Text -> Parser Rational forall a. FromJSON a => Object -> Text -> Parser a .: Text "poolPledgeInfluence" @@ -1109,7 +1109,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Rational +o Object -> Text -> Parser Rational forall a. FromJSON a => Object -> Text -> Parser a .: Text "monetaryExpansion" @@ -1137,7 +1137,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Rational +o Object -> Text -> Parser Rational forall a. FromJSON a => Object -> Text -> Parser a .: Text "treasuryCut" @@ -1163,7 +1163,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe Lovelace) +o Object -> Text -> Parser (Maybe Lovelace) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "utxoCostPerWord" @@ -1187,7 +1187,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object +o Object -> Text -> Parser (Maybe (Map AnyPlutusScriptVersion CostModel)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text @@ -1216,7 +1216,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe ExecutionUnitPrices) +o Object -> Text -> Parser (Maybe ExecutionUnitPrices) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "executionUnitPrices" @@ -1236,7 +1236,7 @@ -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe ExecutionUnits) +o Object -> Text -> Parser (Maybe ExecutionUnits) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "maxTxExecUnits" @@ -1252,7 +1252,7 @@ -> Maybe Natural -> Maybe Natural -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe ExecutionUnits) +o Object -> Text -> Parser (Maybe ExecutionUnits) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "maxBlockExecUnits" @@ -1263,7 +1263,7 @@ -> Parser (Maybe Natural -> Maybe Natural -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe Natural) +o Object -> Text -> Parser (Maybe Natural) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "maxValueSize" @@ -1272,7 +1272,7 @@ -> Parser (Maybe Natural -> ProtocolParameters) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe Natural) +o Object -> Text -> Parser (Maybe Natural) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "collateralPercentage" @@ -1280,14 +1280,14 @@ -> Parser (Maybe Natural) -> Parser ProtocolParameters forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe Natural) +o Object -> Text -> Parser (Maybe Natural) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "maxCollateralInputs" -instance ToJSON ProtocolParameters where - toJSON :: ProtocolParameters -> Value -toJSON ProtocolParameters{Natural +instance ToJSON ProtocolParameters where + toJSON :: ProtocolParameters -> Value +toJSON ProtocolParameters{Natural Maybe Natural Maybe ExecutionUnits Maybe Lovelace @@ -1348,154 +1348,154 @@ protocolParamExtraPraosEntropy :: ProtocolParameters -> Maybe PraosNonce protocolParamDecentralization :: ProtocolParameters -> Rational protocolParamProtocolVersion :: ProtocolParameters -> (Natural, Natural) -..} = +..} = [Pair] -> Value object [ Text "extraPraosEntropy" Text -> Maybe PraosNonce -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe PraosNonce -protocolParamExtraPraosEntropy +protocolParamExtraPraosEntropy , Text "stakePoolTargetNum" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -protocolParamStakePoolTargetNum +protocolParamStakePoolTargetNum , Text "minUTxOValue" Text -> Maybe Lovelace -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe Lovelace -protocolParamMinUTxOValue +protocolParamMinUTxOValue , Text "poolRetireMaxEpoch" Text -> EpochNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -protocolParamPoolRetireMaxEpoch +protocolParamPoolRetireMaxEpoch , Text "decentralization" Text -> Scientific -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= (Rational -> Scientific forall a. Fractional a => Rational -> a fromRational Rational -protocolParamDecentralization +protocolParamDecentralization :: Scientific) , Text "stakePoolDeposit" Text -> Lovelace -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Lovelace -protocolParamStakePoolDeposit +protocolParamStakePoolDeposit , Text "maxBlockHeaderSize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -protocolParamMaxBlockHeaderSize +protocolParamMaxBlockHeaderSize , Text "maxBlockBodySize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -protocolParamMaxBlockBodySize +protocolParamMaxBlockBodySize , Text "maxTxSize" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -protocolParamMaxTxSize +protocolParamMaxTxSize , Text "treasuryCut" Text -> Scientific -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= (Rational -> Scientific forall a. Fractional a => Rational -> a fromRational Rational -protocolParamTreasuryCut +protocolParamTreasuryCut :: Scientific) , Text "minPoolCost" Text -> Lovelace -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Lovelace -protocolParamMinPoolCost +protocolParamMinPoolCost , Text "monetaryExpansion" Text -> Scientific -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= (Rational -> Scientific forall a. Fractional a => Rational -> a fromRational Rational -protocolParamMonetaryExpansion +protocolParamMonetaryExpansion :: Scientific) , Text "stakeAddressDeposit" Text -> Lovelace -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Lovelace -protocolParamStakeAddressDeposit +protocolParamStakeAddressDeposit , Text "poolPledgeInfluence" Text -> Scientific -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= (Rational -> Scientific forall a. Fractional a => Rational -> a fromRational Rational -protocolParamPoolPledgeInfluence +protocolParamPoolPledgeInfluence :: Scientific) , Text "protocolVersion" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv -.= let (Natural -major, Natural -minor) = (Natural, Natural) -protocolParamProtocolVersion +.= let (Natural +major, Natural +minor) = (Natural, Natural) +protocolParamProtocolVersion in [Pair] -> Value object [Text "major" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -major, Text +major, Text "minor" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -minor] +minor] , Text "txFeeFixed" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -protocolParamTxFeeFixed +protocolParamTxFeeFixed , Text "txFeePerByte" Text -> Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -protocolParamTxFeePerByte +protocolParamTxFeePerByte -- Alonzo era: , Text "costModels" Text -> Map AnyPlutusScriptVersion CostModel -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Map AnyPlutusScriptVersion CostModel -protocolParamCostModels +protocolParamCostModels , Text "executionUnitPrices" Text -> Maybe ExecutionUnitPrices -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe ExecutionUnitPrices -protocolParamPrices +protocolParamPrices , Text "maxTxExecutionUnits" Text -> Maybe ExecutionUnits -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe ExecutionUnits -protocolParamMaxTxExUnits +protocolParamMaxTxExUnits , Text "maxBlockExecutionUnits" Text -> Maybe ExecutionUnits -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe ExecutionUnits -protocolParamMaxBlockExUnits +protocolParamMaxBlockExUnits , Text "maxValueSize" Text -> Maybe Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe Natural -protocolParamMaxValueSize +protocolParamMaxValueSize , Text "collateralPercentage" Text -> Maybe Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe Natural -protocolParamCollateralPercent +protocolParamCollateralPercent , Text "maxCollateralInputs" Text -> Maybe Natural -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe Natural -protocolParamMaxCollateralInputs +protocolParamMaxCollateralInputs ] -- ---------------------------------------------------------------------------- @@ -1684,7 +1684,7 @@ ProtocolParametersUpdate -> Maybe Natural protocolUpdateMaxCollateralInputs :: Maybe Natural } - deriving (ProtocolParametersUpdate -> ProtocolParametersUpdate -> Bool + deriving (ProtocolParametersUpdate -> ProtocolParametersUpdate -> Bool (ProtocolParametersUpdate -> ProtocolParametersUpdate -> Bool) -> (ProtocolParametersUpdate -> ProtocolParametersUpdate -> Bool) -> Eq ProtocolParametersUpdate @@ -1693,7 +1693,7 @@ $c/= :: ProtocolParametersUpdate -> ProtocolParametersUpdate -> Bool == :: ProtocolParametersUpdate -> ProtocolParametersUpdate -> Bool $c== :: ProtocolParametersUpdate -> ProtocolParametersUpdate -> Bool -Eq, Int -> ProtocolParametersUpdate -> ShowS +Eq, Int -> ProtocolParametersUpdate -> ShowS [ProtocolParametersUpdate] -> ShowS ProtocolParametersUpdate -> String (Int -> ProtocolParametersUpdate -> ShowS) @@ -1710,12 +1710,12 @@ $cshowsPrec :: Int -> ProtocolParametersUpdate -> ShowS Show) -instance Semigroup ProtocolParametersUpdate where - ProtocolParametersUpdate -ppu1 <> :: ProtocolParametersUpdate +instance Semigroup ProtocolParametersUpdate where + ProtocolParametersUpdate +ppu1 <> :: ProtocolParametersUpdate -> ProtocolParametersUpdate -> ProtocolParametersUpdate -<> ProtocolParametersUpdate -ppu2 = +<> ProtocolParametersUpdate +ppu2 = ProtocolParametersUpdate :: Maybe (Natural, Natural) -> Maybe Rational -> Maybe (Maybe PraosNonce) @@ -1747,94 +1747,94 @@ protocolUpdateProtocolVersion = (ProtocolParametersUpdate -> Maybe (Natural, Natural)) -> Maybe (Natural, Natural) forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe (Natural, Natural) +merge ProtocolParametersUpdate -> Maybe (Natural, Natural) protocolUpdateProtocolVersion , protocolUpdateDecentralization :: Maybe Rational protocolUpdateDecentralization = (ProtocolParametersUpdate -> Maybe Rational) -> Maybe Rational forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Rational +merge ProtocolParametersUpdate -> Maybe Rational protocolUpdateDecentralization , protocolUpdateExtraPraosEntropy :: Maybe (Maybe PraosNonce) protocolUpdateExtraPraosEntropy = (ProtocolParametersUpdate -> Maybe (Maybe PraosNonce)) -> Maybe (Maybe PraosNonce) forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe (Maybe PraosNonce) +merge ProtocolParametersUpdate -> Maybe (Maybe PraosNonce) protocolUpdateExtraPraosEntropy , protocolUpdateMaxBlockHeaderSize :: Maybe Natural protocolUpdateMaxBlockHeaderSize = (ProtocolParametersUpdate -> Maybe Natural) -> Maybe Natural forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Natural +merge ProtocolParametersUpdate -> Maybe Natural protocolUpdateMaxBlockHeaderSize , protocolUpdateMaxBlockBodySize :: Maybe Natural protocolUpdateMaxBlockBodySize = (ProtocolParametersUpdate -> Maybe Natural) -> Maybe Natural forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Natural +merge ProtocolParametersUpdate -> Maybe Natural protocolUpdateMaxBlockBodySize , protocolUpdateMaxTxSize :: Maybe Natural protocolUpdateMaxTxSize = (ProtocolParametersUpdate -> Maybe Natural) -> Maybe Natural forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Natural +merge ProtocolParametersUpdate -> Maybe Natural protocolUpdateMaxTxSize , protocolUpdateTxFeeFixed :: Maybe Natural protocolUpdateTxFeeFixed = (ProtocolParametersUpdate -> Maybe Natural) -> Maybe Natural forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Natural +merge ProtocolParametersUpdate -> Maybe Natural protocolUpdateTxFeeFixed , protocolUpdateTxFeePerByte :: Maybe Natural protocolUpdateTxFeePerByte = (ProtocolParametersUpdate -> Maybe Natural) -> Maybe Natural forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Natural +merge ProtocolParametersUpdate -> Maybe Natural protocolUpdateTxFeePerByte , protocolUpdateMinUTxOValue :: Maybe Lovelace protocolUpdateMinUTxOValue = (ProtocolParametersUpdate -> Maybe Lovelace) -> Maybe Lovelace forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Lovelace +merge ProtocolParametersUpdate -> Maybe Lovelace protocolUpdateMinUTxOValue , protocolUpdateStakeAddressDeposit :: Maybe Lovelace protocolUpdateStakeAddressDeposit = (ProtocolParametersUpdate -> Maybe Lovelace) -> Maybe Lovelace forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Lovelace +merge ProtocolParametersUpdate -> Maybe Lovelace protocolUpdateStakeAddressDeposit , protocolUpdateStakePoolDeposit :: Maybe Lovelace protocolUpdateStakePoolDeposit = (ProtocolParametersUpdate -> Maybe Lovelace) -> Maybe Lovelace forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Lovelace +merge ProtocolParametersUpdate -> Maybe Lovelace protocolUpdateStakePoolDeposit , protocolUpdateMinPoolCost :: Maybe Lovelace protocolUpdateMinPoolCost = (ProtocolParametersUpdate -> Maybe Lovelace) -> Maybe Lovelace forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Lovelace +merge ProtocolParametersUpdate -> Maybe Lovelace protocolUpdateMinPoolCost , protocolUpdatePoolRetireMaxEpoch :: Maybe EpochNo protocolUpdatePoolRetireMaxEpoch = (ProtocolParametersUpdate -> Maybe EpochNo) -> Maybe EpochNo forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe EpochNo +merge ProtocolParametersUpdate -> Maybe EpochNo protocolUpdatePoolRetireMaxEpoch , protocolUpdateStakePoolTargetNum :: Maybe Natural protocolUpdateStakePoolTargetNum = (ProtocolParametersUpdate -> Maybe Natural) -> Maybe Natural forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Natural +merge ProtocolParametersUpdate -> Maybe Natural protocolUpdateStakePoolTargetNum , protocolUpdatePoolPledgeInfluence :: Maybe Rational protocolUpdatePoolPledgeInfluence = (ProtocolParametersUpdate -> Maybe Rational) -> Maybe Rational forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Rational +merge ProtocolParametersUpdate -> Maybe Rational protocolUpdatePoolPledgeInfluence , protocolUpdateMonetaryExpansion :: Maybe Rational protocolUpdateMonetaryExpansion = (ProtocolParametersUpdate -> Maybe Rational) -> Maybe Rational forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Rational +merge ProtocolParametersUpdate -> Maybe Rational protocolUpdateMonetaryExpansion , protocolUpdateTreasuryCut :: Maybe Rational protocolUpdateTreasuryCut = (ProtocolParametersUpdate -> Maybe Rational) -> Maybe Rational forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Rational +merge ProtocolParametersUpdate -> Maybe Rational protocolUpdateTreasuryCut -- Intoduced in Alonzo below. , protocolUpdateUTxOCostPerWord :: Maybe Lovelace protocolUpdateUTxOCostPerWord = (ProtocolParametersUpdate -> Maybe Lovelace) -> Maybe Lovelace forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Lovelace +merge ProtocolParametersUpdate -> Maybe Lovelace protocolUpdateUTxOCostPerWord , protocolUpdateCostModels :: Map AnyPlutusScriptVersion CostModel protocolUpdateCostModels = (ProtocolParametersUpdate -> Map AnyPlutusScriptVersion CostModel) @@ -1842,69 +1842,69 @@ forall k a. Ord k => (ProtocolParametersUpdate -> Map k a) -> Map k a -mergeMap ProtocolParametersUpdate -> Map AnyPlutusScriptVersion CostModel +mergeMap ProtocolParametersUpdate -> Map AnyPlutusScriptVersion CostModel protocolUpdateCostModels , protocolUpdatePrices :: Maybe ExecutionUnitPrices protocolUpdatePrices = (ProtocolParametersUpdate -> Maybe ExecutionUnitPrices) -> Maybe ExecutionUnitPrices forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe ExecutionUnitPrices +merge ProtocolParametersUpdate -> Maybe ExecutionUnitPrices protocolUpdatePrices , protocolUpdateMaxTxExUnits :: Maybe ExecutionUnits protocolUpdateMaxTxExUnits = (ProtocolParametersUpdate -> Maybe ExecutionUnits) -> Maybe ExecutionUnits forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe ExecutionUnits +merge ProtocolParametersUpdate -> Maybe ExecutionUnits protocolUpdateMaxTxExUnits , protocolUpdateMaxBlockExUnits :: Maybe ExecutionUnits protocolUpdateMaxBlockExUnits = (ProtocolParametersUpdate -> Maybe ExecutionUnits) -> Maybe ExecutionUnits forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe ExecutionUnits +merge ProtocolParametersUpdate -> Maybe ExecutionUnits protocolUpdateMaxBlockExUnits , protocolUpdateMaxValueSize :: Maybe Natural protocolUpdateMaxValueSize = (ProtocolParametersUpdate -> Maybe Natural) -> Maybe Natural forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Natural +merge ProtocolParametersUpdate -> Maybe Natural protocolUpdateMaxValueSize , protocolUpdateCollateralPercent :: Maybe Natural protocolUpdateCollateralPercent = (ProtocolParametersUpdate -> Maybe Natural) -> Maybe Natural forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Natural +merge ProtocolParametersUpdate -> Maybe Natural protocolUpdateCollateralPercent , protocolUpdateMaxCollateralInputs :: Maybe Natural protocolUpdateMaxCollateralInputs = (ProtocolParametersUpdate -> Maybe Natural) -> Maybe Natural forall a. (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe Natural +merge ProtocolParametersUpdate -> Maybe Natural protocolUpdateMaxCollateralInputs } where -- prefer the right hand side: - merge :: (ProtocolParametersUpdate -> Maybe a) -> Maybe a - merge :: (ProtocolParametersUpdate -> Maybe a) -> Maybe a -merge ProtocolParametersUpdate -> Maybe a -f = ProtocolParametersUpdate -> Maybe a -f ProtocolParametersUpdate -ppu2 Maybe a -> Maybe a -> Maybe a + merge :: (ProtocolParametersUpdate -> Maybe a) -> Maybe a + merge :: (ProtocolParametersUpdate -> Maybe a) -> Maybe a +merge ProtocolParametersUpdate -> Maybe a +f = ProtocolParametersUpdate -> Maybe a +f ProtocolParametersUpdate +ppu2 Maybe a -> Maybe a -> Maybe a forall (m :: * -> *) a. MonadPlus m => m a -> m a -> m a `mplus` ProtocolParametersUpdate -> Maybe a -f ProtocolParametersUpdate -ppu1 +f ProtocolParametersUpdate +ppu1 -- prefer the right hand side: - mergeMap :: Ord k => (ProtocolParametersUpdate -> Map k a) -> Map k a - mergeMap :: (ProtocolParametersUpdate -> Map k a) -> Map k a -mergeMap ProtocolParametersUpdate -> Map k a -f = ProtocolParametersUpdate -> Map k a -f ProtocolParametersUpdate -ppu2 Map k a -> Map k a -> Map k a + mergeMap :: Ord k => (ProtocolParametersUpdate -> Map k a) -> Map k a + mergeMap :: (ProtocolParametersUpdate -> Map k a) -> Map k a +mergeMap ProtocolParametersUpdate -> Map k a +f = ProtocolParametersUpdate -> Map k a +f ProtocolParametersUpdate +ppu2 Map k a -> Map k a -> Map k a forall k a. Ord k => Map k a -> Map k a -> Map k a `Map.union` ProtocolParametersUpdate -> Map k a -f ProtocolParametersUpdate -ppu1 +f ProtocolParametersUpdate +ppu1 -instance Monoid ProtocolParametersUpdate where - mempty :: ProtocolParametersUpdate +instance Monoid ProtocolParametersUpdate where + mempty :: ProtocolParametersUpdate mempty = ProtocolParametersUpdate :: Maybe (Natural, Natural) -> Maybe Rational @@ -2040,8 +2040,8 @@ -- Praos nonce -- -newtype PraosNonce = PraosNonce (Ledger.Hash StandardCrypto ByteString) - deriving (PraosNonce -> PraosNonce -> Bool +newtype PraosNonce = PraosNonce (Ledger.Hash StandardCrypto ByteString) + deriving (PraosNonce -> PraosNonce -> Bool (PraosNonce -> PraosNonce -> Bool) -> (PraosNonce -> PraosNonce -> Bool) -> Eq PraosNonce forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -2049,7 +2049,7 @@ $c/= :: PraosNonce -> PraosNonce -> Bool == :: PraosNonce -> PraosNonce -> Bool $c== :: PraosNonce -> PraosNonce -> Bool -Eq, Eq PraosNonce +Eq, Eq PraosNonce Eq PraosNonce -> (PraosNonce -> PraosNonce -> Ordering) -> (PraosNonce -> PraosNonce -> Bool) @@ -2087,7 +2087,7 @@ compare :: PraosNonce -> PraosNonce -> Ordering $ccompare :: PraosNonce -> PraosNonce -> Ordering $cp1Ord :: Eq PraosNonce -Ord, Int -> PraosNonce -> ShowS +Ord, Int -> PraosNonce -> ShowS [PraosNonce] -> ShowS PraosNonce -> String (Int -> PraosNonce -> ShowS) @@ -2112,10 +2112,10 @@ $cfrom :: forall x. PraosNonce -> Rep PraosNonce x Generic) -instance ToJSON PraosNonce where - toJSON :: PraosNonce -> Value -toJSON (PraosNonce Hash StandardCrypto ByteString -h) = +instance ToJSON PraosNonce where + toJSON :: PraosNonce -> Value +toJSON (PraosNonce Hash StandardCrypto ByteString +h) = Text -> Value Aeson.String (Text -> Value) -> Text -> Value forall a b. (a -> b) -> a -> b @@ -2123,22 +2123,22 @@ forall h a. Hash h a -> Text Crypto.hashToTextAsHex Hash StandardCrypto ByteString Hash Blake2b_256 ByteString -h +h -instance FromJSON PraosNonce where - parseJSON :: Value -> Parser PraosNonce -parseJSON = String -> (Text -> Parser PraosNonce) -> Value -> Parser PraosNonce +instance FromJSON PraosNonce where + parseJSON :: Value -> Parser PraosNonce +parseJSON = String -> (Text -> Parser PraosNonce) -> Value -> Parser PraosNonce forall a. String -> (Text -> Parser a) -> Value -> Parser a withText String "PraosNonce" ((Text -> Parser PraosNonce) -> Value -> Parser PraosNonce) -> (Text -> Parser PraosNonce) -> Value -> Parser PraosNonce forall a b. (a -> b) -> a -> b -$ \Text -h -> +$ \Text +h -> case Text -> Maybe (Hash Blake2b_256 ByteString) forall h a. HashAlgorithm h => Text -> Maybe (Hash h a) Crypto.hashFromTextAsHex Text -h of +h of Maybe (Hash Blake2b_256 ByteString) Nothing -> String -> Parser PraosNonce forall (m :: * -> *) a. MonadFail m => String -> m a @@ -2149,9 +2149,9 @@ forall a. Semigroup a => a -> a -> a <> Text -> String Text.unpack Text -h - Just Hash Blake2b_256 ByteString -nonce -> PraosNonce -> Parser PraosNonce +h + Just Hash Blake2b_256 ByteString +nonce -> PraosNonce -> Parser PraosNonce forall (m :: * -> *) a. Monad m => a -> m a return (PraosNonce -> Parser PraosNonce) -> PraosNonce -> Parser PraosNonce @@ -2159,7 +2159,7 @@ $ Hash StandardCrypto ByteString -> PraosNonce PraosNonce Hash StandardCrypto ByteString Hash Blake2b_256 ByteString -nonce +nonce makePraosNonce :: ByteString -> PraosNonce makePraosNonce :: ByteString -> PraosNonce @@ -2182,13 +2182,13 @@ toLedgerNonce Maybe PraosNonce Nothing = Nonce Ledger.NeutralNonce -toLedgerNonce (Just (PraosNonce Hash StandardCrypto ByteString -h)) = Hash Blake2b_256 Nonce -> Nonce +toLedgerNonce (Just (PraosNonce Hash StandardCrypto ByteString +h)) = Hash Blake2b_256 Nonce -> Nonce Ledger.Nonce (Hash Blake2b_256 ByteString -> Hash Blake2b_256 Nonce forall h a b. Hash h a -> Hash h b Crypto.castHash Hash StandardCrypto ByteString Hash Blake2b_256 ByteString -h) +h) fromLedgerNonce :: Ledger.Nonce -> Maybe PraosNonce fromLedgerNonce :: Nonce -> Maybe PraosNonce @@ -2196,14 +2196,14 @@ Ledger.NeutralNonce = Maybe PraosNonce forall a. Maybe a Nothing -fromLedgerNonce (Ledger.Nonce Hash Blake2b_256 Nonce -h) = PraosNonce -> Maybe PraosNonce +fromLedgerNonce (Ledger.Nonce Hash Blake2b_256 Nonce +h) = PraosNonce -> Maybe PraosNonce forall a. a -> Maybe a Just (Hash StandardCrypto ByteString -> PraosNonce PraosNonce (Hash Blake2b_256 Nonce -> Hash Blake2b_256 ByteString forall h a b. Hash h a -> Hash h b Crypto.castHash Hash Blake2b_256 Nonce -h)) +h)) -- ---------------------------------------------------------------------------- @@ -2222,7 +2222,7 @@ ExecutionUnitPrices -> Lovelace priceExecutionMemory :: Lovelace } - deriving (ExecutionUnitPrices -> ExecutionUnitPrices -> Bool + deriving (ExecutionUnitPrices -> ExecutionUnitPrices -> Bool (ExecutionUnitPrices -> ExecutionUnitPrices -> Bool) -> (ExecutionUnitPrices -> ExecutionUnitPrices -> Bool) -> Eq ExecutionUnitPrices @@ -2231,7 +2231,7 @@ $c/= :: ExecutionUnitPrices -> ExecutionUnitPrices -> Bool == :: ExecutionUnitPrices -> ExecutionUnitPrices -> Bool $c== :: ExecutionUnitPrices -> ExecutionUnitPrices -> Bool -Eq, Int -> ExecutionUnitPrices -> ShowS +Eq, Int -> ExecutionUnitPrices -> ShowS [ExecutionUnitPrices] -> ShowS ExecutionUnitPrices -> String (Int -> ExecutionUnitPrices -> ShowS) @@ -2248,30 +2248,30 @@ $cshowsPrec :: Int -> ExecutionUnitPrices -> ShowS Show) -instance ToJSON ExecutionUnitPrices where - toJSON :: ExecutionUnitPrices -> Value -toJSON ExecutionUnitPrices{Lovelace +instance ToJSON ExecutionUnitPrices where + toJSON :: ExecutionUnitPrices -> Value +toJSON ExecutionUnitPrices{Lovelace priceExecutionSteps :: Lovelace priceExecutionSteps :: ExecutionUnitPrices -> Lovelace -priceExecutionSteps, Lovelace +priceExecutionSteps, Lovelace priceExecutionMemory :: Lovelace priceExecutionMemory :: ExecutionUnitPrices -> Lovelace -priceExecutionMemory} = +priceExecutionMemory} = [Pair] -> Value object [ Text "priceSteps" Text -> Lovelace -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Lovelace -priceExecutionSteps +priceExecutionSteps , Text "priceMemory" Text -> Lovelace -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Lovelace -priceExecutionMemory ] +priceExecutionMemory ] -instance FromJSON ExecutionUnitPrices where - parseJSON :: Value -> Parser ExecutionUnitPrices -parseJSON = +instance FromJSON ExecutionUnitPrices where + parseJSON :: Value -> Parser ExecutionUnitPrices +parseJSON = String -> (Object -> Parser ExecutionUnitPrices) -> Value @@ -2284,15 +2284,15 @@ -> Value -> Parser ExecutionUnitPrices forall a b. (a -> b) -> a -> b -$ \Object -o -> +$ \Object +o -> Lovelace -> Lovelace -> ExecutionUnitPrices ExecutionUnitPrices (Lovelace -> Lovelace -> ExecutionUnitPrices) -> Parser Lovelace -> Parser (Lovelace -> ExecutionUnitPrices) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -o Object -> Text -> Parser Lovelace +o Object -> Text -> Parser Lovelace forall a. FromJSON a => Object -> Text -> Parser a .: Text "priceSteps" @@ -2300,7 +2300,7 @@ -> Parser Lovelace -> Parser ExecutionUnitPrices forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Lovelace +o Object -> Text -> Parser Lovelace forall a. FromJSON a => Object -> Text -> Parser a .: Text "priceMemory" @@ -2308,44 +2308,44 @@ toAlonzoPrices :: ExecutionUnitPrices -> Alonzo.Prices toAlonzoPrices :: ExecutionUnitPrices -> Prices -toAlonzoPrices ExecutionUnitPrices{Lovelace +toAlonzoPrices ExecutionUnitPrices{Lovelace priceExecutionSteps :: Lovelace priceExecutionSteps :: ExecutionUnitPrices -> Lovelace -priceExecutionSteps, Lovelace +priceExecutionSteps, Lovelace priceExecutionMemory :: Lovelace priceExecutionMemory :: ExecutionUnitPrices -> Lovelace -priceExecutionMemory} = +priceExecutionMemory} = Prices :: Coin -> Coin -> Prices Alonzo.Prices { prSteps :: Coin Alonzo.prSteps = Lovelace -> Coin toShelleyLovelace Lovelace -priceExecutionSteps, +priceExecutionSteps, prMem :: Coin Alonzo.prMem = Lovelace -> Coin toShelleyLovelace Lovelace -priceExecutionMemory +priceExecutionMemory } fromAlonzoPrices :: Alonzo.Prices -> ExecutionUnitPrices fromAlonzoPrices :: Prices -> ExecutionUnitPrices -fromAlonzoPrices Alonzo.Prices{Coin +fromAlonzoPrices Alonzo.Prices{Coin prSteps :: Coin prSteps :: Prices -> Coin -Alonzo.prSteps, Coin +Alonzo.prSteps, Coin prMem :: Coin prMem :: Prices -> Coin -Alonzo.prMem} = +Alonzo.prMem} = ExecutionUnitPrices :: Lovelace -> Lovelace -> ExecutionUnitPrices ExecutionUnitPrices { priceExecutionSteps :: Lovelace priceExecutionSteps = Coin -> Lovelace fromShelleyLovelace Coin -prSteps, +prSteps, priceExecutionMemory :: Lovelace priceExecutionMemory = Coin -> Lovelace fromShelleyLovelace Coin -prMem +prMem } @@ -2354,7 +2354,7 @@ -- newtype CostModel = CostModel (Map Text Integer) - deriving (CostModel -> CostModel -> Bool + deriving (CostModel -> CostModel -> Bool (CostModel -> CostModel -> Bool) -> (CostModel -> CostModel -> Bool) -> Eq CostModel forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -2362,7 +2362,7 @@ $c/= :: CostModel -> CostModel -> Bool == :: CostModel -> CostModel -> Bool $c== :: CostModel -> CostModel -> Bool -Eq, Int -> CostModel -> ShowS +Eq, Int -> CostModel -> ShowS [CostModel] -> ShowS CostModel -> String (Int -> CostModel -> ShowS) @@ -2378,7 +2378,7 @@ showsPrec :: Int -> CostModel -> ShowS $cshowsPrec :: Int -> CostModel -> ShowS Show) - deriving newtype ([CostModel] -> Value + deriving newtype ([CostModel] -> Value [CostModel] -> Encoding CostModel -> Value CostModel -> Encoding @@ -2401,7 +2401,7 @@ $ctoEncoding :: CostModel -> Encoding toJSON :: CostModel -> Value $ctoJSON :: CostModel -> Value -ToJSON, Value -> Parser [CostModel] +ToJSON, Value -> Parser [CostModel] Value -> Parser CostModel (Value -> Parser CostModel) -> (Value -> Parser [CostModel]) -> FromJSON CostModel @@ -2411,22 +2411,22 @@ $cparseJSONList :: Value -> Parser [CostModel] parseJSON :: Value -> Parser CostModel $cparseJSON :: Value -> Parser CostModel -FromJSON) +FromJSON) -validateCostModel :: PlutusScriptVersion lang +validateCostModel :: PlutusScriptVersion lang -> CostModel -> Either InvalidCostModel () validateCostModel :: PlutusScriptVersion lang -> CostModel -> Either InvalidCostModel () validateCostModel PlutusScriptVersion lang -PlutusScriptV1 (CostModel Map Text Integer -m) +PlutusScriptV1 (CostModel Map Text Integer +m) -- TODO alonzo: the ledger library should export something for this, e.g. like its -- existing checkCostModel function. We should not need to depend on the -- Plutus library directly. That makes too many assumptions about what the -- ledger library is doing. | Map Text Integer -> Bool Plutus.validateCostModelParams Map Text Integer -m = () -> Either InvalidCostModel () +m = () -> Either InvalidCostModel () forall a b. b -> Either a b Right () | Bool @@ -2435,11 +2435,11 @@ Left (CostModel -> InvalidCostModel InvalidCostModel (Map Text Integer -> CostModel CostModel Map Text Integer -m)) +m)) -- TODO alonzo: it'd be nice if the library told us what was wrong newtype InvalidCostModel = InvalidCostModel CostModel - deriving Int -> InvalidCostModel -> ShowS + deriving Int -> InvalidCostModel -> ShowS [InvalidCostModel] -> ShowS InvalidCostModel -> String (Int -> InvalidCostModel -> ShowS) @@ -2457,16 +2457,16 @@ Show instance Error InvalidCostModel where - displayError :: InvalidCostModel -> String -displayError (InvalidCostModel CostModel -cm) = + displayError :: InvalidCostModel -> String +displayError (InvalidCostModel CostModel +cm) = String "Invalid cost model: " String -> ShowS forall a. [a] -> [a] -> [a] ++ CostModel -> String forall a. Show a => a -> String show CostModel -cm +cm toAlonzoCostModels @@ -2561,17 +2561,17 @@ toAlonzoCostModel :: CostModel -> Alonzo.CostModel toAlonzoCostModel :: CostModel -> CostModel -toAlonzoCostModel (CostModel Map Text Integer -m) = Map Text Integer -> CostModel +toAlonzoCostModel (CostModel Map Text Integer +m) = Map Text Integer -> CostModel Alonzo.CostModel Map Text Integer -m +m fromAlonzoCostModel :: Alonzo.CostModel -> CostModel fromAlonzoCostModel :: CostModel -> CostModel -fromAlonzoCostModel (Alonzo.CostModel Map Text Integer -m) = Map Text Integer -> CostModel +fromAlonzoCostModel (Alonzo.CostModel Map Text Integer +m) = Map Text Integer -> CostModel CostModel Map Text Integer -m +m -- ---------------------------------------------------------------------------- @@ -2582,7 +2582,7 @@ UpdateProposal !(Map (Hash GenesisKey) ProtocolParametersUpdate) !EpochNo - deriving stock (UpdateProposal -> UpdateProposal -> Bool + deriving stock (UpdateProposal -> UpdateProposal -> Bool (UpdateProposal -> UpdateProposal -> Bool) -> (UpdateProposal -> UpdateProposal -> Bool) -> Eq UpdateProposal forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -2590,7 +2590,7 @@ $c/= :: UpdateProposal -> UpdateProposal -> Bool == :: UpdateProposal -> UpdateProposal -> Bool $c== :: UpdateProposal -> UpdateProposal -> Bool -Eq, Int -> UpdateProposal -> ShowS +Eq, Int -> UpdateProposal -> ShowS [UpdateProposal] -> ShowS UpdateProposal -> String (Int -> UpdateProposal -> ShowS) @@ -2609,20 +2609,20 @@ instance HasTypeProxy UpdateProposal where data AsType UpdateProposal = AsUpdateProposal - proxyToAsType :: Proxy UpdateProposal -> AsType UpdateProposal + proxyToAsType :: Proxy UpdateProposal -> AsType UpdateProposal proxyToAsType Proxy UpdateProposal _ = AsType UpdateProposal AsUpdateProposal -instance HasTextEnvelope UpdateProposal where - textEnvelopeType :: AsType UpdateProposal -> TextEnvelopeType +instance HasTextEnvelope UpdateProposal where + textEnvelopeType :: AsType UpdateProposal -> TextEnvelopeType textEnvelopeType AsType UpdateProposal _ = TextEnvelopeType "UpdateProposalShelley" instance SerialiseAsCBOR UpdateProposal where --TODO alonzo: we can no longer use this Shelley-specific encoding - serialiseToCBOR :: UpdateProposal -> ByteString + serialiseToCBOR :: UpdateProposal -> ByteString serialiseToCBOR = Encoding -> ByteString CBOR.serializeEncoding' (Encoding -> ByteString) @@ -2644,11 +2644,11 @@ ShelleyBasedEra era -> UpdateProposal -> Update ledgerera toLedgerUpdate ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley - deserialiseFromCBOR :: AsType UpdateProposal + deserialiseFromCBOR :: AsType UpdateProposal -> ByteString -> Either DecoderError UpdateProposal deserialiseFromCBOR AsType UpdateProposal -_ ByteString -bs = +_ ByteString +bs = ShelleyBasedEra ShelleyEra -> Update StandardShelley -> UpdateProposal forall era ledgerera. @@ -2664,7 +2664,7 @@ forall a. FromCBOR a => LByteString -> Either DecoderError a CBOR.decodeFull (ByteString -> LByteString LBS.fromStrict ByteString -bs) +bs) makeShelleyUpdateProposal :: ProtocolParametersUpdate @@ -2673,9 +2673,9 @@ -> UpdateProposal makeShelleyUpdateProposal :: ProtocolParametersUpdate -> [Hash GenesisKey] -> EpochNo -> UpdateProposal -makeShelleyUpdateProposal ProtocolParametersUpdate -params [Hash GenesisKey] -genesisKeyHashes = +makeShelleyUpdateProposal ProtocolParametersUpdate +params [Hash GenesisKey] +genesisKeyHashes = --TODO decide how to handle parameter validation Map (Hash GenesisKey) ProtocolParametersUpdate -> EpochNo -> UpdateProposal @@ -2683,27 +2683,27 @@ -> Map (Hash GenesisKey) ProtocolParametersUpdate forall k a. Ord k => [(k, a)] -> Map k a Map.fromList [ (Hash GenesisKey -kh, ProtocolParametersUpdate -params) | Hash GenesisKey -kh <- [Hash GenesisKey] -genesisKeyHashes ]) +kh, ProtocolParametersUpdate +params) | Hash GenesisKey +kh <- [Hash GenesisKey] +genesisKeyHashes ]) -- ---------------------------------------------------------------------------- -- Conversion functions: updates to ledger types -- -toLedgerUpdate :: forall era ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.Crypto ledgerera ~ StandardCrypto - => ShelleyBasedEra era +toLedgerUpdate :: forall era ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.Crypto ledgerera ~ StandardCrypto + => ShelleyBasedEra era -> UpdateProposal - -> Ledger.Update ledgerera + -> Ledger.Update ledgerera toLedgerUpdate :: ShelleyBasedEra era -> UpdateProposal -> Update ledgerera -toLedgerUpdate ShelleyBasedEra era -era (UpdateProposal Map (Hash GenesisKey) ProtocolParametersUpdate -ppup EpochNo -epochno) = +toLedgerUpdate ShelleyBasedEra era +era (UpdateProposal Map (Hash GenesisKey) ProtocolParametersUpdate +ppup EpochNo +epochno) = ProposedPPUpdates ledgerera -> EpochNo -> Update ledgerera forall era. ProposedPPUpdates era -> EpochNo -> Update era Ledger.Update (ShelleyBasedEra era @@ -2716,22 +2716,22 @@ -> Map (Hash GenesisKey) ProtocolParametersUpdate -> ProposedPPUpdates ledgerera toLedgerProposedPPUpdates ShelleyBasedEra era -era Map (Hash GenesisKey) ProtocolParametersUpdate -ppup) EpochNo -epochno +era Map (Hash GenesisKey) ProtocolParametersUpdate +ppup) EpochNo +epochno -toLedgerProposedPPUpdates :: forall era ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.Crypto ledgerera ~ StandardCrypto - => ShelleyBasedEra era +toLedgerProposedPPUpdates :: forall era ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.Crypto ledgerera ~ StandardCrypto + => ShelleyBasedEra era -> Map (Hash GenesisKey) ProtocolParametersUpdate - -> Ledger.ProposedPPUpdates ledgerera + -> Ledger.ProposedPPUpdates ledgerera toLedgerProposedPPUpdates :: ShelleyBasedEra era -> Map (Hash GenesisKey) ProtocolParametersUpdate -> ProposedPPUpdates ledgerera -toLedgerProposedPPUpdates ShelleyBasedEra era -era = +toLedgerProposedPPUpdates ShelleyBasedEra era +era = Map (KeyHash 'Genesis StandardCrypto) (PParamsDelta ledgerera) -> ProposedPPUpdates ledgerera forall era. @@ -2749,8 +2749,8 @@ -> Map (Hash GenesisKey) (PParamsDelta ledgerera) -> Map (KeyHash 'Genesis StandardCrypto) (PParamsDelta ledgerera) forall k1 k2 a. (k1 -> k2) -> Map k1 a -> Map k2 a -Map.mapKeysMonotonic (\(GenesisKeyHash kh) -> KeyHash 'Genesis StandardCrypto -kh) +Map.mapKeysMonotonic (\(GenesisKeyHash kh) -> KeyHash 'Genesis StandardCrypto +kh) (Map (Hash GenesisKey) (PParamsDelta ledgerera) -> Map (KeyHash 'Genesis StandardCrypto) (PParamsDelta ledgerera)) -> (Map (Hash GenesisKey) ProtocolParametersUpdate @@ -2768,12 +2768,12 @@ ShelleyBasedEra era -> ProtocolParametersUpdate -> PParamsDelta (ShelleyLedgerEra era) toLedgerPParamsDelta ShelleyBasedEra era -era) +era) -toLedgerPParamsDelta :: ShelleyBasedEra era +toLedgerPParamsDelta :: ShelleyBasedEra era -> ProtocolParametersUpdate - -> Ledger.PParamsDelta (ShelleyLedgerEra era) + -> Ledger.PParamsDelta (ShelleyLedgerEra era) toLedgerPParamsDelta :: ShelleyBasedEra era -> ProtocolParametersUpdate -> PParamsDelta (ShelleyLedgerEra era) toLedgerPParamsDelta ShelleyBasedEra era @@ -2798,79 +2798,79 @@ toAlonzoPParamsUpdate -toShelleyPParamsUpdate :: ProtocolParametersUpdate - -> Shelley.PParamsUpdate ledgerera +toShelleyPParamsUpdate :: ProtocolParametersUpdate + -> Shelley.PParamsUpdate ledgerera toShelleyPParamsUpdate :: ProtocolParametersUpdate -> PParamsUpdate ledgerera toShelleyPParamsUpdate ProtocolParametersUpdate { - Maybe (Natural, Natural) + Maybe (Natural, Natural) protocolUpdateProtocolVersion :: Maybe (Natural, Natural) protocolUpdateProtocolVersion :: ProtocolParametersUpdate -> Maybe (Natural, Natural) -protocolUpdateProtocolVersion - , Maybe Rational +protocolUpdateProtocolVersion + , Maybe Rational protocolUpdateDecentralization :: Maybe Rational protocolUpdateDecentralization :: ProtocolParametersUpdate -> Maybe Rational -protocolUpdateDecentralization - , Maybe (Maybe PraosNonce) +protocolUpdateDecentralization + , Maybe (Maybe PraosNonce) protocolUpdateExtraPraosEntropy :: Maybe (Maybe PraosNonce) protocolUpdateExtraPraosEntropy :: ProtocolParametersUpdate -> Maybe (Maybe PraosNonce) -protocolUpdateExtraPraosEntropy - , Maybe Natural +protocolUpdateExtraPraosEntropy + , Maybe Natural protocolUpdateMaxBlockHeaderSize :: Maybe Natural protocolUpdateMaxBlockHeaderSize :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateMaxBlockHeaderSize - , Maybe Natural +protocolUpdateMaxBlockHeaderSize + , Maybe Natural protocolUpdateMaxBlockBodySize :: Maybe Natural protocolUpdateMaxBlockBodySize :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateMaxBlockBodySize - , Maybe Natural +protocolUpdateMaxBlockBodySize + , Maybe Natural protocolUpdateMaxTxSize :: Maybe Natural protocolUpdateMaxTxSize :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateMaxTxSize - , Maybe Natural +protocolUpdateMaxTxSize + , Maybe Natural protocolUpdateTxFeeFixed :: Maybe Natural protocolUpdateTxFeeFixed :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateTxFeeFixed - , Maybe Natural +protocolUpdateTxFeeFixed + , Maybe Natural protocolUpdateTxFeePerByte :: Maybe Natural protocolUpdateTxFeePerByte :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateTxFeePerByte - , Maybe Lovelace +protocolUpdateTxFeePerByte + , Maybe Lovelace protocolUpdateMinUTxOValue :: Maybe Lovelace protocolUpdateMinUTxOValue :: ProtocolParametersUpdate -> Maybe Lovelace -protocolUpdateMinUTxOValue - , Maybe Lovelace +protocolUpdateMinUTxOValue + , Maybe Lovelace protocolUpdateStakeAddressDeposit :: Maybe Lovelace protocolUpdateStakeAddressDeposit :: ProtocolParametersUpdate -> Maybe Lovelace -protocolUpdateStakeAddressDeposit - , Maybe Lovelace +protocolUpdateStakeAddressDeposit + , Maybe Lovelace protocolUpdateStakePoolDeposit :: Maybe Lovelace protocolUpdateStakePoolDeposit :: ProtocolParametersUpdate -> Maybe Lovelace -protocolUpdateStakePoolDeposit - , Maybe Lovelace +protocolUpdateStakePoolDeposit + , Maybe Lovelace protocolUpdateMinPoolCost :: Maybe Lovelace protocolUpdateMinPoolCost :: ProtocolParametersUpdate -> Maybe Lovelace -protocolUpdateMinPoolCost - , Maybe EpochNo +protocolUpdateMinPoolCost + , Maybe EpochNo protocolUpdatePoolRetireMaxEpoch :: Maybe EpochNo protocolUpdatePoolRetireMaxEpoch :: ProtocolParametersUpdate -> Maybe EpochNo -protocolUpdatePoolRetireMaxEpoch - , Maybe Natural +protocolUpdatePoolRetireMaxEpoch + , Maybe Natural protocolUpdateStakePoolTargetNum :: Maybe Natural protocolUpdateStakePoolTargetNum :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateStakePoolTargetNum - , Maybe Rational +protocolUpdateStakePoolTargetNum + , Maybe Rational protocolUpdatePoolPledgeInfluence :: Maybe Rational protocolUpdatePoolPledgeInfluence :: ProtocolParametersUpdate -> Maybe Rational -protocolUpdatePoolPledgeInfluence - , Maybe Rational +protocolUpdatePoolPledgeInfluence + , Maybe Rational protocolUpdateMonetaryExpansion :: Maybe Rational protocolUpdateMonetaryExpansion :: ProtocolParametersUpdate -> Maybe Rational -protocolUpdateMonetaryExpansion - , Maybe Rational +protocolUpdateMonetaryExpansion + , Maybe Rational protocolUpdateTreasuryCut :: Maybe Rational protocolUpdateTreasuryCut :: ProtocolParametersUpdate -> Maybe Rational -protocolUpdateTreasuryCut +protocolUpdateTreasuryCut } = PParams :: forall (f :: * -> *) era. HKD f Natural @@ -2896,27 +2896,27 @@ Shelley._minfeeA = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateTxFeePerByte +protocolUpdateTxFeePerByte , _minfeeB :: HKD StrictMaybe Natural Shelley._minfeeB = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateTxFeeFixed +protocolUpdateTxFeeFixed , _maxBBSize :: HKD StrictMaybe Natural Shelley._maxBBSize = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateMaxBlockBodySize +protocolUpdateMaxBlockBodySize , _maxTxSize :: HKD StrictMaybe Natural Shelley._maxTxSize = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateMaxTxSize +protocolUpdateMaxTxSize , _maxBHSize :: HKD StrictMaybe Natural Shelley._maxBHSize = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateMaxBlockHeaderSize +protocolUpdateMaxBlockHeaderSize , _keyDeposit :: HKD StrictMaybe Coin Shelley._keyDeposit = Lovelace -> Coin toShelleyLovelace (Lovelace -> Coin) -> StrictMaybe Lovelace -> StrictMaybe Coin @@ -2925,7 +2925,7 @@ Maybe Lovelace -> StrictMaybe Lovelace forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Lovelace -protocolUpdateStakeAddressDeposit +protocolUpdateStakeAddressDeposit , _poolDeposit :: HKD StrictMaybe Coin Shelley._poolDeposit = Lovelace -> Coin toShelleyLovelace (Lovelace -> Coin) -> StrictMaybe Lovelace -> StrictMaybe Coin @@ -2934,22 +2934,22 @@ Maybe Lovelace -> StrictMaybe Lovelace forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Lovelace -protocolUpdateStakePoolDeposit +protocolUpdateStakePoolDeposit , _eMax :: HKD StrictMaybe EpochNo Shelley._eMax = Maybe EpochNo -> StrictMaybe EpochNo forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe EpochNo -protocolUpdatePoolRetireMaxEpoch +protocolUpdatePoolRetireMaxEpoch , _nOpt :: HKD StrictMaybe Natural Shelley._nOpt = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateStakePoolTargetNum +protocolUpdateStakePoolTargetNum , _a0 :: HKD StrictMaybe Rational Shelley._a0 = Maybe Rational -> StrictMaybe Rational forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Rational -protocolUpdatePoolPledgeInfluence +protocolUpdatePoolPledgeInfluence , _rho :: HKD StrictMaybe UnitInterval Shelley._rho = Rational -> UnitInterval Ledger.unitIntervalFromRational (Rational -> UnitInterval) @@ -2959,7 +2959,7 @@ Maybe Rational -> StrictMaybe Rational forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Rational -protocolUpdateMonetaryExpansion +protocolUpdateMonetaryExpansion , _tau :: HKD StrictMaybe UnitInterval Shelley._tau = Rational -> UnitInterval Ledger.unitIntervalFromRational (Rational -> UnitInterval) @@ -2969,7 +2969,7 @@ Maybe Rational -> StrictMaybe Rational forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Rational -protocolUpdateTreasuryCut +protocolUpdateTreasuryCut , _d :: HKD StrictMaybe UnitInterval Shelley._d = Rational -> UnitInterval Ledger.unitIntervalFromRational (Rational -> UnitInterval) @@ -2979,7 +2979,7 @@ Maybe Rational -> StrictMaybe Rational forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Rational -protocolUpdateDecentralization +protocolUpdateDecentralization , _extraEntropy :: HKD StrictMaybe Nonce Shelley._extraEntropy = Maybe PraosNonce -> Nonce toLedgerNonce (Maybe PraosNonce -> Nonce) @@ -2989,7 +2989,7 @@ Maybe (Maybe PraosNonce) -> StrictMaybe (Maybe PraosNonce) forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe (Maybe PraosNonce) -protocolUpdateExtraPraosEntropy +protocolUpdateExtraPraosEntropy , _protocolVersion :: HKD StrictMaybe ProtVer Shelley._protocolVersion = (Natural -> Natural -> ProtVer) -> (Natural, Natural) -> ProtVer forall a b c. (a -> b -> c) -> (a, b) -> c @@ -3001,7 +3001,7 @@ Maybe (Natural, Natural) -> StrictMaybe (Natural, Natural) forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe (Natural, Natural) -protocolUpdateProtocolVersion +protocolUpdateProtocolVersion , _minUTxOValue :: HKD StrictMaybe Coin Shelley._minUTxOValue = Lovelace -> Coin toShelleyLovelace (Lovelace -> Coin) -> StrictMaybe Lovelace -> StrictMaybe Coin @@ -3010,7 +3010,7 @@ Maybe Lovelace -> StrictMaybe Lovelace forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Lovelace -protocolUpdateMinUTxOValue +protocolUpdateMinUTxOValue , _minPoolCost :: HKD StrictMaybe Coin Shelley._minPoolCost = Lovelace -> Coin toShelleyLovelace (Lovelace -> Coin) -> StrictMaybe Lovelace -> StrictMaybe Coin @@ -3019,111 +3019,111 @@ Maybe Lovelace -> StrictMaybe Lovelace forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Lovelace -protocolUpdateMinPoolCost +protocolUpdateMinPoolCost } -toAlonzoPParamsUpdate :: ProtocolParametersUpdate - -> Alonzo.PParamsUpdate ledgerera +toAlonzoPParamsUpdate :: ProtocolParametersUpdate + -> Alonzo.PParamsUpdate ledgerera toAlonzoPParamsUpdate :: ProtocolParametersUpdate -> PParamsUpdate ledgerera toAlonzoPParamsUpdate ProtocolParametersUpdate { - Maybe (Natural, Natural) + Maybe (Natural, Natural) protocolUpdateProtocolVersion :: Maybe (Natural, Natural) protocolUpdateProtocolVersion :: ProtocolParametersUpdate -> Maybe (Natural, Natural) -protocolUpdateProtocolVersion - , Maybe Rational +protocolUpdateProtocolVersion + , Maybe Rational protocolUpdateDecentralization :: Maybe Rational protocolUpdateDecentralization :: ProtocolParametersUpdate -> Maybe Rational -protocolUpdateDecentralization - , Maybe (Maybe PraosNonce) +protocolUpdateDecentralization + , Maybe (Maybe PraosNonce) protocolUpdateExtraPraosEntropy :: Maybe (Maybe PraosNonce) protocolUpdateExtraPraosEntropy :: ProtocolParametersUpdate -> Maybe (Maybe PraosNonce) -protocolUpdateExtraPraosEntropy - , Maybe Natural +protocolUpdateExtraPraosEntropy + , Maybe Natural protocolUpdateMaxBlockHeaderSize :: Maybe Natural protocolUpdateMaxBlockHeaderSize :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateMaxBlockHeaderSize - , Maybe Natural +protocolUpdateMaxBlockHeaderSize + , Maybe Natural protocolUpdateMaxBlockBodySize :: Maybe Natural protocolUpdateMaxBlockBodySize :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateMaxBlockBodySize - , Maybe Natural +protocolUpdateMaxBlockBodySize + , Maybe Natural protocolUpdateMaxTxSize :: Maybe Natural protocolUpdateMaxTxSize :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateMaxTxSize - , Maybe Natural +protocolUpdateMaxTxSize + , Maybe Natural protocolUpdateTxFeeFixed :: Maybe Natural protocolUpdateTxFeeFixed :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateTxFeeFixed - , Maybe Natural +protocolUpdateTxFeeFixed + , Maybe Natural protocolUpdateTxFeePerByte :: Maybe Natural protocolUpdateTxFeePerByte :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateTxFeePerByte - , Maybe Lovelace +protocolUpdateTxFeePerByte + , Maybe Lovelace protocolUpdateStakeAddressDeposit :: Maybe Lovelace protocolUpdateStakeAddressDeposit :: ProtocolParametersUpdate -> Maybe Lovelace -protocolUpdateStakeAddressDeposit - , Maybe Lovelace +protocolUpdateStakeAddressDeposit + , Maybe Lovelace protocolUpdateStakePoolDeposit :: Maybe Lovelace protocolUpdateStakePoolDeposit :: ProtocolParametersUpdate -> Maybe Lovelace -protocolUpdateStakePoolDeposit - , Maybe Lovelace +protocolUpdateStakePoolDeposit + , Maybe Lovelace protocolUpdateMinPoolCost :: Maybe Lovelace protocolUpdateMinPoolCost :: ProtocolParametersUpdate -> Maybe Lovelace -protocolUpdateMinPoolCost - , Maybe EpochNo +protocolUpdateMinPoolCost + , Maybe EpochNo protocolUpdatePoolRetireMaxEpoch :: Maybe EpochNo protocolUpdatePoolRetireMaxEpoch :: ProtocolParametersUpdate -> Maybe EpochNo -protocolUpdatePoolRetireMaxEpoch - , Maybe Natural +protocolUpdatePoolRetireMaxEpoch + , Maybe Natural protocolUpdateStakePoolTargetNum :: Maybe Natural protocolUpdateStakePoolTargetNum :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateStakePoolTargetNum - , Maybe Rational +protocolUpdateStakePoolTargetNum + , Maybe Rational protocolUpdatePoolPledgeInfluence :: Maybe Rational protocolUpdatePoolPledgeInfluence :: ProtocolParametersUpdate -> Maybe Rational -protocolUpdatePoolPledgeInfluence - , Maybe Rational +protocolUpdatePoolPledgeInfluence + , Maybe Rational protocolUpdateMonetaryExpansion :: Maybe Rational protocolUpdateMonetaryExpansion :: ProtocolParametersUpdate -> Maybe Rational -protocolUpdateMonetaryExpansion - , Maybe Rational +protocolUpdateMonetaryExpansion + , Maybe Rational protocolUpdateTreasuryCut :: Maybe Rational protocolUpdateTreasuryCut :: ProtocolParametersUpdate -> Maybe Rational -protocolUpdateTreasuryCut - , Maybe Lovelace +protocolUpdateTreasuryCut + , Maybe Lovelace protocolUpdateUTxOCostPerWord :: Maybe Lovelace protocolUpdateUTxOCostPerWord :: ProtocolParametersUpdate -> Maybe Lovelace -protocolUpdateUTxOCostPerWord - , Map AnyPlutusScriptVersion CostModel +protocolUpdateUTxOCostPerWord + , Map AnyPlutusScriptVersion CostModel protocolUpdateCostModels :: Map AnyPlutusScriptVersion CostModel protocolUpdateCostModels :: ProtocolParametersUpdate -> Map AnyPlutusScriptVersion CostModel -protocolUpdateCostModels - , Maybe ExecutionUnitPrices +protocolUpdateCostModels + , Maybe ExecutionUnitPrices protocolUpdatePrices :: Maybe ExecutionUnitPrices protocolUpdatePrices :: ProtocolParametersUpdate -> Maybe ExecutionUnitPrices -protocolUpdatePrices - , Maybe ExecutionUnits +protocolUpdatePrices + , Maybe ExecutionUnits protocolUpdateMaxTxExUnits :: Maybe ExecutionUnits protocolUpdateMaxTxExUnits :: ProtocolParametersUpdate -> Maybe ExecutionUnits -protocolUpdateMaxTxExUnits - , Maybe ExecutionUnits +protocolUpdateMaxTxExUnits + , Maybe ExecutionUnits protocolUpdateMaxBlockExUnits :: Maybe ExecutionUnits protocolUpdateMaxBlockExUnits :: ProtocolParametersUpdate -> Maybe ExecutionUnits -protocolUpdateMaxBlockExUnits - , Maybe Natural +protocolUpdateMaxBlockExUnits + , Maybe Natural protocolUpdateMaxValueSize :: Maybe Natural protocolUpdateMaxValueSize :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateMaxValueSize - , Maybe Natural +protocolUpdateMaxValueSize + , Maybe Natural protocolUpdateCollateralPercent :: Maybe Natural protocolUpdateCollateralPercent :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateCollateralPercent - , Maybe Natural +protocolUpdateCollateralPercent + , Maybe Natural protocolUpdateMaxCollateralInputs :: Maybe Natural protocolUpdateMaxCollateralInputs :: ProtocolParametersUpdate -> Maybe Natural -protocolUpdateMaxCollateralInputs +protocolUpdateMaxCollateralInputs } = PParams :: forall (f :: * -> *) era. HKD f Natural @@ -3156,27 +3156,27 @@ Alonzo._minfeeA = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateTxFeePerByte +protocolUpdateTxFeePerByte , _minfeeB :: HKD StrictMaybe Natural Alonzo._minfeeB = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateTxFeeFixed +protocolUpdateTxFeeFixed , _maxBBSize :: HKD StrictMaybe Natural Alonzo._maxBBSize = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateMaxBlockBodySize +protocolUpdateMaxBlockBodySize , _maxTxSize :: HKD StrictMaybe Natural Alonzo._maxTxSize = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateMaxTxSize +protocolUpdateMaxTxSize , _maxBHSize :: HKD StrictMaybe Natural Alonzo._maxBHSize = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateMaxBlockHeaderSize +protocolUpdateMaxBlockHeaderSize , _keyDeposit :: HKD StrictMaybe Coin Alonzo._keyDeposit = Lovelace -> Coin toShelleyLovelace (Lovelace -> Coin) -> StrictMaybe Lovelace -> StrictMaybe Coin @@ -3185,7 +3185,7 @@ Maybe Lovelace -> StrictMaybe Lovelace forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Lovelace -protocolUpdateStakeAddressDeposit +protocolUpdateStakeAddressDeposit , _poolDeposit :: HKD StrictMaybe Coin Alonzo._poolDeposit = Lovelace -> Coin toShelleyLovelace (Lovelace -> Coin) -> StrictMaybe Lovelace -> StrictMaybe Coin @@ -3194,22 +3194,22 @@ Maybe Lovelace -> StrictMaybe Lovelace forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Lovelace -protocolUpdateStakePoolDeposit +protocolUpdateStakePoolDeposit , _eMax :: HKD StrictMaybe EpochNo Alonzo._eMax = Maybe EpochNo -> StrictMaybe EpochNo forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe EpochNo -protocolUpdatePoolRetireMaxEpoch +protocolUpdatePoolRetireMaxEpoch , _nOpt :: HKD StrictMaybe Natural Alonzo._nOpt = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateStakePoolTargetNum +protocolUpdateStakePoolTargetNum , _a0 :: HKD StrictMaybe Rational Alonzo._a0 = Maybe Rational -> StrictMaybe Rational forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Rational -protocolUpdatePoolPledgeInfluence +protocolUpdatePoolPledgeInfluence , _rho :: HKD StrictMaybe UnitInterval Alonzo._rho = Rational -> UnitInterval Ledger.unitIntervalFromRational (Rational -> UnitInterval) @@ -3219,7 +3219,7 @@ Maybe Rational -> StrictMaybe Rational forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Rational -protocolUpdateMonetaryExpansion +protocolUpdateMonetaryExpansion , _tau :: HKD StrictMaybe UnitInterval Alonzo._tau = Rational -> UnitInterval Ledger.unitIntervalFromRational (Rational -> UnitInterval) @@ -3229,7 +3229,7 @@ Maybe Rational -> StrictMaybe Rational forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Rational -protocolUpdateTreasuryCut +protocolUpdateTreasuryCut , _d :: HKD StrictMaybe UnitInterval Alonzo._d = Rational -> UnitInterval Ledger.unitIntervalFromRational (Rational -> UnitInterval) @@ -3239,7 +3239,7 @@ Maybe Rational -> StrictMaybe Rational forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Rational -protocolUpdateDecentralization +protocolUpdateDecentralization , _extraEntropy :: HKD StrictMaybe Nonce Alonzo._extraEntropy = Maybe PraosNonce -> Nonce toLedgerNonce (Maybe PraosNonce -> Nonce) @@ -3249,7 +3249,7 @@ Maybe (Maybe PraosNonce) -> StrictMaybe (Maybe PraosNonce) forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe (Maybe PraosNonce) -protocolUpdateExtraPraosEntropy +protocolUpdateExtraPraosEntropy , _protocolVersion :: HKD StrictMaybe ProtVer Alonzo._protocolVersion = (Natural -> Natural -> ProtVer) -> (Natural, Natural) -> ProtVer forall a b c. (a -> b -> c) -> (a, b) -> c @@ -3261,7 +3261,7 @@ Maybe (Natural, Natural) -> StrictMaybe (Natural, Natural) forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe (Natural, Natural) -protocolUpdateProtocolVersion +protocolUpdateProtocolVersion , _minPoolCost :: HKD StrictMaybe Coin Alonzo._minPoolCost = Lovelace -> Coin toShelleyLovelace (Lovelace -> Coin) -> StrictMaybe Lovelace -> StrictMaybe Coin @@ -3270,7 +3270,7 @@ Maybe Lovelace -> StrictMaybe Lovelace forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Lovelace -protocolUpdateMinPoolCost +protocolUpdateMinPoolCost , _adaPerUTxOWord :: HKD StrictMaybe Coin Alonzo._adaPerUTxOWord = Lovelace -> Coin toShelleyLovelace (Lovelace -> Coin) -> StrictMaybe Lovelace -> StrictMaybe Coin @@ -3279,12 +3279,12 @@ Maybe Lovelace -> StrictMaybe Lovelace forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Lovelace -protocolUpdateUTxOCostPerWord +protocolUpdateUTxOCostPerWord , _costmdls :: HKD StrictMaybe (Map Language CostModel) Alonzo._costmdls = if Map AnyPlutusScriptVersion CostModel -> Bool forall k a. Map k a -> Bool Map.null Map AnyPlutusScriptVersion CostModel -protocolUpdateCostModels +protocolUpdateCostModels then HKD StrictMaybe (Map Language CostModel) forall a. StrictMaybe a Ledger.SNothing @@ -3293,7 +3293,7 @@ Ledger.SJust (Map AnyPlutusScriptVersion CostModel -> Map Language CostModel toAlonzoCostModels Map AnyPlutusScriptVersion CostModel -protocolUpdateCostModels) +protocolUpdateCostModels) , _prices :: HKD StrictMaybe Prices Alonzo._prices = ExecutionUnitPrices -> Prices toAlonzoPrices (ExecutionUnitPrices -> Prices) @@ -3303,7 +3303,7 @@ Maybe ExecutionUnitPrices -> StrictMaybe ExecutionUnitPrices forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe ExecutionUnitPrices -protocolUpdatePrices +protocolUpdatePrices , _maxTxExUnits :: HKD StrictMaybe ExUnits Alonzo._maxTxExUnits = ExecutionUnits -> ExUnits toAlonzoExUnits (ExecutionUnits -> ExUnits) @@ -3313,7 +3313,7 @@ Maybe ExecutionUnits -> StrictMaybe ExecutionUnits forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe ExecutionUnits -protocolUpdateMaxTxExUnits +protocolUpdateMaxTxExUnits , _maxBlockExUnits :: HKD StrictMaybe ExUnits Alonzo._maxBlockExUnits = ExecutionUnits -> ExUnits toAlonzoExUnits (ExecutionUnits -> ExUnits) @@ -3323,22 +3323,22 @@ Maybe ExecutionUnits -> StrictMaybe ExecutionUnits forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe ExecutionUnits -protocolUpdateMaxBlockExUnits +protocolUpdateMaxBlockExUnits , _maxValSize :: HKD StrictMaybe Natural Alonzo._maxValSize = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateMaxValueSize +protocolUpdateMaxValueSize , _collateralPercentage :: HKD StrictMaybe Natural Alonzo._collateralPercentage = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateCollateralPercent +protocolUpdateCollateralPercent , _maxCollateralInputs :: HKD StrictMaybe Natural Alonzo._maxCollateralInputs = Maybe Natural -> StrictMaybe Natural forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe Natural -protocolUpdateMaxCollateralInputs +protocolUpdateMaxCollateralInputs } @@ -3346,17 +3346,17 @@ -- Conversion functions: updates from ledger types -- -fromLedgerUpdate :: forall era ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.Crypto ledgerera ~ StandardCrypto - => ShelleyBasedEra era - -> Ledger.Update ledgerera +fromLedgerUpdate :: forall era ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.Crypto ledgerera ~ StandardCrypto + => ShelleyBasedEra era + -> Ledger.Update ledgerera -> UpdateProposal fromLedgerUpdate :: ShelleyBasedEra era -> Update ledgerera -> UpdateProposal -fromLedgerUpdate ShelleyBasedEra era -era (Ledger.Update ProposedPPUpdates ledgerera -ppup EpochNo -epochno) = +fromLedgerUpdate ShelleyBasedEra era +era (Ledger.Update ProposedPPUpdates ledgerera +ppup EpochNo +epochno) = Map (Hash GenesisKey) ProtocolParametersUpdate -> EpochNo -> UpdateProposal UpdateProposal (ShelleyBasedEra era @@ -3369,22 +3369,22 @@ -> ProposedPPUpdates ledgerera -> Map (Hash GenesisKey) ProtocolParametersUpdate fromLedgerProposedPPUpdates ShelleyBasedEra era -era ProposedPPUpdates ledgerera -ppup) EpochNo -epochno +era ProposedPPUpdates ledgerera +ppup) EpochNo +epochno -fromLedgerProposedPPUpdates :: forall era ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.Crypto ledgerera ~ StandardCrypto - => ShelleyBasedEra era - -> Ledger.ProposedPPUpdates ledgerera +fromLedgerProposedPPUpdates :: forall era ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.Crypto ledgerera ~ StandardCrypto + => ShelleyBasedEra era + -> Ledger.ProposedPPUpdates ledgerera -> Map (Hash GenesisKey) ProtocolParametersUpdate fromLedgerProposedPPUpdates :: ShelleyBasedEra era -> ProposedPPUpdates ledgerera -> Map (Hash GenesisKey) ProtocolParametersUpdate -fromLedgerProposedPPUpdates ShelleyBasedEra era -era = +fromLedgerProposedPPUpdates ShelleyBasedEra era +era = (PParamsDelta ledgerera -> ProtocolParametersUpdate) -> Map (Hash GenesisKey) (PParamsDelta ledgerera) -> Map (Hash GenesisKey) ProtocolParametersUpdate @@ -3395,7 +3395,7 @@ ShelleyBasedEra era -> PParamsDelta (ShelleyLedgerEra era) -> ProtocolParametersUpdate fromLedgerPParamsDelta ShelleyBasedEra era -era) +era) (Map (Hash GenesisKey) (PParamsDelta ledgerera) -> Map (Hash GenesisKey) ProtocolParametersUpdate) -> (ProposedPPUpdates ledgerera @@ -3416,14 +3416,14 @@ -> ProposedPPUpdates ledgerera -> Map (Hash GenesisKey) (PParamsDelta ledgerera) forall b c a. (b -> c) -> (a -> b) -> a -> c -. (\(Ledger.ProposedPPUpdates Map (KeyHash 'Genesis (Crypto ledgerera)) (PParamsDelta ledgerera) -ppup) -> Map (KeyHash 'Genesis (Crypto ledgerera)) (PParamsDelta ledgerera) +. (\(Ledger.ProposedPPUpdates Map (KeyHash 'Genesis (Crypto ledgerera)) (PParamsDelta ledgerera) +ppup) -> Map (KeyHash 'Genesis (Crypto ledgerera)) (PParamsDelta ledgerera) Map (KeyHash 'Genesis StandardCrypto) (PParamsDelta ledgerera) -ppup) +ppup) -fromLedgerPParamsDelta :: ShelleyBasedEra era - -> Ledger.PParamsDelta (ShelleyLedgerEra era) +fromLedgerPParamsDelta :: ShelleyBasedEra era + -> Ledger.PParamsDelta (ShelleyLedgerEra era) -> ProtocolParametersUpdate fromLedgerPParamsDelta :: ShelleyBasedEra era -> PParamsDelta (ShelleyLedgerEra era) -> ProtocolParametersUpdate @@ -3449,79 +3449,79 @@ fromAlonzoPParamsUpdate -fromShelleyPParamsUpdate :: Shelley.PParamsUpdate ledgerera +fromShelleyPParamsUpdate :: Shelley.PParamsUpdate ledgerera -> ProtocolParametersUpdate fromShelleyPParamsUpdate :: PParamsUpdate ledgerera -> ProtocolParametersUpdate fromShelleyPParamsUpdate Shelley.PParams { - HKD StrictMaybe Natural + HKD StrictMaybe Natural _minfeeA :: HKD StrictMaybe Natural _minfeeA :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._minfeeA - , HKD StrictMaybe Natural +Shelley._minfeeA + , HKD StrictMaybe Natural _minfeeB :: HKD StrictMaybe Natural _minfeeB :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._minfeeB - , HKD StrictMaybe Natural +Shelley._minfeeB + , HKD StrictMaybe Natural _maxBBSize :: HKD StrictMaybe Natural _maxBBSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._maxBBSize - , HKD StrictMaybe Natural +Shelley._maxBBSize + , HKD StrictMaybe Natural _maxTxSize :: HKD StrictMaybe Natural _maxTxSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._maxTxSize - , HKD StrictMaybe Natural +Shelley._maxTxSize + , HKD StrictMaybe Natural _maxBHSize :: HKD StrictMaybe Natural _maxBHSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._maxBHSize - , HKD StrictMaybe Coin +Shelley._maxBHSize + , HKD StrictMaybe Coin _keyDeposit :: HKD StrictMaybe Coin _keyDeposit :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Shelley._keyDeposit - , HKD StrictMaybe Coin +Shelley._keyDeposit + , HKD StrictMaybe Coin _poolDeposit :: HKD StrictMaybe Coin _poolDeposit :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Shelley._poolDeposit - , HKD StrictMaybe EpochNo +Shelley._poolDeposit + , HKD StrictMaybe EpochNo _eMax :: HKD StrictMaybe EpochNo _eMax :: forall (f :: * -> *) era. PParams' f era -> HKD f EpochNo -Shelley._eMax - , HKD StrictMaybe Natural +Shelley._eMax + , HKD StrictMaybe Natural _nOpt :: HKD StrictMaybe Natural _nOpt :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._nOpt - , HKD StrictMaybe Rational +Shelley._nOpt + , HKD StrictMaybe Rational _a0 :: HKD StrictMaybe Rational _a0 :: forall (f :: * -> *) era. PParams' f era -> HKD f Rational -Shelley._a0 - , HKD StrictMaybe UnitInterval +Shelley._a0 + , HKD StrictMaybe UnitInterval _rho :: HKD StrictMaybe UnitInterval _rho :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Shelley._rho - , HKD StrictMaybe UnitInterval +Shelley._rho + , HKD StrictMaybe UnitInterval _tau :: HKD StrictMaybe UnitInterval _tau :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Shelley._tau - , HKD StrictMaybe UnitInterval +Shelley._tau + , HKD StrictMaybe UnitInterval _d :: HKD StrictMaybe UnitInterval _d :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Shelley._d - , HKD StrictMaybe Nonce +Shelley._d + , HKD StrictMaybe Nonce _extraEntropy :: HKD StrictMaybe Nonce _extraEntropy :: forall (f :: * -> *) era. PParams' f era -> HKD f Nonce -Shelley._extraEntropy - , HKD StrictMaybe ProtVer +Shelley._extraEntropy + , HKD StrictMaybe ProtVer _protocolVersion :: HKD StrictMaybe ProtVer _protocolVersion :: forall (f :: * -> *) era. PParams' f era -> HKD f ProtVer -Shelley._protocolVersion - , HKD StrictMaybe Coin +Shelley._protocolVersion + , HKD StrictMaybe Coin _minUTxOValue :: HKD StrictMaybe Coin _minUTxOValue :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Shelley._minUTxOValue - , HKD StrictMaybe Coin +Shelley._minUTxOValue + , HKD StrictMaybe Coin _minPoolCost :: HKD StrictMaybe Coin _minPoolCost :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Shelley._minPoolCost +Shelley._minPoolCost } = ProtocolParametersUpdate :: Maybe (Natural, Natural) -> Maybe Rational @@ -3551,11 +3551,11 @@ -> ProtocolParametersUpdate ProtocolParametersUpdate { protocolUpdateProtocolVersion :: Maybe (Natural, Natural) -protocolUpdateProtocolVersion = (\(Ledger.ProtVer Natural -a Natural -b) -> (Natural -a,Natural -b)) (ProtVer -> (Natural, Natural)) +protocolUpdateProtocolVersion = (\(Ledger.ProtVer Natural +a Natural +b) -> (Natural +a,Natural +b)) (ProtVer -> (Natural, Natural)) -> Maybe ProtVer -> Maybe (Natural, Natural) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> @@ -3563,7 +3563,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe ProtVer HKD StrictMaybe ProtVer -_protocolVersion +_protocolVersion , protocolUpdateDecentralization :: Maybe Rational protocolUpdateDecentralization = UnitInterval -> Rational Ledger.unitIntervalToRational (UnitInterval -> Rational) -> Maybe UnitInterval -> Maybe Rational @@ -3573,7 +3573,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe UnitInterval HKD StrictMaybe UnitInterval -_d +_d , protocolUpdateExtraPraosEntropy :: Maybe (Maybe PraosNonce) protocolUpdateExtraPraosEntropy = Nonce -> Maybe PraosNonce fromLedgerNonce (Nonce -> Maybe PraosNonce) @@ -3584,37 +3584,37 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Nonce HKD StrictMaybe Nonce -_extraEntropy +_extraEntropy , protocolUpdateMaxBlockHeaderSize :: Maybe Natural protocolUpdateMaxBlockHeaderSize = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_maxBHSize +_maxBHSize , protocolUpdateMaxBlockBodySize :: Maybe Natural protocolUpdateMaxBlockBodySize = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_maxBBSize +_maxBBSize , protocolUpdateMaxTxSize :: Maybe Natural protocolUpdateMaxTxSize = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_maxTxSize +_maxTxSize , protocolUpdateTxFeeFixed :: Maybe Natural protocolUpdateTxFeeFixed = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_minfeeB +_minfeeB , protocolUpdateTxFeePerByte :: Maybe Natural protocolUpdateTxFeePerByte = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_minfeeA +_minfeeA , protocolUpdateMinUTxOValue :: Maybe Lovelace protocolUpdateMinUTxOValue = Coin -> Lovelace fromShelleyLovelace (Coin -> Lovelace) -> Maybe Coin -> Maybe Lovelace @@ -3624,7 +3624,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Coin HKD StrictMaybe Coin -_minUTxOValue +_minUTxOValue , protocolUpdateStakeAddressDeposit :: Maybe Lovelace protocolUpdateStakeAddressDeposit = Coin -> Lovelace fromShelleyLovelace (Coin -> Lovelace) -> Maybe Coin -> Maybe Lovelace @@ -3634,7 +3634,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Coin HKD StrictMaybe Coin -_keyDeposit +_keyDeposit , protocolUpdateStakePoolDeposit :: Maybe Lovelace protocolUpdateStakePoolDeposit = Coin -> Lovelace fromShelleyLovelace (Coin -> Lovelace) -> Maybe Coin -> Maybe Lovelace @@ -3644,7 +3644,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Coin HKD StrictMaybe Coin -_poolDeposit +_poolDeposit , protocolUpdateMinPoolCost :: Maybe Lovelace protocolUpdateMinPoolCost = Coin -> Lovelace fromShelleyLovelace (Coin -> Lovelace) -> Maybe Coin -> Maybe Lovelace @@ -3654,25 +3654,25 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Coin HKD StrictMaybe Coin -_minPoolCost +_minPoolCost , protocolUpdatePoolRetireMaxEpoch :: Maybe EpochNo protocolUpdatePoolRetireMaxEpoch = StrictMaybe EpochNo -> Maybe EpochNo forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe EpochNo HKD StrictMaybe EpochNo -_eMax +_eMax , protocolUpdateStakePoolTargetNum :: Maybe Natural protocolUpdateStakePoolTargetNum = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_nOpt +_nOpt , protocolUpdatePoolPledgeInfluence :: Maybe Rational protocolUpdatePoolPledgeInfluence = StrictMaybe Rational -> Maybe Rational forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Rational HKD StrictMaybe Rational -_a0 +_a0 , protocolUpdateMonetaryExpansion :: Maybe Rational protocolUpdateMonetaryExpansion = UnitInterval -> Rational Ledger.unitIntervalToRational (UnitInterval -> Rational) -> Maybe UnitInterval -> Maybe Rational @@ -3682,7 +3682,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe UnitInterval HKD StrictMaybe UnitInterval -_rho +_rho , protocolUpdateTreasuryCut :: Maybe Rational protocolUpdateTreasuryCut = UnitInterval -> Rational Ledger.unitIntervalToRational (UnitInterval -> Rational) -> Maybe UnitInterval -> Maybe Rational @@ -3692,7 +3692,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe UnitInterval HKD StrictMaybe UnitInterval -_tau +_tau , protocolUpdateUTxOCostPerWord :: Maybe Lovelace protocolUpdateUTxOCostPerWord = Maybe Lovelace forall a. Maybe a @@ -3727,108 +3727,108 @@ Nothing } -fromAlonzoPParamsUpdate :: Alonzo.PParamsUpdate ledgerera +fromAlonzoPParamsUpdate :: Alonzo.PParamsUpdate ledgerera -> ProtocolParametersUpdate fromAlonzoPParamsUpdate :: PParamsUpdate ledgerera -> ProtocolParametersUpdate fromAlonzoPParamsUpdate Alonzo.PParams { - HKD StrictMaybe Natural + HKD StrictMaybe Natural _minfeeA :: HKD StrictMaybe Natural _minfeeA :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._minfeeA - , HKD StrictMaybe Natural +Alonzo._minfeeA + , HKD StrictMaybe Natural _minfeeB :: HKD StrictMaybe Natural _minfeeB :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._minfeeB - , HKD StrictMaybe Natural +Alonzo._minfeeB + , HKD StrictMaybe Natural _maxBBSize :: HKD StrictMaybe Natural _maxBBSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._maxBBSize - , HKD StrictMaybe Natural +Alonzo._maxBBSize + , HKD StrictMaybe Natural _maxTxSize :: HKD StrictMaybe Natural _maxTxSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._maxTxSize - , HKD StrictMaybe Natural +Alonzo._maxTxSize + , HKD StrictMaybe Natural _maxBHSize :: HKD StrictMaybe Natural _maxBHSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._maxBHSize - , HKD StrictMaybe Coin +Alonzo._maxBHSize + , HKD StrictMaybe Coin _keyDeposit :: HKD StrictMaybe Coin _keyDeposit :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Alonzo._keyDeposit - , HKD StrictMaybe Coin +Alonzo._keyDeposit + , HKD StrictMaybe Coin _poolDeposit :: HKD StrictMaybe Coin _poolDeposit :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Alonzo._poolDeposit - , HKD StrictMaybe EpochNo +Alonzo._poolDeposit + , HKD StrictMaybe EpochNo _eMax :: HKD StrictMaybe EpochNo _eMax :: forall (f :: * -> *) era. PParams' f era -> HKD f EpochNo -Alonzo._eMax - , HKD StrictMaybe Natural +Alonzo._eMax + , HKD StrictMaybe Natural _nOpt :: HKD StrictMaybe Natural _nOpt :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._nOpt - , HKD StrictMaybe Rational +Alonzo._nOpt + , HKD StrictMaybe Rational _a0 :: HKD StrictMaybe Rational _a0 :: forall (f :: * -> *) era. PParams' f era -> HKD f Rational -Alonzo._a0 - , HKD StrictMaybe UnitInterval +Alonzo._a0 + , HKD StrictMaybe UnitInterval _rho :: HKD StrictMaybe UnitInterval _rho :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Alonzo._rho - , HKD StrictMaybe UnitInterval +Alonzo._rho + , HKD StrictMaybe UnitInterval _tau :: HKD StrictMaybe UnitInterval _tau :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Alonzo._tau - , HKD StrictMaybe UnitInterval +Alonzo._tau + , HKD StrictMaybe UnitInterval _d :: HKD StrictMaybe UnitInterval _d :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Alonzo._d - , HKD StrictMaybe Nonce +Alonzo._d + , HKD StrictMaybe Nonce _extraEntropy :: HKD StrictMaybe Nonce _extraEntropy :: forall (f :: * -> *) era. PParams' f era -> HKD f Nonce -Alonzo._extraEntropy - , HKD StrictMaybe ProtVer +Alonzo._extraEntropy + , HKD StrictMaybe ProtVer _protocolVersion :: HKD StrictMaybe ProtVer _protocolVersion :: forall (f :: * -> *) era. PParams' f era -> HKD f ProtVer -Alonzo._protocolVersion - , HKD StrictMaybe Coin +Alonzo._protocolVersion + , HKD StrictMaybe Coin _minPoolCost :: HKD StrictMaybe Coin _minPoolCost :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Alonzo._minPoolCost - , HKD StrictMaybe Coin +Alonzo._minPoolCost + , HKD StrictMaybe Coin _adaPerUTxOWord :: HKD StrictMaybe Coin _adaPerUTxOWord :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Alonzo._adaPerUTxOWord - , HKD StrictMaybe (Map Language CostModel) +Alonzo._adaPerUTxOWord + , HKD StrictMaybe (Map Language CostModel) _costmdls :: HKD StrictMaybe (Map Language CostModel) _costmdls :: forall (f :: * -> *) era. PParams' f era -> HKD f (Map Language CostModel) -Alonzo._costmdls - , HKD StrictMaybe Prices +Alonzo._costmdls + , HKD StrictMaybe Prices _prices :: HKD StrictMaybe Prices _prices :: forall (f :: * -> *) era. PParams' f era -> HKD f Prices -Alonzo._prices - , HKD StrictMaybe ExUnits +Alonzo._prices + , HKD StrictMaybe ExUnits _maxTxExUnits :: HKD StrictMaybe ExUnits _maxTxExUnits :: forall (f :: * -> *) era. PParams' f era -> HKD f ExUnits -Alonzo._maxTxExUnits - , HKD StrictMaybe ExUnits +Alonzo._maxTxExUnits + , HKD StrictMaybe ExUnits _maxBlockExUnits :: HKD StrictMaybe ExUnits _maxBlockExUnits :: forall (f :: * -> *) era. PParams' f era -> HKD f ExUnits -Alonzo._maxBlockExUnits - , HKD StrictMaybe Natural +Alonzo._maxBlockExUnits + , HKD StrictMaybe Natural _maxValSize :: HKD StrictMaybe Natural _maxValSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._maxValSize - , HKD StrictMaybe Natural +Alonzo._maxValSize + , HKD StrictMaybe Natural _collateralPercentage :: HKD StrictMaybe Natural _collateralPercentage :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._collateralPercentage - , HKD StrictMaybe Natural +Alonzo._collateralPercentage + , HKD StrictMaybe Natural _maxCollateralInputs :: HKD StrictMaybe Natural _maxCollateralInputs :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._maxCollateralInputs +Alonzo._maxCollateralInputs } = ProtocolParametersUpdate :: Maybe (Natural, Natural) -> Maybe Rational @@ -3858,11 +3858,11 @@ -> ProtocolParametersUpdate ProtocolParametersUpdate { protocolUpdateProtocolVersion :: Maybe (Natural, Natural) -protocolUpdateProtocolVersion = (\(Ledger.ProtVer Natural -a Natural -b) -> (Natural -a,Natural -b)) (ProtVer -> (Natural, Natural)) +protocolUpdateProtocolVersion = (\(Ledger.ProtVer Natural +a Natural +b) -> (Natural +a,Natural +b)) (ProtVer -> (Natural, Natural)) -> Maybe ProtVer -> Maybe (Natural, Natural) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> @@ -3870,7 +3870,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe ProtVer HKD StrictMaybe ProtVer -_protocolVersion +_protocolVersion , protocolUpdateDecentralization :: Maybe Rational protocolUpdateDecentralization = UnitInterval -> Rational Ledger.unitIntervalToRational (UnitInterval -> Rational) -> Maybe UnitInterval -> Maybe Rational @@ -3880,7 +3880,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe UnitInterval HKD StrictMaybe UnitInterval -_d +_d , protocolUpdateExtraPraosEntropy :: Maybe (Maybe PraosNonce) protocolUpdateExtraPraosEntropy = Nonce -> Maybe PraosNonce fromLedgerNonce (Nonce -> Maybe PraosNonce) @@ -3891,37 +3891,37 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Nonce HKD StrictMaybe Nonce -_extraEntropy +_extraEntropy , protocolUpdateMaxBlockHeaderSize :: Maybe Natural protocolUpdateMaxBlockHeaderSize = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_maxBHSize +_maxBHSize , protocolUpdateMaxBlockBodySize :: Maybe Natural protocolUpdateMaxBlockBodySize = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_maxBBSize +_maxBBSize , protocolUpdateMaxTxSize :: Maybe Natural protocolUpdateMaxTxSize = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_maxTxSize +_maxTxSize , protocolUpdateTxFeeFixed :: Maybe Natural protocolUpdateTxFeeFixed = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_minfeeB +_minfeeB , protocolUpdateTxFeePerByte :: Maybe Natural protocolUpdateTxFeePerByte = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_minfeeA +_minfeeA , protocolUpdateMinUTxOValue :: Maybe Lovelace protocolUpdateMinUTxOValue = Maybe Lovelace forall a. Maybe a @@ -3935,7 +3935,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Coin HKD StrictMaybe Coin -_keyDeposit +_keyDeposit , protocolUpdateStakePoolDeposit :: Maybe Lovelace protocolUpdateStakePoolDeposit = Coin -> Lovelace fromShelleyLovelace (Coin -> Lovelace) -> Maybe Coin -> Maybe Lovelace @@ -3945,7 +3945,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Coin HKD StrictMaybe Coin -_poolDeposit +_poolDeposit , protocolUpdateMinPoolCost :: Maybe Lovelace protocolUpdateMinPoolCost = Coin -> Lovelace fromShelleyLovelace (Coin -> Lovelace) -> Maybe Coin -> Maybe Lovelace @@ -3955,25 +3955,25 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Coin HKD StrictMaybe Coin -_minPoolCost +_minPoolCost , protocolUpdatePoolRetireMaxEpoch :: Maybe EpochNo protocolUpdatePoolRetireMaxEpoch = StrictMaybe EpochNo -> Maybe EpochNo forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe EpochNo HKD StrictMaybe EpochNo -_eMax +_eMax , protocolUpdateStakePoolTargetNum :: Maybe Natural protocolUpdateStakePoolTargetNum = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_nOpt +_nOpt , protocolUpdatePoolPledgeInfluence :: Maybe Rational protocolUpdatePoolPledgeInfluence = StrictMaybe Rational -> Maybe Rational forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Rational HKD StrictMaybe Rational -_a0 +_a0 , protocolUpdateMonetaryExpansion :: Maybe Rational protocolUpdateMonetaryExpansion = UnitInterval -> Rational Ledger.unitIntervalToRational (UnitInterval -> Rational) -> Maybe UnitInterval -> Maybe Rational @@ -3983,7 +3983,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe UnitInterval HKD StrictMaybe UnitInterval -_rho +_rho , protocolUpdateTreasuryCut :: Maybe Rational protocolUpdateTreasuryCut = UnitInterval -> Rational Ledger.unitIntervalToRational (UnitInterval -> Rational) -> Maybe UnitInterval -> Maybe Rational @@ -3993,7 +3993,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe UnitInterval HKD StrictMaybe UnitInterval -_tau +_tau , protocolUpdateUTxOCostPerWord :: Maybe Lovelace protocolUpdateUTxOCostPerWord = Coin -> Lovelace fromShelleyLovelace (Coin -> Lovelace) -> Maybe Coin -> Maybe Lovelace @@ -4003,7 +4003,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Coin HKD StrictMaybe Coin -_adaPerUTxOWord +_adaPerUTxOWord , protocolUpdateCostModels :: Map AnyPlutusScriptVersion CostModel protocolUpdateCostModels = Map AnyPlutusScriptVersion CostModel -> (Map Language CostModel -> Map AnyPlutusScriptVersion CostModel) @@ -4019,7 +4019,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe (Map Language CostModel) HKD StrictMaybe (Map Language CostModel) -_costmdls) +_costmdls) , protocolUpdatePrices :: Maybe ExecutionUnitPrices protocolUpdatePrices = Prices -> ExecutionUnitPrices fromAlonzoPrices (Prices -> ExecutionUnitPrices) @@ -4030,7 +4030,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Prices HKD StrictMaybe Prices -_prices +_prices , protocolUpdateMaxTxExUnits :: Maybe ExecutionUnits protocolUpdateMaxTxExUnits = ExUnits -> ExecutionUnits fromAlonzoExUnits (ExUnits -> ExecutionUnits) @@ -4041,7 +4041,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe ExUnits HKD StrictMaybe ExUnits -_maxTxExUnits +_maxTxExUnits , protocolUpdateMaxBlockExUnits :: Maybe ExecutionUnits protocolUpdateMaxBlockExUnits = ExUnits -> ExecutionUnits fromAlonzoExUnits (ExUnits -> ExecutionUnits) @@ -4052,25 +4052,25 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe ExUnits HKD StrictMaybe ExUnits -_maxBlockExUnits +_maxBlockExUnits , protocolUpdateMaxValueSize :: Maybe Natural protocolUpdateMaxValueSize = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_maxValSize +_maxValSize , protocolUpdateCollateralPercent :: Maybe Natural protocolUpdateCollateralPercent = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_collateralPercentage +_collateralPercentage , protocolUpdateMaxCollateralInputs :: Maybe Natural protocolUpdateMaxCollateralInputs = StrictMaybe Natural -> Maybe Natural forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe Natural HKD StrictMaybe Natural -_maxCollateralInputs +_maxCollateralInputs } @@ -4078,10 +4078,10 @@ -- Conversion functions: protocol paramaters to ledger types -- -toLedgerPParams - :: ShelleyBasedEra era +toLedgerPParams + :: ShelleyBasedEra era -> ProtocolParameters - -> Ledger.PParams (ShelleyLedgerEra era) + -> Ledger.PParams (ShelleyLedgerEra era) toLedgerPParams :: ShelleyBasedEra era -> ProtocolParameters -> PParams (ShelleyLedgerEra era) toLedgerPParams ShelleyBasedEra era @@ -4101,76 +4101,76 @@ forall ledgerera. ProtocolParameters -> PParams ledgerera toAlonzoPParams -toShelleyPParams :: ProtocolParameters -> Shelley.PParams ledgerera +toShelleyPParams :: ProtocolParameters -> Shelley.PParams ledgerera toShelleyPParams :: ProtocolParameters -> PParams ledgerera toShelleyPParams ProtocolParameters { - (Natural, Natural) + (Natural, Natural) protocolParamProtocolVersion :: (Natural, Natural) protocolParamProtocolVersion :: ProtocolParameters -> (Natural, Natural) -protocolParamProtocolVersion, - Rational +protocolParamProtocolVersion, + Rational protocolParamDecentralization :: Rational protocolParamDecentralization :: ProtocolParameters -> Rational -protocolParamDecentralization, - Maybe PraosNonce +protocolParamDecentralization, + Maybe PraosNonce protocolParamExtraPraosEntropy :: Maybe PraosNonce protocolParamExtraPraosEntropy :: ProtocolParameters -> Maybe PraosNonce -protocolParamExtraPraosEntropy, - Natural +protocolParamExtraPraosEntropy, + Natural protocolParamMaxBlockHeaderSize :: Natural protocolParamMaxBlockHeaderSize :: ProtocolParameters -> Natural -protocolParamMaxBlockHeaderSize, - Natural +protocolParamMaxBlockHeaderSize, + Natural protocolParamMaxBlockBodySize :: Natural protocolParamMaxBlockBodySize :: ProtocolParameters -> Natural -protocolParamMaxBlockBodySize, - Natural +protocolParamMaxBlockBodySize, + Natural protocolParamMaxTxSize :: Natural protocolParamMaxTxSize :: ProtocolParameters -> Natural -protocolParamMaxTxSize, - Natural +protocolParamMaxTxSize, + Natural protocolParamTxFeeFixed :: Natural protocolParamTxFeeFixed :: ProtocolParameters -> Natural -protocolParamTxFeeFixed, - Natural +protocolParamTxFeeFixed, + Natural protocolParamTxFeePerByte :: Natural protocolParamTxFeePerByte :: ProtocolParameters -> Natural -protocolParamTxFeePerByte, +protocolParamTxFeePerByte, protocolParamMinUTxOValue :: ProtocolParameters -> Maybe Lovelace -protocolParamMinUTxOValue = Just Lovelace -minUTxOValue, - Lovelace +protocolParamMinUTxOValue = Just Lovelace +minUTxOValue, + Lovelace protocolParamStakeAddressDeposit :: Lovelace protocolParamStakeAddressDeposit :: ProtocolParameters -> Lovelace -protocolParamStakeAddressDeposit, - Lovelace +protocolParamStakeAddressDeposit, + Lovelace protocolParamStakePoolDeposit :: Lovelace protocolParamStakePoolDeposit :: ProtocolParameters -> Lovelace -protocolParamStakePoolDeposit, - Lovelace +protocolParamStakePoolDeposit, + Lovelace protocolParamMinPoolCost :: Lovelace protocolParamMinPoolCost :: ProtocolParameters -> Lovelace -protocolParamMinPoolCost, - EpochNo +protocolParamMinPoolCost, + EpochNo protocolParamPoolRetireMaxEpoch :: EpochNo protocolParamPoolRetireMaxEpoch :: ProtocolParameters -> EpochNo -protocolParamPoolRetireMaxEpoch, - Natural +protocolParamPoolRetireMaxEpoch, + Natural protocolParamStakePoolTargetNum :: Natural protocolParamStakePoolTargetNum :: ProtocolParameters -> Natural -protocolParamStakePoolTargetNum, - Rational +protocolParamStakePoolTargetNum, + Rational protocolParamPoolPledgeInfluence :: Rational protocolParamPoolPledgeInfluence :: ProtocolParameters -> Rational -protocolParamPoolPledgeInfluence, - Rational +protocolParamPoolPledgeInfluence, + Rational protocolParamMonetaryExpansion :: Rational protocolParamMonetaryExpansion :: ProtocolParameters -> Rational -protocolParamMonetaryExpansion, - Rational +protocolParamMonetaryExpansion, + Rational protocolParamTreasuryCut :: Rational protocolParamTreasuryCut :: ProtocolParameters -> Rational -protocolParamTreasuryCut +protocolParamTreasuryCut } = PParams :: forall (f :: * -> *) era. HKD f Natural @@ -4194,81 +4194,81 @@ Shelley.PParams { _protocolVersion :: HKD Identity ProtVer Shelley._protocolVersion - = let (Natural -maj, Natural -minor) = (Natural, Natural) -protocolParamProtocolVersion + = let (Natural +maj, Natural +minor) = (Natural, Natural) +protocolParamProtocolVersion in Natural -> Natural -> ProtVer Ledger.ProtVer Natural -maj Natural -minor +maj Natural +minor , _d :: HKD Identity UnitInterval Shelley._d = Rational -> UnitInterval Ledger.unitIntervalFromRational Rational -protocolParamDecentralization +protocolParamDecentralization , _extraEntropy :: HKD Identity Nonce Shelley._extraEntropy = Maybe PraosNonce -> Nonce toLedgerNonce Maybe PraosNonce -protocolParamExtraPraosEntropy +protocolParamExtraPraosEntropy , _maxBHSize :: HKD Identity Natural Shelley._maxBHSize = Natural HKD Identity Natural -protocolParamMaxBlockHeaderSize +protocolParamMaxBlockHeaderSize , _maxBBSize :: HKD Identity Natural Shelley._maxBBSize = Natural HKD Identity Natural -protocolParamMaxBlockBodySize +protocolParamMaxBlockBodySize , _maxTxSize :: HKD Identity Natural Shelley._maxTxSize = Natural HKD Identity Natural -protocolParamMaxTxSize +protocolParamMaxTxSize , _minfeeB :: HKD Identity Natural Shelley._minfeeB = Natural HKD Identity Natural -protocolParamTxFeeFixed +protocolParamTxFeeFixed , _minfeeA :: HKD Identity Natural Shelley._minfeeA = Natural HKD Identity Natural -protocolParamTxFeePerByte +protocolParamTxFeePerByte , _minUTxOValue :: HKD Identity Coin Shelley._minUTxOValue = Lovelace -> Coin toShelleyLovelace Lovelace -minUTxOValue +minUTxOValue , _keyDeposit :: HKD Identity Coin Shelley._keyDeposit = Lovelace -> Coin toShelleyLovelace Lovelace -protocolParamStakeAddressDeposit +protocolParamStakeAddressDeposit , _poolDeposit :: HKD Identity Coin Shelley._poolDeposit = Lovelace -> Coin toShelleyLovelace Lovelace -protocolParamStakePoolDeposit +protocolParamStakePoolDeposit , _minPoolCost :: HKD Identity Coin Shelley._minPoolCost = Lovelace -> Coin toShelleyLovelace Lovelace -protocolParamMinPoolCost +protocolParamMinPoolCost , _eMax :: HKD Identity EpochNo Shelley._eMax = EpochNo HKD Identity EpochNo -protocolParamPoolRetireMaxEpoch +protocolParamPoolRetireMaxEpoch , _nOpt :: HKD Identity Natural Shelley._nOpt = Natural HKD Identity Natural -protocolParamStakePoolTargetNum +protocolParamStakePoolTargetNum , _a0 :: HKD Identity Rational Shelley._a0 = Rational HKD Identity Rational -protocolParamPoolPledgeInfluence +protocolParamPoolPledgeInfluence , _rho :: HKD Identity UnitInterval Shelley._rho = Rational -> UnitInterval Ledger.unitIntervalFromRational Rational -protocolParamMonetaryExpansion +protocolParamMonetaryExpansion , _tau :: HKD Identity UnitInterval Shelley._tau = Rational -> UnitInterval Ledger.unitIntervalFromRational Rational -protocolParamTreasuryCut +protocolParamTreasuryCut } toShelleyPParams ProtocolParameters { protocolParamMinUTxOValue :: ProtocolParameters -> Maybe Lovelace protocolParamMinUTxOValue = Maybe Lovelace @@ -4278,98 +4278,98 @@ error String "toShelleyPParams: must specify protocolParamMinUTxOValue" -toAlonzoPParams :: ProtocolParameters -> Alonzo.PParams ledgerera +toAlonzoPParams :: ProtocolParameters -> Alonzo.PParams ledgerera toAlonzoPParams :: ProtocolParameters -> PParams ledgerera toAlonzoPParams ProtocolParameters { - (Natural, Natural) + (Natural, Natural) protocolParamProtocolVersion :: (Natural, Natural) protocolParamProtocolVersion :: ProtocolParameters -> (Natural, Natural) -protocolParamProtocolVersion, - Rational +protocolParamProtocolVersion, + Rational protocolParamDecentralization :: Rational protocolParamDecentralization :: ProtocolParameters -> Rational -protocolParamDecentralization, - Maybe PraosNonce +protocolParamDecentralization, + Maybe PraosNonce protocolParamExtraPraosEntropy :: Maybe PraosNonce protocolParamExtraPraosEntropy :: ProtocolParameters -> Maybe PraosNonce -protocolParamExtraPraosEntropy, - Natural +protocolParamExtraPraosEntropy, + Natural protocolParamMaxBlockHeaderSize :: Natural protocolParamMaxBlockHeaderSize :: ProtocolParameters -> Natural -protocolParamMaxBlockHeaderSize, - Natural +protocolParamMaxBlockHeaderSize, + Natural protocolParamMaxBlockBodySize :: Natural protocolParamMaxBlockBodySize :: ProtocolParameters -> Natural -protocolParamMaxBlockBodySize, - Natural +protocolParamMaxBlockBodySize, + Natural protocolParamMaxTxSize :: Natural protocolParamMaxTxSize :: ProtocolParameters -> Natural -protocolParamMaxTxSize, - Natural +protocolParamMaxTxSize, + Natural protocolParamTxFeeFixed :: Natural protocolParamTxFeeFixed :: ProtocolParameters -> Natural -protocolParamTxFeeFixed, - Natural +protocolParamTxFeeFixed, + Natural protocolParamTxFeePerByte :: Natural protocolParamTxFeePerByte :: ProtocolParameters -> Natural -protocolParamTxFeePerByte, - Lovelace +protocolParamTxFeePerByte, + Lovelace protocolParamStakeAddressDeposit :: Lovelace protocolParamStakeAddressDeposit :: ProtocolParameters -> Lovelace -protocolParamStakeAddressDeposit, - Lovelace +protocolParamStakeAddressDeposit, + Lovelace protocolParamStakePoolDeposit :: Lovelace protocolParamStakePoolDeposit :: ProtocolParameters -> Lovelace -protocolParamStakePoolDeposit, - Lovelace +protocolParamStakePoolDeposit, + Lovelace protocolParamMinPoolCost :: Lovelace protocolParamMinPoolCost :: ProtocolParameters -> Lovelace -protocolParamMinPoolCost, - EpochNo +protocolParamMinPoolCost, + EpochNo protocolParamPoolRetireMaxEpoch :: EpochNo protocolParamPoolRetireMaxEpoch :: ProtocolParameters -> EpochNo -protocolParamPoolRetireMaxEpoch, - Natural +protocolParamPoolRetireMaxEpoch, + Natural protocolParamStakePoolTargetNum :: Natural protocolParamStakePoolTargetNum :: ProtocolParameters -> Natural -protocolParamStakePoolTargetNum, - Rational +protocolParamStakePoolTargetNum, + Rational protocolParamPoolPledgeInfluence :: Rational protocolParamPoolPledgeInfluence :: ProtocolParameters -> Rational -protocolParamPoolPledgeInfluence, - Rational +protocolParamPoolPledgeInfluence, + Rational protocolParamMonetaryExpansion :: Rational protocolParamMonetaryExpansion :: ProtocolParameters -> Rational -protocolParamMonetaryExpansion, - Rational +protocolParamMonetaryExpansion, + Rational protocolParamTreasuryCut :: Rational protocolParamTreasuryCut :: ProtocolParameters -> Rational -protocolParamTreasuryCut, +protocolParamTreasuryCut, protocolParamUTxOCostPerWord :: ProtocolParameters -> Maybe Lovelace -protocolParamUTxOCostPerWord = Just Lovelace -utxoCostPerWord, - Map AnyPlutusScriptVersion CostModel +protocolParamUTxOCostPerWord = Just Lovelace +utxoCostPerWord, + Map AnyPlutusScriptVersion CostModel protocolParamCostModels :: Map AnyPlutusScriptVersion CostModel protocolParamCostModels :: ProtocolParameters -> Map AnyPlutusScriptVersion CostModel -protocolParamCostModels, +protocolParamCostModels, protocolParamPrices :: ProtocolParameters -> Maybe ExecutionUnitPrices -protocolParamPrices = Just ExecutionUnitPrices -prices, +protocolParamPrices = Just ExecutionUnitPrices +prices, protocolParamMaxTxExUnits :: ProtocolParameters -> Maybe ExecutionUnits -protocolParamMaxTxExUnits = Just ExecutionUnits -maxTxExUnits, +protocolParamMaxTxExUnits = Just ExecutionUnits +maxTxExUnits, protocolParamMaxBlockExUnits :: ProtocolParameters -> Maybe ExecutionUnits -protocolParamMaxBlockExUnits = Just ExecutionUnits -maxBlockExUnits, +protocolParamMaxBlockExUnits = Just ExecutionUnits +maxBlockExUnits, protocolParamMaxValueSize :: ProtocolParameters -> Maybe Natural -protocolParamMaxValueSize = Just Natural -maxValueSize, +protocolParamMaxValueSize = Just Natural +maxValueSize, protocolParamCollateralPercent :: ProtocolParameters -> Maybe Natural -protocolParamCollateralPercent = Just Natural -collateralPercentage, +protocolParamCollateralPercent = Just Natural +collateralPercentage, protocolParamMaxCollateralInputs :: ProtocolParameters -> Maybe Natural -protocolParamMaxCollateralInputs = Just Natural -maxCollateralInputs +protocolParamMaxCollateralInputs = Just Natural +maxCollateralInputs } = PParams :: forall (f :: * -> *) era. HKD f Natural @@ -4400,111 +4400,111 @@ Alonzo.PParams { _protocolVersion :: HKD Identity ProtVer Alonzo._protocolVersion - = let (Natural -maj, Natural -minor) = (Natural, Natural) -protocolParamProtocolVersion + = let (Natural +maj, Natural +minor) = (Natural, Natural) +protocolParamProtocolVersion in Natural -> Natural -> ProtVer Alonzo.ProtVer Natural -maj Natural -minor +maj Natural +minor , _d :: HKD Identity UnitInterval Alonzo._d = Rational -> UnitInterval Ledger.unitIntervalFromRational Rational -protocolParamDecentralization +protocolParamDecentralization , _extraEntropy :: HKD Identity Nonce Alonzo._extraEntropy = Maybe PraosNonce -> Nonce toLedgerNonce Maybe PraosNonce -protocolParamExtraPraosEntropy +protocolParamExtraPraosEntropy , _maxBHSize :: HKD Identity Natural Alonzo._maxBHSize = Natural HKD Identity Natural -protocolParamMaxBlockHeaderSize +protocolParamMaxBlockHeaderSize , _maxBBSize :: HKD Identity Natural Alonzo._maxBBSize = Natural HKD Identity Natural -protocolParamMaxBlockBodySize +protocolParamMaxBlockBodySize , _maxTxSize :: HKD Identity Natural Alonzo._maxTxSize = Natural HKD Identity Natural -protocolParamMaxTxSize +protocolParamMaxTxSize , _minfeeB :: HKD Identity Natural Alonzo._minfeeB = Natural HKD Identity Natural -protocolParamTxFeeFixed +protocolParamTxFeeFixed , _minfeeA :: HKD Identity Natural Alonzo._minfeeA = Natural HKD Identity Natural -protocolParamTxFeePerByte +protocolParamTxFeePerByte , _keyDeposit :: HKD Identity Coin Alonzo._keyDeposit = Lovelace -> Coin toShelleyLovelace Lovelace -protocolParamStakeAddressDeposit +protocolParamStakeAddressDeposit , _poolDeposit :: HKD Identity Coin Alonzo._poolDeposit = Lovelace -> Coin toShelleyLovelace Lovelace -protocolParamStakePoolDeposit +protocolParamStakePoolDeposit , _minPoolCost :: HKD Identity Coin Alonzo._minPoolCost = Lovelace -> Coin toShelleyLovelace Lovelace -protocolParamMinPoolCost +protocolParamMinPoolCost , _eMax :: HKD Identity EpochNo Alonzo._eMax = EpochNo HKD Identity EpochNo -protocolParamPoolRetireMaxEpoch +protocolParamPoolRetireMaxEpoch , _nOpt :: HKD Identity Natural Alonzo._nOpt = Natural HKD Identity Natural -protocolParamStakePoolTargetNum +protocolParamStakePoolTargetNum , _a0 :: HKD Identity Rational Alonzo._a0 = Rational HKD Identity Rational -protocolParamPoolPledgeInfluence +protocolParamPoolPledgeInfluence , _rho :: HKD Identity UnitInterval Alonzo._rho = Rational -> UnitInterval Ledger.unitIntervalFromRational Rational -protocolParamMonetaryExpansion +protocolParamMonetaryExpansion , _tau :: HKD Identity UnitInterval Alonzo._tau = Rational -> UnitInterval Ledger.unitIntervalFromRational Rational -protocolParamTreasuryCut +protocolParamTreasuryCut -- New params in Alonzo: , _adaPerUTxOWord :: HKD Identity Coin Alonzo._adaPerUTxOWord = Lovelace -> Coin toShelleyLovelace Lovelace -utxoCostPerWord +utxoCostPerWord , _costmdls :: HKD Identity (Map Language CostModel) Alonzo._costmdls = Map AnyPlutusScriptVersion CostModel -> Map Language CostModel toAlonzoCostModels Map AnyPlutusScriptVersion CostModel -protocolParamCostModels +protocolParamCostModels , _prices :: HKD Identity Prices Alonzo._prices = ExecutionUnitPrices -> Prices toAlonzoPrices ExecutionUnitPrices -prices +prices , _maxTxExUnits :: HKD Identity ExUnits Alonzo._maxTxExUnits = ExecutionUnits -> ExUnits toAlonzoExUnits ExecutionUnits -maxTxExUnits +maxTxExUnits , _maxBlockExUnits :: HKD Identity ExUnits Alonzo._maxBlockExUnits = ExecutionUnits -> ExUnits toAlonzoExUnits ExecutionUnits -maxBlockExUnits +maxBlockExUnits , _maxValSize :: HKD Identity Natural Alonzo._maxValSize = Natural HKD Identity Natural -maxValueSize +maxValueSize , _collateralPercentage :: HKD Identity Natural Alonzo._collateralPercentage = Natural HKD Identity Natural -collateralPercentage +collateralPercentage , _maxCollateralInputs :: HKD Identity Natural Alonzo._maxCollateralInputs = Natural HKD Identity Natural -maxCollateralInputs +maxCollateralInputs } toAlonzoPParams ProtocolParameters { protocolParamUTxOCostPerWord :: ProtocolParameters -> Maybe Lovelace protocolParamUTxOCostPerWord = Maybe Lovelace @@ -4561,9 +4561,9 @@ -- Conversion functions: protocol paramaters from ledger types -- -fromLedgerPParams - :: ShelleyBasedEra era - -> Ledger.PParams (ShelleyLedgerEra era) +fromLedgerPParams + :: ShelleyBasedEra era + -> Ledger.PParams (ShelleyLedgerEra era) -> ProtocolParameters fromLedgerPParams :: ShelleyBasedEra era -> PParams (ShelleyLedgerEra era) -> ProtocolParameters @@ -4585,79 +4585,79 @@ fromAlonzoPParams -fromShelleyPParams :: Shelley.PParams ledgerera +fromShelleyPParams :: Shelley.PParams ledgerera -> ProtocolParameters fromShelleyPParams :: PParams ledgerera -> ProtocolParameters fromShelleyPParams Shelley.PParams { - HKD Identity Natural + HKD Identity Natural _minfeeA :: HKD Identity Natural _minfeeA :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._minfeeA - , HKD Identity Natural +Shelley._minfeeA + , HKD Identity Natural _minfeeB :: HKD Identity Natural _minfeeB :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._minfeeB - , HKD Identity Natural +Shelley._minfeeB + , HKD Identity Natural _maxBBSize :: HKD Identity Natural _maxBBSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._maxBBSize - , HKD Identity Natural +Shelley._maxBBSize + , HKD Identity Natural _maxTxSize :: HKD Identity Natural _maxTxSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._maxTxSize - , HKD Identity Natural +Shelley._maxTxSize + , HKD Identity Natural _maxBHSize :: HKD Identity Natural _maxBHSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._maxBHSize - , HKD Identity Coin +Shelley._maxBHSize + , HKD Identity Coin _keyDeposit :: HKD Identity Coin _keyDeposit :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Shelley._keyDeposit - , HKD Identity Coin +Shelley._keyDeposit + , HKD Identity Coin _poolDeposit :: HKD Identity Coin _poolDeposit :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Shelley._poolDeposit - , HKD Identity EpochNo +Shelley._poolDeposit + , HKD Identity EpochNo _eMax :: HKD Identity EpochNo _eMax :: forall (f :: * -> *) era. PParams' f era -> HKD f EpochNo -Shelley._eMax - , HKD Identity Natural +Shelley._eMax + , HKD Identity Natural _nOpt :: HKD Identity Natural _nOpt :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Shelley._nOpt - , HKD Identity Rational +Shelley._nOpt + , HKD Identity Rational _a0 :: HKD Identity Rational _a0 :: forall (f :: * -> *) era. PParams' f era -> HKD f Rational -Shelley._a0 - , HKD Identity UnitInterval +Shelley._a0 + , HKD Identity UnitInterval _rho :: HKD Identity UnitInterval _rho :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Shelley._rho - , HKD Identity UnitInterval +Shelley._rho + , HKD Identity UnitInterval _tau :: HKD Identity UnitInterval _tau :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Shelley._tau - , HKD Identity UnitInterval +Shelley._tau + , HKD Identity UnitInterval _d :: HKD Identity UnitInterval _d :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Shelley._d - , HKD Identity Nonce +Shelley._d + , HKD Identity Nonce _extraEntropy :: HKD Identity Nonce _extraEntropy :: forall (f :: * -> *) era. PParams' f era -> HKD f Nonce -Shelley._extraEntropy - , HKD Identity ProtVer +Shelley._extraEntropy + , HKD Identity ProtVer _protocolVersion :: HKD Identity ProtVer _protocolVersion :: forall (f :: * -> *) era. PParams' f era -> HKD f ProtVer -Shelley._protocolVersion - , HKD Identity Coin +Shelley._protocolVersion + , HKD Identity Coin _minUTxOValue :: HKD Identity Coin _minUTxOValue :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Shelley._minUTxOValue - , HKD Identity Coin +Shelley._minUTxOValue + , HKD Identity Coin _minPoolCost :: HKD Identity Coin _minPoolCost :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Shelley._minPoolCost +Shelley._minPoolCost } = ProtocolParameters :: (Natural, Natural) -> Rational @@ -4687,88 +4687,88 @@ -> ProtocolParameters ProtocolParameters { protocolParamProtocolVersion :: (Natural, Natural) -protocolParamProtocolVersion = (\(Ledger.ProtVer Natural -a Natural -b) -> (Natural -a,Natural -b)) +protocolParamProtocolVersion = (\(Ledger.ProtVer Natural +a Natural +b) -> (Natural +a,Natural +b)) ProtVer HKD Identity ProtVer -_protocolVersion +_protocolVersion , protocolParamDecentralization :: Rational protocolParamDecentralization = UnitInterval -> Rational Ledger.unitIntervalToRational UnitInterval HKD Identity UnitInterval -_d +_d , protocolParamExtraPraosEntropy :: Maybe PraosNonce protocolParamExtraPraosEntropy = Nonce -> Maybe PraosNonce fromLedgerNonce Nonce HKD Identity Nonce -_extraEntropy +_extraEntropy , protocolParamMaxBlockHeaderSize :: Natural protocolParamMaxBlockHeaderSize = Natural HKD Identity Natural -_maxBHSize +_maxBHSize , protocolParamMaxBlockBodySize :: Natural protocolParamMaxBlockBodySize = Natural HKD Identity Natural -_maxBBSize +_maxBBSize , protocolParamMaxTxSize :: Natural protocolParamMaxTxSize = Natural HKD Identity Natural -_maxTxSize +_maxTxSize , protocolParamTxFeeFixed :: Natural protocolParamTxFeeFixed = Natural HKD Identity Natural -_minfeeB +_minfeeB , protocolParamTxFeePerByte :: Natural protocolParamTxFeePerByte = Natural HKD Identity Natural -_minfeeA +_minfeeA , protocolParamMinUTxOValue :: Maybe Lovelace protocolParamMinUTxOValue = Lovelace -> Maybe Lovelace forall a. a -> Maybe a Just (Coin -> Lovelace fromShelleyLovelace Coin HKD Identity Coin -_minUTxOValue) +_minUTxOValue) , protocolParamStakeAddressDeposit :: Lovelace protocolParamStakeAddressDeposit = Coin -> Lovelace fromShelleyLovelace Coin HKD Identity Coin -_keyDeposit +_keyDeposit , protocolParamStakePoolDeposit :: Lovelace protocolParamStakePoolDeposit = Coin -> Lovelace fromShelleyLovelace Coin HKD Identity Coin -_poolDeposit +_poolDeposit , protocolParamMinPoolCost :: Lovelace protocolParamMinPoolCost = Coin -> Lovelace fromShelleyLovelace Coin HKD Identity Coin -_minPoolCost +_minPoolCost , protocolParamPoolRetireMaxEpoch :: EpochNo protocolParamPoolRetireMaxEpoch = EpochNo HKD Identity EpochNo -_eMax +_eMax , protocolParamStakePoolTargetNum :: Natural protocolParamStakePoolTargetNum = Natural HKD Identity Natural -_nOpt +_nOpt , protocolParamPoolPledgeInfluence :: Rational protocolParamPoolPledgeInfluence = Rational HKD Identity Rational -_a0 +_a0 , protocolParamMonetaryExpansion :: Rational protocolParamMonetaryExpansion = UnitInterval -> Rational Ledger.unitIntervalToRational UnitInterval HKD Identity UnitInterval -_rho +_rho , protocolParamTreasuryCut :: Rational protocolParamTreasuryCut = UnitInterval -> Rational Ledger.unitIntervalToRational UnitInterval HKD Identity UnitInterval -_tau +_tau , protocolParamUTxOCostPerWord :: Maybe Lovelace protocolParamUTxOCostPerWord = Maybe Lovelace forall a. Maybe a @@ -4804,107 +4804,107 @@ } -fromAlonzoPParams :: Alonzo.PParams ledgerera -> ProtocolParameters +fromAlonzoPParams :: Alonzo.PParams ledgerera -> ProtocolParameters fromAlonzoPParams :: PParams ledgerera -> ProtocolParameters fromAlonzoPParams Alonzo.PParams { - HKD Identity Natural + HKD Identity Natural _minfeeA :: HKD Identity Natural _minfeeA :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._minfeeA - , HKD Identity Natural +Alonzo._minfeeA + , HKD Identity Natural _minfeeB :: HKD Identity Natural _minfeeB :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._minfeeB - , HKD Identity Natural +Alonzo._minfeeB + , HKD Identity Natural _maxBBSize :: HKD Identity Natural _maxBBSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._maxBBSize - , HKD Identity Natural +Alonzo._maxBBSize + , HKD Identity Natural _maxTxSize :: HKD Identity Natural _maxTxSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._maxTxSize - , HKD Identity Natural +Alonzo._maxTxSize + , HKD Identity Natural _maxBHSize :: HKD Identity Natural _maxBHSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._maxBHSize - , HKD Identity Coin +Alonzo._maxBHSize + , HKD Identity Coin _keyDeposit :: HKD Identity Coin _keyDeposit :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Alonzo._keyDeposit - , HKD Identity Coin +Alonzo._keyDeposit + , HKD Identity Coin _poolDeposit :: HKD Identity Coin _poolDeposit :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Alonzo._poolDeposit - , HKD Identity EpochNo +Alonzo._poolDeposit + , HKD Identity EpochNo _eMax :: HKD Identity EpochNo _eMax :: forall (f :: * -> *) era. PParams' f era -> HKD f EpochNo -Alonzo._eMax - , HKD Identity Natural +Alonzo._eMax + , HKD Identity Natural _nOpt :: HKD Identity Natural _nOpt :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._nOpt - , HKD Identity Rational +Alonzo._nOpt + , HKD Identity Rational _a0 :: HKD Identity Rational _a0 :: forall (f :: * -> *) era. PParams' f era -> HKD f Rational -Alonzo._a0 - , HKD Identity UnitInterval +Alonzo._a0 + , HKD Identity UnitInterval _rho :: HKD Identity UnitInterval _rho :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Alonzo._rho - , HKD Identity UnitInterval +Alonzo._rho + , HKD Identity UnitInterval _tau :: HKD Identity UnitInterval _tau :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Alonzo._tau - , HKD Identity UnitInterval +Alonzo._tau + , HKD Identity UnitInterval _d :: HKD Identity UnitInterval _d :: forall (f :: * -> *) era. PParams' f era -> HKD f UnitInterval -Alonzo._d - , HKD Identity Nonce +Alonzo._d + , HKD Identity Nonce _extraEntropy :: HKD Identity Nonce _extraEntropy :: forall (f :: * -> *) era. PParams' f era -> HKD f Nonce -Alonzo._extraEntropy - , HKD Identity ProtVer +Alonzo._extraEntropy + , HKD Identity ProtVer _protocolVersion :: HKD Identity ProtVer _protocolVersion :: forall (f :: * -> *) era. PParams' f era -> HKD f ProtVer -Alonzo._protocolVersion - , HKD Identity Coin +Alonzo._protocolVersion + , HKD Identity Coin _minPoolCost :: HKD Identity Coin _minPoolCost :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Alonzo._minPoolCost - , HKD Identity Coin +Alonzo._minPoolCost + , HKD Identity Coin _adaPerUTxOWord :: HKD Identity Coin _adaPerUTxOWord :: forall (f :: * -> *) era. PParams' f era -> HKD f Coin -Alonzo._adaPerUTxOWord - , HKD Identity (Map Language CostModel) +Alonzo._adaPerUTxOWord + , HKD Identity (Map Language CostModel) _costmdls :: HKD Identity (Map Language CostModel) _costmdls :: forall (f :: * -> *) era. PParams' f era -> HKD f (Map Language CostModel) -Alonzo._costmdls - , HKD Identity Prices +Alonzo._costmdls + , HKD Identity Prices _prices :: HKD Identity Prices _prices :: forall (f :: * -> *) era. PParams' f era -> HKD f Prices -Alonzo._prices - , HKD Identity ExUnits +Alonzo._prices + , HKD Identity ExUnits _maxTxExUnits :: HKD Identity ExUnits _maxTxExUnits :: forall (f :: * -> *) era. PParams' f era -> HKD f ExUnits -Alonzo._maxTxExUnits - , HKD Identity ExUnits +Alonzo._maxTxExUnits + , HKD Identity ExUnits _maxBlockExUnits :: HKD Identity ExUnits _maxBlockExUnits :: forall (f :: * -> *) era. PParams' f era -> HKD f ExUnits -Alonzo._maxBlockExUnits - , HKD Identity Natural +Alonzo._maxBlockExUnits + , HKD Identity Natural _maxValSize :: HKD Identity Natural _maxValSize :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._maxValSize - , HKD Identity Natural +Alonzo._maxValSize + , HKD Identity Natural _collateralPercentage :: HKD Identity Natural _collateralPercentage :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._collateralPercentage - , HKD Identity Natural +Alonzo._collateralPercentage + , HKD Identity Natural _maxCollateralInputs :: HKD Identity Natural _maxCollateralInputs :: forall (f :: * -> *) era. PParams' f era -> HKD f Natural -Alonzo._maxCollateralInputs +Alonzo._maxCollateralInputs } = ProtocolParameters :: (Natural, Natural) -> Rational @@ -4934,44 +4934,44 @@ -> ProtocolParameters ProtocolParameters { protocolParamProtocolVersion :: (Natural, Natural) -protocolParamProtocolVersion = (\(Ledger.ProtVer Natural -a Natural -b) -> (Natural -a,Natural -b)) +protocolParamProtocolVersion = (\(Ledger.ProtVer Natural +a Natural +b) -> (Natural +a,Natural +b)) ProtVer HKD Identity ProtVer -_protocolVersion +_protocolVersion , protocolParamDecentralization :: Rational protocolParamDecentralization = UnitInterval -> Rational Ledger.unitIntervalToRational UnitInterval HKD Identity UnitInterval -_d +_d , protocolParamExtraPraosEntropy :: Maybe PraosNonce protocolParamExtraPraosEntropy = Nonce -> Maybe PraosNonce fromLedgerNonce Nonce HKD Identity Nonce -_extraEntropy +_extraEntropy , protocolParamMaxBlockHeaderSize :: Natural protocolParamMaxBlockHeaderSize = Natural HKD Identity Natural -_maxBHSize +_maxBHSize , protocolParamMaxBlockBodySize :: Natural protocolParamMaxBlockBodySize = Natural HKD Identity Natural -_maxBBSize +_maxBBSize , protocolParamMaxTxSize :: Natural protocolParamMaxTxSize = Natural HKD Identity Natural -_maxTxSize +_maxTxSize , protocolParamTxFeeFixed :: Natural protocolParamTxFeeFixed = Natural HKD Identity Natural -_minfeeB +_minfeeB , protocolParamTxFeePerByte :: Natural protocolParamTxFeePerByte = Natural HKD Identity Natural -_minfeeA +_minfeeA , protocolParamMinUTxOValue :: Maybe Lovelace protocolParamMinUTxOValue = Maybe Lovelace forall a. Maybe a @@ -4980,90 +4980,90 @@ protocolParamStakeAddressDeposit = Coin -> Lovelace fromShelleyLovelace Coin HKD Identity Coin -_keyDeposit +_keyDeposit , protocolParamStakePoolDeposit :: Lovelace protocolParamStakePoolDeposit = Coin -> Lovelace fromShelleyLovelace Coin HKD Identity Coin -_poolDeposit +_poolDeposit , protocolParamMinPoolCost :: Lovelace protocolParamMinPoolCost = Coin -> Lovelace fromShelleyLovelace Coin HKD Identity Coin -_minPoolCost +_minPoolCost , protocolParamPoolRetireMaxEpoch :: EpochNo protocolParamPoolRetireMaxEpoch = EpochNo HKD Identity EpochNo -_eMax +_eMax , protocolParamStakePoolTargetNum :: Natural protocolParamStakePoolTargetNum = Natural HKD Identity Natural -_nOpt +_nOpt , protocolParamPoolPledgeInfluence :: Rational protocolParamPoolPledgeInfluence = Rational HKD Identity Rational -_a0 +_a0 , protocolParamMonetaryExpansion :: Rational protocolParamMonetaryExpansion = UnitInterval -> Rational Ledger.unitIntervalToRational UnitInterval HKD Identity UnitInterval -_rho +_rho , protocolParamTreasuryCut :: Rational protocolParamTreasuryCut = UnitInterval -> Rational Ledger.unitIntervalToRational UnitInterval HKD Identity UnitInterval -_tau +_tau , protocolParamUTxOCostPerWord :: Maybe Lovelace protocolParamUTxOCostPerWord = Lovelace -> Maybe Lovelace forall a. a -> Maybe a Just (Coin -> Lovelace fromShelleyLovelace Coin HKD Identity Coin -_adaPerUTxOWord) +_adaPerUTxOWord) , protocolParamCostModels :: Map AnyPlutusScriptVersion CostModel protocolParamCostModels = Map Language CostModel -> Map AnyPlutusScriptVersion CostModel fromAlonzoCostModels Map Language CostModel HKD Identity (Map Language CostModel) -_costmdls +_costmdls , protocolParamPrices :: Maybe ExecutionUnitPrices protocolParamPrices = ExecutionUnitPrices -> Maybe ExecutionUnitPrices forall a. a -> Maybe a Just (Prices -> ExecutionUnitPrices fromAlonzoPrices Prices HKD Identity Prices -_prices) +_prices) , protocolParamMaxTxExUnits :: Maybe ExecutionUnits protocolParamMaxTxExUnits = ExecutionUnits -> Maybe ExecutionUnits forall a. a -> Maybe a Just (ExUnits -> ExecutionUnits fromAlonzoExUnits ExUnits HKD Identity ExUnits -_maxTxExUnits) +_maxTxExUnits) , protocolParamMaxBlockExUnits :: Maybe ExecutionUnits protocolParamMaxBlockExUnits = ExecutionUnits -> Maybe ExecutionUnits forall a. a -> Maybe a Just (ExUnits -> ExecutionUnits fromAlonzoExUnits ExUnits HKD Identity ExUnits -_maxBlockExUnits) +_maxBlockExUnits) , protocolParamMaxValueSize :: Maybe Natural protocolParamMaxValueSize = Natural -> Maybe Natural forall a. a -> Maybe a Just Natural HKD Identity Natural -_maxValSize +_maxValSize , protocolParamCollateralPercent :: Maybe Natural protocolParamCollateralPercent = Natural -> Maybe Natural forall a. a -> Maybe a Just Natural HKD Identity Natural -_collateralPercentage +_collateralPercentage , protocolParamMaxCollateralInputs :: Maybe Natural protocolParamMaxCollateralInputs = Natural -> Maybe Natural forall a. a -> Maybe a Just Natural HKD Identity Natural -_maxCollateralInputs +_maxCollateralInputs } \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Query.html b/cardano-api/src/Cardano.Api.Query.html index f18bc8c583c..23502f208b3 100644 --- a/cardano-api/src/Cardano.Api.Query.html +++ b/cardano-api/src/Cardano.Api.Query.html @@ -96,19 +96,19 @@ -- Queries -- -data QueryInMode mode result where - QueryCurrentEra - :: ConsensusModeIsMultiEra mode - -> QueryInMode mode AnyCardanoEra +data QueryInMode mode result where + QueryCurrentEra + :: ConsensusModeIsMultiEra mode + -> QueryInMode mode AnyCardanoEra - QueryInEra - :: EraInMode era mode - -> QueryInEra era result - -> QueryInMode mode (Either EraMismatch result) + QueryInEra + :: EraInMode era mode + -> QueryInEra era result + -> QueryInMode mode (Either EraMismatch result) - QueryEraHistory - :: ConsensusModeIsMultiEra mode - -> QueryInMode mode (EraHistory mode) + QueryEraHistory + :: ConsensusModeIsMultiEra mode + -> QueryInMode mode (EraHistory mode) --TODO: add support for these -- QueryEraStart :: ConsensusModeIsMultiEra mode @@ -119,105 +119,105 @@ newtype SlotsToEpochEnd = SlotsToEpochEnd Word64 -data EraHistory mode where - EraHistory - :: ConsensusBlockForMode mode ~ Consensus.HardForkBlock xs - => ConsensusMode mode - -> History.Interpreter xs - -> EraHistory mode +data EraHistory mode where + EraHistory + :: ConsensusBlockForMode mode ~ Consensus.HardForkBlock xs + => ConsensusMode mode + -> History.Interpreter xs + -> EraHistory mode -slotToEpoch :: SlotNo -> EraHistory mode -> Either Qry.PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd) +slotToEpoch :: SlotNo -> EraHistory mode -> Either Qry.PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd) slotToEpoch :: SlotNo -> EraHistory mode -> Either PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd) -slotToEpoch SlotNo -slotNo (EraHistory ConsensusMode mode -_ Interpreter xs -interpreter) = case Interpreter xs +slotToEpoch SlotNo +slotNo (EraHistory ConsensusMode mode +_ Interpreter xs +interpreter) = case Interpreter xs -> Qry (EpochNo, Word64, Word64) -> Either PastHorizonException (EpochNo, Word64, Word64) forall (xs :: [*]) a. HasCallStack => Interpreter xs -> Qry a -> Either PastHorizonException a Qry.interpretQuery Interpreter xs -interpreter (SlotNo -> Qry (EpochNo, Word64, Word64) +interpreter (SlotNo -> Qry (EpochNo, Word64, Word64) Qry.slotToEpoch SlotNo -slotNo) of - Right (EpochNo -epochNumber, Word64 -slotsInEpoch, Word64 -slotsToEpochEnd) -> (EpochNo, SlotsInEpoch, SlotsToEpochEnd) +slotNo) of + Right (EpochNo +epochNumber, Word64 +slotsInEpoch, Word64 +slotsToEpochEnd) -> (EpochNo, SlotsInEpoch, SlotsToEpochEnd) -> Either PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd) forall a b. b -> Either a b Right (EpochNo -epochNumber, Word64 -> SlotsInEpoch +epochNumber, Word64 -> SlotsInEpoch SlotsInEpoch Word64 -slotsInEpoch, Word64 -> SlotsToEpochEnd +slotsInEpoch, Word64 -> SlotsToEpochEnd SlotsToEpochEnd Word64 -slotsToEpochEnd) - Left PastHorizonException -e -> PastHorizonException +slotsToEpochEnd) + Left PastHorizonException +e -> PastHorizonException -> Either PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd) forall a b. a -> Either a b Left PastHorizonException -e +e -deriving instance Show (QueryInMode mode result) +deriving instance Show (QueryInMode mode result) -data QueryInEra era result where +data QueryInEra era result where QueryByronUpdateState :: QueryInEra ByronEra ByronUpdateState - QueryInShelleyBasedEra :: ShelleyBasedEra era - -> QueryInShelleyBasedEra era result - -> QueryInEra era result + QueryInShelleyBasedEra :: ShelleyBasedEra era + -> QueryInShelleyBasedEra era result + -> QueryInEra era result -deriving instance Show (QueryInEra era result) +deriving instance Show (QueryInEra era result) -data QueryInShelleyBasedEra era result where - QueryChainPoint - :: QueryInShelleyBasedEra era ChainPoint +data QueryInShelleyBasedEra era result where + QueryChainPoint + :: QueryInShelleyBasedEra era ChainPoint - QueryEpoch - :: QueryInShelleyBasedEra era EpochNo + QueryEpoch + :: QueryInShelleyBasedEra era EpochNo - QueryGenesisParameters - :: QueryInShelleyBasedEra era GenesisParameters + QueryGenesisParameters + :: QueryInShelleyBasedEra era GenesisParameters - QueryProtocolParameters - :: QueryInShelleyBasedEra era ProtocolParameters + QueryProtocolParameters + :: QueryInShelleyBasedEra era ProtocolParameters - QueryProtocolParametersUpdate - :: QueryInShelleyBasedEra era + QueryProtocolParametersUpdate + :: QueryInShelleyBasedEra era (Map (Hash GenesisKey) ProtocolParametersUpdate) - QueryStakeDistribution - :: QueryInShelleyBasedEra era (Map (Hash StakePoolKey) Rational) + QueryStakeDistribution + :: QueryInShelleyBasedEra era (Map (Hash StakePoolKey) Rational) - QueryUTxO + QueryUTxO :: Maybe (Set AddressAny) - -> QueryInShelleyBasedEra era (UTxO era) + -> QueryInShelleyBasedEra era (UTxO era) - QueryStakeAddresses + QueryStakeAddresses :: Set StakeCredential -> NetworkId - -> QueryInShelleyBasedEra era (Map StakeAddress Lovelace, + -> QueryInShelleyBasedEra era (Map StakeAddress Lovelace, Map StakeAddress PoolId) -- TODO: Need to update ledger-specs dependency to access RewardProvenance -- QueryPoolRanking -- :: QueryInShelleyBasedEra era RewardProvenance - QueryDebugLedgerState - :: QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) + QueryDebugLedgerState + :: QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) - QueryProtocolState - :: QueryInShelleyBasedEra era (ProtocolState era) + QueryProtocolState + :: QueryInShelleyBasedEra era (ProtocolState era) -deriving instance Show (QueryInShelleyBasedEra era result) +deriving instance Show (QueryInShelleyBasedEra era result) -- ---------------------------------------------------------------------------- -- Wrapper types used in queries @@ -226,7 +226,7 @@ --TODO: provide appropriate instances for these types as needed, e.g. JSON newtype ByronUpdateState = ByronUpdateState Byron.Update.State - deriving Int -> ByronUpdateState -> ShowS + deriving Int -> ByronUpdateState -> ShowS [ByronUpdateState] -> ShowS ByronUpdateState -> String (Int -> ByronUpdateState -> ShowS) @@ -243,24 +243,24 @@ $cshowsPrec :: Int -> ByronUpdateState -> ShowS Show -newtype UTxO era = UTxO (Map TxIn (TxOut era)) +newtype UTxO era = UTxO (Map TxIn (TxOut era)) -instance IsCardanoEra era => ToJSON (UTxO era) where - toJSON :: UTxO era -> Value -toJSON (UTxO Map TxIn (TxOut era) -m) = Map TxIn (TxOut era) -> Value +instance IsCardanoEra era => ToJSON (UTxO era) where + toJSON :: UTxO era -> Value +toJSON (UTxO Map TxIn (TxOut era) +m) = Map TxIn (TxOut era) -> Value forall a. ToJSON a => a -> Value toJSON Map TxIn (TxOut era) -m +m -newtype SerialisedDebugLedgerState era - = SerialisedDebugLedgerState (Serialised (Shelley.NewEpochState (ShelleyLedgerEra era))) +newtype SerialisedDebugLedgerState era + = SerialisedDebugLedgerState (Serialised (Shelley.NewEpochState (ShelleyLedgerEra era))) -data DebugLedgerState era where - DebugLedgerState :: ShelleyLedgerEra era ~ ledgerera => Shelley.NewEpochState ledgerera -> DebugLedgerState era +data DebugLedgerState era where + DebugLedgerState :: ShelleyLedgerEra era ~ ledgerera => Shelley.NewEpochState ledgerera -> DebugLedgerState era -instance (Typeable era, Shelley.TransLedgerState FromCBOR (ShelleyLedgerEra era)) => FromCBOR (DebugLedgerState era) where - fromCBOR :: Decoder s (DebugLedgerState era) +instance (Typeable era, Shelley.TransLedgerState FromCBOR (ShelleyLedgerEra era)) => FromCBOR (DebugLedgerState era) where + fromCBOR :: Decoder s (DebugLedgerState era) fromCBOR = NewEpochState (ShelleyLedgerEra era) -> DebugLedgerState era forall era ledgerera. (ShelleyLedgerEra era ~ ledgerera) => @@ -269,48 +269,48 @@ -> Decoder s (NewEpochState (ShelleyLedgerEra era)) -> Decoder s (DebugLedgerState era) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b -<$> (forall s. Decoder s (NewEpochState (ShelleyLedgerEra era)) +<$> (forall s. Decoder s (NewEpochState (ShelleyLedgerEra era)) forall a s. FromCBOR a => Decoder s a -fromCBOR :: Decoder s (Shelley.NewEpochState (ShelleyLedgerEra era))) +fromCBOR :: Decoder s (Shelley.NewEpochState (ShelleyLedgerEra era))) -- TODO: Shelley based era class! -instance ( IsShelleyBasedEra era - , ShelleyLedgerEra era ~ ledgerera - , Consensus.ShelleyBasedEra ledgerera - , ToJSON (Core.PParams ledgerera) - , ToJSON (Core.PParamsDelta ledgerera) - , ToJSON (Core.TxOut ledgerera)) => ToJSON (DebugLedgerState era) where - toJSON :: DebugLedgerState era -> Value -toJSON (DebugLedgerState NewEpochState ledgerera -newEpochS) = [Pair] -> Value +instance ( IsShelleyBasedEra era + , ShelleyLedgerEra era ~ ledgerera + , Consensus.ShelleyBasedEra ledgerera + , ToJSON (Core.PParams ledgerera) + , ToJSON (Core.PParamsDelta ledgerera) + , ToJSON (Core.TxOut ledgerera)) => ToJSON (DebugLedgerState era) where + toJSON :: DebugLedgerState era -> Value +toJSON (DebugLedgerState NewEpochState ledgerera +newEpochS) = [Pair] -> Value object [ Text "lastEpoch" Text -> EpochNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= NewEpochState ledgerera -> EpochNo forall era. NewEpochState era -> EpochNo Shelley.nesEL NewEpochState ledgerera -newEpochS +newEpochS , Text "blocksBefore" Text -> BlocksMade StandardCrypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= NewEpochState ledgerera -> BlocksMade (Crypto ledgerera) forall era. NewEpochState era -> BlocksMade (Crypto era) Shelley.nesBprev NewEpochState ledgerera -newEpochS +newEpochS , Text "blocksCurrent" Text -> BlocksMade StandardCrypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= NewEpochState ledgerera -> BlocksMade (Crypto ledgerera) forall era. NewEpochState era -> BlocksMade (Crypto era) Shelley.nesBcur NewEpochState ledgerera -newEpochS +newEpochS , Text "stateBefore" Text -> EpochState ledgerera -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= NewEpochState ledgerera -> EpochState ledgerera forall era. NewEpochState era -> EpochState era Shelley.nesEs NewEpochState ledgerera -newEpochS +newEpochS , Text "possibleRewardUpdate" Text -> StrictMaybe (PulsingRewUpdate StandardCrypto) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -319,25 +319,25 @@ forall era. NewEpochState era -> StrictMaybe (PulsingRewUpdate (Crypto era)) Shelley.nesRu NewEpochState ledgerera -newEpochS +newEpochS , Text "stakeDistrib" Text -> PoolDistr StandardCrypto -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= NewEpochState ledgerera -> PoolDistr (Crypto ledgerera) forall era. NewEpochState era -> PoolDistr (Crypto era) Shelley.nesPd NewEpochState ledgerera -newEpochS +newEpochS ] -newtype ProtocolState era - = ProtocolState (Serialised (Shelley.ChainDepState (Ledger.Crypto (ShelleyLedgerEra era)))) +newtype ProtocolState era + = ProtocolState (Serialised (Shelley.ChainDepState (Ledger.Crypto (ShelleyLedgerEra era)))) -toShelleyAddrSet :: CardanoEra era +toShelleyAddrSet :: CardanoEra era -> Set AddressAny -> Set (Shelley.Addr Consensus.StandardCrypto) toShelleyAddrSet :: CardanoEra era -> Set AddressAny -> Set (Addr StandardCrypto) -toShelleyAddrSet CardanoEra era -era = +toShelleyAddrSet CardanoEra era +era = [Addr StandardCrypto] -> Set (Addr StandardCrypto) forall a. Ord a => [a] -> Set a Set.fromList @@ -367,7 +367,7 @@ forall era. CardanoEra era -> AddressAny -> Maybe (AddressInEra era) anyAddressInEra CardanoEra era -era) +era) ([AddressAny] -> [AddressInEra era]) -> (Set AddressAny -> [AddressAny]) -> Set AddressAny @@ -378,15 +378,15 @@ Set.toList -fromUTxO :: ShelleyLedgerEra era ~ ledgerera - => Ledger.Crypto ledgerera ~ StandardCrypto - => ShelleyBasedEra era - -> Shelley.UTxO ledgerera - -> UTxO era +fromUTxO :: ShelleyLedgerEra era ~ ledgerera + => Ledger.Crypto ledgerera ~ StandardCrypto + => ShelleyBasedEra era + -> Shelley.UTxO ledgerera + -> UTxO era fromUTxO :: ShelleyBasedEra era -> UTxO ledgerera -> UTxO era -fromUTxO ShelleyBasedEra era -era (Shelley.UTxO Map (TxIn (Crypto ledgerera)) (TxOut ledgerera) -utxo) = +fromUTxO ShelleyBasedEra era +era (Shelley.UTxO Map (TxIn (Crypto ledgerera)) (TxOut ledgerera) +utxo) = Map TxIn (TxOut era) -> UTxO era forall era. Map TxIn (TxOut era) -> UTxO era UTxO @@ -421,7 +421,7 @@ (ShelleyLedgerEra era ~ ledgerera) => ShelleyBasedEra era -> TxOut ledgerera -> TxOut era fromTxOut ShelleyBasedEra era -era)) +era)) ([(TxIn StandardCrypto, TxOut ledgerera)] -> [(TxIn, TxOut era)]) -> (Map (TxIn StandardCrypto) (TxOut ledgerera) -> [(TxIn StandardCrypto, TxOut ledgerera)]) @@ -437,7 +437,7 @@ forall a b. (a -> b) -> a -> b $ Map (TxIn (Crypto ledgerera)) (TxOut ledgerera) Map (TxIn StandardCrypto) (TxOut ledgerera) -utxo +utxo fromShelleyPoolDistr :: Shelley.PoolDistr StandardCrypto -> Map (Hash StakePoolKey) Rational @@ -623,10 +623,10 @@ -- Conversions of queries into the consensus types. -- -toConsensusQuery :: forall mode block result. - ConsensusBlockForMode mode ~ block - => QueryInMode mode result - -> Some (Consensus.Query block) +toConsensusQuery :: forall mode block result. + ConsensusBlockForMode mode ~ block + => QueryInMode mode result + -> Some (Consensus.Query block) toConsensusQuery :: QueryInMode mode result -> Some (Query block) toConsensusQuery (QueryCurrentEra ConsensusModeIsMultiEra mode CardanoModeIsMultiEra) = @@ -1114,15 +1114,15 @@ BlockQuery ByronBlock State Consensus.GetUpdateInterfaceState -toConsensusQuery (QueryInEra EraInMode era mode -erainmode (QueryInShelleyBasedEra ShelleyBasedEra era -era QueryInShelleyBasedEra era result -q)) = +toConsensusQuery (QueryInEra EraInMode era mode +erainmode (QueryInShelleyBasedEra ShelleyBasedEra era +era QueryInShelleyBasedEra era result +q)) = case EraInMode era mode -erainmode of +erainmode of EraInMode era mode ByronEraInByronMode -> case ShelleyBasedEra era -era of {} +era of {} EraInMode era mode ShelleyEraInShelleyMode -> EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) @@ -1133,11 +1133,11 @@ EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result -q +erainmode QueryInShelleyBasedEra era result +q EraInMode era mode ByronEraInCardanoMode -> case ShelleyBasedEra era -era of {} +era of {} EraInMode era mode ShelleyEraInCardanoMode -> EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) @@ -1148,8 +1148,8 @@ EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result -q +erainmode QueryInShelleyBasedEra era result +q EraInMode era mode AllegraEraInCardanoMode -> EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) @@ -1160,8 +1160,8 @@ EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result -q +erainmode QueryInShelleyBasedEra era result +q EraInMode era mode MaryEraInCardanoMode -> EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) @@ -1172,8 +1172,8 @@ EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result -q +erainmode QueryInShelleyBasedEra era result +q EraInMode era mode AlonzoEraInCardanoMode -> EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) @@ -1184,23 +1184,23 @@ EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result -q +erainmode QueryInShelleyBasedEra era result +q toConsensusQueryShelleyBased - :: forall era ledgerera mode block xs result. - ConsensusBlockForEra era ~ Consensus.ShelleyBlock ledgerera - => Ledger.Crypto ledgerera ~ Consensus.StandardCrypto - => ConsensusBlockForMode mode ~ block - => block ~ Consensus.HardForkBlock xs - => EraInMode era mode - -> QueryInShelleyBasedEra era result - -> Some (Consensus.Query block) + :: forall era ledgerera mode block xs result. + ConsensusBlockForEra era ~ Consensus.ShelleyBlock ledgerera + => Ledger.Crypto ledgerera ~ Consensus.StandardCrypto + => ConsensusBlockForMode mode ~ block + => block ~ Consensus.HardForkBlock xs + => EraInMode era mode + -> QueryInShelleyBasedEra era result + -> Some (Consensus.Query block) toConsensusQueryShelleyBased :: EraInMode era mode -> QueryInShelleyBasedEra era result -> Some (Query block) -toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result +toConsensusQueryShelleyBased EraInMode era mode +erainmode QueryInShelleyBasedEra era result QueryChainPoint = Query block (HardForkQueryResult xs (Point (ShelleyBlock ledgerera))) @@ -1219,14 +1219,14 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode BlockQuery +erainmode BlockQuery (ShelleyBlock ledgerera) (Point (ShelleyBlock ledgerera)) forall era. BlockQuery (ShelleyBlock era) (Point (ShelleyBlock era)) Consensus.GetLedgerTip) -toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result +toConsensusQueryShelleyBased EraInMode era mode +erainmode QueryInShelleyBasedEra era result QueryEpoch = Query block (HardForkQueryResult xs EpochNo) -> Some (Query block) forall k (f :: k -> *) (a :: k). f a -> Some f @@ -1241,12 +1241,12 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode BlockQuery (ShelleyBlock ledgerera) EpochNo +erainmode BlockQuery (ShelleyBlock ledgerera) EpochNo forall era. BlockQuery (ShelleyBlock era) EpochNo Consensus.GetEpochNo) -toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result +toConsensusQueryShelleyBased EraInMode era mode +erainmode QueryInShelleyBasedEra era result QueryGenesisParameters = Query block (HardForkQueryResult xs (CompactGenesis ledgerera)) -> Some (Query block) @@ -1262,12 +1262,12 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode BlockQuery (ShelleyBlock ledgerera) (CompactGenesis ledgerera) +erainmode BlockQuery (ShelleyBlock ledgerera) (CompactGenesis ledgerera) forall era. BlockQuery (ShelleyBlock era) (CompactGenesis era) Consensus.GetGenesisConfig) -toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result +toConsensusQueryShelleyBased EraInMode era mode +erainmode QueryInShelleyBasedEra era result QueryProtocolParameters = Query block (HardForkQueryResult xs (PParams ledgerera)) -> Some (Query block) @@ -1283,12 +1283,12 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode BlockQuery (ShelleyBlock ledgerera) (PParams ledgerera) +erainmode BlockQuery (ShelleyBlock ledgerera) (PParams ledgerera) forall era. BlockQuery (ShelleyBlock era) (PParams era) Consensus.GetCurrentPParams) -toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result +toConsensusQueryShelleyBased EraInMode era mode +erainmode QueryInShelleyBasedEra era result QueryProtocolParametersUpdate = Query block (HardForkQueryResult xs (ProposedPPUpdates ledgerera)) -> Some (Query block) @@ -1306,12 +1306,12 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode BlockQuery (ShelleyBlock ledgerera) (ProposedPPUpdates ledgerera) +erainmode BlockQuery (ShelleyBlock ledgerera) (ProposedPPUpdates ledgerera) forall era. BlockQuery (ShelleyBlock era) (ProposedPPUpdates era) Consensus.GetProposedPParamsUpdates) -toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result +toConsensusQueryShelleyBased EraInMode era mode +erainmode QueryInShelleyBasedEra era result QueryStakeDistribution = Query block (HardForkQueryResult xs (PoolDistr StandardCrypto)) -> Some (Query block) @@ -1327,13 +1327,13 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode BlockQuery (ShelleyBlock ledgerera) (PoolDistr StandardCrypto) +erainmode BlockQuery (ShelleyBlock ledgerera) (PoolDistr StandardCrypto) forall era. BlockQuery (ShelleyBlock era) (PoolDistr (EraCrypto era)) Consensus.GetStakeDistribution) -toConsensusQueryShelleyBased EraInMode era mode -erainmode (QueryUTxO Maybe (Set AddressAny) +toConsensusQueryShelleyBased EraInMode era mode +erainmode (QueryUTxO Maybe (Set AddressAny) Nothing) = Query block (HardForkQueryResult xs (UTxO ledgerera)) -> Some (Query block) @@ -1349,13 +1349,13 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode BlockQuery (ShelleyBlock ledgerera) (UTxO ledgerera) +erainmode BlockQuery (ShelleyBlock ledgerera) (UTxO ledgerera) forall era. BlockQuery (ShelleyBlock era) (UTxO era) Consensus.GetUTxO) -toConsensusQueryShelleyBased EraInMode era mode -erainmode (QueryUTxO (Just Set AddressAny -addrs)) = +toConsensusQueryShelleyBased EraInMode era mode +erainmode (QueryUTxO (Just Set AddressAny +addrs)) = Query block (HardForkQueryResult xs (UTxO ledgerera)) -> Some (Query block) forall k (f :: k -> *) (a :: k). f a -> Some f @@ -1370,30 +1370,30 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode (Set (Addr (EraCrypto ledgerera)) +erainmode (Set (Addr (EraCrypto ledgerera)) -> BlockQuery (ShelleyBlock ledgerera) (UTxO ledgerera) forall era. Set (Addr (EraCrypto era)) -> BlockQuery (ShelleyBlock era) (UTxO era) Consensus.GetFilteredUTxO Set (Addr (EraCrypto ledgerera)) Set (Addr StandardCrypto) -addrs')) +addrs')) where - addrs' :: Set (Shelley.Addr Consensus.StandardCrypto) - addrs' :: Set (Addr StandardCrypto) -addrs' = CardanoEra era -> Set AddressAny -> Set (Addr StandardCrypto) + addrs' :: Set (Shelley.Addr Consensus.StandardCrypto) + addrs' :: Set (Addr StandardCrypto) +addrs' = CardanoEra era -> Set AddressAny -> Set (Addr StandardCrypto) forall era. CardanoEra era -> Set AddressAny -> Set (Addr StandardCrypto) toShelleyAddrSet (EraInMode era mode -> CardanoEra era forall era mode. EraInMode era mode -> CardanoEra era eraInModeToEra EraInMode era mode -erainmode) Set AddressAny -addrs +erainmode) Set AddressAny +addrs -toConsensusQueryShelleyBased EraInMode era mode -erainmode (QueryStakeAddresses Set StakeCredential -creds NetworkId -_nId) = +toConsensusQueryShelleyBased EraInMode era mode +erainmode (QueryStakeAddresses Set StakeCredential +creds NetworkId +_nId) = Query block (HardForkQueryResult @@ -1427,7 +1427,7 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode +erainmode (Set (Credential 'Staking (EraCrypto ledgerera)) -> BlockQuery (ShelleyBlock ledgerera) @@ -1440,19 +1440,19 @@ (Delegations (EraCrypto era), RewardAccounts (EraCrypto era)) Consensus.GetFilteredDelegationsAndRewardAccounts Set (Credential 'Staking (EraCrypto ledgerera)) Set (Credential 'Staking StandardCrypto) -creds')) +creds')) where - creds' :: Set (Shelley.Credential Shelley.Staking StandardCrypto) - creds' :: Set (Credential 'Staking StandardCrypto) -creds' = (StakeCredential -> Credential 'Staking StandardCrypto) + creds' :: Set (Shelley.Credential Shelley.Staking StandardCrypto) + creds' :: Set (Credential 'Staking StandardCrypto) +creds' = (StakeCredential -> Credential 'Staking StandardCrypto) -> Set StakeCredential -> Set (Credential 'Staking StandardCrypto) forall b a. Ord b => (a -> b) -> Set a -> Set b Set.map StakeCredential -> Credential 'Staking StandardCrypto toShelleyStakeCredential Set StakeCredential -creds +creds -toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result +toConsensusQueryShelleyBased EraInMode era mode +erainmode QueryInShelleyBasedEra era result QueryDebugLedgerState = Query block @@ -1473,7 +1473,7 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode (BlockQuery (ShelleyBlock ledgerera) (NewEpochState ledgerera) +erainmode (BlockQuery (ShelleyBlock ledgerera) (NewEpochState ledgerera) -> BlockQuery (ShelleyBlock ledgerera) (Serialised (NewEpochState ledgerera)) forall era result. @@ -1483,8 +1483,8 @@ forall era. BlockQuery (ShelleyBlock era) (NewEpochState era) Consensus.DebugNewEpochState)) -toConsensusQueryShelleyBased EraInMode era mode -erainmode QueryInShelleyBasedEra era result +toConsensusQueryShelleyBased EraInMode era mode +erainmode QueryInShelleyBasedEra era result QueryProtocolState = Query block @@ -1508,7 +1508,7 @@ EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' consensusQueryInEraInMode EraInMode era mode -erainmode (BlockQuery (ShelleyBlock ledgerera) (ChainDepState StandardCrypto) +erainmode (BlockQuery (ShelleyBlock ledgerera) (ChainDepState StandardCrypto) -> BlockQuery (ShelleyBlock ledgerera) (Serialised (ChainDepState StandardCrypto)) @@ -1521,18 +1521,18 @@ Consensus.DebugChainDepState)) consensusQueryInEraInMode - :: forall era mode erablock modeblock result result' xs. - ConsensusBlockForEra era ~ erablock - => ConsensusBlockForMode mode ~ modeblock - => modeblock ~ Consensus.HardForkBlock xs - => Consensus.HardForkQueryResult xs result ~ result' - => EraInMode era mode - -> Consensus.BlockQuery erablock result - -> Consensus.Query modeblock result' + :: forall era mode erablock modeblock result result' xs. + ConsensusBlockForEra era ~ erablock + => ConsensusBlockForMode mode ~ modeblock + => modeblock ~ Consensus.HardForkBlock xs + => Consensus.HardForkQueryResult xs result ~ result' + => EraInMode era mode + -> Consensus.BlockQuery erablock result + -> Consensus.Query modeblock result' consensusQueryInEraInMode :: EraInMode era mode -> BlockQuery erablock result -> Query modeblock result' -consensusQueryInEraInMode EraInMode era mode -erainmode = +consensusQueryInEraInMode EraInMode era mode +erainmode = BlockQuery modeblock result' -> Query modeblock result' forall blk result. BlockQuery blk result -> Query blk result Consensus.BlockQuery @@ -1542,7 +1542,7 @@ -> Query modeblock result' forall b c a. (b -> c) -> (a -> b) -> a -> c . case EraInMode era mode -erainmode of +erainmode of EraInMode era mode ByronEraInByronMode -> BlockQuery erablock result -> BlockQuery modeblock result' forall b a result. @@ -1591,19 +1591,19 @@ -- Conversions of query results from the consensus types. -- -fromConsensusQueryResult :: forall mode block result result'. - ConsensusBlockForMode mode ~ block - => QueryInMode mode result - -> Consensus.Query block result' - -> result' - -> result +fromConsensusQueryResult :: forall mode block result result'. + ConsensusBlockForMode mode ~ block + => QueryInMode mode result + -> Consensus.Query block result' + -> result' + -> result fromConsensusQueryResult :: QueryInMode mode result -> Query block result' -> result' -> result fromConsensusQueryResult (QueryEraHistory ConsensusModeIsMultiEra mode -CardanoModeIsMultiEra) Query block result' -q' result' -r' = +CardanoModeIsMultiEra) Query block result' +q' result' +r' = case Query block result' -q' of +q' of Consensus.BlockQuery (Consensus.QueryHardFork Consensus.GetInterpreter) -> ConsensusMode CardanoMode -> Interpreter @@ -1622,18 +1622,18 @@ ShelleyBlock (AllegraEra StandardCrypto), ShelleyBlock (MaryEra StandardCrypto), ShelleyBlock (AlonzoEra StandardCrypto)] -r' +r' Query block result' _ -> result forall a. a fromConsensusQueryResultMismatch fromConsensusQueryResult (QueryCurrentEra ConsensusModeIsMultiEra mode -CardanoModeIsMultiEra) Query block result' -q' result' -r' = +CardanoModeIsMultiEra) Query block result' +q' result' +r' = case Query block result' -q' of +q' of Consensus.BlockQuery (Consensus.QueryHardFork Consensus.GetCurrentEra) -> AnyEraInMode CardanoMode -> AnyCardanoEra forall mode. AnyEraInMode mode -> AnyCardanoEra @@ -1654,7 +1654,7 @@ ShelleyBlock (AllegraEra StandardCrypto), ShelleyBlock (MaryEra StandardCrypto), ShelleyBlock (AlonzoEra StandardCrypto)] -r') +r') Query block result' _ -> result forall a. a @@ -1663,28 +1663,28 @@ fromConsensusQueryResult (QueryInEra EraInMode era mode ByronEraInByronMode QueryInEra era result -QueryByronUpdateState) Query block result' -q' result' -r' = +QueryByronUpdateState) Query block result' +q' result' +r' = case (Query block result' -q', result' -r') of +q', result' +r') of (Consensus.BlockQuery (Consensus.DegenQuery Consensus.GetUpdateInterfaceState), - Consensus.DegenQueryResult r'') + Consensus.DegenQueryResult r'') -> ByronUpdateState -> Either EraMismatch ByronUpdateState forall a b. b -> Either a b Right (State -> ByronUpdateState ByronUpdateState State -r'') +r'') fromConsensusQueryResult (QueryInEra EraInMode era mode ByronEraInCardanoMode QueryInEra era result -QueryByronUpdateState) Query block result' -q' result' -r' = +QueryByronUpdateState) Query block result' +q' result' +r' = case Query block result' -q' of +q' of Consensus.BlockQuery (Consensus.QueryIfCurrentByron Consensus.GetUpdateInterfaceState) -> (MismatchEraInfo @@ -1709,7 +1709,7 @@ fromConsensusEraMismatch State -> ByronUpdateState ByronUpdateState result' CardanoQueryResult StandardCrypto State -r' +r' Query block result' _ -> result forall a. a @@ -1717,26 +1717,26 @@ fromConsensusQueryResult (QueryInEra EraInMode era mode ByronEraInByronMode - (QueryInShelleyBasedEra ShelleyBasedEra era -era QueryInShelleyBasedEra era result + (QueryInShelleyBasedEra ShelleyBasedEra era +era QueryInShelleyBasedEra era result _)) Query block result' _ result' _ = case ShelleyBasedEra era -era of {} +era of {} fromConsensusQueryResult (QueryInEra EraInMode era mode ShelleyEraInShelleyMode - (QueryInShelleyBasedEra ShelleyBasedEra era -_era QueryInShelleyBasedEra era result -q)) Query block result' -q' result' -r' = + (QueryInShelleyBasedEra ShelleyBasedEra era +_era QueryInShelleyBasedEra era result +q)) Query block result' +q' result' +r' = case (Query block result' -q', result' -r') of - (Consensus.BlockQuery (Consensus.DegenQuery q''), - Consensus.DegenQueryResult r'') +q', result' +r') of + (Consensus.BlockQuery (Consensus.DegenQuery q''), + Consensus.DegenQueryResult r'') -> result -> Either EraMismatch result forall a b. b -> Either a b Right (ShelleyBasedEra ShelleyEra @@ -1756,30 +1756,30 @@ ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley QueryInShelleyBasedEra era result QueryInShelleyBasedEra ShelleyEra result -q BlockQuery (ShelleyBlock (ShelleyEra StandardCrypto)) result -q'' result -r'') +q BlockQuery (ShelleyBlock (ShelleyEra StandardCrypto)) result +q'' result +r'') fromConsensusQueryResult (QueryInEra EraInMode era mode ByronEraInCardanoMode - (QueryInShelleyBasedEra ShelleyBasedEra era -era QueryInShelleyBasedEra era result + (QueryInShelleyBasedEra ShelleyBasedEra era +era QueryInShelleyBasedEra era result _)) Query block result' _ result' _ = case ShelleyBasedEra era -era of {} +era of {} fromConsensusQueryResult (QueryInEra EraInMode era mode ShelleyEraInCardanoMode - (QueryInShelleyBasedEra ShelleyBasedEra era -_era QueryInShelleyBasedEra era result -q)) Query block result' -q' result' -r' = + (QueryInShelleyBasedEra ShelleyBasedEra era +_era QueryInShelleyBasedEra era result +q)) Query block result' +q' result' +r' = case Query block result' -q' of - Consensus.BlockQuery (Consensus.QueryIfCurrentShelley q'') +q' of + Consensus.BlockQuery (Consensus.QueryIfCurrentShelley q'') -> (MismatchEraInfo '[ByronBlock, ShelleyBlock (ShelleyEra StandardCrypto), ShelleyBlock (AllegraEra StandardCrypto), @@ -1823,8 +1823,8 @@ ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley QueryInShelleyBasedEra era result QueryInShelleyBasedEra ShelleyEra result -q BlockQuery (ShelleyBlock (ShelleyEra StandardCrypto)) result -q'') +q BlockQuery (ShelleyBlock (ShelleyEra StandardCrypto)) result +q'') result' Either (MismatchEraInfo @@ -1833,7 +1833,7 @@ ShelleyBlock (MaryEra StandardCrypto), ShelleyBlock (AlonzoEra StandardCrypto)]) result -r' +r' Query block result' _ -> result forall a. a @@ -1841,14 +1841,14 @@ fromConsensusQueryResult (QueryInEra EraInMode era mode AllegraEraInCardanoMode - (QueryInShelleyBasedEra ShelleyBasedEra era -_era QueryInShelleyBasedEra era result -q)) Query block result' -q' result' -r' = + (QueryInShelleyBasedEra ShelleyBasedEra era +_era QueryInShelleyBasedEra era result +q)) Query block result' +q' result' +r' = case Query block result' -q' of - Consensus.BlockQuery (Consensus.QueryIfCurrentAllegra q'') +q' of + Consensus.BlockQuery (Consensus.QueryIfCurrentAllegra q'') -> (MismatchEraInfo '[ByronBlock, ShelleyBlock (ShelleyEra StandardCrypto), ShelleyBlock (AllegraEra StandardCrypto), @@ -1892,8 +1892,8 @@ ShelleyBasedEra AllegraEra ShelleyBasedEraAllegra QueryInShelleyBasedEra era result QueryInShelleyBasedEra AllegraEra result -q BlockQuery (ShelleyBlock (AllegraEra StandardCrypto)) result -q'') +q BlockQuery (ShelleyBlock (AllegraEra StandardCrypto)) result +q'') result' Either (MismatchEraInfo @@ -1902,7 +1902,7 @@ ShelleyBlock (MaryEra StandardCrypto), ShelleyBlock (AlonzoEra StandardCrypto)]) result -r' +r' Query block result' _ -> result forall a. a @@ -1910,14 +1910,14 @@ fromConsensusQueryResult (QueryInEra EraInMode era mode MaryEraInCardanoMode - (QueryInShelleyBasedEra ShelleyBasedEra era -_era QueryInShelleyBasedEra era result -q)) Query block result' -q' result' -r' = + (QueryInShelleyBasedEra ShelleyBasedEra era +_era QueryInShelleyBasedEra era result +q)) Query block result' +q' result' +r' = case Query block result' -q' of - Consensus.BlockQuery (Consensus.QueryIfCurrentMary q'') +q' of + Consensus.BlockQuery (Consensus.QueryIfCurrentMary q'') -> (MismatchEraInfo '[ByronBlock, ShelleyBlock (ShelleyEra StandardCrypto), ShelleyBlock (AllegraEra StandardCrypto), @@ -1961,8 +1961,8 @@ ShelleyBasedEra MaryEra ShelleyBasedEraMary QueryInShelleyBasedEra era result QueryInShelleyBasedEra MaryEra result -q BlockQuery (ShelleyBlock (MaryEra StandardCrypto)) result -q'') +q BlockQuery (ShelleyBlock (MaryEra StandardCrypto)) result +q'') result' Either (MismatchEraInfo @@ -1971,7 +1971,7 @@ ShelleyBlock (MaryEra StandardCrypto), ShelleyBlock (AlonzoEra StandardCrypto)]) result -r' +r' Query block result' _ -> result forall a. a @@ -1979,14 +1979,14 @@ fromConsensusQueryResult (QueryInEra EraInMode era mode AlonzoEraInCardanoMode - (QueryInShelleyBasedEra ShelleyBasedEra era -_era QueryInShelleyBasedEra era result -q)) Query block result' -q' result' -r' = + (QueryInShelleyBasedEra ShelleyBasedEra era +_era QueryInShelleyBasedEra era result +q)) Query block result' +q' result' +r' = case Query block result' -q' of - Consensus.BlockQuery (Consensus.QueryIfCurrentAlonzo q'') +q' of + Consensus.BlockQuery (Consensus.QueryIfCurrentAlonzo q'') -> (MismatchEraInfo '[ByronBlock, ShelleyBlock (ShelleyEra StandardCrypto), ShelleyBlock (AllegraEra StandardCrypto), @@ -2030,8 +2030,8 @@ ShelleyBasedEra AlonzoEra ShelleyBasedEraAlonzo QueryInShelleyBasedEra era result QueryInShelleyBasedEra AlonzoEra result -q BlockQuery (ShelleyBlock (AlonzoEra StandardCrypto)) result -q'') +q BlockQuery (ShelleyBlock (AlonzoEra StandardCrypto)) result +q'') result' Either (MismatchEraInfo @@ -2040,22 +2040,22 @@ ShelleyBlock (MaryEra StandardCrypto), ShelleyBlock (AlonzoEra StandardCrypto)]) result -r' +r' Query block result' _ -> result forall a. a fromConsensusQueryResultMismatch fromConsensusQueryResultShelleyBased - :: forall era ledgerera result result'. - ShelleyLedgerEra era ~ ledgerera - => Consensus.ShelleyBasedEra ledgerera - => Ledger.Crypto ledgerera ~ Consensus.StandardCrypto - => ShelleyBasedEra era - -> QueryInShelleyBasedEra era result - -> Consensus.BlockQuery (Consensus.ShelleyBlock ledgerera) result' - -> result' - -> result + :: forall era ledgerera result result'. + ShelleyLedgerEra era ~ ledgerera + => Consensus.ShelleyBasedEra ledgerera + => Ledger.Crypto ledgerera ~ Consensus.StandardCrypto + => ShelleyBasedEra era + -> QueryInShelleyBasedEra era result + -> Consensus.BlockQuery (Consensus.ShelleyBlock ledgerera) result' + -> result' + -> result fromConsensusQueryResultShelleyBased :: ShelleyBasedEra era -> QueryInShelleyBasedEra era result -> BlockQuery (ShelleyBlock ledgerera) result' @@ -2063,11 +2063,11 @@ -> result fromConsensusQueryResultShelleyBased ShelleyBasedEra era _ QueryInShelleyBasedEra era result -QueryChainPoint BlockQuery (ShelleyBlock ledgerera) result' -q' result' -point = +QueryChainPoint BlockQuery (ShelleyBlock ledgerera) result' +q' result' +point = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of BlockQuery (ShelleyBlock ledgerera) result' Consensus.GetLedgerTip -> Point (ShelleyBlock ledgerera) -> ChainPoint forall ledgerera. @@ -2075,7 +2075,7 @@ Point (ShelleyBlock ledgerera) -> ChainPoint fromConsensusPoint result' Point (ShelleyBlock ledgerera) -point +point BlockQuery (ShelleyBlock ledgerera) result' _ -> result forall a. a @@ -2083,15 +2083,15 @@ fromConsensusQueryResultShelleyBased ShelleyBasedEra era _ QueryInShelleyBasedEra era result -QueryEpoch BlockQuery (ShelleyBlock ledgerera) result' -q' result' -epoch = +QueryEpoch BlockQuery (ShelleyBlock ledgerera) result' +q' result' +epoch = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of BlockQuery (ShelleyBlock ledgerera) result' Consensus.GetEpochNo -> result result' -epoch +epoch BlockQuery (ShelleyBlock ledgerera) result' _ -> result forall a. a @@ -2099,11 +2099,11 @@ fromConsensusQueryResultShelleyBased ShelleyBasedEra era _ QueryInShelleyBasedEra era result -QueryGenesisParameters BlockQuery (ShelleyBlock ledgerera) result' -q' result' -r' = +QueryGenesisParameters BlockQuery (ShelleyBlock ledgerera) result' +q' result' +r' = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of BlockQuery (ShelleyBlock ledgerera) result' Consensus.GetGenesisConfig -> ShelleyGenesis ledgerera -> GenesisParameters forall era. ShelleyGenesis era -> GenesisParameters @@ -2112,19 +2112,19 @@ forall era. CompactGenesis era -> ShelleyGenesis era Consensus.getCompactGenesis result' CompactGenesis ledgerera -r') +r') BlockQuery (ShelleyBlock ledgerera) result' _ -> result forall a. a fromConsensusQueryResultMismatch -fromConsensusQueryResultShelleyBased ShelleyBasedEra era -era QueryInShelleyBasedEra era result -QueryProtocolParameters BlockQuery (ShelleyBlock ledgerera) result' -q' result' -r' = +fromConsensusQueryResultShelleyBased ShelleyBasedEra era +era QueryInShelleyBasedEra era result +QueryProtocolParameters BlockQuery (ShelleyBlock ledgerera) result' +q' result' +r' = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of BlockQuery (ShelleyBlock ledgerera) result' Consensus.GetCurrentPParams -> ShelleyBasedEra era -> PParams (ShelleyLedgerEra era) -> ProtocolParameters @@ -2132,21 +2132,21 @@ ShelleyBasedEra era -> PParams (ShelleyLedgerEra era) -> ProtocolParameters fromLedgerPParams ShelleyBasedEra era -era result' +era result' PParams (ShelleyLedgerEra era) -r' +r' BlockQuery (ShelleyBlock ledgerera) result' _ -> result forall a. a fromConsensusQueryResultMismatch -fromConsensusQueryResultShelleyBased ShelleyBasedEra era -era QueryInShelleyBasedEra era result -QueryProtocolParametersUpdate BlockQuery (ShelleyBlock ledgerera) result' -q' result' -r' = +fromConsensusQueryResultShelleyBased ShelleyBasedEra era +era QueryInShelleyBasedEra era result +QueryProtocolParametersUpdate BlockQuery (ShelleyBlock ledgerera) result' +q' result' +r' = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of BlockQuery (ShelleyBlock ledgerera) result' Consensus.GetProposedPParamsUpdates -> ShelleyBasedEra era -> ProposedPPUpdates ledgerera @@ -2158,9 +2158,9 @@ -> ProposedPPUpdates ledgerera -> Map (Hash GenesisKey) ProtocolParametersUpdate fromLedgerProposedPPUpdates ShelleyBasedEra era -era result' +era result' ProposedPPUpdates ledgerera -r' +r' BlockQuery (ShelleyBlock ledgerera) result' _ -> result forall a. a @@ -2168,28 +2168,28 @@ fromConsensusQueryResultShelleyBased ShelleyBasedEra era _ QueryInShelleyBasedEra era result -QueryStakeDistribution BlockQuery (ShelleyBlock ledgerera) result' -q' result' -r' = +QueryStakeDistribution BlockQuery (ShelleyBlock ledgerera) result' +q' result' +r' = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of BlockQuery (ShelleyBlock ledgerera) result' Consensus.GetStakeDistribution -> PoolDistr StandardCrypto -> Map (Hash StakePoolKey) Rational fromShelleyPoolDistr result' PoolDistr StandardCrypto -r' +r' BlockQuery (ShelleyBlock ledgerera) result' _ -> result forall a. a fromConsensusQueryResultMismatch -fromConsensusQueryResultShelleyBased ShelleyBasedEra era -shelleyBasedEra' (QueryUTxO Maybe (Set AddressAny) -Nothing) BlockQuery (ShelleyBlock ledgerera) result' -q' result' -utxo' = +fromConsensusQueryResultShelleyBased ShelleyBasedEra era +shelleyBasedEra' (QueryUTxO Maybe (Set AddressAny) +Nothing) BlockQuery (ShelleyBlock ledgerera) result' +q' result' +utxo' = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of BlockQuery (ShelleyBlock ledgerera) result' Consensus.GetUTxO -> ShelleyBasedEra era -> UTxO ledgerera -> UTxO era forall era ledgerera. @@ -2197,29 +2197,29 @@ Crypto ledgerera ~ StandardCrypto) => ShelleyBasedEra era -> UTxO ledgerera -> UTxO era fromUTxO ShelleyBasedEra era -shelleyBasedEra' result' +shelleyBasedEra' result' UTxO ledgerera -utxo' +utxo' BlockQuery (ShelleyBlock ledgerera) result' _ -> result forall a. a fromConsensusQueryResultMismatch -fromConsensusQueryResultShelleyBased ShelleyBasedEra era -shelleyBasedEra' (QueryUTxO Just{}) BlockQuery (ShelleyBlock ledgerera) result' -q' result' -utxo' = +fromConsensusQueryResultShelleyBased ShelleyBasedEra era +shelleyBasedEra' (QueryUTxO Just{}) BlockQuery (ShelleyBlock ledgerera) result' +q' result' +utxo' = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of Consensus.GetFilteredUTxO{} -> ShelleyBasedEra era -> UTxO ledgerera -> UTxO era forall era ledgerera. (ShelleyLedgerEra era ~ ledgerera, Crypto ledgerera ~ StandardCrypto) => ShelleyBasedEra era -> UTxO ledgerera -> UTxO era fromUTxO ShelleyBasedEra era -shelleyBasedEra' result' +shelleyBasedEra' result' UTxO ledgerera -utxo' +utxo' BlockQuery (ShelleyBlock ledgerera) result' _ -> result forall a. a @@ -2227,41 +2227,41 @@ fromConsensusQueryResultShelleyBased ShelleyBasedEra era _ (QueryStakeAddresses Set StakeCredential -_ NetworkId -nId) BlockQuery (ShelleyBlock ledgerera) result' -q' result' -r' = +_ NetworkId +nId) BlockQuery (ShelleyBlock ledgerera) result' +q' result' +r' = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of Consensus.GetFilteredDelegationsAndRewardAccounts{} - -> let (Map + -> let (Map (Credential 'Staking StandardCrypto) (KeyHash 'StakePool StandardCrypto) -delegs, RewardAccounts StandardCrypto -rwaccs) = result' +delegs, RewardAccounts StandardCrypto +rwaccs) = result' (Map (Credential 'Staking StandardCrypto) (KeyHash 'StakePool StandardCrypto), RewardAccounts StandardCrypto) -r' +r' in ( (StakeCredential -> StakeAddress) -> Map StakeCredential Lovelace -> Map StakeAddress Lovelace forall k2 k1 a. Ord k2 => (k1 -> k2) -> Map k1 a -> Map k2 a Map.mapKeys (NetworkId -> StakeCredential -> StakeAddress makeStakeAddress NetworkId -nId) (Map StakeCredential Lovelace -> Map StakeAddress Lovelace) +nId) (Map StakeCredential Lovelace -> Map StakeAddress Lovelace) -> Map StakeCredential Lovelace -> Map StakeAddress Lovelace forall a b. (a -> b) -> a -> b $ RewardAccounts StandardCrypto -> Map StakeCredential Lovelace fromShelleyRewardAccounts RewardAccounts StandardCrypto -rwaccs +rwaccs , (StakeCredential -> StakeAddress) -> Map StakeCredential (Hash StakePoolKey) -> Map StakeAddress (Hash StakePoolKey) forall k2 k1 a. Ord k2 => (k1 -> k2) -> Map k1 a -> Map k2 a Map.mapKeys (NetworkId -> StakeCredential -> StakeAddress makeStakeAddress NetworkId -nId) (Map StakeCredential (Hash StakePoolKey) +nId) (Map StakeCredential (Hash StakePoolKey) -> Map StakeAddress (Hash StakePoolKey)) -> Map StakeCredential (Hash StakePoolKey) -> Map StakeAddress (Hash StakePoolKey) @@ -2273,7 +2273,7 @@ fromShelleyDelegations Map (Credential 'Staking StandardCrypto) (KeyHash 'StakePool StandardCrypto) -delegs +delegs ) BlockQuery (ShelleyBlock ledgerera) result' _ -> result @@ -2281,11 +2281,11 @@ fromConsensusQueryResultMismatch fromConsensusQueryResultShelleyBased ShelleyBasedEra era -_ QueryDebugLedgerState{} BlockQuery (ShelleyBlock ledgerera) result' -q' result' -r' = +_ QueryDebugLedgerState{} BlockQuery (ShelleyBlock ledgerera) result' +q' result' +r' = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of Consensus.GetCBOR Consensus.DebugNewEpochState -> Serialised (NewEpochState (ShelleyLedgerEra era)) -> SerialisedDebugLedgerState era forall era. @@ -2293,7 +2293,7 @@ -> SerialisedDebugLedgerState era SerialisedDebugLedgerState result' Serialised (NewEpochState (ShelleyLedgerEra era)) -r' +r' BlockQuery (ShelleyBlock ledgerera) result' _ -> result forall a. a @@ -2301,11 +2301,11 @@ fromConsensusQueryResultShelleyBased ShelleyBasedEra era _ QueryInShelleyBasedEra era result -QueryProtocolState BlockQuery (ShelleyBlock ledgerera) result' -q' result' -r' = +QueryProtocolState BlockQuery (ShelleyBlock ledgerera) result' +q' result' +r' = case BlockQuery (ShelleyBlock ledgerera) result' -q' of +q' of Consensus.GetCBOR Consensus.DebugChainDepState -> Serialised (ChainDepState (Crypto (ShelleyLedgerEra era))) -> ProtocolState era forall era. @@ -2313,7 +2313,7 @@ -> ProtocolState era ProtocolState result' Serialised (ChainDepState (Crypto (ShelleyLedgerEra era))) -r' +r' BlockQuery (ShelleyBlock ledgerera) result' _ -> result forall a. a @@ -2333,7 +2333,7 @@ -- -- Such mismatches should be preventable with an appropriate property test. -- -fromConsensusQueryResultMismatch :: a +fromConsensusQueryResultMismatch :: a fromConsensusQueryResultMismatch :: a fromConsensusQueryResultMismatch = String -> a @@ -2342,8 +2342,8 @@ "fromConsensusQueryResult: internal query mismatch" -fromConsensusEraMismatch :: SListI xs - => Consensus.MismatchEraInfo xs -> EraMismatch +fromConsensusEraMismatch :: SListI xs + => Consensus.MismatchEraInfo xs -> EraMismatch fromConsensusEraMismatch :: MismatchEraInfo xs -> EraMismatch fromConsensusEraMismatch = MismatchEraInfo xs -> EraMismatch forall (xs :: [*]). SListI xs => MismatchEraInfo xs -> EraMismatch diff --git a/cardano-api/src/Cardano.Api.Script.html b/cardano-api/src/Cardano.Api.Script.html index c5dc58d7d83..ff2be8d6fdf 100644 --- a/cardano-api/src/Cardano.Api.Script.html +++ b/cardano-api/src/Cardano.Api.Script.html @@ -183,22 +183,22 @@ instance HasTypeProxy SimpleScriptV1 where data AsType SimpleScriptV1 = AsSimpleScriptV1 - proxyToAsType :: Proxy SimpleScriptV1 -> AsType SimpleScriptV1 + proxyToAsType :: Proxy SimpleScriptV1 -> AsType SimpleScriptV1 proxyToAsType Proxy SimpleScriptV1 _ = AsType SimpleScriptV1 AsSimpleScriptV1 instance HasTypeProxy SimpleScriptV2 where data AsType SimpleScriptV2 = AsSimpleScriptV2 - proxyToAsType :: Proxy SimpleScriptV2 -> AsType SimpleScriptV2 -proxyToAsType Proxy SimpleScriptV2 + proxyToAsType :: Proxy SimpleScriptV2 -> AsType SimpleScriptV2 +proxyToAsType Proxy SimpleScriptV2 _ = AsType SimpleScriptV2 AsSimpleScriptV2 instance HasTypeProxy PlutusScriptV1 where data AsType PlutusScriptV1 = AsPlutusScriptV1 - proxyToAsType :: Proxy PlutusScriptV1 -> AsType PlutusScriptV1 -proxyToAsType Proxy PlutusScriptV1 + proxyToAsType :: Proxy PlutusScriptV1 -> AsType PlutusScriptV1 +proxyToAsType Proxy PlutusScriptV1 _ = AsType PlutusScriptV1 AsPlutusScriptV1 @@ -206,38 +206,38 @@ -- ---------------------------------------------------------------------------- -- Value level representation for script languages -- -data ScriptLanguage lang where +data ScriptLanguage lang where - SimpleScriptLanguage :: SimpleScriptVersion lang -> ScriptLanguage lang + SimpleScriptLanguage :: SimpleScriptVersion lang -> ScriptLanguage lang - PlutusScriptLanguage :: PlutusScriptVersion lang -> ScriptLanguage lang + PlutusScriptLanguage :: PlutusScriptVersion lang -> ScriptLanguage lang -deriving instance (Eq (ScriptLanguage lang)) -deriving instance (Show (ScriptLanguage lang)) +deriving instance (Eq (ScriptLanguage lang)) +deriving instance (Show (ScriptLanguage lang)) instance TestEquality ScriptLanguage where - testEquality :: ScriptLanguage a -> ScriptLanguage b -> Maybe (a :~: b) -testEquality (SimpleScriptLanguage SimpleScriptVersion a -lang) - (SimpleScriptLanguage SimpleScriptVersion b -lang') = SimpleScriptVersion a -> SimpleScriptVersion b -> Maybe (a :~: b) + testEquality :: ScriptLanguage a -> ScriptLanguage b -> Maybe (a :~: b) +testEquality (SimpleScriptLanguage SimpleScriptVersion a +lang) + (SimpleScriptLanguage SimpleScriptVersion b +lang') = SimpleScriptVersion a -> SimpleScriptVersion b -> Maybe (a :~: b) forall k (f :: k -> *) (a :: k) (b :: k). TestEquality f => f a -> f b -> Maybe (a :~: b) testEquality SimpleScriptVersion a -lang SimpleScriptVersion b -lang' +lang SimpleScriptVersion b +lang' - testEquality (PlutusScriptLanguage PlutusScriptVersion a -lang) - (PlutusScriptLanguage PlutusScriptVersion b -lang') = PlutusScriptVersion a -> PlutusScriptVersion b -> Maybe (a :~: b) + testEquality (PlutusScriptLanguage PlutusScriptVersion a +lang) + (PlutusScriptLanguage PlutusScriptVersion b +lang') = PlutusScriptVersion a -> PlutusScriptVersion b -> Maybe (a :~: b) forall k (f :: k -> *) (a :: k) (b :: k). TestEquality f => f a -> f b -> Maybe (a :~: b) testEquality PlutusScriptVersion a -lang PlutusScriptVersion b -lang' +lang PlutusScriptVersion b +lang' testEquality ScriptLanguage a _ ScriptLanguage b @@ -246,17 +246,17 @@ Nothing -data SimpleScriptVersion lang where +data SimpleScriptVersion lang where SimpleScriptV1 :: SimpleScriptVersion SimpleScriptV1 SimpleScriptV2 :: SimpleScriptVersion SimpleScriptV2 -deriving instance (Eq (SimpleScriptVersion lang)) -deriving instance (Show (SimpleScriptVersion lang)) +deriving instance (Eq (SimpleScriptVersion lang)) +deriving instance (Show (SimpleScriptVersion lang)) instance TestEquality SimpleScriptVersion where - testEquality :: SimpleScriptVersion a -> SimpleScriptVersion b -> Maybe (a :~: b) -testEquality SimpleScriptVersion a + testEquality :: SimpleScriptVersion a -> SimpleScriptVersion b -> Maybe (a :~: b) +testEquality SimpleScriptVersion a SimpleScriptV1 SimpleScriptVersion b SimpleScriptV1 = (a :~: a) -> Maybe (a :~: a) forall a. a -> Maybe a @@ -277,15 +277,15 @@ Nothing -data PlutusScriptVersion lang where +data PlutusScriptVersion lang where PlutusScriptV1 :: PlutusScriptVersion PlutusScriptV1 -deriving instance (Eq (PlutusScriptVersion lang)) -deriving instance (Show (PlutusScriptVersion lang)) +deriving instance (Eq (PlutusScriptVersion lang)) +deriving instance (Show (PlutusScriptVersion lang)) instance TestEquality PlutusScriptVersion where - testEquality :: PlutusScriptVersion a -> PlutusScriptVersion b -> Maybe (a :~: b) -testEquality PlutusScriptVersion a + testEquality :: PlutusScriptVersion a -> PlutusScriptVersion b -> Maybe (a :~: b) +testEquality PlutusScriptVersion a PlutusScriptV1 PlutusScriptVersion b PlutusScriptV1 = (a :~: a) -> Maybe (a :~: a) forall a. a -> Maybe a @@ -295,40 +295,40 @@ data AnyScriptLanguage where - AnyScriptLanguage :: ScriptLanguage lang -> AnyScriptLanguage + AnyScriptLanguage :: ScriptLanguage lang -> AnyScriptLanguage -deriving instance (Show AnyScriptLanguage) +deriving instance (Show AnyScriptLanguage) -instance Eq AnyScriptLanguage where - AnyScriptLanguage -a == :: AnyScriptLanguage -> AnyScriptLanguage -> Bool -== AnyScriptLanguage -b = AnyScriptLanguage -> Int +instance Eq AnyScriptLanguage where + AnyScriptLanguage +a == :: AnyScriptLanguage -> AnyScriptLanguage -> Bool +== AnyScriptLanguage +b = AnyScriptLanguage -> Int forall a. Enum a => a -> Int fromEnum AnyScriptLanguage -a Int -> Int -> Bool +a Int -> Int -> Bool forall a. Eq a => a -> a -> Bool == AnyScriptLanguage -> Int forall a. Enum a => a -> Int fromEnum AnyScriptLanguage -b +b -instance Ord AnyScriptLanguage where - compare :: AnyScriptLanguage -> AnyScriptLanguage -> Ordering -compare AnyScriptLanguage -a AnyScriptLanguage -b = Int -> Int -> Ordering +instance Ord AnyScriptLanguage where + compare :: AnyScriptLanguage -> AnyScriptLanguage -> Ordering +compare AnyScriptLanguage +a AnyScriptLanguage +b = Int -> Int -> Ordering forall a. Ord a => a -> a -> Ordering compare (AnyScriptLanguage -> Int forall a. Enum a => a -> Int fromEnum AnyScriptLanguage -a) (AnyScriptLanguage -> Int +a) (AnyScriptLanguage -> Int forall a. Enum a => a -> Int fromEnum AnyScriptLanguage -b) +b) -instance Enum AnyScriptLanguage where - toEnum :: Int -> AnyScriptLanguage +instance Enum AnyScriptLanguage where + toEnum :: Int -> AnyScriptLanguage toEnum Int 0 = ScriptLanguage SimpleScriptV1 -> AnyScriptLanguage forall lang. ScriptLanguage lang -> AnyScriptLanguage @@ -356,8 +356,8 @@ error String "AnyScriptLanguage.toEnum: bad argument" - fromEnum :: AnyScriptLanguage -> Int -fromEnum (AnyScriptLanguage (SimpleScriptLanguage SimpleScriptVersion lang + fromEnum :: AnyScriptLanguage -> Int +fromEnum (AnyScriptLanguage (SimpleScriptLanguage SimpleScriptVersion lang SimpleScriptV1)) = Int 0 fromEnum (AnyScriptLanguage (SimpleScriptLanguage SimpleScriptVersion lang @@ -368,14 +368,14 @@ 2 instance Bounded AnyScriptLanguage where - minBound :: AnyScriptLanguage + minBound :: AnyScriptLanguage minBound = ScriptLanguage SimpleScriptV1 -> AnyScriptLanguage forall lang. ScriptLanguage lang -> AnyScriptLanguage AnyScriptLanguage (SimpleScriptVersion SimpleScriptV1 -> ScriptLanguage SimpleScriptV1 forall lang. SimpleScriptVersion lang -> ScriptLanguage lang SimpleScriptLanguage SimpleScriptVersion SimpleScriptV1 SimpleScriptV1) - maxBound :: AnyScriptLanguage + maxBound :: AnyScriptLanguage maxBound = ScriptLanguage PlutusScriptV1 -> AnyScriptLanguage forall lang. ScriptLanguage lang -> AnyScriptLanguage AnyScriptLanguage (PlutusScriptVersion PlutusScriptV1 -> ScriptLanguage PlutusScriptV1 @@ -385,42 +385,42 @@ data AnyPlutusScriptVersion where - AnyPlutusScriptVersion :: PlutusScriptVersion lang + AnyPlutusScriptVersion :: PlutusScriptVersion lang -> AnyPlutusScriptVersion -deriving instance (Show AnyPlutusScriptVersion) +deriving instance (Show AnyPlutusScriptVersion) -instance Eq AnyPlutusScriptVersion where - AnyPlutusScriptVersion -a == :: AnyPlutusScriptVersion -> AnyPlutusScriptVersion -> Bool -== AnyPlutusScriptVersion -b = AnyPlutusScriptVersion -> Int +instance Eq AnyPlutusScriptVersion where + AnyPlutusScriptVersion +a == :: AnyPlutusScriptVersion -> AnyPlutusScriptVersion -> Bool +== AnyPlutusScriptVersion +b = AnyPlutusScriptVersion -> Int forall a. Enum a => a -> Int fromEnum AnyPlutusScriptVersion -a Int -> Int -> Bool +a Int -> Int -> Bool forall a. Eq a => a -> a -> Bool == AnyPlutusScriptVersion -> Int forall a. Enum a => a -> Int fromEnum AnyPlutusScriptVersion -b +b -instance Ord AnyPlutusScriptVersion where - compare :: AnyPlutusScriptVersion -> AnyPlutusScriptVersion -> Ordering -compare AnyPlutusScriptVersion -a AnyPlutusScriptVersion -b = Int -> Int -> Ordering +instance Ord AnyPlutusScriptVersion where + compare :: AnyPlutusScriptVersion -> AnyPlutusScriptVersion -> Ordering +compare AnyPlutusScriptVersion +a AnyPlutusScriptVersion +b = Int -> Int -> Ordering forall a. Ord a => a -> a -> Ordering compare (AnyPlutusScriptVersion -> Int forall a. Enum a => a -> Int fromEnum AnyPlutusScriptVersion -a) (AnyPlutusScriptVersion -> Int +a) (AnyPlutusScriptVersion -> Int forall a. Enum a => a -> Int fromEnum AnyPlutusScriptVersion -b) +b) -instance Enum AnyPlutusScriptVersion where - toEnum :: Int -> AnyPlutusScriptVersion -toEnum Int +instance Enum AnyPlutusScriptVersion where + toEnum :: Int -> AnyPlutusScriptVersion +toEnum Int 0 = PlutusScriptVersion PlutusScriptV1 -> AnyPlutusScriptVersion forall lang. PlutusScriptVersion lang -> AnyPlutusScriptVersion AnyPlutusScriptVersion PlutusScriptVersion PlutusScriptV1 @@ -431,25 +431,25 @@ error String "AnyPlutusScriptVersion.toEnum: bad argument" - fromEnum :: AnyPlutusScriptVersion -> Int -fromEnum (AnyPlutusScriptVersion PlutusScriptVersion lang + fromEnum :: AnyPlutusScriptVersion -> Int +fromEnum (AnyPlutusScriptVersion PlutusScriptVersion lang PlutusScriptV1) = Int 0 instance Bounded AnyPlutusScriptVersion where - minBound :: AnyPlutusScriptVersion -minBound = PlutusScriptVersion PlutusScriptV1 -> AnyPlutusScriptVersion + minBound :: AnyPlutusScriptVersion +minBound = PlutusScriptVersion PlutusScriptV1 -> AnyPlutusScriptVersion forall lang. PlutusScriptVersion lang -> AnyPlutusScriptVersion AnyPlutusScriptVersion PlutusScriptVersion PlutusScriptV1 PlutusScriptV1 - maxBound :: AnyPlutusScriptVersion -maxBound = PlutusScriptVersion PlutusScriptV1 -> AnyPlutusScriptVersion + maxBound :: AnyPlutusScriptVersion +maxBound = PlutusScriptVersion PlutusScriptV1 -> AnyPlutusScriptVersion forall lang. PlutusScriptVersion lang -> AnyPlutusScriptVersion AnyPlutusScriptVersion PlutusScriptVersion PlutusScriptV1 PlutusScriptV1 -instance ToJSON AnyPlutusScriptVersion where - toJSON :: AnyPlutusScriptVersion -> Value +instance ToJSON AnyPlutusScriptVersion where + toJSON :: AnyPlutusScriptVersion -> Value toJSON (AnyPlutusScriptVersion PlutusScriptVersion lang PlutusScriptV1) = Text -> Value @@ -458,10 +458,10 @@ parsePlutusScriptVersion :: Text -> Aeson.Parser AnyPlutusScriptVersion parsePlutusScriptVersion :: Text -> Parser AnyPlutusScriptVersion -parsePlutusScriptVersion Text -t = +parsePlutusScriptVersion Text +t = case Text -t of +t of Text "PlutusScriptV1" -> AnyPlutusScriptVersion -> Parser AnyPlutusScriptVersion forall (m :: * -> *) a. Monad m => a -> m a @@ -475,8 +475,8 @@ fail String "Expected PlutusScriptV1" -instance FromJSON AnyPlutusScriptVersion where - parseJSON :: Value -> Parser AnyPlutusScriptVersion +instance FromJSON AnyPlutusScriptVersion where + parseJSON :: Value -> Parser AnyPlutusScriptVersion parseJSON = String -> (Text -> Parser AnyPlutusScriptVersion) -> Value @@ -486,33 +486,33 @@ "PlutusScriptVersion" Text -> Parser AnyPlutusScriptVersion parsePlutusScriptVersion -instance Aeson.FromJSONKey AnyPlutusScriptVersion where - fromJSONKey :: FromJSONKeyFunction AnyPlutusScriptVersion +instance Aeson.FromJSONKey AnyPlutusScriptVersion where + fromJSONKey :: FromJSONKeyFunction AnyPlutusScriptVersion fromJSONKey = (Text -> Parser AnyPlutusScriptVersion) -> FromJSONKeyFunction AnyPlutusScriptVersion forall a. (Text -> Parser a) -> FromJSONKeyFunction a Aeson.FromJSONKeyTextParser Text -> Parser AnyPlutusScriptVersion parsePlutusScriptVersion -instance Aeson.ToJSONKey AnyPlutusScriptVersion where - toJSONKey :: ToJSONKeyFunction AnyPlutusScriptVersion +instance Aeson.ToJSONKey AnyPlutusScriptVersion where + toJSONKey :: ToJSONKeyFunction AnyPlutusScriptVersion toJSONKey = (AnyPlutusScriptVersion -> Text) -> (AnyPlutusScriptVersion -> Encoding' Text) -> ToJSONKeyFunction AnyPlutusScriptVersion forall a. (a -> Text) -> (a -> Encoding' Text) -> ToJSONKeyFunction a Aeson.ToJSONKeyText AnyPlutusScriptVersion -> Text -toText AnyPlutusScriptVersion -> Encoding' Text +toText AnyPlutusScriptVersion -> Encoding' Text forall a. AnyPlutusScriptVersion -> Encoding' a -toAesonEncoding +toAesonEncoding where - toText :: AnyPlutusScriptVersion -> Text - toText :: AnyPlutusScriptVersion -> Text -toText (AnyPlutusScriptVersion PlutusScriptVersion lang + toText :: AnyPlutusScriptVersion -> Text + toText :: AnyPlutusScriptVersion -> Text +toText (AnyPlutusScriptVersion PlutusScriptVersion lang PlutusScriptV1) = Text "PlutusScriptV1" - toAesonEncoding :: AnyPlutusScriptVersion -> Encoding' a -toAesonEncoding = Text -> Encoding' a + toAesonEncoding :: AnyPlutusScriptVersion -> Encoding' a +toAesonEncoding = Text -> Encoding' a forall a. Text -> Encoding' a Aeson.text (Text -> Encoding' a) -> (AnyPlutusScriptVersion -> Text) @@ -520,7 +520,7 @@ -> Encoding' a forall b c a. (b -> c) -> (a -> b) -> a -> c . AnyPlutusScriptVersion -> Text -toText +toText toAlonzoLanguage :: AnyPlutusScriptVersion -> Alonzo.Language toAlonzoLanguage :: AnyPlutusScriptVersion -> Language @@ -537,51 +537,51 @@ PlutusScriptV1 -class HasTypeProxy lang => IsScriptLanguage lang where - scriptLanguage :: ScriptLanguage lang +class HasTypeProxy lang => IsScriptLanguage lang where + scriptLanguage :: ScriptLanguage lang instance IsScriptLanguage SimpleScriptV1 where - scriptLanguage :: ScriptLanguage SimpleScriptV1 -scriptLanguage = SimpleScriptVersion SimpleScriptV1 -> ScriptLanguage SimpleScriptV1 + scriptLanguage :: ScriptLanguage SimpleScriptV1 +scriptLanguage = SimpleScriptVersion SimpleScriptV1 -> ScriptLanguage SimpleScriptV1 forall lang. SimpleScriptVersion lang -> ScriptLanguage lang SimpleScriptLanguage SimpleScriptVersion SimpleScriptV1 SimpleScriptV1 instance IsScriptLanguage SimpleScriptV2 where - scriptLanguage :: ScriptLanguage SimpleScriptV2 -scriptLanguage = SimpleScriptVersion SimpleScriptV2 -> ScriptLanguage SimpleScriptV2 + scriptLanguage :: ScriptLanguage SimpleScriptV2 +scriptLanguage = SimpleScriptVersion SimpleScriptV2 -> ScriptLanguage SimpleScriptV2 forall lang. SimpleScriptVersion lang -> ScriptLanguage lang SimpleScriptLanguage SimpleScriptVersion SimpleScriptV2 SimpleScriptV2 instance IsScriptLanguage PlutusScriptV1 where - scriptLanguage :: ScriptLanguage PlutusScriptV1 -scriptLanguage = PlutusScriptVersion PlutusScriptV1 -> ScriptLanguage PlutusScriptV1 + scriptLanguage :: ScriptLanguage PlutusScriptV1 +scriptLanguage = PlutusScriptVersion PlutusScriptV1 -> ScriptLanguage PlutusScriptV1 forall lang. PlutusScriptVersion lang -> ScriptLanguage lang PlutusScriptLanguage PlutusScriptVersion PlutusScriptV1 PlutusScriptV1 -class IsScriptLanguage lang => IsSimpleScriptLanguage lang where - simpleScriptVersion :: SimpleScriptVersion lang +class IsScriptLanguage lang => IsSimpleScriptLanguage lang where + simpleScriptVersion :: SimpleScriptVersion lang instance IsSimpleScriptLanguage SimpleScriptV1 where - simpleScriptVersion :: SimpleScriptVersion SimpleScriptV1 -simpleScriptVersion = SimpleScriptVersion SimpleScriptV1 + simpleScriptVersion :: SimpleScriptVersion SimpleScriptV1 +simpleScriptVersion = SimpleScriptVersion SimpleScriptV1 SimpleScriptV1 instance IsSimpleScriptLanguage SimpleScriptV2 where - simpleScriptVersion :: SimpleScriptVersion SimpleScriptV2 -simpleScriptVersion = SimpleScriptVersion SimpleScriptV2 + simpleScriptVersion :: SimpleScriptVersion SimpleScriptV2 +simpleScriptVersion = SimpleScriptVersion SimpleScriptV2 SimpleScriptV2 -class IsScriptLanguage lang => IsPlutusScriptLanguage lang where - plutusScriptVersion :: PlutusScriptVersion lang +class IsScriptLanguage lang => IsPlutusScriptLanguage lang where + plutusScriptVersion :: PlutusScriptVersion lang instance IsPlutusScriptLanguage PlutusScriptV1 where - plutusScriptVersion :: PlutusScriptVersion PlutusScriptV1 -plutusScriptVersion = PlutusScriptVersion PlutusScriptV1 + plutusScriptVersion :: PlutusScriptVersion PlutusScriptV1 +plutusScriptVersion = PlutusScriptVersion PlutusScriptV1 PlutusScriptV1 @@ -600,69 +600,69 @@ -- type has no JSON serialisation instances. The 'SimpleScript' family of -- languages do have a JSON syntax and thus have 'ToJSON'\/'FromJSON' instances. -- -data Script lang where +data Script lang where - SimpleScript :: !(SimpleScriptVersion lang) - -> !(SimpleScript lang) - -> Script lang + SimpleScript :: !(SimpleScriptVersion lang) + -> !(SimpleScript lang) + -> Script lang - PlutusScript :: !(PlutusScriptVersion lang) - -> !(PlutusScript lang) - -> Script lang + PlutusScript :: !(PlutusScriptVersion lang) + -> !(PlutusScript lang) + -> Script lang -deriving instance (Eq (Script lang)) -deriving instance (Show (Script lang)) +deriving instance (Eq (Script lang)) +deriving instance (Show (Script lang)) -instance HasTypeProxy lang => HasTypeProxy (Script lang) where - data AsType (Script lang) = AsScript (AsType lang) - proxyToAsType :: Proxy (Script lang) -> AsType (Script lang) -proxyToAsType Proxy (Script lang) +instance HasTypeProxy lang => HasTypeProxy (Script lang) where + data AsType (Script lang) = AsScript (AsType lang) + proxyToAsType :: Proxy (Script lang) -> AsType (Script lang) +proxyToAsType Proxy (Script lang) _ = AsType lang -> AsType (Script lang) forall lang. AsType lang -> AsType (Script lang) AsScript (Proxy lang -> AsType lang forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType (Proxy lang forall k (t :: k). Proxy t -Proxy :: Proxy lang)) +Proxy :: Proxy lang)) -instance IsScriptLanguage lang => SerialiseAsCBOR (Script lang) where - serialiseToCBOR :: Script lang -> ByteString +instance IsScriptLanguage lang => SerialiseAsCBOR (Script lang) where + serialiseToCBOR :: Script lang -> ByteString serialiseToCBOR (SimpleScript SimpleScriptVersion lang -SimpleScriptV1 SimpleScript lang -s) = +SimpleScriptV1 SimpleScript lang +s) = MultiSig StandardCrypto -> ByteString forall a. ToCBOR a => a -> ByteString CBOR.serialize' (SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto toShelleyMultiSig SimpleScript lang SimpleScript SimpleScriptV1 -s) +s) serialiseToCBOR (SimpleScript SimpleScriptVersion lang -SimpleScriptV2 SimpleScript lang -s) = +SimpleScriptV2 SimpleScript lang +s) = Timelock StandardCrypto -> ByteString forall a. ToCBOR a => a -> ByteString CBOR.serialize' (SimpleScript lang -> Timelock StandardCrypto forall lang. SimpleScript lang -> Timelock StandardCrypto toAllegraTimelock SimpleScript lang -s :: Timelock.Timelock StandardCrypto) +s :: Timelock.Timelock StandardCrypto) serialiseToCBOR (PlutusScript PlutusScriptVersion lang -PlutusScriptV1 PlutusScript lang -s) = +PlutusScriptV1 PlutusScript lang +s) = PlutusScript lang -> ByteString forall a. ToCBOR a => a -> ByteString CBOR.serialize' PlutusScript lang -s +s - deserialiseFromCBOR :: AsType (Script lang) + deserialiseFromCBOR :: AsType (Script lang) -> ByteString -> Either DecoderError (Script lang) deserialiseFromCBOR AsType (Script lang) -_ ByteString -bs = +_ ByteString +bs = case ScriptLanguage lang forall lang. IsScriptLanguage lang => ScriptLanguage lang -scriptLanguage :: ScriptLanguage lang of +scriptLanguage :: ScriptLanguage lang of SimpleScriptLanguage SimpleScriptVersion lang SimpleScriptV1 -> SimpleScriptVersion SimpleScriptV1 @@ -697,7 +697,7 @@ forall a s. FromCBOR a => Decoder s a fromCBOR (ByteString -> LByteString LBS.fromStrict ByteString -bs) +bs) SimpleScriptLanguage SimpleScriptVersion lang SimpleScriptV2 -> @@ -739,7 +739,7 @@ forall a s. FromCBOR a => Decoder s a fromCBOR (ByteString -> LByteString LBS.fromStrict ByteString -bs) +bs) PlutusScriptLanguage PlutusScriptVersion lang PlutusScriptV1 -> @@ -756,16 +756,16 @@ <$> ByteString -> Either DecoderError (PlutusScript PlutusScriptV1) forall a. FromCBOR a => ByteString -> Either DecoderError a CBOR.decodeFull' ByteString -bs +bs -instance IsScriptLanguage lang => HasTextEnvelope (Script lang) where - textEnvelopeType :: AsType (Script lang) -> TextEnvelopeType +instance IsScriptLanguage lang => HasTextEnvelope (Script lang) where + textEnvelopeType :: AsType (Script lang) -> TextEnvelopeType textEnvelopeType AsType (Script lang) _ = case ScriptLanguage lang forall lang. IsScriptLanguage lang => ScriptLanguage lang -scriptLanguage :: ScriptLanguage lang of +scriptLanguage :: ScriptLanguage lang of SimpleScriptLanguage SimpleScriptVersion lang SimpleScriptV1 -> TextEnvelopeType "SimpleScriptV1" @@ -788,38 +788,38 @@ -- Use 'toScriptInEra' to convert to a script in the context of an era. -- data ScriptInAnyLang where - ScriptInAnyLang :: ScriptLanguage lang - -> Script lang + ScriptInAnyLang :: ScriptLanguage lang + -> Script lang -> ScriptInAnyLang -deriving instance Show ScriptInAnyLang +deriving instance Show ScriptInAnyLang -- The GADT in the ScriptInAnyLang constructor requires a custom Eq instance -instance Eq ScriptInAnyLang where - == :: ScriptInAnyLang -> ScriptInAnyLang -> Bool -(==) (ScriptInAnyLang ScriptLanguage lang -lang Script lang -script) - (ScriptInAnyLang ScriptLanguage lang -lang' Script lang -script') = +instance Eq ScriptInAnyLang where + == :: ScriptInAnyLang -> ScriptInAnyLang -> Bool +(==) (ScriptInAnyLang ScriptLanguage lang +lang Script lang +script) + (ScriptInAnyLang ScriptLanguage lang +lang' Script lang +script') = case ScriptLanguage lang -> ScriptLanguage lang -> Maybe (lang :~: lang) forall k (f :: k -> *) (a :: k) (b :: k). TestEquality f => f a -> f b -> Maybe (a :~: b) testEquality ScriptLanguage lang -lang ScriptLanguage lang -lang' of +lang ScriptLanguage lang +lang' of Maybe (lang :~: lang) Nothing -> Bool False Just lang :~: lang Refl -> Script lang -script Script lang -> Script lang -> Bool +script Script lang -> Script lang -> Bool forall a. Eq a => a -> a -> Bool == Script lang Script lang -script' +script' -- | Convert a script in a specific statically-known language to a @@ -828,35 +828,35 @@ -- No inverse to this is provided, just do case analysis on the 'ScriptLanguage' -- field within the 'ScriptInAnyLang' constructor. -- -toScriptInAnyLang :: Script lang -> ScriptInAnyLang +toScriptInAnyLang :: Script lang -> ScriptInAnyLang toScriptInAnyLang :: Script lang -> ScriptInAnyLang -toScriptInAnyLang s :: Script lang -s@(SimpleScript SimpleScriptVersion lang -v SimpleScript lang +toScriptInAnyLang s :: Script lang +s@(SimpleScript SimpleScriptVersion lang +v SimpleScript lang _) = ScriptLanguage lang -> Script lang -> ScriptInAnyLang forall lang. ScriptLanguage lang -> Script lang -> ScriptInAnyLang ScriptInAnyLang (SimpleScriptVersion lang -> ScriptLanguage lang forall lang. SimpleScriptVersion lang -> ScriptLanguage lang SimpleScriptLanguage SimpleScriptVersion lang -v) Script lang -s -toScriptInAnyLang s :: Script lang -s@(PlutusScript PlutusScriptVersion lang -v PlutusScript lang +v) Script lang +s +toScriptInAnyLang s :: Script lang +s@(PlutusScript PlutusScriptVersion lang +v PlutusScript lang _) = ScriptLanguage lang -> Script lang -> ScriptInAnyLang forall lang. ScriptLanguage lang -> Script lang -> ScriptInAnyLang ScriptInAnyLang (PlutusScriptVersion lang -> ScriptLanguage lang forall lang. PlutusScriptVersion lang -> ScriptLanguage lang PlutusScriptLanguage PlutusScriptVersion lang -v) Script lang -s +v) Script lang +s instance HasTypeProxy ScriptInAnyLang where data AsType ScriptInAnyLang = AsScriptInAnyLang - proxyToAsType :: Proxy ScriptInAnyLang -> AsType ScriptInAnyLang -proxyToAsType Proxy ScriptInAnyLang + proxyToAsType :: Proxy ScriptInAnyLang -> AsType ScriptInAnyLang +proxyToAsType Proxy ScriptInAnyLang _ = AsType ScriptInAnyLang AsScriptInAnyLang @@ -865,22 +865,22 @@ -- Scripts in the context of a ledger era -- -data ScriptInEra era where - ScriptInEra :: ScriptLanguageInEra lang era - -> Script lang - -> ScriptInEra era +data ScriptInEra era where + ScriptInEra :: ScriptLanguageInEra lang era + -> Script lang + -> ScriptInEra era -deriving instance Show (ScriptInEra era) +deriving instance Show (ScriptInEra era) -- The GADT in the ScriptInEra constructor requires a custom instance -instance Eq (ScriptInEra era) where - == :: ScriptInEra era -> ScriptInEra era -> Bool -(==) (ScriptInEra ScriptLanguageInEra lang era -langInEra Script lang -script) - (ScriptInEra ScriptLanguageInEra lang era -langInEra' Script lang -script') = +instance Eq (ScriptInEra era) where + == :: ScriptInEra era -> ScriptInEra era -> Bool +(==) (ScriptInEra ScriptLanguageInEra lang era +langInEra Script lang +script) + (ScriptInEra ScriptLanguageInEra lang era +langInEra' Script lang +script') = case ScriptLanguage lang -> ScriptLanguage lang -> Maybe (lang :~: lang) forall k (f :: k -> *) (a :: k) (b :: k). TestEquality f => @@ -889,25 +889,25 @@ forall lang era. ScriptLanguageInEra lang era -> ScriptLanguage lang languageOfScriptLanguageInEra ScriptLanguageInEra lang era -langInEra) +langInEra) (ScriptLanguageInEra lang era -> ScriptLanguage lang forall lang era. ScriptLanguageInEra lang era -> ScriptLanguage lang languageOfScriptLanguageInEra ScriptLanguageInEra lang era -langInEra') of +langInEra') of Maybe (lang :~: lang) Nothing -> Bool False Just lang :~: lang Refl -> Script lang -script Script lang -> Script lang -> Bool +script Script lang -> Script lang -> Bool forall a. Eq a => a -> a -> Bool == Script lang Script lang -script' +script' -data ScriptLanguageInEra lang era where +data ScriptLanguageInEra lang era where SimpleScriptV1InShelley :: ScriptLanguageInEra SimpleScriptV1 ShelleyEra SimpleScriptV1InAllegra :: ScriptLanguageInEra SimpleScriptV1 AllegraEra @@ -920,36 +920,36 @@ PlutusScriptV1InAlonzo :: ScriptLanguageInEra PlutusScriptV1 AlonzoEra -deriving instance Eq (ScriptLanguageInEra lang era) -deriving instance Show (ScriptLanguageInEra lang era) +deriving instance Eq (ScriptLanguageInEra lang era) +deriving instance Show (ScriptLanguageInEra lang era) -instance HasTypeProxy era => HasTypeProxy (ScriptInEra era) where - data AsType (ScriptInEra era) = AsScriptInEra (AsType era) - proxyToAsType :: Proxy (ScriptInEra era) -> AsType (ScriptInEra era) -proxyToAsType Proxy (ScriptInEra era) +instance HasTypeProxy era => HasTypeProxy (ScriptInEra era) where + data AsType (ScriptInEra era) = AsScriptInEra (AsType era) + proxyToAsType :: Proxy (ScriptInEra era) -> AsType (ScriptInEra era) +proxyToAsType Proxy (ScriptInEra era) _ = AsType era -> AsType (ScriptInEra era) forall era. AsType era -> AsType (ScriptInEra era) AsScriptInEra (Proxy era -> AsType era forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType (Proxy era forall k (t :: k). Proxy t -Proxy :: Proxy era)) +Proxy :: Proxy era)) -- | Check if a given script language is supported in a given era, and if so -- return the evidence. -- -scriptLanguageSupportedInEra :: CardanoEra era - -> ScriptLanguage lang - -> Maybe (ScriptLanguageInEra lang era) +scriptLanguageSupportedInEra :: CardanoEra era + -> ScriptLanguage lang + -> Maybe (ScriptLanguageInEra lang era) scriptLanguageSupportedInEra :: CardanoEra era -> ScriptLanguage lang -> Maybe (ScriptLanguageInEra lang era) -scriptLanguageSupportedInEra CardanoEra era -era ScriptLanguage lang -lang = +scriptLanguageSupportedInEra CardanoEra era +era ScriptLanguage lang +lang = case (CardanoEra era -era, ScriptLanguage lang -lang) of +era, ScriptLanguage lang +lang) of (CardanoEra era ShelleyEra, SimpleScriptLanguage SimpleScriptVersion lang SimpleScriptV1) -> @@ -1018,13 +1018,13 @@ forall a. Maybe a Nothing -languageOfScriptLanguageInEra :: ScriptLanguageInEra lang era - -> ScriptLanguage lang +languageOfScriptLanguageInEra :: ScriptLanguageInEra lang era + -> ScriptLanguage lang languageOfScriptLanguageInEra :: ScriptLanguageInEra lang era -> ScriptLanguage lang -languageOfScriptLanguageInEra ScriptLanguageInEra lang era -langInEra = +languageOfScriptLanguageInEra ScriptLanguageInEra lang era +langInEra = case ScriptLanguageInEra lang era -langInEra of +langInEra of ScriptLanguageInEra lang era SimpleScriptV1InShelley -> SimpleScriptVersion SimpleScriptV1 -> ScriptLanguage SimpleScriptV1 forall lang. SimpleScriptVersion lang -> ScriptLanguage lang @@ -1068,13 +1068,13 @@ PlutusScriptLanguage PlutusScriptVersion PlutusScriptV1 PlutusScriptV1 -eraOfScriptLanguageInEra :: ScriptLanguageInEra lang era - -> ShelleyBasedEra era +eraOfScriptLanguageInEra :: ScriptLanguageInEra lang era + -> ShelleyBasedEra era eraOfScriptLanguageInEra :: ScriptLanguageInEra lang era -> ShelleyBasedEra era -eraOfScriptLanguageInEra ScriptLanguageInEra lang era -langInEra = +eraOfScriptLanguageInEra ScriptLanguageInEra lang era +langInEra = case ScriptLanguageInEra lang era -langInEra of +langInEra of ScriptLanguageInEra lang era SimpleScriptV1InShelley -> ShelleyBasedEra era ShelleyBasedEra ShelleyEra @@ -1116,39 +1116,39 @@ -- | Given a target era and a script in some language, check if the language is -- supported in that era, and if so return a 'ScriptInEra'. -- -toScriptInEra :: CardanoEra era -> ScriptInAnyLang -> Maybe (ScriptInEra era) +toScriptInEra :: CardanoEra era -> ScriptInAnyLang -> Maybe (ScriptInEra era) toScriptInEra :: CardanoEra era -> ScriptInAnyLang -> Maybe (ScriptInEra era) -toScriptInEra CardanoEra era -era (ScriptInAnyLang ScriptLanguage lang -lang Script lang -s) = do - ScriptLanguageInEra lang era -lang' <- CardanoEra era +toScriptInEra CardanoEra era +era (ScriptInAnyLang ScriptLanguage lang +lang Script lang +s) = do + ScriptLanguageInEra lang era +lang' <- CardanoEra era -> ScriptLanguage lang -> Maybe (ScriptLanguageInEra lang era) forall era lang. CardanoEra era -> ScriptLanguage lang -> Maybe (ScriptLanguageInEra lang era) scriptLanguageSupportedInEra CardanoEra era -era ScriptLanguage lang -lang +era ScriptLanguage lang +lang ScriptInEra era -> Maybe (ScriptInEra era) forall (m :: * -> *) a. Monad m => a -> m a return (ScriptLanguageInEra lang era -> Script lang -> ScriptInEra era forall lang era. ScriptLanguageInEra lang era -> Script lang -> ScriptInEra era ScriptInEra ScriptLanguageInEra lang era -lang' Script lang -s) +lang' Script lang +s) -eraOfScriptInEra :: ScriptInEra era -> ShelleyBasedEra era +eraOfScriptInEra :: ScriptInEra era -> ShelleyBasedEra era eraOfScriptInEra :: ScriptInEra era -> ShelleyBasedEra era -eraOfScriptInEra (ScriptInEra ScriptLanguageInEra lang era -langInEra Script lang +eraOfScriptInEra (ScriptInEra ScriptLanguageInEra lang era +langInEra Script lang _) = ScriptLanguageInEra lang era -> ShelleyBasedEra era forall lang era. ScriptLanguageInEra lang era -> ShelleyBasedEra era eraOfScriptLanguageInEra ScriptLanguageInEra lang era -langInEra +langInEra -- ---------------------------------------------------------------------------- @@ -1179,7 +1179,7 @@ -- contexts. This enables pattern matching on the context to allow them to be -- treated in a non-uniform way. -- -data WitCtx witctx where +data WitCtx witctx where WitCtxTxIn :: WitCtx WitCtxTxIn WitCtxMint :: WitCtx WitCtxMint WitCtxStake :: WitCtx WitCtxStake @@ -1198,34 +1198,34 @@ -- In addition, Plutus scripts used for spending inputs must also supply the -- datum value used when originally creating the TxOut that is now being spent. -- -data ScriptWitness witctx era where +data ScriptWitness witctx era where - SimpleScriptWitness :: ScriptLanguageInEra lang era - -> SimpleScriptVersion lang - -> SimpleScript lang - -> ScriptWitness witctx era + SimpleScriptWitness :: ScriptLanguageInEra lang era + -> SimpleScriptVersion lang + -> SimpleScript lang + -> ScriptWitness witctx era - PlutusScriptWitness :: ScriptLanguageInEra lang era - -> PlutusScriptVersion lang - -> PlutusScript lang - -> ScriptDatum witctx + PlutusScriptWitness :: ScriptLanguageInEra lang era + -> PlutusScriptVersion lang + -> PlutusScript lang + -> ScriptDatum witctx -> ScriptRedeemer -> ExecutionUnits - -> ScriptWitness witctx era + -> ScriptWitness witctx era -deriving instance Show (ScriptWitness witctx era) +deriving instance Show (ScriptWitness witctx era) -- The GADT in the SimpleScriptWitness constructor requires a custom instance -instance Eq (ScriptWitness witctx era) where - == :: ScriptWitness witctx era -> ScriptWitness witctx era -> Bool -(==) (SimpleScriptWitness ScriptLanguageInEra lang era -langInEra SimpleScriptVersion lang -version SimpleScript lang -script) - (SimpleScriptWitness ScriptLanguageInEra lang era -langInEra' SimpleScriptVersion lang -version' SimpleScript lang -script') = +instance Eq (ScriptWitness witctx era) where + == :: ScriptWitness witctx era -> ScriptWitness witctx era -> Bool +(==) (SimpleScriptWitness ScriptLanguageInEra lang era +langInEra SimpleScriptVersion lang +version SimpleScript lang +script) + (SimpleScriptWitness ScriptLanguageInEra lang era +langInEra' SimpleScriptVersion lang +version' SimpleScript lang +script') = case ScriptLanguage lang -> ScriptLanguage lang -> Maybe (lang :~: lang) forall k (f :: k -> *) (a :: k) (b :: k). TestEquality f => @@ -1234,45 +1234,45 @@ forall lang era. ScriptLanguageInEra lang era -> ScriptLanguage lang languageOfScriptLanguageInEra ScriptLanguageInEra lang era -langInEra) +langInEra) (ScriptLanguageInEra lang era -> ScriptLanguage lang forall lang era. ScriptLanguageInEra lang era -> ScriptLanguage lang languageOfScriptLanguageInEra ScriptLanguageInEra lang era -langInEra') of +langInEra') of Maybe (lang :~: lang) Nothing -> Bool False Just lang :~: lang Refl -> SimpleScriptVersion lang -version SimpleScriptVersion lang -> SimpleScriptVersion lang -> Bool +version SimpleScriptVersion lang -> SimpleScriptVersion lang -> Bool forall a. Eq a => a -> a -> Bool == SimpleScriptVersion lang SimpleScriptVersion lang -version' Bool -> Bool -> Bool +version' Bool -> Bool -> Bool && SimpleScript lang -script SimpleScript lang -> SimpleScript lang -> Bool +script SimpleScript lang -> SimpleScript lang -> Bool forall a. Eq a => a -> a -> Bool == SimpleScript lang SimpleScript lang -script' +script' - (==) (PlutusScriptWitness ScriptLanguageInEra lang era -langInEra PlutusScriptVersion lang -version PlutusScript lang -script - ScriptDatum witctx -datum ScriptRedeemer -redeemer ExecutionUnits -execUnits) - (PlutusScriptWitness ScriptLanguageInEra lang era -langInEra' PlutusScriptVersion lang -version' PlutusScript lang -script' - ScriptDatum witctx -datum' ScriptRedeemer -redeemer' ExecutionUnits -execUnits') = + (==) (PlutusScriptWitness ScriptLanguageInEra lang era +langInEra PlutusScriptVersion lang +version PlutusScript lang +script + ScriptDatum witctx +datum ScriptRedeemer +redeemer ExecutionUnits +execUnits) + (PlutusScriptWitness ScriptLanguageInEra lang era +langInEra' PlutusScriptVersion lang +version' PlutusScript lang +script' + ScriptDatum witctx +datum' ScriptRedeemer +redeemer' ExecutionUnits +execUnits') = case ScriptLanguage lang -> ScriptLanguage lang -> Maybe (lang :~: lang) forall k (f :: k -> *) (a :: k) (b :: k). TestEquality f => @@ -1281,47 +1281,47 @@ forall lang era. ScriptLanguageInEra lang era -> ScriptLanguage lang languageOfScriptLanguageInEra ScriptLanguageInEra lang era -langInEra) +langInEra) (ScriptLanguageInEra lang era -> ScriptLanguage lang forall lang era. ScriptLanguageInEra lang era -> ScriptLanguage lang languageOfScriptLanguageInEra ScriptLanguageInEra lang era -langInEra') of +langInEra') of Maybe (lang :~: lang) Nothing -> Bool False Just lang :~: lang Refl -> PlutusScriptVersion lang -version PlutusScriptVersion lang -> PlutusScriptVersion lang -> Bool +version PlutusScriptVersion lang -> PlutusScriptVersion lang -> Bool forall a. Eq a => a -> a -> Bool == PlutusScriptVersion lang PlutusScriptVersion lang -version' +version' Bool -> Bool -> Bool && PlutusScript lang -script PlutusScript lang -> PlutusScript lang -> Bool +script PlutusScript lang -> PlutusScript lang -> Bool forall a. Eq a => a -> a -> Bool == PlutusScript lang PlutusScript lang -script' +script' Bool -> Bool -> Bool && ScriptDatum witctx -datum ScriptDatum witctx -> ScriptDatum witctx -> Bool +datum ScriptDatum witctx -> ScriptDatum witctx -> Bool forall a. Eq a => a -> a -> Bool == ScriptDatum witctx -datum' +datum' Bool -> Bool -> Bool && ScriptRedeemer -redeemer ScriptRedeemer -> ScriptRedeemer -> Bool +redeemer ScriptRedeemer -> ScriptRedeemer -> Bool forall a. Eq a => a -> a -> Bool == ScriptRedeemer -redeemer' +redeemer' Bool -> Bool -> Bool && ExecutionUnits -execUnits ExecutionUnits -> ExecutionUnits -> Bool +execUnits ExecutionUnits -> ExecutionUnits -> Bool forall a. Eq a => a -> a -> Bool == ExecutionUnits -execUnits' +execUnits' (==) ScriptWitness witctx era _ ScriptWitness witctx era @@ -1330,36 +1330,36 @@ type ScriptRedeemer = ScriptData -data ScriptDatum witctx where +data ScriptDatum witctx where ScriptDatumForTxIn :: ScriptData -> ScriptDatum WitCtxTxIn NoScriptDatumForMint :: ScriptDatum WitCtxMint NoScriptDatumForStake :: ScriptDatum WitCtxStake -deriving instance Eq (ScriptDatum witctx) -deriving instance Show (ScriptDatum witctx) +deriving instance Eq (ScriptDatum witctx) +deriving instance Show (ScriptDatum witctx) -scriptWitnessScript :: ScriptWitness witctx era -> ScriptInEra era +scriptWitnessScript :: ScriptWitness witctx era -> ScriptInEra era scriptWitnessScript :: ScriptWitness witctx era -> ScriptInEra era -scriptWitnessScript (SimpleScriptWitness ScriptLanguageInEra lang era -langInEra SimpleScriptVersion lang -version SimpleScript lang -script) = +scriptWitnessScript (SimpleScriptWitness ScriptLanguageInEra lang era +langInEra SimpleScriptVersion lang +version SimpleScript lang +script) = ScriptLanguageInEra lang era -> Script lang -> ScriptInEra era forall lang era. ScriptLanguageInEra lang era -> Script lang -> ScriptInEra era ScriptInEra ScriptLanguageInEra lang era -langInEra (SimpleScriptVersion lang -> SimpleScript lang -> Script lang +langInEra (SimpleScriptVersion lang -> SimpleScript lang -> Script lang forall lang. SimpleScriptVersion lang -> SimpleScript lang -> Script lang SimpleScript SimpleScriptVersion lang -version SimpleScript lang -script) +version SimpleScript lang +script) -scriptWitnessScript (PlutusScriptWitness ScriptLanguageInEra lang era -langInEra PlutusScriptVersion lang -version PlutusScript lang -script ScriptDatum witctx +scriptWitnessScript (PlutusScriptWitness ScriptLanguageInEra lang era +langInEra PlutusScriptVersion lang +version PlutusScript lang +script ScriptDatum witctx _ ScriptRedeemer _ ExecutionUnits _) = @@ -1367,46 +1367,46 @@ forall lang era. ScriptLanguageInEra lang era -> Script lang -> ScriptInEra era ScriptInEra ScriptLanguageInEra lang era -langInEra (PlutusScriptVersion lang -> PlutusScript lang -> Script lang +langInEra (PlutusScriptVersion lang -> PlutusScript lang -> Script lang forall lang. PlutusScriptVersion lang -> PlutusScript lang -> Script lang PlutusScript PlutusScriptVersion lang -version PlutusScript lang -script) +version PlutusScript lang +script) -- ---------------------------------------------------------------------------- -- The kind of witness to use, key (signature) or script -- -data Witness witctx era where +data Witness witctx era where - KeyWitness :: KeyWitnessInCtx witctx - -> Witness witctx era + KeyWitness :: KeyWitnessInCtx witctx + -> Witness witctx era - ScriptWitness :: ScriptWitnessInCtx witctx - -> ScriptWitness witctx era - -> Witness witctx era + ScriptWitness :: ScriptWitnessInCtx witctx + -> ScriptWitness witctx era + -> Witness witctx era -deriving instance Eq (Witness witctx era) -deriving instance Show (Witness witctx era) +deriving instance Eq (Witness witctx era) +deriving instance Show (Witness witctx era) -data KeyWitnessInCtx witctx where +data KeyWitnessInCtx witctx where KeyWitnessForSpending :: KeyWitnessInCtx WitCtxTxIn KeyWitnessForStakeAddr :: KeyWitnessInCtx WitCtxStake -data ScriptWitnessInCtx witctx where +data ScriptWitnessInCtx witctx where ScriptWitnessForSpending :: ScriptWitnessInCtx WitCtxTxIn ScriptWitnessForMinting :: ScriptWitnessInCtx WitCtxMint ScriptWitnessForStakeAddr :: ScriptWitnessInCtx WitCtxStake -deriving instance Eq (KeyWitnessInCtx witctx) -deriving instance Show (KeyWitnessInCtx witctx) +deriving instance Eq (KeyWitnessInCtx witctx) +deriving instance Show (KeyWitnessInCtx witctx) -deriving instance Eq (ScriptWitnessInCtx witctx) -deriving instance Show (ScriptWitnessInCtx witctx) +deriving instance Eq (ScriptWitnessInCtx witctx) +deriving instance Show (ScriptWitnessInCtx witctx) -- ---------------------------------------------------------------------------- @@ -1430,7 +1430,7 @@ ExecutionUnits -> Word64 executionMemory :: Word64 } - deriving (ExecutionUnits -> ExecutionUnits -> Bool + deriving (ExecutionUnits -> ExecutionUnits -> Bool (ExecutionUnits -> ExecutionUnits -> Bool) -> (ExecutionUnits -> ExecutionUnits -> Bool) -> Eq ExecutionUnits forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -1438,7 +1438,7 @@ $c/= :: ExecutionUnits -> ExecutionUnits -> Bool == :: ExecutionUnits -> ExecutionUnits -> Bool $c== :: ExecutionUnits -> ExecutionUnits -> Bool -Eq, Int -> ExecutionUnits -> ShowS +Eq, Int -> ExecutionUnits -> ShowS [ExecutionUnits] -> ShowS ExecutionUnits -> String (Int -> ExecutionUnits -> ShowS) @@ -1455,30 +1455,30 @@ $cshowsPrec :: Int -> ExecutionUnits -> ShowS Show) -instance ToJSON ExecutionUnits where - toJSON :: ExecutionUnits -> Value -toJSON ExecutionUnits{Word64 +instance ToJSON ExecutionUnits where + toJSON :: ExecutionUnits -> Value +toJSON ExecutionUnits{Word64 executionSteps :: Word64 executionSteps :: ExecutionUnits -> Word64 -executionSteps, Word64 +executionSteps, Word64 executionMemory :: Word64 executionMemory :: ExecutionUnits -> Word64 -executionMemory} = +executionMemory} = [Pair] -> Value object [ Text "steps" Text -> Word64 -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word64 -executionSteps +executionSteps , Text "memory" Text -> Word64 -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word64 -executionMemory ] +executionMemory ] -instance FromJSON ExecutionUnits where - parseJSON :: Value -> Parser ExecutionUnits -parseJSON = +instance FromJSON ExecutionUnits where + parseJSON :: Value -> Parser ExecutionUnits +parseJSON = String -> (Object -> Parser ExecutionUnits) -> Value @@ -1491,15 +1491,15 @@ -> Value -> Parser ExecutionUnits forall a b. (a -> b) -> a -> b -$ \Object -o -> +$ \Object +o -> Word64 -> Word64 -> ExecutionUnits ExecutionUnits (Word64 -> Word64 -> ExecutionUnits) -> Parser Word64 -> Parser (Word64 -> ExecutionUnits) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -o Object -> Text -> Parser Word64 +o Object -> Text -> Parser Word64 forall a. FromJSON a => Object -> Text -> Parser a .: Text "steps" @@ -1507,47 +1507,47 @@ -> Parser Word64 -> Parser ExecutionUnits forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser Word64 +o Object -> Text -> Parser Word64 forall a. FromJSON a => Object -> Text -> Parser a .: Text "memory" toAlonzoExUnits :: ExecutionUnits -> Alonzo.ExUnits toAlonzoExUnits :: ExecutionUnits -> ExUnits -toAlonzoExUnits ExecutionUnits{Word64 +toAlonzoExUnits ExecutionUnits{Word64 executionSteps :: Word64 executionSteps :: ExecutionUnits -> Word64 -executionSteps, Word64 +executionSteps, Word64 executionMemory :: Word64 executionMemory :: ExecutionUnits -> Word64 -executionMemory} = +executionMemory} = ExUnits :: Word64 -> Word64 -> ExUnits Alonzo.ExUnits { exUnitsSteps :: Word64 Alonzo.exUnitsSteps = Word64 -executionSteps, +executionSteps, exUnitsMem :: Word64 Alonzo.exUnitsMem = Word64 -executionMemory +executionMemory } fromAlonzoExUnits :: Alonzo.ExUnits -> ExecutionUnits fromAlonzoExUnits :: ExUnits -> ExecutionUnits -fromAlonzoExUnits Alonzo.ExUnits{Word64 +fromAlonzoExUnits Alonzo.ExUnits{Word64 exUnitsSteps :: Word64 exUnitsSteps :: ExUnits -> Word64 -Alonzo.exUnitsSteps, Word64 +Alonzo.exUnitsSteps, Word64 exUnitsMem :: Word64 exUnitsMem :: ExUnits -> Word64 -Alonzo.exUnitsMem} = +Alonzo.exUnitsMem} = ExecutionUnits :: Word64 -> Word64 -> ExecutionUnits ExecutionUnits { executionSteps :: Word64 executionSteps = Word64 -exUnitsSteps, +exUnitsSteps, executionMemory :: Word64 executionMemory = Word64 -exUnitsMem +exUnitsMem } @@ -1561,7 +1561,7 @@ -- hash where we don't want things to be era-parametrised. -- newtype ScriptHash = ScriptHash (Shelley.ScriptHash StandardCrypto) - deriving stock (ScriptHash -> ScriptHash -> Bool + deriving stock (ScriptHash -> ScriptHash -> Bool (ScriptHash -> ScriptHash -> Bool) -> (ScriptHash -> ScriptHash -> Bool) -> Eq ScriptHash forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -1569,7 +1569,7 @@ $c/= :: ScriptHash -> ScriptHash -> Bool == :: ScriptHash -> ScriptHash -> Bool $c== :: ScriptHash -> ScriptHash -> Bool -Eq, Eq ScriptHash +Eq, Eq ScriptHash Eq ScriptHash -> (ScriptHash -> ScriptHash -> Ordering) -> (ScriptHash -> ScriptHash -> Bool) @@ -1608,7 +1608,7 @@ $ccompare :: ScriptHash -> ScriptHash -> Ordering $cp1Ord :: Eq ScriptHash Ord) - deriving (Int -> ScriptHash -> ShowS + deriving (Int -> ScriptHash -> ShowS [ScriptHash] -> ShowS ScriptHash -> String (Int -> ScriptHash -> ShowS) @@ -1623,7 +1623,7 @@ $cshow :: ScriptHash -> String showsPrec :: Int -> ScriptHash -> ShowS $cshowsPrec :: Int -> ScriptHash -> ShowS -Show, String -> ScriptHash +Show, String -> ScriptHash (String -> ScriptHash) -> IsString ScriptHash forall a. (String -> a) -> IsString a fromString :: String -> ScriptHash @@ -1632,25 +1632,25 @@ instance HasTypeProxy ScriptHash where data AsType ScriptHash = AsScriptHash - proxyToAsType :: Proxy ScriptHash -> AsType ScriptHash -proxyToAsType Proxy ScriptHash + proxyToAsType :: Proxy ScriptHash -> AsType ScriptHash +proxyToAsType Proxy ScriptHash _ = AsType ScriptHash AsScriptHash instance SerialiseAsRawBytes ScriptHash where - serialiseToRawBytes :: ScriptHash -> ByteString -serialiseToRawBytes (ScriptHash (Shelley.ScriptHash Hash (ADDRHASH StandardCrypto) EraIndependentScript -h)) = + serialiseToRawBytes :: ScriptHash -> ByteString +serialiseToRawBytes (ScriptHash (Shelley.ScriptHash Hash (ADDRHASH StandardCrypto) EraIndependentScript +h)) = Hash Blake2b_224 EraIndependentScript -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash (ADDRHASH StandardCrypto) EraIndependentScript Hash Blake2b_224 EraIndependentScript -h +h - deserialiseFromRawBytes :: AsType ScriptHash -> ByteString -> Maybe ScriptHash + deserialiseFromRawBytes :: AsType ScriptHash -> ByteString -> Maybe ScriptHash deserialiseFromRawBytes AsType ScriptHash -AsScriptHash ByteString -bs = +AsScriptHash ByteString +bs = ScriptHash StandardCrypto -> ScriptHash ScriptHash (ScriptHash StandardCrypto -> ScriptHash) -> (Hash Blake2b_224 EraIndependentScript @@ -1668,14 +1668,14 @@ <$> ByteString -> Maybe (Hash Blake2b_224 EraIndependentScript) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -hashScript :: Script lang -> ScriptHash +hashScript :: Script lang -> ScriptHash hashScript :: Script lang -> ScriptHash hashScript (SimpleScript SimpleScriptVersion lang -SimpleScriptV1 SimpleScript lang -s) = +SimpleScriptV1 SimpleScript lang +s) = -- For V1, we convert to the Shelley-era version specifically and hash that. -- Later ledger eras have to be compatible anyway. ScriptHash StandardCrypto -> ScriptHash @@ -1704,11 +1704,11 @@ forall a b. (a -> b) -> a -> b $ SimpleScript lang SimpleScript SimpleScriptV1 -s +s hashScript (SimpleScript SimpleScriptVersion lang -SimpleScriptV2 SimpleScript lang -s) = +SimpleScriptV2 SimpleScript lang +s) = -- For V2, we convert to the Allegra-era version specifically and hash that. -- Later ledger eras have to be compatible anyway. ScriptHash StandardCrypto -> ScriptHash @@ -1739,11 +1739,11 @@ forall a b. (a -> b) -> a -> b $ SimpleScript lang SimpleScript SimpleScriptV2 -s +s hashScript (PlutusScript PlutusScriptVersion lang -PlutusScriptV1 (PlutusScriptSerialised ShortByteString -script)) = +PlutusScriptV1 (PlutusScriptSerialised ShortByteString +script)) = -- For Plutus V1, we convert to the Alonzo-era version specifically and -- hash that. Later ledger eras have to be compatible anyway. ScriptHash StandardCrypto -> ScriptHash @@ -1766,13 +1766,13 @@ $ ShortByteString -> Script (AlonzoEra StandardCrypto) forall era. ShortByteString -> Script era Alonzo.PlutusScript ShortByteString -script +script toShelleyScriptHash :: ScriptHash -> Shelley.ScriptHash StandardCrypto toShelleyScriptHash :: ScriptHash -> ScriptHash StandardCrypto -toShelleyScriptHash (ScriptHash ScriptHash StandardCrypto -h) = ScriptHash StandardCrypto -h +toShelleyScriptHash (ScriptHash ScriptHash StandardCrypto +h) = ScriptHash StandardCrypto +h fromShelleyScriptHash :: Shelley.ScriptHash StandardCrypto -> ScriptHash fromShelleyScriptHash :: ScriptHash StandardCrypto -> ScriptHash @@ -1784,37 +1784,37 @@ -- The simple native script language -- -data SimpleScript lang where +data SimpleScript lang where - RequireSignature :: !(Hash PaymentKey) - -> SimpleScript lang + RequireSignature :: !(Hash PaymentKey) + -> SimpleScript lang - RequireTimeBefore :: !(TimeLocksSupported lang) + RequireTimeBefore :: !(TimeLocksSupported lang) -> !SlotNo - -> SimpleScript lang + -> SimpleScript lang - RequireTimeAfter :: !(TimeLocksSupported lang) + RequireTimeAfter :: !(TimeLocksSupported lang) -> !SlotNo - -> SimpleScript lang + -> SimpleScript lang - RequireAllOf :: [SimpleScript lang] -> SimpleScript lang - RequireAnyOf :: [SimpleScript lang] -> SimpleScript lang - RequireMOf :: Int -> [SimpleScript lang] -> SimpleScript lang + RequireAllOf :: [SimpleScript lang] -> SimpleScript lang + RequireAnyOf :: [SimpleScript lang] -> SimpleScript lang + RequireMOf :: Int -> [SimpleScript lang] -> SimpleScript lang -deriving instance Eq (SimpleScript lang) -deriving instance Show (SimpleScript lang) +deriving instance Eq (SimpleScript lang) +deriving instance Show (SimpleScript lang) -instance HasTypeProxy lang => HasTypeProxy (SimpleScript lang) where - data AsType (SimpleScript lang) = AsSimpleScript (AsType lang) - proxyToAsType :: Proxy (SimpleScript lang) -> AsType (SimpleScript lang) -proxyToAsType Proxy (SimpleScript lang) +instance HasTypeProxy lang => HasTypeProxy (SimpleScript lang) where + data AsType (SimpleScript lang) = AsSimpleScript (AsType lang) + proxyToAsType :: Proxy (SimpleScript lang) -> AsType (SimpleScript lang) +proxyToAsType Proxy (SimpleScript lang) _ = AsType lang -> AsType (SimpleScript lang) forall lang. AsType lang -> AsType (SimpleScript lang) AsSimpleScript (Proxy lang -> AsType lang forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType (Proxy lang forall k (t :: k). Proxy t -Proxy :: Proxy lang)) +Proxy :: Proxy lang)) -- | Time lock feature in the 'SimpleScript' language. @@ -1822,14 +1822,14 @@ -- The constructors of this type serve as evidence that the timelocks feature -- is supported in particular versions of the language. -- -data TimeLocksSupported lang where +data TimeLocksSupported lang where TimeLocksInSimpleScriptV2 :: TimeLocksSupported SimpleScriptV2 -deriving instance Eq (TimeLocksSupported lang) -deriving instance Show (TimeLocksSupported lang) +deriving instance Eq (TimeLocksSupported lang) +deriving instance Show (TimeLocksSupported lang) -timeLocksSupported :: SimpleScriptVersion lang - -> Maybe (TimeLocksSupported lang) +timeLocksSupported :: SimpleScriptVersion lang + -> Maybe (TimeLocksSupported lang) timeLocksSupported :: SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) timeLocksSupported SimpleScriptVersion lang SimpleScriptV1 = Maybe (TimeLocksSupported lang) @@ -1851,60 +1851,60 @@ -- hand converting 'SimpleScriptV1' to 'SimpleScriptV2' will always work because -- it is backwards compatible. -- -adjustSimpleScriptVersion :: SimpleScriptVersion lang' - -> SimpleScript lang - -> Maybe (SimpleScript lang') +adjustSimpleScriptVersion :: SimpleScriptVersion lang' + -> SimpleScript lang + -> Maybe (SimpleScript lang') adjustSimpleScriptVersion :: SimpleScriptVersion lang' -> SimpleScript lang -> Maybe (SimpleScript lang') -adjustSimpleScriptVersion SimpleScriptVersion lang' -target = SimpleScript lang -> Maybe (SimpleScript lang') -go +adjustSimpleScriptVersion SimpleScriptVersion lang' +target = SimpleScript lang -> Maybe (SimpleScript lang') +go where - go :: SimpleScript lang -> Maybe (SimpleScript lang') -go (RequireSignature Hash PaymentKey -sig) = SimpleScript lang' -> Maybe (SimpleScript lang') + go :: SimpleScript lang -> Maybe (SimpleScript lang') +go (RequireSignature Hash PaymentKey +sig) = SimpleScript lang' -> Maybe (SimpleScript lang') forall (f :: * -> *) a. Applicative f => a -> f a pure (Hash PaymentKey -> SimpleScript lang' forall lang. Hash PaymentKey -> SimpleScript lang RequireSignature Hash PaymentKey -sig) +sig) - go (RequireTimeBefore TimeLocksSupported lang -_ SlotNo -slot) = do - TimeLocksSupported lang' -supported <- SimpleScriptVersion lang' -> Maybe (TimeLocksSupported lang') + go (RequireTimeBefore TimeLocksSupported lang +_ SlotNo +slot) = do + TimeLocksSupported lang' +supported <- SimpleScriptVersion lang' -> Maybe (TimeLocksSupported lang') forall lang. SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) timeLocksSupported SimpleScriptVersion lang' -target +target SimpleScript lang' -> Maybe (SimpleScript lang') forall (f :: * -> *) a. Applicative f => a -> f a pure (TimeLocksSupported lang' -> SlotNo -> SimpleScript lang' forall lang. TimeLocksSupported lang -> SlotNo -> SimpleScript lang RequireTimeBefore TimeLocksSupported lang' -supported SlotNo -slot) +supported SlotNo +slot) - go (RequireTimeAfter TimeLocksSupported lang -_ SlotNo -slot) = do - TimeLocksSupported lang' -supported <- SimpleScriptVersion lang' -> Maybe (TimeLocksSupported lang') + go (RequireTimeAfter TimeLocksSupported lang +_ SlotNo +slot) = do + TimeLocksSupported lang' +supported <- SimpleScriptVersion lang' -> Maybe (TimeLocksSupported lang') forall lang. SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) timeLocksSupported SimpleScriptVersion lang' -target +target SimpleScript lang' -> Maybe (SimpleScript lang') forall (f :: * -> *) a. Applicative f => a -> f a pure (TimeLocksSupported lang' -> SlotNo -> SimpleScript lang' forall lang. TimeLocksSupported lang -> SlotNo -> SimpleScript lang RequireTimeAfter TimeLocksSupported lang' -supported SlotNo -slot) +supported SlotNo +slot) - go (RequireAllOf [SimpleScript lang] -ss) = [SimpleScript lang'] -> SimpleScript lang' + go (RequireAllOf [SimpleScript lang] +ss) = [SimpleScript lang'] -> SimpleScript lang' forall lang. [SimpleScript lang] -> SimpleScript lang RequireAllOf ([SimpleScript lang'] -> SimpleScript lang') -> Maybe [SimpleScript lang'] -> Maybe (SimpleScript lang') @@ -1915,10 +1915,10 @@ (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse SimpleScript lang -> Maybe (SimpleScript lang') -go [SimpleScript lang] -ss - go (RequireAnyOf [SimpleScript lang] -ss) = [SimpleScript lang'] -> SimpleScript lang' +go [SimpleScript lang] +ss + go (RequireAnyOf [SimpleScript lang] +ss) = [SimpleScript lang'] -> SimpleScript lang' forall lang. [SimpleScript lang] -> SimpleScript lang RequireAnyOf ([SimpleScript lang'] -> SimpleScript lang') -> Maybe [SimpleScript lang'] -> Maybe (SimpleScript lang') @@ -1929,14 +1929,14 @@ (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse SimpleScript lang -> Maybe (SimpleScript lang') -go [SimpleScript lang] -ss - go (RequireMOf Int -m [SimpleScript lang] -ss) = Int -> [SimpleScript lang'] -> SimpleScript lang' +go [SimpleScript lang] +ss + go (RequireMOf Int +m [SimpleScript lang] +ss) = Int -> [SimpleScript lang'] -> SimpleScript lang' forall lang. Int -> [SimpleScript lang] -> SimpleScript lang RequireMOf Int -m ([SimpleScript lang'] -> SimpleScript lang') +m ([SimpleScript lang'] -> SimpleScript lang') -> Maybe [SimpleScript lang'] -> Maybe (SimpleScript lang') forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> (SimpleScript lang -> Maybe (SimpleScript lang')) @@ -1945,8 +1945,8 @@ (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse SimpleScript lang -> Maybe (SimpleScript lang') -go [SimpleScript lang] -ss +go [SimpleScript lang] +ss -- ---------------------------------------------------------------------------- @@ -1958,35 +1958,35 @@ -- Note that Plutus scripts have a binary serialisation but no JSON -- serialisation. -- -data PlutusScript lang where - PlutusScriptSerialised :: ShortByteString -> PlutusScript lang +data PlutusScript lang where + PlutusScriptSerialised :: ShortByteString -> PlutusScript lang -deriving instance Eq (PlutusScript lang) -deriving instance Show (PlutusScript lang) +deriving instance Eq (PlutusScript lang) +deriving instance Show (PlutusScript lang) -instance HasTypeProxy lang => HasTypeProxy (PlutusScript lang) where - data AsType (PlutusScript lang) = AsPlutusScript (AsType lang) - proxyToAsType :: Proxy (PlutusScript lang) -> AsType (PlutusScript lang) -proxyToAsType Proxy (PlutusScript lang) +instance HasTypeProxy lang => HasTypeProxy (PlutusScript lang) where + data AsType (PlutusScript lang) = AsPlutusScript (AsType lang) + proxyToAsType :: Proxy (PlutusScript lang) -> AsType (PlutusScript lang) +proxyToAsType Proxy (PlutusScript lang) _ = AsType lang -> AsType (PlutusScript lang) forall lang. AsType lang -> AsType (PlutusScript lang) AsPlutusScript (Proxy lang -> AsType lang forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType (Proxy lang forall k (t :: k). Proxy t -Proxy :: Proxy lang)) +Proxy :: Proxy lang)) -instance HasTypeProxy lang => SerialiseAsRawBytes (PlutusScript lang) where - serialiseToRawBytes :: PlutusScript lang -> ByteString -serialiseToRawBytes (PlutusScriptSerialised ShortByteString -sbs) = ShortByteString -> ByteString +instance HasTypeProxy lang => SerialiseAsRawBytes (PlutusScript lang) where + serialiseToRawBytes :: PlutusScript lang -> ByteString +serialiseToRawBytes (PlutusScriptSerialised ShortByteString +sbs) = ShortByteString -> ByteString SBS.fromShort ShortByteString -sbs +sbs - deserialiseFromRawBytes :: AsType (PlutusScript lang) + deserialiseFromRawBytes :: AsType (PlutusScript lang) -> ByteString -> Maybe (PlutusScript lang) -deserialiseFromRawBytes (AsPlutusScript _) ByteString -bs = +deserialiseFromRawBytes (AsPlutusScript _) ByteString +bs = -- TODO alonzo: validate the script syntax and fail decoding if invalid PlutusScript lang -> Maybe (PlutusScript lang) forall a. a -> Maybe a @@ -1994,20 +1994,20 @@ forall lang. ShortByteString -> PlutusScript lang PlutusScriptSerialised (ByteString -> ShortByteString SBS.toShort ByteString -bs)) +bs)) -instance Typeable lang => ToCBOR (PlutusScript lang) where - toCBOR :: PlutusScript lang -> Encoding -toCBOR (PlutusScriptSerialised ShortByteString -sbs) = ShortByteString -> Encoding +instance Typeable lang => ToCBOR (PlutusScript lang) where + toCBOR :: PlutusScript lang -> Encoding +toCBOR (PlutusScriptSerialised ShortByteString +sbs) = ShortByteString -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR ShortByteString -sbs +sbs -instance Typeable lang => FromCBOR (PlutusScript lang) where +instance Typeable lang => FromCBOR (PlutusScript lang) where -- TODO alonzo: validate the script syntax and fail decoding if invalid - fromCBOR :: Decoder s (PlutusScript lang) -fromCBOR = ShortByteString -> PlutusScript lang + fromCBOR :: Decoder s (PlutusScript lang) +fromCBOR = ShortByteString -> PlutusScript lang forall lang. ShortByteString -> PlutusScript lang PlutusScriptSerialised (ShortByteString -> PlutusScript lang) -> Decoder s ShortByteString -> Decoder s (PlutusScript lang) @@ -2016,19 +2016,19 @@ forall a s. FromCBOR a => Decoder s a fromCBOR -instance (HasTypeProxy lang, Typeable lang) => - SerialiseAsCBOR (PlutusScript lang) +instance (HasTypeProxy lang, Typeable lang) => + SerialiseAsCBOR (PlutusScript lang) -instance (IsPlutusScriptLanguage lang, Typeable lang) => - HasTextEnvelope (PlutusScript lang) where - textEnvelopeType :: AsType (PlutusScript lang) -> TextEnvelopeType -textEnvelopeType AsType (PlutusScript lang) +instance (IsPlutusScriptLanguage lang, Typeable lang) => + HasTextEnvelope (PlutusScript lang) where + textEnvelopeType :: AsType (PlutusScript lang) -> TextEnvelopeType +textEnvelopeType AsType (PlutusScript lang) _ = case PlutusScriptVersion lang forall lang. IsPlutusScriptLanguage lang => PlutusScriptVersion lang -plutusScriptVersion :: PlutusScriptVersion lang of +plutusScriptVersion :: PlutusScriptVersion lang of PlutusScriptVersion lang PlutusScriptV1 -> TextEnvelopeType "PlutusScriptV1" @@ -2041,7 +2041,7 @@ -- -- The exact script depends on the context in which it is to be used. -- -examplePlutusScriptAlwaysSucceeds :: WitCtx witctx +examplePlutusScriptAlwaysSucceeds :: WitCtx witctx -> PlutusScript PlutusScriptV1 examplePlutusScriptAlwaysSucceeds :: WitCtx witctx -> PlutusScript PlutusScriptV1 examplePlutusScriptAlwaysSucceeds = @@ -2069,7 +2069,7 @@ -- -- The exact script depends on the context in which it is to be used. -- -examplePlutusScriptAlwaysFails :: WitCtx witctx +examplePlutusScriptAlwaysFails :: WitCtx witctx -> PlutusScript PlutusScriptV1 examplePlutusScriptAlwaysFails :: WitCtx witctx -> PlutusScript PlutusScriptV1 examplePlutusScriptAlwaysFails = @@ -2099,7 +2099,7 @@ -- * the redeemer -- * the Plutus representation of the tx and environment -- -scriptArityForWitCtx :: WitCtx witctx -> Natural +scriptArityForWitCtx :: WitCtx witctx -> Natural scriptArityForWitCtx :: WitCtx witctx -> Natural scriptArityForWitCtx WitCtx witctx WitCtxTxIn = Natural @@ -2116,29 +2116,29 @@ -- Conversion functions -- -toShelleyScript :: ScriptInEra era -> Ledger.Script (ShelleyLedgerEra era) +toShelleyScript :: ScriptInEra era -> Ledger.Script (ShelleyLedgerEra era) toShelleyScript :: ScriptInEra era -> Script (ShelleyLedgerEra era) -toShelleyScript (ScriptInEra ScriptLanguageInEra lang era -langInEra (SimpleScript SimpleScriptVersion lang -SimpleScriptV1 SimpleScript lang -script)) = +toShelleyScript (ScriptInEra ScriptLanguageInEra lang era +langInEra (SimpleScript SimpleScriptVersion lang +SimpleScriptV1 SimpleScript lang +script)) = case ScriptLanguageInEra lang era -langInEra of +langInEra of ScriptLanguageInEra lang era SimpleScriptV1InShelley -> SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto toShelleyMultiSig SimpleScript lang SimpleScript SimpleScriptV1 -script +script ScriptLanguageInEra lang era SimpleScriptV1InAllegra -> SimpleScript lang -> Timelock StandardCrypto forall lang. SimpleScript lang -> Timelock StandardCrypto toAllegraTimelock SimpleScript lang -script +script ScriptLanguageInEra lang era SimpleScriptV1InMary -> SimpleScript lang -> Timelock StandardCrypto forall lang. SimpleScript lang -> Timelock StandardCrypto toAllegraTimelock SimpleScript lang -script +script ScriptLanguageInEra lang era SimpleScriptV1InAlonzo -> Timelock (Crypto (AlonzoEra StandardCrypto)) -> Script (AlonzoEra StandardCrypto) @@ -2146,24 +2146,24 @@ Alonzo.TimelockScript (SimpleScript lang -> Timelock StandardCrypto forall lang. SimpleScript lang -> Timelock StandardCrypto toAllegraTimelock SimpleScript lang -script) +script) -toShelleyScript (ScriptInEra ScriptLanguageInEra lang era -langInEra (SimpleScript SimpleScriptVersion lang -SimpleScriptV2 SimpleScript lang -script)) = +toShelleyScript (ScriptInEra ScriptLanguageInEra lang era +langInEra (SimpleScript SimpleScriptVersion lang +SimpleScriptV2 SimpleScript lang +script)) = case ScriptLanguageInEra lang era -langInEra of +langInEra of ScriptLanguageInEra lang era SimpleScriptV2InAllegra -> SimpleScript lang -> Timelock StandardCrypto forall lang. SimpleScript lang -> Timelock StandardCrypto toAllegraTimelock SimpleScript lang -script +script ScriptLanguageInEra lang era SimpleScriptV2InMary -> SimpleScript lang -> Timelock StandardCrypto forall lang. SimpleScript lang -> Timelock StandardCrypto toAllegraTimelock SimpleScript lang -script +script ScriptLanguageInEra lang era SimpleScriptV2InAlonzo -> Timelock (Crypto (AlonzoEra StandardCrypto)) -> Script (AlonzoEra StandardCrypto) @@ -2171,31 +2171,31 @@ Alonzo.TimelockScript (SimpleScript lang -> Timelock StandardCrypto forall lang. SimpleScript lang -> Timelock StandardCrypto toAllegraTimelock SimpleScript lang -script) +script) -toShelleyScript (ScriptInEra ScriptLanguageInEra lang era -langInEra (PlutusScript PlutusScriptVersion lang +toShelleyScript (ScriptInEra ScriptLanguageInEra lang era +langInEra (PlutusScript PlutusScriptVersion lang PlutusScriptV1 - (PlutusScriptSerialised ShortByteString -script))) = + (PlutusScriptSerialised ShortByteString +script))) = case ScriptLanguageInEra lang era -langInEra of +langInEra of ScriptLanguageInEra lang era PlutusScriptV1InAlonzo -> ShortByteString -> Script (AlonzoEra StandardCrypto) forall era. ShortByteString -> Script era Alonzo.PlutusScript ShortByteString -script +script -fromShelleyBasedScript :: ShelleyBasedEra era - -> Ledger.Script (ShelleyLedgerEra era) - -> ScriptInEra era +fromShelleyBasedScript :: ShelleyBasedEra era + -> Ledger.Script (ShelleyLedgerEra era) + -> ScriptInEra era fromShelleyBasedScript :: ShelleyBasedEra era -> Script (ShelleyLedgerEra era) -> ScriptInEra era -fromShelleyBasedScript ShelleyBasedEra era -era Script (ShelleyLedgerEra era) -script = +fromShelleyBasedScript ShelleyBasedEra era +era Script (ShelleyLedgerEra era) +script = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> ScriptLanguageInEra SimpleScriptV1 ShelleyEra @@ -2220,7 +2220,7 @@ forall lang. MultiSig StandardCrypto -> SimpleScript lang fromShelleyMultiSig Script (ShelleyLedgerEra era) MultiSig StandardCrypto -script +script ShelleyBasedEra era ShelleyBasedEraAllegra -> ScriptLanguageInEra SimpleScriptV2 AllegraEra @@ -2249,7 +2249,7 @@ fromAllegraTimelock TimeLocksSupported SimpleScriptV2 TimeLocksInSimpleScriptV2 Script (ShelleyLedgerEra era) Timelock StandardCrypto -script +script ShelleyBasedEra era ShelleyBasedEraMary -> ScriptLanguageInEra SimpleScriptV2 MaryEra @@ -2278,12 +2278,12 @@ fromAllegraTimelock TimeLocksSupported SimpleScriptV2 TimeLocksInSimpleScriptV2 Script (ShelleyLedgerEra era) Timelock StandardCrypto -script +script ShelleyBasedEra era ShelleyBasedEraAlonzo -> case Script (ShelleyLedgerEra era) -script of - Alonzo.TimelockScript s -> +script of + Alonzo.TimelockScript s -> ScriptLanguageInEra SimpleScriptV2 AlonzoEra -> Script SimpleScriptV2 -> ScriptInEra AlonzoEra forall lang era. @@ -2310,8 +2310,8 @@ fromAllegraTimelock TimeLocksSupported SimpleScriptV2 TimeLocksInSimpleScriptV2 Timelock (Crypto (AlonzoEra StandardCrypto)) Timelock StandardCrypto -s - Alonzo.PlutusScript s -> +s + Alonzo.PlutusScript s -> ScriptLanguageInEra PlutusScriptV1 AlonzoEra -> Script PlutusScriptV1 -> ScriptInEra AlonzoEra forall lang era. @@ -2333,7 +2333,7 @@ ShortByteString -> PlutusScript PlutusScriptV1 forall lang. ShortByteString -> PlutusScript lang PlutusScriptSerialised ShortByteString -s +s -- | Conversion for the 'Shelley.MultiSig' language used by the Shelley era. @@ -2342,11 +2342,11 @@ -> Shelley.MultiSig StandardCrypto toShelleyMultiSig :: SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto toShelleyMultiSig = SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto -go +go where - go :: SimpleScript SimpleScriptV1 -> Shelley.MultiSig StandardCrypto - go :: SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto -go (RequireSignature (PaymentKeyHash kh)) + go :: SimpleScript SimpleScriptV1 -> Shelley.MultiSig StandardCrypto + go :: SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto +go (RequireSignature (PaymentKeyHash kh)) = KeyHash 'Witness StandardCrypto -> MultiSig StandardCrypto forall crypto. Crypto crypto => @@ -2357,9 +2357,9 @@ HasKeyRole a => a r crypto -> a r' crypto Shelley.coerceKeyRole KeyHash 'Payment StandardCrypto -kh) - go (RequireAllOf [SimpleScript SimpleScriptV1] -s) = [MultiSig StandardCrypto] -> MultiSig StandardCrypto +kh) + go (RequireAllOf [SimpleScript SimpleScriptV1] +s) = [MultiSig StandardCrypto] -> MultiSig StandardCrypto forall crypto. Crypto crypto => [MultiSig crypto] -> MultiSig crypto @@ -2367,10 +2367,10 @@ -> [SimpleScript SimpleScriptV1] -> [MultiSig StandardCrypto] forall a b. (a -> b) -> [a] -> [b] map SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto -go [SimpleScript SimpleScriptV1] -s) - go (RequireAnyOf [SimpleScript SimpleScriptV1] -s) = [MultiSig StandardCrypto] -> MultiSig StandardCrypto +go [SimpleScript SimpleScriptV1] +s) + go (RequireAnyOf [SimpleScript SimpleScriptV1] +s) = [MultiSig StandardCrypto] -> MultiSig StandardCrypto forall crypto. Crypto crypto => [MultiSig crypto] -> MultiSig crypto @@ -2378,33 +2378,33 @@ -> [SimpleScript SimpleScriptV1] -> [MultiSig StandardCrypto] forall a b. (a -> b) -> [a] -> [b] map SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto -go [SimpleScript SimpleScriptV1] -s) - go (RequireMOf Int -m [SimpleScript SimpleScriptV1] -s) = Int -> [MultiSig StandardCrypto] -> MultiSig StandardCrypto +go [SimpleScript SimpleScriptV1] +s) + go (RequireMOf Int +m [SimpleScript SimpleScriptV1] +s) = Int -> [MultiSig StandardCrypto] -> MultiSig StandardCrypto forall crypto. Crypto crypto => Int -> [MultiSig crypto] -> MultiSig crypto Shelley.RequireMOf Int -m ((SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto) +m ((SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto) -> [SimpleScript SimpleScriptV1] -> [MultiSig StandardCrypto] forall a b. (a -> b) -> [a] -> [b] map SimpleScript SimpleScriptV1 -> MultiSig StandardCrypto -go [SimpleScript SimpleScriptV1] -s) +go [SimpleScript SimpleScriptV1] +s) -- | Conversion for the 'Shelley.MultiSig' language used by the Shelley era. -- -fromShelleyMultiSig :: Shelley.MultiSig StandardCrypto -> SimpleScript lang +fromShelleyMultiSig :: Shelley.MultiSig StandardCrypto -> SimpleScript lang fromShelleyMultiSig :: MultiSig StandardCrypto -> SimpleScript lang fromShelleyMultiSig = MultiSig StandardCrypto -> SimpleScript lang forall lang. MultiSig StandardCrypto -> SimpleScript lang -go +go where - go :: MultiSig StandardCrypto -> SimpleScript lang -go (Shelley.RequireSignature KeyHash 'Witness StandardCrypto -kh) + go :: MultiSig StandardCrypto -> SimpleScript lang +go (Shelley.RequireSignature KeyHash 'Witness StandardCrypto +kh) = Hash PaymentKey -> SimpleScript lang forall lang. Hash PaymentKey -> SimpleScript lang RequireSignature @@ -2415,49 +2415,49 @@ HasKeyRole a => a r crypto -> a r' crypto Shelley.coerceKeyRole KeyHash 'Witness StandardCrypto -kh)) - go (Shelley.RequireAllOf [MultiSig StandardCrypto] -s) = [SimpleScript lang] -> SimpleScript lang +kh)) + go (Shelley.RequireAllOf [MultiSig StandardCrypto] +s) = [SimpleScript lang] -> SimpleScript lang forall lang. [SimpleScript lang] -> SimpleScript lang RequireAllOf ((MultiSig StandardCrypto -> SimpleScript lang) -> [MultiSig StandardCrypto] -> [SimpleScript lang] forall a b. (a -> b) -> [a] -> [b] map MultiSig StandardCrypto -> SimpleScript lang -go [MultiSig StandardCrypto] -s) - go (Shelley.RequireAnyOf [MultiSig StandardCrypto] -s) = [SimpleScript lang] -> SimpleScript lang +go [MultiSig StandardCrypto] +s) + go (Shelley.RequireAnyOf [MultiSig StandardCrypto] +s) = [SimpleScript lang] -> SimpleScript lang forall lang. [SimpleScript lang] -> SimpleScript lang RequireAnyOf ((MultiSig StandardCrypto -> SimpleScript lang) -> [MultiSig StandardCrypto] -> [SimpleScript lang] forall a b. (a -> b) -> [a] -> [b] map MultiSig StandardCrypto -> SimpleScript lang -go [MultiSig StandardCrypto] -s) - go (Shelley.RequireMOf Int -m [MultiSig StandardCrypto] -s) = Int -> [SimpleScript lang] -> SimpleScript lang +go [MultiSig StandardCrypto] +s) + go (Shelley.RequireMOf Int +m [MultiSig StandardCrypto] +s) = Int -> [SimpleScript lang] -> SimpleScript lang forall lang. Int -> [SimpleScript lang] -> SimpleScript lang RequireMOf Int -m ((MultiSig StandardCrypto -> SimpleScript lang) +m ((MultiSig StandardCrypto -> SimpleScript lang) -> [MultiSig StandardCrypto] -> [SimpleScript lang] forall a b. (a -> b) -> [a] -> [b] map MultiSig StandardCrypto -> SimpleScript lang -go [MultiSig StandardCrypto] -s) +go [MultiSig StandardCrypto] +s) -- | Conversion for the 'Timelock.Timelock' language that is shared between the -- Allegra and Mary eras. -- -toAllegraTimelock :: forall lang. - SimpleScript lang -> Timelock.Timelock StandardCrypto +toAllegraTimelock :: forall lang. + SimpleScript lang -> Timelock.Timelock StandardCrypto toAllegraTimelock :: SimpleScript lang -> Timelock StandardCrypto toAllegraTimelock = SimpleScript lang -> Timelock StandardCrypto -go +go where - go :: SimpleScript lang -> Timelock.Timelock StandardCrypto - go :: SimpleScript lang -> Timelock StandardCrypto -go (RequireSignature (PaymentKeyHash kh)) + go :: SimpleScript lang -> Timelock.Timelock StandardCrypto + go :: SimpleScript lang -> Timelock StandardCrypto +go (RequireSignature (PaymentKeyHash kh)) = KeyHash 'Witness StandardCrypto -> Timelock StandardCrypto forall crypto. Crypto crypto => @@ -2468,9 +2468,9 @@ HasKeyRole a => a r crypto -> a r' crypto Shelley.coerceKeyRole KeyHash 'Payment StandardCrypto -kh) - go (RequireAllOf [SimpleScript lang] -s) = StrictSeq (Timelock StandardCrypto) -> Timelock StandardCrypto +kh) + go (RequireAllOf [SimpleScript lang] +s) = StrictSeq (Timelock StandardCrypto) -> Timelock StandardCrypto forall crypto. Crypto crypto => StrictSeq (Timelock crypto) -> Timelock crypto @@ -2480,10 +2480,10 @@ -> [SimpleScript lang] -> [Timelock StandardCrypto] forall a b. (a -> b) -> [a] -> [b] map SimpleScript lang -> Timelock StandardCrypto -go [SimpleScript lang] -s)) - go (RequireAnyOf [SimpleScript lang] -s) = StrictSeq (Timelock StandardCrypto) -> Timelock StandardCrypto +go [SimpleScript lang] +s)) + go (RequireAnyOf [SimpleScript lang] +s) = StrictSeq (Timelock StandardCrypto) -> Timelock StandardCrypto forall crypto. Crypto crypto => StrictSeq (Timelock crypto) -> Timelock crypto @@ -2493,52 +2493,52 @@ -> [SimpleScript lang] -> [Timelock StandardCrypto] forall a b. (a -> b) -> [a] -> [b] map SimpleScript lang -> Timelock StandardCrypto -go [SimpleScript lang] -s)) - go (RequireMOf Int -m [SimpleScript lang] -s) = Int +go [SimpleScript lang] +s)) + go (RequireMOf Int +m [SimpleScript lang] +s) = Int -> StrictSeq (Timelock StandardCrypto) -> Timelock StandardCrypto forall crypto. Crypto crypto => Int -> StrictSeq (Timelock crypto) -> Timelock crypto Timelock.RequireMOf Int -m ([Timelock StandardCrypto] -> StrictSeq (Timelock StandardCrypto) +m ([Timelock StandardCrypto] -> StrictSeq (Timelock StandardCrypto) forall a. [a] -> StrictSeq a Seq.fromList ((SimpleScript lang -> Timelock StandardCrypto) -> [SimpleScript lang] -> [Timelock StandardCrypto] forall a b. (a -> b) -> [a] -> [b] map SimpleScript lang -> Timelock StandardCrypto -go [SimpleScript lang] -s)) - go (RequireTimeBefore TimeLocksSupported lang -_ SlotNo -t) = SlotNo -> Timelock StandardCrypto +go [SimpleScript lang] +s)) + go (RequireTimeBefore TimeLocksSupported lang +_ SlotNo +t) = SlotNo -> Timelock StandardCrypto forall crypto. Crypto crypto => SlotNo -> Timelock crypto Timelock.RequireTimeExpire SlotNo -t - go (RequireTimeAfter TimeLocksSupported lang -_ SlotNo -t) = SlotNo -> Timelock StandardCrypto +t + go (RequireTimeAfter TimeLocksSupported lang +_ SlotNo +t) = SlotNo -> Timelock StandardCrypto forall crypto. Crypto crypto => SlotNo -> Timelock crypto Timelock.RequireTimeStart SlotNo -t +t -- | Conversion for the 'Timelock.Timelock' language that is shared between the -- Allegra and Mary eras. -- -fromAllegraTimelock :: TimeLocksSupported lang +fromAllegraTimelock :: TimeLocksSupported lang -> Timelock.Timelock StandardCrypto - -> SimpleScript lang + -> SimpleScript lang fromAllegraTimelock :: TimeLocksSupported lang -> Timelock StandardCrypto -> SimpleScript lang -fromAllegraTimelock TimeLocksSupported lang -timelocks = Timelock StandardCrypto -> SimpleScript lang -go +fromAllegraTimelock TimeLocksSupported lang +timelocks = Timelock StandardCrypto -> SimpleScript lang +go where - go :: Timelock StandardCrypto -> SimpleScript lang -go (Timelock.RequireSignature KeyHash 'Witness StandardCrypto -kh) = Hash PaymentKey -> SimpleScript lang + go :: Timelock StandardCrypto -> SimpleScript lang +go (Timelock.RequireSignature KeyHash 'Witness StandardCrypto +kh) = Hash PaymentKey -> SimpleScript lang forall lang. Hash PaymentKey -> SimpleScript lang RequireSignature (KeyHash 'Payment StandardCrypto -> Hash PaymentKey @@ -2548,54 +2548,54 @@ HasKeyRole a => a r crypto -> a r' crypto Shelley.coerceKeyRole KeyHash 'Witness StandardCrypto -kh)) - go (Timelock.RequireTimeExpire SlotNo -t) = TimeLocksSupported lang -> SlotNo -> SimpleScript lang +kh)) + go (Timelock.RequireTimeExpire SlotNo +t) = TimeLocksSupported lang -> SlotNo -> SimpleScript lang forall lang. TimeLocksSupported lang -> SlotNo -> SimpleScript lang RequireTimeBefore TimeLocksSupported lang -timelocks SlotNo -t - go (Timelock.RequireTimeStart SlotNo -t) = TimeLocksSupported lang -> SlotNo -> SimpleScript lang +timelocks SlotNo +t + go (Timelock.RequireTimeStart SlotNo +t) = TimeLocksSupported lang -> SlotNo -> SimpleScript lang forall lang. TimeLocksSupported lang -> SlotNo -> SimpleScript lang RequireTimeAfter TimeLocksSupported lang -timelocks SlotNo -t - go (Timelock.RequireAllOf StrictSeq (Timelock StandardCrypto) -s) = [SimpleScript lang] -> SimpleScript lang +timelocks SlotNo +t + go (Timelock.RequireAllOf StrictSeq (Timelock StandardCrypto) +s) = [SimpleScript lang] -> SimpleScript lang forall lang. [SimpleScript lang] -> SimpleScript lang RequireAllOf ((Timelock StandardCrypto -> SimpleScript lang) -> [Timelock StandardCrypto] -> [SimpleScript lang] forall a b. (a -> b) -> [a] -> [b] map Timelock StandardCrypto -> SimpleScript lang -go (StrictSeq (Timelock StandardCrypto) -> [Timelock StandardCrypto] +go (StrictSeq (Timelock StandardCrypto) -> [Timelock StandardCrypto] forall (t :: * -> *) a. Foldable t => t a -> [a] toList StrictSeq (Timelock StandardCrypto) -s)) - go (Timelock.RequireAnyOf StrictSeq (Timelock StandardCrypto) -s) = [SimpleScript lang] -> SimpleScript lang +s)) + go (Timelock.RequireAnyOf StrictSeq (Timelock StandardCrypto) +s) = [SimpleScript lang] -> SimpleScript lang forall lang. [SimpleScript lang] -> SimpleScript lang RequireAnyOf ((Timelock StandardCrypto -> SimpleScript lang) -> [Timelock StandardCrypto] -> [SimpleScript lang] forall a b. (a -> b) -> [a] -> [b] map Timelock StandardCrypto -> SimpleScript lang -go (StrictSeq (Timelock StandardCrypto) -> [Timelock StandardCrypto] +go (StrictSeq (Timelock StandardCrypto) -> [Timelock StandardCrypto] forall (t :: * -> *) a. Foldable t => t a -> [a] toList StrictSeq (Timelock StandardCrypto) -s)) - go (Timelock.RequireMOf Int -i StrictSeq (Timelock StandardCrypto) -s) = Int -> [SimpleScript lang] -> SimpleScript lang +s)) + go (Timelock.RequireMOf Int +i StrictSeq (Timelock StandardCrypto) +s) = Int -> [SimpleScript lang] -> SimpleScript lang forall lang. Int -> [SimpleScript lang] -> SimpleScript lang RequireMOf Int -i ((Timelock StandardCrypto -> SimpleScript lang) +i ((Timelock StandardCrypto -> SimpleScript lang) -> [Timelock StandardCrypto] -> [SimpleScript lang] forall a b. (a -> b) -> [a] -> [b] map Timelock StandardCrypto -> SimpleScript lang -go (StrictSeq (Timelock StandardCrypto) -> [Timelock StandardCrypto] +go (StrictSeq (Timelock StandardCrypto) -> [Timelock StandardCrypto] forall (t :: * -> *) a. Foldable t => t a -> [a] toList StrictSeq (Timelock StandardCrypto) -s)) +s)) -- ---------------------------------------------------------------------------- @@ -2609,10 +2609,10 @@ -- Because of this the 'Script' type also does not have any JSON instances, but -- the 'SimpleScript' type does. -instance ToJSON (SimpleScript lang) where - toJSON :: SimpleScript lang -> Value -toJSON (RequireSignature Hash PaymentKey -pKeyHash) = +instance ToJSON (SimpleScript lang) where + toJSON :: SimpleScript lang -> Value +toJSON (RequireSignature Hash PaymentKey +pKeyHash) = [Pair] -> Value object [ Text "type" Text -> Value -> Pair @@ -2626,11 +2626,11 @@ .= Hash PaymentKey -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText Hash PaymentKey -pKeyHash +pKeyHash ] toJSON (RequireTimeBefore TimeLocksSupported lang -_ SlotNo -slot) = +_ SlotNo +slot) = [Pair] -> Value object [ Text "type" Text -> Value -> Pair @@ -2642,11 +2642,11 @@ "slot" Text -> SlotNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot +slot ] toJSON (RequireTimeAfter TimeLocksSupported lang -_ SlotNo -slot) = +_ SlotNo +slot) = [Pair] -> Value object [ Text "type" Text -> Value -> Pair @@ -2658,10 +2658,10 @@ "slot" Text -> SlotNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot +slot ] - toJSON (RequireAnyOf [SimpleScript lang] -reqScripts) = + toJSON (RequireAnyOf [SimpleScript lang] +reqScripts) = [Pair] -> Value object [ Text "type" Text -> Value -> Pair @@ -2676,9 +2676,9 @@ map SimpleScript lang -> Value forall a. ToJSON a => a -> Value toJSON [SimpleScript lang] -reqScripts ] - toJSON (RequireAllOf [SimpleScript lang] -reqScripts) = +reqScripts ] + toJSON (RequireAllOf [SimpleScript lang] +reqScripts) = [Pair] -> Value object [ Text "type" Text -> Value -> Pair @@ -2693,10 +2693,10 @@ map SimpleScript lang -> Value forall a. ToJSON a => a -> Value toJSON [SimpleScript lang] -reqScripts ] - toJSON (RequireMOf Int -reqNum [SimpleScript lang] -reqScripts) = +reqScripts ] + toJSON (RequireMOf Int +reqNum [SimpleScript lang] +reqScripts) = [Pair] -> Value object [ Text "type" Text -> Value -> Pair @@ -2708,7 +2708,7 @@ "required" Text -> Int -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Int -reqNum +reqNum , Text "scripts" Text -> [Value] -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2717,13 +2717,13 @@ map SimpleScript lang -> Value forall a. ToJSON a => a -> Value toJSON [SimpleScript lang] -reqScripts +reqScripts ] -instance IsSimpleScriptLanguage lang => FromJSON (SimpleScript lang) where - parseJSON :: Value -> Parser (SimpleScript lang) -parseJSON = SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) +instance IsSimpleScriptLanguage lang => FromJSON (SimpleScript lang) where + parseJSON :: Value -> Parser (SimpleScript lang) +parseJSON = SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) forall lang. SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) parseSimpleScript SimpleScriptVersion lang @@ -2733,15 +2733,15 @@ simpleScriptVersion -parseSimpleScript :: SimpleScriptVersion lang - -> Value -> Aeson.Parser (SimpleScript lang) +parseSimpleScript :: SimpleScriptVersion lang + -> Value -> Aeson.Parser (SimpleScript lang) parseSimpleScript :: SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) -parseSimpleScript SimpleScriptVersion lang -lang Value -v = Value -> Parser (SimpleScript lang) +parseSimpleScript SimpleScriptVersion lang +lang Value +v = Value -> Parser (SimpleScript lang) forall lang. Value -> Parser (SimpleScript lang) parseScriptSig Value -v +v Parser (SimpleScript lang) -> Parser (SimpleScript lang) -> Parser (SimpleScript lang) forall (f :: * -> *) a. Alternative f => f a -> f a -> f a @@ -2749,8 +2749,8 @@ forall lang. SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) parseScriptBefore SimpleScriptVersion lang -lang Value -v +lang Value +v Parser (SimpleScript lang) -> Parser (SimpleScript lang) -> Parser (SimpleScript lang) forall (f :: * -> *) a. Alternative f => f a -> f a -> f a @@ -2758,8 +2758,8 @@ forall lang. SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) parseScriptAfter SimpleScriptVersion lang -lang Value -v +lang Value +v Parser (SimpleScript lang) -> Parser (SimpleScript lang) -> Parser (SimpleScript lang) forall (f :: * -> *) a. Alternative f => f a -> f a -> f a @@ -2767,8 +2767,8 @@ forall lang. SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) parseScriptAny SimpleScriptVersion lang -lang Value -v +lang Value +v Parser (SimpleScript lang) -> Parser (SimpleScript lang) -> Parser (SimpleScript lang) forall (f :: * -> *) a. Alternative f => f a -> f a -> f a @@ -2776,8 +2776,8 @@ forall lang. SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) parseScriptAll SimpleScriptVersion lang -lang Value -v +lang Value +v Parser (SimpleScript lang) -> Parser (SimpleScript lang) -> Parser (SimpleScript lang) forall (f :: * -> *) a. Alternative f => f a -> f a -> f a @@ -2785,14 +2785,14 @@ forall lang. SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) parseScriptAtLeast SimpleScriptVersion lang -lang Value -v +lang Value +v -parseScriptAny :: SimpleScriptVersion lang - -> Value -> Aeson.Parser (SimpleScript lang) +parseScriptAny :: SimpleScriptVersion lang + -> Value -> Aeson.Parser (SimpleScript lang) parseScriptAny :: SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) -parseScriptAny SimpleScriptVersion lang -lang = +parseScriptAny SimpleScriptVersion lang +lang = String -> (Object -> Parser (SimpleScript lang)) -> Value @@ -2805,20 +2805,20 @@ -> Value -> Parser (SimpleScript lang) forall a b. (a -> b) -> a -> b -$ \Object -obj -> do - Text -t <- Object -obj Object -> Text -> Parser Text +$ \Object +obj -> do + Text +t <- Object +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "type" case Text -t :: Text of +t :: Text of Text -"any" -> do Vector Value -vs <- Object -obj Object -> Text -> Parser (Vector Value) +"any" -> do Vector Value +vs <- Object +obj Object -> Text -> Parser (Vector Value) forall a. FromJSON a => Object -> Text -> Parser a .: Text "scripts" @@ -2833,19 +2833,19 @@ SimpleScriptVersion lang -> Vector Value -> Parser [SimpleScript lang] gatherSimpleScriptTerms SimpleScriptVersion lang -lang Vector Value -vs +lang Vector Value +vs Text _ -> String -> Parser (SimpleScript lang) forall (m :: * -> *) a. MonadFail m => String -> m a fail String "\"any\" script value not found" -parseScriptAll :: SimpleScriptVersion lang - -> Value -> Aeson.Parser (SimpleScript lang) +parseScriptAll :: SimpleScriptVersion lang + -> Value -> Aeson.Parser (SimpleScript lang) parseScriptAll :: SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) -parseScriptAll SimpleScriptVersion lang -lang = +parseScriptAll SimpleScriptVersion lang +lang = String -> (Object -> Parser (SimpleScript lang)) -> Value @@ -2858,20 +2858,20 @@ -> Value -> Parser (SimpleScript lang) forall a b. (a -> b) -> a -> b -$ \Object -obj -> do - Text -t <- Object -obj Object -> Text -> Parser Text +$ \Object +obj -> do + Text +t <- Object +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "type" case Text -t :: Text of +t :: Text of Text -"all" -> do Vector Value -vs <- Object -obj Object -> Text -> Parser (Vector Value) +"all" -> do Vector Value +vs <- Object +obj Object -> Text -> Parser (Vector Value) forall a. FromJSON a => Object -> Text -> Parser a .: Text "scripts" @@ -2886,19 +2886,19 @@ SimpleScriptVersion lang -> Vector Value -> Parser [SimpleScript lang] gatherSimpleScriptTerms SimpleScriptVersion lang -lang Vector Value -vs +lang Vector Value +vs Text _ -> String -> Parser (SimpleScript lang) forall (m :: * -> *) a. MonadFail m => String -> m a fail String "\"all\" script value not found" -parseScriptAtLeast :: SimpleScriptVersion lang - -> Value -> Aeson.Parser (SimpleScript lang) +parseScriptAtLeast :: SimpleScriptVersion lang + -> Value -> Aeson.Parser (SimpleScript lang) parseScriptAtLeast :: SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) -parseScriptAtLeast SimpleScriptVersion lang -lang = +parseScriptAtLeast SimpleScriptVersion lang +lang = String -> (Object -> Parser (SimpleScript lang)) -> Value @@ -2911,62 +2911,62 @@ -> Value -> Parser (SimpleScript lang) forall a b. (a -> b) -> a -> b -$ \Object -obj -> do - Text -v <- Object -obj Object -> Text -> Parser Text +$ \Object +obj -> do + Text +v <- Object +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "type" case Text -v :: Text of +v :: Text of Text "atLeast" -> do - Value -r <- Object -obj Object -> Text -> Parser Value + Value +r <- Object +obj Object -> Text -> Parser Value forall a. FromJSON a => Object -> Text -> Parser a .: Text "required" - Vector Value -vs <- Object -obj Object -> Text -> Parser (Vector Value) + Vector Value +vs <- Object +obj Object -> Text -> Parser (Vector Value) forall a. FromJSON a => Object -> Text -> Parser a .: Text "scripts" case Value -r of - Number Scientific -sci -> +r of + Number Scientific +sci -> case Scientific -> Maybe Int forall i. (Integral i, Bounded i) => Scientific -> Maybe i toBoundedInteger Scientific -sci of - Just Int -reqInt -> - do [SimpleScript lang] -scripts <- SimpleScriptVersion lang +sci of + Just Int +reqInt -> + do [SimpleScript lang] +scripts <- SimpleScriptVersion lang -> Vector Value -> Parser [SimpleScript lang] forall lang. SimpleScriptVersion lang -> Vector Value -> Parser [SimpleScript lang] gatherSimpleScriptTerms SimpleScriptVersion lang -lang Vector Value -vs - let numScripts :: Int -numScripts = [SimpleScript lang] -> Int +lang Vector Value +vs + let numScripts :: Int +numScripts = [SimpleScript lang] -> Int forall (t :: * -> *) a. Foldable t => t a -> Int length [SimpleScript lang] -scripts +scripts Bool -> Parser () -> Parser () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Int -reqInt Int -> Int -> Bool +reqInt Int -> Int -> Bool forall a. Ord a => a -> a -> Bool > Int -numScripts) +numScripts) (String -> Parser () forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser ()) -> String -> Parser () @@ -2981,7 +2981,7 @@ <> Int -> String forall a. Show a => a -> String show Int -reqInt +reqInt String -> ShowS forall a. Semigroup a => a -> a -> a <> String @@ -2990,7 +2990,7 @@ <> Int -> String forall a. Show a => a -> String show Int -numScripts) +numScripts) SimpleScript lang -> Parser (SimpleScript lang) forall (m :: * -> *) a. Monad m => a -> m a return (SimpleScript lang -> Parser (SimpleScript lang)) @@ -2999,8 +2999,8 @@ $ Int -> [SimpleScript lang] -> SimpleScript lang forall lang. Int -> [SimpleScript lang] -> SimpleScript lang RequireMOf Int -reqInt [SimpleScript lang] -scripts +reqInt [SimpleScript lang] +scripts Maybe Int Nothing -> String -> Parser (SimpleScript lang) forall (m :: * -> *) a. MonadFail m => String -> m a @@ -3014,7 +3014,7 @@ <> Scientific -> String forall a. Show a => a -> String show Scientific -sci String -> ShowS +sci String -> ShowS forall a. Semigroup a => a -> a -> a <> String " is not a valid Int" @@ -3029,12 +3029,12 @@ fail String "\"atLeast\" script value not found" -gatherSimpleScriptTerms :: SimpleScriptVersion lang - -> Vector Value -> Aeson.Parser [SimpleScript lang] +gatherSimpleScriptTerms :: SimpleScriptVersion lang + -> Vector Value -> Aeson.Parser [SimpleScript lang] gatherSimpleScriptTerms :: SimpleScriptVersion lang -> Vector Value -> Parser [SimpleScript lang] -gatherSimpleScriptTerms SimpleScriptVersion lang -lang = (Value -> Parser (SimpleScript lang)) +gatherSimpleScriptTerms SimpleScriptVersion lang +lang = (Value -> Parser (SimpleScript lang)) -> [Value] -> Parser [SimpleScript lang] forall (t :: * -> *) (m :: * -> *) a b. (Traversable t, Monad m) => @@ -3043,7 +3043,7 @@ forall lang. SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) parseSimpleScript SimpleScriptVersion lang -lang) ([Value] -> Parser [SimpleScript lang]) +lang) ([Value] -> Parser [SimpleScript lang]) -> (Vector Value -> [Value]) -> Vector Value -> Parser [SimpleScript lang] @@ -3052,7 +3052,7 @@ forall a. Vector a -> [a] Vector.toList -parseScriptSig :: Value -> Aeson.Parser (SimpleScript lang) +parseScriptSig :: Value -> Aeson.Parser (SimpleScript lang) parseScriptSig :: Value -> Parser (SimpleScript lang) parseScriptSig = String @@ -3067,20 +3067,20 @@ -> Value -> Parser (SimpleScript lang) forall a b. (a -> b) -> a -> b -$ \Object -obj -> do - Text -v <- Object -obj Object -> Text -> Parser Text +$ \Object +obj -> do + Text +v <- Object +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "type" case Text -v :: Text of +v :: Text of Text -"sig" -> do Text -k <- Object -obj Object -> Text -> Parser Text +"sig" -> do Text +k <- Object +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "keyHash" @@ -3091,18 +3091,18 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Text -> Parser (Hash PaymentKey) parsePaymentKeyHash Text -k +k Text _ -> String -> Parser (SimpleScript lang) forall (m :: * -> *) a. MonadFail m => String -> m a fail String "\"sig\" script value not found" -parseScriptBefore :: SimpleScriptVersion lang - -> Value -> Aeson.Parser (SimpleScript lang) +parseScriptBefore :: SimpleScriptVersion lang + -> Value -> Aeson.Parser (SimpleScript lang) parseScriptBefore :: SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) -parseScriptBefore SimpleScriptVersion lang -lang = +parseScriptBefore SimpleScriptVersion lang +lang = String -> (Object -> Parser (SimpleScript lang)) -> Value @@ -3115,32 +3115,32 @@ -> Value -> Parser (SimpleScript lang) forall a b. (a -> b) -> a -> b -$ \Object -obj -> do - Text -v <- Object -obj Object -> Text -> Parser Text +$ \Object +obj -> do + Text +v <- Object +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "type" case Text -v :: Text of +v :: Text of Text "before" -> case SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) forall lang. SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) timeLocksSupported SimpleScriptVersion lang -lang of - Just TimeLocksSupported lang -supported -> TimeLocksSupported lang -> SlotNo -> SimpleScript lang +lang of + Just TimeLocksSupported lang +supported -> TimeLocksSupported lang -> SlotNo -> SimpleScript lang forall lang. TimeLocksSupported lang -> SlotNo -> SimpleScript lang RequireTimeBefore TimeLocksSupported lang -supported (SlotNo -> SimpleScript lang) +supported (SlotNo -> SimpleScript lang) -> Parser SlotNo -> Parser (SimpleScript lang) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -obj Object -> Text -> Parser SlotNo +obj Object -> Text -> Parser SlotNo forall a. FromJSON a => Object -> Text -> Parser a .: Text "slot" @@ -3153,18 +3153,18 @@ ++ SimpleScriptVersion lang -> String forall a. Show a => a -> String show SimpleScriptVersion lang -lang) +lang) Text _ -> String -> Parser (SimpleScript lang) forall (m :: * -> *) a. MonadFail m => String -> m a fail String "\"before\" script value not found" -parseScriptAfter :: SimpleScriptVersion lang - -> Value -> Aeson.Parser (SimpleScript lang) +parseScriptAfter :: SimpleScriptVersion lang + -> Value -> Aeson.Parser (SimpleScript lang) parseScriptAfter :: SimpleScriptVersion lang -> Value -> Parser (SimpleScript lang) -parseScriptAfter SimpleScriptVersion lang -lang = +parseScriptAfter SimpleScriptVersion lang +lang = String -> (Object -> Parser (SimpleScript lang)) -> Value @@ -3177,32 +3177,32 @@ -> Value -> Parser (SimpleScript lang) forall a b. (a -> b) -> a -> b -$ \Object -obj -> do - Text -v <- Object -obj Object -> Text -> Parser Text +$ \Object +obj -> do + Text +v <- Object +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "type" case Text -v :: Text of +v :: Text of Text "after" -> case SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) forall lang. SimpleScriptVersion lang -> Maybe (TimeLocksSupported lang) timeLocksSupported SimpleScriptVersion lang -lang of - Just TimeLocksSupported lang -supported -> TimeLocksSupported lang -> SlotNo -> SimpleScript lang +lang of + Just TimeLocksSupported lang +supported -> TimeLocksSupported lang -> SlotNo -> SimpleScript lang forall lang. TimeLocksSupported lang -> SlotNo -> SimpleScript lang RequireTimeAfter TimeLocksSupported lang -supported (SlotNo -> SimpleScript lang) +supported (SlotNo -> SimpleScript lang) -> Parser SlotNo -> Parser (SimpleScript lang) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -obj Object -> Text -> Parser SlotNo +obj Object -> Text -> Parser SlotNo forall a. FromJSON a => Object -> Text -> Parser a .: Text "slot" @@ -3215,7 +3215,7 @@ ++ SimpleScriptVersion lang -> String forall a. Show a => a -> String show SimpleScriptVersion lang -lang) +lang) Text _ -> String -> Parser (SimpleScript lang) forall (m :: * -> *) a. MonadFail m => String -> m a @@ -3224,8 +3224,8 @@ parsePaymentKeyHash :: Text -> Aeson.Parser (Hash PaymentKey) parsePaymentKeyHash :: Text -> Parser (Hash PaymentKey) -parsePaymentKeyHash Text -txt = +parsePaymentKeyHash Text +txt = case AsType (Hash PaymentKey) -> ByteString -> Maybe (Hash PaymentKey) forall a. SerialiseAsRawBytes a => @@ -3235,12 +3235,12 @@ AsHash AsType PaymentKey AsPaymentKey) (Text -> ByteString Text.encodeUtf8 Text -txt) of - Just Hash PaymentKey -payKeyHash -> Hash PaymentKey -> Parser (Hash PaymentKey) +txt) of + Just Hash PaymentKey +payKeyHash -> Hash PaymentKey -> Parser (Hash PaymentKey) forall (m :: * -> *) a. Monad m => a -> m a return Hash PaymentKey -payKeyHash +payKeyHash Maybe (Hash PaymentKey) Nothing -> String -> Parser (Hash PaymentKey) forall (m :: * -> *) a. MonadFail m => String -> m a @@ -3252,5 +3252,5 @@ forall a. Semigroup a => a -> a -> a <> Text -> String Text.unpack Text -txt +txt \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.ScriptData.html b/cardano-api/src/Cardano.Api.ScriptData.html index 9e283b33e9f..3a7fc7f3bc7 100644 --- a/cardano-api/src/Cardano.Api.ScriptData.html +++ b/cardano-api/src/Cardano.Api.ScriptData.html @@ -81,7 +81,7 @@ | ScriptDataList [ScriptData] | ScriptDataNumber Integer | ScriptDataBytes BS.ByteString - deriving (ScriptData -> ScriptData -> Bool + deriving (ScriptData -> ScriptData -> Bool (ScriptData -> ScriptData -> Bool) -> (ScriptData -> ScriptData -> Bool) -> Eq ScriptData forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -89,7 +89,7 @@ $c/= :: ScriptData -> ScriptData -> Bool == :: ScriptData -> ScriptData -> Bool $c== :: ScriptData -> ScriptData -> Bool -Eq, Eq ScriptData +Eq, Eq ScriptData Eq ScriptData -> (ScriptData -> ScriptData -> Ordering) -> (ScriptData -> ScriptData -> Bool) @@ -127,7 +127,7 @@ compare :: ScriptData -> ScriptData -> Ordering $ccompare :: ScriptData -> ScriptData -> Ordering $cp1Ord :: Eq ScriptData -Ord, Int -> ScriptData -> ShowS +Ord, Int -> ScriptData -> ShowS [ScriptData] -> ShowS ScriptData -> String (Int -> ScriptData -> ShowS) @@ -149,7 +149,7 @@ instance HasTypeProxy ScriptData where data AsType ScriptData = AsScriptData - proxyToAsType :: Proxy ScriptData -> AsType ScriptData + proxyToAsType :: Proxy ScriptData -> AsType ScriptData proxyToAsType Proxy ScriptData _ = AsType ScriptData AsScriptData @@ -161,7 +161,7 @@ newtype instance Hash ScriptData = ScriptDataHash (Alonzo.DataHash StandardCrypto) - deriving stock (Hash ScriptData -> Hash ScriptData -> Bool + deriving stock (Hash ScriptData -> Hash ScriptData -> Bool (Hash ScriptData -> Hash ScriptData -> Bool) -> (Hash ScriptData -> Hash ScriptData -> Bool) -> Eq (Hash ScriptData) @@ -170,7 +170,7 @@ $c/= :: Hash ScriptData -> Hash ScriptData -> Bool == :: Hash ScriptData -> Hash ScriptData -> Bool $c== :: Hash ScriptData -> Hash ScriptData -> Bool -Eq, Eq (Hash ScriptData) +Eq, Eq (Hash ScriptData) Eq (Hash ScriptData) -> (Hash ScriptData -> Hash ScriptData -> Ordering) -> (Hash ScriptData -> Hash ScriptData -> Bool) @@ -209,7 +209,7 @@ $ccompare :: Hash ScriptData -> Hash ScriptData -> Ordering $cp1Ord :: Eq (Hash ScriptData) Ord) - deriving (Int -> Hash ScriptData -> ShowS + deriving (Int -> Hash ScriptData -> ShowS [Hash ScriptData] -> ShowS Hash ScriptData -> String (Int -> Hash ScriptData -> ShowS) @@ -224,7 +224,7 @@ $cshow :: Hash ScriptData -> String showsPrec :: Int -> Hash ScriptData -> ShowS $cshowsPrec :: Int -> Hash ScriptData -> ShowS -Show, String -> Hash ScriptData +Show, String -> Hash ScriptData (String -> Hash ScriptData) -> IsString (Hash ScriptData) forall a. (String -> a) -> IsString a fromString :: String -> Hash ScriptData @@ -232,19 +232,19 @@ IsString) via UsingRawBytesHex (Hash ScriptData) instance SerialiseAsRawBytes (Hash ScriptData) where - serialiseToRawBytes :: Hash ScriptData -> ByteString -serialiseToRawBytes (ScriptDataHash dh) = + serialiseToRawBytes :: Hash ScriptData -> ByteString +serialiseToRawBytes (ScriptDataHash dh) = Hash Blake2b_256 EraIndependentData -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes (SafeHash StandardCrypto EraIndependentData -> Hash (HASH StandardCrypto) EraIndependentData forall crypto i. SafeHash crypto i -> Hash (HASH crypto) i Ledger.extractHash SafeHash StandardCrypto EraIndependentData -dh) +dh) - deserialiseFromRawBytes :: AsType (Hash ScriptData) -> ByteString -> Maybe (Hash ScriptData) -deserialiseFromRawBytes (AsHash AsScriptData) ByteString -bs = + deserialiseFromRawBytes :: AsType (Hash ScriptData) -> ByteString -> Maybe (Hash ScriptData) +deserialiseFromRawBytes (AsHash AsScriptData) ByteString +bs = SafeHash StandardCrypto EraIndependentData -> Hash ScriptData ScriptDataHash (SafeHash StandardCrypto EraIndependentData -> Hash ScriptData) -> (Hash Blake2b_256 EraIndependentData @@ -263,10 +263,10 @@ <$> ByteString -> Maybe (Hash Blake2b_256 EraIndependentData) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs -instance ToJSON (Hash ScriptData) where - toJSON :: Hash ScriptData -> Value +instance ToJSON (Hash ScriptData) where + toJSON :: Hash ScriptData -> Value toJSON = Text -> Value forall a. ToJSON a => a -> Value toJSON (Text -> Value) @@ -276,8 +276,8 @@ forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText -instance Aeson.ToJSONKey (Hash ScriptData) where - toJSONKey :: ToJSONKeyFunction (Hash ScriptData) +instance Aeson.ToJSONKey (Hash ScriptData) where + toJSONKey :: ToJSONKeyFunction (Hash ScriptData) toJSONKey = (Hash ScriptData -> Text) -> ToJSONKeyFunction (Hash ScriptData) forall a. (a -> Text) -> ToJSONKeyFunction a Aeson.toJSONKeyText Hash ScriptData -> Text @@ -289,7 +289,7 @@ -- Conversion functions -- -toAlonzoData :: ScriptData -> Alonzo.Data ledgerera +toAlonzoData :: ScriptData -> Alonzo.Data ledgerera toAlonzoData :: ScriptData -> Data ledgerera toAlonzoData = Data -> Data ledgerera forall era. Data -> Data era @@ -299,7 +299,7 @@ . ScriptData -> Data toPlutusData -fromAlonzoData :: Alonzo.Data ledgerera -> ScriptData +fromAlonzoData :: Alonzo.Data ledgerera -> ScriptData fromAlonzoData :: Data ledgerera -> ScriptData fromAlonzoData = Data -> ScriptData fromPlutusData (Data -> ScriptData) @@ -312,88 +312,88 @@ toPlutusData :: ScriptData -> Plutus.Data toPlutusData :: ScriptData -> Data -toPlutusData (ScriptDataConstructor Integer -int [ScriptData] -xs) +toPlutusData (ScriptDataConstructor Integer +int [ScriptData] +xs) = Integer -> [Data] -> Data Plutus.Constr Integer -int +int [ ScriptData -> Data toPlutusData ScriptData -x | ScriptData -x <- [ScriptData] -xs ] -toPlutusData (ScriptDataMap [(ScriptData, ScriptData)] -kvs) = [(Data, Data)] -> Data +x | ScriptData +x <- [ScriptData] +xs ] +toPlutusData (ScriptDataMap [(ScriptData, ScriptData)] +kvs) = [(Data, Data)] -> Data Plutus.Map [ (ScriptData -> Data toPlutusData ScriptData -k, ScriptData -> Data +k, ScriptData -> Data toPlutusData ScriptData -v) - | (ScriptData -k,ScriptData -v) <- [(ScriptData, ScriptData)] -kvs ] -toPlutusData (ScriptDataList [ScriptData] -xs) = [Data] -> Data +v) + | (ScriptData +k,ScriptData +v) <- [(ScriptData, ScriptData)] +kvs ] +toPlutusData (ScriptDataList [ScriptData] +xs) = [Data] -> Data Plutus.List [ ScriptData -> Data toPlutusData ScriptData -x | ScriptData -x <- [ScriptData] -xs ] -toPlutusData (ScriptDataNumber Integer -n) = Integer -> Data +x | ScriptData +x <- [ScriptData] +xs ] +toPlutusData (ScriptDataNumber Integer +n) = Integer -> Data Plutus.I Integer -n -toPlutusData (ScriptDataBytes ByteString -bs) = ByteString -> Data +n +toPlutusData (ScriptDataBytes ByteString +bs) = ByteString -> Data Plutus.B ByteString -bs +bs fromPlutusData :: Plutus.Data -> ScriptData fromPlutusData :: Data -> ScriptData -fromPlutusData (Plutus.Constr Integer -int [Data] -xs) +fromPlutusData (Plutus.Constr Integer +int [Data] +xs) = Integer -> [ScriptData] -> ScriptData ScriptDataConstructor Integer -int +int [ Data -> ScriptData fromPlutusData Data -x | Data -x <- [Data] -xs ] -fromPlutusData (Plutus.Map [(Data, Data)] -kvs) = [(ScriptData, ScriptData)] -> ScriptData +x | Data +x <- [Data] +xs ] +fromPlutusData (Plutus.Map [(Data, Data)] +kvs) = [(ScriptData, ScriptData)] -> ScriptData ScriptDataMap [ (Data -> ScriptData fromPlutusData Data -k, Data -> ScriptData +k, Data -> ScriptData fromPlutusData Data -v) - | (Data -k,Data -v) <- [(Data, Data)] -kvs ] -fromPlutusData (Plutus.List [Data] -xs) = [ScriptData] -> ScriptData +v) + | (Data +k,Data +v) <- [(Data, Data)] +kvs ] +fromPlutusData (Plutus.List [Data] +xs) = [ScriptData] -> ScriptData ScriptDataList [ Data -> ScriptData fromPlutusData Data -x | Data -x <- [Data] -xs ] -fromPlutusData (Plutus.I Integer -n) = Integer -> ScriptData +x | Data +x <- [Data] +xs ] +fromPlutusData (Plutus.I Integer +n) = Integer -> ScriptData ScriptDataNumber Integer -n -fromPlutusData (Plutus.B ByteString -bs) = ByteString -> ScriptData +n +fromPlutusData (Plutus.B ByteString +bs) = ByteString -> ScriptData ScriptDataBytes ByteString -bs +bs -- ---------------------------------------------------------------------------- @@ -405,30 +405,30 @@ -- validateScriptData :: ScriptData -> Either ScriptDataRangeError () validateScriptData :: ScriptData -> Either ScriptDataRangeError () -validateScriptData ScriptData -d = +validateScriptData ScriptData +d = case ScriptData -> [ScriptDataRangeError] -collect ScriptData -d of +collect ScriptData +d of [] -> () -> Either ScriptDataRangeError () forall a b. b -> Either a b Right () - ScriptDataRangeError -err:[ScriptDataRangeError] + ScriptDataRangeError +err:[ScriptDataRangeError] _ -> ScriptDataRangeError -> Either ScriptDataRangeError () forall a b. a -> Either a b Left ScriptDataRangeError -err +err where -- collect all errors in a monoidal fold style: - collect :: ScriptData -> [ScriptDataRangeError] -collect (ScriptDataNumber Integer -n) = + collect :: ScriptData -> [ScriptDataRangeError] +collect (ScriptDataNumber Integer +n) = [ Integer -> ScriptDataRangeError ScriptDataNumberOutOfRange Integer -n +n | Integer -n Integer -> Integer -> Bool +n Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool > Word64 -> Integer forall a b. (Integral a, Num b) => a -> b @@ -437,7 +437,7 @@ maxBound :: Word64) Bool -> Bool -> Bool || Integer -n Integer -> Integer -> Bool +n Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool < Integer -> Integer forall a. Num a => a -> a @@ -447,61 +447,61 @@ forall a. Bounded a => a maxBound :: Word64)) ] - collect (ScriptDataBytes ByteString -bs) = + collect (ScriptDataBytes ByteString +bs) = [ Int -> ScriptDataRangeError ScriptDataBytesTooLong Int -len - | let len :: Int -len = ByteString -> Int +len + | let len :: Int +len = ByteString -> Int BS.length ByteString -bs +bs , Int -len Int -> Int -> Bool +len Int -> Int -> Bool forall a. Ord a => a -> a -> Bool > Int scriptDataByteStringMaxLength ] - collect (ScriptDataList [ScriptData] -xs) = + collect (ScriptDataList [ScriptData] +xs) = (ScriptData -> [ScriptDataRangeError]) -> [ScriptData] -> [ScriptDataRangeError] forall (t :: * -> *) m a. (Foldable t, Monoid m) => (a -> m) -> t a -> m foldMap ScriptData -> [ScriptDataRangeError] -collect [ScriptData] -xs +collect [ScriptData] +xs - collect (ScriptDataMap [(ScriptData, ScriptData)] -kvs) = + collect (ScriptDataMap [(ScriptData, ScriptData)] +kvs) = ((ScriptData, ScriptData) -> [ScriptDataRangeError]) -> [(ScriptData, ScriptData)] -> [ScriptDataRangeError] forall (t :: * -> *) m a. (Foldable t, Monoid m) => (a -> m) -> t a -> m -foldMap (\(ScriptData -k, ScriptData -v) -> ScriptData -> [ScriptDataRangeError] -collect ScriptData -k +foldMap (\(ScriptData +k, ScriptData +v) -> ScriptData -> [ScriptDataRangeError] +collect ScriptData +k [ScriptDataRangeError] -> [ScriptDataRangeError] -> [ScriptDataRangeError] forall a. Semigroup a => a -> a -> a <> ScriptData -> [ScriptDataRangeError] -collect ScriptData -v) +collect ScriptData +v) [(ScriptData, ScriptData)] -kvs +kvs - collect (ScriptDataConstructor Integer -n [ScriptData] -xs) = + collect (ScriptDataConstructor Integer +n [ScriptData] +xs) = [ Integer -> ScriptDataRangeError ScriptDataConstructorOutOfRange Integer -n +n | Integer -n Integer -> Integer -> Bool +n Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool > Word64 -> Integer forall a b. (Integral a, Num b) => a -> b @@ -509,7 +509,7 @@ forall a. Bounded a => a maxBound :: Word64) Bool -> Bool -> Bool || Integer -n Integer -> Integer -> Bool +n Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool < Integer 0 ] @@ -522,8 +522,8 @@ (Foldable t, Monoid m) => (a -> m) -> t a -> m foldMap ScriptData -> [ScriptDataRangeError] -collect [ScriptData] -xs +collect [ScriptData] +xs -- | The maximum length of a script data byte string value. @@ -549,7 +549,7 @@ -- 64 bytes. -- | ScriptDataBytesTooLong !Int - deriving (ScriptDataRangeError -> ScriptDataRangeError -> Bool + deriving (ScriptDataRangeError -> ScriptDataRangeError -> Bool (ScriptDataRangeError -> ScriptDataRangeError -> Bool) -> (ScriptDataRangeError -> ScriptDataRangeError -> Bool) -> Eq ScriptDataRangeError @@ -558,7 +558,7 @@ $c/= :: ScriptDataRangeError -> ScriptDataRangeError -> Bool == :: ScriptDataRangeError -> ScriptDataRangeError -> Bool $c== :: ScriptDataRangeError -> ScriptDataRangeError -> Bool -Eq, Int -> ScriptDataRangeError -> ShowS +Eq, Int -> ScriptDataRangeError -> ShowS [ScriptDataRangeError] -> ShowS ScriptDataRangeError -> String (Int -> ScriptDataRangeError -> ShowS) @@ -576,9 +576,9 @@ Show) instance Error ScriptDataRangeError where - displayError :: ScriptDataRangeError -> String -displayError (ScriptDataNumberOutOfRange Integer -n) = + displayError :: ScriptDataRangeError -> String +displayError (ScriptDataNumberOutOfRange Integer +n) = String "Number in script data value " String -> ShowS @@ -586,13 +586,13 @@ <> Integer -> String forall a. Show a => a -> String show Integer -n +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String " is outside the range -(2^64-1) .. 2^64-1." - displayError (ScriptDataConstructorOutOfRange Integer -n) = + displayError (ScriptDataConstructorOutOfRange Integer +n) = String "Constructor numbers in script data value " String -> ShowS @@ -600,13 +600,13 @@ <> Integer -> String forall a. Show a => a -> String show Integer -n +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String " is outside the range 0 .. 2^64-1." - displayError (ScriptDataBytesTooLong Int -actualLen) = + displayError (ScriptDataBytesTooLong Int +actualLen) = String "Byte strings in script data must consist of at most " String -> ShowS @@ -624,7 +624,7 @@ <> Int -> String forall a. Show a => a -> String show Int -actualLen +actualLen String -> ShowS forall a. Semigroup a => a -> a -> a <> String @@ -693,7 +693,7 @@ -- | Use the \"detailed schema\" mapping between JSON and script data as -- described above. | ScriptDataJsonDetailedSchema - deriving (ScriptDataJsonSchema -> ScriptDataJsonSchema -> Bool + deriving (ScriptDataJsonSchema -> ScriptDataJsonSchema -> Bool (ScriptDataJsonSchema -> ScriptDataJsonSchema -> Bool) -> (ScriptDataJsonSchema -> ScriptDataJsonSchema -> Bool) -> Eq ScriptDataJsonSchema @@ -702,7 +702,7 @@ $c/= :: ScriptDataJsonSchema -> ScriptDataJsonSchema -> Bool == :: ScriptDataJsonSchema -> ScriptDataJsonSchema -> Bool $c== :: ScriptDataJsonSchema -> ScriptDataJsonSchema -> Bool -Eq, Int -> ScriptDataJsonSchema -> ShowS +Eq, Int -> ScriptDataJsonSchema -> ShowS [ScriptDataJsonSchema] -> ShowS ScriptDataJsonSchema -> String (Int -> ScriptDataJsonSchema -> ShowS) @@ -731,11 +731,11 @@ -> Either ScriptDataJsonError ScriptData scriptDataFromJson :: ScriptDataJsonSchema -> Value -> Either ScriptDataJsonError ScriptData -scriptDataFromJson ScriptDataJsonSchema -schema Value -v = do - ScriptData -d <- (ScriptDataJsonSchemaError -> ScriptDataJsonError) +scriptDataFromJson ScriptDataJsonSchema +schema Value +v = do + ScriptData +d <- (ScriptDataJsonSchemaError -> ScriptDataJsonError) -> Either ScriptDataJsonSchemaError ScriptData -> Either ScriptDataJsonError ScriptData forall (p :: * -> * -> *) a b c. @@ -743,9 +743,9 @@ (a -> b) -> p a c -> p b c first (Value -> ScriptDataJsonSchemaError -> ScriptDataJsonError ScriptDataJsonSchemaError Value -v) (Value -> Either ScriptDataJsonSchemaError ScriptData -scriptDataFromJson' Value -v) +v) (Value -> Either ScriptDataJsonSchemaError ScriptData +scriptDataFromJson' Value +v) (ScriptDataRangeError -> ScriptDataJsonError) -> Either ScriptDataRangeError () -> Either ScriptDataJsonError () forall (p :: * -> * -> *) a b c. @@ -753,18 +753,18 @@ (a -> b) -> p a c -> p b c first (Value -> ScriptDataRangeError -> ScriptDataJsonError ScriptDataRangeError Value -v) (ScriptData -> Either ScriptDataRangeError () +v) (ScriptData -> Either ScriptDataRangeError () validateScriptData ScriptData -d) +d) ScriptData -> Either ScriptDataJsonError ScriptData forall (m :: * -> *) a. Monad m => a -> m a return ScriptData -d +d where - scriptDataFromJson' :: Value -> Either ScriptDataJsonSchemaError ScriptData -scriptDataFromJson' = + scriptDataFromJson' :: Value -> Either ScriptDataJsonSchemaError ScriptData +scriptDataFromJson' = case ScriptDataJsonSchema -schema of +schema of ScriptDataJsonSchema ScriptDataJsonNoSchema -> Value -> Either ScriptDataJsonSchemaError ScriptData scriptDataFromJsonNoSchema @@ -784,10 +784,10 @@ -> ScriptData -> Aeson.Value scriptDataToJson :: ScriptDataJsonSchema -> ScriptData -> Value -scriptDataToJson ScriptDataJsonSchema -schema = +scriptDataToJson ScriptDataJsonSchema +schema = case ScriptDataJsonSchema -schema of +schema of ScriptDataJsonSchema ScriptDataJsonNoSchema -> ScriptData -> Value scriptDataToJsonNoSchema @@ -803,29 +803,29 @@ scriptDataToJsonNoSchema :: ScriptData -> Aeson.Value scriptDataToJsonNoSchema :: ScriptData -> Value scriptDataToJsonNoSchema = ScriptData -> Value -conv +conv where - conv :: ScriptData -> Aeson.Value - conv :: ScriptData -> Value -conv (ScriptDataNumber Integer -n) = Scientific -> Value + conv :: ScriptData -> Aeson.Value + conv :: ScriptData -> Value +conv (ScriptDataNumber Integer +n) = Scientific -> Value Aeson.Number (Integer -> Scientific forall a. Num a => Integer -> a fromInteger Integer -n) - conv (ScriptDataBytes ByteString -bs) - | Right Text -s <- ByteString -> Either UnicodeException Text +n) + conv (ScriptDataBytes ByteString +bs) + | Right Text +s <- ByteString -> Either UnicodeException Text Text.decodeUtf8' ByteString -bs +bs , (Char -> Bool) -> Text -> Bool Text.all Char -> Bool Char.isPrint Text -s +s = Text -> Value Aeson.String Text -s +s | Bool otherwise @@ -836,33 +836,33 @@ <> ByteString -> Text Text.decodeLatin1 (ByteString -> ByteString Base16.encode ByteString -bs)) +bs)) - conv (ScriptDataList [ScriptData] -vs) = Array -> Value + conv (ScriptDataList [ScriptData] +vs) = Array -> Value Aeson.Array ([Value] -> Array forall a. [a] -> Vector a Vector.fromList ((ScriptData -> Value) -> [ScriptData] -> [Value] forall a b. (a -> b) -> [a] -> [b] map ScriptData -> Value -conv [ScriptData] -vs)) - conv (ScriptDataMap [(ScriptData, ScriptData)] -kvs) = [Pair] -> Value +conv [ScriptData] +vs)) + conv (ScriptDataMap [(ScriptData, ScriptData)] +kvs) = [Pair] -> Value Aeson.object [ (ScriptData -> Text -convKey ScriptData -k, ScriptData -> Value -conv ScriptData -v) - | (ScriptData -k, ScriptData -v) <- [(ScriptData, ScriptData)] -kvs ] +convKey ScriptData +k, ScriptData -> Value +conv ScriptData +v) + | (ScriptData +k, ScriptData +v) <- [(ScriptData, ScriptData)] +kvs ] - conv (ScriptDataConstructor Integer -n [ScriptData] -vs) = + conv (ScriptDataConstructor Integer +n [ScriptData] +vs) = Array -> Value Aeson.Array (Array -> Value) -> Array -> Value forall a b. (a -> b) -> a -> b @@ -874,40 +874,40 @@ Aeson.Number (Integer -> Scientific forall a. Num a => Integer -> a fromInteger Integer -n) +n) , Array -> Value Aeson.Array ([Value] -> Array forall a. [a] -> Vector a Vector.fromList ((ScriptData -> Value) -> [ScriptData] -> [Value] forall a b. (a -> b) -> [a] -> [b] map ScriptData -> Value -conv [ScriptData] -vs)) +conv [ScriptData] +vs)) ] -- Script data allows any value as a key, not just string as JSON does. -- For simple types we just convert them to string dirctly. -- For structured keys we render them as JSON and use that as the string. - convKey :: ScriptData -> Text - convKey :: ScriptData -> Text -convKey (ScriptDataNumber Integer -n) = String -> Text + convKey :: ScriptData -> Text + convKey :: ScriptData -> Text +convKey (ScriptDataNumber Integer +n) = String -> Text Text.pack (Integer -> String forall a. Show a => a -> String show Integer -n) - convKey (ScriptDataBytes ByteString -bs) = Text +n) + convKey (ScriptDataBytes ByteString +bs) = Text bytesPrefix Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> ByteString -> Text Text.decodeLatin1 (ByteString -> ByteString Base16.encode ByteString -bs) - convKey ScriptData -v = Text -> Text +bs) + convKey ScriptData +v = Text -> Text Text.Lazy.toStrict (Text -> Text) -> (ScriptData -> Text) -> ScriptData -> Text forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -917,88 +917,88 @@ (Value -> Text) -> (ScriptData -> Value) -> ScriptData -> Text forall b c a. (b -> c) -> (a -> b) -> a -> c . ScriptData -> Value -conv +conv (ScriptData -> Text) -> ScriptData -> Text forall a b. (a -> b) -> a -> b $ ScriptData -v +v scriptDataFromJsonNoSchema :: Aeson.Value -> Either ScriptDataJsonSchemaError ScriptData scriptDataFromJsonNoSchema :: Value -> Either ScriptDataJsonSchemaError ScriptData scriptDataFromJsonNoSchema = Value -> Either ScriptDataJsonSchemaError ScriptData -conv +conv where - conv :: Aeson.Value + conv :: Aeson.Value -> Either ScriptDataJsonSchemaError ScriptData - conv :: Value -> Either ScriptDataJsonSchemaError ScriptData -conv Value + conv :: Value -> Either ScriptDataJsonSchemaError ScriptData +conv Value Aeson.Null = ScriptDataJsonSchemaError -> Either ScriptDataJsonSchemaError ScriptData forall a b. a -> Either a b Left ScriptDataJsonSchemaError ScriptDataJsonNullNotAllowed - conv Aeson.Bool{} = ScriptDataJsonSchemaError + conv Aeson.Bool{} = ScriptDataJsonSchemaError -> Either ScriptDataJsonSchemaError ScriptData forall a b. a -> Either a b Left ScriptDataJsonSchemaError ScriptDataJsonBoolNotAllowed - conv (Aeson.Number Scientific -d) = + conv (Aeson.Number Scientific +d) = case Scientific -> Either Double Integer forall r i. (RealFloat r, Integral i) => Scientific -> Either r i Scientific.floatingOrInteger Scientific -d :: Either Double Integer of - Left Double -n -> ScriptDataJsonSchemaError +d :: Either Double Integer of + Left Double +n -> ScriptDataJsonSchemaError -> Either ScriptDataJsonSchemaError ScriptData forall a b. a -> Either a b Left (Double -> ScriptDataJsonSchemaError ScriptDataJsonNumberNotInteger Double -n) - Right Integer -n -> ScriptData -> Either ScriptDataJsonSchemaError ScriptData +n) + Right Integer +n -> ScriptData -> Either ScriptDataJsonSchemaError ScriptData forall a b. b -> Either a b Right (Integer -> ScriptData ScriptDataNumber Integer -n) +n) - conv (Aeson.String Text -s) - | Just Text -s' <- Text -> Text -> Maybe Text + conv (Aeson.String Text +s) + | Just Text +s' <- Text -> Text -> Maybe Text Text.stripPrefix Text bytesPrefix Text -s - , let bs' :: ByteString -bs' = Text -> ByteString +s + , let bs' :: ByteString +bs' = Text -> ByteString Text.encodeUtf8 Text -s' - , Right ByteString -bs <- ByteString -> Either String ByteString +s' + , Right ByteString +bs <- ByteString -> Either String ByteString Base16.decode ByteString -bs' +bs' , Bool -> Bool not ((Char -> Bool) -> ByteString -> Bool -BSC.any (\Char -c -> Char -c Char -> Char -> Bool +BSC.any (\Char +c -> Char +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool >= Char 'A' Bool -> Bool -> Bool && Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool <= Char 'F') ByteString -bs') +bs') = ScriptData -> Either ScriptDataJsonSchemaError ScriptData forall a b. b -> Either a b Right (ByteString -> ScriptData ScriptDataBytes ByteString -bs) +bs) | Bool otherwise @@ -1007,10 +1007,10 @@ Right (ByteString -> ScriptData ScriptDataBytes (Text -> ByteString Text.encodeUtf8 Text -s)) +s)) - conv (Aeson.Array Array -vs) = + conv (Aeson.Array Array +vs) = ([ScriptData] -> ScriptData) -> Either ScriptDataJsonSchemaError [ScriptData] -> Either ScriptDataJsonSchemaError ScriptData @@ -1029,17 +1029,17 @@ (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse Value -> Either ScriptDataJsonSchemaError ScriptData -conv +conv ([Value] -> Either ScriptDataJsonSchemaError ScriptData) -> [Value] -> Either ScriptDataJsonSchemaError ScriptData forall a b. (a -> b) -> a -> b $ Array -> [Value] forall a. Vector a -> [a] Vector.toList Array -vs +vs - conv (Aeson.Object Object -kvs) = + conv (Aeson.Object Object +kvs) = ([(ScriptData, ScriptData)] -> ScriptData) -> Either ScriptDataJsonSchemaError [(ScriptData, ScriptData)] -> Either ScriptDataJsonSchemaError ScriptData @@ -1059,17 +1059,17 @@ forall (t :: * -> *) (f :: * -> *) a b. (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) -traverse (\(Text -k,Value -v) -> (,) (Text -> ScriptData -convKey Text -k) (ScriptData -> (ScriptData, ScriptData)) +traverse (\(Text +k,Value +v) -> (,) (Text -> ScriptData +convKey Text +k) (ScriptData -> (ScriptData, ScriptData)) -> Either ScriptDataJsonSchemaError ScriptData -> Either ScriptDataJsonSchemaError (ScriptData, ScriptData) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Value -> Either ScriptDataJsonSchemaError ScriptData -conv Value -v) +conv Value +v) ([Pair] -> Either ScriptDataJsonSchemaError [(ScriptData, ScriptData)]) -> ([Pair] -> [Pair]) @@ -1087,18 +1087,18 @@ $ Object -> [Pair] forall k v. HashMap k v -> [(k, v)] HashMap.toList Object -kvs +kvs - convKey :: Text -> ScriptData - convKey :: Text -> ScriptData -convKey Text -s = + convKey :: Text -> ScriptData + convKey :: Text -> ScriptData +convKey Text +s = ScriptData -> Maybe ScriptData -> ScriptData forall a. a -> Maybe a -> a fromMaybe (ByteString -> ScriptData ScriptDataBytes (Text -> ByteString Text.encodeUtf8 Text -s)) (Maybe ScriptData -> ScriptData) -> Maybe ScriptData -> ScriptData +s)) (Maybe ScriptData -> ScriptData) -> Maybe ScriptData -> ScriptData forall a b. (a -> b) -> a -> b $ Parser ScriptData -> Text -> Maybe ScriptData @@ -1125,7 +1125,7 @@ <* Parser ByteString () forall t. Chunk t => Parser t () Atto.endOfInput)) Text -s +s -- | JSON strings that are base16 encoded and prefixed with 'bytesPrefix' will -- be encoded as CBOR bytestrings. @@ -1142,13 +1142,13 @@ scriptDataToJsonDetailedSchema :: ScriptData -> Aeson.Value scriptDataToJsonDetailedSchema :: ScriptData -> Value scriptDataToJsonDetailedSchema = ScriptData -> Value -conv +conv where - conv :: ScriptData -> Aeson.Value - conv :: ScriptData -> Value -conv (ScriptDataNumber Integer -n) = Text -> Value -> Value -singleFieldObject Text + conv :: ScriptData -> Aeson.Value + conv :: ScriptData -> Value +conv (ScriptDataNumber Integer +n) = Text -> Value -> Value +singleFieldObject Text "int" (Value -> Value) -> (Scientific -> Value) -> Scientific -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -1159,10 +1159,10 @@ $ Integer -> Scientific forall a. Num a => Integer -> a fromInteger Integer -n - conv (ScriptDataBytes ByteString -bs) = Text -> Value -> Value -singleFieldObject Text +n + conv (ScriptDataBytes ByteString +bs) = Text -> Value -> Value +singleFieldObject Text "bytes" (Value -> Value) -> (Text -> Value) -> Text -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -1173,10 +1173,10 @@ $ ByteString -> Text Text.decodeLatin1 (ByteString -> ByteString Base16.encode ByteString -bs) - conv (ScriptDataList [ScriptData] -vs) = Text -> Value -> Value -singleFieldObject Text +bs) + conv (ScriptDataList [ScriptData] +vs) = Text -> Value -> Value +singleFieldObject Text "list" (Value -> Value) -> (Array -> Value) -> Array -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -1189,11 +1189,11 @@ Vector.fromList ((ScriptData -> Value) -> [ScriptData] -> [Value] forall a b. (a -> b) -> [a] -> [b] map ScriptData -> Value -conv [ScriptData] -vs) - conv (ScriptDataMap [(ScriptData, ScriptData)] -kvs) = Text -> Value -> Value -singleFieldObject Text +conv [ScriptData] +vs) + conv (ScriptDataMap [(ScriptData, ScriptData)] +kvs) = Text -> Value -> Value +singleFieldObject Text "map" (Value -> Value) -> (Array -> Value) -> Array -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -1207,19 +1207,19 @@ [ [Pair] -> Value Aeson.object [ (Text "k", ScriptData -> Value -conv ScriptData -k), (Text +conv ScriptData +k), (Text "v", ScriptData -> Value -conv ScriptData -v) ] - | (ScriptData -k, ScriptData -v) <- [(ScriptData, ScriptData)] -kvs ] +conv ScriptData +v) ] + | (ScriptData +k, ScriptData +v) <- [(ScriptData, ScriptData)] +kvs ] - conv (ScriptDataConstructor Integer -n [ScriptData] -vs) = + conv (ScriptDataConstructor Integer +n [ScriptData] +vs) = [Pair] -> Value Aeson.object [ (Text @@ -1227,7 +1227,7 @@ Aeson.Number (Integer -> Scientific forall a. Num a => Integer -> a fromInteger Integer -n)) +n)) , (Text "fields", Array -> Value Aeson.Array ([Value] -> Array @@ -1235,17 +1235,17 @@ Vector.fromList ((ScriptData -> Value) -> [ScriptData] -> [Value] forall a b. (a -> b) -> [a] -> [b] map ScriptData -> Value -conv [ScriptData] -vs))) +conv [ScriptData] +vs))) ] - singleFieldObject :: Text -> Value -> Value -singleFieldObject Text -name Value -v = [Pair] -> Value + singleFieldObject :: Text -> Value -> Value +singleFieldObject Text +name Value +v = [Pair] -> Value Aeson.object [(Text -name, Value -v)] +name, Value +v)] scriptDataFromJsonDetailedSchema :: Aeson.Value @@ -1253,55 +1253,55 @@ ScriptData scriptDataFromJsonDetailedSchema :: Value -> Either ScriptDataJsonSchemaError ScriptData scriptDataFromJsonDetailedSchema = Value -> Either ScriptDataJsonSchemaError ScriptData -conv +conv where - conv :: Aeson.Value + conv :: Aeson.Value -> Either ScriptDataJsonSchemaError ScriptData - conv :: Value -> Either ScriptDataJsonSchemaError ScriptData -conv (Aeson.Object Object -m) = + conv :: Value -> Either ScriptDataJsonSchemaError ScriptData +conv (Aeson.Object Object +m) = case Object -> [Pair] forall k v. HashMap k v -> [(k, v)] HashMap.toList Object -m of +m of [(Text -"int", Aeson.Number Scientific -d)] -> +"int", Aeson.Number Scientific +d)] -> case Scientific -> Either Double Integer forall r i. (RealFloat r, Integral i) => Scientific -> Either r i Scientific.floatingOrInteger Scientific -d :: Either Double Integer of - Left Double -n -> ScriptDataJsonSchemaError +d :: Either Double Integer of + Left Double +n -> ScriptDataJsonSchemaError -> Either ScriptDataJsonSchemaError ScriptData forall a b. a -> Either a b Left (Double -> ScriptDataJsonSchemaError ScriptDataJsonNumberNotInteger Double -n) - Right Integer -n -> ScriptData -> Either ScriptDataJsonSchemaError ScriptData +n) + Right Integer +n -> ScriptData -> Either ScriptDataJsonSchemaError ScriptData forall a b. b -> Either a b Right (Integer -> ScriptData ScriptDataNumber Integer -n) +n) [(Text -"bytes", Aeson.String Text -s)] - | Right ByteString -bs <- ByteString -> Either String ByteString +"bytes", Aeson.String Text +s)] + | Right ByteString +bs <- ByteString -> Either String ByteString Base16.decode (Text -> ByteString Text.encodeUtf8 Text -s) +s) -> ScriptData -> Either ScriptDataJsonSchemaError ScriptData forall a b. b -> Either a b Right (ByteString -> ScriptData ScriptDataBytes ByteString -bs) +bs) [(Text -"list", Aeson.Array Array -vs)] -> +"list", Aeson.Array Array +vs)] -> ([ScriptData] -> ScriptData) -> Either ScriptDataJsonSchemaError [ScriptData] -> Either ScriptDataJsonSchemaError ScriptData @@ -1320,18 +1320,18 @@ (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse Value -> Either ScriptDataJsonSchemaError ScriptData -conv +conv ([Value] -> Either ScriptDataJsonSchemaError ScriptData) -> [Value] -> Either ScriptDataJsonSchemaError ScriptData forall a b. (a -> b) -> a -> b $ Array -> [Value] forall a. Vector a -> [a] Vector.toList Array -vs +vs [(Text -"map", Aeson.Array Array -kvs)] -> +"map", Aeson.Array Array +kvs)] -> ([(ScriptData, ScriptData)] -> ScriptData) -> Either ScriptDataJsonSchemaError [(ScriptData, ScriptData)] -> Either ScriptDataJsonSchemaError ScriptData @@ -1353,40 +1353,40 @@ (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse Value -> Either ScriptDataJsonSchemaError (ScriptData, ScriptData) -convKeyValuePair +convKeyValuePair ([Value] -> Either ScriptDataJsonSchemaError ScriptData) -> [Value] -> Either ScriptDataJsonSchemaError ScriptData forall a b. (a -> b) -> a -> b $ Array -> [Value] forall a. Vector a -> [a] Vector.toList Array -kvs +kvs [(Text -"constructor", Aeson.Number Scientific -d), +"constructor", Aeson.Number Scientific +d), (Text -"fields", Aeson.Array Array -vs)] -> +"fields", Aeson.Array Array +vs)] -> case Scientific -> Either Double Integer forall r i. (RealFloat r, Integral i) => Scientific -> Either r i Scientific.floatingOrInteger Scientific -d :: Either Double Integer of - Left Double -n -> ScriptDataJsonSchemaError +d :: Either Double Integer of + Left Double +n -> ScriptDataJsonSchemaError -> Either ScriptDataJsonSchemaError ScriptData forall a b. a -> Either a b Left (Double -> ScriptDataJsonSchemaError ScriptDataJsonNumberNotInteger Double -n) - Right Integer -n -> ([ScriptData] -> ScriptData) +n) + Right Integer +n -> ([ScriptData] -> ScriptData) -> Either ScriptDataJsonSchemaError [ScriptData] -> Either ScriptDataJsonSchemaError ScriptData forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap (Integer -> [ScriptData] -> ScriptData ScriptDataConstructor Integer -n) +n) (Either ScriptDataJsonSchemaError [ScriptData] -> Either ScriptDataJsonSchemaError ScriptData) -> ([Value] -> Either ScriptDataJsonSchemaError [ScriptData]) @@ -1399,20 +1399,20 @@ (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse Value -> Either ScriptDataJsonSchemaError ScriptData -conv +conv ([Value] -> Either ScriptDataJsonSchemaError ScriptData) -> [Value] -> Either ScriptDataJsonSchemaError ScriptData forall a b. (a -> b) -> a -> b $ Array -> [Value] forall a. Vector a -> [a] Vector.toList Array -vs +vs - (Text -key, Value -v):[Pair] + (Text +key, Value +v):[Pair] _ | Text -key Text -> [Text] -> Bool +key Text -> [Text] -> Bool forall (t :: * -> *) a. (Foldable t, Eq a) => a -> t a -> Bool `elem` [Text "int", Text @@ -1425,47 +1425,47 @@ forall a b. a -> Either a b Left (Text -> Value -> ScriptDataJsonSchemaError ScriptDataJsonTypeMismatch Text -key Value -v) +key Value +v) - [Pair] -kvs -> ScriptDataJsonSchemaError + [Pair] +kvs -> ScriptDataJsonSchemaError -> Either ScriptDataJsonSchemaError ScriptData forall a b. a -> Either a b Left ([Pair] -> ScriptDataJsonSchemaError ScriptDataJsonBadObject [Pair] -kvs) +kvs) - conv Value -v = ScriptDataJsonSchemaError + conv Value +v = ScriptDataJsonSchemaError -> Either ScriptDataJsonSchemaError ScriptData forall a b. a -> Either a b Left (Value -> ScriptDataJsonSchemaError ScriptDataJsonNotObject Value -v) +v) - convKeyValuePair :: Aeson.Value + convKeyValuePair :: Aeson.Value -> Either ScriptDataJsonSchemaError (ScriptData, ScriptData) - convKeyValuePair :: Value -> Either ScriptDataJsonSchemaError (ScriptData, ScriptData) -convKeyValuePair (Aeson.Object Object -m) + convKeyValuePair :: Value -> Either ScriptDataJsonSchemaError (ScriptData, ScriptData) +convKeyValuePair (Aeson.Object Object +m) | Object -> Int forall k v. HashMap k v -> Int HashMap.size Object -m Int -> Int -> Bool +m Int -> Int -> Bool forall a. Eq a => a -> a -> Bool == Int 2 - , Just Value -k <- Object -m Object -> Text -> Maybe Value + , Just Value +k <- Object +m Object -> Text -> Maybe Value forall k v. (Eq k, Hashable k) => HashMap k v -> k -> Maybe v HashMap.!? Text "k" - , Just Value -v <- Object -m Object -> Text -> Maybe Value + , Just Value +v <- Object +m Object -> Text -> Maybe Value forall k v. (Eq k, Hashable k) => HashMap k v -> k -> Maybe v HashMap.!? Text "v" @@ -1475,23 +1475,23 @@ ScriptDataJsonSchemaError (ScriptData -> (ScriptData, ScriptData)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Value -> Either ScriptDataJsonSchemaError ScriptData -conv Value -k Either +conv Value +k Either ScriptDataJsonSchemaError (ScriptData -> (ScriptData, ScriptData)) -> Either ScriptDataJsonSchemaError ScriptData -> Either ScriptDataJsonSchemaError (ScriptData, ScriptData) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Value -> Either ScriptDataJsonSchemaError ScriptData -conv Value -v +conv Value +v - convKeyValuePair Value -v = ScriptDataJsonSchemaError + convKeyValuePair Value +v = ScriptDataJsonSchemaError -> Either ScriptDataJsonSchemaError (ScriptData, ScriptData) forall a b. a -> Either a b Left (Value -> ScriptDataJsonSchemaError ScriptDataJsonBadMapPair Value -v) +v) -- ---------------------------------------------------------------------------- @@ -1501,7 +1501,7 @@ data ScriptDataJsonError = ScriptDataJsonSchemaError !Aeson.Value !ScriptDataJsonSchemaError | ScriptDataRangeError !Aeson.Value !ScriptDataRangeError - deriving (ScriptDataJsonError -> ScriptDataJsonError -> Bool + deriving (ScriptDataJsonError -> ScriptDataJsonError -> Bool (ScriptDataJsonError -> ScriptDataJsonError -> Bool) -> (ScriptDataJsonError -> ScriptDataJsonError -> Bool) -> Eq ScriptDataJsonError @@ -1510,7 +1510,7 @@ $c/= :: ScriptDataJsonError -> ScriptDataJsonError -> Bool == :: ScriptDataJsonError -> ScriptDataJsonError -> Bool $c== :: ScriptDataJsonError -> ScriptDataJsonError -> Bool -Eq, Int -> ScriptDataJsonError -> ShowS +Eq, Int -> ScriptDataJsonError -> ShowS [ScriptDataJsonError] -> ShowS ScriptDataJsonError -> String (Int -> ScriptDataJsonError -> ShowS) @@ -1540,7 +1540,7 @@ | ScriptDataJsonBadObject ![(Text, Aeson.Value)] | ScriptDataJsonBadMapPair !Aeson.Value | ScriptDataJsonTypeMismatch !Text !Aeson.Value - deriving (ScriptDataJsonSchemaError -> ScriptDataJsonSchemaError -> Bool + deriving (ScriptDataJsonSchemaError -> ScriptDataJsonSchemaError -> Bool (ScriptDataJsonSchemaError -> ScriptDataJsonSchemaError -> Bool) -> (ScriptDataJsonSchemaError -> ScriptDataJsonSchemaError -> Bool) -> Eq ScriptDataJsonSchemaError @@ -1549,7 +1549,7 @@ $c/= :: ScriptDataJsonSchemaError -> ScriptDataJsonSchemaError -> Bool == :: ScriptDataJsonSchemaError -> ScriptDataJsonSchemaError -> Bool $c== :: ScriptDataJsonSchemaError -> ScriptDataJsonSchemaError -> Bool -Eq, Int -> ScriptDataJsonSchemaError -> ShowS +Eq, Int -> ScriptDataJsonSchemaError -> ShowS [ScriptDataJsonSchemaError] -> ShowS ScriptDataJsonSchemaError -> String (Int -> ScriptDataJsonSchemaError -> ShowS) @@ -1567,10 +1567,10 @@ Show) instance Error ScriptDataJsonError where - displayError :: ScriptDataJsonError -> String -displayError (ScriptDataJsonSchemaError Value -v ScriptDataJsonSchemaError -detail) = + displayError :: ScriptDataJsonError -> String +displayError (ScriptDataJsonSchemaError Value +v ScriptDataJsonSchemaError +detail) = String "JSON schema error within the script data: " String -> ShowS @@ -1579,7 +1579,7 @@ LBS.unpack (Value -> ByteString forall a. ToJSON a => a -> ByteString Aeson.encode Value -v) String -> ShowS +v) String -> ShowS forall a. [a] -> [a] -> [a] ++ String "\n" String -> ShowS @@ -1587,10 +1587,10 @@ ++ ScriptDataJsonSchemaError -> String forall e. Error e => e -> String displayError ScriptDataJsonSchemaError -detail - displayError (ScriptDataRangeError Value -v ScriptDataRangeError -detail) = +detail + displayError (ScriptDataRangeError Value +v ScriptDataRangeError +detail) = String "Value out of range within the script data: " String -> ShowS @@ -1599,7 +1599,7 @@ LBS.unpack (Value -> ByteString forall a. ToJSON a => a -> ByteString Aeson.encode Value -v) String -> ShowS +v) String -> ShowS forall a. [a] -> [a] -> [a] ++ String "\n" String -> ShowS @@ -1607,11 +1607,11 @@ ++ ScriptDataRangeError -> String forall e. Error e => e -> String displayError ScriptDataRangeError -detail +detail instance Error ScriptDataJsonSchemaError where - displayError :: ScriptDataJsonSchemaError -> String -displayError ScriptDataJsonSchemaError + displayError :: ScriptDataJsonSchemaError -> String +displayError ScriptDataJsonSchemaError ScriptDataJsonNullNotAllowed = String "JSON null values are not supported." @@ -1619,17 +1619,17 @@ ScriptDataJsonBoolNotAllowed = String "JSON bool values are not supported." - displayError (ScriptDataJsonNumberNotInteger Double -d) = + displayError (ScriptDataJsonNumberNotInteger Double +d) = String "JSON numbers must be integers. Unexpected value: " String -> ShowS forall a. [a] -> [a] -> [a] ++ Double -> String forall a. Show a => a -> String show Double -d - displayError (ScriptDataJsonNotObject Value -v) = +d + displayError (ScriptDataJsonNotObject Value +v) = String "JSON object expected. Unexpected value: " String -> ShowS @@ -1638,9 +1638,9 @@ LBS.unpack (Value -> ByteString forall a. ToJSON a => a -> ByteString Aeson.encode Value -v) - displayError (ScriptDataJsonBadObject [Pair] -v) = +v) + displayError (ScriptDataJsonBadObject [Pair] +v) = String "JSON object does not match the schema.\nExpected a single field named " String -> ShowS @@ -1658,9 +1658,9 @@ forall a. ToJSON a => a -> ByteString Aeson.encode ([Pair] -> Value Aeson.object [Pair] -v)) - displayError (ScriptDataJsonBadMapPair Value -v) = +v)) + displayError (ScriptDataJsonBadMapPair Value +v) = String "Expected a list of key/value pair { \"k\": ..., \"v\": ... } objects." String -> ShowS @@ -1672,17 +1672,17 @@ LBS.unpack (Value -> ByteString forall a. ToJSON a => a -> ByteString Aeson.encode Value -v) - displayError (ScriptDataJsonTypeMismatch Text -k Value -v) = +v) + displayError (ScriptDataJsonTypeMismatch Text +k Value +v) = String "The value in the field " String -> ShowS forall a. [a] -> [a] -> [a] ++ Text -> String forall a. Show a => a -> String show Text -k String -> ShowS +k String -> ShowS forall a. [a] -> [a] -> [a] ++ String " does not have the type " @@ -1696,6 +1696,6 @@ LBS.unpack (Value -> ByteString forall a. ToJSON a => a -> ByteString Aeson.encode Value -v) +v) \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.SerialiseBech32.html b/cardano-api/src/Cardano.Api.SerialiseBech32.html index 0f4a605476b..ccf3ea3b6da 100644 --- a/cardano-api/src/Cardano.Api.SerialiseBech32.html +++ b/cardano-api/src/Cardano.Api.SerialiseBech32.html @@ -29,43 +29,43 @@ import Cardano.Api.Utils -class (HasTypeProxy a, SerialiseAsRawBytes a) => SerialiseAsBech32 a where +class (HasTypeProxy a, SerialiseAsRawBytes a) => SerialiseAsBech32 a where -- | The human readable prefix to use when encoding this value to Bech32. -- - bech32PrefixFor :: a -> Text + bech32PrefixFor :: a -> Text -- | The set of human readable prefixes that can be used for this type. -- - bech32PrefixesPermitted :: AsType a -> [Text] + bech32PrefixesPermitted :: AsType a -> [Text] -serialiseToBech32 :: SerialiseAsBech32 a => a -> Text +serialiseToBech32 :: SerialiseAsBech32 a => a -> Text serialiseToBech32 :: a -> Text -serialiseToBech32 a -a = +serialiseToBech32 a +a = HumanReadablePart -> DataPart -> Text Bech32.encodeLenient HumanReadablePart -humanReadablePart +humanReadablePart (ByteString -> DataPart Bech32.dataPartFromBytes (a -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes a -a)) +a)) where - humanReadablePart :: HumanReadablePart -humanReadablePart = + humanReadablePart :: HumanReadablePart +humanReadablePart = case Text -> Either HumanReadablePartError HumanReadablePart Bech32.humanReadablePartFromText (a -> Text forall a. SerialiseAsBech32 a => a -> Text bech32PrefixFor a -a) of - Right HumanReadablePart -p -> HumanReadablePart -p - Left HumanReadablePartError -err -> [Char] -> HumanReadablePart +a) of + Right HumanReadablePart +p -> HumanReadablePart +p + Left HumanReadablePartError +err -> [Char] -> HumanReadablePart forall a. HasCallStack => [Char] -> a error ([Char] -> HumanReadablePart) -> [Char] -> HumanReadablePart forall a b. (a -> b) -> a -> b @@ -78,7 +78,7 @@ show (a -> Text forall a. SerialiseAsBech32 a => a -> Text bech32PrefixFor a -a) +a) [Char] -> [Char] -> [Char] forall a. [a] -> [a] -> [a] ++ [Char] @@ -87,20 +87,20 @@ ++ HumanReadablePartError -> [Char] forall a. Show a => a -> [Char] show HumanReadablePartError -err +err -deserialiseFromBech32 :: SerialiseAsBech32 a - => AsType a -> Text -> Either Bech32DecodeError a +deserialiseFromBech32 :: SerialiseAsBech32 a + => AsType a -> Text -> Either Bech32DecodeError a deserialiseFromBech32 :: AsType a -> Text -> Either Bech32DecodeError a -deserialiseFromBech32 AsType a -asType Text -bech32Str = do - (HumanReadablePart -prefix, DataPart -dataPart) <- Text -> Either DecodingError (HumanReadablePart, DataPart) +deserialiseFromBech32 AsType a +asType Text +bech32Str = do + (HumanReadablePart +prefix, DataPart +dataPart) <- Text -> Either DecodingError (HumanReadablePart, DataPart) Bech32.decodeLenient Text -bech32Str +bech32Str Either DecodingError (HumanReadablePart, DataPart) -> (DecodingError -> Bech32DecodeError) -> Either Bech32DecodeError (HumanReadablePart, DataPart) @@ -108,97 +108,97 @@ ?!. DecodingError -> Bech32DecodeError Bech32DecodingError - let actualPrefix :: Text -actualPrefix = HumanReadablePart -> Text + let actualPrefix :: Text +actualPrefix = HumanReadablePart -> Text Bech32.humanReadablePartToText HumanReadablePart -prefix - permittedPrefixes :: [Text] -permittedPrefixes = AsType a -> [Text] +prefix + permittedPrefixes :: [Text] +permittedPrefixes = AsType a -> [Text] forall a. SerialiseAsBech32 a => AsType a -> [Text] bech32PrefixesPermitted AsType a -asType +asType Bool -> Maybe () forall (f :: * -> *). Alternative f => Bool -> f () guard (Text -actualPrefix Text -> [Text] -> Bool +actualPrefix Text -> [Text] -> Bool forall (t :: * -> *) a. (Foldable t, Eq a) => a -> t a -> Bool `elem` [Text] -permittedPrefixes) +permittedPrefixes) Maybe () -> Bech32DecodeError -> Either Bech32DecodeError () forall a e. Maybe a -> e -> Either e a ?! Text -> Set Text -> Bech32DecodeError Bech32UnexpectedPrefix Text -actualPrefix ([Text] -> Set Text +actualPrefix ([Text] -> Set Text forall a. Ord a => [a] -> Set a Set.fromList [Text] -permittedPrefixes) +permittedPrefixes) - ByteString -payload <- DataPart -> Maybe ByteString + ByteString +payload <- DataPart -> Maybe ByteString Bech32.dataPartToBytes DataPart -dataPart +dataPart Maybe ByteString -> Bech32DecodeError -> Either Bech32DecodeError ByteString forall a e. Maybe a -> e -> Either e a ?! Text -> Bech32DecodeError Bech32DataPartToBytesError (DataPart -> Text Bech32.dataPartToText DataPart -dataPart) +dataPart) - a -value <- AsType a -> ByteString -> Maybe a + a +value <- AsType a -> ByteString -> Maybe a forall a. SerialiseAsRawBytes a => AsType a -> ByteString -> Maybe a deserialiseFromRawBytes AsType a -asType ByteString -payload +asType ByteString +payload Maybe a -> Bech32DecodeError -> Either Bech32DecodeError a forall a e. Maybe a -> e -> Either e a ?! ByteString -> Bech32DecodeError Bech32DeserialiseFromBytesError ByteString -payload +payload - let expectedPrefix :: Text -expectedPrefix = a -> Text + let expectedPrefix :: Text +expectedPrefix = a -> Text forall a. SerialiseAsBech32 a => a -> Text bech32PrefixFor a -value +value Bool -> Maybe () forall (f :: * -> *). Alternative f => Bool -> f () guard (Text -actualPrefix Text -> Text -> Bool +actualPrefix Text -> Text -> Bool forall a. Eq a => a -> a -> Bool == Text -expectedPrefix) +expectedPrefix) Maybe () -> Bech32DecodeError -> Either Bech32DecodeError () forall a e. Maybe a -> e -> Either e a ?! Text -> Text -> Bech32DecodeError Bech32WrongPrefix Text -actualPrefix Text -expectedPrefix +actualPrefix Text +expectedPrefix a -> Either Bech32DecodeError a forall (m :: * -> *) a. Monad m => a -> m a return a -value +value deserialiseAnyOfFromBech32 - :: forall b. - [FromSomeType SerialiseAsBech32 b] + :: forall b. + [FromSomeType SerialiseAsBech32 b] -> Text - -> Either Bech32DecodeError b + -> Either Bech32DecodeError b deserialiseAnyOfFromBech32 :: [FromSomeType SerialiseAsBech32 b] -> Text -> Either Bech32DecodeError b -deserialiseAnyOfFromBech32 [FromSomeType SerialiseAsBech32 b] -types Text -bech32Str = do - (HumanReadablePart -prefix, DataPart -dataPart) <- Text -> Either DecodingError (HumanReadablePart, DataPart) +deserialiseAnyOfFromBech32 [FromSomeType SerialiseAsBech32 b] +types Text +bech32Str = do + (HumanReadablePart +prefix, DataPart +dataPart) <- Text -> Either DecodingError (HumanReadablePart, DataPart) Bech32.decodeLenient Text -bech32Str +bech32Str Either DecodingError (HumanReadablePart, DataPart) -> (DecodingError -> Bech32DecodeError) -> Either Bech32DecodeError (HumanReadablePart, DataPart) @@ -206,103 +206,103 @@ ?!. DecodingError -> Bech32DecodeError Bech32DecodingError - let actualPrefix :: Text -actualPrefix = HumanReadablePart -> Text + let actualPrefix :: Text +actualPrefix = HumanReadablePart -> Text Bech32.humanReadablePartToText HumanReadablePart -prefix +prefix - FromSomeType AsType a -actualType a -> b -fromType <- + FromSomeType AsType a +actualType a -> b +fromType <- Text -> Maybe (FromSomeType SerialiseAsBech32 b) -findForPrefix Text -actualPrefix +findForPrefix Text +actualPrefix Maybe (FromSomeType SerialiseAsBech32 b) -> Bech32DecodeError -> Either Bech32DecodeError (FromSomeType SerialiseAsBech32 b) forall a e. Maybe a -> e -> Either e a ?! Text -> Set Text -> Bech32DecodeError Bech32UnexpectedPrefix Text -actualPrefix Set Text -permittedPrefixes +actualPrefix Set Text +permittedPrefixes - ByteString -payload <- DataPart -> Maybe ByteString + ByteString +payload <- DataPart -> Maybe ByteString Bech32.dataPartToBytes DataPart -dataPart +dataPart Maybe ByteString -> Bech32DecodeError -> Either Bech32DecodeError ByteString forall a e. Maybe a -> e -> Either e a ?! Text -> Bech32DecodeError Bech32DataPartToBytesError (DataPart -> Text Bech32.dataPartToText DataPart -dataPart) +dataPart) - a -value <- AsType a -> ByteString -> Maybe a + a +value <- AsType a -> ByteString -> Maybe a forall a. SerialiseAsRawBytes a => AsType a -> ByteString -> Maybe a deserialiseFromRawBytes AsType a -actualType ByteString -payload +actualType ByteString +payload Maybe a -> Bech32DecodeError -> Either Bech32DecodeError a forall a e. Maybe a -> e -> Either e a ?! ByteString -> Bech32DecodeError Bech32DeserialiseFromBytesError ByteString -payload +payload - let expectedPrefix :: Text -expectedPrefix = a -> Text + let expectedPrefix :: Text +expectedPrefix = a -> Text forall a. SerialiseAsBech32 a => a -> Text bech32PrefixFor a -value +value Bool -> Maybe () forall (f :: * -> *). Alternative f => Bool -> f () guard (Text -actualPrefix Text -> Text -> Bool +actualPrefix Text -> Text -> Bool forall a. Eq a => a -> a -> Bool == Text -expectedPrefix) +expectedPrefix) Maybe () -> Bech32DecodeError -> Either Bech32DecodeError () forall a e. Maybe a -> e -> Either e a ?! Text -> Text -> Bech32DecodeError Bech32WrongPrefix Text -actualPrefix Text -expectedPrefix +actualPrefix Text +expectedPrefix b -> Either Bech32DecodeError b forall (m :: * -> *) a. Monad m => a -> m a return (a -> b -fromType a -value) +fromType a +value) where - findForPrefix + findForPrefix :: Text - -> Maybe (FromSomeType SerialiseAsBech32 b) - findForPrefix :: Text -> Maybe (FromSomeType SerialiseAsBech32 b) -findForPrefix Text -prefix = + -> Maybe (FromSomeType SerialiseAsBech32 b) + findForPrefix :: Text -> Maybe (FromSomeType SerialiseAsBech32 b) +findForPrefix Text +prefix = (FromSomeType SerialiseAsBech32 b -> Bool) -> [FromSomeType SerialiseAsBech32 b] -> Maybe (FromSomeType SerialiseAsBech32 b) forall (t :: * -> *) a. Foldable t => (a -> Bool) -> t a -> Maybe a List.find - (\(FromSomeType AsType a -t a -> b + (\(FromSomeType AsType a +t a -> b _) -> Text -prefix Text -> [Text] -> Bool +prefix Text -> [Text] -> Bool forall (t :: * -> *) a. (Foldable t, Eq a) => a -> t a -> Bool `elem` AsType a -> [Text] forall a. SerialiseAsBech32 a => AsType a -> [Text] bech32PrefixesPermitted AsType a -t) +t) [FromSomeType SerialiseAsBech32 b] -types +types - permittedPrefixes :: Set Text - permittedPrefixes :: Set Text -permittedPrefixes = + permittedPrefixes :: Set Text + permittedPrefixes :: Set Text +permittedPrefixes = [Text] -> Set Text forall a. Ord a => [a] -> Set a Set.fromList ([Text] -> Set Text) -> [Text] -> Set Text @@ -313,11 +313,11 @@ [ AsType a -> [Text] forall a. SerialiseAsBech32 a => AsType a -> [Text] bech32PrefixesPermitted AsType a -ttoken - | FromSomeType AsType a -ttoken a -> b -_f <- [FromSomeType SerialiseAsBech32 b] -types +ttoken + | FromSomeType AsType a +ttoken a -> b +_f <- [FromSomeType SerialiseAsBech32 b] +types ] @@ -344,7 +344,7 @@ -- correspond to the prefix that should be used for the payload value. | Bech32WrongPrefix !Text !Text - deriving (Bech32DecodeError -> Bech32DecodeError -> Bool + deriving (Bech32DecodeError -> Bech32DecodeError -> Bool (Bech32DecodeError -> Bech32DecodeError -> Bool) -> (Bech32DecodeError -> Bech32DecodeError -> Bool) -> Eq Bech32DecodeError @@ -353,7 +353,7 @@ $c/= :: Bech32DecodeError -> Bech32DecodeError -> Bool == :: Bech32DecodeError -> Bech32DecodeError -> Bool $c== :: Bech32DecodeError -> Bech32DecodeError -> Bool -Eq, Int -> Bech32DecodeError -> [Char] -> [Char] +Eq, Int -> Bech32DecodeError -> [Char] -> [Char] [Bech32DecodeError] -> [Char] -> [Char] Bech32DecodeError -> [Char] (Int -> Bech32DecodeError -> [Char] -> [Char]) @@ -372,26 +372,26 @@ Show) instance Error Bech32DecodeError where - displayError :: Bech32DecodeError -> [Char] -displayError Bech32DecodeError -err = case Bech32DecodeError -err of - Bech32DecodingError DecodingError -decErr -> DecodingError -> [Char] + displayError :: Bech32DecodeError -> [Char] +displayError Bech32DecodeError +err = case Bech32DecodeError +err of + Bech32DecodingError DecodingError +decErr -> DecodingError -> [Char] forall a. Show a => a -> [Char] show DecodingError -decErr -- TODO +decErr -- TODO - Bech32UnexpectedPrefix Text -actual Set Text -permitted -> + Bech32UnexpectedPrefix Text +actual Set Text +permitted -> [Char] "Unexpected Bech32 prefix: the actual prefix is " [Char] -> [Char] -> [Char] forall a. Semigroup a => a -> a -> a <> Text -> [Char] forall a. Show a => a -> [Char] show Text -actual +actual [Char] -> [Char] -> [Char] forall a. Semigroup a => a -> a -> a <> [Char] @@ -408,30 +408,30 @@ show (Set Text -> [Text] forall a. Set a -> [a] Set.toList Set Text -permitted)) +permitted)) - Bech32DataPartToBytesError Text -_dataPart -> + Bech32DataPartToBytesError Text +_dataPart -> [Char] "There was an error in extracting the bytes from the data part of the \ \Bech32-encoded string." - Bech32DeserialiseFromBytesError ByteString -_bytes -> + Bech32DeserialiseFromBytesError ByteString +_bytes -> [Char] "There was an error in deserialising the data part of the \ \Bech32-encoded string into a value of the expected type." - Bech32WrongPrefix Text -actual Text -expected -> + Bech32WrongPrefix Text +actual Text +expected -> [Char] "Mismatch in the Bech32 prefix: the actual prefix is " [Char] -> [Char] -> [Char] forall a. Semigroup a => a -> a -> a <> Text -> [Char] forall a. Show a => a -> [Char] show Text -actual +actual [Char] -> [Char] -> [Char] forall a. Semigroup a => a -> a -> a <> [Char] @@ -440,6 +440,6 @@ <> Text -> [Char] forall a. Show a => a -> [Char] show Text -expected +expected \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.SerialiseCBOR.html b/cardano-api/src/Cardano.Api.SerialiseCBOR.html index 6515e1b58cb..14e378efaa2 100644 --- a/cardano-api/src/Cardano.Api.SerialiseCBOR.html +++ b/cardano-api/src/Cardano.Api.SerialiseCBOR.html @@ -18,21 +18,21 @@ import Cardano.Api.HasTypeProxy -class HasTypeProxy a => SerialiseAsCBOR a where - serialiseToCBOR :: a -> ByteString - deserialiseFromCBOR :: AsType a -> ByteString -> Either CBOR.DecoderError a +class HasTypeProxy a => SerialiseAsCBOR a where + serialiseToCBOR :: a -> ByteString + deserialiseFromCBOR :: AsType a -> ByteString -> Either CBOR.DecoderError a - default serialiseToCBOR :: ToCBOR a => a -> ByteString - serialiseToCBOR = a -> ByteString + default serialiseToCBOR :: ToCBOR a => a -> ByteString + serialiseToCBOR = a -> ByteString forall a. ToCBOR a => a -> ByteString CBOR.serialize' - default deserialiseFromCBOR :: FromCBOR a - => AsType a + default deserialiseFromCBOR :: FromCBOR a + => AsType a -> ByteString - -> Either CBOR.DecoderError a - deserialiseFromCBOR AsType a -_proxy = ByteString -> Either DecoderError a + -> Either CBOR.DecoderError a + deserialiseFromCBOR AsType a +_proxy = ByteString -> Either DecoderError a forall a. FromCBOR a => ByteString -> Either DecoderError a CBOR.decodeFull' diff --git a/cardano-api/src/Cardano.Api.SerialiseJSON.html b/cardano-api/src/Cardano.Api.SerialiseJSON.html index c501590830c..663352c6889 100644 --- a/cardano-api/src/Cardano.Api.SerialiseJSON.html +++ b/cardano-api/src/Cardano.Api.SerialiseJSON.html @@ -28,7 +28,7 @@ newtype JsonDecodeError = JsonDecodeError String - deriving (JsonDecodeError -> JsonDecodeError -> Bool + deriving (JsonDecodeError -> JsonDecodeError -> Bool (JsonDecodeError -> JsonDecodeError -> Bool) -> (JsonDecodeError -> JsonDecodeError -> Bool) -> Eq JsonDecodeError @@ -37,7 +37,7 @@ $c/= :: JsonDecodeError -> JsonDecodeError -> Bool == :: JsonDecodeError -> JsonDecodeError -> Bool $c== :: JsonDecodeError -> JsonDecodeError -> Bool -Eq, Int -> JsonDecodeError -> ShowS +Eq, Int -> JsonDecodeError -> ShowS [JsonDecodeError] -> ShowS JsonDecodeError -> String (Int -> JsonDecodeError -> ShowS) @@ -55,13 +55,13 @@ Show) instance Error JsonDecodeError where - displayError :: JsonDecodeError -> String -displayError (JsonDecodeError String -err) = String -err + displayError :: JsonDecodeError -> String +displayError (JsonDecodeError String +err) = String +err -serialiseToJSON :: ToJSON a => a -> ByteString +serialiseToJSON :: ToJSON a => a -> ByteString serialiseToJSON :: a -> ByteString serialiseToJSON = ByteString -> ByteString LBS.toStrict (ByteString -> ByteString) -> (a -> ByteString) -> a -> ByteString @@ -70,7 +70,7 @@ forall a. ToJSON a => a -> ByteString Aeson.encode -prettyPrintJSON :: ToJSON a => a -> ByteString +prettyPrintJSON :: ToJSON a => a -> ByteString prettyPrintJSON :: a -> ByteString prettyPrintJSON = ByteString -> ByteString LBS.toStrict (ByteString -> ByteString) -> (a -> ByteString) -> a -> ByteString @@ -79,13 +79,13 @@ forall a. ToJSON a => a -> ByteString encodePretty -deserialiseFromJSON :: FromJSON a - => AsType a +deserialiseFromJSON :: FromJSON a + => AsType a -> ByteString - -> Either JsonDecodeError a + -> Either JsonDecodeError a deserialiseFromJSON :: AsType a -> ByteString -> Either JsonDecodeError a -deserialiseFromJSON AsType a -_proxy = (String -> Either JsonDecodeError a) +deserialiseFromJSON AsType a +_proxy = (String -> Either JsonDecodeError a) -> (a -> Either JsonDecodeError a) -> Either String a -> Either JsonDecodeError a @@ -111,14 +111,14 @@ Aeson.eitherDecodeStrict' -readFileJSON :: FromJSON a - => AsType a +readFileJSON :: FromJSON a + => AsType a -> FilePath - -> IO (Either (FileError JsonDecodeError) a) + -> IO (Either (FileError JsonDecodeError) a) readFileJSON :: AsType a -> String -> IO (Either (FileError JsonDecodeError) a) -readFileJSON AsType a -ttoken String -path = +readFileJSON AsType a +ttoken String +path = ExceptT (FileError JsonDecodeError) IO a -> IO (Either (FileError JsonDecodeError) a) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) @@ -128,8 +128,8 @@ -> IO (Either (FileError JsonDecodeError) a) forall a b. (a -> b) -> a -> b $ do - ByteString -content <- (IOException -> FileError JsonDecodeError) + ByteString +content <- (IOException -> FileError JsonDecodeError) -> IO ByteString -> ExceptT (FileError JsonDecodeError) IO ByteString forall (m :: * -> *) x a. @@ -138,14 +138,14 @@ handleIOExceptT (String -> IOException -> FileError JsonDecodeError forall e. String -> IOException -> FileError e FileIOError String -path) (IO ByteString +path) (IO ByteString -> ExceptT (FileError JsonDecodeError) IO ByteString) -> IO ByteString -> ExceptT (FileError JsonDecodeError) IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -path +path (JsonDecodeError -> FileError JsonDecodeError) -> ExceptT JsonDecodeError IO a -> ExceptT (FileError JsonDecodeError) IO a @@ -155,7 +155,7 @@ firstExceptT (String -> JsonDecodeError -> FileError JsonDecodeError forall e. String -> e -> FileError e FileError String -path) (ExceptT JsonDecodeError IO a +path) (ExceptT JsonDecodeError IO a -> ExceptT (FileError JsonDecodeError) IO a) -> ExceptT JsonDecodeError IO a -> ExceptT (FileError JsonDecodeError) IO a @@ -171,17 +171,17 @@ FromJSON a => AsType a -> ByteString -> Either JsonDecodeError a deserialiseFromJSON AsType a -ttoken ByteString -content +ttoken ByteString +content -writeFileJSON :: ToJSON a +writeFileJSON :: ToJSON a => FilePath - -> a + -> a -> IO (Either (FileError ()) ()) writeFileJSON :: String -> a -> IO (Either (FileError ()) ()) -writeFileJSON String -path a -x = +writeFileJSON String +path a +x = ExceptT (FileError ()) IO () -> IO (Either (FileError ()) ()) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) runExceptT (ExceptT (FileError ()) IO () -> IO (Either (FileError ()) ())) @@ -196,15 +196,15 @@ handleIOExceptT (String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -path) (IO () -> ExceptT (FileError ()) IO ()) +path) (IO () -> ExceptT (FileError ()) IO ()) -> IO () -> ExceptT (FileError ()) IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () BS.writeFile String -path (a -> ByteString +path (a -> ByteString forall a. ToJSON a => a -> ByteString serialiseToJSON a -x) +x) \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.SerialiseRaw.html b/cardano-api/src/Cardano.Api.SerialiseRaw.html index 29bf1215d62..78a26974da4 100644 --- a/cardano-api/src/Cardano.Api.SerialiseRaw.html +++ b/cardano-api/src/Cardano.Api.SerialiseRaw.html @@ -22,13 +22,13 @@ import Cardano.Api.HasTypeProxy -class HasTypeProxy a => SerialiseAsRawBytes a where +class HasTypeProxy a => SerialiseAsRawBytes a where - serialiseToRawBytes :: a -> ByteString + serialiseToRawBytes :: a -> ByteString - deserialiseFromRawBytes :: AsType a -> ByteString -> Maybe a + deserialiseFromRawBytes :: AsType a -> ByteString -> Maybe a -serialiseToRawBytesHex :: SerialiseAsRawBytes a => a -> ByteString +serialiseToRawBytesHex :: SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytesHex :: a -> ByteString serialiseToRawBytesHex = ByteString -> ByteString Base16.encode (ByteString -> ByteString) -> (a -> ByteString) -> a -> ByteString @@ -37,7 +37,7 @@ forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes -serialiseToRawBytesHexText :: SerialiseAsRawBytes a => a -> Text +serialiseToRawBytesHexText :: SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText :: a -> Text serialiseToRawBytesHexText = ByteString -> Text Text.decodeUtf8 (ByteString -> Text) -> (a -> ByteString) -> a -> Text @@ -46,25 +46,25 @@ forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytesHex -deserialiseFromRawBytesHex :: SerialiseAsRawBytes a - => AsType a -> ByteString -> Maybe a +deserialiseFromRawBytesHex :: SerialiseAsRawBytes a + => AsType a -> ByteString -> Maybe a deserialiseFromRawBytesHex :: AsType a -> ByteString -> Maybe a -deserialiseFromRawBytesHex AsType a -proxy ByteString -hex = +deserialiseFromRawBytesHex AsType a +proxy ByteString +hex = case ByteString -> Either String ByteString Base16.decode ByteString -hex of - Right ByteString -raw -> AsType a -> ByteString -> Maybe a +hex of + Right ByteString +raw -> AsType a -> ByteString -> Maybe a forall a. SerialiseAsRawBytes a => AsType a -> ByteString -> Maybe a deserialiseFromRawBytes AsType a -proxy ByteString -raw - Left String -_msg -> Maybe a +proxy ByteString +raw + Left String +_msg -> Maybe a forall a. Maybe a Nothing @@ -74,39 +74,39 @@ -- -- > deriving (Show, IsString) via (UsingRawBytesHex Blah) -- -newtype UsingRawBytesHex a = UsingRawBytesHex a +newtype UsingRawBytesHex a = UsingRawBytesHex a -instance SerialiseAsRawBytes a => Show (UsingRawBytesHex a) where - show :: UsingRawBytesHex a -> String -show (UsingRawBytesHex a -x) = ByteString -> String +instance SerialiseAsRawBytes a => Show (UsingRawBytesHex a) where + show :: UsingRawBytesHex a -> String +show (UsingRawBytesHex a +x) = ByteString -> String forall a. Show a => a -> String show (a -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytesHex a -x) +x) -instance SerialiseAsRawBytes a => IsString (UsingRawBytesHex a) where - fromString :: String -> UsingRawBytesHex a -fromString String -str = +instance SerialiseAsRawBytes a => IsString (UsingRawBytesHex a) where + fromString :: String -> UsingRawBytesHex a +fromString String +str = case ByteString -> Either String ByteString Base16.decode (String -> ByteString BSC.pack String -str) of - Right ByteString -raw -> case AsType a -> ByteString -> Maybe a +str) of + Right ByteString +raw -> case AsType a -> ByteString -> Maybe a forall a. SerialiseAsRawBytes a => AsType a -> ByteString -> Maybe a deserialiseFromRawBytes AsType a -ttoken ByteString -raw of - Just a -x -> a -> UsingRawBytesHex a +ttoken ByteString +raw of + Just a +x -> a -> UsingRawBytesHex a forall a. a -> UsingRawBytesHex a UsingRawBytesHex a -x +x Maybe a Nothing -> String -> UsingRawBytesHex a forall a. HasCallStack => String -> a @@ -116,9 +116,9 @@ ++ ShowS forall a. Show a => a -> String show String -str) - Left String -msg -> String -> UsingRawBytesHex a +str) + Left String +msg -> String -> UsingRawBytesHex a forall a. HasCallStack => String -> a error (String "fromString: invalid hex " String -> ShowS @@ -126,17 +126,17 @@ ++ ShowS forall a. Show a => a -> String show String -str String -> ShowS +str String -> ShowS forall a. [a] -> [a] -> [a] ++ String ", " String -> ShowS forall a. [a] -> [a] -> [a] ++ String -msg) +msg) where - ttoken :: AsType a - ttoken :: AsType a -ttoken = Proxy a -> AsType a + ttoken :: AsType a + ttoken :: AsType a +ttoken = Proxy a -> AsType a forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType Proxy a forall k (t :: k). Proxy t diff --git a/cardano-api/src/Cardano.Api.SerialiseTextEnvelope.html b/cardano-api/src/Cardano.Api.SerialiseTextEnvelope.html index 1a2677052f2..73151766e8d 100644 --- a/cardano-api/src/Cardano.Api.SerialiseTextEnvelope.html +++ b/cardano-api/src/Cardano.Api.SerialiseTextEnvelope.html @@ -72,7 +72,7 @@ -- newtype TextEnvelopeType = TextEnvelopeType String - deriving (TextEnvelopeType -> TextEnvelopeType -> Bool + deriving (TextEnvelopeType -> TextEnvelopeType -> Bool (TextEnvelopeType -> TextEnvelopeType -> Bool) -> (TextEnvelopeType -> TextEnvelopeType -> Bool) -> Eq TextEnvelopeType @@ -81,7 +81,7 @@ $c/= :: TextEnvelopeType -> TextEnvelopeType -> Bool == :: TextEnvelopeType -> TextEnvelopeType -> Bool $c== :: TextEnvelopeType -> TextEnvelopeType -> Bool -Eq, Int -> TextEnvelopeType -> ShowS +Eq, Int -> TextEnvelopeType -> ShowS [TextEnvelopeType] -> ShowS TextEnvelopeType -> String (Int -> TextEnvelopeType -> ShowS) @@ -97,12 +97,12 @@ showsPrec :: Int -> TextEnvelopeType -> ShowS $cshowsPrec :: Int -> TextEnvelopeType -> ShowS Show) - deriving newtype (String -> TextEnvelopeType + deriving newtype (String -> TextEnvelopeType (String -> TextEnvelopeType) -> IsString TextEnvelopeType forall a. (String -> a) -> IsString a fromString :: String -> TextEnvelopeType $cfromString :: String -> TextEnvelopeType -IsString, b -> TextEnvelopeType -> TextEnvelopeType +IsString, b -> TextEnvelopeType -> TextEnvelopeType NonEmpty TextEnvelopeType -> TextEnvelopeType TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType (TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType) @@ -123,7 +123,7 @@ $csconcat :: NonEmpty TextEnvelopeType -> TextEnvelopeType <> :: TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType $c<> :: TextEnvelopeType -> TextEnvelopeType -> TextEnvelopeType -Semigroup, [TextEnvelopeType] -> Value +Semigroup, [TextEnvelopeType] -> Value [TextEnvelopeType] -> Encoding TextEnvelopeType -> Value TextEnvelopeType -> Encoding @@ -146,7 +146,7 @@ $ctoEncoding :: TextEnvelopeType -> Encoding toJSON :: TextEnvelopeType -> Value $ctoJSON :: TextEnvelopeType -> Value -ToJSON, Value -> Parser [TextEnvelopeType] +ToJSON, Value -> Parser [TextEnvelopeType] Value -> Parser TextEnvelopeType (Value -> Parser TextEnvelopeType) -> (Value -> Parser [TextEnvelopeType]) @@ -160,7 +160,7 @@ FromJSON) newtype TextEnvelopeDescr = TextEnvelopeDescr String - deriving (TextEnvelopeDescr -> TextEnvelopeDescr -> Bool + deriving (TextEnvelopeDescr -> TextEnvelopeDescr -> Bool (TextEnvelopeDescr -> TextEnvelopeDescr -> Bool) -> (TextEnvelopeDescr -> TextEnvelopeDescr -> Bool) -> Eq TextEnvelopeDescr @@ -169,7 +169,7 @@ $c/= :: TextEnvelopeDescr -> TextEnvelopeDescr -> Bool == :: TextEnvelopeDescr -> TextEnvelopeDescr -> Bool $c== :: TextEnvelopeDescr -> TextEnvelopeDescr -> Bool -Eq, Int -> TextEnvelopeDescr -> ShowS +Eq, Int -> TextEnvelopeDescr -> ShowS [TextEnvelopeDescr] -> ShowS TextEnvelopeDescr -> String (Int -> TextEnvelopeDescr -> ShowS) @@ -185,12 +185,12 @@ showsPrec :: Int -> TextEnvelopeDescr -> ShowS $cshowsPrec :: Int -> TextEnvelopeDescr -> ShowS Show) - deriving newtype (String -> TextEnvelopeDescr + deriving newtype (String -> TextEnvelopeDescr (String -> TextEnvelopeDescr) -> IsString TextEnvelopeDescr forall a. (String -> a) -> IsString a fromString :: String -> TextEnvelopeDescr $cfromString :: String -> TextEnvelopeDescr -IsString, b -> TextEnvelopeDescr -> TextEnvelopeDescr +IsString, b -> TextEnvelopeDescr -> TextEnvelopeDescr NonEmpty TextEnvelopeDescr -> TextEnvelopeDescr TextEnvelopeDescr -> TextEnvelopeDescr -> TextEnvelopeDescr (TextEnvelopeDescr -> TextEnvelopeDescr -> TextEnvelopeDescr) @@ -211,7 +211,7 @@ $csconcat :: NonEmpty TextEnvelopeDescr -> TextEnvelopeDescr <> :: TextEnvelopeDescr -> TextEnvelopeDescr -> TextEnvelopeDescr $c<> :: TextEnvelopeDescr -> TextEnvelopeDescr -> TextEnvelopeDescr -Semigroup, [TextEnvelopeDescr] -> Value +Semigroup, [TextEnvelopeDescr] -> Value [TextEnvelopeDescr] -> Encoding TextEnvelopeDescr -> Value TextEnvelopeDescr -> Encoding @@ -234,7 +234,7 @@ $ctoEncoding :: TextEnvelopeDescr -> Encoding toJSON :: TextEnvelopeDescr -> Value $ctoJSON :: TextEnvelopeDescr -> Value -ToJSON, Value -> Parser [TextEnvelopeDescr] +ToJSON, Value -> Parser [TextEnvelopeDescr] Value -> Parser TextEnvelopeDescr (Value -> Parser TextEnvelopeDescr) -> (Value -> Parser [TextEnvelopeDescr]) @@ -245,7 +245,7 @@ $cparseJSONList :: Value -> Parser [TextEnvelopeDescr] parseJSON :: Value -> Parser TextEnvelopeDescr $cparseJSON :: Value -> Parser TextEnvelopeDescr -FromJSON) +FromJSON) -- | A 'TextEnvelope' is a structured envelope for serialised binary values -- with an external format with a semi-readable textual format. @@ -264,7 +264,7 @@ teDescription :: !TextEnvelopeDescr , TextEnvelope -> ByteString teRawCBOR :: !ByteString - } deriving (TextEnvelope -> TextEnvelope -> Bool + } deriving (TextEnvelope -> TextEnvelope -> Bool (TextEnvelope -> TextEnvelope -> Bool) -> (TextEnvelope -> TextEnvelope -> Bool) -> Eq TextEnvelope forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -272,7 +272,7 @@ $c/= :: TextEnvelope -> TextEnvelope -> Bool == :: TextEnvelope -> TextEnvelope -> Bool $c== :: TextEnvelope -> TextEnvelope -> Bool -Eq, Int -> TextEnvelope -> ShowS +Eq, Int -> TextEnvelope -> ShowS [TextEnvelope] -> ShowS TextEnvelope -> String (Int -> TextEnvelope -> ShowS) @@ -291,45 +291,45 @@ instance HasTypeProxy TextEnvelope where data AsType TextEnvelope = AsTextEnvelope - proxyToAsType :: Proxy TextEnvelope -> AsType TextEnvelope + proxyToAsType :: Proxy TextEnvelope -> AsType TextEnvelope proxyToAsType Proxy TextEnvelope _ = AsType TextEnvelope AsTextEnvelope -instance ToJSON TextEnvelope where - toJSON :: TextEnvelope -> Value -toJSON TextEnvelope {TextEnvelopeType +instance ToJSON TextEnvelope where + toJSON :: TextEnvelope -> Value +toJSON TextEnvelope {TextEnvelopeType teType :: TextEnvelopeType teType :: TextEnvelope -> TextEnvelopeType -teType, TextEnvelopeDescr +teType, TextEnvelopeDescr teDescription :: TextEnvelopeDescr teDescription :: TextEnvelope -> TextEnvelopeDescr -teDescription, ByteString +teDescription, ByteString teRawCBOR :: ByteString teRawCBOR :: TextEnvelope -> ByteString -teRawCBOR} = +teRawCBOR} = [Pair] -> Value object [ Text "type" Text -> TextEnvelopeType -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TextEnvelopeType -teType +teType , Text "description" Text -> TextEnvelopeDescr -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TextEnvelopeDescr -teDescription +teDescription , Text "cborHex" Text -> Text -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ByteString -> Text Text.decodeUtf8 (ByteString -> ByteString Base16.encode ByteString -teRawCBOR) +teRawCBOR) ] -instance FromJSON TextEnvelope where - parseJSON :: Value -> Parser TextEnvelope +instance FromJSON TextEnvelope where + parseJSON :: Value -> Parser TextEnvelope parseJSON = String -> (Object -> Parser TextEnvelope) -> Value -> Parser TextEnvelope forall a. String -> (Object -> Parser a) -> Value -> Parser a @@ -337,8 +337,8 @@ "TextEnvelope" ((Object -> Parser TextEnvelope) -> Value -> Parser TextEnvelope) -> (Object -> Parser TextEnvelope) -> Value -> Parser TextEnvelope forall a b. (a -> b) -> a -> b -$ \Object -v -> +$ \Object +v -> TextEnvelopeType -> TextEnvelopeDescr -> ByteString -> TextEnvelope TextEnvelope (TextEnvelopeType -> TextEnvelopeDescr -> ByteString -> TextEnvelope) @@ -346,7 +346,7 @@ -> Parser (TextEnvelopeDescr -> ByteString -> TextEnvelope) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> (Object -v Object -> Text -> Parser TextEnvelopeType +v Object -> Text -> Parser TextEnvelopeType forall a. FromJSON a => Object -> Text -> Parser a .: Text "type") @@ -354,7 +354,7 @@ -> Parser TextEnvelopeDescr -> Parser (ByteString -> TextEnvelope) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> (Object -v Object -> Text -> Parser TextEnvelopeDescr +v Object -> Text -> Parser TextEnvelopeDescr forall a. FromJSON a => Object -> Text -> Parser a .: Text "description") @@ -362,17 +362,17 @@ -> Parser ByteString -> Parser TextEnvelope forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> (Value -> Parser ByteString -parseJSONBase16 (Value -> Parser ByteString) -> Parser Value -> Parser ByteString +parseJSONBase16 (Value -> Parser ByteString) -> Parser Value -> Parser ByteString forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< Object -v Object -> Text -> Parser Value +v Object -> Text -> Parser Value forall a. FromJSON a => Object -> Text -> Parser a .: Text "cborHex") where - parseJSONBase16 :: Value -> Parser ByteString -parseJSONBase16 Value -v = + parseJSONBase16 :: Value -> Parser ByteString +parseJSONBase16 Value +v = (String -> Parser ByteString) -> (ByteString -> Parser ByteString) -> Either String ByteString @@ -395,7 +395,7 @@ =<< Value -> Parser Text forall a. FromJSON a => Value -> Parser a parseJSON Value -v +v textEnvelopeJSONConfig :: Config textEnvelopeJSONConfig :: Config @@ -425,7 +425,7 @@ = TextEnvelopeTypeError ![TextEnvelopeType] !TextEnvelopeType -- ^ expected, actual | TextEnvelopeDecodeError !DecoderError | TextEnvelopeAesonDecodeError !String - deriving (TextEnvelopeError -> TextEnvelopeError -> Bool + deriving (TextEnvelopeError -> TextEnvelopeError -> Bool (TextEnvelopeError -> TextEnvelopeError -> Bool) -> (TextEnvelopeError -> TextEnvelopeError -> Bool) -> Eq TextEnvelopeError @@ -434,7 +434,7 @@ $c/= :: TextEnvelopeError -> TextEnvelopeError -> Bool == :: TextEnvelopeError -> TextEnvelopeError -> Bool $c== :: TextEnvelopeError -> TextEnvelopeError -> Bool -Eq, Int -> TextEnvelopeError -> ShowS +Eq, Int -> TextEnvelopeError -> ShowS [TextEnvelopeError] -> ShowS TextEnvelopeError -> String (Int -> TextEnvelopeError -> ShowS) @@ -452,15 +452,15 @@ Show) instance Error TextEnvelopeError where - displayError :: TextEnvelopeError -> String -displayError TextEnvelopeError -tee = + displayError :: TextEnvelopeError -> String +displayError TextEnvelopeError +tee = case TextEnvelopeError -tee of - TextEnvelopeTypeError [TextEnvelopeType String -expType] - (TextEnvelopeType String -actType) -> +tee of + TextEnvelopeTypeError [TextEnvelopeType String +expType] + (TextEnvelopeType String +actType) -> String "TextEnvelope type error: " String -> ShowS @@ -469,18 +469,18 @@ " Expected: " String -> ShowS forall a. Semigroup a => a -> a -> a <> String -expType +expType String -> ShowS forall a. Semigroup a => a -> a -> a <> String " Actual: " String -> ShowS forall a. Semigroup a => a -> a -> a <> String -actType +actType - TextEnvelopeTypeError [TextEnvelopeType] -expTypes (TextEnvelopeType String -actType) -> + TextEnvelopeTypeError [TextEnvelopeType] +expTypes (TextEnvelopeType String +actType) -> String "TextEnvelope type error: " String -> ShowS @@ -494,30 +494,30 @@ List.intercalate String ", " [ String -expType | TextEnvelopeType String -expType <- [TextEnvelopeType] -expTypes ] +expType | TextEnvelopeType String +expType <- [TextEnvelopeType] +expTypes ] String -> ShowS forall a. Semigroup a => a -> a -> a <> String " Actual: " String -> ShowS forall a. Semigroup a => a -> a -> a <> String -actType - TextEnvelopeAesonDecodeError String -decErr -> String +actType + TextEnvelopeAesonDecodeError String +decErr -> String "TextEnvelope aeson decode error: " String -> ShowS forall a. Semigroup a => a -> a -> a <> String -decErr - TextEnvelopeDecodeError DecoderError -decErr -> String +decErr + TextEnvelopeDecodeError DecoderError +decErr -> String "TextEnvelope decode error: " String -> ShowS forall a. Semigroup a => a -> a -> a <> DecoderError -> String forall a. Show a => a -> String show DecoderError -decErr +decErr -- | Check that the \"type\" of the 'TextEnvelope' is as expected. @@ -526,17 +526,17 @@ -- expectTextEnvelopeOfType :: TextEnvelopeType -> TextEnvelope -> Either TextEnvelopeError () expectTextEnvelopeOfType :: TextEnvelopeType -> TextEnvelope -> Either TextEnvelopeError () -expectTextEnvelopeOfType TextEnvelopeType -expectedType TextEnvelope { teType :: TextEnvelope -> TextEnvelopeType -teType = TextEnvelopeType -actualType } = +expectTextEnvelopeOfType TextEnvelopeType +expectedType TextEnvelope { teType :: TextEnvelope -> TextEnvelopeType +teType = TextEnvelopeType +actualType } = Bool -> Either TextEnvelopeError () -> Either TextEnvelopeError () forall (f :: * -> *). Applicative f => Bool -> f () -> f () unless (TextEnvelopeType -expectedType TextEnvelopeType -> TextEnvelopeType -> Bool +expectedType TextEnvelopeType -> TextEnvelopeType -> Bool forall a. Eq a => a -> a -> Bool == TextEnvelopeType -actualType) (Either TextEnvelopeError () -> Either TextEnvelopeError ()) +actualType) (Either TextEnvelopeError () -> Either TextEnvelopeError ()) -> Either TextEnvelopeError () -> Either TextEnvelopeError () forall a b. (a -> b) -> a -> b $ @@ -544,74 +544,74 @@ forall a b. a -> Either a b Left ([TextEnvelopeType] -> TextEnvelopeType -> TextEnvelopeError TextEnvelopeTypeError [TextEnvelopeType -expectedType] TextEnvelopeType -actualType) +expectedType] TextEnvelopeType +actualType) -- ---------------------------------------------------------------------------- -- Serialisation in text envelope format -- -class SerialiseAsCBOR a => HasTextEnvelope a where - textEnvelopeType :: AsType a -> TextEnvelopeType +class SerialiseAsCBOR a => HasTextEnvelope a where + textEnvelopeType :: AsType a -> TextEnvelopeType - textEnvelopeDefaultDescr :: a -> TextEnvelopeDescr - textEnvelopeDefaultDescr a + textEnvelopeDefaultDescr :: a -> TextEnvelopeDescr + textEnvelopeDefaultDescr a _ = TextEnvelopeDescr "" -serialiseToTextEnvelope :: forall a. HasTextEnvelope a - => Maybe TextEnvelopeDescr -> a -> TextEnvelope +serialiseToTextEnvelope :: forall a. HasTextEnvelope a + => Maybe TextEnvelopeDescr -> a -> TextEnvelope serialiseToTextEnvelope :: Maybe TextEnvelopeDescr -> a -> TextEnvelope -serialiseToTextEnvelope Maybe TextEnvelopeDescr -mbDescr a -a = +serialiseToTextEnvelope Maybe TextEnvelopeDescr +mbDescr a +a = TextEnvelope :: TextEnvelopeType -> TextEnvelopeDescr -> ByteString -> TextEnvelope TextEnvelope { teType :: TextEnvelopeType teType = AsType a -> TextEnvelopeType forall a. HasTextEnvelope a => AsType a -> TextEnvelopeType textEnvelopeType AsType a -ttoken +ttoken , teDescription :: TextEnvelopeDescr teDescription = TextEnvelopeDescr -> Maybe TextEnvelopeDescr -> TextEnvelopeDescr forall a. a -> Maybe a -> a fromMaybe (a -> TextEnvelopeDescr forall a. HasTextEnvelope a => a -> TextEnvelopeDescr textEnvelopeDefaultDescr a -a) Maybe TextEnvelopeDescr -mbDescr +a) Maybe TextEnvelopeDescr +mbDescr , teRawCBOR :: ByteString teRawCBOR = a -> ByteString forall a. SerialiseAsCBOR a => a -> ByteString serialiseToCBOR a -a +a } where - ttoken :: AsType a - ttoken :: AsType a -ttoken = Proxy a -> AsType a + ttoken :: AsType a + ttoken :: AsType a +ttoken = Proxy a -> AsType a forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType Proxy a forall k (t :: k). Proxy t Proxy -deserialiseFromTextEnvelope :: HasTextEnvelope a - => AsType a +deserialiseFromTextEnvelope :: HasTextEnvelope a + => AsType a -> TextEnvelope - -> Either TextEnvelopeError a + -> Either TextEnvelopeError a deserialiseFromTextEnvelope :: AsType a -> TextEnvelope -> Either TextEnvelopeError a -deserialiseFromTextEnvelope AsType a -ttoken TextEnvelope -te = do +deserialiseFromTextEnvelope AsType a +ttoken TextEnvelope +te = do TextEnvelopeType -> TextEnvelope -> Either TextEnvelopeError () expectTextEnvelopeOfType (AsType a -> TextEnvelopeType forall a. HasTextEnvelope a => AsType a -> TextEnvelopeType textEnvelopeType AsType a -ttoken) TextEnvelope -te +ttoken) TextEnvelope +te (DecoderError -> TextEnvelopeError) -> Either DecoderError a -> Either TextEnvelopeError a forall (p :: * -> * -> *) a b c. @@ -627,38 +627,38 @@ SerialiseAsCBOR a => AsType a -> ByteString -> Either DecoderError a deserialiseFromCBOR AsType a -ttoken (TextEnvelope -> ByteString +ttoken (TextEnvelope -> ByteString teRawCBOR TextEnvelope -te) --TODO: You have switched from CBOR to JSON +te) --TODO: You have switched from CBOR to JSON -deserialiseFromTextEnvelopeAnyOf :: [FromSomeType HasTextEnvelope b] +deserialiseFromTextEnvelopeAnyOf :: [FromSomeType HasTextEnvelope b] -> TextEnvelope - -> Either TextEnvelopeError b + -> Either TextEnvelopeError b deserialiseFromTextEnvelopeAnyOf :: [FromSomeType HasTextEnvelope b] -> TextEnvelope -> Either TextEnvelopeError b -deserialiseFromTextEnvelopeAnyOf [FromSomeType HasTextEnvelope b] -types TextEnvelope -te = +deserialiseFromTextEnvelopeAnyOf [FromSomeType HasTextEnvelope b] +types TextEnvelope +te = case (FromSomeType HasTextEnvelope b -> Bool) -> [FromSomeType HasTextEnvelope b] -> Maybe (FromSomeType HasTextEnvelope b) forall (t :: * -> *) a. Foldable t => (a -> Bool) -> t a -> Maybe a List.find FromSomeType HasTextEnvelope b -> Bool -matching [FromSomeType HasTextEnvelope b] -types of +matching [FromSomeType HasTextEnvelope b] +types of Maybe (FromSomeType HasTextEnvelope b) Nothing -> TextEnvelopeError -> Either TextEnvelopeError b forall a b. a -> Either a b Left ([TextEnvelopeType] -> TextEnvelopeType -> TextEnvelopeError TextEnvelopeTypeError [TextEnvelopeType] -expectedTypes TextEnvelopeType -actualType) +expectedTypes TextEnvelopeType +actualType) - Just (FromSomeType AsType a -ttoken a -> b -f) -> + Just (FromSomeType AsType a +ttoken a -> b +f) -> (DecoderError -> TextEnvelopeError) -> Either DecoderError b -> Either TextEnvelopeError b forall (p :: * -> * -> *) a b c. @@ -670,41 +670,41 @@ forall a b. (a -> b) -> a -> b $ a -> b -f (a -> b) -> Either DecoderError a -> Either DecoderError b +f (a -> b) -> Either DecoderError a -> Either DecoderError b forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> AsType a -> ByteString -> Either DecoderError a forall a. SerialiseAsCBOR a => AsType a -> ByteString -> Either DecoderError a deserialiseFromCBOR AsType a -ttoken (TextEnvelope -> ByteString +ttoken (TextEnvelope -> ByteString teRawCBOR TextEnvelope -te) +te) where - actualType :: TextEnvelopeType -actualType = TextEnvelope -> TextEnvelopeType + actualType :: TextEnvelopeType +actualType = TextEnvelope -> TextEnvelopeType teType TextEnvelope -te - expectedTypes :: [TextEnvelopeType] -expectedTypes = [ AsType a -> TextEnvelopeType +te + expectedTypes :: [TextEnvelopeType] +expectedTypes = [ AsType a -> TextEnvelopeType forall a. HasTextEnvelope a => AsType a -> TextEnvelopeType textEnvelopeType AsType a -ttoken - | FromSomeType AsType a -ttoken a -> b -_f <- [FromSomeType HasTextEnvelope b] -types ] +ttoken + | FromSomeType AsType a +ttoken a -> b +_f <- [FromSomeType HasTextEnvelope b] +types ] - matching :: FromSomeType HasTextEnvelope b -> Bool -matching (FromSomeType AsType a -ttoken a -> b -_f) = TextEnvelopeType -actualType TextEnvelopeType -> TextEnvelopeType -> Bool + matching :: FromSomeType HasTextEnvelope b -> Bool +matching (FromSomeType AsType a +ttoken a -> b +_f) = TextEnvelopeType +actualType TextEnvelopeType -> TextEnvelopeType -> Bool forall a. Eq a => a -> a -> Bool == AsType a -> TextEnvelopeType forall a. HasTextEnvelope a => AsType a -> TextEnvelopeType textEnvelopeType AsType a -ttoken +ttoken writeFileWithOwnerPermissions @@ -712,9 +712,9 @@ -> ByteString -> IO (Either (FileError ()) ()) writeFileWithOwnerPermissions :: String -> ByteString -> IO (Either (FileError ()) ()) -writeFileWithOwnerPermissions String -targetPath ByteString -a = +writeFileWithOwnerPermissions String +targetPath ByteString +a = IO (String, Handle) -> ((String, Handle) -> IO (Either (FileError Any) Any)) -> ((String, Handle) -> IO (Either (FileError ()) ())) @@ -723,22 +723,22 @@ bracketOnError (String -> String -> IO (String, Handle) openTempFile String -targetDir (String -> IO (String, Handle)) -> String -> IO (String, Handle) +targetDir (String -> IO (String, Handle)) -> String -> IO (String, Handle) forall a b. (a -> b) -> a -> b $ String -targetFile String -> ShowS +targetFile String -> ShowS <.> String "tmp") - (\(String -tmpPath, Handle -fHandle) -> do + (\(String +tmpPath, Handle +fHandle) -> do Handle -> IO () hClose Handle -fHandle IO () -> IO () -> IO () +fHandle IO () -> IO () -> IO () forall (m :: * -> *) a b. Monad m => m a -> m b -> m b >> String -> IO () removeFile String -tmpPath +tmpPath Either (FileError Any) Any -> IO (Either (FileError Any) Any) forall (m :: * -> *) a. Monad m => a -> m a return (Either (FileError Any) Any -> IO (Either (FileError Any) Any)) @@ -754,23 +754,23 @@ $ String -> String -> Handle -> FileError Any forall e. String -> String -> Handle -> FileError e FileErrorTempFile String -targetPath String -tmpPath Handle -fHandle) - (\(String -tmpPath, Handle -fHandle) -> do +targetPath String +tmpPath Handle +fHandle) + (\(String +tmpPath, Handle +fHandle) -> do Handle -> ByteString -> IO () BS.hPut Handle -fHandle ByteString -a +fHandle ByteString +a Handle -> IO () hClose Handle -fHandle +fHandle String -> String -> IO () renameFile String -tmpPath String -targetPath +tmpPath String +targetPath Either (FileError ()) () -> IO (Either (FileError ()) ()) forall (m :: * -> *) a. Monad m => a -> m a return (Either (FileError ()) () -> IO (Either (FileError ()) ())) @@ -780,23 +780,23 @@ forall a b. b -> Either a b Right ()) where - (String -targetDir, String -targetFile) = String -> (String, String) + (String +targetDir, String +targetFile) = String -> (String, String) splitFileName String -targetPath +targetPath -writeFileTextEnvelope :: HasTextEnvelope a +writeFileTextEnvelope :: HasTextEnvelope a => FilePath -> Maybe TextEnvelopeDescr - -> a + -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope :: String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) -writeFileTextEnvelope String -path Maybe TextEnvelopeDescr -mbDescr a -a = +writeFileTextEnvelope String +path Maybe TextEnvelopeDescr +mbDescr a +a = ExceptT (FileError ()) IO () -> IO (Either (FileError ()) ()) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) runExceptT (ExceptT (FileError ()) IO () -> IO (Either (FileError ()) ())) @@ -811,56 +811,56 @@ handleIOExceptT (String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -path) (IO () -> ExceptT (FileError ()) IO ()) +path) (IO () -> ExceptT (FileError ()) IO ()) -> IO () -> ExceptT (FileError ()) IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () BS.writeFile String -path ByteString -content +path ByteString +content where - content :: ByteString -content = Maybe TextEnvelopeDescr -> a -> ByteString + content :: ByteString +content = Maybe TextEnvelopeDescr -> a -> ByteString forall a. HasTextEnvelope a => Maybe TextEnvelopeDescr -> a -> ByteString textEnvelopeToJSON Maybe TextEnvelopeDescr -mbDescr a -a +mbDescr a +a -writeFileTextEnvelopeWithOwnerPermissions - :: HasTextEnvelope a +writeFileTextEnvelopeWithOwnerPermissions + :: HasTextEnvelope a => FilePath -> Maybe TextEnvelopeDescr - -> a + -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelopeWithOwnerPermissions :: String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) -writeFileTextEnvelopeWithOwnerPermissions String -targetPath Maybe TextEnvelopeDescr -mbDescr a -a = +writeFileTextEnvelopeWithOwnerPermissions String +targetPath Maybe TextEnvelopeDescr +mbDescr a +a = String -> ByteString -> IO (Either (FileError ()) ()) writeFileWithOwnerPermissions String -targetPath ByteString -content +targetPath ByteString +content where - content :: ByteString -content = Maybe TextEnvelopeDescr -> a -> ByteString + content :: ByteString +content = Maybe TextEnvelopeDescr -> a -> ByteString forall a. HasTextEnvelope a => Maybe TextEnvelopeDescr -> a -> ByteString textEnvelopeToJSON Maybe TextEnvelopeDescr -mbDescr a -a +mbDescr a +a -textEnvelopeToJSON :: HasTextEnvelope a => Maybe TextEnvelopeDescr -> a -> ByteString +textEnvelopeToJSON :: HasTextEnvelope a => Maybe TextEnvelopeDescr -> a -> ByteString textEnvelopeToJSON :: Maybe TextEnvelopeDescr -> a -> ByteString -textEnvelopeToJSON Maybe TextEnvelopeDescr -mbDescr a -a = +textEnvelopeToJSON Maybe TextEnvelopeDescr +mbDescr a +a = ByteString -> ByteString LBS.toStrict (ByteString -> ByteString) -> ByteString -> ByteString forall a b. (a -> b) -> a -> b @@ -873,22 +873,22 @@ HasTextEnvelope a => Maybe TextEnvelopeDescr -> a -> TextEnvelope serialiseToTextEnvelope Maybe TextEnvelopeDescr -mbDescr a -a) +mbDescr a +a) ByteString -> ByteString -> ByteString forall a. Semigroup a => a -> a -> a <> ByteString "\n" -readFileTextEnvelope :: HasTextEnvelope a - => AsType a +readFileTextEnvelope :: HasTextEnvelope a + => AsType a -> FilePath - -> IO (Either (FileError TextEnvelopeError) a) + -> IO (Either (FileError TextEnvelopeError) a) readFileTextEnvelope :: AsType a -> String -> IO (Either (FileError TextEnvelopeError) a) -readFileTextEnvelope AsType a -ttoken String -path = +readFileTextEnvelope AsType a +ttoken String +path = ExceptT (FileError TextEnvelopeError) IO a -> IO (Either (FileError TextEnvelopeError) a) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) @@ -898,8 +898,8 @@ -> IO (Either (FileError TextEnvelopeError) a) forall a b. (a -> b) -> a -> b $ do - ByteString -content <- (IOException -> FileError TextEnvelopeError) + ByteString +content <- (IOException -> FileError TextEnvelopeError) -> IO ByteString -> ExceptT (FileError TextEnvelopeError) IO ByteString forall (m :: * -> *) x a. @@ -908,14 +908,14 @@ handleIOExceptT (String -> IOException -> FileError TextEnvelopeError forall e. String -> IOException -> FileError e FileIOError String -path) (IO ByteString +path) (IO ByteString -> ExceptT (FileError TextEnvelopeError) IO ByteString) -> IO ByteString -> ExceptT (FileError TextEnvelopeError) IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -path +path (TextEnvelopeError -> FileError TextEnvelopeError) -> ExceptT TextEnvelopeError IO a -> ExceptT (FileError TextEnvelopeError) IO a @@ -925,7 +925,7 @@ firstExceptT (String -> TextEnvelopeError -> FileError TextEnvelopeError forall e. String -> e -> FileError e FileError String -path) (ExceptT TextEnvelopeError IO a +path) (ExceptT TextEnvelopeError IO a -> ExceptT (FileError TextEnvelopeError) IO a) -> ExceptT TextEnvelopeError IO a -> ExceptT (FileError TextEnvelopeError) IO a @@ -936,8 +936,8 @@ -> Either TextEnvelopeError a -> ExceptT TextEnvelopeError IO a forall a b. (a -> b) -> a -> b $ do - TextEnvelope -te <- (String -> TextEnvelopeError) + TextEnvelope +te <- (String -> TextEnvelopeError) -> Either String TextEnvelope -> Either TextEnvelopeError TextEnvelope forall (p :: * -> * -> *) a b c. @@ -952,24 +952,24 @@ $ ByteString -> Either String TextEnvelope forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecodeStrict' ByteString -content +content AsType a -> TextEnvelope -> Either TextEnvelopeError a forall a. HasTextEnvelope a => AsType a -> TextEnvelope -> Either TextEnvelopeError a deserialiseFromTextEnvelope AsType a -ttoken TextEnvelope -te +ttoken TextEnvelope +te -readFileTextEnvelopeAnyOf :: [FromSomeType HasTextEnvelope b] +readFileTextEnvelopeAnyOf :: [FromSomeType HasTextEnvelope b] -> FilePath - -> IO (Either (FileError TextEnvelopeError) b) + -> IO (Either (FileError TextEnvelopeError) b) readFileTextEnvelopeAnyOf :: [FromSomeType HasTextEnvelope b] -> String -> IO (Either (FileError TextEnvelopeError) b) -readFileTextEnvelopeAnyOf [FromSomeType HasTextEnvelope b] -types String -path = +readFileTextEnvelopeAnyOf [FromSomeType HasTextEnvelope b] +types String +path = ExceptT (FileError TextEnvelopeError) IO b -> IO (Either (FileError TextEnvelopeError) b) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) @@ -979,8 +979,8 @@ -> IO (Either (FileError TextEnvelopeError) b) forall a b. (a -> b) -> a -> b $ do - ByteString -content <- (IOException -> FileError TextEnvelopeError) + ByteString +content <- (IOException -> FileError TextEnvelopeError) -> IO ByteString -> ExceptT (FileError TextEnvelopeError) IO ByteString forall (m :: * -> *) x a. @@ -989,14 +989,14 @@ handleIOExceptT (String -> IOException -> FileError TextEnvelopeError forall e. String -> IOException -> FileError e FileIOError String -path) (IO ByteString +path) (IO ByteString -> ExceptT (FileError TextEnvelopeError) IO ByteString) -> IO ByteString -> ExceptT (FileError TextEnvelopeError) IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -path +path (TextEnvelopeError -> FileError TextEnvelopeError) -> ExceptT TextEnvelopeError IO b -> ExceptT (FileError TextEnvelopeError) IO b @@ -1006,7 +1006,7 @@ firstExceptT (String -> TextEnvelopeError -> FileError TextEnvelopeError forall e. String -> e -> FileError e FileError String -path) (ExceptT TextEnvelopeError IO b +path) (ExceptT TextEnvelopeError IO b -> ExceptT (FileError TextEnvelopeError) IO b) -> ExceptT TextEnvelopeError IO b -> ExceptT (FileError TextEnvelopeError) IO b @@ -1017,8 +1017,8 @@ -> Either TextEnvelopeError b -> ExceptT TextEnvelopeError IO b forall a b. (a -> b) -> a -> b $ do - TextEnvelope -te <- (String -> TextEnvelopeError) + TextEnvelope +te <- (String -> TextEnvelopeError) -> Either String TextEnvelope -> Either TextEnvelopeError TextEnvelope forall (p :: * -> * -> *) a b c. @@ -1033,22 +1033,22 @@ $ ByteString -> Either String TextEnvelope forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecodeStrict' ByteString -content +content [FromSomeType HasTextEnvelope b] -> TextEnvelope -> Either TextEnvelopeError b forall b. [FromSomeType HasTextEnvelope b] -> TextEnvelope -> Either TextEnvelopeError b deserialiseFromTextEnvelopeAnyOf [FromSomeType HasTextEnvelope b] -types TextEnvelope -te +types TextEnvelope +te readTextEnvelopeFromFile :: FilePath -> IO (Either (FileError TextEnvelopeError) TextEnvelope) readTextEnvelopeFromFile :: String -> IO (Either (FileError TextEnvelopeError) TextEnvelope) -readTextEnvelopeFromFile String -path = +readTextEnvelopeFromFile String +path = ExceptT (FileError TextEnvelopeError) IO TextEnvelope -> IO (Either (FileError TextEnvelopeError) TextEnvelope) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) @@ -1058,8 +1058,8 @@ -> IO (Either (FileError TextEnvelopeError) TextEnvelope) forall a b. (a -> b) -> a -> b $ do - ByteString -bs <- (IOException -> FileError TextEnvelopeError) + ByteString +bs <- (IOException -> FileError TextEnvelopeError) -> IO ByteString -> ExceptT (FileError TextEnvelopeError) IO ByteString forall (m :: * -> *) x a. @@ -1068,7 +1068,7 @@ handleIOExceptT (String -> IOException -> FileError TextEnvelopeError forall e. String -> IOException -> FileError e FileIOError String -path) (IO ByteString +path) (IO ByteString -> ExceptT (FileError TextEnvelopeError) IO ByteString) -> IO ByteString -> ExceptT (FileError TextEnvelopeError) IO ByteString @@ -1076,7 +1076,7 @@ $ String -> IO ByteString BS.readFile String -path +path (String -> FileError TextEnvelopeError) -> ExceptT String IO TextEnvelope -> ExceptT (FileError TextEnvelopeError) IO TextEnvelope @@ -1086,7 +1086,7 @@ firstExceptT (String -> TextEnvelopeError -> FileError TextEnvelopeError forall e. String -> e -> FileError e FileError String -path (TextEnvelopeError -> FileError TextEnvelopeError) +path (TextEnvelopeError -> FileError TextEnvelopeError) -> (String -> TextEnvelopeError) -> String -> FileError TextEnvelopeError @@ -1109,7 +1109,7 @@ $ ByteString -> Either String TextEnvelope forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecodeStrict' ByteString -bs +bs readTextEnvelopeOfTypeFromFile @@ -1118,9 +1118,9 @@ -> IO (Either (FileError TextEnvelopeError) TextEnvelope) readTextEnvelopeOfTypeFromFile :: TextEnvelopeType -> String -> IO (Either (FileError TextEnvelopeError) TextEnvelope) -readTextEnvelopeOfTypeFromFile TextEnvelopeType -expectedType String -path = +readTextEnvelopeOfTypeFromFile TextEnvelopeType +expectedType String +path = ExceptT (FileError TextEnvelopeError) IO TextEnvelope -> IO (Either (FileError TextEnvelopeError) TextEnvelope) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) @@ -1130,13 +1130,13 @@ -> IO (Either (FileError TextEnvelopeError) TextEnvelope) forall a b. (a -> b) -> a -> b $ do - TextEnvelope -te <- IO (Either (FileError TextEnvelopeError) TextEnvelope) + TextEnvelope +te <- IO (Either (FileError TextEnvelopeError) TextEnvelope) -> ExceptT (FileError TextEnvelopeError) IO TextEnvelope forall e (m :: * -> *) a. m (Either e a) -> ExceptT e m a ExceptT (String -> IO (Either (FileError TextEnvelopeError) TextEnvelope) readTextEnvelopeFromFile String -path) +path) (TextEnvelopeError -> FileError TextEnvelopeError) -> ExceptT TextEnvelopeError IO () -> ExceptT (FileError TextEnvelopeError) IO () @@ -1146,7 +1146,7 @@ firstExceptT (String -> TextEnvelopeError -> FileError TextEnvelopeError forall e. String -> e -> FileError e FileError String -path) (ExceptT TextEnvelopeError IO () +path) (ExceptT TextEnvelopeError IO () -> ExceptT (FileError TextEnvelopeError) IO ()) -> ExceptT TextEnvelopeError IO () -> ExceptT (FileError TextEnvelopeError) IO () @@ -1159,12 +1159,12 @@ $ TextEnvelopeType -> TextEnvelope -> Either TextEnvelopeError () expectTextEnvelopeOfType TextEnvelopeType -expectedType TextEnvelope -te +expectedType TextEnvelope +te TextEnvelope -> ExceptT (FileError TextEnvelopeError) IO TextEnvelope forall (m :: * -> *) a. Monad m => a -> m a return TextEnvelope -te +te \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Shelley.Genesis.html b/cardano-api/src/Cardano.Api.Shelley.Genesis.html index 8f82dbd736f..7795fe98a76 100644 --- a/cardano-api/src/Cardano.Api.Shelley.Genesis.html +++ b/cardano-api/src/Cardano.Api.Shelley.Genesis.html @@ -32,7 +32,7 @@ -- * 'sgMaxLovelaceSupply' must be at least the sum of the 'sgInitialFunds' -- but more if you want to allow for rewards. -- -shelleyGenesisDefaults :: ShelleyGenesis crypto +shelleyGenesisDefaults :: ShelleyGenesis crypto shelleyGenesisDefaults :: ShelleyGenesis crypto shelleyGenesisDefaults = ShelleyGenesis :: forall era. @@ -57,7 +57,7 @@ -- parameters for this specific chain sgSystemStart :: UTCTime sgSystemStart = UTCTime -zeroTime +zeroTime , sgNetworkMagic :: Word32 sgNetworkMagic = Word32 42 @@ -77,11 +77,11 @@ 20 -- 20s block times on average , sgSecurityParam :: Word64 sgSecurityParam = Word64 -k +k , sgEpochLength :: EpochSize sgEpochLength = Word64 -> EpochSize EpochSize (Word64 -k Word64 -> Word64 -> Word64 +k Word64 -> Word64 -> Word64 forall a. Num a => a -> a -> a * Word64 10 Word64 -> Word64 -> Word64 @@ -166,11 +166,11 @@ 0 } where - k :: Word64 -k = Word64 + k :: Word64 +k = Word64 2160 - zeroTime :: UTCTime -zeroTime = Day -> DiffTime -> UTCTime + zeroTime :: UTCTime +zeroTime = Day -> DiffTime -> UTCTime Time.UTCTime (Integer -> Int -> Int -> Day Time.fromGregorian Integer 1970 Int diff --git a/cardano-api/src/Cardano.Api.Shelley.html b/cardano-api/src/Cardano.Api.Shelley.html index 6c87a1b167c..d202b33d015 100644 --- a/cardano-api/src/Cardano.Api.Shelley.html +++ b/cardano-api/src/Cardano.Api.Shelley.html @@ -86,112 +86,114 @@ -- | Embedding additional structured data within transactions. toShelleyMetadata, fromShelleyMetadata, - - -- * Protocol parameters - ProtocolParameters(..), - - -- * Scripts - toShelleyScript, - toShelleyMultiSig, - fromShelleyMultiSig, - toAllegraTimelock, - fromAllegraTimelock, - toShelleyScriptHash, - fromShelleyScriptHash, - PlutusScript(..), - toPlutusData, - fromPlutusData, - toAlonzoData, - fromAlonzoData, - - -- * Certificates - Certificate (..), - toShelleyCertificate, - fromShelleyCertificate, - - -- ** Operational certificates - OperationalCertificate(OperationalCertificate), - OperationalCertificateIssueCounter(OperationalCertificateIssueCounter), - OperationalCertIssueError(..), - - -- * Stake Pool - StakePoolMetadata(StakePoolMetadata), - stakePoolName, - stakePoolDescription, - stakePoolTicker, - stakePoolHomepage, - StakePoolMetadataReference(StakePoolMetadataReference), - stakePoolMetadataURL, - stakePoolMetadataHash, - StakePoolParameters(StakePoolParameters), - stakePoolId, - stakePoolVRF, - stakePoolCost, - stakePoolMargin, - stakePoolRewardAccount, - stakePoolPledge, - stakePoolOwners, - stakePoolRelays, - stakePoolMetadata, - StakePoolRelay - ( StakePoolRelayIp - , StakePoolRelayDnsARecord - , StakePoolRelayDnsSrvRecord - ), - EpochNo(..), - - -- ** Stake pool operator's keys - StakePoolKey, - PoolId, - - -- ** KES keys - KesKey, - KESPeriod(..), - - -- ** VRF keys - VrfKey, - - -- ** Low level protocol interaction with a Cardano node - LocalNodeConnectInfo(LocalNodeConnectInfo), - ShelleyMode, - ConsensusMode - ( ShelleyMode - ), - LocalNodeClientProtocols(LocalNodeClientProtocols), - - -- ** Shelley based eras - ShelleyLedgerEra, - - - -- ** Local State Query - DebugLedgerState(..), - ProtocolState(..), - SerialisedDebugLedgerState(..), - UTxO(..), - - -- ** Conversions - --TODO: arrange not to export these - toShelleyNetwork, - fromShelleyPParams, - - ) where + toShelleyMetadatum, + fromShelleyMetadatum, + + -- * Protocol parameters + ProtocolParameters(..), + + -- * Scripts + toShelleyScript, + toShelleyMultiSig, + fromShelleyMultiSig, + toAllegraTimelock, + fromAllegraTimelock, + toShelleyScriptHash, + fromShelleyScriptHash, + PlutusScript(..), + toPlutusData, + fromPlutusData, + toAlonzoData, + fromAlonzoData, + + -- * Certificates + Certificate (..), + toShelleyCertificate, + fromShelleyCertificate, + + -- ** Operational certificates + OperationalCertificate(OperationalCertificate), + OperationalCertificateIssueCounter(OperationalCertificateIssueCounter), + OperationalCertIssueError(..), + + -- * Stake Pool + StakePoolMetadata(StakePoolMetadata), + stakePoolName, + stakePoolDescription, + stakePoolTicker, + stakePoolHomepage, + StakePoolMetadataReference(StakePoolMetadataReference), + stakePoolMetadataURL, + stakePoolMetadataHash, + StakePoolParameters(StakePoolParameters), + stakePoolId, + stakePoolVRF, + stakePoolCost, + stakePoolMargin, + stakePoolRewardAccount, + stakePoolPledge, + stakePoolOwners, + stakePoolRelays, + stakePoolMetadata, + StakePoolRelay + ( StakePoolRelayIp + , StakePoolRelayDnsARecord + , StakePoolRelayDnsSrvRecord + ), + EpochNo(..), + + -- ** Stake pool operator's keys + StakePoolKey, + PoolId, + + -- ** KES keys + KesKey, + KESPeriod(..), + + -- ** VRF keys + VrfKey, + + -- ** Low level protocol interaction with a Cardano node + LocalNodeConnectInfo(LocalNodeConnectInfo), + ShelleyMode, + ConsensusMode + ( ShelleyMode + ), + LocalNodeClientProtocols(LocalNodeClientProtocols), + + -- ** Shelley based eras + ShelleyLedgerEra, + + + -- ** Local State Query + DebugLedgerState(..), + ProtocolState(..), + SerialisedDebugLedgerState(..), + UTxO(..), + + -- ** Conversions + --TODO: arrange not to export these + toShelleyNetwork, + fromShelleyPParams, -import Cardano.Api -import Cardano.Api.Address -import Cardano.Api.Certificate -import Cardano.Api.Eras -import Cardano.Api.IPC -import Cardano.Api.KeysPraos -import Cardano.Api.KeysShelley -import Cardano.Api.NetworkId -import Cardano.Api.OperationalCertificate -import Cardano.Api.ProtocolParameters -import Cardano.Api.Query -import Cardano.Api.Script -import Cardano.Api.Shelley.Genesis -import Cardano.Api.StakePoolMetadata -import Cardano.Api.Tx -import Cardano.Api.TxBody -import Cardano.Api.TxMetadata -import Cardano.Api.Value - \ No newline at end of file + ) where + +import Cardano.Api +import Cardano.Api.Address +import Cardano.Api.Certificate +import Cardano.Api.Eras +import Cardano.Api.IPC +import Cardano.Api.KeysPraos +import Cardano.Api.KeysShelley +import Cardano.Api.NetworkId +import Cardano.Api.OperationalCertificate +import Cardano.Api.ProtocolParameters +import Cardano.Api.Query +import Cardano.Api.Script +import Cardano.Api.Shelley.Genesis +import Cardano.Api.StakePoolMetadata +import Cardano.Api.Tx +import Cardano.Api.TxBody +import Cardano.Api.TxMetadata +import Cardano.Api.Value + \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.SpecialByron.html b/cardano-api/src/Cardano.Api.SpecialByron.html index f86252a9f25..650c3a0f31a 100644 --- a/cardano-api/src/Cardano.Api.SpecialByron.html +++ b/cardano-api/src/Cardano.Api.SpecialByron.html @@ -48,7 +48,7 @@ newtype ByronUpdateProposal = ByronUpdateProposal { ByronUpdateProposal -> AProposal ByteString unByronUpdateProposal :: AProposal ByteString} - deriving (ByronUpdateProposal -> ByronUpdateProposal -> Bool + deriving (ByronUpdateProposal -> ByronUpdateProposal -> Bool (ByronUpdateProposal -> ByronUpdateProposal -> Bool) -> (ByronUpdateProposal -> ByronUpdateProposal -> Bool) -> Eq ByronUpdateProposal @@ -57,7 +57,7 @@ $c/= :: ByronUpdateProposal -> ByronUpdateProposal -> Bool == :: ByronUpdateProposal -> ByronUpdateProposal -> Bool $c== :: ByronUpdateProposal -> ByronUpdateProposal -> Bool -Eq, Int -> ByronUpdateProposal -> ShowS +Eq, Int -> ByronUpdateProposal -> ShowS [ByronUpdateProposal] -> ShowS ByronUpdateProposal -> String (Int -> ByronUpdateProposal -> ShowS) @@ -76,51 +76,51 @@ instance HasTypeProxy ByronUpdateProposal where data AsType ByronUpdateProposal = AsByronUpdateProposal - proxyToAsType :: Proxy ByronUpdateProposal -> AsType ByronUpdateProposal + proxyToAsType :: Proxy ByronUpdateProposal -> AsType ByronUpdateProposal proxyToAsType Proxy ByronUpdateProposal _ = AsType ByronUpdateProposal AsByronUpdateProposal instance SerialiseAsRawBytes ByronUpdateProposal where - serialiseToRawBytes :: ByronUpdateProposal -> ByteString -serialiseToRawBytes (ByronUpdateProposal AProposal ByteString -proposal) = AProposal ByteString -> ByteString + serialiseToRawBytes :: ByronUpdateProposal -> ByteString +serialiseToRawBytes (ByronUpdateProposal AProposal ByteString +proposal) = AProposal ByteString -> ByteString forall a. AProposal a -> a annotation AProposal ByteString -proposal - deserialiseFromRawBytes :: AsType ByronUpdateProposal +proposal + deserialiseFromRawBytes :: AsType ByronUpdateProposal -> ByteString -> Maybe ByronUpdateProposal deserialiseFromRawBytes AsType ByronUpdateProposal -AsByronUpdateProposal ByteString -bs = - let lBs :: ByteString -lBs = ByteString -> ByteString +AsByronUpdateProposal ByteString +bs = + let lBs :: ByteString +lBs = ByteString -> ByteString LB.fromStrict ByteString -bs +bs in case ByteString -> Either DecoderError (AProposal ByteSpan) forall a. FromCBOR a => ByteString -> Either DecoderError a Binary.decodeFull ByteString -lBs of - Left DecoderError -_deserFail -> Maybe ByronUpdateProposal +lBs of + Left DecoderError +_deserFail -> Maybe ByronUpdateProposal forall a. Maybe a Nothing - Right AProposal ByteSpan -proposal -> ByronUpdateProposal -> Maybe ByronUpdateProposal + Right AProposal ByteSpan +proposal -> ByronUpdateProposal -> Maybe ByronUpdateProposal forall a. a -> Maybe a Just (AProposal ByteString -> ByronUpdateProposal ByronUpdateProposal AProposal ByteString -proposal') +proposal') where - proposal' :: AProposal ByteString - proposal' :: AProposal ByteString -proposal' = ByteString -> AProposal ByteSpan -> AProposal ByteString + proposal' :: AProposal ByteString + proposal' :: AProposal ByteString +proposal' = ByteString -> AProposal ByteSpan -> AProposal ByteString forall (f :: * -> *). Functor f => ByteString -> f ByteSpan -> f ByteString Binary.annotationBytes ByteString -lBs AProposal ByteSpan -proposal +lBs AProposal ByteSpan +proposal makeByronUpdateProposal :: NetworkId @@ -139,26 +139,26 @@ -> SomeByronSigningKey -> ByronProtocolParametersUpdate -> ByronUpdateProposal -makeByronUpdateProposal NetworkId -nId ProtocolVersion -pVer SoftwareVersion -sVer SystemTag -sysTag InstallerHash -insHash - SomeByronSigningKey -bWit ByronProtocolParametersUpdate -paramsToUpdate = - let nonAnnotatedProposal :: AProposal () - nonAnnotatedProposal :: AProposal () -nonAnnotatedProposal = ProtocolMagicId -> ProposalBody -> SafeSigner -> AProposal () +makeByronUpdateProposal NetworkId +nId ProtocolVersion +pVer SoftwareVersion +sVer SystemTag +sysTag InstallerHash +insHash + SomeByronSigningKey +bWit ByronProtocolParametersUpdate +paramsToUpdate = + let nonAnnotatedProposal :: AProposal () + nonAnnotatedProposal :: AProposal () +nonAnnotatedProposal = ProtocolMagicId -> ProposalBody -> SafeSigner -> AProposal () signProposal (NetworkId -> ProtocolMagicId toByronProtocolMagicId NetworkId -nId) ProposalBody -proposalBody SafeSigner -noPassSigningKey - annotatedPropBody :: Binary.Annotated ProposalBody ByteString - annotatedPropBody :: Annotated ProposalBody ByteString -annotatedPropBody = Annotated ProposalBody () -> Annotated ProposalBody ByteString +nId) ProposalBody +proposalBody SafeSigner +noPassSigningKey + annotatedPropBody :: Binary.Annotated ProposalBody ByteString + annotatedPropBody :: Annotated ProposalBody ByteString +annotatedPropBody = Annotated ProposalBody () -> Annotated ProposalBody ByteString forall a b. ToCBOR a => Annotated a b -> Annotated a ByteString Binary.reAnnotate (Annotated ProposalBody () -> Annotated ProposalBody ByteString) -> Annotated ProposalBody () -> Annotated ProposalBody ByteString @@ -166,58 +166,58 @@ $ AProposal () -> Annotated ProposalBody () forall a. AProposal a -> Annotated ProposalBody a aBody AProposal () -nonAnnotatedProposal +nonAnnotatedProposal in AProposal ByteString -> ByronUpdateProposal ByronUpdateProposal (AProposal ByteString -> ByronUpdateProposal) -> AProposal ByteString -> ByronUpdateProposal forall a b. (a -> b) -> a -> b $ AProposal () -nonAnnotatedProposal { $sel:aBody:AProposal :: Annotated ProposalBody ByteString +nonAnnotatedProposal { $sel:aBody:AProposal :: Annotated ProposalBody ByteString aBody = Annotated ProposalBody ByteString -annotatedPropBody +annotatedPropBody , $sel:annotation:AProposal :: ByteString annotation = AProposal () -> ByteString forall a. ToCBOR a => a -> ByteString Binary.serialize' AProposal () -nonAnnotatedProposal +nonAnnotatedProposal } where - proposalBody :: ProposalBody - proposalBody :: ProposalBody -proposalBody = ProtocolVersion + proposalBody :: ProposalBody + proposalBody :: ProposalBody +proposalBody = ProtocolVersion -> ProtocolParametersUpdate -> SoftwareVersion -> Map SystemTag InstallerHash -> ProposalBody ProposalBody ProtocolVersion -pVer ProtocolParametersUpdate -protocolParamsUpdate SoftwareVersion -sVer Map SystemTag InstallerHash -metaData +pVer ProtocolParametersUpdate +protocolParamsUpdate SoftwareVersion +sVer Map SystemTag InstallerHash +metaData - metaData :: M.Map SystemTag InstallerHash - metaData :: Map SystemTag InstallerHash -metaData = SystemTag -> InstallerHash -> Map SystemTag InstallerHash + metaData :: M.Map SystemTag InstallerHash + metaData :: Map SystemTag InstallerHash +metaData = SystemTag -> InstallerHash -> Map SystemTag InstallerHash forall k a. k -> a -> Map k a M.singleton SystemTag -sysTag InstallerHash -insHash +sysTag InstallerHash +insHash - noPassSigningKey :: SafeSigner - noPassSigningKey :: SafeSigner -noPassSigningKey = SigningKey -> SafeSigner + noPassSigningKey :: SafeSigner + noPassSigningKey :: SafeSigner +noPassSigningKey = SigningKey -> SafeSigner noPassSafeSigner (SigningKey -> SafeSigner) -> SigningKey -> SafeSigner forall a b. (a -> b) -> a -> b $ SomeByronSigningKey -> SigningKey toByronSigningKey SomeByronSigningKey -bWit +bWit - protocolParamsUpdate :: ProtocolParametersUpdate - protocolParamsUpdate :: ProtocolParametersUpdate -protocolParamsUpdate = ByronProtocolParametersUpdate -> ProtocolParametersUpdate + protocolParamsUpdate :: ProtocolParametersUpdate + protocolParamsUpdate :: ProtocolParametersUpdate +protocolParamsUpdate = ByronProtocolParametersUpdate -> ProtocolParametersUpdate makeProtocolParametersUpdate ByronProtocolParametersUpdate -paramsToUpdate +paramsToUpdate data ByronProtocolParametersUpdate = ByronProtocolParametersUpdate @@ -267,7 +267,7 @@ bPpuUnlockStakeEpoch :: !(Maybe EpochNumber) -- ^ This has been re-purposed for unlocking the OuroborosBFT logic in the software. -- Relevant: [CDEC-610](https://iohk.myjetbrains.com/youtrack/issue/CDEC-610) - } deriving Int -> ByronProtocolParametersUpdate -> ShowS + } deriving Int -> ByronProtocolParametersUpdate -> ShowS [ByronProtocolParametersUpdate] -> ShowS ByronProtocolParametersUpdate -> String (Int -> ByronProtocolParametersUpdate -> ShowS) @@ -288,8 +288,8 @@ :: ByronProtocolParametersUpdate -> ProtocolParametersUpdate makeProtocolParametersUpdate :: ByronProtocolParametersUpdate -> ProtocolParametersUpdate -makeProtocolParametersUpdate ByronProtocolParametersUpdate -apiPpu = +makeProtocolParametersUpdate ByronProtocolParametersUpdate +apiPpu = ProtocolParametersUpdate :: Maybe Word16 -> Maybe Natural -> Maybe Natural @@ -309,76 +309,76 @@ { ppuScriptVersion :: Maybe Word16 ppuScriptVersion = ByronProtocolParametersUpdate -> Maybe Word16 bPpuScriptVersion ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuSlotDuration :: Maybe Natural ppuSlotDuration = ByronProtocolParametersUpdate -> Maybe Natural bPpuSlotDuration ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuMaxBlockSize :: Maybe Natural ppuMaxBlockSize = ByronProtocolParametersUpdate -> Maybe Natural bPpuMaxBlockSize ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuMaxHeaderSize :: Maybe Natural ppuMaxHeaderSize = ByronProtocolParametersUpdate -> Maybe Natural bPpuMaxHeaderSize ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuMaxTxSize :: Maybe Natural ppuMaxTxSize = ByronProtocolParametersUpdate -> Maybe Natural bPpuMaxTxSize ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuMaxProposalSize :: Maybe Natural ppuMaxProposalSize = ByronProtocolParametersUpdate -> Maybe Natural bPpuMaxProposalSize ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuMpcThd :: Maybe LovelacePortion ppuMpcThd = ByronProtocolParametersUpdate -> Maybe LovelacePortion bPpuMpcThd ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuHeavyDelThd :: Maybe LovelacePortion ppuHeavyDelThd = ByronProtocolParametersUpdate -> Maybe LovelacePortion bPpuHeavyDelThd ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuUpdateVoteThd :: Maybe LovelacePortion ppuUpdateVoteThd = ByronProtocolParametersUpdate -> Maybe LovelacePortion bPpuUpdateVoteThd ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuUpdateProposalThd :: Maybe LovelacePortion ppuUpdateProposalThd = ByronProtocolParametersUpdate -> Maybe LovelacePortion bPpuUpdateProposalThd ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuUpdateProposalTTL :: Maybe SlotNumber ppuUpdateProposalTTL = ByronProtocolParametersUpdate -> Maybe SlotNumber bPpuUpdateProposalTTL ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuSoftforkRule :: Maybe SoftforkRule ppuSoftforkRule = ByronProtocolParametersUpdate -> Maybe SoftforkRule bPpuSoftforkRule ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuTxFeePolicy :: Maybe TxFeePolicy ppuTxFeePolicy = ByronProtocolParametersUpdate -> Maybe TxFeePolicy bPpuTxFeePolicy ByronProtocolParametersUpdate -apiPpu +apiPpu , ppuUnlockStakeEpoch :: Maybe EpochNumber ppuUnlockStakeEpoch = ByronProtocolParametersUpdate -> Maybe EpochNumber bPpuUnlockStakeEpoch ByronProtocolParametersUpdate -apiPpu +apiPpu } toByronLedgerUpdateProposal :: ByronUpdateProposal -> Mempool.GenTx ByronBlock toByronLedgerUpdateProposal :: ByronUpdateProposal -> GenTx ByronBlock -toByronLedgerUpdateProposal (ByronUpdateProposal AProposal ByteString -proposal) = +toByronLedgerUpdateProposal (ByronUpdateProposal AProposal ByteString +proposal) = UpId -> AProposal ByteString -> GenTx ByronBlock Mempool.ByronUpdateProposal (AProposal ByteString -> UpId recoverUpId AProposal ByteString -proposal) AProposal ByteString -proposal +proposal) AProposal ByteString +proposal -- | Byron era votes newtype ByronVote = ByronVote { ByronVote -> AVote ByteString unByronVote :: ByronVote.AVote ByteString } - deriving (ByronVote -> ByronVote -> Bool + deriving (ByronVote -> ByronVote -> Bool (ByronVote -> ByronVote -> Bool) -> (ByronVote -> ByronVote -> Bool) -> Eq ByronVote forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -386,7 +386,7 @@ $c/= :: ByronVote -> ByronVote -> Bool == :: ByronVote -> ByronVote -> Bool $c== :: ByronVote -> ByronVote -> Bool -Eq, Int -> ByronVote -> ShowS +Eq, Int -> ByronVote -> ShowS [ByronVote] -> ShowS ByronVote -> String (Int -> ByronVote -> ShowS) @@ -405,15 +405,15 @@ instance HasTypeProxy ByronVote where data AsType ByronVote = AsByronVote - proxyToAsType :: Proxy ByronVote -> AsType ByronVote -proxyToAsType Proxy ByronVote + proxyToAsType :: Proxy ByronVote -> AsType ByronVote +proxyToAsType Proxy ByronVote _ = AsType ByronVote AsByronVote instance SerialiseAsRawBytes ByronVote where - serialiseToRawBytes :: ByronVote -> ByteString -serialiseToRawBytes (ByronVote AVote ByteString -vote) = AVote () -> ByteString + serialiseToRawBytes :: ByronVote -> ByteString +serialiseToRawBytes (ByronVote AVote ByteString +vote) = AVote () -> ByteString forall a. ToCBOR a => a -> ByteString Binary.serialize' (AVote () -> ByteString) -> AVote () -> ByteString forall a b. (a -> b) -> a -> b @@ -422,25 +422,25 @@ fmap (() -> ByteString -> () forall a b. a -> b -> a const ()) AVote ByteString -vote - deserialiseFromRawBytes :: AsType ByronVote -> ByteString -> Maybe ByronVote -deserialiseFromRawBytes AsType ByronVote -AsByronVote ByteString -bs = - let lBs :: ByteString -lBs = ByteString -> ByteString +vote + deserialiseFromRawBytes :: AsType ByronVote -> ByteString -> Maybe ByronVote +deserialiseFromRawBytes AsType ByronVote +AsByronVote ByteString +bs = + let lBs :: ByteString +lBs = ByteString -> ByteString LB.fromStrict ByteString -bs +bs in case ByteString -> Either DecoderError (AVote ByteSpan) forall a. FromCBOR a => ByteString -> Either DecoderError a Binary.decodeFull ByteString -lBs of - Left DecoderError -_deserFail -> Maybe ByronVote +lBs of + Left DecoderError +_deserFail -> Maybe ByronVote forall a. Maybe a Nothing - Right AVote ByteSpan -vote -> ByronVote -> Maybe ByronVote + Right AVote ByteSpan +vote -> ByronVote -> Maybe ByronVote forall a. a -> Maybe a Just (ByronVote -> Maybe ByronVote) -> (AVote ByteString -> ByronVote) @@ -452,21 +452,21 @@ -> AVote ByteString -> Maybe ByronVote forall a b. (a -> b) -> a -> b $ AVote ByteSpan -> ByteString -> AVote ByteString -annotateVote AVote ByteSpan -vote ByteString -lBs +annotateVote AVote ByteSpan +vote ByteString +lBs where - annotateVote :: ByronVote.AVote Binary.ByteSpan -> LB.ByteString -> ByronVote.AVote ByteString - annotateVote :: AVote ByteSpan -> ByteString -> AVote ByteString -annotateVote AVote ByteSpan -vote ByteString -bs' = ByteString -> AVote ByteSpan -> AVote ByteString + annotateVote :: ByronVote.AVote Binary.ByteSpan -> LB.ByteString -> ByronVote.AVote ByteString + annotateVote :: AVote ByteSpan -> ByteString -> AVote ByteString +annotateVote AVote ByteSpan +vote ByteString +bs' = ByteString -> AVote ByteSpan -> AVote ByteString forall (f :: * -> *). Functor f => ByteString -> f ByteSpan -> f ByteString Binary.annotationBytes ByteString -bs' AVote ByteSpan -vote +bs' AVote ByteSpan +vote makeByronVote @@ -477,28 +477,28 @@ -> ByronVote makeByronVote :: NetworkId -> SomeByronSigningKey -> ByronUpdateProposal -> Bool -> ByronVote -makeByronVote NetworkId -nId SomeByronSigningKey -sKey (ByronUpdateProposal AProposal ByteString -proposal) Bool -yesOrNo = - let signingKey :: SigningKey -signingKey = SomeByronSigningKey -> SigningKey +makeByronVote NetworkId +nId SomeByronSigningKey +sKey (ByronUpdateProposal AProposal ByteString +proposal) Bool +yesOrNo = + let signingKey :: SigningKey +signingKey = SomeByronSigningKey -> SigningKey toByronSigningKey SomeByronSigningKey -sKey - nonAnnotatedVote :: ByronVote.AVote () - nonAnnotatedVote :: AVote () -nonAnnotatedVote = ProtocolMagicId -> SigningKey -> UpId -> Bool -> AVote () +sKey + nonAnnotatedVote :: ByronVote.AVote () + nonAnnotatedVote :: AVote () +nonAnnotatedVote = ProtocolMagicId -> SigningKey -> UpId -> Bool -> AVote () mkVote (NetworkId -> ProtocolMagicId toByronProtocolMagicId NetworkId -nId) SigningKey -signingKey (AProposal ByteString -> UpId +nId) SigningKey +signingKey (AProposal ByteString -> UpId recoverUpId AProposal ByteString -proposal) Bool -yesOrNo - annotatedProposalId :: Binary.Annotated UpId ByteString - annotatedProposalId :: Annotated UpId ByteString -annotatedProposalId = Annotated UpId () -> Annotated UpId ByteString +proposal) Bool +yesOrNo + annotatedProposalId :: Binary.Annotated UpId ByteString + annotatedProposalId :: Annotated UpId ByteString +annotatedProposalId = Annotated UpId () -> Annotated UpId ByteString forall a b. ToCBOR a => Annotated a b -> Annotated a ByteString Binary.reAnnotate (Annotated UpId () -> Annotated UpId ByteString) -> Annotated UpId () -> Annotated UpId ByteString @@ -506,28 +506,28 @@ $ AVote () -> Annotated UpId () forall a. AVote a -> Annotated UpId a ByronVote.aProposalId AVote () -nonAnnotatedVote +nonAnnotatedVote in AVote ByteString -> ByronVote ByronVote (AVote ByteString -> ByronVote) -> AVote ByteString -> ByronVote forall a b. (a -> b) -> a -> b $ AVote () -nonAnnotatedVote { aProposalId :: Annotated UpId ByteString +nonAnnotatedVote { aProposalId :: Annotated UpId ByteString ByronVote.aProposalId = Annotated UpId ByteString -annotatedProposalId +annotatedProposalId , annotation :: ByteString ByronVote.annotation = Annotated UpId ByteString -> ByteString forall b a. Annotated b a -> a Binary.annotation Annotated UpId ByteString -annotatedProposalId +annotatedProposalId } toByronLedgertoByronVote :: ByronVote -> Mempool.GenTx ByronBlock toByronLedgertoByronVote :: ByronVote -> GenTx ByronBlock -toByronLedgertoByronVote (ByronVote AVote ByteString -vote) = VoteId -> AVote ByteString -> GenTx ByronBlock +toByronLedgertoByronVote (ByronVote AVote ByteString +vote) = VoteId -> AVote ByteString -> GenTx ByronBlock Mempool.ByronUpdateVote (AVote ByteString -> VoteId recoverVoteId AVote ByteString -vote) AVote ByteString -vote +vote) AVote ByteString +vote \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.StakePoolMetadata.html b/cardano-api/src/Cardano.Api.StakePoolMetadata.html index e5f2f16150e..161e37437e4 100644 --- a/cardano-api/src/Cardano.Api.StakePoolMetadata.html +++ b/cardano-api/src/Cardano.Api.StakePoolMetadata.html @@ -70,7 +70,7 @@ , StakePoolMetadata -> Text stakePoolHomepage :: !Text } - deriving (StakePoolMetadata -> StakePoolMetadata -> Bool + deriving (StakePoolMetadata -> StakePoolMetadata -> Bool (StakePoolMetadata -> StakePoolMetadata -> Bool) -> (StakePoolMetadata -> StakePoolMetadata -> Bool) -> Eq StakePoolMetadata @@ -79,7 +79,7 @@ $c/= :: StakePoolMetadata -> StakePoolMetadata -> Bool == :: StakePoolMetadata -> StakePoolMetadata -> Bool $c== :: StakePoolMetadata -> StakePoolMetadata -> Bool -Eq, Int -> StakePoolMetadata -> ShowS +Eq, Int -> StakePoolMetadata -> ShowS [StakePoolMetadata] -> ShowS StakePoolMetadata -> String (Int -> StakePoolMetadata -> ShowS) @@ -98,7 +98,7 @@ newtype instance Hash StakePoolMetadata = StakePoolMetadataHash (Shelley.Hash StandardCrypto ByteString) - deriving (Hash StakePoolMetadata -> Hash StakePoolMetadata -> Bool + deriving (Hash StakePoolMetadata -> Hash StakePoolMetadata -> Bool (Hash StakePoolMetadata -> Hash StakePoolMetadata -> Bool) -> (Hash StakePoolMetadata -> Hash StakePoolMetadata -> Bool) -> Eq (Hash StakePoolMetadata) @@ -107,7 +107,7 @@ $c/= :: Hash StakePoolMetadata -> Hash StakePoolMetadata -> Bool == :: Hash StakePoolMetadata -> Hash StakePoolMetadata -> Bool $c== :: Hash StakePoolMetadata -> Hash StakePoolMetadata -> Bool -Eq, Int -> Hash StakePoolMetadata -> ShowS +Eq, Int -> Hash StakePoolMetadata -> ShowS [Hash StakePoolMetadata] -> ShowS Hash StakePoolMetadata -> String (Int -> Hash StakePoolMetadata -> ShowS) @@ -126,23 +126,23 @@ instance HasTypeProxy StakePoolMetadata where data AsType StakePoolMetadata = AsStakePoolMetadata - proxyToAsType :: Proxy StakePoolMetadata -> AsType StakePoolMetadata + proxyToAsType :: Proxy StakePoolMetadata -> AsType StakePoolMetadata proxyToAsType Proxy StakePoolMetadata _ = AsType StakePoolMetadata AsStakePoolMetadata instance SerialiseAsRawBytes (Hash StakePoolMetadata) where - serialiseToRawBytes :: Hash StakePoolMetadata -> ByteString -serialiseToRawBytes (StakePoolMetadataHash h) = Hash Blake2b_256 ByteString -> ByteString + serialiseToRawBytes :: Hash StakePoolMetadata -> ByteString +serialiseToRawBytes (StakePoolMetadataHash h) = Hash Blake2b_256 ByteString -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash StandardCrypto ByteString Hash Blake2b_256 ByteString -h +h - deserialiseFromRawBytes :: AsType (Hash StakePoolMetadata) + deserialiseFromRawBytes :: AsType (Hash StakePoolMetadata) -> ByteString -> Maybe (Hash StakePoolMetadata) -deserialiseFromRawBytes (AsHash AsStakePoolMetadata) ByteString -bs = +deserialiseFromRawBytes (AsHash AsStakePoolMetadata) ByteString +bs = Hash StandardCrypto ByteString -> Hash StakePoolMetadata Hash Blake2b_256 ByteString -> Hash StakePoolMetadata StakePoolMetadataHash (Hash Blake2b_256 ByteString -> Hash StakePoolMetadata) @@ -152,12 +152,12 @@ <$> ByteString -> Maybe (Hash Blake2b_256 ByteString) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs --TODO: instance ToJSON StakePoolMetadata where -instance FromJSON StakePoolMetadata where - parseJSON :: Value -> Parser StakePoolMetadata +instance FromJSON StakePoolMetadata where + parseJSON :: Value -> Parser StakePoolMetadata parseJSON = String -> (Object -> Parser StakePoolMetadata) @@ -171,8 +171,8 @@ -> Value -> Parser StakePoolMetadata forall a b. (a -> b) -> a -> b -$ \Object -obj -> +$ \Object +obj -> Text -> Text -> Text -> Text -> StakePoolMetadata StakePoolMetadata (Text -> Text -> Text -> Text -> StakePoolMetadata) @@ -180,25 +180,25 @@ -> Parser (Text -> Text -> Text -> StakePoolMetadata) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -> Parser Text -parseName Object -obj +parseName Object +obj Parser (Text -> Text -> Text -> StakePoolMetadata) -> Parser Text -> Parser (Text -> Text -> StakePoolMetadata) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -> Parser Text -parseDescription Object -obj +parseDescription Object +obj Parser (Text -> Text -> StakePoolMetadata) -> Parser Text -> Parser (Text -> StakePoolMetadata) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -> Parser Text -parseTicker Object -obj +parseTicker Object +obj Parser (Text -> StakePoolMetadata) -> Parser Text -> Parser StakePoolMetadata forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -obj Object -> Text -> Parser Text +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "homepage" @@ -207,26 +207,26 @@ -- Parse and validate the stake pool metadata name from a JSON object. -- The name must be 50 characters or fewer. -- - parseName :: Aeson.Object -> Aeson.Parser Text - parseName :: Object -> Parser Text -parseName Object -obj = do - Text -name <- Object -obj Object -> Text -> Parser Text + parseName :: Aeson.Object -> Aeson.Parser Text + parseName :: Object -> Parser Text +parseName Object +obj = do + Text +name <- Object +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "name" if Text -> Int Text.length Text -name Int -> Int -> Bool +name Int -> Int -> Bool forall a. Ord a => a -> a -> Bool <= Int 50 then Text -> Parser Text forall (f :: * -> *) a. Applicative f => a -> f a pure Text -name +name else String -> Parser Text forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser Text) -> String -> Parser Text @@ -239,7 +239,7 @@ forall a. Show a => a -> String show (Text -> Int Text.length Text -name) +name) String -> ShowS forall a. Semigroup a => a -> a -> a <> String @@ -248,26 +248,26 @@ -- Parse and validate the stake pool metadata description -- The description must be 255 characters or fewer. -- - parseDescription :: Aeson.Object -> Aeson.Parser Text - parseDescription :: Object -> Parser Text -parseDescription Object -obj = do - Text -description <- Object -obj Object -> Text -> Parser Text + parseDescription :: Aeson.Object -> Aeson.Parser Text + parseDescription :: Object -> Parser Text +parseDescription Object +obj = do + Text +description <- Object +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "description" if Text -> Int Text.length Text -description Int -> Int -> Bool +description Int -> Int -> Bool forall a. Ord a => a -> a -> Bool <= Int 255 then Text -> Parser Text forall (f :: * -> *) a. Applicative f => a -> f a pure Text -description +description else String -> Parser Text forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser Text) -> String -> Parser Text @@ -281,7 +281,7 @@ forall a. Show a => a -> String show (Text -> Int Text.length Text -description) +description) String -> ShowS forall a. Semigroup a => a -> a -> a <> String @@ -290,34 +290,34 @@ -- | Parse and validate the stake pool ticker description -- The ticker must be 3 to 5 characters long. -- - parseTicker :: Aeson.Object -> Aeson.Parser Text - parseTicker :: Object -> Parser Text -parseTicker Object -obj = do - Text -ticker <- Object -obj Object -> Text -> Parser Text + parseTicker :: Aeson.Object -> Aeson.Parser Text + parseTicker :: Object -> Parser Text +parseTicker Object +obj = do + Text +ticker <- Object +obj Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "ticker" - let tickerLen :: Int -tickerLen = Text -> Int + let tickerLen :: Int +tickerLen = Text -> Int Text.length Text -ticker +ticker if Int -tickerLen Int -> Int -> Bool +tickerLen Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 3 Bool -> Bool -> Bool && Int -tickerLen Int -> Int -> Bool +tickerLen Int -> Int -> Bool forall a. Ord a => a -> a -> Bool <= Int 5 then Text -> Parser Text forall (f :: * -> *) a. Applicative f => a -> f a pure Text -ticker +ticker else String -> Parser Text forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser Text) -> String -> Parser Text @@ -335,7 +335,7 @@ forall a. Show a => a -> String show (Text -> Int Text.length Text -ticker) +ticker) String -> ShowS forall a. Semigroup a => a -> a -> a <> String @@ -351,7 +351,7 @@ -- ^ Maximum byte length. !Int -- ^ Actual byte length. - deriving Int -> StakePoolMetadataValidationError -> ShowS + deriving Int -> StakePoolMetadataValidationError -> ShowS [StakePoolMetadataValidationError] -> ShowS StakePoolMetadataValidationError -> String (Int -> StakePoolMetadataValidationError -> ShowS) @@ -369,13 +369,13 @@ Show instance Error StakePoolMetadataValidationError where - displayError :: StakePoolMetadataValidationError -> String -displayError (StakePoolMetadataJsonDecodeError String -errStr) = String -errStr - displayError (StakePoolMetadataInvalidLengthError Int -maxLen Int -actualLen) = + displayError :: StakePoolMetadataValidationError -> String +displayError (StakePoolMetadataJsonDecodeError String +errStr) = String +errStr + displayError (StakePoolMetadataInvalidLengthError Int +maxLen Int +actualLen) = String "Stake pool metadata must consist of at most " String -> ShowS @@ -383,7 +383,7 @@ <> Int -> String forall a. Show a => a -> String show Int -maxLen +maxLen String -> ShowS forall a. Semigroup a => a -> a -> a <> String @@ -393,7 +393,7 @@ <> Int -> String forall a. Show a => a -> String show Int -actualLen +actualLen String -> ShowS forall a. Semigroup a => a -> a -> a <> String @@ -410,16 +410,16 @@ -> Either StakePoolMetadataValidationError (StakePoolMetadata, Hash StakePoolMetadata) -validateAndHashStakePoolMetadata ByteString -bs +validateAndHashStakePoolMetadata ByteString +bs | ByteString -> Int BS.length ByteString -bs Int -> Int -> Bool +bs Int -> Int -> Bool forall a. Ord a => a -> a -> Bool <= Int 512 = do - StakePoolMetadata -md <- (String -> StakePoolMetadataValidationError) + StakePoolMetadata +md <- (String -> StakePoolMetadataValidationError) -> Either String StakePoolMetadata -> Either StakePoolMetadataValidationError StakePoolMetadata forall (p :: * -> * -> *) a b c. @@ -430,24 +430,24 @@ (ByteString -> Either String StakePoolMetadata forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecodeStrict' ByteString -bs) - let mdh :: Hash StakePoolMetadata -mdh = Hash StandardCrypto ByteString -> Hash StakePoolMetadata +bs) + let mdh :: Hash StakePoolMetadata +mdh = Hash StandardCrypto ByteString -> Hash StakePoolMetadata StakePoolMetadataHash ((ByteString -> ByteString) -> ByteString -> Hash Blake2b_256 ByteString forall h a. HashAlgorithm h => (a -> ByteString) -> a -> Hash h a Crypto.hashWith ByteString -> ByteString forall a. a -> a id ByteString -bs) +bs) (StakePoolMetadata, Hash StakePoolMetadata) -> Either StakePoolMetadataValidationError (StakePoolMetadata, Hash StakePoolMetadata) forall (m :: * -> *) a. Monad m => a -> m a return (StakePoolMetadata -md, Hash StakePoolMetadata -mdh) +md, Hash StakePoolMetadata +mdh) | Bool otherwise = StakePoolMetadataValidationError -> Either @@ -467,6 +467,6 @@ StakePoolMetadataInvalidLengthError Int 512 (ByteString -> Int BS.length ByteString -bs) +bs) \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Tx.html b/cardano-api/src/Cardano.Api.Tx.html index bb46685d1a6..641422ce984 100644 --- a/cardano-api/src/Cardano.Api.Tx.html +++ b/cardano-api/src/Cardano.Api.Tx.html @@ -115,84 +115,84 @@ -- Signed transactions -- -data Tx era where +data Tx era where ByronTx :: Byron.ATxAux ByteString -> Tx ByronEra - ShelleyTx - :: ShelleyBasedEra era - -> Ledger.Tx (ShelleyLedgerEra era) - -> Tx era + ShelleyTx + :: ShelleyBasedEra era + -> Ledger.Tx (ShelleyLedgerEra era) + -> Tx era -- The GADT in the ShelleyTx case requires a custom instance -instance Eq (Tx era) where - == :: Tx era -> Tx era -> Bool -(==) (ByronTx ATxAux ByteString -txA) - (ByronTx ATxAux ByteString -txB) = ATxAux ByteString -txA ATxAux ByteString -> ATxAux ByteString -> Bool +instance Eq (Tx era) where + == :: Tx era -> Tx era -> Bool +(==) (ByronTx ATxAux ByteString +txA) + (ByronTx ATxAux ByteString +txB) = ATxAux ByteString +txA ATxAux ByteString -> ATxAux ByteString -> Bool forall a. Eq a => a -> a -> Bool == ATxAux ByteString -txB +txB - (==) (ShelleyTx ShelleyBasedEra era -era Tx (ShelleyLedgerEra era) -txA) + (==) (ShelleyTx ShelleyBasedEra era +era Tx (ShelleyLedgerEra era) +txA) (ShelleyTx ShelleyBasedEra era -_ Tx (ShelleyLedgerEra era) -txB) = +_ Tx (ShelleyLedgerEra era) +txB) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> Tx StandardShelley Tx (ShelleyLedgerEra era) -txA Tx StandardShelley -> Tx StandardShelley -> Bool +txA Tx StandardShelley -> Tx StandardShelley -> Bool forall a. Eq a => a -> a -> Bool == Tx StandardShelley Tx (ShelleyLedgerEra era) -txB +txB ShelleyBasedEra era ShelleyBasedEraAllegra -> Tx StandardAllegra Tx (ShelleyLedgerEra era) -txA Tx StandardAllegra -> Tx StandardAllegra -> Bool +txA Tx StandardAllegra -> Tx StandardAllegra -> Bool forall a. Eq a => a -> a -> Bool == Tx StandardAllegra Tx (ShelleyLedgerEra era) -txB +txB ShelleyBasedEra era ShelleyBasedEraMary -> Tx StandardMary Tx (ShelleyLedgerEra era) -txA Tx StandardMary -> Tx StandardMary -> Bool +txA Tx StandardMary -> Tx StandardMary -> Bool forall a. Eq a => a -> a -> Bool == Tx StandardMary Tx (ShelleyLedgerEra era) -txB +txB ShelleyBasedEra era ShelleyBasedEraAlonzo -> Tx StandardAlonzo Tx (ShelleyLedgerEra era) -txA Tx StandardAlonzo -> Tx StandardAlonzo -> Bool +txA Tx StandardAlonzo -> Tx StandardAlonzo -> Bool forall a. Eq a => a -> a -> Bool == Tx StandardAlonzo Tx (ShelleyLedgerEra era) -txB +txB - (==) ByronTx{} (ShelleyTx ShelleyBasedEra era -era Tx (ShelleyLedgerEra era) + (==) ByronTx{} (ShelleyTx ShelleyBasedEra era +era Tx (ShelleyLedgerEra era) _) = case ShelleyBasedEra era -era of {} +era of {} -- The GADT in the ShelleyTx case requires a custom instance -instance Show (Tx era) where - showsPrec :: Int -> Tx era -> ShowS -showsPrec Int -p (ByronTx ATxAux ByteString -tx) = +instance Show (Tx era) where + showsPrec :: Int -> Tx era -> ShowS +showsPrec Int +p (ByronTx ATxAux ByteString +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -207,15 +207,15 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 ATxAux ByteString -tx +tx - showsPrec Int -p (ShelleyTx ShelleyBasedEra era -ShelleyBasedEraShelley Tx (ShelleyLedgerEra era) -tx) = + showsPrec Int +p (ShelleyTx ShelleyBasedEra era +ShelleyBasedEraShelley Tx (ShelleyLedgerEra era) +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -231,15 +231,15 @@ showsPrec Int 11 Tx StandardShelley Tx (ShelleyLedgerEra era) -tx +tx - showsPrec Int -p (ShelleyTx ShelleyBasedEra era -ShelleyBasedEraAllegra Tx (ShelleyLedgerEra era) -tx) = + showsPrec Int +p (ShelleyTx ShelleyBasedEra era +ShelleyBasedEraAllegra Tx (ShelleyLedgerEra era) +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -255,15 +255,15 @@ showsPrec Int 11 Tx StandardAllegra Tx (ShelleyLedgerEra era) -tx +tx - showsPrec Int -p (ShelleyTx ShelleyBasedEra era -ShelleyBasedEraMary Tx (ShelleyLedgerEra era) -tx) = + showsPrec Int +p (ShelleyTx ShelleyBasedEra era +ShelleyBasedEraMary Tx (ShelleyLedgerEra era) +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -279,15 +279,15 @@ showsPrec Int 11 Tx StandardMary Tx (ShelleyLedgerEra era) -tx +tx - showsPrec Int -p (ShelleyTx ShelleyBasedEra era -ShelleyBasedEraAlonzo Tx (ShelleyLedgerEra era) -tx) = + showsPrec Int +p (ShelleyTx ShelleyBasedEra era +ShelleyBasedEraAlonzo Tx (ShelleyLedgerEra era) +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -303,12 +303,12 @@ showsPrec Int 11 Tx StandardAlonzo Tx (ShelleyLedgerEra era) -tx +tx -instance HasTypeProxy era => HasTypeProxy (Tx era) where - data AsType (Tx era) = AsTx (AsType era) - proxyToAsType :: Proxy (Tx era) -> AsType (Tx era) +instance HasTypeProxy era => HasTypeProxy (Tx era) where + data AsType (Tx era) = AsTx (AsType era) + proxyToAsType :: Proxy (Tx era) -> AsType (Tx era) proxyToAsType Proxy (Tx era) _ = AsType era -> AsType (Tx era) forall era. AsType era -> AsType (Tx era) @@ -316,7 +316,7 @@ forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType (Proxy era forall k (t :: k). Proxy t -Proxy :: Proxy era)) +Proxy :: Proxy era)) pattern AsByronTx :: AsType (Tx ByronEra) pattern $bAsByronTx :: AsType (Tx ByronEra) @@ -332,51 +332,51 @@ {-# COMPLETE AsShelleyTx #-} -instance IsCardanoEra era => SerialiseAsCBOR (Tx era) where - serialiseToCBOR :: Tx era -> ByteString -serialiseToCBOR (ByronTx ATxAux ByteString -tx) = ATxAux ByteString -> ByteString +instance IsCardanoEra era => SerialiseAsCBOR (Tx era) where + serialiseToCBOR :: Tx era -> ByteString +serialiseToCBOR (ByronTx ATxAux ByteString +tx) = ATxAux ByteString -> ByteString forall t. Decoded t => t -> ByteString CBOR.recoverBytes ATxAux ByteString -tx +tx - serialiseToCBOR (ShelleyTx ShelleyBasedEra era -era Tx (ShelleyLedgerEra era) -tx) = + serialiseToCBOR (ShelleyTx ShelleyBasedEra era +era Tx (ShelleyLedgerEra era) +tx) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> Tx StandardShelley -> ByteString forall tx. ToCBOR tx => tx -> ByteString serialiseShelleyBasedTx Tx StandardShelley Tx (ShelleyLedgerEra era) -tx +tx ShelleyBasedEra era ShelleyBasedEraAllegra -> Tx StandardAllegra -> ByteString forall tx. ToCBOR tx => tx -> ByteString serialiseShelleyBasedTx Tx StandardAllegra Tx (ShelleyLedgerEra era) -tx +tx ShelleyBasedEra era ShelleyBasedEraMary -> Tx StandardMary -> ByteString forall tx. ToCBOR tx => tx -> ByteString serialiseShelleyBasedTx Tx StandardMary Tx (ShelleyLedgerEra era) -tx +tx ShelleyBasedEra era ShelleyBasedEraAlonzo -> Tx StandardAlonzo -> ByteString forall tx. ToCBOR tx => tx -> ByteString serialiseShelleyBasedTx Tx StandardAlonzo Tx (ShelleyLedgerEra era) -tx +tx - deserialiseFromCBOR :: AsType (Tx era) -> ByteString -> Either DecoderError (Tx era) + deserialiseFromCBOR :: AsType (Tx era) -> ByteString -> Either DecoderError (Tx era) deserialiseFromCBOR AsType (Tx era) -_ ByteString -bs = +_ ByteString +bs = case CardanoEra era forall era. IsCardanoEra era => CardanoEra era -cardanoEra :: CardanoEra era of +cardanoEra :: CardanoEra era of CardanoEra era ByronEra -> ATxAux ByteString -> Tx ByronEra @@ -401,7 +401,7 @@ forall a s. FromCBOR a => Decoder s a fromCBOR (ByteString -> LByteString LBS.fromStrict ByteString -bs) +bs) -- Use the same derialisation impl, but at different types: CardanoEra era @@ -417,7 +417,7 @@ ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era ShelleyTx ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley) ByteString -bs +bs CardanoEra era AllegraEra -> (Tx StandardAllegra -> Tx AllegraEra) -> ByteString -> Either DecoderError (Tx AllegraEra) @@ -431,7 +431,7 @@ ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era ShelleyTx ShelleyBasedEra AllegraEra ShelleyBasedEraAllegra) ByteString -bs +bs CardanoEra era MaryEra -> (Tx StandardMary -> Tx MaryEra) -> ByteString -> Either DecoderError (Tx MaryEra) @@ -445,7 +445,7 @@ ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era ShelleyTx ShelleyBasedEra MaryEra ShelleyBasedEraMary) ByteString -bs +bs CardanoEra era AlonzoEra -> (Tx StandardAlonzo -> Tx AlonzoEra) -> ByteString -> Either DecoderError (Tx AlonzoEra) @@ -459,27 +459,27 @@ ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era ShelleyTx ShelleyBasedEra AlonzoEra ShelleyBasedEraAlonzo) ByteString -bs +bs -- | The serialisation format for the different Shelley-based eras are not the -- same, but they can be handled generally with one overloaded implementation. -- -serialiseShelleyBasedTx :: ToCBOR tx => tx -> ByteString +serialiseShelleyBasedTx :: ToCBOR tx => tx -> ByteString serialiseShelleyBasedTx :: tx -> ByteString serialiseShelleyBasedTx = tx -> ByteString forall tx. ToCBOR tx => tx -> ByteString CBOR.serialize' -deserialiseShelleyBasedTx :: FromCBOR (CBOR.Annotator tx) - => (tx -> tx') +deserialiseShelleyBasedTx :: FromCBOR (CBOR.Annotator tx) + => (tx -> tx') -> ByteString - -> Either CBOR.DecoderError tx' + -> Either CBOR.DecoderError tx' deserialiseShelleyBasedTx :: (tx -> tx') -> ByteString -> Either DecoderError tx' -deserialiseShelleyBasedTx tx -> tx' -mkTx ByteString -bs = +deserialiseShelleyBasedTx tx -> tx' +mkTx ByteString +bs = tx -> tx' -mkTx (tx -> tx') -> Either DecoderError tx -> Either DecoderError tx' +mkTx (tx -> tx') -> Either DecoderError tx -> Either DecoderError tx' forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Text -> (forall s. Decoder s (Annotator tx)) @@ -495,16 +495,16 @@ forall a s. FromCBOR a => Decoder s a fromCBOR (ByteString -> LByteString LBS.fromStrict ByteString -bs) +bs) -instance IsCardanoEra era => HasTextEnvelope (Tx era) where - textEnvelopeType :: AsType (Tx era) -> TextEnvelopeType +instance IsCardanoEra era => HasTextEnvelope (Tx era) where + textEnvelopeType :: AsType (Tx era) -> TextEnvelopeType textEnvelopeType AsType (Tx era) _ = case CardanoEra era forall era. IsCardanoEra era => CardanoEra era -cardanoEra :: CardanoEra era of +cardanoEra :: CardanoEra era of CardanoEra era ByronEra -> TextEnvelopeType "TxSignedByron" @@ -522,108 +522,108 @@ "Tx AlonzoEra" -data KeyWitness era where +data KeyWitness era where ByronKeyWitness :: Byron.TxInWitness -> KeyWitness ByronEra - ShelleyBootstrapWitness - :: ShelleyBasedEra era + ShelleyBootstrapWitness + :: ShelleyBasedEra era -> Shelley.BootstrapWitness StandardCrypto - -> KeyWitness era + -> KeyWitness era - ShelleyKeyWitness - :: ShelleyBasedEra era + ShelleyKeyWitness + :: ShelleyBasedEra era -> Shelley.WitVKey Shelley.Witness StandardCrypto - -> KeyWitness era + -> KeyWitness era -- The GADT in the Shelley cases requires a custom instance -instance Eq (KeyWitness era) where - == :: KeyWitness era -> KeyWitness era -> Bool -(==) (ByronKeyWitness TxInWitness -wA) - (ByronKeyWitness TxInWitness -wB) = TxInWitness -wA TxInWitness -> TxInWitness -> Bool +instance Eq (KeyWitness era) where + == :: KeyWitness era -> KeyWitness era -> Bool +(==) (ByronKeyWitness TxInWitness +wA) + (ByronKeyWitness TxInWitness +wB) = TxInWitness +wA TxInWitness -> TxInWitness -> Bool forall a. Eq a => a -> a -> Bool == TxInWitness -wB +wB - (==) (ShelleyBootstrapWitness ShelleyBasedEra era -era BootstrapWitness StandardCrypto -wA) + (==) (ShelleyBootstrapWitness ShelleyBasedEra era +era BootstrapWitness StandardCrypto +wA) (ShelleyBootstrapWitness ShelleyBasedEra era -_ BootstrapWitness StandardCrypto -wB) = +_ BootstrapWitness StandardCrypto +wB) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> BootstrapWitness StandardCrypto -wA BootstrapWitness StandardCrypto +wA BootstrapWitness StandardCrypto -> BootstrapWitness StandardCrypto -> Bool forall a. Eq a => a -> a -> Bool == BootstrapWitness StandardCrypto -wB +wB ShelleyBasedEra era ShelleyBasedEraAllegra -> BootstrapWitness StandardCrypto -wA BootstrapWitness StandardCrypto +wA BootstrapWitness StandardCrypto -> BootstrapWitness StandardCrypto -> Bool forall a. Eq a => a -> a -> Bool == BootstrapWitness StandardCrypto -wB +wB ShelleyBasedEra era ShelleyBasedEraMary -> BootstrapWitness StandardCrypto -wA BootstrapWitness StandardCrypto +wA BootstrapWitness StandardCrypto -> BootstrapWitness StandardCrypto -> Bool forall a. Eq a => a -> a -> Bool == BootstrapWitness StandardCrypto -wB +wB ShelleyBasedEra era ShelleyBasedEraAlonzo -> BootstrapWitness StandardCrypto -wA BootstrapWitness StandardCrypto +wA BootstrapWitness StandardCrypto -> BootstrapWitness StandardCrypto -> Bool forall a. Eq a => a -> a -> Bool == BootstrapWitness StandardCrypto -wB +wB - (==) (ShelleyKeyWitness ShelleyBasedEra era -era WitVKey 'Witness StandardCrypto -wA) + (==) (ShelleyKeyWitness ShelleyBasedEra era +era WitVKey 'Witness StandardCrypto +wA) (ShelleyKeyWitness ShelleyBasedEra era -_ WitVKey 'Witness StandardCrypto -wB) = +_ WitVKey 'Witness StandardCrypto +wB) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> WitVKey 'Witness StandardCrypto -wA WitVKey 'Witness StandardCrypto +wA WitVKey 'Witness StandardCrypto -> WitVKey 'Witness StandardCrypto -> Bool forall a. Eq a => a -> a -> Bool == WitVKey 'Witness StandardCrypto -wB +wB ShelleyBasedEra era ShelleyBasedEraAllegra -> WitVKey 'Witness StandardCrypto -wA WitVKey 'Witness StandardCrypto +wA WitVKey 'Witness StandardCrypto -> WitVKey 'Witness StandardCrypto -> Bool forall a. Eq a => a -> a -> Bool == WitVKey 'Witness StandardCrypto -wB +wB ShelleyBasedEra era ShelleyBasedEraMary -> WitVKey 'Witness StandardCrypto -wA WitVKey 'Witness StandardCrypto +wA WitVKey 'Witness StandardCrypto -> WitVKey 'Witness StandardCrypto -> Bool forall a. Eq a => a -> a -> Bool == WitVKey 'Witness StandardCrypto -wB +wB ShelleyBasedEra era ShelleyBasedEraAlonzo -> WitVKey 'Witness StandardCrypto -wA WitVKey 'Witness StandardCrypto +wA WitVKey 'Witness StandardCrypto -> WitVKey 'Witness StandardCrypto -> Bool forall a. Eq a => a -> a -> Bool == WitVKey 'Witness StandardCrypto -wB +wB (==) KeyWitness era _ KeyWitness era @@ -633,14 +633,14 @@ -- The GADT in the ShelleyTx case requires a custom instance --TODO: once we start providing custom patterns we should do the show in terms -- of those. It'll be less verbose too! -instance Show (KeyWitness era) where - showsPrec :: Int -> KeyWitness era -> ShowS -showsPrec Int -p (ByronKeyWitness TxInWitness -tx) = +instance Show (KeyWitness era) where + showsPrec :: Int -> KeyWitness era -> ShowS +showsPrec Int +p (ByronKeyWitness TxInWitness +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -655,15 +655,15 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 TxInWitness -tx +tx - showsPrec Int -p (ShelleyBootstrapWitness ShelleyBasedEra era -ShelleyBasedEraShelley BootstrapWitness StandardCrypto -tx) = + showsPrec Int +p (ShelleyBootstrapWitness ShelleyBasedEra era +ShelleyBasedEraShelley BootstrapWitness StandardCrypto +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -678,15 +678,15 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 BootstrapWitness StandardCrypto -tx +tx - showsPrec Int -p (ShelleyBootstrapWitness ShelleyBasedEra era -ShelleyBasedEraAllegra BootstrapWitness StandardCrypto -tx) = + showsPrec Int +p (ShelleyBootstrapWitness ShelleyBasedEra era +ShelleyBasedEraAllegra BootstrapWitness StandardCrypto +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -701,15 +701,15 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 BootstrapWitness StandardCrypto -tx +tx - showsPrec Int -p (ShelleyBootstrapWitness ShelleyBasedEra era -ShelleyBasedEraMary BootstrapWitness StandardCrypto -tx) = + showsPrec Int +p (ShelleyBootstrapWitness ShelleyBasedEra era +ShelleyBasedEraMary BootstrapWitness StandardCrypto +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -724,15 +724,15 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 BootstrapWitness StandardCrypto -tx +tx - showsPrec Int -p (ShelleyBootstrapWitness ShelleyBasedEra era -ShelleyBasedEraAlonzo BootstrapWitness StandardCrypto -tx) = + showsPrec Int +p (ShelleyBootstrapWitness ShelleyBasedEra era +ShelleyBasedEraAlonzo BootstrapWitness StandardCrypto +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -747,15 +747,15 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 BootstrapWitness StandardCrypto -tx +tx - showsPrec Int -p (ShelleyKeyWitness ShelleyBasedEra era -ShelleyBasedEraShelley WitVKey 'Witness StandardCrypto -tx) = + showsPrec Int +p (ShelleyKeyWitness ShelleyBasedEra era +ShelleyBasedEraShelley WitVKey 'Witness StandardCrypto +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -770,15 +770,15 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 WitVKey 'Witness StandardCrypto -tx +tx - showsPrec Int -p (ShelleyKeyWitness ShelleyBasedEra era -ShelleyBasedEraAllegra WitVKey 'Witness StandardCrypto -tx) = + showsPrec Int +p (ShelleyKeyWitness ShelleyBasedEra era +ShelleyBasedEraAllegra WitVKey 'Witness StandardCrypto +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -793,15 +793,15 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 WitVKey 'Witness StandardCrypto -tx +tx - showsPrec Int -p (ShelleyKeyWitness ShelleyBasedEra era -ShelleyBasedEraMary WitVKey 'Witness StandardCrypto -tx) = + showsPrec Int +p (ShelleyKeyWitness ShelleyBasedEra era +ShelleyBasedEraMary WitVKey 'Witness StandardCrypto +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -816,15 +816,15 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 WitVKey 'Witness StandardCrypto -tx +tx - showsPrec Int -p (ShelleyKeyWitness ShelleyBasedEra era -ShelleyBasedEraAlonzo WitVKey 'Witness StandardCrypto -tx) = + showsPrec Int +p (ShelleyKeyWitness ShelleyBasedEra era +ShelleyBasedEraAlonzo WitVKey 'Witness StandardCrypto +tx) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) (ShowS -> ShowS) -> ShowS -> ShowS @@ -839,20 +839,20 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 WitVKey 'Witness StandardCrypto -tx +tx -instance HasTypeProxy era => HasTypeProxy (KeyWitness era) where - data AsType (KeyWitness era) = AsKeyWitness (AsType era) - proxyToAsType :: Proxy (KeyWitness era) -> AsType (KeyWitness era) -proxyToAsType Proxy (KeyWitness era) +instance HasTypeProxy era => HasTypeProxy (KeyWitness era) where + data AsType (KeyWitness era) = AsKeyWitness (AsType era) + proxyToAsType :: Proxy (KeyWitness era) -> AsType (KeyWitness era) +proxyToAsType Proxy (KeyWitness era) _ = AsType era -> AsType (KeyWitness era) forall era. AsType era -> AsType (KeyWitness era) AsKeyWitness (Proxy era -> AsType era forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType (Proxy era forall k (t :: k). Proxy t -Proxy :: Proxy era)) +Proxy :: Proxy era)) pattern AsByronWitness :: AsType (KeyWitness ByronEra) pattern $bAsByronWitness :: AsType (KeyWitness ByronEra) @@ -869,17 +869,17 @@ {-# COMPLETE AsShelleyWitness #-} -instance IsCardanoEra era => SerialiseAsCBOR (KeyWitness era) where - serialiseToCBOR :: KeyWitness era -> ByteString -serialiseToCBOR (ByronKeyWitness TxInWitness -wit) = TxInWitness -> ByteString +instance IsCardanoEra era => SerialiseAsCBOR (KeyWitness era) where + serialiseToCBOR :: KeyWitness era -> ByteString +serialiseToCBOR (ByronKeyWitness TxInWitness +wit) = TxInWitness -> ByteString forall tx. ToCBOR tx => tx -> ByteString CBOR.serialize' TxInWitness -wit +wit - serialiseToCBOR (ShelleyKeyWitness ShelleyBasedEra era -_era WitVKey 'Witness StandardCrypto -wit) = + serialiseToCBOR (ShelleyKeyWitness ShelleyBasedEra era +_era WitVKey 'Witness StandardCrypto +wit) = Encoding -> ByteString CBOR.serializeEncoding' (Encoding -> ByteString) -> Encoding -> ByteString forall a b. (a -> b) -> a -> b @@ -887,11 +887,11 @@ WitVKey 'Witness StandardCrypto -> Encoding forall w. ToCBOR w => w -> Encoding encodeShelleyBasedKeyWitness WitVKey 'Witness StandardCrypto -wit +wit - serialiseToCBOR (ShelleyBootstrapWitness ShelleyBasedEra era -_era BootstrapWitness StandardCrypto -wit) = + serialiseToCBOR (ShelleyBootstrapWitness ShelleyBasedEra era +_era BootstrapWitness StandardCrypto +wit) = Encoding -> ByteString CBOR.serializeEncoding' (Encoding -> ByteString) -> Encoding -> ByteString forall a b. (a -> b) -> a -> b @@ -899,16 +899,16 @@ BootstrapWitness StandardCrypto -> Encoding forall w. ToCBOR w => w -> Encoding encodeShelleyBasedBootstrapWitness BootstrapWitness StandardCrypto -wit +wit - deserialiseFromCBOR :: AsType (KeyWitness era) + deserialiseFromCBOR :: AsType (KeyWitness era) -> ByteString -> Either DecoderError (KeyWitness era) -deserialiseFromCBOR AsType (KeyWitness era) -_ ByteString -bs = +deserialiseFromCBOR AsType (KeyWitness era) +_ ByteString +bs = case CardanoEra era forall era. IsCardanoEra era => CardanoEra era -cardanoEra :: CardanoEra era of +cardanoEra :: CardanoEra era of CardanoEra era ByronEra -> TxInWitness -> KeyWitness ByronEra @@ -919,7 +919,7 @@ <$> ByteString -> Either DecoderError TxInWitness forall a. FromCBOR a => ByteString -> Either DecoderError a CBOR.decodeFull' ByteString -bs +bs -- Use the same derialisation impl, but at different types: CardanoEra era @@ -930,7 +930,7 @@ -> ByteString -> Either DecoderError (KeyWitness era) decodeShelleyBasedWitness ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley ByteString -bs +bs CardanoEra era AllegraEra -> ShelleyBasedEra AllegraEra -> ByteString -> Either DecoderError (KeyWitness AllegraEra) @@ -939,7 +939,7 @@ -> ByteString -> Either DecoderError (KeyWitness era) decodeShelleyBasedWitness ShelleyBasedEra AllegraEra ShelleyBasedEraAllegra ByteString -bs +bs CardanoEra era MaryEra -> ShelleyBasedEra MaryEra -> ByteString -> Either DecoderError (KeyWitness MaryEra) @@ -948,7 +948,7 @@ -> ByteString -> Either DecoderError (KeyWitness era) decodeShelleyBasedWitness ShelleyBasedEra MaryEra ShelleyBasedEraMary ByteString -bs +bs CardanoEra era AlonzoEra -> ShelleyBasedEra AlonzoEra -> ByteString -> Either DecoderError (KeyWitness AlonzoEra) @@ -957,13 +957,13 @@ -> ByteString -> Either DecoderError (KeyWitness era) decodeShelleyBasedWitness ShelleyBasedEra AlonzoEra ShelleyBasedEraAlonzo ByteString -bs +bs -encodeShelleyBasedKeyWitness :: ToCBOR w => w -> CBOR.Encoding +encodeShelleyBasedKeyWitness :: ToCBOR w => w -> CBOR.Encoding encodeShelleyBasedKeyWitness :: w -> Encoding -encodeShelleyBasedKeyWitness w -wit = +encodeShelleyBasedKeyWitness w +wit = Word -> Encoding CBOR.encodeListLen Word 2 Encoding -> Encoding -> Encoding @@ -975,12 +975,12 @@ <> w -> Encoding forall w. ToCBOR w => w -> Encoding toCBOR w -wit +wit -encodeShelleyBasedBootstrapWitness :: ToCBOR w => w -> CBOR.Encoding +encodeShelleyBasedBootstrapWitness :: ToCBOR w => w -> CBOR.Encoding encodeShelleyBasedBootstrapWitness :: w -> Encoding -encodeShelleyBasedBootstrapWitness w -wit = +encodeShelleyBasedBootstrapWitness w +wit = Word -> Encoding CBOR.encodeListLen Word 2 Encoding -> Encoding -> Encoding @@ -992,16 +992,16 @@ <> w -> Encoding forall w. ToCBOR w => w -> Encoding toCBOR w -wit +wit -decodeShelleyBasedWitness :: forall era. - ShelleyBasedEra era +decodeShelleyBasedWitness :: forall era. + ShelleyBasedEra era -> ByteString - -> Either CBOR.DecoderError (KeyWitness era) + -> Either CBOR.DecoderError (KeyWitness era) decodeShelleyBasedWitness :: ShelleyBasedEra era -> ByteString -> Either DecoderError (KeyWitness era) -decodeShelleyBasedWitness ShelleyBasedEra era -era = +decodeShelleyBasedWitness ShelleyBasedEra era +era = Text -> (forall s. Decoder s (Annotator (KeyWitness era))) -> LByteString @@ -1013,7 +1013,7 @@ -> Either DecoderError a CBOR.decodeAnnotator Text "Shelley Witness" forall s. Decoder s (Annotator (KeyWitness era)) -decode (LByteString -> Either DecoderError (KeyWitness era)) +decode (LByteString -> Either DecoderError (KeyWitness era)) -> (ByteString -> LByteString) -> ByteString -> Either DecoderError (KeyWitness era) @@ -1021,19 +1021,19 @@ . ByteString -> LByteString LBS.fromStrict where - decode :: CBOR.Decoder s (CBOR.Annotator (KeyWitness era)) - decode :: Decoder s (Annotator (KeyWitness era)) -decode = do + decode :: CBOR.Decoder s (CBOR.Annotator (KeyWitness era)) + decode :: Decoder s (Annotator (KeyWitness era)) +decode = do Int -> Decoder s () forall s. Int -> Decoder s () CBOR.decodeListLenOf Int 2 - Word -t <- Decoder s Word + Word +t <- Decoder s Word forall s. Decoder s Word CBOR.decodeWord case Word -t of +t of Word 0 -> (Annotator (WitVKey 'Witness StandardCrypto) -> Annotator (KeyWitness era)) @@ -1050,7 +1050,7 @@ ShelleyBasedEra era -> WitVKey 'Witness StandardCrypto -> KeyWitness era ShelleyKeyWitness ShelleyBasedEra era -era)) Decoder s (Annotator (WitVKey 'Witness StandardCrypto)) +era)) Decoder s (Annotator (WitVKey 'Witness StandardCrypto)) forall a s. FromCBOR a => Decoder s a fromCBOR Word @@ -1069,7 +1069,7 @@ ShelleyBasedEra era -> BootstrapWitness StandardCrypto -> KeyWitness era ShelleyBootstrapWitness ShelleyBasedEra era -era)) Decoder s (Annotator (BootstrapWitness StandardCrypto)) +era)) Decoder s (Annotator (BootstrapWitness StandardCrypto)) forall a s. FromCBOR a => Decoder s a fromCBOR Word @@ -1084,16 +1084,16 @@ "Shelley Witness" (Word -> Word8 forall a b. (Integral a, Num b) => a -> b fromIntegral Word -t) +t) -instance IsCardanoEra era => HasTextEnvelope (KeyWitness era) where - textEnvelopeType :: AsType (KeyWitness era) -> TextEnvelopeType -textEnvelopeType AsType (KeyWitness era) +instance IsCardanoEra era => HasTextEnvelope (KeyWitness era) where + textEnvelopeType :: AsType (KeyWitness era) -> TextEnvelopeType +textEnvelopeType AsType (KeyWitness era) _ = case CardanoEra era forall era. IsCardanoEra era => CardanoEra era -cardanoEra :: CardanoEra era of +cardanoEra :: CardanoEra era of CardanoEra era ByronEra -> TextEnvelopeType "TxWitnessByron" @@ -1111,47 +1111,47 @@ "TxWitness AlonzoEra" -pattern Tx :: Ledger.Era era => TxBody era -> [KeyWitness era] -> Tx era +pattern Tx :: Ledger.Era era => TxBody era -> [KeyWitness era] -> Tx era pattern $bTx :: TxBody era -> [KeyWitness era] -> Tx era $mTx :: forall r era. Era era => Tx era -> (TxBody era -> [KeyWitness era] -> r) -> (Void# -> r) -> r -Tx txbody ws <- (getTxBodyAndWitnesses -> (txbody, ws)) +Tx txbody ws <- (getTxBodyAndWitnesses -> (txbody, ws)) where - Tx TxBody era -txbody [KeyWitness era] -ws = [KeyWitness era] -> TxBody era -> Tx era + Tx TxBody era +txbody [KeyWitness era] +ws = [KeyWitness era] -> TxBody era -> Tx era forall era. [KeyWitness era] -> TxBody era -> Tx era makeSignedTransaction [KeyWitness era] -ws TxBody era -txbody +ws TxBody era +txbody -getTxBodyAndWitnesses :: Tx era -> (TxBody era, [KeyWitness era]) +getTxBodyAndWitnesses :: Tx era -> (TxBody era, [KeyWitness era]) getTxBodyAndWitnesses :: Tx era -> (TxBody era, [KeyWitness era]) -getTxBodyAndWitnesses Tx era -tx = (Tx era -> TxBody era +getTxBodyAndWitnesses Tx era +tx = (Tx era -> TxBody era forall era. Tx era -> TxBody era getTxBody Tx era -tx, Tx era -> [KeyWitness era] +tx, Tx era -> [KeyWitness era] forall era. Tx era -> [KeyWitness era] getTxWitnesses Tx era -tx) +tx) -getTxBody :: forall era. Tx era -> TxBody era +getTxBody :: forall era. Tx era -> TxBody era getTxBody :: Tx era -> TxBody era getTxBody (ByronTx Byron.ATxAux { aTaTx :: forall a. ATxAux a -> Annotated Tx a -Byron.aTaTx = Annotated Tx ByteString -txbody }) = +Byron.aTaTx = Annotated Tx ByteString +txbody }) = Annotated Tx ByteString -> TxBody ByronEra ByronTxBody Annotated Tx ByteString -txbody +txbody -getTxBody (ShelleyTx ShelleyBasedEra era -era Tx (ShelleyLedgerEra era) -tx) = +getTxBody (ShelleyTx ShelleyBasedEra era +era Tx (ShelleyLedgerEra era) +tx) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> Tx StandardShelley -> TxBody era forall ledgerera. @@ -1159,9 +1159,9 @@ Witnesses ledgerera ~ WitnessSetHKD Identity ledgerera, ShelleyBased ledgerera) => Tx ledgerera -> TxBody era -getShelleyTxBody Tx StandardShelley +getShelleyTxBody Tx StandardShelley Tx (ShelleyLedgerEra era) -tx +tx ShelleyBasedEra era ShelleyBasedEraAllegra -> Tx StandardAllegra -> TxBody era forall ledgerera. @@ -1169,9 +1169,9 @@ Witnesses ledgerera ~ WitnessSetHKD Identity ledgerera, ShelleyBased ledgerera) => Tx ledgerera -> TxBody era -getShelleyTxBody Tx StandardAllegra +getShelleyTxBody Tx StandardAllegra Tx (ShelleyLedgerEra era) -tx +tx ShelleyBasedEra era ShelleyBasedEraMary -> Tx StandardMary -> TxBody era forall ledgerera. @@ -1179,9 +1179,9 @@ Witnesses ledgerera ~ WitnessSetHKD Identity ledgerera, ShelleyBased ledgerera) => Tx ledgerera -> TxBody era -getShelleyTxBody Tx StandardMary +getShelleyTxBody Tx StandardMary Tx (ShelleyLedgerEra era) -tx +tx ShelleyBasedEra era ShelleyBasedEraAlonzo -> ScriptDataSupportedInEra era -> Tx StandardAlonzo -> TxBody era forall ledgerera. @@ -1189,43 +1189,43 @@ Witnesses ledgerera ~ TxWitness ledgerera, ShelleyBased ledgerera) => ScriptDataSupportedInEra era -> Tx ledgerera -> TxBody era -getAlonzoTxBody ScriptDataSupportedInEra era +getAlonzoTxBody ScriptDataSupportedInEra era ScriptDataSupportedInEra AlonzoEra ScriptDataInAlonzoEra Tx StandardAlonzo Tx (ShelleyLedgerEra era) -tx +tx where - getShelleyTxBody :: forall ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.Witnesses ledgerera ~ Shelley.WitnessSetHKD Identity ledgerera - => Shelley.ShelleyBased ledgerera - => Ledger.Tx ledgerera - -> TxBody era - getShelleyTxBody :: Tx ledgerera -> TxBody era -getShelleyTxBody Shelley.Tx { + getShelleyTxBody :: forall ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.Witnesses ledgerera ~ Shelley.WitnessSetHKD Identity ledgerera + => Shelley.ShelleyBased ledgerera + => Ledger.Tx ledgerera + -> TxBody era + getShelleyTxBody :: Tx ledgerera -> TxBody era +getShelleyTxBody Shelley.Tx { body :: forall era. Tx era -> (Era era, ToCBOR (AuxiliaryData era), ToCBOR (TxBody era), ToCBOR (Witnesses era)) => TxBody era -Shelley.body = TxBody ledgerera -txbody, +Shelley.body = TxBody ledgerera +txbody, auxiliaryData :: forall era. Tx era -> (Era era, ToCBOR (AuxiliaryData era), ToCBOR (TxBody era), ToCBOR (Witnesses era)) => StrictMaybe (AuxiliaryData era) -Shelley.auxiliaryData = StrictMaybe (AuxiliaryData ledgerera) -txAuxiliaryData, +Shelley.auxiliaryData = StrictMaybe (AuxiliaryData ledgerera) +txAuxiliaryData, wits :: forall era. Tx era -> (Era era, ToCBOR (AuxiliaryData era), ToCBOR (TxBody era), ToCBOR (Witnesses era)) => Witnesses era Shelley.wits = Shelley.WitnessSet - _addrWits - msigWits - _bootWits + _addrWits + msigWits + _bootWits } = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) @@ -1241,14 +1241,14 @@ -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> TxBody era ShelleyTxBody ShelleyBasedEra era -era TxBody ledgerera +era TxBody ledgerera TxBody (ShelleyLedgerEra era) -txbody +txbody (Map (ScriptHash (Crypto ledgerera)) (Script ledgerera) -> [Script ledgerera] forall k a. Map k a -> [a] Map.elems Map (ScriptHash (Crypto ledgerera)) (Script ledgerera) -msigWits) +msigWits) TxBodyScriptData era forall era. TxBodyScriptData era TxBodyNoScriptData @@ -1256,44 +1256,44 @@ -> Maybe (AuxiliaryData ledgerera) forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe (AuxiliaryData ledgerera) -txAuxiliaryData) +txAuxiliaryData) - getAlonzoTxBody :: forall ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.Witnesses ledgerera ~ Alonzo.TxWitness ledgerera - => Shelley.ShelleyBased ledgerera - => ScriptDataSupportedInEra era - -> Ledger.Tx ledgerera - -> TxBody era - getAlonzoTxBody :: ScriptDataSupportedInEra era -> Tx ledgerera -> TxBody era -getAlonzoTxBody ScriptDataSupportedInEra era -scriptDataInEra + getAlonzoTxBody :: forall ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.Witnesses ledgerera ~ Alonzo.TxWitness ledgerera + => Shelley.ShelleyBased ledgerera + => ScriptDataSupportedInEra era + -> Ledger.Tx ledgerera + -> TxBody era + getAlonzoTxBody :: ScriptDataSupportedInEra era -> Tx ledgerera -> TxBody era +getAlonzoTxBody ScriptDataSupportedInEra era +scriptDataInEra Shelley.Tx { body :: forall era. Tx era -> (Era era, ToCBOR (AuxiliaryData era), ToCBOR (TxBody era), ToCBOR (Witnesses era)) => TxBody era -Shelley.body = TxBody ledgerera -txbody, +Shelley.body = TxBody ledgerera +txbody, wits :: forall era. Tx era -> (Era era, ToCBOR (AuxiliaryData era), ToCBOR (TxBody era), ToCBOR (Witnesses era)) => Witnesses era Shelley.wits = Alonzo.TxWitness' - _addrWits - _bootWits - txscripts - txdats - redeemers, + _addrWits + _bootWits + txscripts + txdats + redeemers, auxiliaryData :: forall era. Tx era -> (Era era, ToCBOR (AuxiliaryData era), ToCBOR (TxBody era), ToCBOR (Witnesses era)) => StrictMaybe (AuxiliaryData era) -Shelley.auxiliaryData = StrictMaybe (AuxiliaryData ledgerera) -auxiliaryData +Shelley.auxiliaryData = StrictMaybe (AuxiliaryData ledgerera) +auxiliaryData } = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) @@ -1309,14 +1309,14 @@ -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> TxBody era ShelleyTxBody ShelleyBasedEra era -era TxBody ledgerera +era TxBody ledgerera TxBody (ShelleyLedgerEra era) -txbody +txbody (Map (ScriptHash (Crypto ledgerera)) (Script ledgerera) -> [Script ledgerera] forall k a. Map k a -> [a] Map.elems Map (ScriptHash (Crypto ledgerera)) (Script ledgerera) -txscripts) +txscripts) (ScriptDataSupportedInEra era -> [Data (ShelleyLedgerEra era)] -> Redeemers (ShelleyLedgerEra era) @@ -1327,27 +1327,27 @@ -> Redeemers (ShelleyLedgerEra era) -> TxBodyScriptData era TxBodyScriptData ScriptDataSupportedInEra era -scriptDataInEra +scriptDataInEra (Map (DataHash (Crypto ledgerera)) (Data ledgerera) -> [Data ledgerera] forall k a. Map k a -> [a] Map.elems Map (DataHash (Crypto ledgerera)) (Data ledgerera) -txdats) +txdats) Redeemers ledgerera Redeemers (ShelleyLedgerEra era) -redeemers) +redeemers) (StrictMaybe (AuxiliaryData ledgerera) -> Maybe (AuxiliaryData ledgerera) forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe (AuxiliaryData ledgerera) -auxiliaryData) +auxiliaryData) -getTxWitnesses :: forall era. Tx era -> [KeyWitness era] +getTxWitnesses :: forall era. Tx era -> [KeyWitness era] getTxWitnesses :: Tx era -> [KeyWitness era] getTxWitnesses (ByronTx Byron.ATxAux { aTaWitness :: forall a. ATxAux a -> Annotated TxWitness a -Byron.aTaWitness = Annotated TxWitness ByteString -witnesses }) = +Byron.aTaWitness = Annotated TxWitness ByteString +witnesses }) = (TxInWitness -> KeyWitness ByronEra) -> [TxInWitness] -> [KeyWitness ByronEra] forall a b. (a -> b) -> [a] -> [b] @@ -1373,13 +1373,13 @@ -> Annotated TxWitness ByteString -> [KeyWitness ByronEra] forall a b. (a -> b) -> a -> b $ Annotated TxWitness ByteString -witnesses +witnesses -getTxWitnesses (ShelleyTx ShelleyBasedEra era -era Tx (ShelleyLedgerEra era) -tx) = +getTxWitnesses (ShelleyTx ShelleyBasedEra era +era Tx (ShelleyLedgerEra era) +tx) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> Tx StandardShelley -> [KeyWitness era] forall ledgerera. @@ -1387,9 +1387,9 @@ Witnesses ledgerera ~ WitnessSetHKD Identity ledgerera, ToCBOR (Witnesses ledgerera), ShelleyBased ledgerera) => Tx ledgerera -> [KeyWitness era] -getShelleyTxWitnesses Tx StandardShelley +getShelleyTxWitnesses Tx StandardShelley Tx (ShelleyLedgerEra era) -tx +tx ShelleyBasedEra era ShelleyBasedEraAllegra -> Tx StandardAllegra -> [KeyWitness era] forall ledgerera. @@ -1397,9 +1397,9 @@ Witnesses ledgerera ~ WitnessSetHKD Identity ledgerera, ToCBOR (Witnesses ledgerera), ShelleyBased ledgerera) => Tx ledgerera -> [KeyWitness era] -getShelleyTxWitnesses Tx StandardAllegra +getShelleyTxWitnesses Tx StandardAllegra Tx (ShelleyLedgerEra era) -tx +tx ShelleyBasedEra era ShelleyBasedEraMary -> Tx StandardMary -> [KeyWitness era] forall ledgerera. @@ -1407,9 +1407,9 @@ Witnesses ledgerera ~ WitnessSetHKD Identity ledgerera, ToCBOR (Witnesses ledgerera), ShelleyBased ledgerera) => Tx ledgerera -> [KeyWitness era] -getShelleyTxWitnesses Tx StandardMary +getShelleyTxWitnesses Tx StandardMary Tx (ShelleyLedgerEra era) -tx +tx ShelleyBasedEra era ShelleyBasedEraAlonzo -> Tx StandardAlonzo -> [KeyWitness era] forall ledgerera. @@ -1417,19 +1417,19 @@ Witnesses ledgerera ~ TxWitness ledgerera, ShelleyBased ledgerera) => Tx ledgerera -> [KeyWitness era] -getAlonzoTxWitnesses Tx StandardAlonzo +getAlonzoTxWitnesses Tx StandardAlonzo Tx (ShelleyLedgerEra era) -tx +tx where - getShelleyTxWitnesses :: forall ledgerera. - Ledger.Crypto ledgerera ~ StandardCrypto - => Ledger.Witnesses ledgerera ~ Shelley.WitnessSetHKD Identity ledgerera - => ToCBOR (Ledger.Witnesses ledgerera) - => Shelley.ShelleyBased ledgerera - => Ledger.Tx ledgerera - -> [KeyWitness era] - getShelleyTxWitnesses :: Tx ledgerera -> [KeyWitness era] -getShelleyTxWitnesses Shelley.Tx { + getShelleyTxWitnesses :: forall ledgerera. + Ledger.Crypto ledgerera ~ StandardCrypto + => Ledger.Witnesses ledgerera ~ Shelley.WitnessSetHKD Identity ledgerera + => ToCBOR (Ledger.Witnesses ledgerera) + => Shelley.ShelleyBased ledgerera + => Ledger.Tx ledgerera + -> [KeyWitness era] + getShelleyTxWitnesses :: Tx ledgerera -> [KeyWitness era] +getShelleyTxWitnesses Shelley.Tx { wits :: forall era. Tx era -> (Era era, ToCBOR (AuxiliaryData era), ToCBOR (TxBody era), @@ -1437,9 +1437,9 @@ Witnesses era Shelley.wits = Shelley.WitnessSet - addrWits - _msigWits - bootWits + addrWits + _msigWits + bootWits } = (BootstrapWitness StandardCrypto -> KeyWitness era) -> [BootstrapWitness StandardCrypto] -> [KeyWitness era] @@ -1450,12 +1450,12 @@ ShelleyBasedEra era -> BootstrapWitness StandardCrypto -> KeyWitness era ShelleyBootstrapWitness ShelleyBasedEra era -era) (Set (BootstrapWitness StandardCrypto) +era) (Set (BootstrapWitness StandardCrypto) -> [BootstrapWitness StandardCrypto] forall a. Set a -> [a] Set.elems Set (BootstrapWitness (Crypto ledgerera)) Set (BootstrapWitness StandardCrypto) -bootWits) +bootWits) [KeyWitness era] -> [KeyWitness era] -> [KeyWitness era] forall a. [a] -> [a] -> [a] ++ (WitVKey 'Witness StandardCrypto -> KeyWitness era) @@ -1467,21 +1467,21 @@ ShelleyBasedEra era -> WitVKey 'Witness StandardCrypto -> KeyWitness era ShelleyKeyWitness ShelleyBasedEra era -era) (Set (WitVKey 'Witness StandardCrypto) +era) (Set (WitVKey 'Witness StandardCrypto) -> [WitVKey 'Witness StandardCrypto] forall a. Set a -> [a] Set.elems Set (WitVKey 'Witness (Crypto ledgerera)) Set (WitVKey 'Witness StandardCrypto) -addrWits) +addrWits) - getAlonzoTxWitnesses :: forall ledgerera. - Ledger.Crypto ledgerera ~ StandardCrypto - => Ledger.Witnesses ledgerera ~ Alonzo.TxWitness ledgerera - => Shelley.ShelleyBased ledgerera - => Ledger.Tx ledgerera - -> [KeyWitness era] - getAlonzoTxWitnesses :: Tx ledgerera -> [KeyWitness era] -getAlonzoTxWitnesses Shelley.Tx { + getAlonzoTxWitnesses :: forall ledgerera. + Ledger.Crypto ledgerera ~ StandardCrypto + => Ledger.Witnesses ledgerera ~ Alonzo.TxWitness ledgerera + => Shelley.ShelleyBased ledgerera + => Ledger.Tx ledgerera + -> [KeyWitness era] + getAlonzoTxWitnesses :: Tx ledgerera -> [KeyWitness era] +getAlonzoTxWitnesses Shelley.Tx { wits :: forall era. Tx era -> (Era era, ToCBOR (AuxiliaryData era), ToCBOR (TxBody era), @@ -1489,11 +1489,11 @@ Witnesses era Shelley.wits = Alonzo.TxWitness' - addrWits - bootWits - _txscripts - _txdats - _txrdmrs + addrWits + bootWits + _txscripts + _txdats + _txrdmrs } = (BootstrapWitness StandardCrypto -> KeyWitness era) -> [BootstrapWitness StandardCrypto] -> [KeyWitness era] @@ -1504,12 +1504,12 @@ ShelleyBasedEra era -> BootstrapWitness StandardCrypto -> KeyWitness era ShelleyBootstrapWitness ShelleyBasedEra era -era) (Set (BootstrapWitness StandardCrypto) +era) (Set (BootstrapWitness StandardCrypto) -> [BootstrapWitness StandardCrypto] forall a. Set a -> [a] Set.elems Set (BootstrapWitness (Crypto ledgerera)) Set (BootstrapWitness StandardCrypto) -bootWits) +bootWits) [KeyWitness era] -> [KeyWitness era] -> [KeyWitness era] forall a. [a] -> [a] -> [a] ++ (WitVKey 'Witness StandardCrypto -> KeyWitness era) @@ -1521,22 +1521,22 @@ ShelleyBasedEra era -> WitVKey 'Witness StandardCrypto -> KeyWitness era ShelleyKeyWitness ShelleyBasedEra era -era) (Set (WitVKey 'Witness StandardCrypto) +era) (Set (WitVKey 'Witness StandardCrypto) -> [WitVKey 'Witness StandardCrypto] forall a. Set a -> [a] Set.elems Set (WitVKey 'Witness (Crypto ledgerera)) Set (WitVKey 'Witness StandardCrypto) -addrWits) +addrWits) -makeSignedTransaction :: forall era. - [KeyWitness era] - -> TxBody era - -> Tx era +makeSignedTransaction :: forall era. + [KeyWitness era] + -> TxBody era + -> Tx era makeSignedTransaction :: [KeyWitness era] -> TxBody era -> Tx era -makeSignedTransaction [KeyWitness era] -witnesses (ByronTxBody Annotated Tx ByteString -txbody) = +makeSignedTransaction [KeyWitness era] +witnesses (ByronTxBody Annotated Tx ByteString +txbody) = ATxAux ByteString -> Tx ByronEra ByronTx (ATxAux ByteString -> Tx ByronEra) @@ -1551,26 +1551,26 @@ (Annotated Tx ByteString -> Tx forall b a. Annotated b a -> b unAnnotated Annotated Tx ByteString -txbody) +txbody) ([TxInWitness] -> TxWitness forall a. [a] -> Vector a Vector.fromList [ TxInWitness -w | ByronKeyWitness TxInWitness -w <- [KeyWitness era] -witnesses ]) +w | ByronKeyWitness TxInWitness +w <- [KeyWitness era] +witnesses ]) -makeSignedTransaction [KeyWitness era] -witnesses (ShelleyTxBody ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -txbody - [Script (ShelleyLedgerEra era)] -txscripts - TxBodyScriptData era -txscriptdata - Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata) = +makeSignedTransaction [KeyWitness era] +witnesses (ShelleyTxBody ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +txbody + [Script (ShelleyLedgerEra era)] +txscripts + TxBodyScriptData era +txscriptdata + Maybe (AuxiliaryData (ShelleyLedgerEra era)) +txmetadata) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> TxBody StandardShelley -> Tx era forall ledgerera. @@ -1580,9 +1580,9 @@ ToCBOR (Witnesses ledgerera), ShelleyBased ledgerera, ValidateScript ledgerera) => TxBody ledgerera -> Tx era -makeShelleySignedTransaction TxBody StandardShelley +makeShelleySignedTransaction TxBody StandardShelley TxBody (ShelleyLedgerEra era) -txbody +txbody ShelleyBasedEra era ShelleyBasedEraAllegra -> TxBody StandardAllegra -> Tx era forall ledgerera. @@ -1592,9 +1592,9 @@ ToCBOR (Witnesses ledgerera), ShelleyBased ledgerera, ValidateScript ledgerera) => TxBody ledgerera -> Tx era -makeShelleySignedTransaction TxBody StandardAllegra +makeShelleySignedTransaction TxBody StandardAllegra TxBody (ShelleyLedgerEra era) -txbody +txbody ShelleyBasedEra era ShelleyBasedEraMary -> TxBody StandardMary -> Tx era forall ledgerera. @@ -1604,9 +1604,9 @@ ToCBOR (Witnesses ledgerera), ShelleyBased ledgerera, ValidateScript ledgerera) => TxBody ledgerera -> Tx era -makeShelleySignedTransaction TxBody StandardMary +makeShelleySignedTransaction TxBody StandardMary TxBody (ShelleyLedgerEra era) -txbody +txbody ShelleyBasedEra era ShelleyBasedEraAlonzo -> TxBody StandardAlonzo -> Tx era forall ledgerera. @@ -1616,28 +1616,28 @@ Script ledgerera ~ Script ledgerera, ShelleyBased ledgerera, ValidateScript ledgerera) => TxBody ledgerera -> Tx era -makeAlonzoSignedTransaction TxBody StandardAlonzo +makeAlonzoSignedTransaction TxBody StandardAlonzo TxBody (ShelleyLedgerEra era) -txbody +txbody where - makeShelleySignedTransaction - :: forall ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.Crypto ledgerera ~ StandardCrypto - => Ledger.Witnesses ledgerera ~ Shelley.WitnessSetHKD Identity ledgerera - => ToCBOR (Ledger.Witnesses ledgerera) - => Shelley.ShelleyBased ledgerera - => Shelley.ValidateScript ledgerera - => Ledger.TxBody ledgerera - -> Tx era - makeShelleySignedTransaction :: TxBody ledgerera -> Tx era -makeShelleySignedTransaction TxBody ledgerera -txbody' = + makeShelleySignedTransaction + :: forall ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.Crypto ledgerera ~ StandardCrypto + => Ledger.Witnesses ledgerera ~ Shelley.WitnessSetHKD Identity ledgerera + => ToCBOR (Ledger.Witnesses ledgerera) + => Shelley.ShelleyBased ledgerera + => Shelley.ValidateScript ledgerera + => Ledger.TxBody ledgerera + -> Tx era + makeShelleySignedTransaction :: TxBody ledgerera -> Tx era +makeShelleySignedTransaction TxBody ledgerera +txbody' = ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era forall era. ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era ShelleyTx ShelleyBasedEra era -era (Tx (ShelleyLedgerEra era) -> Tx era) +era (Tx (ShelleyLedgerEra era) -> Tx era) -> Tx (ShelleyLedgerEra era) -> Tx era forall a b. (a -> b) -> a -> b $ @@ -1652,7 +1652,7 @@ -> Witnesses era -> StrictMaybe (AuxiliaryData era) -> Tx era Shelley.Tx TxBody ledgerera -txbody' +txbody' (Set (WitVKey 'Witness (Crypto ledgerera)) -> Map (ScriptHash (Crypto ledgerera)) (Script ledgerera) -> Set (BootstrapWitness (Crypto ledgerera)) @@ -1668,10 +1668,10 @@ -> Set (WitVKey 'Witness StandardCrypto) forall a. Ord a => [a] -> Set a Set.fromList [ WitVKey 'Witness StandardCrypto -w | ShelleyKeyWitness ShelleyBasedEra era -_ WitVKey 'Witness StandardCrypto -w <- [KeyWitness era] -witnesses ]) +w | ShelleyKeyWitness ShelleyBasedEra era +_ WitVKey 'Witness StandardCrypto +w <- [KeyWitness era] +witnesses ]) ([(ScriptHash StandardCrypto, Script ledgerera)] -> Map (ScriptHash StandardCrypto) (Script ledgerera) forall k a. Ord k => [(k, a)] -> Map k a @@ -1679,46 +1679,46 @@ forall era. ValidateScript era => Script era -> ScriptHash (Crypto era) -Ledger.hashScript @ledgerera Script ledgerera -sw, Script ledgerera -sw) - | Script ledgerera -sw <- [Script ledgerera] +Ledger.hashScript @ledgerera Script ledgerera +sw, Script ledgerera +sw) + | Script ledgerera +sw <- [Script ledgerera] [Script (ShelleyLedgerEra era)] -txscripts ]) +txscripts ]) ([BootstrapWitness StandardCrypto] -> Set (BootstrapWitness StandardCrypto) forall a. Ord a => [a] -> Set a Set.fromList [ BootstrapWitness StandardCrypto -w | ShelleyBootstrapWitness ShelleyBasedEra era -_ BootstrapWitness StandardCrypto -w <- [KeyWitness era] -witnesses ])) +w | ShelleyBootstrapWitness ShelleyBasedEra era +_ BootstrapWitness StandardCrypto +w <- [KeyWitness era] +witnesses ])) (Maybe (AuxiliaryData ledgerera) -> StrictMaybe (AuxiliaryData ledgerera) forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe (AuxiliaryData ledgerera) Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata) +txmetadata) - makeAlonzoSignedTransaction - :: forall ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.Crypto ledgerera ~ StandardCrypto - => Ledger.Witnesses ledgerera ~ Alonzo.TxWitness ledgerera - => Ledger.Script ledgerera ~ Alonzo.Script ledgerera - => Shelley.ShelleyBased ledgerera - => Shelley.ValidateScript ledgerera - => Ledger.TxBody ledgerera - -> Tx era - makeAlonzoSignedTransaction :: TxBody ledgerera -> Tx era -makeAlonzoSignedTransaction TxBody ledgerera -txbody' = + makeAlonzoSignedTransaction + :: forall ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.Crypto ledgerera ~ StandardCrypto + => Ledger.Witnesses ledgerera ~ Alonzo.TxWitness ledgerera + => Ledger.Script ledgerera ~ Alonzo.Script ledgerera + => Shelley.ShelleyBased ledgerera + => Shelley.ValidateScript ledgerera + => Ledger.TxBody ledgerera + -> Tx era + makeAlonzoSignedTransaction :: TxBody ledgerera -> Tx era +makeAlonzoSignedTransaction TxBody ledgerera +txbody' = ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era forall era. ShelleyBasedEra era -> Tx (ShelleyLedgerEra era) -> Tx era ShelleyTx ShelleyBasedEra era -era (Tx (ShelleyLedgerEra era) -> Tx era) +era (Tx (ShelleyLedgerEra era) -> Tx era) -> Tx (ShelleyLedgerEra era) -> Tx era forall a b. (a -> b) -> a -> b $ @@ -1733,7 +1733,7 @@ -> Witnesses era -> StrictMaybe (AuxiliaryData era) -> Tx era Shelley.Tx TxBody ledgerera -txbody' +txbody' (Set (WitVKey 'Witness (Crypto ledgerera)) -> Set (BootstrapWitness (Crypto ledgerera)) -> Map (ScriptHash (Crypto ledgerera)) (Script ledgerera) @@ -1753,18 +1753,18 @@ -> Set (WitVKey 'Witness StandardCrypto) forall a. Ord a => [a] -> Set a Set.fromList [ WitVKey 'Witness StandardCrypto -w | ShelleyKeyWitness ShelleyBasedEra era -_ WitVKey 'Witness StandardCrypto -w <- [KeyWitness era] -witnesses ]) +w | ShelleyKeyWitness ShelleyBasedEra era +_ WitVKey 'Witness StandardCrypto +w <- [KeyWitness era] +witnesses ]) ([BootstrapWitness StandardCrypto] -> Set (BootstrapWitness StandardCrypto) forall a. Ord a => [a] -> Set a Set.fromList [ BootstrapWitness StandardCrypto -w | ShelleyBootstrapWitness ShelleyBasedEra era -_ BootstrapWitness StandardCrypto -w <- [KeyWitness era] -witnesses ]) +w | ShelleyBootstrapWitness ShelleyBasedEra era +_ BootstrapWitness StandardCrypto +w <- [KeyWitness era] +witnesses ]) ([(ScriptHash StandardCrypto, Script ledgerera)] -> Map (ScriptHash StandardCrypto) (Script ledgerera) forall k a. Ord k => [(k, a)] -> Map k a @@ -1772,29 +1772,29 @@ forall era. ValidateScript era => Script era -> ScriptHash (Crypto era) -Ledger.hashScript @ledgerera Script ledgerera +Ledger.hashScript @ledgerera Script ledgerera Script ledgerera -sw, Script ledgerera -sw) - | Script ledgerera -sw <- [Script (ShelleyLedgerEra era)] +sw, Script ledgerera +sw) + | Script ledgerera +sw <- [Script (ShelleyLedgerEra era)] [Script ledgerera] -txscripts ]) +txscripts ]) Map (DataHash (Crypto ledgerera)) (Data ledgerera) Map (DataHash StandardCrypto) (Data ledgerera) -datums +datums Redeemers ledgerera -redeemers) +redeemers) (Maybe (AuxiliaryData ledgerera) -> StrictMaybe (AuxiliaryData ledgerera) forall a. Maybe a -> StrictMaybe a maybeToStrictMaybe Maybe (AuxiliaryData ledgerera) Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata) +txmetadata) where - (Map (DataHash StandardCrypto) (Data ledgerera) -datums, Redeemers ledgerera -redeemers) = TxBodyScriptData era + (Map (DataHash StandardCrypto) (Data ledgerera) +datums, Redeemers ledgerera +redeemers) = TxBodyScriptData era -> (Map (DataHash StandardCrypto) (Data ledgerera), Redeemers ledgerera) forall era ledgerera. @@ -1804,17 +1804,17 @@ -> (Map (DataHash StandardCrypto) (Data ledgerera), Redeemers ledgerera) toAlonzoScriptData TxBodyScriptData era -txscriptdata +txscriptdata toAlonzoScriptData - :: forall era ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.Era ledgerera - => Ledger.Crypto ledgerera ~ StandardCrypto - => TxBodyScriptData era - -> ( Map.Map (Alonzo.DataHash StandardCrypto) (Alonzo.Data ledgerera) - , Alonzo.Redeemers ledgerera + :: forall era ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.Era ledgerera + => Ledger.Crypto ledgerera ~ StandardCrypto + => TxBodyScriptData era + -> ( Map.Map (Alonzo.DataHash StandardCrypto) (Alonzo.Data ledgerera) + , Alonzo.Redeemers ledgerera ) toAlonzoScriptData :: TxBodyScriptData era -> (Map (DataHash StandardCrypto) (Data ledgerera), @@ -1832,86 +1832,86 @@ Map.empty) toAlonzoScriptData (TxBodyScriptData ScriptDataSupportedInEra era -_ [Data (ShelleyLedgerEra era)] -ds Redeemers (ShelleyLedgerEra era) -r) = +_ [Data (ShelleyLedgerEra era)] +ds Redeemers (ShelleyLedgerEra era) +r) = ( [(DataHash StandardCrypto, Data ledgerera)] -> Map (DataHash StandardCrypto) (Data ledgerera) forall k a. Ord k => [(k, a)] -> Map k a Map.fromList [ (Data ledgerera -> DataHash (Crypto ledgerera) forall era. Era era => Data era -> DataHash (Crypto era) -Alonzo.hashData @ledgerera Data ledgerera -d, Data ledgerera -d) | Data ledgerera -d <- [Data ledgerera] +Alonzo.hashData @ledgerera Data ledgerera +d, Data ledgerera +d) | Data ledgerera +d <- [Data ledgerera] [Data (ShelleyLedgerEra era)] -ds ] +ds ] , Redeemers ledgerera Redeemers (ShelleyLedgerEra era) -r) +r) -makeByronKeyWitness :: forall key. - IsByronKey key +makeByronKeyWitness :: forall key. + IsByronKey key => NetworkId -> TxBody ByronEra - -> SigningKey key + -> SigningKey key -> KeyWitness ByronEra makeByronKeyWitness :: NetworkId -> TxBody ByronEra -> SigningKey key -> KeyWitness ByronEra makeByronKeyWitness NetworkId -_ (ShelleyTxBody ShelleyBasedEra ByronEra -era TxBody (ShelleyLedgerEra ByronEra) +_ (ShelleyTxBody ShelleyBasedEra ByronEra +era TxBody (ShelleyLedgerEra ByronEra) _ [Script (ShelleyLedgerEra ByronEra)] _ TxBodyScriptData ByronEra _ Maybe (AuxiliaryData (ShelleyLedgerEra ByronEra)) _) = case ShelleyBasedEra ByronEra -era of {} -makeByronKeyWitness NetworkId -nw (ByronTxBody Annotated Tx ByteString -txbody) = - let txhash :: Byron.Hash Byron.Tx - txhash :: Hash Tx -txhash = Annotated Tx ByteString +era of {} +makeByronKeyWitness NetworkId +nw (ByronTxBody Annotated Tx ByteString +txbody) = + let txhash :: Byron.Hash Byron.Tx + txhash :: Hash Tx +txhash = Annotated Tx ByteString -> Hash (BaseType (Annotated Tx ByteString)) forall t. Decoded t => t -> Hash (BaseType t) Byron.hashDecoded Annotated Tx ByteString -txbody +txbody - pm :: Byron.ProtocolMagicId - pm :: ProtocolMagicId -pm = NetworkId -> ProtocolMagicId + pm :: Byron.ProtocolMagicId + pm :: ProtocolMagicId +pm = NetworkId -> ProtocolMagicId toByronProtocolMagicId NetworkId -nw +nw -- To allow sharing of the txhash computation across many signatures we -- define and share the txhash outside the lambda for the signing key: in case ByronKeyFormat key forall key. IsByronKey key => ByronKeyFormat key -byronKeyFormat :: ByronKeyFormat key of +byronKeyFormat :: ByronKeyFormat key of ByronKeyFormat key ByronLegacyKeyFormat -> - \(ByronSigningKeyLegacy sk) -> SigningKey -> ProtocolMagicId -> Hash Tx -> KeyWitness ByronEra -witness SigningKey -sk ProtocolMagicId -pm Hash Tx -txhash + \(ByronSigningKeyLegacy sk) -> SigningKey -> ProtocolMagicId -> Hash Tx -> KeyWitness ByronEra +witness SigningKey +sk ProtocolMagicId +pm Hash Tx +txhash ByronKeyFormat key ByronModernKeyFormat -> - \(ByronSigningKey sk) -> SigningKey -> ProtocolMagicId -> Hash Tx -> KeyWitness ByronEra -witness SigningKey -sk ProtocolMagicId -pm Hash Tx -txhash + \(ByronSigningKey sk) -> SigningKey -> ProtocolMagicId -> Hash Tx -> KeyWitness ByronEra +witness SigningKey +sk ProtocolMagicId +pm Hash Tx +txhash where - witness :: Byron.SigningKey + witness :: Byron.SigningKey -> Byron.ProtocolMagicId -> Byron.Hash Byron.Tx -> KeyWitness ByronEra - witness :: SigningKey -> ProtocolMagicId -> Hash Tx -> KeyWitness ByronEra -witness SigningKey -sk ProtocolMagicId -pm Hash Tx -txHash = + witness :: SigningKey -> ProtocolMagicId -> Hash Tx -> KeyWitness ByronEra +witness SigningKey +sk ProtocolMagicId +pm Hash Tx +txHash = TxInWitness -> KeyWitness ByronEra ByronKeyWitness (TxInWitness -> KeyWitness ByronEra) -> TxInWitness -> KeyWitness ByronEra @@ -1921,17 +1921,17 @@ Byron.VKWitness (SigningKey -> VerificationKey Byron.toVerification SigningKey -sk) +sk) (ProtocolMagicId -> SignTag -> SigningKey -> TxSigData -> TxSig forall a. ToCBOR a => ProtocolMagicId -> SignTag -> SigningKey -> a -> Signature a Byron.sign ProtocolMagicId -pm SignTag +pm SignTag Byron.SignTx SigningKey -sk (Hash Tx -> TxSigData +sk (Hash Tx -> TxSigData Byron.TxSigData Hash Tx -txHash)) +txHash)) -- | Either a network ID or a Byron address to be used in constructing a -- Shelley bootstrap witness. @@ -1949,12 +1949,12 @@ -- both the network ID and derivation path will be extracted from the -- address and used in the construction of the witness. -makeShelleyBootstrapWitness :: forall era. - IsShelleyBasedEra era +makeShelleyBootstrapWitness :: forall era. + IsShelleyBasedEra era => WitnessNetworkIdOrByronAddress - -> TxBody era + -> TxBody era -> SigningKey ByronKey - -> KeyWitness era + -> KeyWitness era makeShelleyBootstrapWitness :: WitnessNetworkIdOrByronAddress -> TxBody era -> SigningKey ByronKey -> KeyWitness era makeShelleyBootstrapWitness WitnessNetworkIdOrByronAddress @@ -1962,18 +1962,18 @@ _ = case ShelleyBasedEra era forall era. IsShelleyBasedEra era => ShelleyBasedEra era -shelleyBasedEra :: ShelleyBasedEra era of {} +shelleyBasedEra :: ShelleyBasedEra era of {} -makeShelleyBootstrapWitness WitnessNetworkIdOrByronAddress -nwOrAddr (ShelleyTxBody ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -txbody [Script (ShelleyLedgerEra era)] +makeShelleyBootstrapWitness WitnessNetworkIdOrByronAddress +nwOrAddr (ShelleyTxBody ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +txbody [Script (ShelleyLedgerEra era)] _ TxBodyScriptData era _ Maybe (AuxiliaryData (ShelleyLedgerEra era)) -_) SigningKey ByronKey -sk = +_) SigningKey ByronKey +sk = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> ShelleyBasedEra era @@ -1992,10 +1992,10 @@ -> SigningKey ByronKey -> KeyWitness era makeShelleyBasedBootstrapWitness ShelleyBasedEra era -era WitnessNetworkIdOrByronAddress -nwOrAddr TxBody (ShelleyLedgerEra era) -txbody SigningKey ByronKey -sk +era WitnessNetworkIdOrByronAddress +nwOrAddr TxBody (ShelleyLedgerEra era) +txbody SigningKey ByronKey +sk ShelleyBasedEra era ShelleyBasedEraAllegra -> ShelleyBasedEra era @@ -2014,10 +2014,10 @@ -> SigningKey ByronKey -> KeyWitness era makeShelleyBasedBootstrapWitness ShelleyBasedEra era -era WitnessNetworkIdOrByronAddress -nwOrAddr TxBody (ShelleyLedgerEra era) -txbody SigningKey ByronKey -sk +era WitnessNetworkIdOrByronAddress +nwOrAddr TxBody (ShelleyLedgerEra era) +txbody SigningKey ByronKey +sk ShelleyBasedEra era ShelleyBasedEraMary -> ShelleyBasedEra era @@ -2036,10 +2036,10 @@ -> SigningKey ByronKey -> KeyWitness era makeShelleyBasedBootstrapWitness ShelleyBasedEra era -era WitnessNetworkIdOrByronAddress -nwOrAddr TxBody (ShelleyLedgerEra era) -txbody SigningKey ByronKey -sk +era WitnessNetworkIdOrByronAddress +nwOrAddr TxBody (ShelleyLedgerEra era) +txbody SigningKey ByronKey +sk ShelleyBasedEra era ShelleyBasedEraAlonzo -> ShelleyBasedEra era @@ -2058,37 +2058,37 @@ -> SigningKey ByronKey -> KeyWitness era makeShelleyBasedBootstrapWitness ShelleyBasedEra era -era WitnessNetworkIdOrByronAddress -nwOrAddr TxBody (ShelleyLedgerEra era) -txbody SigningKey ByronKey -sk +era WitnessNetworkIdOrByronAddress +nwOrAddr TxBody (ShelleyLedgerEra era) +txbody SigningKey ByronKey +sk -makeShelleyBasedBootstrapWitness :: forall era. +makeShelleyBasedBootstrapWitness :: forall era. (Ledger.HashAnnotated - (Ledger.TxBody (ShelleyLedgerEra era)) + (Ledger.TxBody (ShelleyLedgerEra era)) Ledger.EraIndependentTxBody StandardCrypto) - => ShelleyBasedEra era + => ShelleyBasedEra era -> WitnessNetworkIdOrByronAddress - -> Ledger.TxBody (ShelleyLedgerEra era) + -> Ledger.TxBody (ShelleyLedgerEra era) -> SigningKey ByronKey - -> KeyWitness era + -> KeyWitness era makeShelleyBasedBootstrapWitness :: ShelleyBasedEra era -> WitnessNetworkIdOrByronAddress -> TxBody (ShelleyLedgerEra era) -> SigningKey ByronKey -> KeyWitness era -makeShelleyBasedBootstrapWitness ShelleyBasedEra era -era WitnessNetworkIdOrByronAddress -nwOrAddr TxBody (ShelleyLedgerEra era) -txbody (ByronSigningKey sk) = +makeShelleyBasedBootstrapWitness ShelleyBasedEra era +era WitnessNetworkIdOrByronAddress +nwOrAddr TxBody (ShelleyLedgerEra era) +txbody (ByronSigningKey sk) = ShelleyBasedEra era -> BootstrapWitness StandardCrypto -> KeyWitness era forall era. ShelleyBasedEra era -> BootstrapWitness StandardCrypto -> KeyWitness era ShelleyBootstrapWitness ShelleyBasedEra era -era (BootstrapWitness StandardCrypto -> KeyWitness era) +era (BootstrapWitness StandardCrypto -> KeyWitness era) -> BootstrapWitness StandardCrypto -> KeyWitness era forall a b. (a -> b) -> a -> b $ @@ -2103,32 +2103,32 @@ Shelley.BootstrapWitness { bwKey :: VKey 'Witness StandardCrypto Shelley.bwKey = VKey 'Witness StandardCrypto -vk, +vk, bwSig :: SignedDSIGN StandardCrypto (Hash StandardCrypto EraIndependentTxBody) Shelley.bwSig = SignedDSIGN StandardCrypto (Hash StandardCrypto EraIndependentTxBody) -signature, +signature, bwChainCode :: ChainCode Shelley.bwChainCode = ChainCode -chainCode, +chainCode, bwAttributes :: ByteString Shelley.bwAttributes = ByteString -attributes +attributes } where -- Starting with the easy bits: we /can/ convert the Byron verification key -- to a the pair of a Shelley verification key plus the chain code. -- - (VKey 'Witness StandardCrypto -vk, ChainCode -chainCode) = VerificationKey -> (VKey 'Witness StandardCrypto, ChainCode) + (VKey 'Witness StandardCrypto +vk, ChainCode +chainCode) = VerificationKey -> (VKey 'Witness StandardCrypto, ChainCode) forall crypto. (DSIGN crypto ~ Ed25519DSIGN) => VerificationKey -> (VKey 'Witness crypto, ChainCode) Shelley.unpackByronVKey (SigningKey -> VerificationKey Byron.toVerification SigningKey -sk) +sk) -- Now the hairy bits. -- @@ -2138,11 +2138,11 @@ -- now support extended signing keys for the Shelley too, we are able to -- reuse that here. -- - signature :: Shelley.SignedDSIGN StandardCrypto + signature :: Shelley.SignedDSIGN StandardCrypto (Shelley.Hash StandardCrypto Ledger.EraIndependentTxBody) - signature :: SignedDSIGN + signature :: SignedDSIGN StandardCrypto (Hash StandardCrypto EraIndependentTxBody) -signature = Hash Blake2b_256 EraIndependentTxBody +signature = Hash Blake2b_256 EraIndependentTxBody -> ShelleySigningKey -> SignedDSIGN StandardCrypto (Hash Blake2b_256 EraIndependentTxBody) @@ -2152,16 +2152,16 @@ makeShelleySignature Hash StandardCrypto EraIndependentTxBody Hash Blake2b_256 EraIndependentTxBody -txhash +txhash -- Make the signature with the extended key directly: (XPrv -> ShelleySigningKey ShelleyExtendedSigningKey (SigningKey -> XPrv Byron.unSigningKey SigningKey -sk)) +sk)) - txhash :: Shelley.Hash StandardCrypto Ledger.EraIndependentTxBody - txhash :: Hash StandardCrypto EraIndependentTxBody -txhash = SafeHash StandardCrypto EraIndependentTxBody + txhash :: Shelley.Hash StandardCrypto Ledger.EraIndependentTxBody + txhash :: Hash StandardCrypto EraIndependentTxBody +txhash = SafeHash StandardCrypto EraIndependentTxBody -> Hash StandardCrypto EraIndependentTxBody forall crypto i. SafeHash crypto i -> Hash (HASH crypto) i Ledger.extractHash (TxBody (ShelleyLedgerEra era) @@ -2170,15 +2170,15 @@ (HasAlgorithm c, HashAnnotated x i c) => x -> SafeHash c i Ledger.hashAnnotated TxBody (ShelleyLedgerEra era) -txbody) +txbody) --TODO: use Shelley.eraIndTxBodyHash txbody once that function has a -- suitably general type. -- And finally we need to provide the extra suffix bytes necessary to -- reconstruct the mini-Merkel tree that is a Byron address. The suffix -- bytes are the serialised address attributes. - attributes :: ByteString -attributes = + attributes :: ByteString +attributes = Attributes AddrAttributes -> ByteString forall tx. ToCBOR tx => tx -> ByteString CBOR.serialize' (Attributes AddrAttributes -> ByteString) @@ -2191,38 +2191,38 @@ Byron.AddrAttributes { aaVKDerivationPath :: Maybe HDAddressPayload Byron.aaVKDerivationPath = Maybe HDAddressPayload -derivationPath, +derivationPath, aaNetworkMagic :: NetworkMagic Byron.aaNetworkMagic = NetworkMagic -networkMagic +networkMagic } -- The 'WitnessNetworkIdOrByronAddress' value converted to an 'Either'. - eitherNwOrAddr :: Either NetworkId (Address ByronAddr) - eitherNwOrAddr :: Either NetworkId (Address ByronAddr) -eitherNwOrAddr = + eitherNwOrAddr :: Either NetworkId (Address ByronAddr) + eitherNwOrAddr :: Either NetworkId (Address ByronAddr) +eitherNwOrAddr = case WitnessNetworkIdOrByronAddress -nwOrAddr of - WitnessNetworkId NetworkId -nw -> NetworkId -> Either NetworkId (Address ByronAddr) +nwOrAddr of + WitnessNetworkId NetworkId +nw -> NetworkId -> Either NetworkId (Address ByronAddr) forall a b. a -> Either a b Left NetworkId -nw - WitnessByronAddress Address ByronAddr -addr -> Address ByronAddr -> Either NetworkId (Address ByronAddr) +nw + WitnessByronAddress Address ByronAddr +addr -> Address ByronAddr -> Either NetworkId (Address ByronAddr) forall a b. b -> Either a b Right Address ByronAddr -addr +addr - unByronAddr :: Address ByronAddr -> Byron.Address - unByronAddr :: Address ByronAddr -> Address -unByronAddr (ByronAddress Address -addr) = Address -addr + unByronAddr :: Address ByronAddr -> Byron.Address + unByronAddr :: Address ByronAddr -> Address +unByronAddr (ByronAddress Address +addr) = Address +addr - unAddrAttrs :: Address ByronAddr -> Byron.AddrAttributes - unAddrAttrs :: Address ByronAddr -> AddrAttributes -unAddrAttrs = Attributes AddrAttributes -> AddrAttributes + unAddrAttrs :: Address ByronAddr -> Byron.AddrAttributes + unAddrAttrs :: Address ByronAddr -> AddrAttributes +unAddrAttrs = Attributes AddrAttributes -> AddrAttributes forall h. Attributes h -> h Byron.attrData (Attributes AddrAttributes -> AddrAttributes) -> (Address ByronAddr -> Attributes AddrAttributes) @@ -2236,11 +2236,11 @@ -> Attributes AddrAttributes forall b c a. (b -> c) -> (a -> b) -> a -> c . Address ByronAddr -> Address -unByronAddr +unByronAddr - derivationPath :: Maybe Byron.HDAddressPayload - derivationPath :: Maybe HDAddressPayload -derivationPath = + derivationPath :: Maybe Byron.HDAddressPayload + derivationPath :: Maybe HDAddressPayload +derivationPath = (NetworkId -> Maybe HDAddressPayload) -> (Address ByronAddr -> Maybe HDAddressPayload) -> Either NetworkId (Address ByronAddr) @@ -2259,13 +2259,13 @@ -> Maybe HDAddressPayload forall b c a. (b -> c) -> (a -> b) -> a -> c . Address ByronAddr -> AddrAttributes -unAddrAttrs) +unAddrAttrs) Either NetworkId (Address ByronAddr) -eitherNwOrAddr +eitherNwOrAddr - networkMagic :: Byron.NetworkMagic - networkMagic :: NetworkMagic -networkMagic = + networkMagic :: Byron.NetworkMagic + networkMagic :: NetworkMagic +networkMagic = (NetworkId -> NetworkMagic) -> (Address ByronAddr -> NetworkMagic) -> Either NetworkId (Address ByronAddr) @@ -2281,9 +2281,9 @@ -> NetworkMagic forall b c a. (b -> c) -> (a -> b) -> a -> c . Address ByronAddr -> AddrAttributes -unAddrAttrs) +unAddrAttrs) Either NetworkId (Address ByronAddr) -eitherNwOrAddr +eitherNwOrAddr data ShelleyWitnessSigningKey = @@ -2300,67 +2300,67 @@ | WitnessGenesisUTxOKey (SigningKey GenesisUTxOKey) -makeShelleyKeyWitness :: forall era - . IsShelleyBasedEra era - => TxBody era +makeShelleyKeyWitness :: forall era + . IsShelleyBasedEra era + => TxBody era -> ShelleyWitnessSigningKey - -> KeyWitness era + -> KeyWitness era makeShelleyKeyWitness :: TxBody era -> ShelleyWitnessSigningKey -> KeyWitness era -makeShelleyKeyWitness (ShelleyTxBody ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -txbody [Script (ShelleyLedgerEra era)] +makeShelleyKeyWitness (ShelleyTxBody ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +txbody [Script (ShelleyLedgerEra era)] _ TxBodyScriptData era _ Maybe (AuxiliaryData (ShelleyLedgerEra era)) _) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> TxBody StandardShelley -> ShelleyWitnessSigningKey -> KeyWitness era forall ledgerera. (ShelleyBased ledgerera, ShelleyLedgerEra era ~ ledgerera) => TxBody ledgerera -> ShelleyWitnessSigningKey -> KeyWitness era -makeShelleyBasedKeyWitness TxBody StandardShelley +makeShelleyBasedKeyWitness TxBody StandardShelley TxBody (ShelleyLedgerEra era) -txbody +txbody ShelleyBasedEra era ShelleyBasedEraAllegra -> TxBody StandardAllegra -> ShelleyWitnessSigningKey -> KeyWitness era forall ledgerera. (ShelleyBased ledgerera, ShelleyLedgerEra era ~ ledgerera) => TxBody ledgerera -> ShelleyWitnessSigningKey -> KeyWitness era -makeShelleyBasedKeyWitness TxBody StandardAllegra +makeShelleyBasedKeyWitness TxBody StandardAllegra TxBody (ShelleyLedgerEra era) -txbody +txbody ShelleyBasedEra era ShelleyBasedEraMary -> TxBody StandardMary -> ShelleyWitnessSigningKey -> KeyWitness era forall ledgerera. (ShelleyBased ledgerera, ShelleyLedgerEra era ~ ledgerera) => TxBody ledgerera -> ShelleyWitnessSigningKey -> KeyWitness era -makeShelleyBasedKeyWitness TxBody StandardMary +makeShelleyBasedKeyWitness TxBody StandardMary TxBody (ShelleyLedgerEra era) -txbody +txbody ShelleyBasedEra era ShelleyBasedEraAlonzo -> TxBody StandardAlonzo -> ShelleyWitnessSigningKey -> KeyWitness era forall ledgerera. (ShelleyBased ledgerera, ShelleyLedgerEra era ~ ledgerera) => TxBody ledgerera -> ShelleyWitnessSigningKey -> KeyWitness era -makeShelleyBasedKeyWitness TxBody StandardAlonzo +makeShelleyBasedKeyWitness TxBody StandardAlonzo TxBody (ShelleyLedgerEra era) -txbody +txbody where - makeShelleyBasedKeyWitness :: Shelley.ShelleyBased ledgerera - => ShelleyLedgerEra era ~ ledgerera - => Ledger.TxBody ledgerera + makeShelleyBasedKeyWitness :: Shelley.ShelleyBased ledgerera + => ShelleyLedgerEra era ~ ledgerera + => Ledger.TxBody ledgerera -> ShelleyWitnessSigningKey - -> KeyWitness era - makeShelleyBasedKeyWitness :: TxBody ledgerera -> ShelleyWitnessSigningKey -> KeyWitness era -makeShelleyBasedKeyWitness TxBody ledgerera -txbody' = + -> KeyWitness era + makeShelleyBasedKeyWitness :: TxBody ledgerera -> ShelleyWitnessSigningKey -> KeyWitness era +makeShelleyBasedKeyWitness TxBody ledgerera +txbody' = - let txhash :: Shelley.Hash StandardCrypto Ledger.EraIndependentTxBody - txhash :: Hash StandardCrypto EraIndependentTxBody -txhash = SafeHash StandardCrypto EraIndependentTxBody + let txhash :: Shelley.Hash StandardCrypto Ledger.EraIndependentTxBody + txhash :: Hash StandardCrypto EraIndependentTxBody +txhash = SafeHash StandardCrypto EraIndependentTxBody -> Hash StandardCrypto EraIndependentTxBody forall crypto i. SafeHash crypto i -> Hash (HASH crypto) i Ledger.extractHash (TxBody (ShelleyLedgerEra era) @@ -2370,22 +2370,22 @@ x -> SafeHash c i Ledger.hashAnnotated TxBody ledgerera TxBody (ShelleyLedgerEra era) -txbody') +txbody') -- To allow sharing of the txhash computation across many signatures we -- define and share the txhash outside the lambda for the signing key: - in \ShelleyWitnessSigningKey -wsk -> - let sk :: ShelleySigningKey -sk = ShelleyWitnessSigningKey -> ShelleySigningKey + in \ShelleyWitnessSigningKey +wsk -> + let sk :: ShelleySigningKey +sk = ShelleyWitnessSigningKey -> ShelleySigningKey toShelleySigningKey ShelleyWitnessSigningKey -wsk - vk :: VKey 'Witness StandardCrypto -vk = ShelleySigningKey -> VKey 'Witness StandardCrypto +wsk + vk :: VKey 'Witness StandardCrypto +vk = ShelleySigningKey -> VKey 'Witness StandardCrypto getShelleyKeyWitnessVerificationKey ShelleySigningKey -sk - signature :: SignedDSIGN StandardCrypto (Hash Blake2b_256 EraIndependentTxBody) -signature = Hash Blake2b_256 EraIndependentTxBody +sk + signature :: SignedDSIGN StandardCrypto (Hash Blake2b_256 EraIndependentTxBody) +signature = Hash Blake2b_256 EraIndependentTxBody -> ShelleySigningKey -> SignedDSIGN StandardCrypto (Hash Blake2b_256 EraIndependentTxBody) @@ -2394,15 +2394,15 @@ tosign -> ShelleySigningKey -> SignedDSIGN StandardCrypto tosign makeShelleySignature Hash StandardCrypto EraIndependentTxBody Hash Blake2b_256 EraIndependentTxBody -txhash ShelleySigningKey -sk +txhash ShelleySigningKey +sk in ShelleyBasedEra era -> WitVKey 'Witness StandardCrypto -> KeyWitness era forall era. ShelleyBasedEra era -> WitVKey 'Witness StandardCrypto -> KeyWitness era ShelleyKeyWitness ShelleyBasedEra era -era (WitVKey 'Witness StandardCrypto -> KeyWitness era) +era (WitVKey 'Witness StandardCrypto -> KeyWitness era) -> WitVKey 'Witness StandardCrypto -> KeyWitness era forall a b. (a -> b) -> a -> b $ @@ -2416,15 +2416,15 @@ -> SignedDSIGN crypto (Hash crypto EraIndependentTxBody) -> WitVKey kr crypto Shelley.WitVKey VKey 'Witness StandardCrypto -vk SignedDSIGN +vk SignedDSIGN StandardCrypto (Hash StandardCrypto EraIndependentTxBody) SignedDSIGN StandardCrypto (Hash Blake2b_256 EraIndependentTxBody) -signature +signature makeShelleyKeyWitness ByronTxBody{} = case ShelleyBasedEra era forall era. IsShelleyBasedEra era => ShelleyBasedEra era -shelleyBasedEra :: ShelleyBasedEra era of {} +shelleyBasedEra :: ShelleyBasedEra era of {} -- | We support making key witnesses with both normal and extended signing keys. @@ -2439,57 +2439,57 @@ toShelleySigningKey :: ShelleyWitnessSigningKey -> ShelleySigningKey toShelleySigningKey :: ShelleyWitnessSigningKey -> ShelleySigningKey -toShelleySigningKey ShelleyWitnessSigningKey -key = case ShelleyWitnessSigningKey -key of - WitnessPaymentKey (PaymentSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey +toShelleySigningKey ShelleyWitnessSigningKey +key = case ShelleyWitnessSigningKey +key of + WitnessPaymentKey (PaymentSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto -sk - WitnessStakeKey (StakeSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey +sk + WitnessStakeKey (StakeSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto -sk - WitnessStakePoolKey (StakePoolSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey +sk + WitnessStakePoolKey (StakePoolSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto -sk - WitnessGenesisKey (GenesisSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey +sk + WitnessGenesisKey (GenesisSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto -sk - WitnessGenesisUTxOKey (GenesisUTxOSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey +sk + WitnessGenesisUTxOKey (GenesisUTxOSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto -sk - WitnessGenesisDelegateKey (GenesisDelegateSigningKey sk) -> +sk + WitnessGenesisDelegateKey (GenesisDelegateSigningKey sk) -> SignKeyDSIGN StandardCrypto -> ShelleySigningKey ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto -sk +sk -- The cases for extended keys - WitnessPaymentExtendedKey (PaymentExtendedSigningKey sk) -> + WitnessPaymentExtendedKey (PaymentExtendedSigningKey sk) -> XPrv -> ShelleySigningKey ShelleyExtendedSigningKey XPrv -sk +sk - WitnessStakeExtendedKey (StakeExtendedSigningKey sk) -> + WitnessStakeExtendedKey (StakeExtendedSigningKey sk) -> XPrv -> ShelleySigningKey ShelleyExtendedSigningKey XPrv -sk +sk - WitnessGenesisExtendedKey (GenesisExtendedSigningKey sk) -> + WitnessGenesisExtendedKey (GenesisExtendedSigningKey sk) -> XPrv -> ShelleySigningKey ShelleyExtendedSigningKey XPrv -sk +sk - WitnessGenesisDelegateExtendedKey (GenesisDelegateExtendedSigningKey sk) -> + WitnessGenesisDelegateExtendedKey (GenesisDelegateExtendedSigningKey sk) -> XPrv -> ShelleySigningKey ShelleyExtendedSigningKey XPrv -sk +sk getShelleyKeyWitnessVerificationKey :: ShelleySigningKey -> Shelley.VKey Shelley.Witness StandardCrypto getShelleyKeyWitnessVerificationKey :: ShelleySigningKey -> VKey 'Witness StandardCrypto -getShelleyKeyWitnessVerificationKey (ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto -sk) = +getShelleyKeyWitnessVerificationKey (ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto +sk) = (VKey 'Payment StandardCrypto -> VKey 'Witness StandardCrypto forall (a :: KeyRole -> * -> *) (r :: KeyRole) crypto (r' :: KeyRole). @@ -2502,8 +2502,8 @@ -> SignKeyDSIGN Ed25519DSIGN -> VKey 'Witness StandardCrypto forall b c a. (b -> c) -> (a -> b) -> a -> c -. (\(PaymentVerificationKey vk) -> VKey 'Payment StandardCrypto -vk) +. (\(PaymentVerificationKey vk) -> VKey 'Payment StandardCrypto +vk) (VerificationKey PaymentKey -> VKey 'Payment StandardCrypto) -> (SignKeyDSIGN Ed25519DSIGN -> VerificationKey PaymentKey) -> SignKeyDSIGN Ed25519DSIGN @@ -2527,10 +2527,10 @@ forall a b. (a -> b) -> a -> b $ SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk +sk -getShelleyKeyWitnessVerificationKey (ShelleyExtendedSigningKey XPrv -sk) = +getShelleyKeyWitnessVerificationKey (ShelleyExtendedSigningKey XPrv +sk) = (VKey 'Payment StandardCrypto -> VKey 'Witness StandardCrypto forall (a :: KeyRole -> * -> *) (r :: KeyRole) crypto (r' :: KeyRole). @@ -2543,8 +2543,8 @@ -> XPrv -> VKey 'Witness StandardCrypto forall b c a. (b -> c) -> (a -> b) -> a -> c -. (\(PaymentVerificationKey vk) -> VKey 'Payment StandardCrypto -vk) +. (\(PaymentVerificationKey vk) -> VKey 'Payment StandardCrypto +vk) (VerificationKey PaymentKey -> VKey 'Payment StandardCrypto) -> (XPrv -> VerificationKey PaymentKey) -> XPrv @@ -2578,18 +2578,18 @@ -> XPrv -> VKey 'Witness StandardCrypto forall a b. (a -> b) -> a -> b $ XPrv -sk +sk -makeShelleySignature - :: Crypto.SignableRepresentation tosign - => tosign +makeShelleySignature + :: Crypto.SignableRepresentation tosign + => tosign -> ShelleySigningKey - -> Shelley.SignedDSIGN StandardCrypto tosign + -> Shelley.SignedDSIGN StandardCrypto tosign makeShelleySignature :: tosign -> ShelleySigningKey -> SignedDSIGN StandardCrypto tosign -makeShelleySignature tosign -tosign (ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto -sk) = +makeShelleySignature tosign +tosign (ShelleyNormalSigningKey SignKeyDSIGN StandardCrypto +sk) = ContextDSIGN Ed25519DSIGN -> tosign -> SignKeyDSIGN Ed25519DSIGN @@ -2598,16 +2598,16 @@ (DSIGNAlgorithm v, Signable v a) => ContextDSIGN v -> a -> SignKeyDSIGN v -> SignedDSIGN v a Crypto.signedDSIGN () tosign -tosign SignKeyDSIGN StandardCrypto +tosign SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -sk +sk -makeShelleySignature tosign -tosign (ShelleyExtendedSigningKey XPrv -sk) = +makeShelleySignature tosign +tosign (ShelleyExtendedSigningKey XPrv +sk) = XSignature -> SignedDSIGN StandardCrypto tosign forall b. XSignature -> SignedDSIGN StandardCrypto b -fromXSignature (XSignature -> SignedDSIGN StandardCrypto tosign) +fromXSignature (XSignature -> SignedDSIGN StandardCrypto tosign) -> XSignature -> SignedDSIGN StandardCrypto tosign forall a b. (a -> b) -> a -> b $ @@ -2619,16 +2619,16 @@ ByteString BS.empty -- passphrase for (unused) in-memory encryption XPrv -sk +sk (tosign -> ByteString forall a. SignableRepresentation a => a -> ByteString Crypto.getSignableRepresentation tosign -tosign) +tosign) where - fromXSignature :: Crypto.HD.XSignature - -> Shelley.SignedDSIGN StandardCrypto b - fromXSignature :: XSignature -> SignedDSIGN StandardCrypto b -fromXSignature = + fromXSignature :: Crypto.HD.XSignature + -> Shelley.SignedDSIGN StandardCrypto b + fromXSignature :: XSignature -> SignedDSIGN StandardCrypto b +fromXSignature = SigDSIGN Ed25519DSIGN -> SignedDSIGN Ed25519DSIGN b forall v a. SigDSIGN v -> SignedDSIGN v a Crypto.SignedDSIGN @@ -2642,7 +2642,7 @@ forall a. a -> Maybe a -> a fromMaybe SigDSIGN Ed25519DSIGN forall a. a -impossible +impossible (Maybe (SigDSIGN Ed25519DSIGN) -> SigDSIGN Ed25519DSIGN) -> (XSignature -> Maybe (SigDSIGN Ed25519DSIGN)) -> XSignature @@ -2659,8 +2659,8 @@ . XSignature -> ByteString Crypto.HD.unXSignature - impossible :: a -impossible = + impossible :: a +impossible = String -> a forall a. HasCallStack => String -> a error String @@ -2674,18 +2674,18 @@ -> Tx ByronEra signByronTransaction :: NetworkId -> TxBody ByronEra -> [SigningKey ByronKey] -> Tx ByronEra -signByronTransaction NetworkId -nw TxBody ByronEra -txbody [SigningKey ByronKey] -sks = +signByronTransaction NetworkId +nw TxBody ByronEra +txbody [SigningKey ByronKey] +sks = [KeyWitness ByronEra] -> TxBody ByronEra -> Tx ByronEra forall era. [KeyWitness era] -> TxBody era -> Tx era makeSignedTransaction [KeyWitness ByronEra] -witnesses TxBody ByronEra -txbody +witnesses TxBody ByronEra +txbody where - witnesses :: [KeyWitness ByronEra] -witnesses = (SigningKey ByronKey -> KeyWitness ByronEra) + witnesses :: [KeyWitness ByronEra] +witnesses = (SigningKey ByronKey -> KeyWitness ByronEra) -> [SigningKey ByronKey] -> [KeyWitness ByronEra] forall a b. (a -> b) -> [a] -> [b] map (NetworkId @@ -2695,27 +2695,27 @@ NetworkId -> TxBody ByronEra -> SigningKey key -> KeyWitness ByronEra makeByronKeyWitness NetworkId -nw TxBody ByronEra -txbody) [SigningKey ByronKey] -sks +nw TxBody ByronEra +txbody) [SigningKey ByronKey] +sks -- signing keys is a set -signShelleyTransaction :: IsShelleyBasedEra era - => TxBody era +signShelleyTransaction :: IsShelleyBasedEra era + => TxBody era -> [ShelleyWitnessSigningKey] - -> Tx era + -> Tx era signShelleyTransaction :: TxBody era -> [ShelleyWitnessSigningKey] -> Tx era -signShelleyTransaction TxBody era -txbody [ShelleyWitnessSigningKey] -sks = +signShelleyTransaction TxBody era +txbody [ShelleyWitnessSigningKey] +sks = [KeyWitness era] -> TxBody era -> Tx era forall era. [KeyWitness era] -> TxBody era -> Tx era makeSignedTransaction [KeyWitness era] -witnesses TxBody era -txbody +witnesses TxBody era +txbody where - witnesses :: [KeyWitness era] -witnesses = (ShelleyWitnessSigningKey -> KeyWitness era) + witnesses :: [KeyWitness era] +witnesses = (ShelleyWitnessSigningKey -> KeyWitness era) -> [ShelleyWitnessSigningKey] -> [KeyWitness era] forall a b. (a -> b) -> [a] -> [b] map (TxBody era -> ShelleyWitnessSigningKey -> KeyWitness era @@ -2723,6 +2723,6 @@ IsShelleyBasedEra era => TxBody era -> ShelleyWitnessSigningKey -> KeyWitness era makeShelleyKeyWitness TxBody era -txbody) [ShelleyWitnessSigningKey] -sks +txbody) [ShelleyWitnessSigningKey] +sks \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.TxBody.html b/cardano-api/src/Cardano.Api.TxBody.html index e01d6398732..512c74cd1a6 100644 --- a/cardano-api/src/Cardano.Api.TxBody.html +++ b/cardano-api/src/Cardano.Api.TxBody.html @@ -206,14 +206,14 @@ -- newtype TxId = TxId (Shelley.Hash StandardCrypto Shelley.EraIndependentTxBody) - deriving stock (TxId -> TxId -> Bool + deriving stock (TxId -> TxId -> Bool (TxId -> TxId -> Bool) -> (TxId -> TxId -> Bool) -> Eq TxId forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: TxId -> TxId -> Bool $c/= :: TxId -> TxId -> Bool == :: TxId -> TxId -> Bool $c== :: TxId -> TxId -> Bool -Eq, Eq TxId +Eq, Eq TxId Eq TxId -> (TxId -> TxId -> Ordering) -> (TxId -> TxId -> Bool) @@ -251,7 +251,7 @@ compare :: TxId -> TxId -> Ordering $ccompare :: TxId -> TxId -> Ordering $cp1Ord :: Eq TxId -Ord, Int -> TxId -> ShowS +Ord, Int -> TxId -> ShowS [TxId] -> ShowS TxId -> String (Int -> TxId -> ShowS) @@ -265,7 +265,7 @@ showsPrec :: Int -> TxId -> ShowS $cshowsPrec :: Int -> TxId -> ShowS Show) - deriving newtype (String -> TxId + deriving newtype (String -> TxId (String -> TxId) -> IsString TxId forall a. (String -> a) -> IsString a fromString :: String -> TxId @@ -273,8 +273,8 @@ IsString) -- We use the Shelley representation and convert the Byron one -instance ToJSON TxId where - toJSON :: TxId -> Value +instance ToJSON TxId where + toJSON :: TxId -> Value toJSON = Text -> Value Aeson.String (Text -> Value) -> (TxId -> Text) -> TxId -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -284,23 +284,23 @@ instance HasTypeProxy TxId where data AsType TxId = AsTxId - proxyToAsType :: Proxy TxId -> AsType TxId + proxyToAsType :: Proxy TxId -> AsType TxId proxyToAsType Proxy TxId _ = AsType TxId AsTxId instance SerialiseAsRawBytes TxId where - serialiseToRawBytes :: TxId -> ByteString -serialiseToRawBytes (TxId Hash StandardCrypto EraIndependentTxBody -h) = Hash Blake2b_256 EraIndependentTxBody -> ByteString + serialiseToRawBytes :: TxId -> ByteString +serialiseToRawBytes (TxId Hash StandardCrypto EraIndependentTxBody +h) = Hash Blake2b_256 EraIndependentTxBody -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash StandardCrypto EraIndependentTxBody Hash Blake2b_256 EraIndependentTxBody -h - deserialiseFromRawBytes :: AsType TxId -> ByteString -> Maybe TxId +h + deserialiseFromRawBytes :: AsType TxId -> ByteString -> Maybe TxId deserialiseFromRawBytes AsType TxId -AsTxId ByteString -bs = Hash StandardCrypto EraIndependentTxBody -> TxId +AsTxId ByteString +bs = Hash StandardCrypto EraIndependentTxBody -> TxId Hash Blake2b_256 EraIndependentTxBody -> TxId TxId (Hash Blake2b_256 EraIndependentTxBody -> TxId) -> Maybe (Hash Blake2b_256 EraIndependentTxBody) -> Maybe TxId @@ -308,24 +308,24 @@ <$> ByteString -> Maybe (Hash Blake2b_256 EraIndependentTxBody) forall h a. HashAlgorithm h => ByteString -> Maybe (Hash h a) Crypto.hashFromBytes ByteString -bs +bs toByronTxId :: TxId -> Byron.TxId toByronTxId :: TxId -> TxId -toByronTxId (TxId Hash StandardCrypto EraIndependentTxBody -h) = +toByronTxId (TxId Hash StandardCrypto EraIndependentTxBody +h) = ByteString -> TxId forall a. ByteString -> Hash a Byron.unsafeHashFromBytes (Hash Blake2b_256 EraIndependentTxBody -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes Hash StandardCrypto EraIndependentTxBody Hash Blake2b_256 EraIndependentTxBody -h) +h) toShelleyTxId :: TxId -> Shelley.TxId StandardCrypto toShelleyTxId :: TxId -> TxId StandardCrypto -toShelleyTxId (TxId Hash StandardCrypto EraIndependentTxBody -h) = +toShelleyTxId (TxId Hash StandardCrypto EraIndependentTxBody +h) = SafeHash StandardCrypto EraIndependentTxBody -> TxId StandardCrypto forall crypto. SafeHash crypto EraIndependentTxBody -> TxId crypto Shelley.TxId (Hash StandardCrypto EraIndependentTxBody @@ -337,12 +337,12 @@ forall h a b. Hash h a -> Hash h b Crypto.castHash Hash StandardCrypto EraIndependentTxBody Hash Blake2b_256 EraIndependentTxBody -h)) +h)) fromShelleyTxId :: Shelley.TxId StandardCrypto -> TxId fromShelleyTxId :: TxId StandardCrypto -> TxId -fromShelleyTxId (Shelley.TxId SafeHash StandardCrypto EraIndependentTxBody -h) = +fromShelleyTxId (Shelley.TxId SafeHash StandardCrypto EraIndependentTxBody +h) = Hash StandardCrypto EraIndependentTxBody -> TxId TxId (Hash Blake2b_256 EraIndependentTxBody -> Hash Blake2b_256 EraIndependentTxBody @@ -351,14 +351,14 @@ -> Hash StandardCrypto EraIndependentTxBody forall crypto i. SafeHash crypto i -> Hash (HASH crypto) i SafeHash.extractHash SafeHash StandardCrypto EraIndependentTxBody -h)) +h)) -- | Calculate the transaction identifier for a 'TxBody'. -- -getTxId :: forall era. TxBody era -> TxId +getTxId :: forall era. TxBody era -> TxId getTxId :: TxBody era -> TxId -getTxId (ByronTxBody Annotated Tx ByteString -tx) = +getTxId (ByronTxBody Annotated Tx ByteString +tx) = Hash StandardCrypto EraIndependentTxBody -> TxId Hash Blake2b_256 EraIndependentTxBody -> TxId TxId @@ -374,7 +374,7 @@ forall a. a -> Maybe a -> a fromMaybe Hash Blake2b_256 EraIndependentTxBody forall a. a -impossible +impossible (Maybe (Hash Blake2b_256 EraIndependentTxBody) -> Hash Blake2b_256 EraIndependentTxBody) -> (Annotated Tx ByteString @@ -405,57 +405,57 @@ -> Annotated Tx ByteString -> TxId forall a b. (a -> b) -> a -> b $ Annotated Tx ByteString -tx +tx where - impossible :: a -impossible = + impossible :: a +impossible = String -> a forall a. HasCallStack => String -> a error String "getTxId: byron and shelley hash sizes do not match" -getTxId (ShelleyTxBody ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -tx [Script (ShelleyLedgerEra era)] +getTxId (ShelleyTxBody ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +tx [Script (ShelleyLedgerEra era)] _ TxBodyScriptData era _ Maybe (AuxiliaryData (ShelleyLedgerEra era)) _) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> (Crypto (ShelleyLedgerEra era) ~ StandardCrypto, UsesTxBody (ShelleyLedgerEra era)) => TxBody (ShelleyLedgerEra era) -> TxId TxBody (ShelleyLedgerEra era) -> TxId -getTxIdShelley TxBody (ShelleyLedgerEra era) -tx +getTxIdShelley TxBody (ShelleyLedgerEra era) +tx ShelleyBasedEra era ShelleyBasedEraAllegra -> (Crypto (ShelleyLedgerEra era) ~ StandardCrypto, UsesTxBody (ShelleyLedgerEra era)) => TxBody (ShelleyLedgerEra era) -> TxId TxBody (ShelleyLedgerEra era) -> TxId -getTxIdShelley TxBody (ShelleyLedgerEra era) -tx +getTxIdShelley TxBody (ShelleyLedgerEra era) +tx ShelleyBasedEra era ShelleyBasedEraMary -> (Crypto (ShelleyLedgerEra era) ~ StandardCrypto, UsesTxBody (ShelleyLedgerEra era)) => TxBody (ShelleyLedgerEra era) -> TxId TxBody (ShelleyLedgerEra era) -> TxId -getTxIdShelley TxBody (ShelleyLedgerEra era) -tx +getTxIdShelley TxBody (ShelleyLedgerEra era) +tx ShelleyBasedEra era ShelleyBasedEraAlonzo -> (Crypto (ShelleyLedgerEra era) ~ StandardCrypto, UsesTxBody (ShelleyLedgerEra era)) => TxBody (ShelleyLedgerEra era) -> TxId TxBody (ShelleyLedgerEra era) -> TxId -getTxIdShelley TxBody (ShelleyLedgerEra era) -tx +getTxIdShelley TxBody (ShelleyLedgerEra era) +tx where - getTxIdShelley :: Ledger.Crypto (ShelleyLedgerEra era) ~ StandardCrypto - => Ledger.UsesTxBody (ShelleyLedgerEra era) - => Ledger.TxBody (ShelleyLedgerEra era) -> TxId - getTxIdShelley :: TxBody (ShelleyLedgerEra era) -> TxId -getTxIdShelley = + getTxIdShelley :: Ledger.Crypto (ShelleyLedgerEra era) ~ StandardCrypto + => Ledger.UsesTxBody (ShelleyLedgerEra era) + => Ledger.TxBody (ShelleyLedgerEra era) -> TxId + getTxIdShelley :: TxBody (ShelleyLedgerEra era) -> TxId +getTxIdShelley = Hash StandardCrypto EraIndependentTxBody -> TxId Hash Blake2b_256 EraIndependentTxBody -> TxId TxId @@ -476,12 +476,12 @@ -> TxBody (ShelleyLedgerEra era) -> Hash Blake2b_256 EraIndependentTxBody forall b c a. (b -> c) -> (a -> b) -> a -> c -. (\(Shelley.TxId SafeHash StandardCrypto EraIndependentTxBody -txhash) -> SafeHash StandardCrypto EraIndependentTxBody +. (\(Shelley.TxId SafeHash StandardCrypto EraIndependentTxBody +txhash) -> SafeHash StandardCrypto EraIndependentTxBody -> Hash StandardCrypto EraIndependentTxBody forall crypto i. SafeHash crypto i -> Hash (HASH crypto) i SafeHash.extractHash SafeHash StandardCrypto EraIndependentTxBody -txhash) +txhash) (TxId StandardCrypto -> Hash Blake2b_256 EraIndependentTxBody) -> (TxBody (ShelleyLedgerEra era) -> TxId StandardCrypto) -> TxBody (ShelleyLedgerEra era) @@ -491,7 +491,7 @@ TxBody (ShelleyLedgerEra era) -> TxId (Crypto (ShelleyLedgerEra era)) forall era. Era era => TxBody era -> TxId (Crypto era) -Shelley.txid @(ShelleyLedgerEra era)) +Shelley.txid @(ShelleyLedgerEra era)) -- ---------------------------------------------------------------------------- @@ -499,14 +499,14 @@ -- data TxIn = TxIn TxId TxIx - deriving (TxIn -> TxIn -> Bool + deriving (TxIn -> TxIn -> Bool (TxIn -> TxIn -> Bool) -> (TxIn -> TxIn -> Bool) -> Eq TxIn forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: TxIn -> TxIn -> Bool $c/= :: TxIn -> TxIn -> Bool == :: TxIn -> TxIn -> Bool $c== :: TxIn -> TxIn -> Bool -Eq, Eq TxIn +Eq, Eq TxIn Eq TxIn -> (TxIn -> TxIn -> Ordering) -> (TxIn -> TxIn -> Bool) @@ -544,7 +544,7 @@ compare :: TxIn -> TxIn -> Ordering $ccompare :: TxIn -> TxIn -> Ordering $cp1Ord :: Eq TxIn -Ord, Int -> TxIn -> ShowS +Ord, Int -> TxIn -> ShowS [TxIn] -> ShowS TxIn -> String (Int -> TxIn -> ShowS) @@ -559,18 +559,18 @@ $cshowsPrec :: Int -> TxIn -> ShowS Show) -instance ToJSON TxIn where - toJSON :: TxIn -> Value -toJSON TxIn -txIn = Text -> Value +instance ToJSON TxIn where + toJSON :: TxIn -> Value +toJSON TxIn +txIn = Text -> Value Aeson.String (Text -> Value) -> Text -> Value forall a b. (a -> b) -> a -> b $ TxIn -> Text renderTxIn TxIn -txIn +txIn -instance ToJSONKey TxIn where - toJSONKey :: ToJSONKeyFunction TxIn +instance ToJSONKey TxIn where + toJSONKey :: ToJSONKeyFunction TxIn toJSONKey = (TxIn -> Text) -> ToJSONKeyFunction TxIn forall a. (a -> Text) -> ToJSONKeyFunction a toJSONKeyText TxIn -> Text @@ -578,13 +578,13 @@ renderTxIn :: TxIn -> Text renderTxIn :: TxIn -> Text -renderTxIn (TxIn TxId -txId (TxIx Word -ix)) = +renderTxIn (TxIn TxId +txId (TxIx Word +ix)) = TxId -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText TxId -txId Text -> Text -> Text +txId Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text "#" Text -> Text -> Text @@ -593,18 +593,18 @@ Text.pack (Word -> String forall a. Show a => a -> String show Word -ix) +ix) newtype TxIx = TxIx Word - deriving stock (TxIx -> TxIx -> Bool + deriving stock (TxIx -> TxIx -> Bool (TxIx -> TxIx -> Bool) -> (TxIx -> TxIx -> Bool) -> Eq TxIx forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: TxIx -> TxIx -> Bool $c/= :: TxIx -> TxIx -> Bool == :: TxIx -> TxIx -> Bool $c== :: TxIx -> TxIx -> Bool -Eq, Eq TxIx +Eq, Eq TxIx Eq TxIx -> (TxIx -> TxIx -> Ordering) -> (TxIx -> TxIx -> Bool) @@ -642,7 +642,7 @@ compare :: TxIx -> TxIx -> Ordering $ccompare :: TxIx -> TxIx -> Ordering $cp1Ord :: Eq TxIx -Ord, Int -> TxIx -> ShowS +Ord, Int -> TxIx -> ShowS [TxIx] -> ShowS TxIx -> String (Int -> TxIx -> ShowS) @@ -656,7 +656,7 @@ showsPrec :: Int -> TxIx -> ShowS $cshowsPrec :: Int -> TxIx -> ShowS Show) - deriving newtype (Int -> TxIx + deriving newtype (Int -> TxIx TxIx -> Int TxIx -> [TxIx] TxIx -> TxIx @@ -698,7 +698,7 @@ succ :: TxIx -> TxIx $csucc :: TxIx -> TxIx Enum) - deriving newtype [TxIx] -> Value + deriving newtype [TxIx] -> Value [TxIx] -> Encoding TxIx -> Value TxIx -> Encoding @@ -721,31 +721,31 @@ $ctoEncoding :: TxIx -> Encoding toJSON :: TxIx -> Value $ctoJSON :: TxIx -> Value -ToJSON +ToJSON fromByronTxIn :: Byron.TxIn -> TxIn fromByronTxIn :: TxIn -> TxIn -fromByronTxIn (Byron.TxInUtxo TxId -txId Word32 -index) = - let shortBs :: ShortByteString -shortBs = TxId -> ShortByteString +fromByronTxIn (Byron.TxInUtxo TxId +txId Word32 +index) = + let shortBs :: ShortByteString +shortBs = TxId -> ShortByteString forall algo a. AbstractHash algo a -> ShortByteString Byron.abstractHashToShort TxId -txId - mApiHash :: Maybe (Hash Blake2b_256 EraIndependentTxBody) -mApiHash = ShortByteString -> Maybe (Hash Blake2b_256 EraIndependentTxBody) +txId + mApiHash :: Maybe (Hash Blake2b_256 EraIndependentTxBody) +mApiHash = ShortByteString -> Maybe (Hash Blake2b_256 EraIndependentTxBody) forall h a. HashAlgorithm h => ShortByteString -> Maybe (Hash h a) Crypto.hashFromBytesShort ShortByteString -shortBs +shortBs in case Maybe (Hash Blake2b_256 EraIndependentTxBody) -mApiHash of - Just Hash Blake2b_256 EraIndependentTxBody -apiHash -> TxId -> TxIx -> TxIn +mApiHash of + Just Hash Blake2b_256 EraIndependentTxBody +apiHash -> TxId -> TxIx -> TxIn TxIn (Hash StandardCrypto EraIndependentTxBody -> TxId TxId Hash StandardCrypto EraIndependentTxBody Hash Blake2b_256 EraIndependentTxBody -apiHash) (Word -> TxIx +apiHash) (Word -> TxIx TxIx (Word -> TxIx) -> (Integer -> Word) -> Integer -> TxIx forall b c a. (b -> c) -> (a -> b) -> a -> c . Integer -> Word @@ -755,7 +755,7 @@ $ Word32 -> Integer forall a. Integral a => a -> Integer toInteger Word32 -index) +index) Maybe (Hash Blake2b_256 EraIndependentTxBody) Nothing -> String -> TxIn forall a. HasCallStack => String -> a @@ -767,59 +767,59 @@ <> TxId -> String forall a. Show a => a -> String show TxId -txId +txId toByronTxIn :: TxIn -> Byron.TxIn toByronTxIn :: TxIn -> TxIn -toByronTxIn (TxIn TxId -txid (TxIx Word -txix)) = +toByronTxIn (TxIn TxId +txid (TxIx Word +txix)) = TxId -> Word32 -> TxIn Byron.TxInUtxo (TxId -> TxId toByronTxId TxId -txid) (Word -> Word32 +txid) (Word -> Word32 forall a b. (Integral a, Num b) => a -> b fromIntegral Word -txix) +txix) toShelleyTxIn :: TxIn -> Shelley.TxIn StandardCrypto toShelleyTxIn :: TxIn -> TxIn StandardCrypto -toShelleyTxIn (TxIn TxId -txid (TxIx Word -txix)) = +toShelleyTxIn (TxIn TxId +txid (TxIx Word +txix)) = TxId StandardCrypto -> Natural -> TxIn StandardCrypto forall crypto. Crypto crypto => TxId crypto -> Natural -> TxIn crypto Shelley.TxIn (TxId -> TxId StandardCrypto toShelleyTxId TxId -txid) (Word -> Natural +txid) (Word -> Natural forall a b. (Integral a, Num b) => a -> b fromIntegral Word -txix) +txix) fromShelleyTxIn :: Shelley.TxIn StandardCrypto -> TxIn fromShelleyTxIn :: TxIn StandardCrypto -> TxIn -fromShelleyTxIn (Shelley.TxIn TxId StandardCrypto -txid Natural -txix) = +fromShelleyTxIn (Shelley.TxIn TxId StandardCrypto +txid Natural +txix) = TxId -> TxIx -> TxIn TxIn (TxId StandardCrypto -> TxId fromShelleyTxId TxId StandardCrypto -txid) (Word -> TxIx +txid) (Word -> TxIx TxIx (Natural -> Word forall a b. (Integral a, Num b) => a -> b fromIntegral Natural -txix)) +txix)) -- ---------------------------------------------------------------------------- -- Transaction outputs -- -data TxOut era = TxOut (AddressInEra era) - (TxOutValue era) - (TxOutDatumHash era) +data TxOut era = TxOut (AddressInEra era) + (TxOutValue era) + (TxOutDatumHash era) deriving (forall x. TxOut era -> Rep (TxOut era) x) -> (forall x. Rep (TxOut era) x -> TxOut era) -> Generic (TxOut era) @@ -833,11 +833,11 @@ $cfrom :: forall era x. TxOut era -> Rep (TxOut era) x Generic -instance IsCardanoEra era => ToJSON (TxOut era) where - toJSON :: TxOut era -> Value -toJSON (TxOut AddressInEra era -addr TxOutValue era -val TxOutDatumHash era +instance IsCardanoEra era => ToJSON (TxOut era) where + toJSON :: TxOut era -> Value +toJSON (TxOut AddressInEra era +addr TxOutValue era +val TxOutDatumHash era TxOutDatumHashNone) = [Pair] -> Value object [ Text @@ -846,20 +846,20 @@ .= AddressInEra era -> Text forall era. AddressInEra era -> Text serialiseAddressForTxOut AddressInEra era -addr +addr , Text "value" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TxOutValue era -> Value forall a. ToJSON a => a -> Value toJSON TxOutValue era -val +val ] - toJSON (TxOut AddressInEra era -addr TxOutValue era -val (TxOutDatumHash ScriptDataSupportedInEra era -_ Hash ScriptData -d)) = + toJSON (TxOut AddressInEra era +addr TxOutValue era +val (TxOutDatumHash ScriptDataSupportedInEra era +_ Hash ScriptData +d)) = [Pair] -> Value object [ Text "address" Text -> Text -> Pair @@ -867,51 +867,51 @@ .= AddressInEra era -> Text forall era. AddressInEra era -> Text serialiseAddressForTxOut AddressInEra era -addr +addr , Text "value" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TxOutValue era -> Value forall a. ToJSON a => a -> Value toJSON TxOutValue era -val +val , Text "data" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Hash ScriptData -> Value forall a. ToJSON a => a -> Value toJSON Hash ScriptData -d +d ] -serialiseAddressForTxOut :: AddressInEra era -> Text +serialiseAddressForTxOut :: AddressInEra era -> Text serialiseAddressForTxOut :: AddressInEra era -> Text -serialiseAddressForTxOut (AddressInEra AddressTypeInEra addrtype era -addrType Address addrtype -addr) = +serialiseAddressForTxOut (AddressInEra AddressTypeInEra addrtype era +addrType Address addrtype +addr) = case AddressTypeInEra addrtype era -addrType of +addrType of AddressTypeInEra addrtype era ByronAddressInAnyEra -> Address addrtype -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText Address addrtype -addr +addr ShelleyAddressInEra ShelleyBasedEra era _ -> Address addrtype -> Text forall a. SerialiseAsBech32 a => a -> Text serialiseToBech32 Address addrtype -addr +addr -deriving instance Eq (TxOut era) -deriving instance Show (TxOut era) +deriving instance Eq (TxOut era) +deriving instance Show (TxOut era) fromByronTxOut :: Byron.TxOut -> TxOut ByronEra fromByronTxOut :: TxOut -> TxOut ByronEra -fromByronTxOut (Byron.TxOut Address -addr Lovelace -value) = +fromByronTxOut (Byron.TxOut Address +addr Lovelace +value) = AddressInEra ByronEra -> TxOutValue ByronEra -> TxOutDatumHash ByronEra -> TxOut ByronEra forall era. @@ -927,13 +927,13 @@ forall era. AddressTypeInEra ByronAddr era ByronAddressInAnyEra (Address -> Address ByronAddr ByronAddress Address -addr)) +addr)) (OnlyAdaSupportedInEra ByronEra -> Lovelace -> TxOutValue ByronEra forall era. OnlyAdaSupportedInEra era -> Lovelace -> TxOutValue era TxOutAdaOnly OnlyAdaSupportedInEra ByronEra AdaOnlyInByronEra (Lovelace -> Lovelace fromByronLovelace Lovelace -value)) +value)) TxOutDatumHash ByronEra forall era. TxOutDatumHash era TxOutDatumHashNone @@ -942,41 +942,41 @@ toByronTxOut :: TxOut ByronEra -> Maybe Byron.TxOut toByronTxOut :: TxOut ByronEra -> Maybe TxOut toByronTxOut (TxOut (AddressInEra AddressTypeInEra addrtype ByronEra -ByronAddressInAnyEra (ByronAddress Address -addr)) +ByronAddressInAnyEra (ByronAddress Address +addr)) (TxOutAdaOnly OnlyAdaSupportedInEra ByronEra -AdaOnlyInByronEra Lovelace -value) TxOutDatumHash ByronEra +AdaOnlyInByronEra Lovelace +value) TxOutDatumHash ByronEra _) = Address -> Lovelace -> TxOut Byron.TxOut Address -addr (Lovelace -> TxOut) -> Maybe Lovelace -> Maybe TxOut +addr (Lovelace -> TxOut) -> Maybe Lovelace -> Maybe TxOut forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Lovelace -> Maybe Lovelace toByronLovelace Lovelace -value +value toByronTxOut (TxOut (AddressInEra AddressTypeInEra addrtype ByronEra ByronAddressInAnyEra (ByronAddress Address _)) - (TxOutValue MultiAssetSupportedInEra ByronEra -era Value + (TxOutValue MultiAssetSupportedInEra ByronEra +era Value _) TxOutDatumHash ByronEra _) = case MultiAssetSupportedInEra ByronEra -era of {} +era of {} -toByronTxOut (TxOut (AddressInEra (ShelleyAddressInEra ShelleyBasedEra ByronEra -era) ShelleyAddress{}) +toByronTxOut (TxOut (AddressInEra (ShelleyAddressInEra ShelleyBasedEra ByronEra +era) ShelleyAddress{}) TxOutValue ByronEra _ TxOutDatumHash ByronEra _) = case ShelleyBasedEra ByronEra -era of {} +era of {} -toShelleyTxOut :: forall era ledgerera. - (ShelleyLedgerEra era ~ ledgerera, - IsShelleyBasedEra era, Ledger.ShelleyBased ledgerera) - => TxOut era -> Ledger.TxOut ledgerera +toShelleyTxOut :: forall era ledgerera. + (ShelleyLedgerEra era ~ ledgerera, + IsShelleyBasedEra era, Ledger.ShelleyBased ledgerera) + => TxOut era -> Ledger.TxOut ledgerera toShelleyTxOut :: TxOut era -> TxOut ledgerera toShelleyTxOut (TxOut AddressInEra era _ (TxOutAdaOnly OnlyAdaSupportedInEra era @@ -985,12 +985,12 @@ _) = case ShelleyBasedEra era forall era. IsShelleyBasedEra era => ShelleyBasedEra era -shelleyBasedEra :: ShelleyBasedEra era of {} +shelleyBasedEra :: ShelleyBasedEra era of {} -toShelleyTxOut (TxOut AddressInEra era -addr (TxOutAdaOnly OnlyAdaSupportedInEra era -AdaOnlyInShelleyEra Lovelace -value) TxOutDatumHash era +toShelleyTxOut (TxOut AddressInEra era +addr (TxOutAdaOnly OnlyAdaSupportedInEra era +AdaOnlyInShelleyEra Lovelace +value) TxOutDatumHash era _) = Addr (Crypto (ShelleyEra StandardCrypto)) -> Value (ShelleyEra StandardCrypto) @@ -1001,14 +1001,14 @@ Shelley.TxOut (AddressInEra era -> Addr StandardCrypto forall era. AddressInEra era -> Addr StandardCrypto toShelleyAddr AddressInEra era -addr) (Lovelace -> Coin +addr) (Lovelace -> Coin toShelleyLovelace Lovelace -value) +value) -toShelleyTxOut (TxOut AddressInEra era -addr (TxOutAdaOnly OnlyAdaSupportedInEra era -AdaOnlyInAllegraEra Lovelace -value) TxOutDatumHash era +toShelleyTxOut (TxOut AddressInEra era +addr (TxOutAdaOnly OnlyAdaSupportedInEra era +AdaOnlyInAllegraEra Lovelace +value) TxOutDatumHash era _) = Addr (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) -> Value (ShelleyMAEra 'Allegra StandardCrypto) @@ -1019,14 +1019,14 @@ Shelley.TxOut (AddressInEra era -> Addr StandardCrypto forall era. AddressInEra era -> Addr StandardCrypto toShelleyAddr AddressInEra era -addr) (Lovelace -> Coin +addr) (Lovelace -> Coin toShelleyLovelace Lovelace -value) +value) -toShelleyTxOut (TxOut AddressInEra era -addr (TxOutValue MultiAssetSupportedInEra era -MultiAssetInMaryEra Value -value) TxOutDatumHash era +toShelleyTxOut (TxOut AddressInEra era +addr (TxOutValue MultiAssetSupportedInEra era +MultiAssetInMaryEra Value +value) TxOutDatumHash era _) = Addr (Crypto (ShelleyMAEra 'Mary StandardCrypto)) -> Value (ShelleyMAEra 'Mary StandardCrypto) @@ -1037,15 +1037,15 @@ Shelley.TxOut (AddressInEra era -> Addr StandardCrypto forall era. AddressInEra era -> Addr StandardCrypto toShelleyAddr AddressInEra era -addr) (Value -> Value StandardCrypto +addr) (Value -> Value StandardCrypto toMaryValue Value -value) +value) -toShelleyTxOut (TxOut AddressInEra era -addr (TxOutValue MultiAssetSupportedInEra era -MultiAssetInAlonzoEra Value -value) TxOutDatumHash era -txoutdata) = +toShelleyTxOut (TxOut AddressInEra era +addr (TxOutValue MultiAssetSupportedInEra era +MultiAssetInAlonzoEra Value +value) TxOutDatumHash era +txoutdata) = Addr (Crypto (AlonzoEra StandardCrypto)) -> Value (AlonzoEra StandardCrypto) -> StrictMaybe (DataHash (Crypto (AlonzoEra StandardCrypto))) @@ -1058,14 +1058,14 @@ Alonzo.TxOut (AddressInEra era -> Addr StandardCrypto forall era. AddressInEra era -> Addr StandardCrypto toShelleyAddr AddressInEra era -addr) (Value -> Value StandardCrypto +addr) (Value -> Value StandardCrypto toMaryValue Value -value) +value) (TxOutDatumHash era -> StrictMaybe (DataHash StandardCrypto) forall era. TxOutDatumHash era -> StrictMaybe (DataHash StandardCrypto) toAlonzoTxOutDataHash TxOutDatumHash era -txoutdata) +txoutdata) fromShelleyTxOut :: Shelley.TxOut StandardShelley -> TxOut ShelleyEra fromShelleyTxOut :: TxOut (ShelleyEra StandardCrypto) -> TxOut ShelleyEra @@ -1077,17 +1077,17 @@ fromTxOut ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley -fromTxOut - :: ShelleyLedgerEra era ~ ledgerera - => ShelleyBasedEra era - -> Core.TxOut ledgerera - -> TxOut era +fromTxOut + :: ShelleyLedgerEra era ~ ledgerera + => ShelleyBasedEra era + -> Core.TxOut ledgerera + -> TxOut era fromTxOut :: ShelleyBasedEra era -> TxOut ledgerera -> TxOut era -fromTxOut ShelleyBasedEra era -shelleyBasedEra' TxOut ledgerera -ledgerTxOut = +fromTxOut ShelleyBasedEra era +shelleyBasedEra' TxOut ledgerera +ledgerTxOut = case ShelleyBasedEra era -shelleyBasedEra' of +shelleyBasedEra' of ShelleyBasedEra era ShelleyBasedEraShelley -> AddressInEra ShelleyEra @@ -1103,7 +1103,7 @@ Addr StandardCrypto -> AddressInEra era fromShelleyAddr Addr (Crypto (ShelleyEra StandardCrypto)) Addr StandardCrypto -addr) +addr) (OnlyAdaSupportedInEra ShelleyEra -> Lovelace -> TxOutValue ShelleyEra forall era. OnlyAdaSupportedInEra era -> Lovelace -> TxOutValue era @@ -1112,16 +1112,16 @@ (Coin -> Lovelace fromShelleyLovelace Coin Value (ShelleyEra StandardCrypto) -value)) +value)) TxOutDatumHash ShelleyEra forall era. TxOutDatumHash era TxOutDatumHashNone where - Shelley.TxOut Addr (Crypto (ShelleyEra StandardCrypto)) -addr Value (ShelleyEra StandardCrypto) -value = TxOut ledgerera + Shelley.TxOut Addr (Crypto (ShelleyEra StandardCrypto)) +addr Value (ShelleyEra StandardCrypto) +value = TxOut ledgerera TxOut (ShelleyEra StandardCrypto) -ledgerTxOut +ledgerTxOut ShelleyBasedEra era ShelleyBasedEraAllegra -> @@ -1138,7 +1138,7 @@ Addr StandardCrypto -> AddressInEra era fromShelleyAddr Addr (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) Addr StandardCrypto -addr) +addr) (OnlyAdaSupportedInEra AllegraEra -> Lovelace -> TxOutValue AllegraEra forall era. OnlyAdaSupportedInEra era -> Lovelace -> TxOutValue era @@ -1147,16 +1147,16 @@ (Coin -> Lovelace fromShelleyLovelace Coin Value (ShelleyMAEra 'Allegra StandardCrypto) -value)) +value)) TxOutDatumHash AllegraEra forall era. TxOutDatumHash era TxOutDatumHashNone where - Shelley.TxOut Addr (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) -addr Value (ShelleyMAEra 'Allegra StandardCrypto) -value = TxOut ledgerera + Shelley.TxOut Addr (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) +addr Value (ShelleyMAEra 'Allegra StandardCrypto) +value = TxOut ledgerera TxOut (ShelleyMAEra 'Allegra StandardCrypto) -ledgerTxOut +ledgerTxOut ShelleyBasedEra era ShelleyBasedEraMary -> @@ -1171,7 +1171,7 @@ Addr StandardCrypto -> AddressInEra era fromShelleyAddr Addr (Crypto (ShelleyMAEra 'Mary StandardCrypto)) Addr StandardCrypto -addr) +addr) (MultiAssetSupportedInEra MaryEra -> Value -> TxOutValue MaryEra forall era. MultiAssetSupportedInEra era -> Value -> TxOutValue era TxOutValue MultiAssetSupportedInEra MaryEra @@ -1179,16 +1179,16 @@ (Value StandardCrypto -> Value fromMaryValue Value (ShelleyMAEra 'Mary StandardCrypto) Value StandardCrypto -value)) +value)) TxOutDatumHash MaryEra forall era. TxOutDatumHash era TxOutDatumHashNone where - Shelley.TxOut Addr (Crypto (ShelleyMAEra 'Mary StandardCrypto)) -addr Value (ShelleyMAEra 'Mary StandardCrypto) -value = TxOut ledgerera + Shelley.TxOut Addr (Crypto (ShelleyMAEra 'Mary StandardCrypto)) +addr Value (ShelleyMAEra 'Mary StandardCrypto) +value = TxOut ledgerera TxOut (ShelleyMAEra 'Mary StandardCrypto) -ledgerTxOut +ledgerTxOut ShelleyBasedEra era ShelleyBasedEraAlonzo -> @@ -1205,7 +1205,7 @@ Addr StandardCrypto -> AddressInEra era fromShelleyAddr Addr (Crypto (AlonzoEra StandardCrypto)) Addr StandardCrypto -addr) +addr) (MultiAssetSupportedInEra AlonzoEra -> Value -> TxOutValue AlonzoEra forall era. MultiAssetSupportedInEra era -> Value -> TxOutValue era TxOutValue MultiAssetSupportedInEra AlonzoEra @@ -1213,7 +1213,7 @@ (Value StandardCrypto -> Value fromMaryValue Value (AlonzoEra StandardCrypto) Value StandardCrypto -value)) +value)) (ScriptDataSupportedInEra AlonzoEra -> StrictMaybe (DataHash StandardCrypto) -> TxOutDatumHash AlonzoEra @@ -1223,16 +1223,16 @@ fromAlonzoTxOutDataHash ScriptDataSupportedInEra AlonzoEra ScriptDataInAlonzoEra StrictMaybe (DataHash (Crypto (AlonzoEra StandardCrypto))) StrictMaybe (DataHash StandardCrypto) -datahash) +datahash) where - Alonzo.TxOut Addr (Crypto (AlonzoEra StandardCrypto)) -addr Value (AlonzoEra StandardCrypto) -value StrictMaybe (DataHash (Crypto (AlonzoEra StandardCrypto))) -datahash = TxOut ledgerera + Alonzo.TxOut Addr (Crypto (AlonzoEra StandardCrypto)) +addr Value (AlonzoEra StandardCrypto) +value StrictMaybe (DataHash (Crypto (AlonzoEra StandardCrypto))) +datahash = TxOut ledgerera TxOut (AlonzoEra StandardCrypto) -ledgerTxOut +ledgerTxOut -toAlonzoTxOutDataHash :: TxOutDatumHash era +toAlonzoTxOutDataHash :: TxOutDatumHash era -> StrictMaybe (Alonzo.DataHash StandardCrypto) toAlonzoTxOutDataHash :: TxOutDatumHash era -> StrictMaybe (DataHash StandardCrypto) toAlonzoTxOutDataHash TxOutDatumHash era @@ -1240,14 +1240,14 @@ forall a. StrictMaybe a SNothing toAlonzoTxOutDataHash (TxOutDatumHash ScriptDataSupportedInEra era -_ (ScriptDataHash dh)) = DataHash StandardCrypto -> StrictMaybe (DataHash StandardCrypto) +_ (ScriptDataHash dh)) = DataHash StandardCrypto -> StrictMaybe (DataHash StandardCrypto) forall a. a -> StrictMaybe a SJust DataHash StandardCrypto -dh +dh -fromAlonzoTxOutDataHash :: ScriptDataSupportedInEra era +fromAlonzoTxOutDataHash :: ScriptDataSupportedInEra era -> StrictMaybe (Alonzo.DataHash StandardCrypto) - -> TxOutDatumHash era + -> TxOutDatumHash era fromAlonzoTxOutDataHash :: ScriptDataSupportedInEra era -> StrictMaybe (DataHash StandardCrypto) -> TxOutDatumHash era fromAlonzoTxOutDataHash ScriptDataSupportedInEra era @@ -1255,17 +1255,17 @@ SNothing = TxOutDatumHash era forall era. TxOutDatumHash era TxOutDatumHashNone -fromAlonzoTxOutDataHash ScriptDataSupportedInEra era -era (SJust DataHash StandardCrypto -dh) = ScriptDataSupportedInEra era +fromAlonzoTxOutDataHash ScriptDataSupportedInEra era +era (SJust DataHash StandardCrypto +dh) = ScriptDataSupportedInEra era -> Hash ScriptData -> TxOutDatumHash era forall era. ScriptDataSupportedInEra era -> Hash ScriptData -> TxOutDatumHash era TxOutDatumHash ScriptDataSupportedInEra era -era (DataHash StandardCrypto -> Hash ScriptData +era (DataHash StandardCrypto -> Hash ScriptData ScriptDataHash DataHash StandardCrypto -dh) +dh) -- ---------------------------------------------------------------------------- @@ -1277,15 +1277,15 @@ -- -- The Alonzo and subsequent eras support collateral inputs. -- -data CollateralSupportedInEra era where +data CollateralSupportedInEra era where CollateralInAlonzoEra :: CollateralSupportedInEra AlonzoEra -deriving instance Eq (CollateralSupportedInEra era) -deriving instance Show (CollateralSupportedInEra era) +deriving instance Eq (CollateralSupportedInEra era) +deriving instance Show (CollateralSupportedInEra era) -collateralSupportedInEra :: CardanoEra era - -> Maybe (CollateralSupportedInEra era) +collateralSupportedInEra :: CardanoEra era + -> Maybe (CollateralSupportedInEra era) collateralSupportedInEra :: CardanoEra era -> Maybe (CollateralSupportedInEra era) collateralSupportedInEra CardanoEra era ByronEra = Maybe (CollateralSupportedInEra era) @@ -1317,7 +1317,7 @@ -- -- The negation of this is 'OnlyAdaSupportedInEra'. -- -data MultiAssetSupportedInEra era where +data MultiAssetSupportedInEra era where -- | Multi-asset transactions are supported in the 'Mary' era. MultiAssetInMaryEra :: MultiAssetSupportedInEra MaryEra @@ -1325,12 +1325,12 @@ -- | Multi-asset transactions are supported in the 'Alonzo' era. MultiAssetInAlonzoEra :: MultiAssetSupportedInEra AlonzoEra -deriving instance Eq (MultiAssetSupportedInEra era) -deriving instance Show (MultiAssetSupportedInEra era) +deriving instance Eq (MultiAssetSupportedInEra era) +deriving instance Show (MultiAssetSupportedInEra era) -instance ToJSON (MultiAssetSupportedInEra era) where - toJSON :: MultiAssetSupportedInEra era -> Value -toJSON = Text -> Value +instance ToJSON (MultiAssetSupportedInEra era) where + toJSON :: MultiAssetSupportedInEra era -> Value +toJSON = Text -> Value Aeson.String (Text -> Value) -> (MultiAssetSupportedInEra era -> Text) -> MultiAssetSupportedInEra era @@ -1354,18 +1354,18 @@ -- This is the negation of 'MultiAssetSupportedInEra'. It exists since we need -- evidence to be positive. -- -data OnlyAdaSupportedInEra era where +data OnlyAdaSupportedInEra era where AdaOnlyInByronEra :: OnlyAdaSupportedInEra ByronEra AdaOnlyInShelleyEra :: OnlyAdaSupportedInEra ShelleyEra AdaOnlyInAllegraEra :: OnlyAdaSupportedInEra AllegraEra -deriving instance Eq (OnlyAdaSupportedInEra era) -deriving instance Show (OnlyAdaSupportedInEra era) +deriving instance Eq (OnlyAdaSupportedInEra era) +deriving instance Show (OnlyAdaSupportedInEra era) -multiAssetSupportedInEra :: CardanoEra era - -> Either (OnlyAdaSupportedInEra era) - (MultiAssetSupportedInEra era) +multiAssetSupportedInEra :: CardanoEra era + -> Either (OnlyAdaSupportedInEra era) + (MultiAssetSupportedInEra era) multiAssetSupportedInEra :: CardanoEra era -> Either (OnlyAdaSupportedInEra era) (MultiAssetSupportedInEra era) @@ -1413,30 +1413,30 @@ -- outputs and sum of inputs), but all later eras the fees are specified in the -- transaction explicitly. -- -data TxFeesExplicitInEra era where +data TxFeesExplicitInEra era where TxFeesExplicitInShelleyEra :: TxFeesExplicitInEra ShelleyEra TxFeesExplicitInAllegraEra :: TxFeesExplicitInEra AllegraEra TxFeesExplicitInMaryEra :: TxFeesExplicitInEra MaryEra TxFeesExplicitInAlonzoEra :: TxFeesExplicitInEra AlonzoEra -deriving instance Eq (TxFeesExplicitInEra era) -deriving instance Show (TxFeesExplicitInEra era) +deriving instance Eq (TxFeesExplicitInEra era) +deriving instance Show (TxFeesExplicitInEra era) -- | A representation of whether the era requires implicitly specified fees in -- transactions. -- -- This is the negation of 'TxFeesExplicitInEra'. -- -data TxFeesImplicitInEra era where +data TxFeesImplicitInEra era where TxFeesImplicitInByronEra :: TxFeesImplicitInEra ByronEra -deriving instance Eq (TxFeesImplicitInEra era) -deriving instance Show (TxFeesImplicitInEra era) +deriving instance Eq (TxFeesImplicitInEra era) +deriving instance Show (TxFeesImplicitInEra era) -txFeesExplicitInEra :: CardanoEra era - -> Either (TxFeesImplicitInEra era) - (TxFeesExplicitInEra era) +txFeesExplicitInEra :: CardanoEra era + -> Either (TxFeesImplicitInEra era) + (TxFeesExplicitInEra era) txFeesExplicitInEra :: CardanoEra era -> Either (TxFeesImplicitInEra era) (TxFeesExplicitInEra era) txFeesExplicitInEra CardanoEra era @@ -1480,18 +1480,18 @@ -- range. In the Shelley era specifically it is actually required. It is -- optional in later eras. -- -data ValidityUpperBoundSupportedInEra era where +data ValidityUpperBoundSupportedInEra era where ValidityUpperBoundInShelleyEra :: ValidityUpperBoundSupportedInEra ShelleyEra ValidityUpperBoundInAllegraEra :: ValidityUpperBoundSupportedInEra AllegraEra ValidityUpperBoundInMaryEra :: ValidityUpperBoundSupportedInEra MaryEra ValidityUpperBoundInAlonzoEra :: ValidityUpperBoundSupportedInEra AlonzoEra -deriving instance Eq (ValidityUpperBoundSupportedInEra era) -deriving instance Show (ValidityUpperBoundSupportedInEra era) +deriving instance Eq (ValidityUpperBoundSupportedInEra era) +deriving instance Show (ValidityUpperBoundSupportedInEra era) -validityUpperBoundSupportedInEra :: CardanoEra era - -> Maybe (ValidityUpperBoundSupportedInEra era) +validityUpperBoundSupportedInEra :: CardanoEra era + -> Maybe (ValidityUpperBoundSupportedInEra era) validityUpperBoundSupportedInEra :: CardanoEra era -> Maybe (ValidityUpperBoundSupportedInEra era) validityUpperBoundSupportedInEra CardanoEra era ByronEra = Maybe (ValidityUpperBoundSupportedInEra era) @@ -1533,18 +1533,18 @@ -- The Byron era supports this by virtue of the fact that it does not support -- validity ranges at all. -- -data ValidityNoUpperBoundSupportedInEra era where +data ValidityNoUpperBoundSupportedInEra era where ValidityNoUpperBoundInByronEra :: ValidityNoUpperBoundSupportedInEra ByronEra ValidityNoUpperBoundInAllegraEra :: ValidityNoUpperBoundSupportedInEra AllegraEra ValidityNoUpperBoundInMaryEra :: ValidityNoUpperBoundSupportedInEra MaryEra ValidityNoUpperBoundInAlonzoEra :: ValidityNoUpperBoundSupportedInEra AlonzoEra -deriving instance Eq (ValidityNoUpperBoundSupportedInEra era) -deriving instance Show (ValidityNoUpperBoundSupportedInEra era) +deriving instance Eq (ValidityNoUpperBoundSupportedInEra era) +deriving instance Show (ValidityNoUpperBoundSupportedInEra era) -validityNoUpperBoundSupportedInEra :: CardanoEra era - -> Maybe (ValidityNoUpperBoundSupportedInEra era) +validityNoUpperBoundSupportedInEra :: CardanoEra era + -> Maybe (ValidityNoUpperBoundSupportedInEra era) validityNoUpperBoundSupportedInEra :: CardanoEra era -> Maybe (ValidityNoUpperBoundSupportedInEra era) validityNoUpperBoundSupportedInEra CardanoEra era ByronEra = ValidityNoUpperBoundSupportedInEra ByronEra @@ -1583,17 +1583,17 @@ -- validity range. No equivalent of 'ValidityNoUpperBoundSupportedInEra' is -- needed since all eras support having no lower bound. -- -data ValidityLowerBoundSupportedInEra era where +data ValidityLowerBoundSupportedInEra era where ValidityLowerBoundInAllegraEra :: ValidityLowerBoundSupportedInEra AllegraEra ValidityLowerBoundInMaryEra :: ValidityLowerBoundSupportedInEra MaryEra ValidityLowerBoundInAlonzoEra :: ValidityLowerBoundSupportedInEra AlonzoEra -deriving instance Eq (ValidityLowerBoundSupportedInEra era) -deriving instance Show (ValidityLowerBoundSupportedInEra era) +deriving instance Eq (ValidityLowerBoundSupportedInEra era) +deriving instance Show (ValidityLowerBoundSupportedInEra era) -validityLowerBoundSupportedInEra :: CardanoEra era - -> Maybe (ValidityLowerBoundSupportedInEra era) +validityLowerBoundSupportedInEra :: CardanoEra era + -> Maybe (ValidityLowerBoundSupportedInEra era) validityLowerBoundSupportedInEra :: CardanoEra era -> Maybe (ValidityLowerBoundSupportedInEra era) validityLowerBoundSupportedInEra CardanoEra era ByronEra = Maybe (ValidityLowerBoundSupportedInEra era) @@ -1626,18 +1626,18 @@ -- -- Transaction metadata is supported from the Shelley era onwards. -- -data TxMetadataSupportedInEra era where +data TxMetadataSupportedInEra era where TxMetadataInShelleyEra :: TxMetadataSupportedInEra ShelleyEra TxMetadataInAllegraEra :: TxMetadataSupportedInEra AllegraEra TxMetadataInMaryEra :: TxMetadataSupportedInEra MaryEra TxMetadataInAlonzoEra :: TxMetadataSupportedInEra AlonzoEra -deriving instance Eq (TxMetadataSupportedInEra era) -deriving instance Show (TxMetadataSupportedInEra era) +deriving instance Eq (TxMetadataSupportedInEra era) +deriving instance Show (TxMetadataSupportedInEra era) -txMetadataSupportedInEra :: CardanoEra era - -> Maybe (TxMetadataSupportedInEra era) +txMetadataSupportedInEra :: CardanoEra era + -> Maybe (TxMetadataSupportedInEra era) txMetadataSupportedInEra :: CardanoEra era -> Maybe (TxMetadataSupportedInEra era) txMetadataSupportedInEra CardanoEra era ByronEra = Maybe (TxMetadataSupportedInEra era) @@ -1674,17 +1674,17 @@ -- -- Auxiliary scripts are supported from the Allegra era onwards. -- -data AuxScriptsSupportedInEra era where +data AuxScriptsSupportedInEra era where AuxScriptsInAllegraEra :: AuxScriptsSupportedInEra AllegraEra AuxScriptsInMaryEra :: AuxScriptsSupportedInEra MaryEra AuxScriptsInAlonzoEra :: AuxScriptsSupportedInEra AlonzoEra -deriving instance Eq (AuxScriptsSupportedInEra era) -deriving instance Show (AuxScriptsSupportedInEra era) +deriving instance Eq (AuxScriptsSupportedInEra era) +deriving instance Show (AuxScriptsSupportedInEra era) -auxScriptsSupportedInEra :: CardanoEra era - -> Maybe (AuxScriptsSupportedInEra era) +auxScriptsSupportedInEra :: CardanoEra era + -> Maybe (AuxScriptsSupportedInEra era) auxScriptsSupportedInEra :: CardanoEra era -> Maybe (AuxScriptsSupportedInEra era) auxScriptsSupportedInEra CardanoEra era ByronEra = Maybe (AuxScriptsSupportedInEra era) @@ -1721,16 +1721,16 @@ -- Extra key witnesses visible to scripts are supported from the Alonzo era -- onwards. -- -data TxExtraKeyWitnessesSupportedInEra era where +data TxExtraKeyWitnessesSupportedInEra era where ExtraKeyWitnessesInAlonzoEra :: TxExtraKeyWitnessesSupportedInEra AlonzoEra -deriving instance Eq (TxExtraKeyWitnessesSupportedInEra era) -deriving instance Show (TxExtraKeyWitnessesSupportedInEra era) +deriving instance Eq (TxExtraKeyWitnessesSupportedInEra era) +deriving instance Show (TxExtraKeyWitnessesSupportedInEra era) -extraKeyWitnessesSupportedInEra :: CardanoEra era - -> Maybe (TxExtraKeyWitnessesSupportedInEra era) +extraKeyWitnessesSupportedInEra :: CardanoEra era + -> Maybe (TxExtraKeyWitnessesSupportedInEra era) extraKeyWitnessesSupportedInEra :: CardanoEra era -> Maybe (TxExtraKeyWitnessesSupportedInEra era) extraKeyWitnessesSupportedInEra CardanoEra era ByronEra = Maybe (TxExtraKeyWitnessesSupportedInEra era) @@ -1762,16 +1762,16 @@ -- -- The negation of this is 'OnlyAdaSupportedInEra'. -- -data ScriptDataSupportedInEra era where +data ScriptDataSupportedInEra era where -- | Script data is supported in transactions in the 'Alonzo' era. ScriptDataInAlonzoEra :: ScriptDataSupportedInEra AlonzoEra -deriving instance Eq (ScriptDataSupportedInEra era) -deriving instance Show (ScriptDataSupportedInEra era) +deriving instance Eq (ScriptDataSupportedInEra era) +deriving instance Show (ScriptDataSupportedInEra era) -scriptDataSupportedInEra :: CardanoEra era - -> Maybe (ScriptDataSupportedInEra era) +scriptDataSupportedInEra :: CardanoEra era + -> Maybe (ScriptDataSupportedInEra era) scriptDataSupportedInEra :: CardanoEra era -> Maybe (ScriptDataSupportedInEra era) scriptDataSupportedInEra CardanoEra era ByronEra = Maybe (ScriptDataSupportedInEra era) @@ -1803,18 +1803,18 @@ -- The Shelley and subsequent eras support stake addresses, their associated -- reward accounts and support for withdrawals from them. -- -data WithdrawalsSupportedInEra era where +data WithdrawalsSupportedInEra era where WithdrawalsInShelleyEra :: WithdrawalsSupportedInEra ShelleyEra WithdrawalsInAllegraEra :: WithdrawalsSupportedInEra AllegraEra WithdrawalsInMaryEra :: WithdrawalsSupportedInEra MaryEra WithdrawalsInAlonzoEra :: WithdrawalsSupportedInEra AlonzoEra -deriving instance Eq (WithdrawalsSupportedInEra era) -deriving instance Show (WithdrawalsSupportedInEra era) +deriving instance Eq (WithdrawalsSupportedInEra era) +deriving instance Show (WithdrawalsSupportedInEra era) -withdrawalsSupportedInEra :: CardanoEra era - -> Maybe (WithdrawalsSupportedInEra era) +withdrawalsSupportedInEra :: CardanoEra era + -> Maybe (WithdrawalsSupportedInEra era) withdrawalsSupportedInEra :: CardanoEra era -> Maybe (WithdrawalsSupportedInEra era) withdrawalsSupportedInEra CardanoEra era ByronEra = Maybe (WithdrawalsSupportedInEra era) @@ -1851,18 +1851,18 @@ -- -- The Shelley and subsequent eras support such certificates. -- -data CertificatesSupportedInEra era where +data CertificatesSupportedInEra era where CertificatesInShelleyEra :: CertificatesSupportedInEra ShelleyEra CertificatesInAllegraEra :: CertificatesSupportedInEra AllegraEra CertificatesInMaryEra :: CertificatesSupportedInEra MaryEra CertificatesInAlonzoEra :: CertificatesSupportedInEra AlonzoEra -deriving instance Eq (CertificatesSupportedInEra era) -deriving instance Show (CertificatesSupportedInEra era) +deriving instance Eq (CertificatesSupportedInEra era) +deriving instance Show (CertificatesSupportedInEra era) -certificatesSupportedInEra :: CardanoEra era - -> Maybe (CertificatesSupportedInEra era) +certificatesSupportedInEra :: CardanoEra era + -> Maybe (CertificatesSupportedInEra era) certificatesSupportedInEra :: CardanoEra era -> Maybe (CertificatesSupportedInEra era) certificatesSupportedInEra CardanoEra era ByronEra = Maybe (CertificatesSupportedInEra era) @@ -1901,18 +1901,18 @@ -- era has a notion of an update proposal, but it is a standalone chain object -- and not embedded in a transaction. -- -data UpdateProposalSupportedInEra era where +data UpdateProposalSupportedInEra era where UpdateProposalInShelleyEra :: UpdateProposalSupportedInEra ShelleyEra UpdateProposalInAllegraEra :: UpdateProposalSupportedInEra AllegraEra UpdateProposalInMaryEra :: UpdateProposalSupportedInEra MaryEra UpdateProposalInAlonzoEra :: UpdateProposalSupportedInEra AlonzoEra -deriving instance Eq (UpdateProposalSupportedInEra era) -deriving instance Show (UpdateProposalSupportedInEra era) +deriving instance Eq (UpdateProposalSupportedInEra era) +deriving instance Show (UpdateProposalSupportedInEra era) -updateProposalSupportedInEra :: CardanoEra era - -> Maybe (UpdateProposalSupportedInEra era) +updateProposalSupportedInEra :: CardanoEra era + -> Maybe (UpdateProposalSupportedInEra era) updateProposalSupportedInEra :: CardanoEra era -> Maybe (UpdateProposalSupportedInEra era) updateProposalSupportedInEra CardanoEra era ByronEra = Maybe (UpdateProposalSupportedInEra era) @@ -1951,92 +1951,92 @@ data BuildTx data ViewTx -data BuildTxWith build a where +data BuildTxWith build a where - ViewTx :: BuildTxWith ViewTx a - BuildTxWith :: a -> BuildTxWith BuildTx a + ViewTx :: BuildTxWith ViewTx a + BuildTxWith :: a -> BuildTxWith BuildTx a -deriving instance Eq a => Eq (BuildTxWith build a) -deriving instance Show a => Show (BuildTxWith build a) +deriving instance Eq a => Eq (BuildTxWith build a) +deriving instance Show a => Show (BuildTxWith build a) -- ---------------------------------------------------------------------------- -- Transaction input values (era-dependent) -- -type TxIns build era = [(TxIn, BuildTxWith build (Witness WitCtxTxIn era))] +type TxIns build era = [(TxIn, BuildTxWith build (Witness WitCtxTxIn era))] -data TxInsCollateral era where +data TxInsCollateral era where - TxInsCollateralNone :: TxInsCollateral era + TxInsCollateralNone :: TxInsCollateral era - TxInsCollateral :: CollateralSupportedInEra era + TxInsCollateral :: CollateralSupportedInEra era -> [TxIn] -- Only key witnesses, no scripts. - -> TxInsCollateral era + -> TxInsCollateral era -deriving instance Eq (TxInsCollateral era) -deriving instance Show (TxInsCollateral era) +deriving instance Eq (TxInsCollateral era) +deriving instance Show (TxInsCollateral era) -- ---------------------------------------------------------------------------- -- Transaction output values (era-dependent) -- -data TxOutValue era where +data TxOutValue era where - TxOutAdaOnly :: OnlyAdaSupportedInEra era -> Lovelace -> TxOutValue era + TxOutAdaOnly :: OnlyAdaSupportedInEra era -> Lovelace -> TxOutValue era - TxOutValue :: MultiAssetSupportedInEra era -> Value -> TxOutValue era + TxOutValue :: MultiAssetSupportedInEra era -> Value -> TxOutValue era -deriving instance Eq (TxOutValue era) -deriving instance Show (TxOutValue era) -deriving instance Generic (TxOutValue era) +deriving instance Eq (TxOutValue era) +deriving instance Show (TxOutValue era) +deriving instance Generic (TxOutValue era) -instance ToJSON (TxOutValue era) where - toJSON :: TxOutValue era -> Value -toJSON (TxOutAdaOnly OnlyAdaSupportedInEra era -_ Lovelace -ll) = Lovelace -> Value +instance ToJSON (TxOutValue era) where + toJSON :: TxOutValue era -> Value +toJSON (TxOutAdaOnly OnlyAdaSupportedInEra era +_ Lovelace +ll) = Lovelace -> Value forall a. ToJSON a => a -> Value toJSON Lovelace -ll +ll toJSON (TxOutValue MultiAssetSupportedInEra era -_ Value -val) = Value -> Value +_ Value +val) = Value -> Value forall a. ToJSON a => a -> Value toJSON Value -val +val -- ---------------------------------------------------------------------------- -- Transaction output datum (era-dependent) -- -data TxOutDatumHash era where +data TxOutDatumHash era where - TxOutDatumHashNone :: TxOutDatumHash era + TxOutDatumHashNone :: TxOutDatumHash era - TxOutDatumHash :: ScriptDataSupportedInEra era + TxOutDatumHash :: ScriptDataSupportedInEra era -> Hash ScriptData - -> TxOutDatumHash era + -> TxOutDatumHash era -deriving instance Eq (TxOutDatumHash era) -deriving instance Show (TxOutDatumHash era) -deriving instance Generic (TxOutDatumHash era) +deriving instance Eq (TxOutDatumHash era) +deriving instance Show (TxOutDatumHash era) +deriving instance Generic (TxOutDatumHash era) -- ---------------------------------------------------------------------------- -- Transaction fees -- -data TxFee era where +data TxFee era where - TxFeeImplicit :: TxFeesImplicitInEra era -> TxFee era + TxFeeImplicit :: TxFeesImplicitInEra era -> TxFee era - TxFeeExplicit :: TxFeesExplicitInEra era -> Lovelace -> TxFee era + TxFeeExplicit :: TxFeesExplicitInEra era -> Lovelace -> TxFee era -deriving instance Eq (TxFee era) -deriving instance Show (TxFee era) +deriving instance Eq (TxFee era) +deriving instance Show (TxFee era) -- ---------------------------------------------------------------------------- @@ -2045,199 +2045,199 @@ -- | This was formerly known as the TTL. -- -data TxValidityUpperBound era where +data TxValidityUpperBound era where - TxValidityNoUpperBound :: ValidityNoUpperBoundSupportedInEra era - -> TxValidityUpperBound era + TxValidityNoUpperBound :: ValidityNoUpperBoundSupportedInEra era + -> TxValidityUpperBound era - TxValidityUpperBound :: ValidityUpperBoundSupportedInEra era + TxValidityUpperBound :: ValidityUpperBoundSupportedInEra era -> SlotNo - -> TxValidityUpperBound era + -> TxValidityUpperBound era -deriving instance Eq (TxValidityUpperBound era) -deriving instance Show (TxValidityUpperBound era) +deriving instance Eq (TxValidityUpperBound era) +deriving instance Show (TxValidityUpperBound era) -data TxValidityLowerBound era where +data TxValidityLowerBound era where - TxValidityNoLowerBound :: TxValidityLowerBound era + TxValidityNoLowerBound :: TxValidityLowerBound era - TxValidityLowerBound :: ValidityLowerBoundSupportedInEra era + TxValidityLowerBound :: ValidityLowerBoundSupportedInEra era -> SlotNo - -> TxValidityLowerBound era + -> TxValidityLowerBound era -deriving instance Eq (TxValidityLowerBound era) -deriving instance Show (TxValidityLowerBound era) +deriving instance Eq (TxValidityLowerBound era) +deriving instance Show (TxValidityLowerBound era) -- ---------------------------------------------------------------------------- -- Transaction metadata (era-dependent) -- -data TxMetadataInEra era where +data TxMetadataInEra era where - TxMetadataNone :: TxMetadataInEra era + TxMetadataNone :: TxMetadataInEra era - TxMetadataInEra :: TxMetadataSupportedInEra era + TxMetadataInEra :: TxMetadataSupportedInEra era -> TxMetadata - -> TxMetadataInEra era + -> TxMetadataInEra era -deriving instance Eq (TxMetadataInEra era) -deriving instance Show (TxMetadataInEra era) +deriving instance Eq (TxMetadataInEra era) +deriving instance Show (TxMetadataInEra era) -- ---------------------------------------------------------------------------- -- Auxiliary scripts (era-dependent) -- -data TxAuxScripts era where +data TxAuxScripts era where - TxAuxScriptsNone :: TxAuxScripts era + TxAuxScriptsNone :: TxAuxScripts era - TxAuxScripts :: AuxScriptsSupportedInEra era - -> [ScriptInEra era] - -> TxAuxScripts era + TxAuxScripts :: AuxScriptsSupportedInEra era + -> [ScriptInEra era] + -> TxAuxScripts era -deriving instance Eq (TxAuxScripts era) -deriving instance Show (TxAuxScripts era) +deriving instance Eq (TxAuxScripts era) +deriving instance Show (TxAuxScripts era) -- ---------------------------------------------------------------------------- -- Optionally required signatures (era-dependent) -- -data TxExtraKeyWitnesses era where +data TxExtraKeyWitnesses era where - TxExtraKeyWitnessesNone :: TxExtraKeyWitnesses era + TxExtraKeyWitnessesNone :: TxExtraKeyWitnesses era - TxExtraKeyWitnesses :: TxExtraKeyWitnessesSupportedInEra era + TxExtraKeyWitnesses :: TxExtraKeyWitnessesSupportedInEra era -> [Hash PaymentKey] - -> TxExtraKeyWitnesses era + -> TxExtraKeyWitnesses era -deriving instance Eq (TxExtraKeyWitnesses era) -deriving instance Show (TxExtraKeyWitnesses era) +deriving instance Eq (TxExtraKeyWitnesses era) +deriving instance Show (TxExtraKeyWitnesses era) -- ---------------------------------------------------------------------------- -- Auxiliary script data (era-dependent) -- -data TxAuxScriptData era where +data TxAuxScriptData era where - TxAuxScriptDataNone :: TxAuxScriptData era + TxAuxScriptDataNone :: TxAuxScriptData era - TxAuxScriptData :: ScriptDataSupportedInEra era + TxAuxScriptData :: ScriptDataSupportedInEra era -> [ScriptData] - -> TxAuxScriptData era + -> TxAuxScriptData era -deriving instance Eq (TxAuxScriptData era) -deriving instance Show (TxAuxScriptData era) +deriving instance Eq (TxAuxScriptData era) +deriving instance Show (TxAuxScriptData era) -- ---------------------------------------------------------------------------- -- Withdrawals within transactions (era-dependent) -- -data TxWithdrawals build era where +data TxWithdrawals build era where - TxWithdrawalsNone :: TxWithdrawals build era + TxWithdrawalsNone :: TxWithdrawals build era - TxWithdrawals :: WithdrawalsSupportedInEra era + TxWithdrawals :: WithdrawalsSupportedInEra era -> [(StakeAddress, Lovelace, - BuildTxWith build (Witness WitCtxStake era))] - -> TxWithdrawals build era + BuildTxWith build (Witness WitCtxStake era))] + -> TxWithdrawals build era -deriving instance Eq (TxWithdrawals build era) -deriving instance Show (TxWithdrawals build era) +deriving instance Eq (TxWithdrawals build era) +deriving instance Show (TxWithdrawals build era) -- ---------------------------------------------------------------------------- -- Certificates within transactions (era-dependent) -- -data TxCertificates build era where +data TxCertificates build era where - TxCertificatesNone :: TxCertificates build era + TxCertificatesNone :: TxCertificates build era - TxCertificates :: CertificatesSupportedInEra era + TxCertificates :: CertificatesSupportedInEra era -> [Certificate] - -> BuildTxWith build - (Map StakeCredential (Witness WitCtxStake era)) - -> TxCertificates build era + -> BuildTxWith build + (Map StakeCredential (Witness WitCtxStake era)) + -> TxCertificates build era -deriving instance Eq (TxCertificates build era) -deriving instance Show (TxCertificates build era) +deriving instance Eq (TxCertificates build era) +deriving instance Show (TxCertificates build era) -- ---------------------------------------------------------------------------- -- Transaction metadata (era-dependent) -- -data TxUpdateProposal era where +data TxUpdateProposal era where - TxUpdateProposalNone :: TxUpdateProposal era + TxUpdateProposalNone :: TxUpdateProposal era - TxUpdateProposal :: UpdateProposalSupportedInEra era + TxUpdateProposal :: UpdateProposalSupportedInEra era -> UpdateProposal - -> TxUpdateProposal era + -> TxUpdateProposal era -deriving instance Eq (TxUpdateProposal era) -deriving instance Show (TxUpdateProposal era) +deriving instance Eq (TxUpdateProposal era) +deriving instance Show (TxUpdateProposal era) -- ---------------------------------------------------------------------------- -- Value minting within transactions (era-dependent) -- -data TxMintValue build era where +data TxMintValue build era where - TxMintNone :: TxMintValue build era + TxMintNone :: TxMintValue build era - TxMintValue :: MultiAssetSupportedInEra era + TxMintValue :: MultiAssetSupportedInEra era -> Value - -> BuildTxWith build - (Map PolicyId (ScriptWitness WitCtxMint era)) - -> TxMintValue build era + -> BuildTxWith build + (Map PolicyId (ScriptWitness WitCtxMint era)) + -> TxMintValue build era -deriving instance Eq (TxMintValue build era) -deriving instance Show (TxMintValue build era) +deriving instance Eq (TxMintValue build era) +deriving instance Show (TxMintValue build era) -- ---------------------------------------------------------------------------- -- Transaction body content -- -data TxBodyContent build era = +data TxBodyContent build era = TxBodyContent { TxBodyContent build era -> TxIns build era -txIns :: TxIns build era, +txIns :: TxIns build era, TxBodyContent build era -> TxInsCollateral era -txInsCollateral :: TxInsCollateral era, +txInsCollateral :: TxInsCollateral era, TxBodyContent build era -> [TxOut era] -txOuts :: [TxOut era], +txOuts :: [TxOut era], TxBodyContent build era -> TxFee era -txFee :: TxFee era, +txFee :: TxFee era, TxBodyContent build era -> (TxValidityLowerBound era, TxValidityUpperBound era) -txValidityRange :: (TxValidityLowerBound era, - TxValidityUpperBound era), +txValidityRange :: (TxValidityLowerBound era, + TxValidityUpperBound era), TxBodyContent build era -> TxMetadataInEra era -txMetadata :: TxMetadataInEra era, +txMetadata :: TxMetadataInEra era, TxBodyContent build era -> TxAuxScripts era -txAuxScripts :: TxAuxScripts era, +txAuxScripts :: TxAuxScripts era, TxBodyContent build era -> TxAuxScriptData era -txAuxScriptData :: TxAuxScriptData era, +txAuxScriptData :: TxAuxScriptData era, TxBodyContent build era -> TxExtraKeyWitnesses era -txExtraKeyWits :: TxExtraKeyWitnesses era, +txExtraKeyWits :: TxExtraKeyWitnesses era, TxBodyContent build era -> BuildTxWith build (Maybe ProtocolParameters) -txProtocolParams :: BuildTxWith build (Maybe ProtocolParameters), +txProtocolParams :: BuildTxWith build (Maybe ProtocolParameters), TxBodyContent build era -> TxWithdrawals build era -txWithdrawals :: TxWithdrawals build era, +txWithdrawals :: TxWithdrawals build era, TxBodyContent build era -> TxCertificates build era -txCertificates :: TxCertificates build era, +txCertificates :: TxCertificates build era, TxBodyContent build era -> TxUpdateProposal era -txUpdateProposal :: TxUpdateProposal era, +txUpdateProposal :: TxUpdateProposal era, TxBodyContent build era -> TxMintValue build era -txMintValue :: TxMintValue build era +txMintValue :: TxMintValue build era } @@ -2245,24 +2245,24 @@ -- Transaction bodies -- -data TxBody era where +data TxBody era where ByronTxBody :: Annotated Byron.Tx ByteString -> TxBody ByronEra - ShelleyTxBody - :: ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) + ShelleyTxBody + :: ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) -- We include the scripts along with the tx body, rather than the -- witnesses set, since they need to be known when building the body. - -> [Ledger.Script (ShelleyLedgerEra era)] + -> [Ledger.Script (ShelleyLedgerEra era)] -- The info for each use of each script: the script input data, both -- the UTxO input data (called the "datum") and the supplied input -- data (called the "redeemer") and the execution units. - -> TxBodyScriptData era + -> TxBodyScriptData era -- The 'Ledger.AuxiliaryData' consists of one or several things, -- depending on era: @@ -2272,191 +2272,191 @@ -- extra script data has to be passed to scripts and hence is needed -- for validation. It is thus part of the witness data, not the -- auxiliary data. - -> Maybe (Ledger.AuxiliaryData (ShelleyLedgerEra era)) + -> Maybe (Ledger.AuxiliaryData (ShelleyLedgerEra era)) - -> TxBody era + -> TxBody era -- The 'ShelleyBasedEra' GADT tells us what era we are in. -- The 'ShelleyLedgerEra' type family maps that to the era type from the -- ledger lib. The 'Ledger.TxBody' type family maps that to a specific -- tx body type, which is different for each Shelley-based era. -data TxBodyScriptData era where - TxBodyNoScriptData :: TxBodyScriptData era - TxBodyScriptData :: ScriptDataSupportedInEra era - -> [Alonzo.Data (ShelleyLedgerEra era)] - -> Alonzo.Redeemers (ShelleyLedgerEra era) - -> TxBodyScriptData era +data TxBodyScriptData era where + TxBodyNoScriptData :: TxBodyScriptData era + TxBodyScriptData :: ScriptDataSupportedInEra era + -> [Alonzo.Data (ShelleyLedgerEra era)] + -> Alonzo.Redeemers (ShelleyLedgerEra era) + -> TxBodyScriptData era -- TODO alonzo: the supplementary script data will probably need to live -- here, since it is part of the transaction witness data, not part of the -- transaction auxiliary data. Completing this feature depends on the -- support in the ledger lib being completed. -deriving instance Eq (TxBodyScriptData era) -deriving instance Show (TxBodyScriptData era) +deriving instance Eq (TxBodyScriptData era) +deriving instance Show (TxBodyScriptData era) -- The GADT in the ShelleyTxBody case requires a custom instance -instance Eq (TxBody era) where - == :: TxBody era -> TxBody era -> Bool -(==) (ByronTxBody Annotated Tx ByteString -txbodyA) - (ByronTxBody Annotated Tx ByteString -txbodyB) = Annotated Tx ByteString -txbodyA Annotated Tx ByteString -> Annotated Tx ByteString -> Bool +instance Eq (TxBody era) where + == :: TxBody era -> TxBody era -> Bool +(==) (ByronTxBody Annotated Tx ByteString +txbodyA) + (ByronTxBody Annotated Tx ByteString +txbodyB) = Annotated Tx ByteString +txbodyA Annotated Tx ByteString -> Annotated Tx ByteString -> Bool forall a. Eq a => a -> a -> Bool == Annotated Tx ByteString -txbodyB +txbodyB - (==) (ShelleyTxBody ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -txbodyA [Script (ShelleyLedgerEra era)] -txscriptsA TxBodyScriptData era -redeemersA Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadataA) + (==) (ShelleyTxBody ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +txbodyA [Script (ShelleyLedgerEra era)] +txscriptsA TxBodyScriptData era +redeemersA Maybe (AuxiliaryData (ShelleyLedgerEra era)) +txmetadataA) (ShelleyTxBody ShelleyBasedEra era -_ TxBody (ShelleyLedgerEra era) -txbodyB [Script (ShelleyLedgerEra era)] -txscriptsB TxBodyScriptData era -redeemersB Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadataB) = +_ TxBody (ShelleyLedgerEra era) +txbodyB [Script (ShelleyLedgerEra era)] +txscriptsB TxBodyScriptData era +redeemersB Maybe (AuxiliaryData (ShelleyLedgerEra era)) +txmetadataB) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> TxBody (ShelleyLedgerEra era) TxBody (ShelleyEra StandardCrypto) -txbodyA TxBody (ShelleyEra StandardCrypto) +txbodyA TxBody (ShelleyEra StandardCrypto) -> TxBody (ShelleyEra StandardCrypto) -> Bool forall a. Eq a => a -> a -> Bool == TxBody (ShelleyLedgerEra era) TxBody (ShelleyEra StandardCrypto) -txbodyB +txbodyB Bool -> Bool -> Bool && [Script (ShelleyLedgerEra era)] [MultiSig StandardCrypto] -txscriptsA [MultiSig StandardCrypto] -> [MultiSig StandardCrypto] -> Bool +txscriptsA [MultiSig StandardCrypto] -> [MultiSig StandardCrypto] -> Bool forall a. Eq a => a -> a -> Bool == [Script (ShelleyLedgerEra era)] [MultiSig StandardCrypto] -txscriptsB +txscriptsB Bool -> Bool -> Bool && Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (Metadata (ShelleyEra StandardCrypto)) -txmetadataA Maybe (Metadata (ShelleyEra StandardCrypto)) +txmetadataA Maybe (Metadata (ShelleyEra StandardCrypto)) -> Maybe (Metadata (ShelleyEra StandardCrypto)) -> Bool forall a. Eq a => a -> a -> Bool == Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (Metadata (ShelleyEra StandardCrypto)) -txmetadataB +txmetadataB ShelleyBasedEra era ShelleyBasedEraAllegra -> TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Allegra StandardCrypto) -txbodyA TxBody (ShelleyMAEra 'Allegra StandardCrypto) +txbodyA TxBody (ShelleyMAEra 'Allegra StandardCrypto) -> TxBody (ShelleyMAEra 'Allegra StandardCrypto) -> Bool forall a. Eq a => a -> a -> Bool == TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Allegra StandardCrypto) -txbodyB +txbodyB Bool -> Bool -> Bool && [Script (ShelleyLedgerEra era)] [Timelock StandardCrypto] -txscriptsA [Timelock StandardCrypto] -> [Timelock StandardCrypto] -> Bool +txscriptsA [Timelock StandardCrypto] -> [Timelock StandardCrypto] -> Bool forall a. Eq a => a -> a -> Bool == [Script (ShelleyLedgerEra era)] [Timelock StandardCrypto] -txscriptsB +txscriptsB Bool -> Bool -> Bool && Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) -txmetadataA Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) +txmetadataA Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) -> Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) -> Bool forall a. Eq a => a -> a -> Bool == Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) -txmetadataB +txmetadataB ShelleyBasedEra era ShelleyBasedEraMary -> TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -txbodyA TxBody (ShelleyMAEra 'Mary StandardCrypto) +txbodyA TxBody (ShelleyMAEra 'Mary StandardCrypto) -> TxBody (ShelleyMAEra 'Mary StandardCrypto) -> Bool forall a. Eq a => a -> a -> Bool == TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -txbodyB +txbodyB Bool -> Bool -> Bool && [Script (ShelleyLedgerEra era)] [Timelock StandardCrypto] -txscriptsA [Timelock StandardCrypto] -> [Timelock StandardCrypto] -> Bool +txscriptsA [Timelock StandardCrypto] -> [Timelock StandardCrypto] -> Bool forall a. Eq a => a -> a -> Bool == [Script (ShelleyLedgerEra era)] [Timelock StandardCrypto] -txscriptsB +txscriptsB Bool -> Bool -> Bool && Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) -txmetadataA Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) +txmetadataA Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) -> Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) -> Bool forall a. Eq a => a -> a -> Bool == Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) -txmetadataB +txmetadataB ShelleyBasedEra era ShelleyBasedEraAlonzo -> TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -txbodyA TxBody (AlonzoEra StandardCrypto) +txbodyA TxBody (AlonzoEra StandardCrypto) -> TxBody (AlonzoEra StandardCrypto) -> Bool forall a. Eq a => a -> a -> Bool == TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -txbodyB +txbodyB Bool -> Bool -> Bool && [Script (ShelleyLedgerEra era)] [Script (AlonzoEra StandardCrypto)] -txscriptsA [Script (AlonzoEra StandardCrypto)] +txscriptsA [Script (AlonzoEra StandardCrypto)] -> [Script (AlonzoEra StandardCrypto)] -> Bool forall a. Eq a => a -> a -> Bool == [Script (ShelleyLedgerEra era)] [Script (AlonzoEra StandardCrypto)] -txscriptsB +txscriptsB Bool -> Bool -> Bool && TxBodyScriptData era -redeemersA TxBodyScriptData era -> TxBodyScriptData era -> Bool +redeemersA TxBodyScriptData era -> TxBodyScriptData era -> Bool forall a. Eq a => a -> a -> Bool == TxBodyScriptData era -redeemersB +redeemersB Bool -> Bool -> Bool && Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) -txmetadataA Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) +txmetadataA Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) -> Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) -> Bool forall a. Eq a => a -> a -> Bool == Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) -txmetadataB +txmetadataB - (==) ByronTxBody{} (ShelleyTxBody ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) + (==) ByronTxBody{} (ShelleyTxBody ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) _ [Script (ShelleyLedgerEra era)] _ TxBodyScriptData era _ Maybe (AuxiliaryData (ShelleyLedgerEra era)) _) = case ShelleyBasedEra era -era of {} +era of {} -- The GADT in the ShelleyTxBody case requires a custom instance -instance Show (TxBody era) where - showsPrec :: Int -> TxBody era -> ShowS -showsPrec Int -p (ByronTxBody Annotated Tx ByteString -txbody) = +instance Show (TxBody era) where + showsPrec :: Int -> TxBody era -> ShowS +showsPrec Int +p (ByronTxBody Annotated Tx ByteString +txbody) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -2469,20 +2469,20 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 Annotated Tx ByteString -txbody +txbody ) - showsPrec Int -p (ShelleyTxBody ShelleyBasedEra era + showsPrec Int +p (ShelleyTxBody ShelleyBasedEra era ShelleyBasedEraShelley - TxBody (ShelleyLedgerEra era) -txbody [Script (ShelleyLedgerEra era)] -txscripts TxBodyScriptData era -redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata) = + TxBody (ShelleyLedgerEra era) +txbody [Script (ShelleyLedgerEra era)] +txscripts TxBodyScriptData era +redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) +txmetadata) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -2496,7 +2496,7 @@ showsPrec Int 11 TxBody (ShelleyLedgerEra era) TxBody (ShelleyEra StandardCrypto) -txbody +txbody ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2509,7 +2509,7 @@ showsPrec Int 11 [Script (ShelleyLedgerEra era)] [MultiSig StandardCrypto] -txscripts +txscripts ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2521,7 +2521,7 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 TxBodyScriptData era -redeemers +redeemers ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2534,20 +2534,20 @@ showsPrec Int 11 Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (Metadata (ShelleyEra StandardCrypto)) -txmetadata +txmetadata ) - showsPrec Int -p (ShelleyTxBody ShelleyBasedEra era + showsPrec Int +p (ShelleyTxBody ShelleyBasedEra era ShelleyBasedEraAllegra - TxBody (ShelleyLedgerEra era) -txbody [Script (ShelleyLedgerEra era)] -txscripts TxBodyScriptData era -redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata) = + TxBody (ShelleyLedgerEra era) +txbody [Script (ShelleyLedgerEra era)] +txscripts TxBodyScriptData era +redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) +txmetadata) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -2561,7 +2561,7 @@ showsPrec Int 11 TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Allegra StandardCrypto) -txbody +txbody ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2574,7 +2574,7 @@ showsPrec Int 11 [Script (ShelleyLedgerEra era)] [Timelock StandardCrypto] -txscripts +txscripts ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2586,7 +2586,7 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 TxBodyScriptData era -redeemers +redeemers ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2601,20 +2601,20 @@ showsPrec Int 11 Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) -txmetadata +txmetadata ) - showsPrec Int -p (ShelleyTxBody ShelleyBasedEra era + showsPrec Int +p (ShelleyTxBody ShelleyBasedEra era ShelleyBasedEraMary - TxBody (ShelleyLedgerEra era) -txbody [Script (ShelleyLedgerEra era)] -txscripts TxBodyScriptData era -redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata) = + TxBody (ShelleyLedgerEra era) +txbody [Script (ShelleyLedgerEra era)] +txscripts TxBodyScriptData era +redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) +txmetadata) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -2628,7 +2628,7 @@ showsPrec Int 11 TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -txbody +txbody ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2641,7 +2641,7 @@ showsPrec Int 11 [Script (ShelleyLedgerEra era)] [Timelock StandardCrypto] -txscripts +txscripts ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2653,7 +2653,7 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 TxBodyScriptData era -redeemers +redeemers ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2668,20 +2668,20 @@ showsPrec Int 11 Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) -txmetadata +txmetadata ) - showsPrec Int -p (ShelleyTxBody ShelleyBasedEra era + showsPrec Int +p (ShelleyTxBody ShelleyBasedEra era ShelleyBasedEraAlonzo - TxBody (ShelleyLedgerEra era) -txbody [Script (ShelleyLedgerEra era)] -txscripts TxBodyScriptData era -redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata) = + TxBody (ShelleyLedgerEra era) +txbody [Script (ShelleyLedgerEra era)] +txscripts TxBodyScriptData era +redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) +txmetadata) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -2695,7 +2695,7 @@ showsPrec Int 11 TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -txbody +txbody ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2708,7 +2708,7 @@ showsPrec Int 11 [Script (ShelleyLedgerEra era)] [Script (AlonzoEra StandardCrypto)] -txscripts +txscripts ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2720,7 +2720,7 @@ forall a. Show a => Int -> a -> ShowS showsPrec Int 11 TxBodyScriptData era -redeemers +redeemers ShowS -> ShowS -> ShowS forall b c a. (b -> c) -> (a -> b) -> a -> c . Char -> ShowS @@ -2733,21 +2733,21 @@ showsPrec Int 11 Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) -txmetadata +txmetadata ) -instance HasTypeProxy era => HasTypeProxy (TxBody era) where - data AsType (TxBody era) = AsTxBody (AsType era) - proxyToAsType :: Proxy (TxBody era) -> AsType (TxBody era) -proxyToAsType Proxy (TxBody era) +instance HasTypeProxy era => HasTypeProxy (TxBody era) where + data AsType (TxBody era) = AsTxBody (AsType era) + proxyToAsType :: Proxy (TxBody era) -> AsType (TxBody era) +proxyToAsType Proxy (TxBody era) _ = AsType era -> AsType (TxBody era) forall era. AsType era -> AsType (TxBody era) AsTxBody (Proxy era -> AsType era forall t. HasTypeProxy t => Proxy t -> AsType t proxyToAsType (Proxy era forall k (t :: k). Proxy t -Proxy :: Proxy era)) +Proxy :: Proxy era)) pattern AsByronTxBody :: AsType (TxBody ByronEra) pattern $bAsByronTxBody :: AsType (TxBody ByronEra) @@ -2770,24 +2770,24 @@ AsMaryTxBody = AsTxBody AsMaryEra {-# COMPLETE AsMaryTxBody #-} -instance IsCardanoEra era => SerialiseAsCBOR (TxBody era) where +instance IsCardanoEra era => SerialiseAsCBOR (TxBody era) where - serialiseToCBOR :: TxBody era -> ByteString -serialiseToCBOR (ByronTxBody Annotated Tx ByteString -txbody) = + serialiseToCBOR :: TxBody era -> ByteString +serialiseToCBOR (ByronTxBody Annotated Tx ByteString +txbody) = Annotated Tx ByteString -> ByteString forall t. Decoded t => t -> ByteString recoverBytes Annotated Tx ByteString -txbody +txbody - serialiseToCBOR (ShelleyTxBody ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -txbody [Script (ShelleyLedgerEra era)] -txscripts TxBodyScriptData era -redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata) = + serialiseToCBOR (ShelleyTxBody ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +txbody [Script (ShelleyLedgerEra era)] +txscripts TxBodyScriptData era +redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) +txmetadata) = case ShelleyBasedEra era -era of +era of -- Use the same serialisation impl, but at different types: ShelleyBasedEra era ShelleyBasedEraShelley -> ShelleyBasedEra era @@ -2808,14 +2808,14 @@ -> ByteString serialiseShelleyBasedTxBody ShelleyBasedEra era -era TxBody (ShelleyEra StandardCrypto) +era TxBody (ShelleyEra StandardCrypto) TxBody (ShelleyLedgerEra era) -txbody [Script (ShelleyEra StandardCrypto)] +txbody [Script (ShelleyEra StandardCrypto)] [Script (ShelleyLedgerEra era)] -txscripts TxBodyScriptData era -redeemers Maybe (AuxiliaryData (ShelleyEra StandardCrypto)) +txscripts TxBodyScriptData era +redeemers Maybe (AuxiliaryData (ShelleyEra StandardCrypto)) Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata +txmetadata ShelleyBasedEra era ShelleyBasedEraAllegra -> ShelleyBasedEra era -> TxBody (ShelleyMAEra 'Allegra StandardCrypto) @@ -2835,14 +2835,14 @@ -> ByteString serialiseShelleyBasedTxBody ShelleyBasedEra era -era TxBody (ShelleyMAEra 'Allegra StandardCrypto) +era TxBody (ShelleyMAEra 'Allegra StandardCrypto) TxBody (ShelleyLedgerEra era) -txbody [Script (ShelleyMAEra 'Allegra StandardCrypto)] +txbody [Script (ShelleyMAEra 'Allegra StandardCrypto)] [Script (ShelleyLedgerEra era)] -txscripts TxBodyScriptData era -redeemers Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) +txscripts TxBodyScriptData era +redeemers Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata +txmetadata ShelleyBasedEra era ShelleyBasedEraMary -> ShelleyBasedEra era -> TxBody (ShelleyMAEra 'Mary StandardCrypto) @@ -2862,14 +2862,14 @@ -> ByteString serialiseShelleyBasedTxBody ShelleyBasedEra era -era TxBody (ShelleyMAEra 'Mary StandardCrypto) +era TxBody (ShelleyMAEra 'Mary StandardCrypto) TxBody (ShelleyLedgerEra era) -txbody [Script (ShelleyMAEra 'Mary StandardCrypto)] +txbody [Script (ShelleyMAEra 'Mary StandardCrypto)] [Script (ShelleyLedgerEra era)] -txscripts TxBodyScriptData era -redeemers Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) +txscripts TxBodyScriptData era +redeemers Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata +txmetadata ShelleyBasedEra era ShelleyBasedEraAlonzo -> ShelleyBasedEra era -> TxBody (AlonzoEra StandardCrypto) @@ -2889,23 +2889,23 @@ -> ByteString serialiseShelleyBasedTxBody ShelleyBasedEra era -era TxBody (AlonzoEra StandardCrypto) +era TxBody (AlonzoEra StandardCrypto) TxBody (ShelleyLedgerEra era) -txbody [Script (AlonzoEra StandardCrypto)] +txbody [Script (AlonzoEra StandardCrypto)] [Script (ShelleyLedgerEra era)] -txscripts TxBodyScriptData era -redeemers Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) +txscripts TxBodyScriptData era +redeemers Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txmetadata +txmetadata - deserialiseFromCBOR :: AsType (TxBody era) + deserialiseFromCBOR :: AsType (TxBody era) -> ByteString -> Either DecoderError (TxBody era) deserialiseFromCBOR AsType (TxBody era) -_ ByteString -bs = +_ ByteString +bs = case CardanoEra era forall era. IsCardanoEra era => CardanoEra era -cardanoEra :: CardanoEra era of +cardanoEra :: CardanoEra era of CardanoEra era ByronEra -> Annotated Tx ByteString -> TxBody ByronEra @@ -2932,7 +2932,7 @@ CBOR.fromCBORAnnotated (ByteString -> LByteString LBS.fromStrict ByteString -bs) +bs) -- Use the same derialisation impl, but at different types: CardanoEra era @@ -2949,7 +2949,7 @@ -> ByteString -> Either DecoderError (TxBody era) deserialiseShelleyBasedTxBody ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley ByteString -bs +bs CardanoEra era AllegraEra -> ShelleyBasedEra AllegraEra -> ByteString -> Either DecoderError (TxBody AllegraEra) @@ -2964,7 +2964,7 @@ -> ByteString -> Either DecoderError (TxBody era) deserialiseShelleyBasedTxBody ShelleyBasedEra AllegraEra ShelleyBasedEraAllegra ByteString -bs +bs CardanoEra era MaryEra -> ShelleyBasedEra MaryEra -> ByteString -> Either DecoderError (TxBody MaryEra) @@ -2979,7 +2979,7 @@ -> ByteString -> Either DecoderError (TxBody era) deserialiseShelleyBasedTxBody ShelleyBasedEra MaryEra ShelleyBasedEraMary ByteString -bs +bs CardanoEra era AlonzoEra -> ShelleyBasedEra AlonzoEra -> ByteString -> Either DecoderError (TxBody AlonzoEra) @@ -2994,23 +2994,23 @@ -> ByteString -> Either DecoderError (TxBody era) deserialiseShelleyBasedTxBody ShelleyBasedEra AlonzoEra ShelleyBasedEraAlonzo ByteString -bs +bs -- | The serialisation format for the different Shelley-based eras are not the -- same, but they can be handled generally with one overloaded implementation. serialiseShelleyBasedTxBody - :: forall era ledgerera. - ShelleyLedgerEra era ~ ledgerera - => ToCBOR (Ledger.TxBody ledgerera) - => ToCBOR (Ledger.Script ledgerera) - => ToCBOR (Alonzo.Data ledgerera) - => ToCBOR (Alonzo.Redeemers ledgerera) - => ToCBOR (Ledger.AuxiliaryData ledgerera) - => ShelleyBasedEra era - -> Ledger.TxBody ledgerera - -> [Ledger.Script ledgerera] - -> TxBodyScriptData era - -> Maybe (Ledger.AuxiliaryData ledgerera) + :: forall era ledgerera. + ShelleyLedgerEra era ~ ledgerera + => ToCBOR (Ledger.TxBody ledgerera) + => ToCBOR (Ledger.Script ledgerera) + => ToCBOR (Alonzo.Data ledgerera) + => ToCBOR (Alonzo.Redeemers ledgerera) + => ToCBOR (Ledger.AuxiliaryData ledgerera) + => ShelleyBasedEra era + -> Ledger.TxBody ledgerera + -> [Ledger.Script ledgerera] + -> TxBodyScriptData era + -> Maybe (Ledger.AuxiliaryData ledgerera) -> ByteString serialiseShelleyBasedTxBody :: ShelleyBasedEra era -> TxBody ledgerera @@ -3018,13 +3018,13 @@ -> TxBodyScriptData era -> Maybe (AuxiliaryData ledgerera) -> ByteString -serialiseShelleyBasedTxBody ShelleyBasedEra era -_era TxBody ledgerera -txbody [Script ledgerera] -txscripts +serialiseShelleyBasedTxBody ShelleyBasedEra era +_era TxBody ledgerera +txbody [Script ledgerera] +txscripts TxBodyScriptData era -TxBodyNoScriptData Maybe (AuxiliaryData ledgerera) -txmetadata = +TxBodyNoScriptData Maybe (AuxiliaryData ledgerera) +txmetadata = -- Backwards compat for pre-Alonzo era tx body files Encoding -> ByteString CBOR.serializeEncoding' (Encoding -> ByteString) -> Encoding -> ByteString @@ -3038,13 +3038,13 @@ <> TxBody ledgerera -> Encoding forall a. ToCBOR a => a -> Encoding CBOR.toCBOR TxBody ledgerera -txbody +txbody Encoding -> Encoding -> Encoding forall a. Semigroup a => a -> a -> a <> [Script ledgerera] -> Encoding forall a. ToCBOR a => a -> Encoding CBOR.toCBOR [Script ledgerera] -txscripts +txscripts Encoding -> Encoding -> Encoding forall a. Semigroup a => a -> a -> a <> (AuxiliaryData ledgerera -> Encoding) @@ -3053,18 +3053,18 @@ CBOR.encodeNullMaybe AuxiliaryData ledgerera -> Encoding forall a. ToCBOR a => a -> Encoding CBOR.toCBOR Maybe (AuxiliaryData ledgerera) -txmetadata +txmetadata -serialiseShelleyBasedTxBody ShelleyBasedEra era -_era TxBody ledgerera -txbody [Script ledgerera] -txscripts +serialiseShelleyBasedTxBody ShelleyBasedEra era +_era TxBody ledgerera +txbody [Script ledgerera] +txscripts (TxBodyScriptData ScriptDataSupportedInEra era -_ [Data (ShelleyLedgerEra era)] -datums Redeemers (ShelleyLedgerEra era) -redeemers) - Maybe (AuxiliaryData ledgerera) -txmetadata = +_ [Data (ShelleyLedgerEra era)] +datums Redeemers (ShelleyLedgerEra era) +redeemers) + Maybe (AuxiliaryData ledgerera) +txmetadata = Encoding -> ByteString CBOR.serializeEncoding' (Encoding -> ByteString) -> Encoding -> ByteString forall a b. (a -> b) -> a -> b @@ -3077,27 +3077,27 @@ <> TxBody ledgerera -> Encoding forall a. ToCBOR a => a -> Encoding CBOR.toCBOR TxBody ledgerera -txbody +txbody Encoding -> Encoding -> Encoding forall a. Semigroup a => a -> a -> a <> [Script ledgerera] -> Encoding forall a. ToCBOR a => a -> Encoding CBOR.toCBOR [Script ledgerera] -txscripts +txscripts Encoding -> Encoding -> Encoding forall a. Semigroup a => a -> a -> a <> [Data ledgerera] -> Encoding forall a. ToCBOR a => a -> Encoding CBOR.toCBOR [Data ledgerera] [Data (ShelleyLedgerEra era)] -datums +datums Encoding -> Encoding -> Encoding forall a. Semigroup a => a -> a -> a <> Redeemers ledgerera -> Encoding forall a. ToCBOR a => a -> Encoding CBOR.toCBOR Redeemers ledgerera Redeemers (ShelleyLedgerEra era) -redeemers +redeemers Encoding -> Encoding -> Encoding forall a. Semigroup a => a -> a -> a <> (AuxiliaryData ledgerera -> Encoding) @@ -3106,24 +3106,24 @@ CBOR.encodeNullMaybe AuxiliaryData ledgerera -> Encoding forall a. ToCBOR a => a -> Encoding CBOR.toCBOR Maybe (AuxiliaryData ledgerera) -txmetadata +txmetadata deserialiseShelleyBasedTxBody - :: forall era ledgerera. - ShelleyLedgerEra era ~ ledgerera - => FromCBOR (CBOR.Annotator (Ledger.TxBody ledgerera)) - => FromCBOR (CBOR.Annotator (Ledger.Script ledgerera)) - => FromCBOR (CBOR.Annotator (Alonzo.Data ledgerera)) - => FromCBOR (CBOR.Annotator (Alonzo.Redeemers ledgerera)) - => FromCBOR (CBOR.Annotator (Ledger.AuxiliaryData ledgerera)) - => ShelleyBasedEra era + :: forall era ledgerera. + ShelleyLedgerEra era ~ ledgerera + => FromCBOR (CBOR.Annotator (Ledger.TxBody ledgerera)) + => FromCBOR (CBOR.Annotator (Ledger.Script ledgerera)) + => FromCBOR (CBOR.Annotator (Alonzo.Data ledgerera)) + => FromCBOR (CBOR.Annotator (Alonzo.Redeemers ledgerera)) + => FromCBOR (CBOR.Annotator (Ledger.AuxiliaryData ledgerera)) + => ShelleyBasedEra era -> ByteString - -> Either CBOR.DecoderError (TxBody era) + -> Either CBOR.DecoderError (TxBody era) deserialiseShelleyBasedTxBody :: ShelleyBasedEra era -> ByteString -> Either DecoderError (TxBody era) -deserialiseShelleyBasedTxBody ShelleyBasedEra era -era ByteString -bs = +deserialiseShelleyBasedTxBody ShelleyBasedEra era +era ByteString +bs = Text -> (forall s. Decoder s (Annotator (TxBody era))) -> LByteString @@ -3137,31 +3137,31 @@ Text "Shelley TxBody" forall s. Decoder s (Annotator (TxBody era)) -decodeAnnotatedTuple +decodeAnnotatedTuple (ByteString -> LByteString LBS.fromStrict ByteString -bs) +bs) where - decodeAnnotatedTuple :: CBOR.Decoder s (CBOR.Annotator (TxBody era)) - decodeAnnotatedTuple :: Decoder s (Annotator (TxBody era)) -decodeAnnotatedTuple = do - Int -len <- Decoder s Int + decodeAnnotatedTuple :: CBOR.Decoder s (CBOR.Annotator (TxBody era)) + decodeAnnotatedTuple :: Decoder s (Annotator (TxBody era)) +decodeAnnotatedTuple = do + Int +len <- Decoder s Int forall s. Decoder s Int CBOR.decodeListLen - Annotator (TxBody ledgerera) -txbody <- Decoder s (Annotator (TxBody ledgerera)) + Annotator (TxBody ledgerera) +txbody <- Decoder s (Annotator (TxBody ledgerera)) forall a s. FromCBOR a => Decoder s a fromCBOR - [Annotator (Script ledgerera)] -txscripts <- Decoder s [Annotator (Script ledgerera)] + [Annotator (Script ledgerera)] +txscripts <- Decoder s [Annotator (Script ledgerera)] forall a s. FromCBOR a => Decoder s a fromCBOR - Annotator (TxBodyScriptData era) -txscriptdata <- + Annotator (TxBodyScriptData era) +txscriptdata <- -- Backwards compat for pre-Alonzo era tx body files case Int -len of +len of Int 3 -> Annotator (TxBodyScriptData era) -> Decoder s (Annotator (TxBodyScriptData era)) @@ -3177,7 +3177,7 @@ scriptDataSupportedInEra (ShelleyBasedEra era -> CardanoEra era forall era. ShelleyBasedEra era -> CardanoEra era shelleyBasedToCardanoEra ShelleyBasedEra era -era) of +era) of Maybe (ScriptDataSupportedInEra era) Nothing -> do Decoder s () @@ -3194,17 +3194,17 @@ return TxBodyScriptData era forall era. TxBodyScriptData era TxBodyNoScriptData) - Just ScriptDataSupportedInEra era -supported -> do - [Annotator (Data ledgerera)] -datums <- Decoder s (Annotator (Data ledgerera)) + Just ScriptDataSupportedInEra era +supported -> do + [Annotator (Data ledgerera)] +datums <- Decoder s (Annotator (Data ledgerera)) -> Decoder s [Annotator (Data ledgerera)] forall s a. Decoder s a -> Decoder s [a] CBOR.decodeListWith Decoder s (Annotator (Data ledgerera)) forall a s. FromCBOR a => Decoder s a fromCBOR - Annotator (Redeemers ledgerera) -redeemers <- Decoder s (Annotator (Redeemers ledgerera)) + Annotator (Redeemers ledgerera) +redeemers <- Decoder s (Annotator (Redeemers ledgerera)) forall a s. FromCBOR a => Decoder s a fromCBOR Annotator (TxBodyScriptData era) @@ -3223,8 +3223,8 @@ -> (FullByteString -> TxBodyScriptData era) -> Annotator (TxBodyScriptData era) forall a b. (a -> b) -> a -> b -$ \FullByteString -fbs -> +$ \FullByteString +fbs -> ScriptDataSupportedInEra era -> [Data (ShelleyLedgerEra era)] -> Redeemers (ShelleyLedgerEra era) @@ -3235,7 +3235,7 @@ -> Redeemers (ShelleyLedgerEra era) -> TxBodyScriptData era TxBodyScriptData ScriptDataSupportedInEra era -supported +supported ((Annotator (Data ledgerera) -> Data ledgerera) -> [Annotator (Data ledgerera)] -> [Data ledgerera] forall a b. (a -> b) -> [a] -> [b] @@ -3245,8 +3245,8 @@ flip Annotator (Data ledgerera) -> FullByteString -> Data ledgerera forall a. Annotator a -> FullByteString -> a CBOR.runAnnotator FullByteString -fbs) [Annotator (Data ledgerera)] -datums) +fbs) [Annotator (Data ledgerera)] +datums) ((Annotator (Redeemers ledgerera) -> FullByteString -> Redeemers ledgerera) -> FullByteString @@ -3257,15 +3257,15 @@ -> FullByteString -> Redeemers ledgerera forall a. Annotator a -> FullByteString -> a CBOR.runAnnotator FullByteString -fbs Annotator (Redeemers ledgerera) -redeemers) +fbs Annotator (Redeemers ledgerera) +redeemers) Int _ -> String -> Decoder s (Annotator (TxBodyScriptData era)) forall (m :: * -> *) a. MonadFail m => String -> m a fail String "expected tx body tuple of size 3 or 5" - Maybe (Annotator (AuxiliaryData ledgerera)) -txmetadata <- Decoder s (Annotator (AuxiliaryData ledgerera)) + Maybe (Annotator (AuxiliaryData ledgerera)) +txmetadata <- Decoder s (Annotator (AuxiliaryData ledgerera)) -> Decoder s (Maybe (Annotator (AuxiliaryData ledgerera))) forall s a. Decoder s a -> Decoder s (Maybe a) CBOR.decodeNullMaybe Decoder s (Annotator (AuxiliaryData ledgerera)) @@ -3281,8 +3281,8 @@ CBOR.Annotator ((FullByteString -> TxBody era) -> Annotator (TxBody era)) -> (FullByteString -> TxBody era) -> Annotator (TxBody era) forall a b. (a -> b) -> a -> b -$ \FullByteString -fbs -> +$ \FullByteString +fbs -> ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> [Script (ShelleyLedgerEra era)] @@ -3297,7 +3297,7 @@ -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> TxBody era ShelleyTxBody ShelleyBasedEra era -era +era ((Annotator (TxBody ledgerera) -> FullByteString -> TxBody ledgerera) -> FullByteString @@ -3307,8 +3307,8 @@ flip Annotator (TxBody ledgerera) -> FullByteString -> TxBody ledgerera forall a. Annotator a -> FullByteString -> a CBOR.runAnnotator FullByteString -fbs Annotator (TxBody ledgerera) -txbody) +fbs Annotator (TxBody ledgerera) +txbody) ((Annotator (Script ledgerera) -> Script ledgerera) -> [Annotator (Script ledgerera)] -> [Script ledgerera] forall a b. (a -> b) -> [a] -> [b] @@ -3321,8 +3321,8 @@ flip Annotator (Script ledgerera) -> FullByteString -> Script ledgerera forall a. Annotator a -> FullByteString -> a CBOR.runAnnotator FullByteString -fbs) [Annotator (Script ledgerera)] -txscripts) +fbs) [Annotator (Script ledgerera)] +txscripts) ((Annotator (TxBodyScriptData era) -> FullByteString -> TxBodyScriptData era) -> FullByteString @@ -3333,8 +3333,8 @@ -> FullByteString -> TxBodyScriptData era forall a. Annotator a -> FullByteString -> a CBOR.runAnnotator FullByteString -fbs Annotator (TxBodyScriptData era) -txscriptdata) +fbs Annotator (TxBodyScriptData era) +txscriptdata) ((Annotator (AuxiliaryData ledgerera) -> AuxiliaryData ledgerera) -> Maybe (Annotator (AuxiliaryData ledgerera)) -> Maybe (AuxiliaryData ledgerera) @@ -3349,16 +3349,16 @@ -> FullByteString -> AuxiliaryData ledgerera forall a. Annotator a -> FullByteString -> a CBOR.runAnnotator FullByteString -fbs) Maybe (Annotator (AuxiliaryData ledgerera)) -txmetadata) +fbs) Maybe (Annotator (AuxiliaryData ledgerera)) +txmetadata) -instance IsCardanoEra era => HasTextEnvelope (TxBody era) where - textEnvelopeType :: AsType (TxBody era) -> TextEnvelopeType +instance IsCardanoEra era => HasTextEnvelope (TxBody era) where + textEnvelopeType :: AsType (TxBody era) -> TextEnvelopeType textEnvelopeType AsType (TxBody era) _ = case CardanoEra era forall era. IsCardanoEra era => CardanoEra era -cardanoEra :: CardanoEra era of +cardanoEra :: CardanoEra era of CardanoEra era ByronEra -> TextEnvelopeType "TxUnsignedByron" @@ -3380,18 +3380,18 @@ -- Constructing transaction bodies -- -data TxBodyError era = +data TxBodyError era = TxBodyEmptyTxIns | TxBodyEmptyTxInsCollateral | TxBodyEmptyTxOuts - | TxBodyOutputNegative Quantity (TxOut era) - | TxBodyOutputOverflow Quantity (TxOut era) + | TxBodyOutputNegative Quantity (TxOut era) + | TxBodyOutputOverflow Quantity (TxOut era) | TxBodyMetadataError [(Word64, TxMetadataRangeError)] | TxBodyMintAdaError | TxBodyAuxDataHashInvalidError | TxBodyMintBeforeMaryError | TxBodyMissingProtocolParams - deriving Int -> TxBodyError era -> ShowS + deriving Int -> TxBodyError era -> ShowS [TxBodyError era] -> ShowS TxBodyError era -> String (Int -> TxBodyError era -> ShowS) @@ -3411,8 +3411,8 @@ $cshowsPrec :: forall era. Int -> TxBodyError era -> ShowS Show -instance Error (TxBodyError era) where - displayError :: TxBodyError era -> String +instance Error (TxBodyError era) where + displayError :: TxBodyError era -> String displayError TxBodyError era TxBodyEmptyTxIns = String "Transaction body has no inputs" @@ -3423,16 +3423,16 @@ displayError TxBodyError era TxBodyEmptyTxOuts = String "Transaction body has no outputs" - displayError (TxBodyOutputNegative (Quantity Integer -q) TxOut era -txout) = + displayError (TxBodyOutputNegative (Quantity Integer +q) TxOut era +txout) = String "Negative quantity (" String -> ShowS forall a. [a] -> [a] -> [a] ++ Integer -> String forall a. Show a => a -> String show Integer -q String -> ShowS +q String -> ShowS forall a. [a] -> [a] -> [a] ++ String ") in transaction output: " String -> ShowS @@ -3441,17 +3441,17 @@ TxOut era -> String forall a. Show a => a -> String show TxOut era -txout - displayError (TxBodyOutputOverflow (Quantity Integer -q) TxOut era -txout) = +txout + displayError (TxBodyOutputOverflow (Quantity Integer +q) TxOut era +txout) = String "Quantity too large (" String -> ShowS forall a. [a] -> [a] -> [a] ++ Integer -> String forall a. Show a => a -> String show Integer -q String -> ShowS +q String -> ShowS forall a. [a] -> [a] -> [a] ++ String " >= 2^64) in transaction output: " String -> ShowS @@ -3460,17 +3460,17 @@ TxOut era -> String forall a. Show a => a -> String show TxOut era -txout - displayError (TxBodyMetadataError [(Word64 -k, TxMetadataRangeError -err)]) = +txout + displayError (TxBodyMetadataError [(Word64 +k, TxMetadataRangeError +err)]) = String "Error in metadata entry " String -> ShowS forall a. [a] -> [a] -> [a] ++ Word64 -> String forall a. Show a => a -> String show Word64 -k String -> ShowS +k String -> ShowS forall a. [a] -> [a] -> [a] ++ String ": " String -> ShowS @@ -3478,9 +3478,9 @@ ++ TxMetadataRangeError -> String forall e. Error e => e -> String displayError TxMetadataRangeError -err - displayError (TxBodyMetadataError [(Word64, TxMetadataRangeError)] -errs) = +err + displayError (TxBodyMetadataError [(Word64, TxMetadataRangeError)] +errs) = String "Error in metadata entries: " String -> ShowS forall a. [a] -> [a] -> [a] @@ -3492,7 +3492,7 @@ [ Word64 -> String forall a. Show a => a -> String show Word64 -k String -> ShowS +k String -> ShowS forall a. [a] -> [a] -> [a] ++ String ": " String -> ShowS @@ -3500,11 +3500,11 @@ ++ TxMetadataRangeError -> String forall e. Error e => e -> String displayError TxMetadataRangeError -err - | (Word64 -k, TxMetadataRangeError -err) <- [(Word64, TxMetadataRangeError)] -errs ] +err + | (Word64 +k, TxMetadataRangeError +err) <- [(Word64, TxMetadataRangeError)] +errs ] displayError TxBodyError era TxBodyMintAdaError = String @@ -3527,24 +3527,24 @@ "parameters to hash" -makeTransactionBody :: forall era. - IsCardanoEra era - => TxBodyContent BuildTx era - -> Either (TxBodyError era) (TxBody era) +makeTransactionBody :: forall era. + IsCardanoEra era + => TxBodyContent BuildTx era + -> Either (TxBodyError era) (TxBody era) makeTransactionBody :: TxBodyContent BuildTx era -> Either (TxBodyError era) (TxBody era) makeTransactionBody = case CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle (CardanoEra era forall era. IsCardanoEra era => CardanoEra era -cardanoEra :: CardanoEra era) of +cardanoEra :: CardanoEra era) of CardanoEraStyle era LegacyByronEra -> TxBodyContent BuildTx era -> Either (TxBodyError era) (TxBody era) TxBodyContent BuildTx ByronEra -> Either (TxBodyError ByronEra) (TxBody ByronEra) makeByronTransactionBody - ShelleyBasedEra ShelleyBasedEra era -era -> ShelleyBasedEra era + ShelleyBasedEra ShelleyBasedEra era +era -> ShelleyBasedEra era -> TxBodyContent BuildTx era -> Either (TxBodyError era) (TxBody era) forall era. @@ -3552,26 +3552,26 @@ -> TxBodyContent BuildTx era -> Either (TxBodyError era) (TxBody era) makeShelleyTransactionBody ShelleyBasedEra era -era +era -pattern TxBody :: TxBodyContent ViewTx era -> TxBody era +pattern TxBody :: TxBodyContent ViewTx era -> TxBody era pattern $mTxBody :: forall r era. TxBody era -> (TxBodyContent ViewTx era -> r) -> (Void# -> r) -> r -TxBody txbodycontent <- (getTxBodyContent -> txbodycontent) +TxBody txbodycontent <- (getTxBodyContent -> txbodycontent) -getTxBodyContent :: TxBody era -> TxBodyContent ViewTx era +getTxBodyContent :: TxBody era -> TxBodyContent ViewTx era getTxBodyContent :: TxBody era -> TxBodyContent ViewTx era -getTxBodyContent (ByronTxBody Annotated Tx ByteString -body) = Annotated Tx ByteString -> TxBodyContent ViewTx ByronEra +getTxBodyContent (ByronTxBody Annotated Tx ByteString +body) = Annotated Tx ByteString -> TxBodyContent ViewTx ByronEra getByronTxBodyContent Annotated Tx ByteString -body -getTxBodyContent (ShelleyTxBody ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body [Script (ShelleyLedgerEra era)] -_scripts TxBodyScriptData era -_redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) -mAux) = +body +getTxBodyContent (ShelleyTxBody ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body [Script (ShelleyLedgerEra era)] +_scripts TxBodyScriptData era +_redeemers Maybe (AuxiliaryData (ShelleyLedgerEra era)) +mAux) = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) @@ -3582,24 +3582,24 @@ -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> TxBodyContent ViewTx era fromLedgerTxBody ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body Maybe (AuxiliaryData (ShelleyLedgerEra era)) -mAux +era TxBody (ShelleyLedgerEra era) +body Maybe (AuxiliaryData (ShelleyLedgerEra era)) +mAux -fromLedgerTxBody - :: ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) - -> Maybe (Ledger.AuxiliaryData (ShelleyLedgerEra era)) - -> TxBodyContent ViewTx era +fromLedgerTxBody + :: ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) + -> Maybe (Ledger.AuxiliaryData (ShelleyLedgerEra era)) + -> TxBodyContent ViewTx era fromLedgerTxBody :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> TxBodyContent ViewTx era -fromLedgerTxBody ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body Maybe (AuxiliaryData (ShelleyLedgerEra era)) -mAux = +fromLedgerTxBody ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body Maybe (AuxiliaryData (ShelleyLedgerEra era)) +mAux = TxBodyContent :: forall build era. TxIns build era -> TxInsCollateral era @@ -3625,8 +3625,8 @@ -> TxBody (ShelleyLedgerEra era) -> [(TxIn, BuildTxWith ViewTx (Witness WitCtxTxIn era))] fromLedgerTxIns ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body +era TxBody (ShelleyLedgerEra era) +body , txInsCollateral :: TxInsCollateral era txInsCollateral = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxInsCollateral era @@ -3634,22 +3634,22 @@ ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxInsCollateral era fromLedgerTxInsCollateral ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body +era TxBody (ShelleyLedgerEra era) +body , txOuts :: [TxOut era] txOuts = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> [TxOut era] forall era. ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> [TxOut era] fromLedgerTxOuts ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body +era TxBody (ShelleyLedgerEra era) +body , txFee :: TxFee era txFee = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxFee era forall era. ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxFee era fromLedgerTxFee ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body +era TxBody (ShelleyLedgerEra era) +body , txValidityRange :: (TxValidityLowerBound era, TxValidityUpperBound era) txValidityRange = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) @@ -3659,8 +3659,8 @@ -> TxBody (ShelleyLedgerEra era) -> (TxValidityLowerBound era, TxValidityUpperBound era) fromLedgerTxValidityRange ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body +era TxBody (ShelleyLedgerEra era) +body , txWithdrawals :: TxWithdrawals ViewTx era txWithdrawals = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxWithdrawals ViewTx era @@ -3668,8 +3668,8 @@ ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxWithdrawals ViewTx era fromLedgerTxWithdrawals ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body +era TxBody (ShelleyLedgerEra era) +body , txCertificates :: TxCertificates ViewTx era txCertificates = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxCertificates ViewTx era @@ -3677,8 +3677,8 @@ ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxCertificates ViewTx era fromLedgerTxCertificates ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body +era TxBody (ShelleyLedgerEra era) +body , txUpdateProposal :: TxUpdateProposal era txUpdateProposal = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxUpdateProposal era @@ -3686,8 +3686,8 @@ ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxUpdateProposal era fromLedgerTxUpdateProposal ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body +era TxBody (ShelleyLedgerEra era) +body , txMintValue :: TxMintValue ViewTx era txMintValue = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxMintValue ViewTx era @@ -3695,8 +3695,8 @@ ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxMintValue ViewTx era fromLedgerTxMintValue ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body +era TxBody (ShelleyLedgerEra era) +body , txExtraKeyWits :: TxExtraKeyWitnesses era txExtraKeyWits = ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxExtraKeyWitnesses era @@ -3704,8 +3704,8 @@ ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxExtraKeyWitnesses era fromLedgerTxExtraKeyWitnesses ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body +era TxBody (ShelleyLedgerEra era) +body , txProtocolParams :: BuildTxWith ViewTx (Maybe ProtocolParameters) txProtocolParams = BuildTxWith ViewTx (Maybe ProtocolParameters) forall a. BuildTxWith ViewTx a @@ -3713,11 +3713,11 @@ , TxMetadataInEra era txMetadata :: TxMetadataInEra era txMetadata :: TxMetadataInEra era -txMetadata +txMetadata , TxAuxScripts era txAuxScripts :: TxAuxScripts era txAuxScripts :: TxAuxScripts era -txAuxScripts +txAuxScripts , txAuxScriptData :: TxAuxScriptData era txAuxScriptData = String -> TxAuxScriptData era forall a. HasCallStack => String -> a @@ -3725,9 +3725,9 @@ "TODO alonzo: txAuxScriptData" } where - (TxMetadataInEra era -txMetadata, TxAuxScripts era -txAuxScripts) = ShelleyBasedEra era + (TxMetadataInEra era +txMetadata, TxAuxScripts era +txAuxScripts) = ShelleyBasedEra era -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> (TxMetadataInEra era, TxAuxScripts era) forall era. @@ -3735,41 +3735,41 @@ -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> (TxMetadataInEra era, TxAuxScripts era) fromLedgerTxAuxiliaryData ShelleyBasedEra era -era Maybe (AuxiliaryData (ShelleyLedgerEra era)) -mAux +era Maybe (AuxiliaryData (ShelleyLedgerEra era)) +mAux fromLedgerTxIns - :: forall era. - ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) - -> [(TxIn,BuildTxWith ViewTx (Witness WitCtxTxIn era))] + :: forall era. + ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) + -> [(TxIn,BuildTxWith ViewTx (Witness WitCtxTxIn era))] fromLedgerTxIns :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> [(TxIn, BuildTxWith ViewTx (Witness WitCtxTxIn era))] -fromLedgerTxIns ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body = +fromLedgerTxIns ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body = [ (TxIn StandardCrypto -> TxIn fromShelleyTxIn TxIn StandardCrypto -input, BuildTxWith ViewTx (Witness WitCtxTxIn era) +input, BuildTxWith ViewTx (Witness WitCtxTxIn era) forall a. BuildTxWith ViewTx a ViewTx) - | TxIn StandardCrypto -input <- Set (TxIn StandardCrypto) -> [TxIn StandardCrypto] + | TxIn StandardCrypto +input <- Set (TxIn StandardCrypto) -> [TxIn StandardCrypto] forall a. Set a -> [a] Set.toList (ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> Set (TxIn StandardCrypto) -inputs ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body) ] +inputs ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body) ] where - inputs :: ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) + inputs :: ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) -> Set (Shelley.TxIn StandardCrypto) - inputs :: ShelleyBasedEra era + inputs :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> Set (TxIn StandardCrypto) -inputs ShelleyBasedEra era +inputs ShelleyBasedEra era ShelleyBasedEraShelley = TxBody (ShelleyLedgerEra era) -> Set (TxIn StandardCrypto) forall era. TxBody era @@ -3777,71 +3777,71 @@ TransTxBody ToCBOR era) => Set (TxIn (Crypto era)) Shelley._inputs - inputs ShelleyBasedEra era + inputs ShelleyBasedEra era ShelleyBasedEraAllegra = TxBody (ShelleyLedgerEra era) -> Set (TxIn StandardCrypto) forall era. TxBody era -> Set (TxIn (Crypto era)) Allegra.inputs' - inputs ShelleyBasedEra era + inputs ShelleyBasedEra era ShelleyBasedEraMary = TxBody (ShelleyLedgerEra era) -> Set (TxIn StandardCrypto) forall era. TxBody era -> Set (TxIn (Crypto era)) Mary.inputs' - inputs ShelleyBasedEra era + inputs ShelleyBasedEra era ShelleyBasedEraAlonzo = TxBody (ShelleyLedgerEra era) -> Set (TxIn StandardCrypto) forall era. TxBody era -> Set (TxIn (Crypto era)) Alonzo.inputs' fromLedgerTxInsCollateral - :: forall era. - ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) - -> TxInsCollateral era + :: forall era. + ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) + -> TxInsCollateral era fromLedgerTxInsCollateral :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxInsCollateral era -fromLedgerTxInsCollateral ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body = +fromLedgerTxInsCollateral ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body = case CardanoEra era -> Maybe (CollateralSupportedInEra era) forall era. CardanoEra era -> Maybe (CollateralSupportedInEra era) collateralSupportedInEra (ShelleyBasedEra era -> CardanoEra era forall era. ShelleyBasedEra era -> CardanoEra era shelleyBasedToCardanoEra ShelleyBasedEra era -era) of +era) of Maybe (CollateralSupportedInEra era) Nothing -> TxInsCollateral era forall era. TxInsCollateral era TxInsCollateralNone - Just CollateralSupportedInEra era -supported -> CollateralSupportedInEra era -> [TxIn] -> TxInsCollateral era + Just CollateralSupportedInEra era +supported -> CollateralSupportedInEra era -> [TxIn] -> TxInsCollateral era forall era. CollateralSupportedInEra era -> [TxIn] -> TxInsCollateral era TxInsCollateral CollateralSupportedInEra era -supported +supported [ TxIn StandardCrypto -> TxIn fromShelleyTxIn TxIn StandardCrypto -input - | TxIn StandardCrypto -input <- Set (TxIn StandardCrypto) -> [TxIn StandardCrypto] +input + | TxIn StandardCrypto +input <- Set (TxIn StandardCrypto) -> [TxIn StandardCrypto] forall a. Set a -> [a] Set.toList (ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> Set (TxIn StandardCrypto) -collateral ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body) ] +collateral ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body) ] where - collateral :: ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) + collateral :: ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) -> Set (Shelley.TxIn StandardCrypto) - collateral :: ShelleyBasedEra era + collateral :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> Set (TxIn StandardCrypto) -collateral ShelleyBasedEra era +collateral ShelleyBasedEra era ShelleyBasedEraShelley = Set (TxIn StandardCrypto) -> TxBody (ShelleyEra StandardCrypto) -> Set (TxIn StandardCrypto) forall a b. a -> b -> a const Set (TxIn StandardCrypto) forall a. Set a Set.empty - collateral ShelleyBasedEra era + collateral ShelleyBasedEra era ShelleyBasedEraAllegra = Set (TxIn StandardCrypto) -> TxBody (ShelleyMAEra 'Allegra StandardCrypto) -> Set (TxIn StandardCrypto) @@ -3849,7 +3849,7 @@ const Set (TxIn StandardCrypto) forall a. Set a Set.empty - collateral ShelleyBasedEra era + collateral ShelleyBasedEra era ShelleyBasedEraMary = Set (TxIn StandardCrypto) -> TxBody (ShelleyMAEra 'Mary StandardCrypto) -> Set (TxIn StandardCrypto) @@ -3857,29 +3857,29 @@ const Set (TxIn StandardCrypto) forall a. Set a Set.empty - collateral ShelleyBasedEra era + collateral ShelleyBasedEra era ShelleyBasedEraAlonzo = TxBody (ShelleyLedgerEra era) -> Set (TxIn StandardCrypto) forall era. TxBody era -> Set (TxIn (Crypto era)) Alonzo.collateral' -fromLedgerTxOuts - :: ShelleyBasedEra era -> Ledger.TxBody (ShelleyLedgerEra era) -> [TxOut era] +fromLedgerTxOuts + :: ShelleyBasedEra era -> Ledger.TxBody (ShelleyLedgerEra era) -> [TxOut era] fromLedgerTxOuts :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> [TxOut era] -fromLedgerTxOuts ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body = +fromLedgerTxOuts ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body = ShelleyBasedEra era -> TxOut (ShelleyLedgerEra era) -> TxOut era forall era ledgerera. (ShelleyLedgerEra era ~ ledgerera) => ShelleyBasedEra era -> TxOut ledgerera -> TxOut era fromTxOut ShelleyBasedEra era -era (TxOut (ShelleyLedgerEra era) -> TxOut era) +era (TxOut (ShelleyLedgerEra era) -> TxOut era) -> [TxOut (ShelleyLedgerEra era)] -> [TxOut era] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> StrictSeq (TxOut (ShelleyLedgerEra era)) -> [TxOut (ShelleyLedgerEra era)] @@ -3901,7 +3901,7 @@ StrictSeq (TxOut era) Shelley._outputs TxBody (ShelleyLedgerEra era) TxBody (ShelleyEra StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraAllegra -> StrictSeq (TxOut (ShelleyMAEra 'Allegra StandardCrypto)) -> [TxOut (ShelleyMAEra 'Allegra StandardCrypto)] @@ -3916,7 +3916,7 @@ forall era. TxBody era -> StrictSeq (TxOut era) Allegra.outputs' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Allegra StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraMary -> StrictSeq (TxOut (ShelleyMAEra 'Mary StandardCrypto)) -> [TxOut (ShelleyMAEra 'Mary StandardCrypto)] @@ -3931,7 +3931,7 @@ forall era. TxBody era -> StrictSeq (TxOut era) Mary.outputs' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraAlonzo -> StrictSeq (TxOut (AlonzoEra StandardCrypto)) -> [TxOut (AlonzoEra StandardCrypto)] @@ -3946,17 +3946,17 @@ forall era. TxBody era -> StrictSeq (TxOut era) Alonzo.outputs' TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -body +body -fromLedgerTxFee - :: ShelleyBasedEra era -> Ledger.TxBody (ShelleyLedgerEra era) -> TxFee era +fromLedgerTxFee + :: ShelleyBasedEra era -> Ledger.TxBody (ShelleyLedgerEra era) -> TxFee era fromLedgerTxFee :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxFee era -fromLedgerTxFee ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body = +fromLedgerTxFee ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> TxFeesExplicitInEra ShelleyEra -> Lovelace -> TxFee ShelleyEra @@ -3980,7 +3980,7 @@ Coin Shelley._txfee TxBody (ShelleyLedgerEra era) TxBody (ShelleyEra StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraAllegra -> TxFeesExplicitInEra AllegraEra -> Lovelace -> TxFee AllegraEra @@ -3996,7 +3996,7 @@ forall era. TxBody era -> Coin Allegra.txfee' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Allegra StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraMary -> TxFeesExplicitInEra MaryEra -> Lovelace -> TxFee MaryEra @@ -4012,7 +4012,7 @@ forall era. TxBody era -> Coin Mary.txfee' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraAlonzo -> TxFeesExplicitInEra AlonzoEra -> Lovelace -> TxFee AlonzoEra @@ -4028,20 +4028,20 @@ forall era. TxBody era -> Coin Alonzo.txfee' TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -body +body -fromLedgerTxValidityRange - :: ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) - -> (TxValidityLowerBound era, TxValidityUpperBound era) +fromLedgerTxValidityRange + :: ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) + -> (TxValidityLowerBound era, TxValidityUpperBound era) fromLedgerTxValidityRange :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> (TxValidityLowerBound era, TxValidityUpperBound era) -fromLedgerTxValidityRange ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body = +fromLedgerTxValidityRange ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> ( TxValidityLowerBound era @@ -4068,28 +4068,28 @@ SlotNo Shelley._ttl TxBody (ShelleyLedgerEra era) TxBody (ShelleyEra StandardCrypto) -body +body ) ShelleyBasedEra era ShelleyBasedEraAllegra -> ( case StrictMaybe SlotNo -invalidBefore of +invalidBefore of StrictMaybe SlotNo SNothing -> TxValidityLowerBound era forall era. TxValidityLowerBound era TxValidityNoLowerBound - SJust SlotNo -s -> ValidityLowerBoundSupportedInEra AllegraEra + SJust SlotNo +s -> ValidityLowerBoundSupportedInEra AllegraEra -> SlotNo -> TxValidityLowerBound AllegraEra forall era. ValidityLowerBoundSupportedInEra era -> SlotNo -> TxValidityLowerBound era TxValidityLowerBound ValidityLowerBoundSupportedInEra AllegraEra ValidityLowerBoundInAllegraEra SlotNo -s +s , case StrictMaybe SlotNo -invalidHereafter of +invalidHereafter of StrictMaybe SlotNo SNothing -> ValidityNoUpperBoundSupportedInEra AllegraEra -> TxValidityUpperBound AllegraEra @@ -4097,21 +4097,21 @@ ValidityNoUpperBoundSupportedInEra era -> TxValidityUpperBound era TxValidityNoUpperBound ValidityNoUpperBoundSupportedInEra AllegraEra ValidityNoUpperBoundInAllegraEra - SJust SlotNo -s -> ValidityUpperBoundSupportedInEra AllegraEra + SJust SlotNo +s -> ValidityUpperBoundSupportedInEra AllegraEra -> SlotNo -> TxValidityUpperBound AllegraEra forall era. ValidityUpperBoundSupportedInEra era -> SlotNo -> TxValidityUpperBound era TxValidityUpperBound ValidityUpperBoundSupportedInEra AllegraEra ValidityUpperBoundInAllegraEra SlotNo -s +s ) where - Allegra.ValidityInterval{StrictMaybe SlotNo + Allegra.ValidityInterval{StrictMaybe SlotNo invalidBefore :: ValidityInterval -> StrictMaybe SlotNo invalidBefore :: StrictMaybe SlotNo -invalidBefore, StrictMaybe SlotNo +invalidBefore, StrictMaybe SlotNo invalidHereafter :: ValidityInterval -> StrictMaybe SlotNo invalidHereafter :: StrictMaybe SlotNo invalidHereafter} = @@ -4119,27 +4119,27 @@ forall era. TxBody era -> ValidityInterval Allegra.vldt' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Allegra StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraMary -> ( case StrictMaybe SlotNo -invalidBefore of +invalidBefore of StrictMaybe SlotNo SNothing -> TxValidityLowerBound era forall era. TxValidityLowerBound era TxValidityNoLowerBound - SJust SlotNo -s -> ValidityLowerBoundSupportedInEra MaryEra + SJust SlotNo +s -> ValidityLowerBoundSupportedInEra MaryEra -> SlotNo -> TxValidityLowerBound MaryEra forall era. ValidityLowerBoundSupportedInEra era -> SlotNo -> TxValidityLowerBound era TxValidityLowerBound ValidityLowerBoundSupportedInEra MaryEra ValidityLowerBoundInMaryEra SlotNo -s +s , case StrictMaybe SlotNo -invalidHereafter of +invalidHereafter of StrictMaybe SlotNo SNothing -> ValidityNoUpperBoundSupportedInEra MaryEra -> TxValidityUpperBound MaryEra @@ -4147,48 +4147,48 @@ ValidityNoUpperBoundSupportedInEra era -> TxValidityUpperBound era TxValidityNoUpperBound ValidityNoUpperBoundSupportedInEra MaryEra ValidityNoUpperBoundInMaryEra - SJust SlotNo -s -> ValidityUpperBoundSupportedInEra MaryEra + SJust SlotNo +s -> ValidityUpperBoundSupportedInEra MaryEra -> SlotNo -> TxValidityUpperBound MaryEra forall era. ValidityUpperBoundSupportedInEra era -> SlotNo -> TxValidityUpperBound era TxValidityUpperBound ValidityUpperBoundSupportedInEra MaryEra ValidityUpperBoundInMaryEra SlotNo -s +s ) where - Mary.ValidityInterval{StrictMaybe SlotNo + Mary.ValidityInterval{StrictMaybe SlotNo invalidBefore :: StrictMaybe SlotNo invalidBefore :: ValidityInterval -> StrictMaybe SlotNo -invalidBefore, StrictMaybe SlotNo +invalidBefore, StrictMaybe SlotNo invalidHereafter :: StrictMaybe SlotNo invalidHereafter :: ValidityInterval -> StrictMaybe SlotNo -invalidHereafter} = TxBody (ShelleyMAEra 'Mary StandardCrypto) -> ValidityInterval +invalidHereafter} = TxBody (ShelleyMAEra 'Mary StandardCrypto) -> ValidityInterval forall era. TxBody era -> ValidityInterval Mary.vldt' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraAlonzo -> ( case StrictMaybe SlotNo -invalidBefore of +invalidBefore of StrictMaybe SlotNo SNothing -> TxValidityLowerBound era forall era. TxValidityLowerBound era TxValidityNoLowerBound - SJust SlotNo -s -> ValidityLowerBoundSupportedInEra AlonzoEra + SJust SlotNo +s -> ValidityLowerBoundSupportedInEra AlonzoEra -> SlotNo -> TxValidityLowerBound AlonzoEra forall era. ValidityLowerBoundSupportedInEra era -> SlotNo -> TxValidityLowerBound era TxValidityLowerBound ValidityLowerBoundSupportedInEra AlonzoEra ValidityLowerBoundInAlonzoEra SlotNo -s +s , case StrictMaybe SlotNo -invalidHereafter of +invalidHereafter of StrictMaybe SlotNo SNothing -> ValidityNoUpperBoundSupportedInEra AlonzoEra -> TxValidityUpperBound AlonzoEra @@ -4196,47 +4196,47 @@ ValidityNoUpperBoundSupportedInEra era -> TxValidityUpperBound era TxValidityNoUpperBound ValidityNoUpperBoundSupportedInEra AlonzoEra ValidityNoUpperBoundInAlonzoEra - SJust SlotNo -s -> ValidityUpperBoundSupportedInEra AlonzoEra + SJust SlotNo +s -> ValidityUpperBoundSupportedInEra AlonzoEra -> SlotNo -> TxValidityUpperBound AlonzoEra forall era. ValidityUpperBoundSupportedInEra era -> SlotNo -> TxValidityUpperBound era TxValidityUpperBound ValidityUpperBoundSupportedInEra AlonzoEra ValidityUpperBoundInAlonzoEra SlotNo -s +s ) where - Mary.ValidityInterval{StrictMaybe SlotNo + Mary.ValidityInterval{StrictMaybe SlotNo invalidBefore :: StrictMaybe SlotNo invalidBefore :: ValidityInterval -> StrictMaybe SlotNo -invalidBefore, StrictMaybe SlotNo +invalidBefore, StrictMaybe SlotNo invalidHereafter :: StrictMaybe SlotNo invalidHereafter :: ValidityInterval -> StrictMaybe SlotNo -invalidHereafter} = TxBody (AlonzoEra StandardCrypto) -> ValidityInterval +invalidHereafter} = TxBody (AlonzoEra StandardCrypto) -> ValidityInterval forall era. TxBody era -> ValidityInterval Alonzo.vldt' TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -body +body -fromLedgerAuxiliaryData - :: ShelleyBasedEra era - -> Ledger.AuxiliaryData (ShelleyLedgerEra era) - -> (Map Word64 TxMetadataValue, [ScriptInEra era]) +fromLedgerAuxiliaryData + :: ShelleyBasedEra era + -> Ledger.AuxiliaryData (ShelleyLedgerEra era) + -> (Map Word64 TxMetadataValue, [ScriptInEra era]) fromLedgerAuxiliaryData :: ShelleyBasedEra era -> AuxiliaryData (ShelleyLedgerEra era) -> (Map Word64 TxMetadataValue, [ScriptInEra era]) fromLedgerAuxiliaryData ShelleyBasedEra era -ShelleyBasedEraShelley (Shelley.Metadata metadata) = +ShelleyBasedEraShelley (Shelley.Metadata metadata) = (Map Word64 Metadatum -> Map Word64 TxMetadataValue fromShelleyMetadata Map Word64 Metadatum -metadata, []) +metadata, []) fromLedgerAuxiliaryData ShelleyBasedEra era -ShelleyBasedEraAllegra (Allegra.AuxiliaryData ms ss) = +ShelleyBasedEraAllegra (Allegra.AuxiliaryData ms ss) = ( Map Word64 Metadatum -> Map Word64 TxMetadataValue fromShelleyMetadata Map Word64 Metadatum -ms +ms , ShelleyBasedEra AllegraEra -> Script (ShelleyLedgerEra AllegraEra) -> ScriptInEra AllegraEra forall era. @@ -4250,13 +4250,13 @@ forall (t :: * -> *) a. Foldable t => t a -> [a] toList StrictSeq (Script (ShelleyMAEra 'Allegra StandardCrypto)) StrictSeq (Timelock StandardCrypto) -ss +ss ) fromLedgerAuxiliaryData ShelleyBasedEra era -ShelleyBasedEraMary (Mary.AuxiliaryData ms ss) = +ShelleyBasedEraMary (Mary.AuxiliaryData ms ss) = ( Map Word64 Metadatum -> Map Word64 TxMetadataValue fromShelleyMetadata Map Word64 Metadatum -ms +ms , ShelleyBasedEra MaryEra -> Script (ShelleyLedgerEra MaryEra) -> ScriptInEra MaryEra forall era. @@ -4270,13 +4270,13 @@ forall (t :: * -> *) a. Foldable t => t a -> [a] toList StrictSeq (Script (ShelleyMAEra 'Mary StandardCrypto)) StrictSeq (Timelock StandardCrypto) -ss +ss ) fromLedgerAuxiliaryData ShelleyBasedEra era -ShelleyBasedEraAlonzo (Alonzo.AuxiliaryData ms ss _ds) = +ShelleyBasedEraAlonzo (Alonzo.AuxiliaryData ms ss _ds) = ( Map Word64 Metadatum -> Map Word64 TxMetadataValue fromShelleyMetadata Map Word64 Metadatum -ms +ms , ShelleyBasedEra AlonzoEra -> Script (ShelleyLedgerEra AlonzoEra) -> ScriptInEra AlonzoEra forall era. @@ -4291,13 +4291,13 @@ forall (t :: * -> *) a. Foldable t => t a -> [a] toList StrictSeq (Script (AlonzoEra StandardCrypto)) StrictSeq (Script (AlonzoEra StandardCrypto)) -ss +ss ) -fromLedgerTxAuxiliaryData - :: ShelleyBasedEra era - -> Maybe (Ledger.AuxiliaryData (ShelleyLedgerEra era)) - -> (TxMetadataInEra era, TxAuxScripts era) +fromLedgerTxAuxiliaryData + :: ShelleyBasedEra era + -> Maybe (Ledger.AuxiliaryData (ShelleyLedgerEra era)) + -> (TxMetadataInEra era, TxAuxScripts era) fromLedgerTxAuxiliaryData :: ShelleyBasedEra era -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> (TxMetadataInEra era, TxAuxScripts era) @@ -4308,17 +4308,17 @@ TxMetadataNone, TxAuxScripts era forall era. TxAuxScripts era TxAuxScriptsNone) -fromLedgerTxAuxiliaryData ShelleyBasedEra era -era (Just AuxiliaryData (ShelleyLedgerEra era) -auxData) = +fromLedgerTxAuxiliaryData ShelleyBasedEra era +era (Just AuxiliaryData (ShelleyLedgerEra era) +auxData) = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> ( if Map Word64 TxMetadataValue -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null Map Word64 TxMetadataValue -ms then +ms then TxMetadataInEra era forall era. TxMetadataInEra era TxMetadataNone @@ -4333,7 +4333,7 @@ forall a b. (a -> b) -> a -> b $ Map Word64 TxMetadataValue -> TxMetadata TxMetadata Map Word64 TxMetadataValue -ms +ms , TxAuxScripts era forall era. TxAuxScripts era TxAuxScriptsNone @@ -4343,7 +4343,7 @@ ( if Map Word64 TxMetadataValue -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null Map Word64 TxMetadataValue -ms then +ms then TxMetadataInEra era forall era. TxMetadataInEra era TxMetadataNone @@ -4358,9 +4358,9 @@ forall a b. (a -> b) -> a -> b $ Map Word64 TxMetadataValue -> TxMetadata TxMetadata Map Word64 TxMetadataValue -ms +ms , case [ScriptInEra era] -ss of +ss of [] -> TxAuxScripts era forall era. TxAuxScripts era TxAuxScriptsNone @@ -4373,14 +4373,14 @@ TxAuxScripts AuxScriptsSupportedInEra AllegraEra AuxScriptsInAllegraEra [ScriptInEra era] [ScriptInEra AllegraEra] -ss +ss ) ShelleyBasedEra era ShelleyBasedEraMary -> ( if Map Word64 TxMetadataValue -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null Map Word64 TxMetadataValue -ms then +ms then TxMetadataInEra era forall era. TxMetadataInEra era TxMetadataNone @@ -4395,9 +4395,9 @@ forall a b. (a -> b) -> a -> b $ Map Word64 TxMetadataValue -> TxMetadata TxMetadata Map Word64 TxMetadataValue -ms +ms , case [ScriptInEra era] -ss of +ss of [] -> TxAuxScripts era forall era. TxAuxScripts era TxAuxScriptsNone @@ -4410,14 +4410,14 @@ TxAuxScripts AuxScriptsSupportedInEra MaryEra AuxScriptsInMaryEra [ScriptInEra era] [ScriptInEra MaryEra] -ss +ss ) ShelleyBasedEra era ShelleyBasedEraAlonzo -> ( if Map Word64 TxMetadataValue -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null Map Word64 TxMetadataValue -ms then +ms then TxMetadataInEra era forall era. TxMetadataInEra era TxMetadataNone @@ -4432,9 +4432,9 @@ forall a b. (a -> b) -> a -> b $ Map Word64 TxMetadataValue -> TxMetadata TxMetadata Map Word64 TxMetadataValue -ms +ms , case [ScriptInEra era] -ss of +ss of [] -> TxAuxScripts era forall era. TxAuxScripts era TxAuxScriptsNone @@ -4447,12 +4447,12 @@ TxAuxScripts AuxScriptsSupportedInEra AlonzoEra AuxScriptsInAlonzoEra [ScriptInEra era] [ScriptInEra AlonzoEra] -ss +ss ) where - (Map Word64 TxMetadataValue -ms, [ScriptInEra era] -ss) = ShelleyBasedEra era + (Map Word64 TxMetadataValue +ms, [ScriptInEra era] +ss) = ShelleyBasedEra era -> AuxiliaryData (ShelleyLedgerEra era) -> (Map Word64 TxMetadataValue, [ScriptInEra era]) forall era. @@ -4460,20 +4460,20 @@ -> AuxiliaryData (ShelleyLedgerEra era) -> (Map Word64 TxMetadataValue, [ScriptInEra era]) fromLedgerAuxiliaryData ShelleyBasedEra era -era AuxiliaryData (ShelleyLedgerEra era) -auxData +era AuxiliaryData (ShelleyLedgerEra era) +auxData -fromLedgerTxExtraKeyWitnesses :: ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) - -> TxExtraKeyWitnesses era +fromLedgerTxExtraKeyWitnesses :: ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) + -> TxExtraKeyWitnesses era fromLedgerTxExtraKeyWitnesses :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxExtraKeyWitnesses era -fromLedgerTxExtraKeyWitnesses ShelleyBasedEra era -sbe TxBody (ShelleyLedgerEra era) -body = +fromLedgerTxExtraKeyWitnesses ShelleyBasedEra era +sbe TxBody (ShelleyLedgerEra era) +body = case ShelleyBasedEra era -sbe of +sbe of ShelleyBasedEra era ShelleyBasedEraShelley -> TxExtraKeyWitnesses era forall era. TxExtraKeyWitnesses era @@ -4502,35 +4502,35 @@ HasKeyRole a => a r crypto -> a r' crypto Shelley.coerceKeyRole KeyHash 'Witness StandardCrypto -keyhash) - | let keyhashes :: Set (KeyHash 'Witness (Crypto (AlonzoEra StandardCrypto))) -keyhashes = TxBody (AlonzoEra StandardCrypto) +keyhash) + | let keyhashes :: Set (KeyHash 'Witness (Crypto (AlonzoEra StandardCrypto))) +keyhashes = TxBody (AlonzoEra StandardCrypto) -> AlonzoBody (AlonzoEra StandardCrypto) => Set (KeyHash 'Witness (Crypto (AlonzoEra StandardCrypto))) forall era. TxBody era -> AlonzoBody era => Set (KeyHash 'Witness (Crypto era)) Alonzo.reqSignerHashes TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -body - , KeyHash 'Witness StandardCrypto -keyhash <- Set (KeyHash 'Witness StandardCrypto) +body + , KeyHash 'Witness StandardCrypto +keyhash <- Set (KeyHash 'Witness StandardCrypto) -> [KeyHash 'Witness StandardCrypto] forall a. Set a -> [a] Set.toList Set (KeyHash 'Witness (Crypto (AlonzoEra StandardCrypto))) Set (KeyHash 'Witness StandardCrypto) -keyhashes ] +keyhashes ] -fromLedgerTxWithdrawals - :: ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) - -> TxWithdrawals ViewTx era +fromLedgerTxWithdrawals + :: ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) + -> TxWithdrawals ViewTx era fromLedgerTxWithdrawals :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxWithdrawals ViewTx era -fromLedgerTxWithdrawals ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body = +fromLedgerTxWithdrawals ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley | Map (RewardAcnt StandardCrypto) Coin -> Bool @@ -4539,7 +4539,7 @@ forall crypto. Wdrl crypto -> Map (RewardAcnt crypto) Coin Shelley.unWdrl Wdrl (Crypto (ShelleyEra StandardCrypto)) Wdrl StandardCrypto -withdrawals) -> TxWithdrawals ViewTx era +withdrawals) -> TxWithdrawals ViewTx era forall build era. TxWithdrawals build era TxWithdrawalsNone | Bool @@ -4571,10 +4571,10 @@ BuildTxWith ViewTx (Witness WitCtxStake era))] fromShelleyWithdrawal Wdrl (Crypto (ShelleyEra StandardCrypto)) Wdrl StandardCrypto -withdrawals +withdrawals where - withdrawals :: Wdrl (Crypto (ShelleyEra StandardCrypto)) -withdrawals = TxBody (ShelleyEra StandardCrypto) + withdrawals :: Wdrl (Crypto (ShelleyEra StandardCrypto)) +withdrawals = TxBody (ShelleyEra StandardCrypto) -> (Era (ShelleyEra StandardCrypto), FromCBOR (PParamsDelta (ShelleyEra StandardCrypto)), TransTxBody ToCBOR (ShelleyEra StandardCrypto)) => @@ -4586,7 +4586,7 @@ Wdrl (Crypto era) Shelley._wdrls TxBody (ShelleyLedgerEra era) TxBody (ShelleyEra StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraAllegra @@ -4596,7 +4596,7 @@ forall crypto. Wdrl crypto -> Map (RewardAcnt crypto) Coin Shelley.unWdrl Wdrl (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) Wdrl StandardCrypto -withdrawals) -> TxWithdrawals ViewTx era +withdrawals) -> TxWithdrawals ViewTx era forall build era. TxWithdrawals build era TxWithdrawalsNone | Bool @@ -4628,15 +4628,15 @@ BuildTxWith ViewTx (Witness WitCtxStake era))] fromShelleyWithdrawal Wdrl (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) Wdrl StandardCrypto -withdrawals +withdrawals where - withdrawals :: Wdrl (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) -withdrawals = TxBody (ShelleyMAEra 'Allegra StandardCrypto) + withdrawals :: Wdrl (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) +withdrawals = TxBody (ShelleyMAEra 'Allegra StandardCrypto) -> Wdrl (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) forall era. TxBody era -> Wdrl (Crypto era) Allegra.wdrls' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Allegra StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraMary @@ -4646,7 +4646,7 @@ forall crypto. Wdrl crypto -> Map (RewardAcnt crypto) Coin Shelley.unWdrl Wdrl (Crypto (ShelleyMAEra 'Mary StandardCrypto)) Wdrl StandardCrypto -withdrawals) -> TxWithdrawals ViewTx era +withdrawals) -> TxWithdrawals ViewTx era forall build era. TxWithdrawals build era TxWithdrawalsNone | Bool @@ -4677,15 +4677,15 @@ BuildTxWith ViewTx (Witness WitCtxStake era))] fromShelleyWithdrawal Wdrl (Crypto (ShelleyMAEra 'Mary StandardCrypto)) Wdrl StandardCrypto -withdrawals +withdrawals where - withdrawals :: Wdrl (Crypto (ShelleyMAEra 'Mary StandardCrypto)) -withdrawals = TxBody (ShelleyMAEra 'Mary StandardCrypto) + withdrawals :: Wdrl (Crypto (ShelleyMAEra 'Mary StandardCrypto)) +withdrawals = TxBody (ShelleyMAEra 'Mary StandardCrypto) -> Wdrl (Crypto (ShelleyMAEra 'Mary StandardCrypto)) forall era. TxBody era -> Wdrl (Crypto era) Mary.wdrls' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraAlonzo @@ -4695,7 +4695,7 @@ forall crypto. Wdrl crypto -> Map (RewardAcnt crypto) Coin Shelley.unWdrl Wdrl (Crypto (AlonzoEra StandardCrypto)) Wdrl StandardCrypto -withdrawals) -> TxWithdrawals ViewTx era +withdrawals) -> TxWithdrawals ViewTx era forall build era. TxWithdrawals build era TxWithdrawalsNone | Bool @@ -4726,34 +4726,34 @@ BuildTxWith ViewTx (Witness WitCtxStake era))] fromShelleyWithdrawal Wdrl (Crypto (AlonzoEra StandardCrypto)) Wdrl StandardCrypto -withdrawals +withdrawals where - withdrawals :: Wdrl (Crypto (AlonzoEra StandardCrypto)) -withdrawals = TxBody (AlonzoEra StandardCrypto) + withdrawals :: Wdrl (Crypto (AlonzoEra StandardCrypto)) +withdrawals = TxBody (AlonzoEra StandardCrypto) -> Wdrl (Crypto (AlonzoEra StandardCrypto)) forall era. TxBody era -> Wdrl (Crypto era) Alonzo.wdrls' TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -body +body -fromLedgerTxCertificates - :: ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) - -> TxCertificates ViewTx era +fromLedgerTxCertificates + :: ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) + -> TxCertificates ViewTx era fromLedgerTxCertificates :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxCertificates ViewTx era -fromLedgerTxCertificates ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body = +fromLedgerTxCertificates ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley | StrictSeq (DCert StandardCrypto) -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null StrictSeq (DCert (Crypto (ShelleyEra StandardCrypto))) StrictSeq (DCert StandardCrypto) -certificates -> TxCertificates ViewTx era +certificates -> TxCertificates ViewTx era forall build era. TxCertificates build era TxCertificatesNone | Bool @@ -4783,14 +4783,14 @@ forall (t :: * -> *) a. Foldable t => t a -> [a] toList StrictSeq (DCert (Crypto (ShelleyEra StandardCrypto))) StrictSeq (DCert StandardCrypto) -certificates) +certificates) BuildTxWith ViewTx (Map StakeCredential (Witness WitCtxStake ShelleyEra)) forall a. BuildTxWith ViewTx a ViewTx where - certificates :: StrictSeq (DCert (Crypto (ShelleyEra StandardCrypto))) -certificates = TxBody (ShelleyEra StandardCrypto) + certificates :: StrictSeq (DCert (Crypto (ShelleyEra StandardCrypto))) +certificates = TxBody (ShelleyEra StandardCrypto) -> (Era (ShelleyEra StandardCrypto), FromCBOR (PParamsDelta (ShelleyEra StandardCrypto)), TransTxBody ToCBOR (ShelleyEra StandardCrypto)) => @@ -4802,7 +4802,7 @@ StrictSeq (DCert (Crypto era)) Shelley._certs TxBody (ShelleyLedgerEra era) TxBody (ShelleyEra StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraAllegra @@ -4810,7 +4810,7 @@ forall (t :: * -> *) a. Foldable t => t a -> Bool null StrictSeq (DCert (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) StrictSeq (DCert StandardCrypto) -certificates -> TxCertificates ViewTx era +certificates -> TxCertificates ViewTx era forall build era. TxCertificates build era TxCertificatesNone | Bool @@ -4840,20 +4840,20 @@ forall (t :: * -> *) a. Foldable t => t a -> [a] toList StrictSeq (DCert (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) StrictSeq (DCert StandardCrypto) -certificates) +certificates) BuildTxWith ViewTx (Map StakeCredential (Witness WitCtxStake AllegraEra)) forall a. BuildTxWith ViewTx a ViewTx where - certificates :: StrictSeq (DCert (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) -certificates = TxBody (ShelleyMAEra 'Allegra StandardCrypto) + certificates :: StrictSeq (DCert (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) +certificates = TxBody (ShelleyMAEra 'Allegra StandardCrypto) -> StrictSeq (DCert (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) forall era. TxBody era -> StrictSeq (DCert (Crypto era)) Allegra.certs' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Allegra StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraMary @@ -4861,7 +4861,7 @@ forall (t :: * -> *) a. Foldable t => t a -> Bool null StrictSeq (DCert (Crypto (ShelleyMAEra 'Mary StandardCrypto))) StrictSeq (DCert StandardCrypto) -certificates -> TxCertificates ViewTx era +certificates -> TxCertificates ViewTx era forall build era. TxCertificates build era TxCertificatesNone | Bool @@ -4891,19 +4891,19 @@ forall (t :: * -> *) a. Foldable t => t a -> [a] toList StrictSeq (DCert (Crypto (ShelleyMAEra 'Mary StandardCrypto))) StrictSeq (DCert StandardCrypto) -certificates) +certificates) BuildTxWith ViewTx (Map StakeCredential (Witness WitCtxStake MaryEra)) forall a. BuildTxWith ViewTx a ViewTx where - certificates :: StrictSeq (DCert (Crypto (ShelleyMAEra 'Mary StandardCrypto))) -certificates = TxBody (ShelleyMAEra 'Mary StandardCrypto) + certificates :: StrictSeq (DCert (Crypto (ShelleyMAEra 'Mary StandardCrypto))) +certificates = TxBody (ShelleyMAEra 'Mary StandardCrypto) -> StrictSeq (DCert (Crypto (ShelleyMAEra 'Mary StandardCrypto))) forall era. TxBody era -> StrictSeq (DCert (Crypto era)) Mary.certs' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraAlonzo @@ -4911,7 +4911,7 @@ forall (t :: * -> *) a. Foldable t => t a -> Bool null StrictSeq (DCert (Crypto (AlonzoEra StandardCrypto))) StrictSeq (DCert StandardCrypto) -certificates -> TxCertificates ViewTx era +certificates -> TxCertificates ViewTx era forall build era. TxCertificates build era TxCertificatesNone | Bool @@ -4941,31 +4941,31 @@ forall (t :: * -> *) a. Foldable t => t a -> [a] toList StrictSeq (DCert (Crypto (AlonzoEra StandardCrypto))) StrictSeq (DCert StandardCrypto) -certificates) +certificates) BuildTxWith ViewTx (Map StakeCredential (Witness WitCtxStake AlonzoEra)) forall a. BuildTxWith ViewTx a ViewTx where - certificates :: StrictSeq (DCert (Crypto (AlonzoEra StandardCrypto))) -certificates = TxBody (AlonzoEra StandardCrypto) + certificates :: StrictSeq (DCert (Crypto (AlonzoEra StandardCrypto))) +certificates = TxBody (AlonzoEra StandardCrypto) -> StrictSeq (DCert (Crypto (AlonzoEra StandardCrypto))) forall era. TxBody era -> StrictSeq (DCert (Crypto era)) Alonzo.certs' TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -body +body -fromLedgerTxUpdateProposal - :: ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) - -> TxUpdateProposal era +fromLedgerTxUpdateProposal + :: ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) + -> TxUpdateProposal era fromLedgerTxUpdateProposal :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxUpdateProposal era -fromLedgerTxUpdateProposal ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body = +fromLedgerTxUpdateProposal ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> case TxBody (ShelleyEra StandardCrypto) @@ -4980,13 +4980,13 @@ StrictMaybe (Update era) Shelley._txUpdate TxBody (ShelleyLedgerEra era) TxBody (ShelleyEra StandardCrypto) -body of +body of StrictMaybe (Update (ShelleyEra StandardCrypto)) SNothing -> TxUpdateProposal era forall era. TxUpdateProposal era TxUpdateProposalNone - SJust Update (ShelleyEra StandardCrypto) -p -> + SJust Update (ShelleyEra StandardCrypto) +p -> UpdateProposalSupportedInEra ShelleyEra -> UpdateProposal -> TxUpdateProposal ShelleyEra forall era. @@ -5001,8 +5001,8 @@ Crypto ledgerera ~ StandardCrypto) => ShelleyBasedEra era -> Update ledgerera -> UpdateProposal fromLedgerUpdate ShelleyBasedEra era -era Update (ShelleyEra StandardCrypto) -p) +era Update (ShelleyEra StandardCrypto) +p) ShelleyBasedEra era ShelleyBasedEraAllegra -> @@ -5011,13 +5011,13 @@ forall era. TxBody era -> StrictMaybe (Update era) Allegra.update' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Allegra StandardCrypto) -body of +body of StrictMaybe (Update (ShelleyMAEra 'Allegra StandardCrypto)) SNothing -> TxUpdateProposal era forall era. TxUpdateProposal era TxUpdateProposalNone - SJust Update (ShelleyMAEra 'Allegra StandardCrypto) -p -> + SJust Update (ShelleyMAEra 'Allegra StandardCrypto) +p -> UpdateProposalSupportedInEra AllegraEra -> UpdateProposal -> TxUpdateProposal AllegraEra forall era. @@ -5032,8 +5032,8 @@ Crypto ledgerera ~ StandardCrypto) => ShelleyBasedEra era -> Update ledgerera -> UpdateProposal fromLedgerUpdate ShelleyBasedEra era -era Update (ShelleyMAEra 'Allegra StandardCrypto) -p) +era Update (ShelleyMAEra 'Allegra StandardCrypto) +p) ShelleyBasedEra era ShelleyBasedEraMary -> @@ -5042,13 +5042,13 @@ forall era. TxBody era -> StrictMaybe (Update era) Mary.update' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -body of +body of StrictMaybe (Update (ShelleyMAEra 'Mary StandardCrypto)) SNothing -> TxUpdateProposal era forall era. TxUpdateProposal era TxUpdateProposalNone - SJust Update (ShelleyMAEra 'Mary StandardCrypto) -p -> + SJust Update (ShelleyMAEra 'Mary StandardCrypto) +p -> UpdateProposalSupportedInEra MaryEra -> UpdateProposal -> TxUpdateProposal MaryEra forall era. @@ -5063,8 +5063,8 @@ Crypto ledgerera ~ StandardCrypto) => ShelleyBasedEra era -> Update ledgerera -> UpdateProposal fromLedgerUpdate ShelleyBasedEra era -era Update (ShelleyMAEra 'Mary StandardCrypto) -p) +era Update (ShelleyMAEra 'Mary StandardCrypto) +p) ShelleyBasedEra era ShelleyBasedEraAlonzo -> @@ -5073,13 +5073,13 @@ forall era. TxBody era -> StrictMaybe (Update era) Alonzo.update' TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -body of +body of StrictMaybe (Update (AlonzoEra StandardCrypto)) SNothing -> TxUpdateProposal era forall era. TxUpdateProposal era TxUpdateProposalNone - SJust Update (AlonzoEra StandardCrypto) -p -> + SJust Update (AlonzoEra StandardCrypto) +p -> UpdateProposalSupportedInEra AlonzoEra -> UpdateProposal -> TxUpdateProposal AlonzoEra forall era. @@ -5094,21 +5094,21 @@ Crypto ledgerera ~ StandardCrypto) => ShelleyBasedEra era -> Update ledgerera -> UpdateProposal fromLedgerUpdate ShelleyBasedEra era -era Update (AlonzoEra StandardCrypto) -p) +era Update (AlonzoEra StandardCrypto) +p) -fromLedgerTxMintValue - :: ShelleyBasedEra era - -> Ledger.TxBody (ShelleyLedgerEra era) - -> TxMintValue ViewTx era +fromLedgerTxMintValue + :: ShelleyBasedEra era + -> Ledger.TxBody (ShelleyLedgerEra era) + -> TxMintValue ViewTx era fromLedgerTxMintValue :: ShelleyBasedEra era -> TxBody (ShelleyLedgerEra era) -> TxMintValue ViewTx era -fromLedgerTxMintValue ShelleyBasedEra era -era TxBody (ShelleyLedgerEra era) -body = +fromLedgerTxMintValue ShelleyBasedEra era +era TxBody (ShelleyLedgerEra era) +body = case ShelleyBasedEra era -era of +era of ShelleyBasedEra era ShelleyBasedEraShelley -> TxMintValue ViewTx era forall build era. TxMintValue build era @@ -5123,7 +5123,7 @@ forall t. Val t => t -> Bool isZero Value (ShelleyMAEra 'Mary StandardCrypto) Value StandardCrypto -mint -> TxMintValue ViewTx era +mint -> TxMintValue ViewTx era forall build era. TxMintValue build era TxMintNone | Bool @@ -5142,18 +5142,18 @@ (Value StandardCrypto -> Value fromMaryValue Value (ShelleyMAEra 'Mary StandardCrypto) Value StandardCrypto -mint) BuildTxWith +mint) BuildTxWith ViewTx (Map PolicyId (ScriptWitness WitCtxMint MaryEra)) forall a. BuildTxWith ViewTx a ViewTx where - mint :: Value (ShelleyMAEra 'Mary StandardCrypto) -mint = TxBody (ShelleyMAEra 'Mary StandardCrypto) + mint :: Value (ShelleyMAEra 'Mary StandardCrypto) +mint = TxBody (ShelleyMAEra 'Mary StandardCrypto) -> Value (ShelleyMAEra 'Mary StandardCrypto) forall era. TxBody era -> Value era Mary.mint' TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -body +body ShelleyBasedEra era ShelleyBasedEraAlonzo @@ -5161,7 +5161,7 @@ forall t. Val t => t -> Bool isZero Value (Crypto (AlonzoEra StandardCrypto)) Value StandardCrypto -mint -> TxMintValue ViewTx era +mint -> TxMintValue ViewTx era forall build era. TxMintValue build era TxMintNone | Bool @@ -5180,39 +5180,39 @@ (Value StandardCrypto -> Value fromMaryValue Value (Crypto (AlonzoEra StandardCrypto)) Value StandardCrypto -mint) BuildTxWith +mint) BuildTxWith ViewTx (Map PolicyId (ScriptWitness WitCtxMint AlonzoEra)) forall a. BuildTxWith ViewTx a ViewTx where - mint :: Value (Crypto (AlonzoEra StandardCrypto)) -mint = TxBody (AlonzoEra StandardCrypto) + mint :: Value (Crypto (AlonzoEra StandardCrypto)) +mint = TxBody (AlonzoEra StandardCrypto) -> Value (Crypto (AlonzoEra StandardCrypto)) forall era. TxBody era -> Value (Crypto era) Alonzo.mint' TxBody (ShelleyLedgerEra era) TxBody (AlonzoEra StandardCrypto) -body +body makeByronTransactionBody :: TxBodyContent BuildTx ByronEra -> Either (TxBodyError ByronEra) (TxBody ByronEra) makeByronTransactionBody :: TxBodyContent BuildTx ByronEra -> Either (TxBodyError ByronEra) (TxBody ByronEra) -makeByronTransactionBody TxBodyContent { TxIns BuildTx ByronEra +makeByronTransactionBody TxBodyContent { TxIns BuildTx ByronEra txIns :: TxIns BuildTx ByronEra txIns :: forall build era. TxBodyContent build era -> TxIns build era -txIns, [TxOut ByronEra] +txIns, [TxOut ByronEra] txOuts :: [TxOut ByronEra] txOuts :: forall build era. TxBodyContent build era -> [TxOut era] -txOuts } = do - NonEmpty (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra)) -ins' <- TxIns BuildTx ByronEra +txOuts } = do + NonEmpty (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra)) +ins' <- TxIns BuildTx ByronEra -> Maybe (NonEmpty (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra))) forall a. [a] -> Maybe (NonEmpty a) NonEmpty.nonEmpty TxIns BuildTx ByronEra -txIns Maybe +txIns Maybe (NonEmpty (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra))) -> TxBodyError ByronEra @@ -5224,8 +5224,8 @@ ?! TxBodyError ByronEra forall era. TxBodyError era TxBodyEmptyTxIns - let ins'' :: NonEmpty TxIn -ins'' = ((TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra)) -> TxIn) + let ins'' :: NonEmpty TxIn +ins'' = ((TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra)) -> TxIn) -> NonEmpty (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra)) -> NonEmpty TxIn @@ -5240,38 +5240,38 @@ . (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra)) -> TxIn forall a b. (a, b) -> a fst) NonEmpty (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra)) -ins' +ins' - NonEmpty (TxOut ByronEra) -outs' <- [TxOut ByronEra] -> Maybe (NonEmpty (TxOut ByronEra)) + NonEmpty (TxOut ByronEra) +outs' <- [TxOut ByronEra] -> Maybe (NonEmpty (TxOut ByronEra)) forall a. [a] -> Maybe (NonEmpty a) NonEmpty.nonEmpty [TxOut ByronEra] -txOuts Maybe (NonEmpty (TxOut ByronEra)) +txOuts Maybe (NonEmpty (TxOut ByronEra)) -> TxBodyError ByronEra -> Either (TxBodyError ByronEra) (NonEmpty (TxOut ByronEra)) forall a e. Maybe a -> e -> Either e a ?! TxBodyError ByronEra forall era. TxBodyError era TxBodyEmptyTxOuts - NonEmpty TxOut -outs'' <- (TxOut ByronEra -> Either (TxBodyError ByronEra) TxOut) + NonEmpty TxOut +outs'' <- (TxOut ByronEra -> Either (TxBodyError ByronEra) TxOut) -> NonEmpty (TxOut ByronEra) -> Either (TxBodyError ByronEra) (NonEmpty TxOut) forall (t :: * -> *) (f :: * -> *) a b. (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse - (\TxOut ByronEra -out -> TxOut ByronEra -> Maybe TxOut + (\TxOut ByronEra +out -> TxOut ByronEra -> Maybe TxOut toByronTxOut TxOut ByronEra -out Maybe TxOut +out Maybe TxOut -> TxBodyError ByronEra -> Either (TxBodyError ByronEra) TxOut forall a e. Maybe a -> e -> Either e a ?! TxOut ByronEra -> TxBodyError ByronEra -classifyRangeError TxOut ByronEra -out) +classifyRangeError TxOut ByronEra +out) NonEmpty (TxOut ByronEra) -outs' +outs' TxBody ByronEra -> Either (TxBodyError ByronEra) (TxBody ByronEra) forall (m :: * -> *) a. Monad m => a -> m a return (TxBody ByronEra @@ -5296,65 +5296,65 @@ Annotated (NonEmpty TxIn -> NonEmpty TxOut -> TxAttributes -> Tx Byron.UnsafeTx NonEmpty TxIn -ins'' NonEmpty TxOut -outs'' (() -> TxAttributes +ins'' NonEmpty TxOut +outs'' (() -> TxAttributes forall h. h -> Attributes h Byron.mkAttributes ())) () where - classifyRangeError :: TxOut ByronEra -> TxBodyError ByronEra - classifyRangeError :: TxOut ByronEra -> TxBodyError ByronEra -classifyRangeError - txout :: TxOut ByronEra -txout@(TxOut (AddressInEra AddressTypeInEra addrtype ByronEra + classifyRangeError :: TxOut ByronEra -> TxBodyError ByronEra + classifyRangeError :: TxOut ByronEra -> TxBodyError ByronEra +classifyRangeError + txout :: TxOut ByronEra +txout@(TxOut (AddressInEra AddressTypeInEra addrtype ByronEra ByronAddressInAnyEra ByronAddress{}) (TxOutAdaOnly OnlyAdaSupportedInEra ByronEra -AdaOnlyInByronEra Lovelace -value) TxOutDatumHash ByronEra +AdaOnlyInByronEra Lovelace +value) TxOutDatumHash ByronEra _) | Lovelace -value Lovelace -> Lovelace -> Bool +value Lovelace -> Lovelace -> Bool forall a. Ord a => a -> a -> Bool < Lovelace 0 = Quantity -> TxOut ByronEra -> TxBodyError ByronEra forall era. Quantity -> TxOut era -> TxBodyError era TxBodyOutputNegative (Lovelace -> Quantity lovelaceToQuantity Lovelace -value) TxOut ByronEra -txout +value) TxOut ByronEra +txout | Bool otherwise = Quantity -> TxOut ByronEra -> TxBodyError ByronEra forall era. Quantity -> TxOut era -> TxBodyError era TxBodyOutputOverflow (Lovelace -> Quantity lovelaceToQuantity Lovelace -value) TxOut ByronEra -txout +value) TxOut ByronEra +txout - classifyRangeError + classifyRangeError (TxOut (AddressInEra AddressTypeInEra addrtype ByronEra ByronAddressInAnyEra (ByronAddress Address _)) - (TxOutValue MultiAssetSupportedInEra ByronEra -era Value + (TxOutValue MultiAssetSupportedInEra ByronEra +era Value _) TxOutDatumHash ByronEra _) = case MultiAssetSupportedInEra ByronEra -era of {} +era of {} - classifyRangeError - (TxOut (AddressInEra (ShelleyAddressInEra ShelleyBasedEra ByronEra -era) ShelleyAddress{}) + classifyRangeError + (TxOut (AddressInEra (ShelleyAddressInEra ShelleyBasedEra ByronEra +era) ShelleyAddress{}) TxOutValue ByronEra _ TxOutDatumHash ByronEra _) = case ShelleyBasedEra ByronEra -era of {} +era of {} getByronTxBodyContent :: Annotated Byron.Tx ByteString -> TxBodyContent ViewTx ByronEra getByronTxBodyContent :: Annotated Tx ByteString -> TxBodyContent ViewTx ByronEra -getByronTxBodyContent (Annotated Byron.UnsafeTx{NonEmpty TxIn +getByronTxBodyContent (Annotated Byron.UnsafeTx{NonEmpty TxIn txInputs :: Tx -> NonEmpty TxIn txInputs :: NonEmpty TxIn -txInputs, NonEmpty TxOut +txInputs, NonEmpty TxOut txOutputs :: Tx -> NonEmpty TxOut txOutputs :: NonEmpty TxOut txOutputs} ByteString @@ -5379,14 +5379,14 @@ txIns :: TxIns ViewTx ByronEra txIns = [ (TxIn -> TxIn fromByronTxIn TxIn -input, BuildTxWith ViewTx (Witness WitCtxTxIn ByronEra) +input, BuildTxWith ViewTx (Witness WitCtxTxIn ByronEra) forall a. BuildTxWith ViewTx a ViewTx) - | TxIn -input <- NonEmpty TxIn -> [TxIn] + | TxIn +input <- NonEmpty TxIn -> [TxIn] forall (t :: * -> *) a. Foldable t => t a -> [a] toList NonEmpty TxIn -txInputs], +txInputs], txInsCollateral :: TxInsCollateral ByronEra txInsCollateral = TxInsCollateral ByronEra forall era. TxInsCollateral era @@ -5398,7 +5398,7 @@ <$> NonEmpty TxOut -> [TxOut] forall (t :: * -> *) a. Foldable t => t a -> [a] toList NonEmpty TxOut -txOutputs, +txOutputs, txFee :: TxFee ByronEra txFee = TxFeesImplicitInEra ByronEra -> TxFee ByronEra forall era. TxFeesImplicitInEra era -> TxFee era @@ -5453,53 +5453,53 @@ TxMintNone } -makeShelleyTransactionBody :: ShelleyBasedEra era - -> TxBodyContent BuildTx era - -> Either (TxBodyError era) (TxBody era) +makeShelleyTransactionBody :: ShelleyBasedEra era + -> TxBodyContent BuildTx era + -> Either (TxBodyError era) (TxBody era) makeShelleyTransactionBody :: ShelleyBasedEra era -> TxBodyContent BuildTx era -> Either (TxBodyError era) (TxBody era) -makeShelleyTransactionBody era :: ShelleyBasedEra era -era@ShelleyBasedEra era +makeShelleyTransactionBody era :: ShelleyBasedEra era +era@ShelleyBasedEra era ShelleyBasedEraShelley - txbodycontent :: TxBodyContent BuildTx era -txbodycontent@TxBodyContent { - TxIns BuildTx era + txbodycontent :: TxBodyContent BuildTx era +txbodycontent@TxBodyContent { + TxIns BuildTx era txIns :: TxIns BuildTx era txIns :: forall build era. TxBodyContent build era -> TxIns build era -txIns, - [TxOut era] +txIns, + [TxOut era] txOuts :: [TxOut era] txOuts :: forall build era. TxBodyContent build era -> [TxOut era] -txOuts, - TxFee era +txOuts, + TxFee era txFee :: TxFee era txFee :: forall build era. TxBodyContent build era -> TxFee era -txFee, +txFee, txValidityRange :: forall build era. TxBodyContent build era -> (TxValidityLowerBound era, TxValidityUpperBound era) txValidityRange = (TxValidityLowerBound era -_, TxValidityUpperBound era -upperBound), - TxMetadataInEra era +_, TxValidityUpperBound era +upperBound), + TxMetadataInEra era txMetadata :: TxMetadataInEra era txMetadata :: forall build era. TxBodyContent build era -> TxMetadataInEra era -txMetadata, - TxWithdrawals BuildTx era +txMetadata, + TxWithdrawals BuildTx era txWithdrawals :: TxWithdrawals BuildTx era txWithdrawals :: forall build era. TxBodyContent build era -> TxWithdrawals build era -txWithdrawals, - TxCertificates BuildTx era +txWithdrawals, + TxCertificates BuildTx era txCertificates :: TxCertificates BuildTx era txCertificates :: forall build era. TxBodyContent build era -> TxCertificates build era -txCertificates, - TxUpdateProposal era +txCertificates, + TxUpdateProposal era txUpdateProposal :: TxUpdateProposal era txUpdateProposal :: forall build era. TxBodyContent build era -> TxUpdateProposal era -txUpdateProposal +txUpdateProposal } = do Bool -> Maybe () @@ -5508,7 +5508,7 @@ not (TxIns BuildTx era -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null TxIns BuildTx era -txIns)) Maybe () -> TxBodyError era -> Either (TxBodyError era) () +txIns)) Maybe () -> TxBodyError era -> Either (TxBodyError era) () forall a e. Maybe a -> e -> Either e a ?! TxBodyError era forall era. TxBodyError era @@ -5521,7 +5521,7 @@ [ do Bool -> Maybe () forall (f :: * -> *). Alternative f => Bool -> f () guard (Lovelace -v Lovelace -> Lovelace -> Bool +v Lovelace -> Lovelace -> Bool forall a. Ord a => a -> a -> Bool >= Lovelace 0) Maybe () -> TxBodyError era -> Either (TxBodyError era) () @@ -5530,44 +5530,44 @@ forall era. Quantity -> TxOut era -> TxBodyError era TxBodyOutputNegative (Lovelace -> Quantity lovelaceToQuantity Lovelace -v) TxOut era -txout +v) TxOut era +txout Bool -> Maybe () forall (f :: * -> *). Alternative f => Bool -> f () guard (Lovelace -v Lovelace -> Lovelace -> Bool +v Lovelace -> Lovelace -> Bool forall a. Ord a => a -> a -> Bool <= Lovelace -maxTxOut) Maybe () -> TxBodyError era -> Either (TxBodyError era) () +maxTxOut) Maybe () -> TxBodyError era -> Either (TxBodyError era) () forall a e. Maybe a -> e -> Either e a ?! Quantity -> TxOut era -> TxBodyError era forall era. Quantity -> TxOut era -> TxBodyError era TxBodyOutputOverflow (Lovelace -> Quantity lovelaceToQuantity Lovelace -v) TxOut era -txout - | let maxTxOut :: Lovelace -maxTxOut = Word64 -> Lovelace +v) TxOut era +txout + | let maxTxOut :: Lovelace +maxTxOut = Word64 -> Lovelace forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) :: Lovelace - , txout :: TxOut era -txout@(TxOut AddressInEra era + , txout :: TxOut era +txout@(TxOut AddressInEra era _ (TxOutAdaOnly OnlyAdaSupportedInEra era -AdaOnlyInShelleyEra Lovelace -v) TxOutDatumHash era +AdaOnlyInShelleyEra Lovelace +v) TxOutDatumHash era _) <- [TxOut era] -txOuts ] +txOuts ] case TxMetadataInEra era -txMetadata of +txMetadata of TxMetadataInEra era TxMetadataNone -> () -> Either (TxBodyError era) () forall (m :: * -> *) a. Monad m => a -> m a return () TxMetadataInEra TxMetadataSupportedInEra era -_ TxMetadata -m -> ([(Word64, TxMetadataRangeError)] -> TxBodyError era) +_ TxMetadata +m -> ([(Word64, TxMetadataRangeError)] -> TxBodyError era) -> Either [(Word64, TxMetadataRangeError)] () -> Either (TxBodyError era) () forall (p :: * -> * -> *) a b c. @@ -5577,7 +5577,7 @@ forall era. [(Word64, TxMetadataRangeError)] -> TxBodyError era TxBodyMetadataError (TxMetadata -> Either [(Word64, TxMetadataRangeError)] () validateTxMetadata TxMetadata -m) +m) TxBody era -> Either (TxBodyError era) (TxBody era) forall (m :: * -> *) a. Monad m => a -> m a @@ -5599,7 +5599,7 @@ -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> TxBody era ShelleyTxBody ShelleyBasedEra era -era +era (Set (TxIn (Crypto (ShelleyEra StandardCrypto))) -> StrictSeq (TxOut (ShelleyEra StandardCrypto)) -> StrictSeq (DCert (Crypto (ShelleyEra StandardCrypto))) @@ -5637,7 +5637,7 @@ . (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) -> TxIn forall a b. (a, b) -> a fst) TxIns BuildTx era -txIns)) +txIns)) ([TxOut (ShelleyEra StandardCrypto)] -> StrictSeq (TxOut (ShelleyEra StandardCrypto)) forall a. [a] -> StrictSeq a @@ -5650,16 +5650,16 @@ ShelleyBased ledgerera) => TxOut era -> TxOut ledgerera toShelleyTxOut [TxOut era] -txOuts)) +txOuts)) (case TxCertificates BuildTx era -txCertificates of +txCertificates of TxCertificates BuildTx era TxCertificatesNone -> StrictSeq (DCert (Crypto (ShelleyEra StandardCrypto))) forall a. StrictSeq a Seq.empty TxCertificates CertificatesSupportedInEra era -_ [Certificate] -cs BuildTxWith BuildTx (Map StakeCredential (Witness WitCtxStake era)) +_ [Certificate] +cs BuildTxWith BuildTx (Map StakeCredential (Witness WitCtxStake era)) _ -> [DCert StandardCrypto] -> StrictSeq (DCert StandardCrypto) forall a. [a] -> StrictSeq a Seq.fromList ((Certificate -> DCert StandardCrypto) @@ -5667,9 +5667,9 @@ forall a b. (a -> b) -> [a] -> [b] map Certificate -> DCert StandardCrypto toShelleyCertificate [Certificate] -cs)) +cs)) (case TxWithdrawals BuildTx era -txWithdrawals of +txWithdrawals of TxWithdrawals BuildTx era TxWithdrawalsNone -> Map (RewardAcnt StandardCrypto) Coin -> Wdrl StandardCrypto forall crypto. Map (RewardAcnt crypto) Coin -> Wdrl crypto @@ -5677,43 +5677,43 @@ forall k a. Map k a Map.empty TxWithdrawals WithdrawalsSupportedInEra era -_ [(StakeAddress, Lovelace, +_ [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -ws -> [(StakeAddress, Lovelace, +ws -> [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -> Wdrl StandardCrypto forall a. [(StakeAddress, Lovelace, a)] -> Wdrl StandardCrypto toShelleyWithdrawal [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -ws) +ws) (case TxFee era -txFee of - TxFeeImplicit TxFeesImplicitInEra era -era' -> case TxFeesImplicitInEra era -era' of {} +txFee of + TxFeeImplicit TxFeesImplicitInEra era +era' -> case TxFeesImplicitInEra era +era' of {} TxFeeExplicit TxFeesExplicitInEra era -_ Lovelace -fee -> Lovelace -> Coin +_ Lovelace +fee -> Lovelace -> Coin toShelleyLovelace Lovelace -fee) +fee) (case TxValidityUpperBound era -upperBound of - TxValidityNoUpperBound ValidityNoUpperBoundSupportedInEra era -era' -> case ValidityNoUpperBoundSupportedInEra era -era' of {} +upperBound of + TxValidityNoUpperBound ValidityNoUpperBoundSupportedInEra era +era' -> case ValidityNoUpperBoundSupportedInEra era +era' of {} TxValidityUpperBound ValidityUpperBoundSupportedInEra era -_ SlotNo -ttl -> SlotNo -ttl) +_ SlotNo +ttl -> SlotNo +ttl) (case TxUpdateProposal era -txUpdateProposal of +txUpdateProposal of TxUpdateProposal era TxUpdateProposalNone -> StrictMaybe (Update (ShelleyEra StandardCrypto)) forall a. StrictMaybe a SNothing TxUpdateProposal UpdateProposalSupportedInEra era -_ UpdateProposal -p -> Update (ShelleyEra StandardCrypto) +_ UpdateProposal +p -> Update (ShelleyEra StandardCrypto) -> StrictMaybe (Update (ShelleyEra StandardCrypto)) forall a. a -> StrictMaybe a SJust (ShelleyBasedEra era @@ -5723,8 +5723,8 @@ Crypto ledgerera ~ StandardCrypto) => ShelleyBasedEra era -> UpdateProposal -> Update ledgerera toLedgerUpdate ShelleyBasedEra era -era UpdateProposal -p)) +era UpdateProposal +p)) (Maybe (AuxiliaryDataHash StandardCrypto) -> StrictMaybe (AuxiliaryDataHash StandardCrypto) forall a. Maybe a -> StrictMaybe a @@ -5742,43 +5742,43 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe (AuxiliaryData (ShelleyEra StandardCrypto)) Maybe (Metadata (ShelleyEra StandardCrypto)) -txAuxData))) +txAuxData))) [Script (ShelleyEra StandardCrypto)] [Script (ShelleyLedgerEra era)] -scripts +scripts TxBodyScriptData era forall era. TxBodyScriptData era TxBodyNoScriptData Maybe (AuxiliaryData (ShelleyEra StandardCrypto)) Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txAuxData +txAuxData where - scripts :: [Ledger.Script StandardShelley] - scripts :: [Script (ShelleyEra StandardCrypto)] -scripts = + scripts :: [Ledger.Script StandardShelley] + scripts :: [Script (ShelleyEra StandardCrypto)] +scripts = [ ScriptInEra era -> Script (ShelleyLedgerEra era) forall era. ScriptInEra era -> Script (ShelleyLedgerEra era) toShelleyScript (ScriptWitness witctx era -> ScriptInEra era forall witctx era. ScriptWitness witctx era -> ScriptInEra era scriptWitnessScript ScriptWitness witctx era -scriptwitness) +scriptwitness) | (RdmrPtr -_, AnyScriptWitness ScriptWitness witctx era -scriptwitness) +_, AnyScriptWitness ScriptWitness witctx era +scriptwitness) <- TxBodyContent BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] forall era. TxBodyContent BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] collectTxBodyScriptWitnesses TxBodyContent BuildTx era -txbodycontent +txbodycontent ] - txAuxData :: Maybe (Ledger.AuxiliaryData StandardShelley) - txAuxData :: Maybe (AuxiliaryData (ShelleyEra StandardCrypto)) -txAuxData + txAuxData :: Maybe (Ledger.AuxiliaryData StandardShelley) + txAuxData :: Maybe (AuxiliaryData (ShelleyEra StandardCrypto)) +txAuxData | Map Word64 TxMetadataValue -> Bool forall k a. Map k a -> Bool Map.null Map Word64 TxMetadataValue -ms = Maybe (AuxiliaryData (ShelleyEra StandardCrypto)) +ms = Maybe (AuxiliaryData (ShelleyEra StandardCrypto)) forall a. Maybe a Nothing | Bool @@ -5788,65 +5788,65 @@ Just (Map Word64 TxMetadataValue -> AuxiliaryData (ShelleyEra StandardCrypto) toShelleyAuxiliaryData Map Word64 TxMetadataValue -ms) +ms) where - ms :: Map Word64 TxMetadataValue -ms = case TxMetadataInEra era -txMetadata of + ms :: Map Word64 TxMetadataValue +ms = case TxMetadataInEra era +txMetadata of TxMetadataInEra era TxMetadataNone -> Map Word64 TxMetadataValue forall k a. Map k a Map.empty TxMetadataInEra TxMetadataSupportedInEra era -_ (TxMetadata Map Word64 TxMetadataValue -ms') -> Map Word64 TxMetadataValue -ms' +_ (TxMetadata Map Word64 TxMetadataValue +ms') -> Map Word64 TxMetadataValue +ms' -makeShelleyTransactionBody era :: ShelleyBasedEra era -era@ShelleyBasedEra era +makeShelleyTransactionBody era :: ShelleyBasedEra era +era@ShelleyBasedEra era ShelleyBasedEraAllegra - txbodycontent :: TxBodyContent BuildTx era -txbodycontent@TxBodyContent { - TxIns BuildTx era + txbodycontent :: TxBodyContent BuildTx era +txbodycontent@TxBodyContent { + TxIns BuildTx era txIns :: TxIns BuildTx era txIns :: forall build era. TxBodyContent build era -> TxIns build era -txIns, - [TxOut era] +txIns, + [TxOut era] txOuts :: [TxOut era] txOuts :: forall build era. TxBodyContent build era -> [TxOut era] -txOuts, - TxFee era +txOuts, + TxFee era txFee :: TxFee era txFee :: forall build era. TxBodyContent build era -> TxFee era -txFee, +txFee, txValidityRange :: forall build era. TxBodyContent build era -> (TxValidityLowerBound era, TxValidityUpperBound era) -txValidityRange = (TxValidityLowerBound era -lowerBound, TxValidityUpperBound era -upperBound), - TxMetadataInEra era +txValidityRange = (TxValidityLowerBound era +lowerBound, TxValidityUpperBound era +upperBound), + TxMetadataInEra era txMetadata :: TxMetadataInEra era txMetadata :: forall build era. TxBodyContent build era -> TxMetadataInEra era -txMetadata, - TxAuxScripts era +txMetadata, + TxAuxScripts era txAuxScripts :: TxAuxScripts era txAuxScripts :: forall build era. TxBodyContent build era -> TxAuxScripts era -txAuxScripts, - TxWithdrawals BuildTx era +txAuxScripts, + TxWithdrawals BuildTx era txWithdrawals :: TxWithdrawals BuildTx era txWithdrawals :: forall build era. TxBodyContent build era -> TxWithdrawals build era -txWithdrawals, - TxCertificates BuildTx era +txWithdrawals, + TxCertificates BuildTx era txCertificates :: TxCertificates BuildTx era txCertificates :: forall build era. TxBodyContent build era -> TxCertificates build era -txCertificates, - TxUpdateProposal era +txCertificates, + TxUpdateProposal era txUpdateProposal :: TxUpdateProposal era txUpdateProposal :: forall build era. TxBodyContent build era -> TxUpdateProposal era -txUpdateProposal +txUpdateProposal } = do Bool -> Maybe () @@ -5855,7 +5855,7 @@ not (TxIns BuildTx era -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null TxIns BuildTx era -txIns)) Maybe () -> TxBodyError era -> Either (TxBodyError era) () +txIns)) Maybe () -> TxBodyError era -> Either (TxBodyError era) () forall a e. Maybe a -> e -> Either e a ?! TxBodyError era forall era. TxBodyError era @@ -5868,7 +5868,7 @@ [ do Bool -> Maybe () forall (f :: * -> *). Alternative f => Bool -> f () guard (Lovelace -v Lovelace -> Lovelace -> Bool +v Lovelace -> Lovelace -> Bool forall a. Ord a => a -> a -> Bool >= Lovelace 0) Maybe () -> TxBodyError era -> Either (TxBodyError era) () @@ -5877,47 +5877,47 @@ forall era. Quantity -> TxOut era -> TxBodyError era TxBodyOutputNegative (Lovelace -> Quantity lovelaceToQuantity Lovelace -v) TxOut era -txout +v) TxOut era +txout Bool -> Maybe () forall (f :: * -> *). Alternative f => Bool -> f () guard (Lovelace -v Lovelace -> Lovelace -> Bool +v Lovelace -> Lovelace -> Bool forall a. Ord a => a -> a -> Bool <= Lovelace -maxTxOut) Maybe () -> TxBodyError era -> Either (TxBodyError era) () +maxTxOut) Maybe () -> TxBodyError era -> Either (TxBodyError era) () forall a e. Maybe a -> e -> Either e a ?! Quantity -> TxOut era -> TxBodyError era forall era. Quantity -> TxOut era -> TxBodyError era TxBodyOutputOverflow (Lovelace -> Quantity lovelaceToQuantity Lovelace -v) TxOut era -txout - | let maxTxOut :: Lovelace -maxTxOut = Word64 -> Lovelace +v) TxOut era +txout + | let maxTxOut :: Lovelace +maxTxOut = Word64 -> Lovelace forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) :: Lovelace - , txout :: TxOut era -txout@(TxOut AddressInEra era + , txout :: TxOut era +txout@(TxOut AddressInEra era _ (TxOutAdaOnly OnlyAdaSupportedInEra era -AdaOnlyInAllegraEra Lovelace -v) TxOutDatumHash era +AdaOnlyInAllegraEra Lovelace +v) TxOutDatumHash era _) <- [TxOut era] -txOuts +txOuts ] case TxMetadataInEra era -txMetadata of +txMetadata of TxMetadataInEra era TxMetadataNone -> () -> Either (TxBodyError era) () forall (m :: * -> *) a. Monad m => a -> m a return () TxMetadataInEra TxMetadataSupportedInEra era -_ TxMetadata -m -> TxMetadata -> Either [(Word64, TxMetadataRangeError)] () +_ TxMetadata +m -> TxMetadata -> Either [(Word64, TxMetadataRangeError)] () validateTxMetadata TxMetadata -m Either [(Word64, TxMetadataRangeError)] () +m Either [(Word64, TxMetadataRangeError)] () -> ([(Word64, TxMetadataRangeError)] -> TxBodyError era) -> Either (TxBodyError era) () forall e a e'. Either e a -> (e -> e') -> Either e' a @@ -5945,7 +5945,7 @@ -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> TxBody era ShelleyTxBody ShelleyBasedEra era -era +era (Set (TxIn (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) -> StrictSeq (TxOut (ShelleyMAEra 'Allegra StandardCrypto)) -> StrictSeq @@ -5986,7 +5986,7 @@ . (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) -> TxIn forall a b. (a, b) -> a fst) TxIns BuildTx era -txIns)) +txIns)) ([TxOut (ShelleyMAEra 'Allegra StandardCrypto)] -> StrictSeq (TxOut (ShelleyMAEra 'Allegra StandardCrypto)) forall a. [a] -> StrictSeq a @@ -5999,16 +5999,16 @@ ShelleyBased ledgerera) => TxOut era -> TxOut ledgerera toShelleyTxOut [TxOut era] -txOuts)) +txOuts)) (case TxCertificates BuildTx era -txCertificates of +txCertificates of TxCertificates BuildTx era TxCertificatesNone -> StrictSeq (DCert (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) forall a. StrictSeq a Seq.empty TxCertificates CertificatesSupportedInEra era -_ [Certificate] -cs BuildTxWith BuildTx (Map StakeCredential (Witness WitCtxStake era)) +_ [Certificate] +cs BuildTxWith BuildTx (Map StakeCredential (Witness WitCtxStake era)) _ -> [DCert StandardCrypto] -> StrictSeq (DCert StandardCrypto) forall a. [a] -> StrictSeq a Seq.fromList ((Certificate -> DCert StandardCrypto) @@ -6016,9 +6016,9 @@ forall a b. (a -> b) -> [a] -> [b] map Certificate -> DCert StandardCrypto toShelleyCertificate [Certificate] -cs)) +cs)) (case TxWithdrawals BuildTx era -txWithdrawals of +txWithdrawals of TxWithdrawals BuildTx era TxWithdrawalsNone -> Map (RewardAcnt StandardCrypto) Coin -> Wdrl StandardCrypto forall crypto. Map (RewardAcnt crypto) Coin -> Wdrl crypto @@ -6026,63 +6026,63 @@ forall k a. Map k a Map.empty TxWithdrawals WithdrawalsSupportedInEra era -_ [(StakeAddress, Lovelace, +_ [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -ws -> [(StakeAddress, Lovelace, +ws -> [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -> Wdrl StandardCrypto forall a. [(StakeAddress, Lovelace, a)] -> Wdrl StandardCrypto toShelleyWithdrawal [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -ws) +ws) (case TxFee era -txFee of - TxFeeImplicit TxFeesImplicitInEra era -era' -> case TxFeesImplicitInEra era -era' of {} +txFee of + TxFeeImplicit TxFeesImplicitInEra era +era' -> case TxFeesImplicitInEra era +era' of {} TxFeeExplicit TxFeesExplicitInEra era -_ Lovelace -fee -> Lovelace -> Coin +_ Lovelace +fee -> Lovelace -> Coin toShelleyLovelace Lovelace -fee) +fee) (ValidityInterval :: StrictMaybe SlotNo -> StrictMaybe SlotNo -> ValidityInterval Allegra.ValidityInterval { invalidBefore :: StrictMaybe SlotNo invalidBefore = case TxValidityLowerBound era -lowerBound of +lowerBound of TxValidityLowerBound era TxValidityNoLowerBound -> StrictMaybe SlotNo forall a. StrictMaybe a SNothing TxValidityLowerBound ValidityLowerBoundSupportedInEra era -_ SlotNo -s -> SlotNo -> StrictMaybe SlotNo +_ SlotNo +s -> SlotNo -> StrictMaybe SlotNo forall a. a -> StrictMaybe a SJust SlotNo -s, +s, invalidHereafter :: StrictMaybe SlotNo invalidHereafter = case TxValidityUpperBound era -upperBound of +upperBound of TxValidityNoUpperBound ValidityNoUpperBoundSupportedInEra era _ -> StrictMaybe SlotNo forall a. StrictMaybe a SNothing TxValidityUpperBound ValidityUpperBoundSupportedInEra era -_ SlotNo -s -> SlotNo -> StrictMaybe SlotNo +_ SlotNo +s -> SlotNo -> StrictMaybe SlotNo forall a. a -> StrictMaybe a SJust SlotNo -s +s }) (case TxUpdateProposal era -txUpdateProposal of +txUpdateProposal of TxUpdateProposal era TxUpdateProposalNone -> StrictMaybe (Update (ShelleyMAEra 'Allegra StandardCrypto)) forall a. StrictMaybe a SNothing TxUpdateProposal UpdateProposalSupportedInEra era -_ UpdateProposal -p -> Update (ShelleyMAEra 'Allegra StandardCrypto) +_ UpdateProposal +p -> Update (ShelleyMAEra 'Allegra StandardCrypto) -> StrictMaybe (Update (ShelleyMAEra 'Allegra StandardCrypto)) forall a. a -> StrictMaybe a SJust (ShelleyBasedEra era @@ -6092,8 +6092,8 @@ Crypto ledgerera ~ StandardCrypto) => ShelleyBasedEra era -> UpdateProposal -> Update ledgerera toLedgerUpdate ShelleyBasedEra era -era UpdateProposal -p)) +era UpdateProposal +p)) (Maybe (AuxiliaryDataHash StandardCrypto) -> StrictMaybe (AuxiliaryDataHash StandardCrypto) forall a. Maybe a -> StrictMaybe a @@ -6112,50 +6112,50 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) -txAuxData)) +txAuxData)) Value (ShelleyMAEra 'Allegra StandardCrypto) forall a. Monoid a => a mempty) -- No minting in Allegra, only Mary [Script (ShelleyMAEra 'Allegra StandardCrypto)] [Script (ShelleyLedgerEra era)] -scripts +scripts TxBodyScriptData era forall era. TxBodyScriptData era TxBodyNoScriptData Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txAuxData +txAuxData where - scripts :: [Ledger.Script StandardAllegra] - scripts :: [Script (ShelleyMAEra 'Allegra StandardCrypto)] -scripts = + scripts :: [Ledger.Script StandardAllegra] + scripts :: [Script (ShelleyMAEra 'Allegra StandardCrypto)] +scripts = [ ScriptInEra era -> Script (ShelleyLedgerEra era) forall era. ScriptInEra era -> Script (ShelleyLedgerEra era) toShelleyScript (ScriptWitness witctx era -> ScriptInEra era forall witctx era. ScriptWitness witctx era -> ScriptInEra era scriptWitnessScript ScriptWitness witctx era -scriptwitness) +scriptwitness) | (RdmrPtr -_, AnyScriptWitness ScriptWitness witctx era -scriptwitness) +_, AnyScriptWitness ScriptWitness witctx era +scriptwitness) <- TxBodyContent BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] forall era. TxBodyContent BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] collectTxBodyScriptWitnesses TxBodyContent BuildTx era -txbodycontent +txbodycontent ] - txAuxData :: Maybe (Ledger.AuxiliaryData StandardAllegra) - txAuxData :: Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) -txAuxData + txAuxData :: Maybe (Ledger.AuxiliaryData StandardAllegra) + txAuxData :: Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) +txAuxData | Map Word64 TxMetadataValue -> Bool forall k a. Map k a -> Bool Map.null Map Word64 TxMetadataValue -ms +ms , [ScriptInEra era] -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null [ScriptInEra era] -ss = Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) +ss = Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) forall a. Maybe a Nothing | Bool @@ -6172,79 +6172,79 @@ Map Word64 TxMetadataValue -> [ScriptInEra era] -> AuxiliaryData ledgerera toAllegraAuxiliaryData Map Word64 TxMetadataValue -ms [ScriptInEra era] -ss) +ms [ScriptInEra era] +ss) where - ms :: Map Word64 TxMetadataValue -ms = case TxMetadataInEra era -txMetadata of + ms :: Map Word64 TxMetadataValue +ms = case TxMetadataInEra era +txMetadata of TxMetadataInEra era TxMetadataNone -> Map Word64 TxMetadataValue forall k a. Map k a Map.empty TxMetadataInEra TxMetadataSupportedInEra era -_ (TxMetadata Map Word64 TxMetadataValue -ms') -> Map Word64 TxMetadataValue -ms' - ss :: [ScriptInEra era] -ss = case TxAuxScripts era -txAuxScripts of +_ (TxMetadata Map Word64 TxMetadataValue +ms') -> Map Word64 TxMetadataValue +ms' + ss :: [ScriptInEra era] +ss = case TxAuxScripts era +txAuxScripts of TxAuxScripts era TxAuxScriptsNone -> [] TxAuxScripts AuxScriptsSupportedInEra era -_ [ScriptInEra era] -ss' -> [ScriptInEra era] -ss' +_ [ScriptInEra era] +ss' -> [ScriptInEra era] +ss' -makeShelleyTransactionBody era :: ShelleyBasedEra era -era@ShelleyBasedEra era +makeShelleyTransactionBody era :: ShelleyBasedEra era +era@ShelleyBasedEra era ShelleyBasedEraMary - txbodycontent :: TxBodyContent BuildTx era -txbodycontent@TxBodyContent { - TxIns BuildTx era + txbodycontent :: TxBodyContent BuildTx era +txbodycontent@TxBodyContent { + TxIns BuildTx era txIns :: TxIns BuildTx era txIns :: forall build era. TxBodyContent build era -> TxIns build era -txIns, - [TxOut era] +txIns, + [TxOut era] txOuts :: [TxOut era] txOuts :: forall build era. TxBodyContent build era -> [TxOut era] -txOuts, - TxFee era +txOuts, + TxFee era txFee :: TxFee era txFee :: forall build era. TxBodyContent build era -> TxFee era -txFee, +txFee, txValidityRange :: forall build era. TxBodyContent build era -> (TxValidityLowerBound era, TxValidityUpperBound era) -txValidityRange = (TxValidityLowerBound era -lowerBound, TxValidityUpperBound era -upperBound), - TxMetadataInEra era +txValidityRange = (TxValidityLowerBound era +lowerBound, TxValidityUpperBound era +upperBound), + TxMetadataInEra era txMetadata :: TxMetadataInEra era txMetadata :: forall build era. TxBodyContent build era -> TxMetadataInEra era -txMetadata, - TxAuxScripts era +txMetadata, + TxAuxScripts era txAuxScripts :: TxAuxScripts era txAuxScripts :: forall build era. TxBodyContent build era -> TxAuxScripts era -txAuxScripts, - TxWithdrawals BuildTx era +txAuxScripts, + TxWithdrawals BuildTx era txWithdrawals :: TxWithdrawals BuildTx era txWithdrawals :: forall build era. TxBodyContent build era -> TxWithdrawals build era -txWithdrawals, - TxCertificates BuildTx era +txWithdrawals, + TxCertificates BuildTx era txCertificates :: TxCertificates BuildTx era txCertificates :: forall build era. TxBodyContent build era -> TxCertificates build era -txCertificates, - TxUpdateProposal era +txCertificates, + TxUpdateProposal era txUpdateProposal :: TxUpdateProposal era txUpdateProposal :: forall build era. TxBodyContent build era -> TxUpdateProposal era -txUpdateProposal, - TxMintValue BuildTx era +txUpdateProposal, + TxMintValue BuildTx era txMintValue :: TxMintValue BuildTx era txMintValue :: forall build era. TxBodyContent build era -> TxMintValue build era -txMintValue +txMintValue } = do Bool -> Maybe () @@ -6253,7 +6253,7 @@ not (TxIns BuildTx era -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null TxIns BuildTx era -txIns)) Maybe () -> TxBodyError era -> Either (TxBodyError era) () +txIns)) Maybe () -> TxBodyError era -> Either (TxBodyError era) () forall a e. Maybe a -> e -> Either e a ?! TxBodyError era forall era. TxBodyError era @@ -6264,80 +6264,80 @@ t (m a) -> m () sequence_ [ do Either (TxBodyError era) () -allPositive +allPositive Either (TxBodyError era) () -allWithinMaxBound - | let maxTxOut :: Quantity -maxTxOut = Word64 -> Quantity +allWithinMaxBound + | let maxTxOut :: Quantity +maxTxOut = Word64 -> Quantity forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) :: Quantity - , txout :: TxOut era -txout@(TxOut AddressInEra era + , txout :: TxOut era +txout@(TxOut AddressInEra era _ (TxOutValue MultiAssetSupportedInEra era -MultiAssetInMaryEra Value -v) TxOutDatumHash era +MultiAssetInMaryEra Value +v) TxOutDatumHash era _) <- [TxOut era] -txOuts - , let allPositive :: Either (TxBodyError era) () -allPositive = case [ Quantity -q | (AssetId -_,Quantity -q) <- Value -> [(AssetId, Quantity)] +txOuts + , let allPositive :: Either (TxBodyError era) () +allPositive = case [ Quantity +q | (AssetId +_,Quantity +q) <- Value -> [(AssetId, Quantity)] valueToList Value -v, Quantity -q Quantity -> Quantity -> Bool +v, Quantity +q Quantity -> Quantity -> Bool forall a. Ord a => a -> a -> Bool < Quantity 0 ] of [] -> () -> Either (TxBodyError era) () forall a b. b -> Either a b Right () - Quantity -q:[Quantity] + Quantity +q:[Quantity] _ -> TxBodyError era -> Either (TxBodyError era) () forall a b. a -> Either a b Left (Quantity -> TxOut era -> TxBodyError era forall era. Quantity -> TxOut era -> TxBodyError era TxBodyOutputNegative Quantity -q TxOut era -txout) - allWithinMaxBound :: Either (TxBodyError era) () -allWithinMaxBound = case [ Quantity -q | (AssetId -_,Quantity -q) <- Value -> [(AssetId, Quantity)] +q TxOut era +txout) + allWithinMaxBound :: Either (TxBodyError era) () +allWithinMaxBound = case [ Quantity +q | (AssetId +_,Quantity +q) <- Value -> [(AssetId, Quantity)] valueToList Value -v, Quantity -q Quantity -> Quantity -> Bool +v, Quantity +q Quantity -> Quantity -> Bool forall a. Ord a => a -> a -> Bool > Quantity -maxTxOut ] of +maxTxOut ] of [] -> () -> Either (TxBodyError era) () forall a b. b -> Either a b Right () - Quantity -q:[Quantity] + Quantity +q:[Quantity] _ -> TxBodyError era -> Either (TxBodyError era) () forall a b. a -> Either a b Left (Quantity -> TxOut era -> TxBodyError era forall era. Quantity -> TxOut era -> TxBodyError era TxBodyOutputOverflow Quantity -q TxOut era -txout) +q TxOut era +txout) ] case TxMetadataInEra era -txMetadata of +txMetadata of TxMetadataInEra era TxMetadataNone -> () -> Either (TxBodyError era) () forall (m :: * -> *) a. Monad m => a -> m a return () TxMetadataInEra TxMetadataSupportedInEra era -_ TxMetadata -m -> TxMetadata -> Either [(Word64, TxMetadataRangeError)] () +_ TxMetadata +m -> TxMetadata -> Either [(Word64, TxMetadataRangeError)] () validateTxMetadata TxMetadata -m Either [(Word64, TxMetadataRangeError)] () +m Either [(Word64, TxMetadataRangeError)] () -> ([(Word64, TxMetadataRangeError)] -> TxBodyError era) -> Either (TxBodyError era) () forall e a e'. Either e a -> (e -> e') -> Either e' a @@ -6345,19 +6345,19 @@ forall era. [(Word64, TxMetadataRangeError)] -> TxBodyError era TxBodyMetadataError case TxMintValue BuildTx era -txMintValue of +txMintValue of TxMintValue BuildTx era TxMintNone -> () -> Either (TxBodyError era) () forall (m :: * -> *) a. Monad m => a -> m a return () TxMintValue MultiAssetSupportedInEra era -_ Value -v BuildTxWith BuildTx (Map PolicyId (ScriptWitness WitCtxMint era)) +_ Value +v BuildTxWith BuildTx (Map PolicyId (ScriptWitness WitCtxMint era)) _ -> Bool -> Maybe () forall (f :: * -> *). Alternative f => Bool -> f () guard (Value -> Lovelace selectLovelace Value -v Lovelace -> Lovelace -> Bool +v Lovelace -> Lovelace -> Bool forall a. Eq a => a -> a -> Bool == Lovelace 0) Maybe () -> TxBodyError era -> Either (TxBodyError era) () @@ -6386,7 +6386,7 @@ -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> TxBody era ShelleyTxBody ShelleyBasedEra era -era +era (Set (TxIn (Crypto (ShelleyMAEra 'Mary StandardCrypto))) -> StrictSeq (TxOut (ShelleyMAEra 'Mary StandardCrypto)) -> StrictSeq (DCert (Crypto (ShelleyMAEra 'Mary StandardCrypto))) @@ -6426,7 +6426,7 @@ . (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) -> TxIn forall a b. (a, b) -> a fst) TxIns BuildTx era -txIns)) +txIns)) ([TxOut (ShelleyMAEra 'Mary StandardCrypto)] -> StrictSeq (TxOut (ShelleyMAEra 'Mary StandardCrypto)) forall a. [a] -> StrictSeq a @@ -6439,16 +6439,16 @@ ShelleyBased ledgerera) => TxOut era -> TxOut ledgerera toShelleyTxOut [TxOut era] -txOuts)) +txOuts)) (case TxCertificates BuildTx era -txCertificates of +txCertificates of TxCertificates BuildTx era TxCertificatesNone -> StrictSeq (DCert (Crypto (ShelleyMAEra 'Mary StandardCrypto))) forall a. StrictSeq a Seq.empty TxCertificates CertificatesSupportedInEra era -_ [Certificate] -cs BuildTxWith BuildTx (Map StakeCredential (Witness WitCtxStake era)) +_ [Certificate] +cs BuildTxWith BuildTx (Map StakeCredential (Witness WitCtxStake era)) _ -> [DCert StandardCrypto] -> StrictSeq (DCert StandardCrypto) forall a. [a] -> StrictSeq a Seq.fromList ((Certificate -> DCert StandardCrypto) @@ -6456,9 +6456,9 @@ forall a b. (a -> b) -> [a] -> [b] map Certificate -> DCert StandardCrypto toShelleyCertificate [Certificate] -cs)) +cs)) (case TxWithdrawals BuildTx era -txWithdrawals of +txWithdrawals of TxWithdrawals BuildTx era TxWithdrawalsNone -> Map (RewardAcnt StandardCrypto) Coin -> Wdrl StandardCrypto forall crypto. Map (RewardAcnt crypto) Coin -> Wdrl crypto @@ -6466,63 +6466,63 @@ forall k a. Map k a Map.empty TxWithdrawals WithdrawalsSupportedInEra era -_ [(StakeAddress, Lovelace, +_ [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -ws -> [(StakeAddress, Lovelace, +ws -> [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -> Wdrl StandardCrypto forall a. [(StakeAddress, Lovelace, a)] -> Wdrl StandardCrypto toShelleyWithdrawal [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -ws) +ws) (case TxFee era -txFee of - TxFeeImplicit TxFeesImplicitInEra era -era' -> case TxFeesImplicitInEra era -era' of {} +txFee of + TxFeeImplicit TxFeesImplicitInEra era +era' -> case TxFeesImplicitInEra era +era' of {} TxFeeExplicit TxFeesExplicitInEra era -_ Lovelace -fee -> Lovelace -> Coin +_ Lovelace +fee -> Lovelace -> Coin toShelleyLovelace Lovelace -fee) +fee) (ValidityInterval :: StrictMaybe SlotNo -> StrictMaybe SlotNo -> ValidityInterval Allegra.ValidityInterval { invalidBefore :: StrictMaybe SlotNo invalidBefore = case TxValidityLowerBound era -lowerBound of +lowerBound of TxValidityLowerBound era TxValidityNoLowerBound -> StrictMaybe SlotNo forall a. StrictMaybe a SNothing TxValidityLowerBound ValidityLowerBoundSupportedInEra era -_ SlotNo -s -> SlotNo -> StrictMaybe SlotNo +_ SlotNo +s -> SlotNo -> StrictMaybe SlotNo forall a. a -> StrictMaybe a SJust SlotNo -s, +s, invalidHereafter :: StrictMaybe SlotNo invalidHereafter = case TxValidityUpperBound era -upperBound of +upperBound of TxValidityNoUpperBound ValidityNoUpperBoundSupportedInEra era _ -> StrictMaybe SlotNo forall a. StrictMaybe a SNothing TxValidityUpperBound ValidityUpperBoundSupportedInEra era -_ SlotNo -s -> SlotNo -> StrictMaybe SlotNo +_ SlotNo +s -> SlotNo -> StrictMaybe SlotNo forall a. a -> StrictMaybe a SJust SlotNo -s +s }) (case TxUpdateProposal era -txUpdateProposal of +txUpdateProposal of TxUpdateProposal era TxUpdateProposalNone -> StrictMaybe (Update (ShelleyMAEra 'Mary StandardCrypto)) forall a. StrictMaybe a SNothing TxUpdateProposal UpdateProposalSupportedInEra era -_ UpdateProposal -p -> Update (ShelleyMAEra 'Mary StandardCrypto) +_ UpdateProposal +p -> Update (ShelleyMAEra 'Mary StandardCrypto) -> StrictMaybe (Update (ShelleyMAEra 'Mary StandardCrypto)) forall a. a -> StrictMaybe a SJust (ShelleyBasedEra era @@ -6532,8 +6532,8 @@ Crypto ledgerera ~ StandardCrypto) => ShelleyBasedEra era -> UpdateProposal -> Update ledgerera toLedgerUpdate ShelleyBasedEra era -era UpdateProposal -p)) +era UpdateProposal +p)) (Maybe (AuxiliaryDataHash StandardCrypto) -> StrictMaybe (AuxiliaryDataHash StandardCrypto) forall a. Maybe a -> StrictMaybe a @@ -6552,59 +6552,59 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) -txAuxData)) +txAuxData)) (case TxMintValue BuildTx era -txMintValue of +txMintValue of TxMintValue BuildTx era TxMintNone -> Value (ShelleyMAEra 'Mary StandardCrypto) forall a. Monoid a => a mempty TxMintValue MultiAssetSupportedInEra era -_ Value -v BuildTxWith BuildTx (Map PolicyId (ScriptWitness WitCtxMint era)) +_ Value +v BuildTxWith BuildTx (Map PolicyId (ScriptWitness WitCtxMint era)) _ -> Value -> Value StandardCrypto toMaryValue Value -v)) +v)) [Script (ShelleyMAEra 'Mary StandardCrypto)] [Script (ShelleyLedgerEra era)] -scripts +scripts TxBodyScriptData era forall era. TxBodyScriptData era TxBodyNoScriptData Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txAuxData +txAuxData where - scripts :: [Ledger.Script StandardMary] - scripts :: [Script (ShelleyMAEra 'Mary StandardCrypto)] -scripts = + scripts :: [Ledger.Script StandardMary] + scripts :: [Script (ShelleyMAEra 'Mary StandardCrypto)] +scripts = [ ScriptInEra era -> Script (ShelleyLedgerEra era) forall era. ScriptInEra era -> Script (ShelleyLedgerEra era) toShelleyScript (ScriptWitness witctx era -> ScriptInEra era forall witctx era. ScriptWitness witctx era -> ScriptInEra era scriptWitnessScript ScriptWitness witctx era -scriptwitness) +scriptwitness) | (RdmrPtr -_, AnyScriptWitness ScriptWitness witctx era -scriptwitness) +_, AnyScriptWitness ScriptWitness witctx era +scriptwitness) <- TxBodyContent BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] forall era. TxBodyContent BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] collectTxBodyScriptWitnesses TxBodyContent BuildTx era -txbodycontent +txbodycontent ] - txAuxData :: Maybe (Ledger.AuxiliaryData StandardMary) - txAuxData :: Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) -txAuxData + txAuxData :: Maybe (Ledger.AuxiliaryData StandardMary) + txAuxData :: Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) +txAuxData | Map Word64 TxMetadataValue -> Bool forall k a. Map k a -> Bool Map.null Map Word64 TxMetadataValue -ms +ms , [ScriptInEra era] -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null [ScriptInEra era] -ss = Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) +ss = Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) forall a. Maybe a Nothing | Bool @@ -6621,94 +6621,94 @@ Map Word64 TxMetadataValue -> [ScriptInEra era] -> AuxiliaryData ledgerera toAllegraAuxiliaryData Map Word64 TxMetadataValue -ms [ScriptInEra era] -ss) +ms [ScriptInEra era] +ss) where - ms :: Map Word64 TxMetadataValue -ms = case TxMetadataInEra era -txMetadata of + ms :: Map Word64 TxMetadataValue +ms = case TxMetadataInEra era +txMetadata of TxMetadataInEra era TxMetadataNone -> Map Word64 TxMetadataValue forall k a. Map k a Map.empty TxMetadataInEra TxMetadataSupportedInEra era -_ (TxMetadata Map Word64 TxMetadataValue -ms') -> Map Word64 TxMetadataValue -ms' - ss :: [ScriptInEra era] -ss = case TxAuxScripts era -txAuxScripts of +_ (TxMetadata Map Word64 TxMetadataValue +ms') -> Map Word64 TxMetadataValue +ms' + ss :: [ScriptInEra era] +ss = case TxAuxScripts era +txAuxScripts of TxAuxScripts era TxAuxScriptsNone -> [] TxAuxScripts AuxScriptsSupportedInEra era -_ [ScriptInEra era] -ss' -> [ScriptInEra era] -ss' +_ [ScriptInEra era] +ss' -> [ScriptInEra era] +ss' -makeShelleyTransactionBody era :: ShelleyBasedEra era -era@ShelleyBasedEra era +makeShelleyTransactionBody era :: ShelleyBasedEra era +era@ShelleyBasedEra era ShelleyBasedEraAlonzo - txbodycontent :: TxBodyContent BuildTx era -txbodycontent@TxBodyContent { - TxIns BuildTx era + txbodycontent :: TxBodyContent BuildTx era +txbodycontent@TxBodyContent { + TxIns BuildTx era txIns :: TxIns BuildTx era txIns :: forall build era. TxBodyContent build era -> TxIns build era -txIns, - TxInsCollateral era +txIns, + TxInsCollateral era txInsCollateral :: TxInsCollateral era txInsCollateral :: forall build era. TxBodyContent build era -> TxInsCollateral era -txInsCollateral, - [TxOut era] +txInsCollateral, + [TxOut era] txOuts :: [TxOut era] txOuts :: forall build era. TxBodyContent build era -> [TxOut era] -txOuts, - TxFee era +txOuts, + TxFee era txFee :: TxFee era txFee :: forall build era. TxBodyContent build era -> TxFee era -txFee, +txFee, txValidityRange :: forall build era. TxBodyContent build era -> (TxValidityLowerBound era, TxValidityUpperBound era) -txValidityRange = (TxValidityLowerBound era -lowerBound, TxValidityUpperBound era -upperBound), - TxMetadataInEra era +txValidityRange = (TxValidityLowerBound era +lowerBound, TxValidityUpperBound era +upperBound), + TxMetadataInEra era txMetadata :: TxMetadataInEra era txMetadata :: forall build era. TxBodyContent build era -> TxMetadataInEra era -txMetadata, - TxAuxScripts era +txMetadata, + TxAuxScripts era txAuxScripts :: TxAuxScripts era txAuxScripts :: forall build era. TxBodyContent build era -> TxAuxScripts era -txAuxScripts, - TxExtraKeyWitnesses era +txAuxScripts, + TxExtraKeyWitnesses era txExtraKeyWits :: TxExtraKeyWitnesses era txExtraKeyWits :: forall build era. TxBodyContent build era -> TxExtraKeyWitnesses era -txExtraKeyWits, - BuildTxWith BuildTx (Maybe ProtocolParameters) +txExtraKeyWits, + BuildTxWith BuildTx (Maybe ProtocolParameters) txProtocolParams :: BuildTxWith BuildTx (Maybe ProtocolParameters) txProtocolParams :: forall build era. TxBodyContent build era -> BuildTxWith build (Maybe ProtocolParameters) -txProtocolParams, - TxWithdrawals BuildTx era +txProtocolParams, + TxWithdrawals BuildTx era txWithdrawals :: TxWithdrawals BuildTx era txWithdrawals :: forall build era. TxBodyContent build era -> TxWithdrawals build era -txWithdrawals, - TxCertificates BuildTx era +txWithdrawals, + TxCertificates BuildTx era txCertificates :: TxCertificates BuildTx era txCertificates :: forall build era. TxBodyContent build era -> TxCertificates build era -txCertificates, - TxUpdateProposal era +txCertificates, + TxUpdateProposal era txUpdateProposal :: TxUpdateProposal era txUpdateProposal :: forall build era. TxBodyContent build era -> TxUpdateProposal era -txUpdateProposal, - TxMintValue BuildTx era +txUpdateProposal, + TxMintValue BuildTx era txMintValue :: TxMintValue BuildTx era txMintValue :: forall build era. TxBodyContent build era -> TxMintValue build era -txMintValue +txMintValue } = do Bool -> Maybe () @@ -6717,7 +6717,7 @@ not (TxIns BuildTx era -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null TxIns BuildTx era -txIns)) Maybe () -> TxBodyError era -> Either (TxBodyError era) () +txIns)) Maybe () -> TxBodyError era -> Either (TxBodyError era) () forall a e. Maybe a -> e -> Either e a ?! TxBodyError era forall era. TxBodyError era @@ -6728,80 +6728,80 @@ t (m a) -> m () sequence_ [ do Either (TxBodyError era) () -allPositive +allPositive Either (TxBodyError era) () -allWithinMaxBound - | let maxTxOut :: Quantity -maxTxOut = Word64 -> Quantity +allWithinMaxBound + | let maxTxOut :: Quantity +maxTxOut = Word64 -> Quantity forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) :: Quantity - , txout :: TxOut era -txout@(TxOut AddressInEra era + , txout :: TxOut era +txout@(TxOut AddressInEra era _ (TxOutValue MultiAssetSupportedInEra era -MultiAssetInAlonzoEra Value -v) TxOutDatumHash era +MultiAssetInAlonzoEra Value +v) TxOutDatumHash era _) <- [TxOut era] -txOuts - , let allPositive :: Either (TxBodyError era) () -allPositive = case [ Quantity -q | (AssetId -_,Quantity -q) <- Value -> [(AssetId, Quantity)] +txOuts + , let allPositive :: Either (TxBodyError era) () +allPositive = case [ Quantity +q | (AssetId +_,Quantity +q) <- Value -> [(AssetId, Quantity)] valueToList Value -v, Quantity -q Quantity -> Quantity -> Bool +v, Quantity +q Quantity -> Quantity -> Bool forall a. Ord a => a -> a -> Bool < Quantity 0 ] of [] -> () -> Either (TxBodyError era) () forall a b. b -> Either a b Right () - Quantity -q:[Quantity] + Quantity +q:[Quantity] _ -> TxBodyError era -> Either (TxBodyError era) () forall a b. a -> Either a b Left (Quantity -> TxOut era -> TxBodyError era forall era. Quantity -> TxOut era -> TxBodyError era TxBodyOutputNegative Quantity -q TxOut era -txout) - allWithinMaxBound :: Either (TxBodyError era) () -allWithinMaxBound = case [ Quantity -q | (AssetId -_,Quantity -q) <- Value -> [(AssetId, Quantity)] +q TxOut era +txout) + allWithinMaxBound :: Either (TxBodyError era) () +allWithinMaxBound = case [ Quantity +q | (AssetId +_,Quantity +q) <- Value -> [(AssetId, Quantity)] valueToList Value -v, Quantity -q Quantity -> Quantity -> Bool +v, Quantity +q Quantity -> Quantity -> Bool forall a. Ord a => a -> a -> Bool > Quantity -maxTxOut ] of +maxTxOut ] of [] -> () -> Either (TxBodyError era) () forall a b. b -> Either a b Right () - Quantity -q:[Quantity] + Quantity +q:[Quantity] _ -> TxBodyError era -> Either (TxBodyError era) () forall a b. a -> Either a b Left (Quantity -> TxOut era -> TxBodyError era forall era. Quantity -> TxOut era -> TxBodyError era TxBodyOutputOverflow Quantity -q TxOut era -txout) +q TxOut era +txout) ] case TxMetadataInEra era -txMetadata of +txMetadata of TxMetadataInEra era TxMetadataNone -> () -> Either (TxBodyError era) () forall (m :: * -> *) a. Monad m => a -> m a return () TxMetadataInEra TxMetadataSupportedInEra era -_ TxMetadata -m -> TxMetadata -> Either [(Word64, TxMetadataRangeError)] () +_ TxMetadata +m -> TxMetadata -> Either [(Word64, TxMetadataRangeError)] () validateTxMetadata TxMetadata -m Either [(Word64, TxMetadataRangeError)] () +m Either [(Word64, TxMetadataRangeError)] () -> ([(Word64, TxMetadataRangeError)] -> TxBodyError era) -> Either (TxBodyError era) () forall e a e'. Either e a -> (e -> e') -> Either e' a @@ -6809,19 +6809,19 @@ forall era. [(Word64, TxMetadataRangeError)] -> TxBodyError era TxBodyMetadataError case TxMintValue BuildTx era -txMintValue of +txMintValue of TxMintValue BuildTx era TxMintNone -> () -> Either (TxBodyError era) () forall (m :: * -> *) a. Monad m => a -> m a return () TxMintValue MultiAssetSupportedInEra era -_ Value -v BuildTxWith BuildTx (Map PolicyId (ScriptWitness WitCtxMint era)) +_ Value +v BuildTxWith BuildTx (Map PolicyId (ScriptWitness WitCtxMint era)) _ -> Bool -> Maybe () forall (f :: * -> *). Alternative f => Bool -> f () guard (Value -> Lovelace selectLovelace Value -v Lovelace -> Lovelace -> Bool +v Lovelace -> Lovelace -> Bool forall a. Eq a => a -> a -> Bool == Lovelace 0) Maybe () -> TxBodyError era -> Either (TxBodyError era) () @@ -6830,13 +6830,13 @@ forall era. TxBodyError era TxBodyMintAdaError case TxInsCollateral era -txInsCollateral of +txInsCollateral of TxInsCollateral era TxInsCollateralNone | Bool -> Bool not (Set Language -> Bool forall a. Set a -> Bool Set.null Set Language -languages) +languages) -> TxBodyError era -> Either (TxBodyError era) () forall a b. a -> Either a b Left TxBodyError era @@ -6847,13 +6847,13 @@ forall (m :: * -> *) a. Monad m => a -> m a return () case BuildTxWith BuildTx (Maybe ProtocolParameters) -txProtocolParams of +txProtocolParams of BuildTxWith Maybe ProtocolParameters Nothing | Bool -> Bool not (Set Language -> Bool forall a. Set a -> Bool Set.null Set Language -languages) +languages) -> TxBodyError era -> Either (TxBodyError era) () forall a b. a -> Either a b Left TxBodyError era @@ -6884,7 +6884,7 @@ -> Maybe (AuxiliaryData (ShelleyLedgerEra era)) -> TxBody era ShelleyTxBody ShelleyBasedEra era -era +era (Set (TxIn (Crypto (AlonzoEra StandardCrypto))) -> Set (TxIn (Crypto (AlonzoEra StandardCrypto))) -> StrictSeq (TxOut (AlonzoEra StandardCrypto)) @@ -6933,22 +6933,22 @@ . (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) -> TxIn forall a b. (a, b) -> a fst) TxIns BuildTx era -txIns)) +txIns)) (case TxInsCollateral era -txInsCollateral of +txInsCollateral of TxInsCollateral era TxInsCollateralNone -> Set (TxIn (Crypto (AlonzoEra StandardCrypto))) forall a. Set a Set.empty TxInsCollateral CollateralSupportedInEra era -_ [TxIn] -txins -> [TxIn StandardCrypto] -> Set (TxIn StandardCrypto) +_ [TxIn] +txins -> [TxIn StandardCrypto] -> Set (TxIn StandardCrypto) forall a. Ord a => [a] -> Set a Set.fromList ((TxIn -> TxIn StandardCrypto) -> [TxIn] -> [TxIn StandardCrypto] forall a b. (a -> b) -> [a] -> [b] map TxIn -> TxIn StandardCrypto toShelleyTxIn [TxIn] -txins)) +txins)) ([TxOut (AlonzoEra StandardCrypto)] -> StrictSeq (TxOut (AlonzoEra StandardCrypto)) forall a. [a] -> StrictSeq a @@ -6961,16 +6961,16 @@ ShelleyBased ledgerera) => TxOut era -> TxOut ledgerera toShelleyTxOut [TxOut era] -txOuts)) +txOuts)) (case TxCertificates BuildTx era -txCertificates of +txCertificates of TxCertificates BuildTx era TxCertificatesNone -> StrictSeq (DCert (Crypto (AlonzoEra StandardCrypto))) forall a. StrictSeq a Seq.empty TxCertificates CertificatesSupportedInEra era -_ [Certificate] -cs BuildTxWith BuildTx (Map StakeCredential (Witness WitCtxStake era)) +_ [Certificate] +cs BuildTxWith BuildTx (Map StakeCredential (Witness WitCtxStake era)) _ -> [DCert StandardCrypto] -> StrictSeq (DCert StandardCrypto) forall a. [a] -> StrictSeq a Seq.fromList ((Certificate -> DCert StandardCrypto) @@ -6978,9 +6978,9 @@ forall a b. (a -> b) -> [a] -> [b] map Certificate -> DCert StandardCrypto toShelleyCertificate [Certificate] -cs)) +cs)) (case TxWithdrawals BuildTx era -txWithdrawals of +txWithdrawals of TxWithdrawals BuildTx era TxWithdrawalsNone -> Map (RewardAcnt StandardCrypto) Coin -> Wdrl StandardCrypto forall crypto. Map (RewardAcnt crypto) Coin -> Wdrl crypto @@ -6988,63 +6988,63 @@ forall k a. Map k a Map.empty TxWithdrawals WithdrawalsSupportedInEra era -_ [(StakeAddress, Lovelace, +_ [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -ws -> [(StakeAddress, Lovelace, +ws -> [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -> Wdrl StandardCrypto forall a. [(StakeAddress, Lovelace, a)] -> Wdrl StandardCrypto toShelleyWithdrawal [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -ws) +ws) (case TxFee era -txFee of - TxFeeImplicit TxFeesImplicitInEra era -era' -> case TxFeesImplicitInEra era -era' of {} +txFee of + TxFeeImplicit TxFeesImplicitInEra era +era' -> case TxFeesImplicitInEra era +era' of {} TxFeeExplicit TxFeesExplicitInEra era -_ Lovelace -fee -> Lovelace -> Coin +_ Lovelace +fee -> Lovelace -> Coin toShelleyLovelace Lovelace -fee) +fee) (ValidityInterval :: StrictMaybe SlotNo -> StrictMaybe SlotNo -> ValidityInterval Allegra.ValidityInterval { invalidBefore :: StrictMaybe SlotNo invalidBefore = case TxValidityLowerBound era -lowerBound of +lowerBound of TxValidityLowerBound era TxValidityNoLowerBound -> StrictMaybe SlotNo forall a. StrictMaybe a SNothing TxValidityLowerBound ValidityLowerBoundSupportedInEra era -_ SlotNo -s -> SlotNo -> StrictMaybe SlotNo +_ SlotNo +s -> SlotNo -> StrictMaybe SlotNo forall a. a -> StrictMaybe a SJust SlotNo -s, +s, invalidHereafter :: StrictMaybe SlotNo invalidHereafter = case TxValidityUpperBound era -upperBound of +upperBound of TxValidityNoUpperBound ValidityNoUpperBoundSupportedInEra era _ -> StrictMaybe SlotNo forall a. StrictMaybe a SNothing TxValidityUpperBound ValidityUpperBoundSupportedInEra era -_ SlotNo -s -> SlotNo -> StrictMaybe SlotNo +_ SlotNo +s -> SlotNo -> StrictMaybe SlotNo forall a. a -> StrictMaybe a SJust SlotNo -s +s }) (case TxUpdateProposal era -txUpdateProposal of +txUpdateProposal of TxUpdateProposal era TxUpdateProposalNone -> StrictMaybe (Update (AlonzoEra StandardCrypto)) forall a. StrictMaybe a SNothing TxUpdateProposal UpdateProposalSupportedInEra era -_ UpdateProposal -p -> Update (AlonzoEra StandardCrypto) +_ UpdateProposal +p -> Update (AlonzoEra StandardCrypto) -> StrictMaybe (Update (AlonzoEra StandardCrypto)) forall a. a -> StrictMaybe a SJust (ShelleyBasedEra era @@ -7054,17 +7054,17 @@ Crypto ledgerera ~ StandardCrypto) => ShelleyBasedEra era -> UpdateProposal -> Update ledgerera toLedgerUpdate ShelleyBasedEra era -era UpdateProposal -p)) +era UpdateProposal +p)) (case TxExtraKeyWitnesses era -txExtraKeyWits of +txExtraKeyWits of TxExtraKeyWitnesses era TxExtraKeyWitnessesNone -> Set (KeyHash 'Witness (Crypto (AlonzoEra StandardCrypto))) forall a. Set a Set.empty TxExtraKeyWitnesses TxExtraKeyWitnessesSupportedInEra era -_ [Hash PaymentKey] -khs -> [KeyHash 'Witness StandardCrypto] +_ [Hash PaymentKey] +khs -> [KeyHash 'Witness StandardCrypto] -> Set (KeyHash 'Witness StandardCrypto) forall a. Ord a => [a] -> Set a Set.fromList @@ -7074,29 +7074,29 @@ HasKeyRole a => a r crypto -> a r' crypto Shelley.coerceKeyRole KeyHash 'Payment StandardCrypto -kh - | PaymentKeyHash kh <- [Hash PaymentKey] -khs ]) +kh + | PaymentKeyHash kh <- [Hash PaymentKey] +khs ]) (case TxMintValue BuildTx era -txMintValue of +txMintValue of TxMintValue BuildTx era TxMintNone -> Value (Crypto (AlonzoEra StandardCrypto)) forall a. Monoid a => a mempty TxMintValue MultiAssetSupportedInEra era -_ Value -v BuildTxWith BuildTx (Map PolicyId (ScriptWitness WitCtxMint era)) +_ Value +v BuildTxWith BuildTx (Map PolicyId (ScriptWitness WitCtxMint era)) _ -> Value -> Value StandardCrypto toMaryValue Value -v) +v) (case BuildTxWith BuildTx (Maybe ProtocolParameters) -txProtocolParams of +txProtocolParams of BuildTxWith Maybe ProtocolParameters Nothing -> StrictMaybe (WitnessPPDataHash (Crypto (AlonzoEra StandardCrypto))) forall a. StrictMaybe a SNothing - BuildTxWith (Just ProtocolParameters -pparams) -> + BuildTxWith (Just ProtocolParameters +pparams) -> PParams (AlonzoEra StandardCrypto) -> Set Language -> Redeemers (AlonzoEra StandardCrypto) @@ -7116,11 +7116,11 @@ -> ProtocolParameters -> PParams (ShelleyLedgerEra era) toLedgerPParams ShelleyBasedEra AlonzoEra ShelleyBasedEraAlonzo ProtocolParameters -pparams) +pparams) Set Language -languages +languages Redeemers (AlonzoEra StandardCrypto) -redeemers) +redeemers) (Maybe (AuxiliaryDataHash StandardCrypto) -> StrictMaybe (AuxiliaryDataHash StandardCrypto) forall a. Maybe a -> StrictMaybe a @@ -7138,13 +7138,13 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) -txAuxData)) +txAuxData)) StrictMaybe Network forall a. StrictMaybe a SNothing) -- TODO alonzo: support optional network id in TxBodyContent [Script (AlonzoEra StandardCrypto)] [Script (ShelleyLedgerEra era)] -scripts +scripts (ScriptDataSupportedInEra AlonzoEra -> [Data (ShelleyLedgerEra AlonzoEra)] -> Redeemers (ShelleyLedgerEra AlonzoEra) @@ -7157,60 +7157,60 @@ TxBodyScriptData ScriptDataSupportedInEra AlonzoEra ScriptDataInAlonzoEra [Data (AlonzoEra StandardCrypto)] [Data (ShelleyLedgerEra AlonzoEra)] -datums Redeemers (AlonzoEra StandardCrypto) +datums Redeemers (AlonzoEra StandardCrypto) Redeemers (ShelleyLedgerEra AlonzoEra) -redeemers) +redeemers) Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) Maybe (AuxiliaryData (ShelleyLedgerEra era)) -txAuxData +txAuxData -- TODO alonzo: support the supplementary script data where - witnesses :: [(Alonzo.RdmrPtr, AnyScriptWitness AlonzoEra)] - witnesses :: [(RdmrPtr, AnyScriptWitness AlonzoEra)] -witnesses = TxBodyContent BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] + witnesses :: [(Alonzo.RdmrPtr, AnyScriptWitness AlonzoEra)] + witnesses :: [(RdmrPtr, AnyScriptWitness AlonzoEra)] +witnesses = TxBodyContent BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] forall era. TxBodyContent BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] collectTxBodyScriptWitnesses TxBodyContent BuildTx era -txbodycontent +txbodycontent - scripts :: [Ledger.Script StandardAlonzo] - scripts :: [Script (AlonzoEra StandardCrypto)] -scripts = + scripts :: [Ledger.Script StandardAlonzo] + scripts :: [Script (AlonzoEra StandardCrypto)] +scripts = [ ScriptInEra AlonzoEra -> Script (ShelleyLedgerEra AlonzoEra) forall era. ScriptInEra era -> Script (ShelleyLedgerEra era) toShelleyScript (ScriptWitness witctx AlonzoEra -> ScriptInEra AlonzoEra forall witctx era. ScriptWitness witctx era -> ScriptInEra era scriptWitnessScript ScriptWitness witctx AlonzoEra -scriptwitness) +scriptwitness) | (RdmrPtr -_, AnyScriptWitness ScriptWitness witctx AlonzoEra -scriptwitness) <- [(RdmrPtr, AnyScriptWitness AlonzoEra)] -witnesses +_, AnyScriptWitness ScriptWitness witctx AlonzoEra +scriptwitness) <- [(RdmrPtr, AnyScriptWitness AlonzoEra)] +witnesses ] - datums :: [Alonzo.Data StandardAlonzo] - datums :: [Data (AlonzoEra StandardCrypto)] -datums = + datums :: [Alonzo.Data StandardAlonzo] + datums :: [Data (AlonzoEra StandardCrypto)] +datums = [ ScriptData -> Data (AlonzoEra StandardCrypto) forall ledgerera. ScriptData -> Data ledgerera toAlonzoData ScriptData -d +d | (RdmrPtr _, AnyScriptWitness (PlutusScriptWitness ScriptLanguageInEra lang AlonzoEra _ PlutusScriptVersion lang _ PlutusScript lang -_ (ScriptDatumForTxIn ScriptData -d) ScriptData +_ (ScriptDatumForTxIn ScriptData +d) ScriptData _ ExecutionUnits _)) <- [(RdmrPtr, AnyScriptWitness AlonzoEra)] -witnesses +witnesses ] - redeemers :: Alonzo.Redeemers StandardAlonzo - redeemers :: Redeemers (AlonzoEra StandardCrypto) -redeemers = + redeemers :: Alonzo.Redeemers StandardAlonzo + redeemers :: Redeemers (AlonzoEra StandardCrypto) +redeemers = Map RdmrPtr (Data (AlonzoEra StandardCrypto), ExUnits) -> Redeemers (AlonzoEra StandardCrypto) forall era. @@ -7227,27 +7227,27 @@ forall k a. Ord k => [(k, a)] -> Map k a Map.fromList [ (RdmrPtr -ptr, (ScriptData -> Data (AlonzoEra StandardCrypto) +ptr, (ScriptData -> Data (AlonzoEra StandardCrypto) forall ledgerera. ScriptData -> Data ledgerera toAlonzoData ScriptData -d, ExecutionUnits -> ExUnits +d, ExecutionUnits -> ExUnits toAlonzoExUnits ExecutionUnits -e)) - | (RdmrPtr -ptr, AnyScriptWitness +e)) + | (RdmrPtr +ptr, AnyScriptWitness (PlutusScriptWitness ScriptLanguageInEra lang AlonzoEra _ PlutusScriptVersion lang _ PlutusScript lang _ ScriptDatum witctx -_ ScriptData -d ExecutionUnits -e)) <- [(RdmrPtr, AnyScriptWitness AlonzoEra)] -witnesses +_ ScriptData +d ExecutionUnits +e)) <- [(RdmrPtr, AnyScriptWitness AlonzoEra)] +witnesses ] - languages :: Set Alonzo.Language - languages :: Set Language -languages = + languages :: Set Alonzo.Language + languages :: Set Language +languages = [Language] -> Set Language forall a. Ord a => [a] -> Set a Set.fromList @@ -7255,29 +7255,29 @@ toAlonzoLanguage (PlutusScriptVersion lang -> AnyPlutusScriptVersion forall lang. PlutusScriptVersion lang -> AnyPlutusScriptVersion AnyPlutusScriptVersion PlutusScriptVersion lang -v) +v) | (RdmrPtr _, AnyScriptWitness (PlutusScriptWitness ScriptLanguageInEra lang AlonzoEra -_ PlutusScriptVersion lang -v PlutusScript lang +_ PlutusScriptVersion lang +v PlutusScript lang _ ScriptDatum witctx _ ScriptData _ ExecutionUnits _)) <- [(RdmrPtr, AnyScriptWitness AlonzoEra)] -witnesses +witnesses ] - txAuxData :: Maybe (Ledger.AuxiliaryData StandardAlonzo) - txAuxData :: Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) -txAuxData + txAuxData :: Maybe (Ledger.AuxiliaryData StandardAlonzo) + txAuxData :: Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) +txAuxData | Map Word64 TxMetadataValue -> Bool forall k a. Map k a -> Bool Map.null Map Word64 TxMetadataValue -ms +ms , [ScriptInEra era] -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null [ScriptInEra era] -ss = Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) +ss = Maybe (AuxiliaryData (AlonzoEra StandardCrypto)) forall a. Maybe a Nothing | Bool @@ -7293,110 +7293,110 @@ Map Word64 TxMetadataValue -> [ScriptInEra era] -> AuxiliaryData ledgerera toAlonzoAuxiliaryData Map Word64 TxMetadataValue -ms [ScriptInEra era] -ss) +ms [ScriptInEra era] +ss) where - ms :: Map Word64 TxMetadataValue -ms = case TxMetadataInEra era -txMetadata of + ms :: Map Word64 TxMetadataValue +ms = case TxMetadataInEra era +txMetadata of TxMetadataInEra era TxMetadataNone -> Map Word64 TxMetadataValue forall k a. Map k a Map.empty TxMetadataInEra TxMetadataSupportedInEra era -_ (TxMetadata Map Word64 TxMetadataValue -ms') -> Map Word64 TxMetadataValue -ms' - ss :: [ScriptInEra era] -ss = case TxAuxScripts era -txAuxScripts of +_ (TxMetadata Map Word64 TxMetadataValue +ms') -> Map Word64 TxMetadataValue +ms' + ss :: [ScriptInEra era] +ss = case TxAuxScripts era +txAuxScripts of TxAuxScripts era TxAuxScriptsNone -> [] TxAuxScripts AuxScriptsSupportedInEra era -_ [ScriptInEra era] -ss' -> [ScriptInEra era] -ss' +_ [ScriptInEra era] +ss' -> [ScriptInEra era] +ss' -data AnyScriptWitness era where - AnyScriptWitness :: ScriptWitness witctx era -> AnyScriptWitness era +data AnyScriptWitness era where + AnyScriptWitness :: ScriptWitness witctx era -> AnyScriptWitness era -collectTxBodyScriptWitnesses :: forall era. - TxBodyContent BuildTx era - -> [(Alonzo.RdmrPtr, AnyScriptWitness era)] +collectTxBodyScriptWitnesses :: forall era. + TxBodyContent BuildTx era + -> [(Alonzo.RdmrPtr, AnyScriptWitness era)] collectTxBodyScriptWitnesses :: TxBodyContent BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] collectTxBodyScriptWitnesses TxBodyContent { - TxIns BuildTx era + TxIns BuildTx era txIns :: TxIns BuildTx era txIns :: forall build era. TxBodyContent build era -> TxIns build era -txIns, - TxWithdrawals BuildTx era +txIns, + TxWithdrawals BuildTx era txWithdrawals :: TxWithdrawals BuildTx era txWithdrawals :: forall build era. TxBodyContent build era -> TxWithdrawals build era -txWithdrawals, - TxCertificates BuildTx era +txWithdrawals, + TxCertificates BuildTx era txCertificates :: TxCertificates BuildTx era txCertificates :: forall build era. TxBodyContent build era -> TxCertificates build era -txCertificates, - TxMintValue BuildTx era +txCertificates, + TxMintValue BuildTx era txMintValue :: TxMintValue BuildTx era txMintValue :: forall build era. TxBodyContent build era -> TxMintValue build era -txMintValue +txMintValue } = [[(RdmrPtr, AnyScriptWitness era)]] -> [(RdmrPtr, AnyScriptWitness era)] forall (t :: * -> *) a. Foldable t => t [a] -> [a] concat [ TxIns BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] -scriptWitnessesTxIns TxIns BuildTx era -txIns +scriptWitnessesTxIns TxIns BuildTx era +txIns , TxWithdrawals BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] -scriptWitnessesWithdrawals TxWithdrawals BuildTx era -txWithdrawals +scriptWitnessesWithdrawals TxWithdrawals BuildTx era +txWithdrawals , TxCertificates BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] -scriptWitnessesCertificates TxCertificates BuildTx era -txCertificates +scriptWitnessesCertificates TxCertificates BuildTx era +txCertificates , TxMintValue BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] -scriptWitnessesMinting TxMintValue BuildTx era -txMintValue +scriptWitnessesMinting TxMintValue BuildTx era +txMintValue ] where - scriptWitnessesTxIns - :: [(TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era))] - -> [(Alonzo.RdmrPtr, AnyScriptWitness era)] - scriptWitnessesTxIns :: TxIns BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] -scriptWitnessesTxIns TxIns BuildTx era -txins = + scriptWitnessesTxIns + :: [(TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era))] + -> [(Alonzo.RdmrPtr, AnyScriptWitness era)] + scriptWitnessesTxIns :: TxIns BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] +scriptWitnessesTxIns TxIns BuildTx era +txins = [ (Tag -> Word64 -> RdmrPtr Alonzo.RdmrPtr Tag Alonzo.Spend Word64 -ix, ScriptWitness WitCtxTxIn era -> AnyScriptWitness era +ix, ScriptWitness WitCtxTxIn era -> AnyScriptWitness era forall witctx era. ScriptWitness witctx era -> AnyScriptWitness era AnyScriptWitness ScriptWitness WitCtxTxIn era -witness) +witness) -- The tx ins are indexed in the map order by txid - | (Word64 -ix, BuildTxWith (ScriptWitness ScriptWitnessInCtx WitCtxTxIn -_ ScriptWitness WitCtxTxIn era -witness)) <- [Word64] + | (Word64 +ix, BuildTxWith (ScriptWitness ScriptWitnessInCtx WitCtxTxIn +_ ScriptWitness WitCtxTxIn era +witness)) <- [Word64] -> [BuildTxWith BuildTx (Witness WitCtxTxIn era)] -> [(Word64, BuildTxWith BuildTx (Witness WitCtxTxIn era))] forall a b. [a] -> [b] -> [(a, b)] zip [Word64 0..] (TxIns BuildTx era -> [BuildTxWith BuildTx (Witness WitCtxTxIn era)] forall k v. Ord k => [(k, v)] -> [v] -orderTxIns TxIns BuildTx era -txins) +orderTxIns TxIns BuildTx era +txins) ] -- This relies on the TxId Ord instance being consistent with the -- Shelley.TxId Ord instance via the toShelleyTxId conversion -- This is checked by prop_ord_distributive_TxId - orderTxIns :: Ord k => [(k, v)] -> [v] - orderTxIns :: [(k, v)] -> [v] -orderTxIns = Map k v -> [v] + orderTxIns :: Ord k => [(k, v)] -> [v] + orderTxIns :: [(k, v)] -> [v] +orderTxIns = Map k v -> [v] forall k a. Map k a -> [a] Map.elems (Map k v -> [v]) -> ([(k, v)] -> Map k v) -> [(k, v)] -> [v] forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -7404,28 +7404,28 @@ forall k a. Ord k => [(k, a)] -> Map k a Map.fromList - scriptWitnessesWithdrawals - :: TxWithdrawals BuildTx era - -> [(Alonzo.RdmrPtr, AnyScriptWitness era)] - scriptWitnessesWithdrawals :: TxWithdrawals BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] -scriptWitnessesWithdrawals TxWithdrawals BuildTx era + scriptWitnessesWithdrawals + :: TxWithdrawals BuildTx era + -> [(Alonzo.RdmrPtr, AnyScriptWitness era)] + scriptWitnessesWithdrawals :: TxWithdrawals BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] +scriptWitnessesWithdrawals TxWithdrawals BuildTx era TxWithdrawalsNone = [] - scriptWitnessesWithdrawals (TxWithdrawals WithdrawalsSupportedInEra era -_ [(StakeAddress, Lovelace, + scriptWitnessesWithdrawals (TxWithdrawals WithdrawalsSupportedInEra era +_ [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -withdrawals) = +withdrawals) = [ (Tag -> Word64 -> RdmrPtr Alonzo.RdmrPtr Tag Alonzo.Rewrd Word64 -ix, ScriptWitness WitCtxStake era -> AnyScriptWitness era +ix, ScriptWitness WitCtxStake era -> AnyScriptWitness era forall witctx era. ScriptWitness witctx era -> AnyScriptWitness era AnyScriptWitness ScriptWitness WitCtxStake era -witness) +witness) -- The withdrawals are indexed in the map order by stake credential - | (Word64 -ix, BuildTxWith (ScriptWitness ScriptWitnessInCtx WitCtxStake -_ ScriptWitness WitCtxStake era -witness)) + | (Word64 +ix, BuildTxWith (ScriptWitness ScriptWitnessInCtx WitCtxStake +_ ScriptWitness WitCtxStake era +witness)) <- [Word64] -> [BuildTxWith BuildTx (Witness WitCtxStake era)] -> [(Word64, BuildTxWith BuildTx (Witness WitCtxStake era))] @@ -7435,17 +7435,17 @@ BuildTxWith BuildTx (Witness WitCtxStake era))] -> [BuildTxWith BuildTx (Witness WitCtxStake era)] forall k x v. Ord k => [(k, x, v)] -> [v] -orderStakeAddrs [(StakeAddress, Lovelace, +orderStakeAddrs [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -withdrawals) +withdrawals) ] -- This relies on the StakeAddress Ord instance being consistent with the -- Shelley.RewardAcnt Ord instance via the toShelleyStakeAddr conversion -- This is checked by prop_ord_distributive_StakeAddress - orderStakeAddrs :: Ord k => [(k, x, v)] -> [v] - orderStakeAddrs :: [(k, x, v)] -> [v] -orderStakeAddrs = Map k v -> [v] + orderStakeAddrs :: Ord k => [(k, x, v)] -> [v] + orderStakeAddrs :: [(k, x, v)] -> [v] +orderStakeAddrs = Map k v -> [v] forall k a. Map k a -> [a] Map.elems (Map k v -> [v]) -> ([(k, x, v)] -> Map k v) -> [(k, x, v)] -> [v] forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -7456,112 +7456,112 @@ forall b c a. (b -> c) -> (a -> b) -> a -> c . ((k, x, v) -> (k, v)) -> [(k, x, v)] -> [(k, v)] forall a b. (a -> b) -> [a] -> [b] -map (\(k -k, x -_, v -v) -> (k -k, v -v)) +map (\(k +k, x +_, v +v) -> (k +k, v +v)) - scriptWitnessesCertificates - :: TxCertificates BuildTx era - -> [(Alonzo.RdmrPtr, AnyScriptWitness era)] - scriptWitnessesCertificates :: TxCertificates BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] -scriptWitnessesCertificates TxCertificates BuildTx era + scriptWitnessesCertificates + :: TxCertificates BuildTx era + -> [(Alonzo.RdmrPtr, AnyScriptWitness era)] + scriptWitnessesCertificates :: TxCertificates BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] +scriptWitnessesCertificates TxCertificates BuildTx era TxCertificatesNone = [] - scriptWitnessesCertificates (TxCertificates CertificatesSupportedInEra era -_ [Certificate] -certs (BuildTxWith Map StakeCredential (Witness WitCtxStake era) -witnesses)) = + scriptWitnessesCertificates (TxCertificates CertificatesSupportedInEra era +_ [Certificate] +certs (BuildTxWith Map StakeCredential (Witness WitCtxStake era) +witnesses)) = [ (Tag -> Word64 -> RdmrPtr Alonzo.RdmrPtr Tag Alonzo.Cert Word64 -ix, ScriptWitness WitCtxStake era -> AnyScriptWitness era +ix, ScriptWitness WitCtxStake era -> AnyScriptWitness era forall witctx era. ScriptWitness witctx era -> AnyScriptWitness era AnyScriptWitness ScriptWitness WitCtxStake era -witness) +witness) -- The certs are indexed in list order - | (Word64 -ix, Certificate -cert) <- [Word64] -> [Certificate] -> [(Word64, Certificate)] + | (Word64 +ix, Certificate +cert) <- [Word64] -> [Certificate] -> [(Word64, Certificate)] forall a b. [a] -> [b] -> [(a, b)] zip [Word64 0..] [Certificate] -certs +certs , ScriptWitness ScriptWitnessInCtx WitCtxStake -_ ScriptWitness WitCtxStake era -witness <- Maybe (Witness WitCtxStake era) -> [Witness WitCtxStake era] +_ ScriptWitness WitCtxStake era +witness <- Maybe (Witness WitCtxStake era) -> [Witness WitCtxStake era] forall a. Maybe a -> [a] maybeToList (Maybe (Witness WitCtxStake era) -> [Witness WitCtxStake era]) -> Maybe (Witness WitCtxStake era) -> [Witness WitCtxStake era] forall a b. (a -> b) -> a -> b $ do - StakeCredential -stakecred <- Certificate -> Maybe StakeCredential -selectStakeCredential Certificate -cert + StakeCredential +stakecred <- Certificate -> Maybe StakeCredential +selectStakeCredential Certificate +cert StakeCredential -> Map StakeCredential (Witness WitCtxStake era) -> Maybe (Witness WitCtxStake era) forall k a. Ord k => k -> Map k a -> Maybe a Map.lookup StakeCredential -stakecred Map StakeCredential (Witness WitCtxStake era) -witnesses +stakecred Map StakeCredential (Witness WitCtxStake era) +witnesses ] - selectStakeCredential :: Certificate -> Maybe StakeCredential -selectStakeCredential Certificate -cert = + selectStakeCredential :: Certificate -> Maybe StakeCredential +selectStakeCredential Certificate +cert = case Certificate -cert of - StakeAddressDeregistrationCertificate StakeCredential -stakecred -> StakeCredential -> Maybe StakeCredential +cert of + StakeAddressDeregistrationCertificate StakeCredential +stakecred -> StakeCredential -> Maybe StakeCredential forall a. a -> Maybe a Just StakeCredential -stakecred - StakeAddressDelegationCertificate StakeCredential -stakecred PoolId +stakecred + StakeAddressDelegationCertificate StakeCredential +stakecred PoolId _ -> StakeCredential -> Maybe StakeCredential forall a. a -> Maybe a Just StakeCredential -stakecred +stakecred Certificate _ -> Maybe StakeCredential forall a. Maybe a Nothing - scriptWitnessesMinting - :: TxMintValue BuildTx era - -> [(Alonzo.RdmrPtr, AnyScriptWitness era)] - scriptWitnessesMinting :: TxMintValue BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] -scriptWitnessesMinting TxMintValue BuildTx era + scriptWitnessesMinting + :: TxMintValue BuildTx era + -> [(Alonzo.RdmrPtr, AnyScriptWitness era)] + scriptWitnessesMinting :: TxMintValue BuildTx era -> [(RdmrPtr, AnyScriptWitness era)] +scriptWitnessesMinting TxMintValue BuildTx era TxMintNone = [] - scriptWitnessesMinting (TxMintValue MultiAssetSupportedInEra era -_ Value -value (BuildTxWith Map PolicyId (ScriptWitness WitCtxMint era) -witnesses)) = + scriptWitnessesMinting (TxMintValue MultiAssetSupportedInEra era +_ Value +value (BuildTxWith Map PolicyId (ScriptWitness WitCtxMint era) +witnesses)) = [ (Tag -> Word64 -> RdmrPtr Alonzo.RdmrPtr Tag Alonzo.Mint Word64 -ix, ScriptWitness WitCtxMint era -> AnyScriptWitness era +ix, ScriptWitness WitCtxMint era -> AnyScriptWitness era forall witctx era. ScriptWitness witctx era -> AnyScriptWitness era AnyScriptWitness ScriptWitness WitCtxMint era -witness) +witness) -- The minting policies are indexed in policy id order in the value - | let ValueNestedRep [ValueNestedBundle] -bundle = Value -> ValueNestedRep + | let ValueNestedRep [ValueNestedBundle] +bundle = Value -> ValueNestedRep valueToNestedRep Value -value - , (Word64 -ix, ValueNestedBundle PolicyId -policyid Map AssetName Quantity +value + , (Word64 +ix, ValueNestedBundle PolicyId +policyid Map AssetName Quantity _) <- [Word64] -> [ValueNestedBundle] -> [(Word64, ValueNestedBundle)] forall a b. [a] -> [b] -> [(a, b)] zip [Word64 0..] [ValueNestedBundle] -bundle - , ScriptWitness WitCtxMint era -witness <- Maybe (ScriptWitness WitCtxMint era) +bundle + , ScriptWitness WitCtxMint era +witness <- Maybe (ScriptWitness WitCtxMint era) -> [ScriptWitness WitCtxMint era] forall a. Maybe a -> [a] maybeToList (PolicyId @@ -7569,15 +7569,15 @@ -> Maybe (ScriptWitness WitCtxMint era) forall k a. Ord k => k -> Map k a -> Maybe a Map.lookup PolicyId -policyid Map PolicyId (ScriptWitness WitCtxMint era) -witnesses) +policyid Map PolicyId (ScriptWitness WitCtxMint era) +witnesses) ] -toShelleyWithdrawal :: [(StakeAddress, Lovelace, a)] -> Shelley.Wdrl StandardCrypto +toShelleyWithdrawal :: [(StakeAddress, Lovelace, a)] -> Shelley.Wdrl StandardCrypto toShelleyWithdrawal :: [(StakeAddress, Lovelace, a)] -> Wdrl StandardCrypto -toShelleyWithdrawal [(StakeAddress, Lovelace, a)] -withdrawals = +toShelleyWithdrawal [(StakeAddress, Lovelace, a)] +withdrawals = Map (RewardAcnt StandardCrypto) Coin -> Wdrl StandardCrypto forall crypto. Map (RewardAcnt crypto) Coin -> Wdrl crypto Shelley.Wdrl (Map (RewardAcnt StandardCrypto) Coin -> Wdrl StandardCrypto) @@ -7590,38 +7590,38 @@ Map.fromList [ (StakeAddress -> RewardAcnt StandardCrypto toShelleyStakeAddr StakeAddress -stakeAddr, Lovelace -> Coin +stakeAddr, Lovelace -> Coin toShelleyLovelace Lovelace -value) - | (StakeAddress -stakeAddr, Lovelace -value, a +value) + | (StakeAddress +stakeAddr, Lovelace +value, a _) <- [(StakeAddress, Lovelace, a)] -withdrawals ] +withdrawals ] -fromShelleyWithdrawal +fromShelleyWithdrawal :: Shelley.Wdrl StandardCrypto - -> [(StakeAddress, Lovelace, BuildTxWith ViewTx (Witness WitCtxStake era))] + -> [(StakeAddress, Lovelace, BuildTxWith ViewTx (Witness WitCtxStake era))] fromShelleyWithdrawal :: Wdrl StandardCrypto -> [(StakeAddress, Lovelace, BuildTxWith ViewTx (Witness WitCtxStake era))] -fromShelleyWithdrawal (Shelley.Wdrl Map (RewardAcnt StandardCrypto) Coin -withdrawals) = +fromShelleyWithdrawal (Shelley.Wdrl Map (RewardAcnt StandardCrypto) Coin +withdrawals) = [ (RewardAcnt StandardCrypto -> StakeAddress fromShelleyStakeAddr RewardAcnt StandardCrypto -stakeAddr, Coin -> Lovelace +stakeAddr, Coin -> Lovelace fromShelleyLovelace Coin -value, BuildTxWith ViewTx (Witness WitCtxStake era) +value, BuildTxWith ViewTx (Witness WitCtxStake era) forall a. BuildTxWith ViewTx a ViewTx) - | (RewardAcnt StandardCrypto -stakeAddr, Coin -value) <- Map (RewardAcnt StandardCrypto) Coin + | (RewardAcnt StandardCrypto +stakeAddr, Coin +value) <- Map (RewardAcnt StandardCrypto) Coin -> [(RewardAcnt StandardCrypto, Coin)] forall k a. Map k a -> [(k, a)] Map.assocs Map (RewardAcnt StandardCrypto) Coin -withdrawals +withdrawals ] @@ -7630,32 +7630,32 @@ -> Ledger.AuxiliaryData StandardShelley toShelleyAuxiliaryData :: Map Word64 TxMetadataValue -> AuxiliaryData (ShelleyEra StandardCrypto) -toShelleyAuxiliaryData Map Word64 TxMetadataValue -m = +toShelleyAuxiliaryData Map Word64 TxMetadataValue +m = Map Word64 Metadatum -> Metadata (ShelleyEra StandardCrypto) forall era. Map Word64 Metadatum -> Metadata era Shelley.Metadata (Map Word64 TxMetadataValue -> Map Word64 Metadatum toShelleyMetadata Map Word64 TxMetadataValue -m) +m) -- | In the Allegra and Mary eras the auxiliary data consists of the tx metadata -- and the axiliary scripts. -- -toAllegraAuxiliaryData :: forall era ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.AuxiliaryData ledgerera ~ Allegra.AuxiliaryData ledgerera - => Ledger.AnnotatedData (Ledger.Script ledgerera) - => Ord (Ledger.Script ledgerera) +toAllegraAuxiliaryData :: forall era ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.AuxiliaryData ledgerera ~ Allegra.AuxiliaryData ledgerera + => Ledger.AnnotatedData (Ledger.Script ledgerera) + => Ord (Ledger.Script ledgerera) => Map Word64 TxMetadataValue - -> [ScriptInEra era] - -> Ledger.AuxiliaryData ledgerera + -> [ScriptInEra era] + -> Ledger.AuxiliaryData ledgerera toAllegraAuxiliaryData :: Map Word64 TxMetadataValue -> [ScriptInEra era] -> AuxiliaryData ledgerera -toAllegraAuxiliaryData Map Word64 TxMetadataValue -m [ScriptInEra era] -ss = +toAllegraAuxiliaryData Map Word64 TxMetadataValue +m [ScriptInEra era] +ss = Map Word64 Metadatum -> StrictSeq (Script ledgerera) -> AuxiliaryData ledgerera forall era. @@ -7664,7 +7664,7 @@ Allegra.AuxiliaryData (Map Word64 TxMetadataValue -> Map Word64 Metadatum toShelleyMetadata Map Word64 TxMetadataValue -m) +m) ([Script ledgerera] -> StrictSeq (Script ledgerera) forall a. [a] -> StrictSeq a Seq.fromList ((ScriptInEra era -> Script ledgerera) @@ -7673,25 +7673,25 @@ map ScriptInEra era -> Script ledgerera forall era. ScriptInEra era -> Script (ShelleyLedgerEra era) toShelleyScript [ScriptInEra era] -ss)) +ss)) -- | In the Alonzo and later eras the auxiliary data consists of the tx metadata -- and the axiliary scripts, and the axiliary script data. -- -toAlonzoAuxiliaryData :: forall era ledgerera. - ShelleyLedgerEra era ~ ledgerera - => Ledger.AuxiliaryData ledgerera ~ Alonzo.AuxiliaryData ledgerera - => Ledger.Script ledgerera ~ Alonzo.Script ledgerera - => Ledger.Era ledgerera +toAlonzoAuxiliaryData :: forall era ledgerera. + ShelleyLedgerEra era ~ ledgerera + => Ledger.AuxiliaryData ledgerera ~ Alonzo.AuxiliaryData ledgerera + => Ledger.Script ledgerera ~ Alonzo.Script ledgerera + => Ledger.Era ledgerera => Map Word64 TxMetadataValue - -> [ScriptInEra era] - -> Ledger.AuxiliaryData ledgerera + -> [ScriptInEra era] + -> Ledger.AuxiliaryData ledgerera toAlonzoAuxiliaryData :: Map Word64 TxMetadataValue -> [ScriptInEra era] -> AuxiliaryData ledgerera -toAlonzoAuxiliaryData Map Word64 TxMetadataValue -m [ScriptInEra era] -ss = +toAlonzoAuxiliaryData Map Word64 TxMetadataValue +m [ScriptInEra era] +ss = Map Word64 Metadatum -> StrictSeq (Script ledgerera) -> Set (Data ledgerera) @@ -7704,7 +7704,7 @@ Alonzo.AuxiliaryData (Map Word64 TxMetadataValue -> Map Word64 Metadatum toShelleyMetadata Map Word64 TxMetadataValue -m) +m) ([Script ledgerera] -> StrictSeq (Script ledgerera) forall a. [a] -> StrictSeq a Seq.fromList ((ScriptInEra era -> Script ledgerera) @@ -7713,7 +7713,7 @@ map ScriptInEra era -> Script ledgerera forall era. ScriptInEra era -> Script (ShelleyLedgerEra era) toShelleyScript [ScriptInEra era] -ss)) +ss)) Set (Data ledgerera) forall a. Set a Set.empty --TODO alonzo: the script data is expected to move from the @@ -7737,18 +7737,18 @@ -- genesisUTxOPseudoTxIn :: NetworkId -> Hash GenesisUTxOKey -> TxIn genesisUTxOPseudoTxIn :: NetworkId -> Hash GenesisUTxOKey -> TxIn -genesisUTxOPseudoTxIn NetworkId -nw (GenesisUTxOKeyHash kh) = +genesisUTxOPseudoTxIn NetworkId +nw (GenesisUTxOKeyHash kh) = --TODO: should handle Byron UTxO case too. TxIn StandardCrypto -> TxIn fromShelleyTxIn (Addr StandardCrypto -> TxIn StandardCrypto forall crypto. Crypto crypto => Addr crypto -> TxIn crypto Shelley.initialFundsPseudoTxIn Addr StandardCrypto -addr) +addr) where - addr :: Shelley.Addr StandardCrypto - addr :: Addr StandardCrypto -addr = Network + addr :: Shelley.Addr StandardCrypto + addr :: Addr StandardCrypto +addr = Network -> PaymentCredential StandardCrypto -> StakeReference StandardCrypto -> Addr StandardCrypto @@ -7758,12 +7758,12 @@ Shelley.Addr (NetworkId -> Network toShelleyNetwork NetworkId -nw) +nw) (KeyHash 'Payment StandardCrypto -> PaymentCredential StandardCrypto forall (kr :: KeyRole) crypto. KeyHash kr crypto -> Credential kr crypto Shelley.KeyHashObj KeyHash 'Payment StandardCrypto -kh) +kh) StakeReference StandardCrypto forall crypto. StakeReference crypto Shelley.StakeRefNull diff --git a/cardano-api/src/Cardano.Api.TxInMode.html b/cardano-api/src/Cardano.Api.TxInMode.html index 9c010ba9280..f16bb6ead46 100644 --- a/cardano-api/src/Cardano.Api.TxInMode.html +++ b/cardano-api/src/Cardano.Api.TxInMode.html @@ -45,28 +45,28 @@ -- different transaction types for all the eras. It is used in the -- LocalTxSubmission protocol. -- -data TxInMode mode where +data TxInMode mode where -- | Everything we consider a normal transaction. -- - TxInMode :: Tx era -> EraInMode era mode -> TxInMode mode + TxInMode :: Tx era -> EraInMode era mode -> TxInMode mode -- | Byron has various things we can post to the chain which are not -- actually transactions. This covers: update proposals, votes and -- delegation certs. -- - TxInByronSpecial :: Consensus.GenTx Consensus.ByronBlock - -> EraInMode ByronEra mode -> TxInMode mode + TxInByronSpecial :: Consensus.GenTx Consensus.ByronBlock + -> EraInMode ByronEra mode -> TxInMode mode -deriving instance Show (TxInMode mode) +deriving instance Show (TxInMode mode) -toConsensusGenTx :: ConsensusBlockForMode mode ~ block - => TxInMode mode - -> Consensus.GenTx block +toConsensusGenTx :: ConsensusBlockForMode mode ~ block + => TxInMode mode + -> Consensus.GenTx block toConsensusGenTx :: TxInMode mode -> GenTx block -toConsensusGenTx (TxInMode (ByronTx ATxAux ByteString -tx) EraInMode era mode +toConsensusGenTx (TxInMode (ByronTx ATxAux ByteString +tx) EraInMode era mode ByronEraInByronMode) = OneEraGenTx '[ByronBlock] -> GenTx (HardForkBlock '[ByronBlock]) forall (xs :: [*]). OneEraGenTx xs -> GenTx (HardForkBlock xs) @@ -75,17 +75,17 @@ Consensus.OneEraGenTx (GenTx ByronBlock -> NS GenTx '[ByronBlock] forall k (a :: k -> *) (x :: k) (xs :: [k]). a x -> NS a (x : xs) Z GenTx ByronBlock -tx')) +tx')) where - tx' :: GenTx ByronBlock -tx' = TxId -> ATxAux ByteString -> GenTx ByronBlock + tx' :: GenTx ByronBlock +tx' = TxId -> ATxAux ByteString -> GenTx ByronBlock Consensus.ByronTx (ATxAux ByteString -> TxId Consensus.byronIdTx ATxAux ByteString -tx) ATxAux ByteString -tx +tx) ATxAux ByteString +tx -toConsensusGenTx (TxInMode (ByronTx ATxAux ByteString -tx) EraInMode era mode +toConsensusGenTx (TxInMode (ByronTx ATxAux ByteString +tx) EraInMode era mode ByronEraInCardanoMode) = OneEraGenTx '[ByronBlock, ShelleyBlock (ShelleyEra StandardCrypto), @@ -120,19 +120,19 @@ ShelleyBlock (AlonzoEra StandardCrypto)] forall k (a :: k -> *) (x :: k) (xs :: [k]). a x -> NS a (x : xs) Z GenTx ByronBlock -tx')) +tx')) where - tx' :: GenTx ByronBlock -tx' = TxId -> ATxAux ByteString -> GenTx ByronBlock + tx' :: GenTx ByronBlock +tx' = TxId -> ATxAux ByteString -> GenTx ByronBlock Consensus.ByronTx (ATxAux ByteString -> TxId Consensus.byronIdTx ATxAux ByteString -tx) ATxAux ByteString -tx +tx) ATxAux ByteString +tx --TODO: add the above as mkByronTx to the consensus code, -- matching mkShelleyTx below -toConsensusGenTx (TxInByronSpecial GenTx ByronBlock -gtx EraInMode ByronEra mode +toConsensusGenTx (TxInByronSpecial GenTx ByronBlock +gtx EraInMode ByronEra mode ByronEraInByronMode) = OneEraGenTx '[ByronBlock] -> GenTx (HardForkBlock '[ByronBlock]) forall (xs :: [*]). OneEraGenTx xs -> GenTx (HardForkBlock xs) @@ -141,10 +141,10 @@ Consensus.OneEraGenTx (GenTx ByronBlock -> NS GenTx '[ByronBlock] forall k (a :: k -> *) (x :: k) (xs :: [k]). a x -> NS a (x : xs) Z GenTx ByronBlock -gtx)) +gtx)) -toConsensusGenTx (TxInByronSpecial GenTx ByronBlock -gtx EraInMode ByronEra mode +toConsensusGenTx (TxInByronSpecial GenTx ByronBlock +gtx EraInMode ByronEra mode ByronEraInCardanoMode) = OneEraGenTx '[ByronBlock, ShelleyBlock (ShelleyEra StandardCrypto), @@ -179,11 +179,11 @@ ShelleyBlock (AlonzoEra StandardCrypto)] forall k (a :: k -> *) (x :: k) (xs :: [k]). a x -> NS a (x : xs) Z GenTx ByronBlock -gtx)) +gtx)) toConsensusGenTx (TxInMode (ShelleyTx ShelleyBasedEra era -_ Tx (ShelleyLedgerEra era) -tx) EraInMode era mode +_ Tx (ShelleyLedgerEra era) +tx) EraInMode era mode ShelleyEraInShelleyMode) = OneEraGenTx '[ShelleyBlock (ShelleyEra StandardCrypto)] -> GenTx @@ -196,21 +196,21 @@ -> NS GenTx '[ShelleyBlock (ShelleyEra StandardCrypto)] forall k (a :: k -> *) (x :: k) (xs :: [k]). a x -> NS a (x : xs) Z GenTx (ShelleyBlock (ShelleyEra StandardCrypto)) -tx')) +tx')) where - tx' :: GenTx (ShelleyBlock (ShelleyEra StandardCrypto)) -tx' = Tx (ShelleyEra StandardCrypto) + tx' :: GenTx (ShelleyBlock (ShelleyEra StandardCrypto)) +tx' = Tx (ShelleyEra StandardCrypto) -> GenTx (ShelleyBlock (ShelleyEra StandardCrypto)) forall era. ShelleyBasedEra era => Tx era -> GenTx (ShelleyBlock era) Consensus.mkShelleyTx Tx (ShelleyEra StandardCrypto) Tx (ShelleyLedgerEra era) -tx +tx toConsensusGenTx (TxInMode (ShelleyTx ShelleyBasedEra era -_ Tx (ShelleyLedgerEra era) -tx) EraInMode era mode +_ Tx (ShelleyLedgerEra era) +tx) EraInMode era mode ShelleyEraInCardanoMode) = OneEraGenTx '[ByronBlock, ShelleyBlock (ShelleyEra StandardCrypto), @@ -259,21 +259,21 @@ ShelleyBlock (AlonzoEra StandardCrypto)] forall k (a :: k -> *) (x :: k) (xs :: [k]). a x -> NS a (x : xs) Z GenTx (ShelleyBlock (ShelleyEra StandardCrypto)) -tx'))) +tx'))) where - tx' :: GenTx (ShelleyBlock (ShelleyEra StandardCrypto)) -tx' = Tx (ShelleyEra StandardCrypto) + tx' :: GenTx (ShelleyBlock (ShelleyEra StandardCrypto)) +tx' = Tx (ShelleyEra StandardCrypto) -> GenTx (ShelleyBlock (ShelleyEra StandardCrypto)) forall era. ShelleyBasedEra era => Tx era -> GenTx (ShelleyBlock era) Consensus.mkShelleyTx Tx (ShelleyEra StandardCrypto) Tx (ShelleyLedgerEra era) -tx +tx toConsensusGenTx (TxInMode (ShelleyTx ShelleyBasedEra era -_ Tx (ShelleyLedgerEra era) -tx) EraInMode era mode +_ Tx (ShelleyLedgerEra era) +tx) EraInMode era mode AllegraEraInCardanoMode) = OneEraGenTx '[ByronBlock, ShelleyBlock (ShelleyEra StandardCrypto), @@ -334,21 +334,21 @@ ShelleyBlock (AlonzoEra StandardCrypto)] forall k (a :: k -> *) (x :: k) (xs :: [k]). a x -> NS a (x : xs) Z GenTx (ShelleyBlock (AllegraEra StandardCrypto)) -tx')))) +tx')))) where - tx' :: GenTx (ShelleyBlock (AllegraEra StandardCrypto)) -tx' = Tx (AllegraEra StandardCrypto) + tx' :: GenTx (ShelleyBlock (AllegraEra StandardCrypto)) +tx' = Tx (AllegraEra StandardCrypto) -> GenTx (ShelleyBlock (AllegraEra StandardCrypto)) forall era. ShelleyBasedEra era => Tx era -> GenTx (ShelleyBlock era) Consensus.mkShelleyTx Tx (AllegraEra StandardCrypto) Tx (ShelleyLedgerEra era) -tx +tx toConsensusGenTx (TxInMode (ShelleyTx ShelleyBasedEra era -_ Tx (ShelleyLedgerEra era) -tx) EraInMode era mode +_ Tx (ShelleyLedgerEra era) +tx) EraInMode era mode MaryEraInCardanoMode) = OneEraGenTx '[ByronBlock, ShelleyBlock (ShelleyEra StandardCrypto), @@ -419,21 +419,21 @@ ShelleyBlock (AlonzoEra StandardCrypto)] forall k (a :: k -> *) (x :: k) (xs :: [k]). a x -> NS a (x : xs) Z GenTx (ShelleyBlock (MaryEra StandardCrypto)) -tx'))))) +tx'))))) where - tx' :: GenTx (ShelleyBlock (MaryEra StandardCrypto)) -tx' = Tx (MaryEra StandardCrypto) + tx' :: GenTx (ShelleyBlock (MaryEra StandardCrypto)) +tx' = Tx (MaryEra StandardCrypto) -> GenTx (ShelleyBlock (MaryEra StandardCrypto)) forall era. ShelleyBasedEra era => Tx era -> GenTx (ShelleyBlock era) Consensus.mkShelleyTx Tx (MaryEra StandardCrypto) Tx (ShelleyLedgerEra era) -tx +tx toConsensusGenTx (TxInMode (ShelleyTx ShelleyBasedEra era -_ Tx (ShelleyLedgerEra era) -_tx) EraInMode era mode +_ Tx (ShelleyLedgerEra era) +_tx) EraInMode era mode AlonzoEraInCardanoMode) = OneEraGenTx '[ByronBlock, ShelleyBlock (ShelleyEra StandardCrypto), @@ -509,10 +509,10 @@ forall k (a :: k -> *) (x :: k) (xs :: [k]). a x -> NS a (x : xs) Z GenTx (ShelleyBlock (AlonzoEra StandardCrypto)) forall a. a -tx')))))) +tx')))))) where - tx' :: a -tx' = String -> a + tx' :: a +tx' = String -> a forall a. HasCallStack => String -> a error String "toConsensusGenTx: Alonzo not implemented yet" @@ -527,26 +527,26 @@ -- | The transaction validations errors that can occur from trying to submit a -- transaction to a local node. The errors are specific to an era. -- -data TxValidationError era where +data TxValidationError era where ByronTxValidationError :: Consensus.ApplyTxErr Consensus.ByronBlock -> TxValidationError ByronEra - ShelleyTxValidationError - :: ShelleyBasedEra era - -> Consensus.ApplyTxErr (Consensus.ShelleyBlock (ShelleyLedgerEra era)) - -> TxValidationError era + ShelleyTxValidationError + :: ShelleyBasedEra era + -> Consensus.ApplyTxErr (Consensus.ShelleyBlock (ShelleyLedgerEra era)) + -> TxValidationError era -- The GADT in the ShelleyTxValidationError case requires a custom instance -instance Show (TxValidationError era) where - showsPrec :: Int -> TxValidationError era -> ShowS -showsPrec Int -p (ByronTxValidationError ApplyTxErr ByronBlock -err) = +instance Show (TxValidationError era) where + showsPrec :: Int -> TxValidationError era -> ShowS +showsPrec Int +p (ByronTxValidationError ApplyTxErr ByronBlock +err) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -560,16 +560,16 @@ showsPrec Int 11 ApplyTxErr ByronBlock ApplyMempoolPayloadErr -err +err ) - showsPrec Int -p (ShelleyTxValidationError ShelleyBasedEra era -ShelleyBasedEraShelley ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) -err) = + showsPrec Int +p (ShelleyTxValidationError ShelleyBasedEra era +ShelleyBasedEraShelley ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) +err) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -583,16 +583,16 @@ showsPrec Int 11 ApplyTxError (ShelleyEra StandardCrypto) ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) -err +err ) - showsPrec Int -p (ShelleyTxValidationError ShelleyBasedEra era -ShelleyBasedEraAllegra ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) -err) = + showsPrec Int +p (ShelleyTxValidationError ShelleyBasedEra era +ShelleyBasedEraAllegra ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) +err) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -606,16 +606,16 @@ showsPrec Int 11 ApplyTxError (AllegraEra StandardCrypto) ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) -err +err ) - showsPrec Int -p (ShelleyTxValidationError ShelleyBasedEra era -ShelleyBasedEraMary ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) -err) = + showsPrec Int +p (ShelleyTxValidationError ShelleyBasedEra era +ShelleyBasedEraMary ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) +err) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -629,16 +629,16 @@ showsPrec Int 11 ApplyTxError (MaryEra StandardCrypto) ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) -err +err ) - showsPrec Int -p (ShelleyTxValidationError ShelleyBasedEra era -ShelleyBasedEraAlonzo ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) -err) = + showsPrec Int +p (ShelleyTxValidationError ShelleyBasedEra era +ShelleyBasedEraAlonzo ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) +err) = Bool -> ShowS -> ShowS showParen (Int -p Int -> Int -> Bool +p Int -> Int -> Bool forall a. Ord a => a -> a -> Bool >= Int 11) @@ -652,7 +652,7 @@ showsPrec Int 11 ApplyTxError (AlonzoEra StandardCrypto) ApplyTxErr (ShelleyBlock (ShelleyLedgerEra era)) -err +err ) @@ -661,25 +661,25 @@ -- -- This is used in the LocalStateQuery protocol. -- -data TxValidationErrorInMode mode where - TxValidationErrorInMode :: TxValidationError era - -> EraInMode era mode - -> TxValidationErrorInMode mode +data TxValidationErrorInMode mode where + TxValidationErrorInMode :: TxValidationError era + -> EraInMode era mode + -> TxValidationErrorInMode mode - TxValidationEraMismatch :: EraMismatch - -> TxValidationErrorInMode mode + TxValidationEraMismatch :: EraMismatch + -> TxValidationErrorInMode mode -deriving instance Show (TxValidationErrorInMode mode) +deriving instance Show (TxValidationErrorInMode mode) -fromConsensusApplyTxErr :: ConsensusBlockForMode mode ~ block - => ConsensusMode mode - -> Consensus.ApplyTxErr block - -> TxValidationErrorInMode mode +fromConsensusApplyTxErr :: ConsensusBlockForMode mode ~ block + => ConsensusMode mode + -> Consensus.ApplyTxErr block + -> TxValidationErrorInMode mode fromConsensusApplyTxErr :: ConsensusMode mode -> ApplyTxErr block -> TxValidationErrorInMode mode fromConsensusApplyTxErr ConsensusMode mode -ByronMode (Consensus.DegenApplyTxErr err) = +ByronMode (Consensus.DegenApplyTxErr err) = TxValidationError ByronEra -> EraInMode ByronEra ByronMode -> TxValidationErrorInMode ByronMode @@ -689,12 +689,12 @@ TxValidationErrorInMode (ApplyTxErr ByronBlock -> TxValidationError ByronEra ByronTxValidationError ApplyTxErr ByronBlock -err) +err) EraInMode ByronEra ByronMode ByronEraInByronMode fromConsensusApplyTxErr ConsensusMode mode -ShelleyMode (Consensus.DegenApplyTxErr err) = +ShelleyMode (Consensus.DegenApplyTxErr err) = TxValidationError ShelleyEra -> EraInMode ShelleyEra ShelleyMode -> TxValidationErrorInMode ShelleyMode @@ -712,12 +712,12 @@ ShelleyTxValidationError ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley ApplyTxErr (ShelleyBlock (ShelleyEra StandardCrypto)) ApplyTxErr (ShelleyBlock (ShelleyLedgerEra ShelleyEra)) -err) +err) EraInMode ShelleyEra ShelleyMode ShelleyEraInShelleyMode fromConsensusApplyTxErr ConsensusMode mode -CardanoMode (Consensus.ApplyTxErrByron err) = +CardanoMode (Consensus.ApplyTxErrByron err) = TxValidationError ByronEra -> EraInMode ByronEra CardanoMode -> TxValidationErrorInMode CardanoMode @@ -727,12 +727,12 @@ TxValidationErrorInMode (ApplyTxErr ByronBlock -> TxValidationError ByronEra ByronTxValidationError ApplyTxErr ByronBlock -err) +err) EraInMode ByronEra CardanoMode ByronEraInCardanoMode fromConsensusApplyTxErr ConsensusMode mode -CardanoMode (Consensus.ApplyTxErrShelley err) = +CardanoMode (Consensus.ApplyTxErrShelley err) = TxValidationError ShelleyEra -> EraInMode ShelleyEra CardanoMode -> TxValidationErrorInMode CardanoMode @@ -750,12 +750,12 @@ ShelleyTxValidationError ShelleyBasedEra ShelleyEra ShelleyBasedEraShelley ApplyTxErr (ShelleyBlock (ShelleyEra StandardCrypto)) ApplyTxErr (ShelleyBlock (ShelleyLedgerEra ShelleyEra)) -err) +err) EraInMode ShelleyEra CardanoMode ShelleyEraInCardanoMode fromConsensusApplyTxErr ConsensusMode mode -CardanoMode (Consensus.ApplyTxErrAllegra err) = +CardanoMode (Consensus.ApplyTxErrAllegra err) = TxValidationError AllegraEra -> EraInMode AllegraEra CardanoMode -> TxValidationErrorInMode CardanoMode @@ -773,12 +773,12 @@ ShelleyTxValidationError ShelleyBasedEra AllegraEra ShelleyBasedEraAllegra ApplyTxErr (ShelleyBlock (AllegraEra StandardCrypto)) ApplyTxErr (ShelleyBlock (ShelleyLedgerEra AllegraEra)) -err) +err) EraInMode AllegraEra CardanoMode AllegraEraInCardanoMode fromConsensusApplyTxErr ConsensusMode mode -CardanoMode (Consensus.ApplyTxErrMary err) = +CardanoMode (Consensus.ApplyTxErrMary err) = TxValidationError MaryEra -> EraInMode MaryEra CardanoMode -> TxValidationErrorInMode CardanoMode @@ -796,12 +796,12 @@ ShelleyTxValidationError ShelleyBasedEra MaryEra ShelleyBasedEraMary ApplyTxErr (ShelleyBlock (MaryEra StandardCrypto)) ApplyTxErr (ShelleyBlock (ShelleyLedgerEra MaryEra)) -err) +err) EraInMode MaryEra CardanoMode MaryEraInCardanoMode fromConsensusApplyTxErr ConsensusMode mode -CardanoMode (Consensus.ApplyTxErrAlonzo err) = +CardanoMode (Consensus.ApplyTxErrAlonzo err) = TxValidationError AlonzoEra -> EraInMode AlonzoEra CardanoMode -> TxValidationErrorInMode CardanoMode @@ -819,15 +819,15 @@ ShelleyTxValidationError ShelleyBasedEra AlonzoEra ShelleyBasedEraAlonzo ApplyTxErr (ShelleyBlock (AlonzoEra StandardCrypto)) ApplyTxErr (ShelleyBlock (ShelleyLedgerEra AlonzoEra)) -err) +err) EraInMode AlonzoEra CardanoMode AlonzoEraInCardanoMode fromConsensusApplyTxErr ConsensusMode mode -CardanoMode (Consensus.ApplyTxErrWrongEra err) = +CardanoMode (Consensus.ApplyTxErrWrongEra err) = EraMismatch -> TxValidationErrorInMode mode forall mode. EraMismatch -> TxValidationErrorInMode mode TxValidationEraMismatch EraMismatch -err +err \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.TxMetadata.html b/cardano-api/src/Cardano.Api.TxMetadata.html index 2ffd5f03b1b..7e40e4d6c08 100644 --- a/cardano-api/src/Cardano.Api.TxMetadata.html +++ b/cardano-api/src/Cardano.Api.TxMetadata.html @@ -26,62 +26,64 @@ -- * Internal conversion functions toShelleyMetadata, fromShelleyMetadata, - - -- * Shared parsing utils - parseAll, - pUnsigned, - pSigned, - pBytes, - - -- * Data family instances - AsType(..) - ) where - -import Prelude + toShelleyMetadatum, + fromShelleyMetadatum, + + -- * Shared parsing utils + parseAll, + pUnsigned, + pSigned, + pBytes, + + -- * Data family instances + AsType(..) + ) where -import Data.Bifunctor (first) -import Data.Maybe (fromMaybe) -import Data.Word -import qualified Data.Scientific as Scientific -import Data.ByteString (ByteString) -import qualified Data.ByteString as BS -import qualified Data.ByteString.Char8 as BSC -import qualified Data.ByteString.Lazy.Char8 as LBS -import qualified Data.ByteString.Base16 as Base16 -import Data.Text (Text) -import qualified Data.Text as Text -import qualified Data.Text.Encoding as Text -import qualified Data.Text.Lazy as Text.Lazy -import qualified Data.Map.Lazy as Map.Lazy -import Data.Map.Strict (Map) -import qualified Data.Map.Strict as Map -import qualified Data.HashMap.Strict as HashMap -import qualified Data.List as List -import qualified Data.Vector as Vector - -import qualified Data.Aeson as Aeson -import qualified Data.Aeson.Text as Aeson.Text -import qualified Data.Attoparsec.ByteString.Char8 as Atto - -import Control.Applicative (Alternative (..)) -import Control.Monad (guard, when) - -import qualified Cardano.Binary as CBOR +import Prelude + +import Data.Bifunctor (first) +import Data.Maybe (fromMaybe) +import Data.Word +import qualified Data.Scientific as Scientific +import Data.ByteString (ByteString) +import qualified Data.ByteString as BS +import qualified Data.ByteString.Char8 as BSC +import qualified Data.ByteString.Lazy.Char8 as LBS +import qualified Data.ByteString.Base16 as Base16 +import Data.Text (Text) +import qualified Data.Text as Text +import qualified Data.Text.Encoding as Text +import qualified Data.Text.Lazy as Text.Lazy +import qualified Data.Map.Lazy as Map.Lazy +import Data.Map.Strict (Map) +import qualified Data.Map.Strict as Map +import qualified Data.HashMap.Strict as HashMap +import qualified Data.List as List +import qualified Data.Vector as Vector + +import qualified Data.Aeson as Aeson +import qualified Data.Aeson.Text as Aeson.Text +import qualified Data.Attoparsec.ByteString.Char8 as Atto + +import Control.Applicative (Alternative (..)) +import Control.Monad (guard, when) -import qualified Shelley.Spec.Ledger.Metadata as Shelley +import qualified Cardano.Binary as CBOR -import Cardano.Api.Eras -import Cardano.Api.Error -import Cardano.Api.HasTypeProxy -import Cardano.Api.SerialiseCBOR - - --- ---------------------------------------------------------------------------- --- TxMetadata types --- - -newtype TxMetadata = TxMetadata (Map Word64 TxMetadataValue) - deriving (TxMetadata -> TxMetadata -> Bool +import qualified Shelley.Spec.Ledger.Metadata as Shelley + +import Cardano.Api.Eras +import Cardano.Api.Error +import Cardano.Api.HasTypeProxy +import Cardano.Api.SerialiseCBOR + + +-- ---------------------------------------------------------------------------- +-- TxMetadata types +-- + +newtype TxMetadata = TxMetadata (Map Word64 TxMetadataValue) + deriving (TxMetadata -> TxMetadata -> Bool (TxMetadata -> TxMetadata -> Bool) -> (TxMetadata -> TxMetadata -> Bool) -> Eq TxMetadata forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -89,7 +91,7 @@ $c/= :: TxMetadata -> TxMetadata -> Bool == :: TxMetadata -> TxMetadata -> Bool $c== :: TxMetadata -> TxMetadata -> Bool -Eq, Int -> TxMetadata -> ShowS +Eq, Int -> TxMetadata -> ShowS [TxMetadata] -> ShowS TxMetadata -> String (Int -> TxMetadata -> ShowS) @@ -105,13 +107,13 @@ showsPrec :: Int -> TxMetadata -> ShowS $cshowsPrec :: Int -> TxMetadata -> ShowS Show) - -data TxMetadataValue = TxMetaNumber Integer -- -2^64 .. 2^64-1 - | TxMetaBytes ByteString - | TxMetaText Text + +data TxMetadataValue = TxMetaMap [(TxMetadataValue, TxMetadataValue)] | TxMetaList [TxMetadataValue] - | TxMetaMap [(TxMetadataValue, TxMetadataValue)] - deriving (TxMetadataValue -> TxMetadataValue -> Bool + | TxMetaNumber Integer -- -2^64 .. 2^64-1 + | TxMetaBytes ByteString + | TxMetaText Text + deriving (TxMetadataValue -> TxMetadataValue -> Bool (TxMetadataValue -> TxMetadataValue -> Bool) -> (TxMetadataValue -> TxMetadataValue -> Bool) -> Eq TxMetadataValue @@ -120,7 +122,7 @@ $c/= :: TxMetadataValue -> TxMetadataValue -> Bool == :: TxMetadataValue -> TxMetadataValue -> Bool $c== :: TxMetadataValue -> TxMetadataValue -> Bool -Eq, Eq TxMetadataValue +Eq, Eq TxMetadataValue Eq TxMetadataValue -> (TxMetadataValue -> TxMetadataValue -> Ordering) -> (TxMetadataValue -> TxMetadataValue -> Bool) @@ -158,7 +160,7 @@ compare :: TxMetadataValue -> TxMetadataValue -> Ordering $ccompare :: TxMetadataValue -> TxMetadataValue -> Ordering $cp1Ord :: Eq TxMetadataValue -Ord, Int -> TxMetadataValue -> ShowS +Ord, Int -> TxMetadataValue -> ShowS [TxMetadataValue] -> ShowS TxMetadataValue -> String (Int -> TxMetadataValue -> ShowS) @@ -174,88 +176,91 @@ showsPrec :: Int -> TxMetadataValue -> ShowS $cshowsPrec :: Int -> TxMetadataValue -> ShowS Show) - --- | Merge metadata maps. When there are clashing entries the left hand side --- takes precedence. --- -instance Semigroup TxMetadata where - TxMetadata Map Word64 TxMetadataValue -m1 <> :: TxMetadata -> TxMetadata -> TxMetadata -<> TxMetadata Map Word64 TxMetadataValue -m2 = Map Word64 TxMetadataValue -> TxMetadata + -- Note the order of constructors is the same as the ledger definitions + -- so that the Ord instance is consistent with the ledger one. + -- This is checked by prop_ord_distributive_TxMetadata + +-- | Merge metadata maps. When there are clashing entries the left hand side +-- takes precedence. +-- +instance Semigroup TxMetadata where + TxMetadata Map Word64 TxMetadataValue +m1 <> :: TxMetadata -> TxMetadata -> TxMetadata +<> TxMetadata Map Word64 TxMetadataValue +m2 = Map Word64 TxMetadataValue -> TxMetadata TxMetadata (Map Word64 TxMetadataValue -m1 Map Word64 TxMetadataValue +m1 Map Word64 TxMetadataValue -> Map Word64 TxMetadataValue -> Map Word64 TxMetadataValue forall a. Semigroup a => a -> a -> a <> Map Word64 TxMetadataValue -m2) - -instance Monoid TxMetadata where - mempty :: TxMetadata +m2) + +instance Monoid TxMetadata where + mempty :: TxMetadata mempty = Map Word64 TxMetadataValue -> TxMetadata TxMetadata Map Word64 TxMetadataValue forall a. Monoid a => a mempty - -instance HasTypeProxy TxMetadata where - data AsType TxMetadata = AsTxMetadata - proxyToAsType :: Proxy TxMetadata -> AsType TxMetadata + +instance HasTypeProxy TxMetadata where + data AsType TxMetadata = AsTxMetadata + proxyToAsType :: Proxy TxMetadata -> AsType TxMetadata proxyToAsType Proxy TxMetadata _ = AsType TxMetadata AsTxMetadata - -instance SerialiseAsCBOR TxMetadata where - serialiseToCBOR :: TxMetadata -> ByteString + +instance SerialiseAsCBOR TxMetadata where + serialiseToCBOR :: TxMetadata -> ByteString serialiseToCBOR = - Metadata () -> ByteString + Metadata () -> ByteString forall a. ToCBOR a => a -> ByteString CBOR.serialize' - (Metadata () -> ByteString) + (Metadata () -> ByteString) -> (TxMetadata -> Metadata ()) -> TxMetadata -> ByteString forall b c a. (b -> c) -> (a -> b) -> a -> c . (Map Word64 Metadatum -> Metadata () forall era. Map Word64 Metadatum -> Metadata era Shelley.Metadata :: Map Word64 Shelley.Metadatum -> Shelley.Metadata ()) - -- The Shelley (Metadata era) is always polymorphic in era, - -- so we pick the unit type. - (Map Word64 Metadatum -> Metadata ()) + -- The Shelley (Metadata era) is always polymorphic in era, + -- so we pick the unit type. + (Map Word64 Metadatum -> Metadata ()) -> (TxMetadata -> Map Word64 Metadatum) -> TxMetadata -> Metadata () forall b c a. (b -> c) -> (a -> b) -> a -> c . Map Word64 TxMetadataValue -> Map Word64 Metadatum toShelleyMetadata - (Map Word64 TxMetadataValue -> Map Word64 Metadatum) + (Map Word64 TxMetadataValue -> Map Word64 Metadatum) -> (TxMetadata -> Map Word64 TxMetadataValue) -> TxMetadata -> Map Word64 Metadatum forall b c a. (b -> c) -> (a -> b) -> a -> c -. (\(TxMetadata Map Word64 TxMetadataValue -m) -> Map Word64 TxMetadataValue -m) - - deserialiseFromCBOR :: AsType TxMetadata -> ByteString -> Either DecoderError TxMetadata +. (\(TxMetadata Map Word64 TxMetadataValue +m) -> Map Word64 TxMetadataValue +m) + + deserialiseFromCBOR :: AsType TxMetadata -> ByteString -> Either DecoderError TxMetadata deserialiseFromCBOR AsType TxMetadata -AsTxMetadata ByteString -bs = - Map Word64 TxMetadataValue -> TxMetadata +AsTxMetadata ByteString +bs = + Map Word64 TxMetadataValue -> TxMetadata TxMetadata - (Map Word64 TxMetadataValue -> TxMetadata) + (Map Word64 TxMetadataValue -> TxMetadata) -> (Metadata () -> Map Word64 TxMetadataValue) -> Metadata () -> TxMetadata forall b c a. (b -> c) -> (a -> b) -> a -> c . Map Word64 Metadatum -> Map Word64 TxMetadataValue fromShelleyMetadata - (Map Word64 Metadatum -> Map Word64 TxMetadataValue) + (Map Word64 Metadatum -> Map Word64 TxMetadataValue) -> (Metadata () -> Map Word64 Metadatum) -> Metadata () -> Map Word64 TxMetadataValue forall b c a. (b -> c) -> (a -> b) -> a -> c -. (\(Shelley.Metadata Map Word64 Metadatum -m) -> Map Word64 Metadatum -m) - (Metadata () -> TxMetadata) +. (\(Shelley.Metadata Map Word64 Metadatum +m) -> Map Word64 Metadatum +m) + (Metadata () -> TxMetadata) -> Either DecoderError (Metadata ()) -> Either DecoderError TxMetadata forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -273,164 +278,164 @@ forall a s. FromCBOR a => Decoder s a fromCBOR (ByteString -> LByteString LBS.fromStrict ByteString -bs) - :: Either CBOR.DecoderError (Shelley.Metadata ())) - -- The Shelley (Metadata era) is always polymorphic in era, - -- so we pick the unit type. - -makeTransactionMetadata :: Map Word64 TxMetadataValue -> TxMetadata -makeTransactionMetadata :: Map Word64 TxMetadataValue -> TxMetadata +bs) + :: Either CBOR.DecoderError (Shelley.Metadata ())) + -- The Shelley (Metadata era) is always polymorphic in era, + -- so we pick the unit type. + +makeTransactionMetadata :: Map Word64 TxMetadataValue -> TxMetadata +makeTransactionMetadata :: Map Word64 TxMetadataValue -> TxMetadata makeTransactionMetadata = Map Word64 TxMetadataValue -> TxMetadata TxMetadata - - --- ---------------------------------------------------------------------------- --- Internal conversion functions --- -toShelleyMetadata :: Map Word64 TxMetadataValue -> Map Word64 Shelley.Metadatum -toShelleyMetadata :: Map Word64 TxMetadataValue -> Map Word64 Metadatum + +-- ---------------------------------------------------------------------------- +-- Internal conversion functions +-- + +toShelleyMetadata :: Map Word64 TxMetadataValue -> Map Word64 Shelley.Metadatum +toShelleyMetadata :: Map Word64 TxMetadataValue -> Map Word64 Metadatum toShelleyMetadata = (TxMetadataValue -> Metadatum) -> Map Word64 TxMetadataValue -> Map Word64 Metadatum forall a b k. (a -> b) -> Map k a -> Map k b Map.map TxMetadataValue -> Metadatum -toShelleyMetadatum - where - toShelleyMetadatum :: TxMetadataValue -> Shelley.Metadatum - toShelleyMetadatum :: TxMetadataValue -> Metadatum -toShelleyMetadatum (TxMetaNumber Integer -x) = Integer -> Metadatum +toShelleyMetadatum + +toShelleyMetadatum :: TxMetadataValue -> Shelley.Metadatum +toShelleyMetadatum :: TxMetadataValue -> Metadatum +toShelleyMetadatum (TxMetaNumber Integer +x) = Integer -> Metadatum Shelley.I Integer -x - toShelleyMetadatum (TxMetaBytes ByteString -x) = ByteString -> Metadatum +x +toShelleyMetadatum (TxMetaBytes ByteString +x) = ByteString -> Metadatum Shelley.B ByteString -x - toShelleyMetadatum (TxMetaText Text -x) = Text -> Metadatum +x +toShelleyMetadatum (TxMetaText Text +x) = Text -> Metadatum Shelley.S Text -x - toShelleyMetadatum (TxMetaList [TxMetadataValue] -xs) = [Metadatum] -> Metadatum +x +toShelleyMetadatum (TxMetaList [TxMetadataValue] +xs) = [Metadatum] -> Metadatum Shelley.List - [ TxMetadataValue -> Metadatum -toShelleyMetadatum TxMetadataValue -x | TxMetadataValue -x <- [TxMetadataValue] -xs ] - toShelleyMetadatum (TxMetaMap [(TxMetadataValue, TxMetadataValue)] -xs) = [(Metadatum, Metadatum)] -> Metadatum + [ TxMetadataValue -> Metadatum +toShelleyMetadatum TxMetadataValue +x | TxMetadataValue +x <- [TxMetadataValue] +xs ] +toShelleyMetadatum (TxMetaMap [(TxMetadataValue, TxMetadataValue)] +xs) = [(Metadatum, Metadatum)] -> Metadatum Shelley.Map - [ (TxMetadataValue -> Metadatum -toShelleyMetadatum TxMetadataValue -k, - TxMetadataValue -> Metadatum -toShelleyMetadatum TxMetadataValue -v) - | (TxMetadataValue -k,TxMetadataValue -v) <- [(TxMetadataValue, TxMetadataValue)] -xs ] - -fromShelleyMetadata :: Map Word64 Shelley.Metadatum -> Map Word64 TxMetadataValue -fromShelleyMetadata :: Map Word64 Metadatum -> Map Word64 TxMetadataValue + [ (TxMetadataValue -> Metadatum +toShelleyMetadatum TxMetadataValue +k, + TxMetadataValue -> Metadatum +toShelleyMetadatum TxMetadataValue +v) + | (TxMetadataValue +k,TxMetadataValue +v) <- [(TxMetadataValue, TxMetadataValue)] +xs ] + +fromShelleyMetadata :: Map Word64 Shelley.Metadatum -> Map Word64 TxMetadataValue +fromShelleyMetadata :: Map Word64 Metadatum -> Map Word64 TxMetadataValue fromShelleyMetadata = (Metadatum -> TxMetadataValue) -> Map Word64 Metadatum -> Map Word64 TxMetadataValue forall a b k. (a -> b) -> Map k a -> Map k b Map.Lazy.map Metadatum -> TxMetadataValue -fromShelleyMetadatum - where - fromShelleyMetadatum :: Shelley.Metadatum -> TxMetadataValue - fromShelleyMetadatum :: Metadatum -> TxMetadataValue -fromShelleyMetadatum (Shelley.I Integer -x) = Integer -> TxMetadataValue +fromShelleyMetadatum + +fromShelleyMetadatum :: Shelley.Metadatum -> TxMetadataValue +fromShelleyMetadatum :: Metadatum -> TxMetadataValue +fromShelleyMetadatum (Shelley.I Integer +x) = Integer -> TxMetadataValue TxMetaNumber Integer -x - fromShelleyMetadatum (Shelley.B ByteString -x) = ByteString -> TxMetadataValue +x +fromShelleyMetadatum (Shelley.B ByteString +x) = ByteString -> TxMetadataValue TxMetaBytes ByteString -x - fromShelleyMetadatum (Shelley.S Text -x) = Text -> TxMetadataValue +x +fromShelleyMetadatum (Shelley.S Text +x) = Text -> TxMetadataValue TxMetaText Text -x - fromShelleyMetadatum (Shelley.List [Metadatum] -xs) = [TxMetadataValue] -> TxMetadataValue +x +fromShelleyMetadatum (Shelley.List [Metadatum] +xs) = [TxMetadataValue] -> TxMetadataValue TxMetaList - [ Metadatum -> TxMetadataValue -fromShelleyMetadatum Metadatum -x | Metadatum -x <- [Metadatum] -xs ] - fromShelleyMetadatum (Shelley.Map [(Metadatum, Metadatum)] -xs) = [(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue + [ Metadatum -> TxMetadataValue +fromShelleyMetadatum Metadatum +x | Metadatum +x <- [Metadatum] +xs ] +fromShelleyMetadatum (Shelley.Map [(Metadatum, Metadatum)] +xs) = [(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue TxMetaMap - [ (Metadatum -> TxMetadataValue -fromShelleyMetadatum Metadatum -k, - Metadatum -> TxMetadataValue -fromShelleyMetadatum Metadatum -v) - | (Metadatum -k,Metadatum -v) <- [(Metadatum, Metadatum)] -xs ] - - --- ---------------------------------------------------------------------------- --- Validate tx metadata --- + [ (Metadatum -> TxMetadataValue +fromShelleyMetadatum Metadatum +k, + Metadatum -> TxMetadataValue +fromShelleyMetadatum Metadatum +v) + | (Metadatum +k,Metadatum +v) <- [(Metadatum, Metadatum)] +xs ] --- | Validate transaction metadata. This is for use with existing constructed --- metadata values, e.g. constructed manually or decoded from CBOR directly. --- -validateTxMetadata :: TxMetadata -> Either [(Word64, TxMetadataRangeError)] () -validateTxMetadata :: TxMetadata -> Either [(Word64, TxMetadataRangeError)] () -validateTxMetadata (TxMetadata Map Word64 TxMetadataValue -m) = - -- Collect all errors and do a top-level check to see if there are any. - case [ (Word64 -k, TxMetadataRangeError -err) - | (Word64 -k, TxMetadataValue -v) <- Map Word64 TxMetadataValue -> [(Word64, TxMetadataValue)] + +-- ---------------------------------------------------------------------------- +-- Validate tx metadata +-- + +-- | Validate transaction metadata. This is for use with existing constructed +-- metadata values, e.g. constructed manually or decoded from CBOR directly. +-- +validateTxMetadata :: TxMetadata -> Either [(Word64, TxMetadataRangeError)] () +validateTxMetadata :: TxMetadata -> Either [(Word64, TxMetadataRangeError)] () +validateTxMetadata (TxMetadata Map Word64 TxMetadataValue +m) = + -- Collect all errors and do a top-level check to see if there are any. + case [ (Word64 +k, TxMetadataRangeError +err) + | (Word64 +k, TxMetadataValue +v) <- Map Word64 TxMetadataValue -> [(Word64, TxMetadataValue)] forall k a. Map k a -> [(k, a)] Map.toList Map Word64 TxMetadataValue -m - , TxMetadataRangeError -err <- TxMetadataValue -> [TxMetadataRangeError] +m + , TxMetadataRangeError +err <- TxMetadataValue -> [TxMetadataRangeError] validateTxMetadataValue TxMetadataValue -v ] of - [] -> () -> Either [(Word64, TxMetadataRangeError)] () +v ] of + [] -> () -> Either [(Word64, TxMetadataRangeError)] () forall a b. b -> Either a b Right () - [(Word64, TxMetadataRangeError)] -errs -> [(Word64, TxMetadataRangeError)] + [(Word64, TxMetadataRangeError)] +errs -> [(Word64, TxMetadataRangeError)] -> Either [(Word64, TxMetadataRangeError)] () forall a b. a -> Either a b Left [(Word64, TxMetadataRangeError)] -errs - --- collect all errors in a monoidal fold style -validateTxMetadataValue :: TxMetadataValue -> [TxMetadataRangeError] -validateTxMetadataValue :: TxMetadataValue -> [TxMetadataRangeError] -validateTxMetadataValue (TxMetaNumber Integer -n) = - [ Integer -> TxMetadataRangeError +errs + +-- collect all errors in a monoidal fold style +validateTxMetadataValue :: TxMetadataValue -> [TxMetadataRangeError] +validateTxMetadataValue :: TxMetadataValue -> [TxMetadataRangeError] +validateTxMetadataValue (TxMetaNumber Integer +n) = + [ Integer -> TxMetadataRangeError TxMetadataNumberOutOfRange Integer -n - | Integer -n Integer -> Integer -> Bool +n + | Integer +n Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool > Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) - Bool -> Bool -> Bool + Bool -> Bool -> Bool || Integer -n Integer -> Integer -> Bool +n Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool < Integer -> Integer forall a. Num a => a -> a @@ -439,101 +444,101 @@ fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64)) - ] -validateTxMetadataValue (TxMetaBytes ByteString -bs) = - [ Int -> TxMetadataRangeError + ] +validateTxMetadataValue (TxMetaBytes ByteString +bs) = + [ Int -> TxMetadataRangeError TxMetadataBytesTooLong Int -len - | let len :: Int -len = ByteString -> Int +len + | let len :: Int +len = ByteString -> Int BS.length ByteString -bs - , Int -len Int -> Int -> Bool +bs + , Int +len Int -> Int -> Bool forall a. Ord a => a -> a -> Bool > Int txMetadataByteStringMaxLength - ] -validateTxMetadataValue (TxMetaText Text -txt) = - [ Int -> TxMetadataRangeError + ] +validateTxMetadataValue (TxMetaText Text +txt) = + [ Int -> TxMetadataRangeError TxMetadataTextTooLong Int -len - | let len :: Int -len = ByteString -> Int +len + | let len :: Int +len = ByteString -> Int BS.length (Text -> ByteString Text.encodeUtf8 Text -txt) - , Int -len Int -> Int -> Bool +txt) + , Int +len Int -> Int -> Bool forall a. Ord a => a -> a -> Bool > Int txMetadataTextStringMaxByteLength - ] -validateTxMetadataValue (TxMetaList [TxMetadataValue] -xs) = - (TxMetadataValue -> [TxMetadataRangeError]) + ] +validateTxMetadataValue (TxMetaList [TxMetadataValue] +xs) = + (TxMetadataValue -> [TxMetadataRangeError]) -> [TxMetadataValue] -> [TxMetadataRangeError] forall (t :: * -> *) m a. (Foldable t, Monoid m) => (a -> m) -> t a -> m foldMap TxMetadataValue -> [TxMetadataRangeError] validateTxMetadataValue [TxMetadataValue] -xs - -validateTxMetadataValue (TxMetaMap [(TxMetadataValue, TxMetadataValue)] -kvs) = - ((TxMetadataValue, TxMetadataValue) -> [TxMetadataRangeError]) +xs + +validateTxMetadataValue (TxMetaMap [(TxMetadataValue, TxMetadataValue)] +kvs) = + ((TxMetadataValue, TxMetadataValue) -> [TxMetadataRangeError]) -> [(TxMetadataValue, TxMetadataValue)] -> [TxMetadataRangeError] forall (t :: * -> *) m a. (Foldable t, Monoid m) => (a -> m) -> t a -> m -foldMap (\(TxMetadataValue -k, TxMetadataValue -v) -> TxMetadataValue -> [TxMetadataRangeError] +foldMap (\(TxMetadataValue +k, TxMetadataValue +v) -> TxMetadataValue -> [TxMetadataRangeError] validateTxMetadataValue TxMetadataValue -k - [TxMetadataRangeError] +k + [TxMetadataRangeError] -> [TxMetadataRangeError] -> [TxMetadataRangeError] forall a. Semigroup a => a -> a -> a <> TxMetadataValue -> [TxMetadataRangeError] validateTxMetadataValue TxMetadataValue -v) - [(TxMetadataValue, TxMetadataValue)] -kvs - --- | The maximum byte length of a transaction metadata text string value. -txMetadataTextStringMaxByteLength :: Int -txMetadataTextStringMaxByteLength :: Int +v) + [(TxMetadataValue, TxMetadataValue)] +kvs + +-- | The maximum byte length of a transaction metadata text string value. +txMetadataTextStringMaxByteLength :: Int +txMetadataTextStringMaxByteLength :: Int txMetadataTextStringMaxByteLength = Int 64 - --- | The maximum length of a transaction metadata byte string value. -txMetadataByteStringMaxLength :: Int -txMetadataByteStringMaxLength :: Int + +-- | The maximum length of a transaction metadata byte string value. +txMetadataByteStringMaxLength :: Int +txMetadataByteStringMaxLength :: Int txMetadataByteStringMaxLength = Int 64 - - --- | An error in transaction metadata due to an out-of-range value. --- -data TxMetadataRangeError = - -- | The number is outside the maximum range of @-2^64-1 .. 2^64-1@. - -- - TxMetadataNumberOutOfRange !Integer - - -- | The length of a text string metadatum value exceeds the maximum of - -- 64 bytes as UTF8. + +-- | An error in transaction metadata due to an out-of-range value. +-- +data TxMetadataRangeError = + + -- | The number is outside the maximum range of @-2^64-1 .. 2^64-1@. -- - | TxMetadataTextTooLong !Int + TxMetadataNumberOutOfRange !Integer - -- | The length of a byte string metadatum value exceeds the maximum of - -- 64 bytes. + -- | The length of a text string metadatum value exceeds the maximum of + -- 64 bytes as UTF8. -- - | TxMetadataBytesTooLong !Int - deriving (TxMetadataRangeError -> TxMetadataRangeError -> Bool + | TxMetadataTextTooLong !Int + + -- | The length of a byte string metadatum value exceeds the maximum of + -- 64 bytes. + -- + | TxMetadataBytesTooLong !Int + deriving (TxMetadataRangeError -> TxMetadataRangeError -> Bool (TxMetadataRangeError -> TxMetadataRangeError -> Bool) -> (TxMetadataRangeError -> TxMetadataRangeError -> Bool) -> Eq TxMetadataRangeError @@ -542,7 +547,7 @@ $c/= :: TxMetadataRangeError -> TxMetadataRangeError -> Bool == :: TxMetadataRangeError -> TxMetadataRangeError -> Bool $c== :: TxMetadataRangeError -> TxMetadataRangeError -> Bool -Eq, Int -> TxMetadataRangeError -> ShowS +Eq, Int -> TxMetadataRangeError -> ShowS [TxMetadataRangeError] -> ShowS TxMetadataRangeError -> String (Int -> TxMetadataRangeError -> ShowS) @@ -558,136 +563,136 @@ showsPrec :: Int -> TxMetadataRangeError -> ShowS $cshowsPrec :: Int -> TxMetadataRangeError -> ShowS Show) - -instance Error TxMetadataRangeError where - displayError :: TxMetadataRangeError -> String -displayError (TxMetadataNumberOutOfRange Integer -n) = - String + +instance Error TxMetadataRangeError where + displayError :: TxMetadataRangeError -> String +displayError (TxMetadataNumberOutOfRange Integer +n) = + String "Numeric metadata value " - String -> ShowS + String -> ShowS forall a. Semigroup a => a -> a -> a <> Integer -> String forall a. Show a => a -> String show Integer -n - String -> ShowS +n + String -> ShowS forall a. Semigroup a => a -> a -> a <> String " is outside the range -(2^64-1) .. 2^64-1." - displayError (TxMetadataTextTooLong Int -actualLen) = - String + displayError (TxMetadataTextTooLong Int +actualLen) = + String "Text string metadata value must consist of at most " - String -> ShowS + String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show Int txMetadataTextStringMaxByteLength - String -> ShowS + String -> ShowS forall a. Semigroup a => a -> a -> a <> String " UTF8 bytes, but it consists of " - String -> ShowS + String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show Int -actualLen - String -> ShowS +actualLen + String -> ShowS forall a. Semigroup a => a -> a -> a <> String " bytes." - displayError (TxMetadataBytesTooLong Int -actualLen) = - String + displayError (TxMetadataBytesTooLong Int +actualLen) = + String "Byte string metadata value must consist of at most " - String -> ShowS + String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show Int txMetadataByteStringMaxLength - String -> ShowS + String -> ShowS forall a. Semigroup a => a -> a -> a <> String " bytes, but it consists of " - String -> ShowS + String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show Int -actualLen - String -> ShowS +actualLen + String -> ShowS forall a. Semigroup a => a -> a -> a <> String " bytes." - - --- ---------------------------------------------------------------------------- --- JSON conversion --- --- | Tx metadata is similar to JSON but not exactly the same. It has some --- deliberate limitations such as no support for floating point numbers or --- special forms for null or boolean values. It also has limitations on the --- length of strings. On the other hand, unlike JSON, it distinguishes between --- byte strings and text strings. It also supports any value as map keys rather --- than just string. --- --- We provide two different mappings between tx metadata and JSON, useful --- for different purposes: --- --- 1. A mapping that allows almost any JSON value to be converted into --- tx metadata. This does not require a specific JSON schema for the --- input. It does not expose the full representation capability of tx --- metadata. + +-- ---------------------------------------------------------------------------- +-- JSON conversion +-- + +-- | Tx metadata is similar to JSON but not exactly the same. It has some +-- deliberate limitations such as no support for floating point numbers or +-- special forms for null or boolean values. It also has limitations on the +-- length of strings. On the other hand, unlike JSON, it distinguishes between +-- byte strings and text strings. It also supports any value as map keys rather +-- than just string. +-- +-- We provide two different mappings between tx metadata and JSON, useful +-- for different purposes: -- --- 2. A mapping that exposes the full representation capability of tx --- metadata, but relies on a specific JSON schema for the input JSON. --- --- In the \"no schema"\ mapping, the idea is that (almost) any JSON can be --- turned into tx metadata and then converted back, without loss. That is, we --- can round-trip the JSON. --- --- The subset of JSON supported is all JSON except: --- * No null or bool values --- * No floating point, only integers in the range of a 64bit signed integer --- * A limitation on string lengths +-- 1. A mapping that allows almost any JSON value to be converted into +-- tx metadata. This does not require a specific JSON schema for the +-- input. It does not expose the full representation capability of tx +-- metadata. +-- +-- 2. A mapping that exposes the full representation capability of tx +-- metadata, but relies on a specific JSON schema for the input JSON. +-- +-- In the \"no schema"\ mapping, the idea is that (almost) any JSON can be +-- turned into tx metadata and then converted back, without loss. That is, we +-- can round-trip the JSON. -- --- The approach for this mapping is to use whichever representation as tx --- metadata is most compact. In particular: --- --- * JSON lists and maps represented as CBOR lists and maps --- * JSON strings represented as CBOR strings --- * JSON hex strings with \"0x\" prefix represented as CBOR byte strings --- * JSON integer numbers represented as CBOR signed or unsigned numbers --- * JSON maps with string keys that parse as numbers or hex byte strings, --- represented as CBOR map keys that are actually numbers or byte strings. --- --- The string length limit depends on whether the hex string representation --- is used or not. For text strings the limit is 64 bytes for the UTF8 --- representation of the text string. For byte strings the limit is 64 bytes --- for the raw byte form (ie not the input hex, but after hex decoding). +-- The subset of JSON supported is all JSON except: +-- * No null or bool values +-- * No floating point, only integers in the range of a 64bit signed integer +-- * A limitation on string lengths +-- +-- The approach for this mapping is to use whichever representation as tx +-- metadata is most compact. In particular: +-- +-- * JSON lists and maps represented as CBOR lists and maps +-- * JSON strings represented as CBOR strings +-- * JSON hex strings with \"0x\" prefix represented as CBOR byte strings +-- * JSON integer numbers represented as CBOR signed or unsigned numbers +-- * JSON maps with string keys that parse as numbers or hex byte strings, +-- represented as CBOR map keys that are actually numbers or byte strings. -- --- In the \"detailed schema\" mapping, the idea is that we expose the full --- representation capability of the tx metadata in the form of a JSON schema. --- This means the full representation is available and can be controlled --- precisely. It also means any tx metadata can be converted into the JSON and --- back without loss. That is we can round-trip the tx metadata via the JSON and --- also round-trip schema-compliant JSON via tx metadata. --- -data TxMetadataJsonSchema = - - -- | Use the \"no schema\" mapping between JSON and tx metadata as - -- described above. - TxMetadataJsonNoSchema - - -- | Use the \"detailed schema\" mapping between JSON and tx metadata as - -- described above. - | TxMetadataJsonDetailedSchema - deriving (TxMetadataJsonSchema -> TxMetadataJsonSchema -> Bool +-- The string length limit depends on whether the hex string representation +-- is used or not. For text strings the limit is 64 bytes for the UTF8 +-- representation of the text string. For byte strings the limit is 64 bytes +-- for the raw byte form (ie not the input hex, but after hex decoding). +-- +-- In the \"detailed schema\" mapping, the idea is that we expose the full +-- representation capability of the tx metadata in the form of a JSON schema. +-- This means the full representation is available and can be controlled +-- precisely. It also means any tx metadata can be converted into the JSON and +-- back without loss. That is we can round-trip the tx metadata via the JSON and +-- also round-trip schema-compliant JSON via tx metadata. +-- +data TxMetadataJsonSchema = + + -- | Use the \"no schema\" mapping between JSON and tx metadata as + -- described above. + TxMetadataJsonNoSchema + + -- | Use the \"detailed schema\" mapping between JSON and tx metadata as + -- described above. + | TxMetadataJsonDetailedSchema + deriving (TxMetadataJsonSchema -> TxMetadataJsonSchema -> Bool (TxMetadataJsonSchema -> TxMetadataJsonSchema -> Bool) -> (TxMetadataJsonSchema -> TxMetadataJsonSchema -> Bool) -> Eq TxMetadataJsonSchema @@ -696,7 +701,7 @@ $c/= :: TxMetadataJsonSchema -> TxMetadataJsonSchema -> Bool == :: TxMetadataJsonSchema -> TxMetadataJsonSchema -> Bool $c== :: TxMetadataJsonSchema -> TxMetadataJsonSchema -> Bool -Eq, Int -> TxMetadataJsonSchema -> ShowS +Eq, Int -> TxMetadataJsonSchema -> ShowS [TxMetadataJsonSchema] -> ShowS TxMetadataJsonSchema -> String (Int -> TxMetadataJsonSchema -> ShowS) @@ -712,29 +717,29 @@ showsPrec :: Int -> TxMetadataJsonSchema -> ShowS $cshowsPrec :: Int -> TxMetadataJsonSchema -> ShowS Show) - - --- | Convert a value from JSON into tx metadata, using the given choice of --- mapping between JSON and tx metadata. --- --- This may fail with a conversion error if the JSON is outside the supported --- subset for the chosen mapping. See 'TxMetadataJsonSchema' for the details. --- -metadataFromJson :: TxMetadataJsonSchema - -> Aeson.Value - -> Either TxMetadataJsonError TxMetadata -metadataFromJson :: TxMetadataJsonSchema + + +-- | Convert a value from JSON into tx metadata, using the given choice of +-- mapping between JSON and tx metadata. +-- +-- This may fail with a conversion error if the JSON is outside the supported +-- subset for the chosen mapping. See 'TxMetadataJsonSchema' for the details. +-- +metadataFromJson :: TxMetadataJsonSchema + -> Aeson.Value + -> Either TxMetadataJsonError TxMetadata +metadataFromJson :: TxMetadataJsonSchema -> Value -> Either TxMetadataJsonError TxMetadata -metadataFromJson TxMetadataJsonSchema -schema = - \Value -vtop -> case Value -vtop of - -- The top level has to be an object - -- with unsigned integer (decimal or hex) keys - Aeson.Object Object -m -> - ([(Word64, TxMetadataValue)] -> TxMetadata) +metadataFromJson TxMetadataJsonSchema +schema = + \Value +vtop -> case Value +vtop of + -- The top level has to be an object + -- with unsigned integer (decimal or hex) keys + Aeson.Object Object +m -> + ([(Word64, TxMetadataValue)] -> TxMetadata) -> Either TxMetadataJsonError [(Word64, TxMetadataValue)] -> Either TxMetadataJsonError TxMetadata forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -747,7 +752,7 @@ . [(Word64, TxMetadataValue)] -> Map Word64 TxMetadataValue forall k a. Ord k => [(k, a)] -> Map k a Map.fromList) - (Either TxMetadataJsonError [(Word64, TxMetadataValue)] + (Either TxMetadataJsonError [(Word64, TxMetadataValue)] -> Either TxMetadataJsonError TxMetadata) -> ([(Text, Value)] -> Either TxMetadataJsonError [(Word64, TxMetadataValue)]) @@ -768,36 +773,36 @@ forall a b c. (a -> b -> c) -> (a, b) -> c uncurry Text -> Value -> Either TxMetadataJsonError (Word64, TxMetadataValue) -metadataKeyPairFromJson) - ([(Text, Value)] -> Either TxMetadataJsonError TxMetadata) +metadataKeyPairFromJson) + ([(Text, Value)] -> Either TxMetadataJsonError TxMetadata) -> [(Text, Value)] -> Either TxMetadataJsonError TxMetadata forall a b. (a -> b) -> a -> b $ Object -> [(Text, Value)] forall k v. HashMap k v -> [(k, v)] HashMap.toList Object -m - - Value +m + + Value _ -> TxMetadataJsonError -> Either TxMetadataJsonError TxMetadata forall a b. a -> Either a b Left TxMetadataJsonError TxMetadataJsonToplevelNotMap - where - metadataKeyPairFromJson :: Text - -> Aeson.Value - -> Either TxMetadataJsonError - (Word64, TxMetadataValue) - metadataKeyPairFromJson :: Text + where + metadataKeyPairFromJson :: Text + -> Aeson.Value + -> Either TxMetadataJsonError + (Word64, TxMetadataValue) + metadataKeyPairFromJson :: Text -> Value -> Either TxMetadataJsonError (Word64, TxMetadataValue) -metadataKeyPairFromJson Text -k Value -v = do - Word64 -k' <- Text -> Either TxMetadataJsonError Word64 -convTopLevelKey Text -k - TxMetadataValue -v' <- (TxMetadataJsonSchemaError -> TxMetadataJsonError) +metadataKeyPairFromJson Text +k Value +v = do + Word64 +k' <- Text -> Either TxMetadataJsonError Word64 +convTopLevelKey Text +k + TxMetadataValue +v' <- (TxMetadataJsonSchemaError -> TxMetadataJsonError) -> Either TxMetadataJsonSchemaError TxMetadataValue -> Either TxMetadataJsonError TxMetadataValue forall (p :: * -> * -> *) a b c. @@ -805,35 +810,35 @@ (a -> b) -> p a c -> p b c first (Word64 -> Value -> TxMetadataJsonSchemaError -> TxMetadataJsonError TxMetadataJsonSchemaError Word64 -k' Value -v) - (Value -> Either TxMetadataJsonSchemaError TxMetadataValue -metadataValueFromJson Value -v) - (TxMetadataRangeError -> TxMetadataJsonError) +k' Value +v) + (Value -> Either TxMetadataJsonSchemaError TxMetadataValue +metadataValueFromJson Value +v) + (TxMetadataRangeError -> TxMetadataJsonError) -> Either TxMetadataRangeError () -> Either TxMetadataJsonError () forall (p :: * -> * -> *) a b c. Bifunctor p => (a -> b) -> p a c -> p b c first (Word64 -> Value -> TxMetadataRangeError -> TxMetadataJsonError TxMetadataRangeError Word64 -k' Value -v) - (TxMetadataValue -> Either TxMetadataRangeError () -validateMetadataValue TxMetadataValue -v') - (Word64, TxMetadataValue) +k' Value +v) + (TxMetadataValue -> Either TxMetadataRangeError () +validateMetadataValue TxMetadataValue +v') + (Word64, TxMetadataValue) -> Either TxMetadataJsonError (Word64, TxMetadataValue) forall (m :: * -> *) a. Monad m => a -> m a return (Word64 -k', TxMetadataValue -v') - - convTopLevelKey :: Text -> Either TxMetadataJsonError Word64 - convTopLevelKey :: Text -> Either TxMetadataJsonError Word64 -convTopLevelKey Text -k = - case Parser Integer -> Text -> Maybe Integer +k', TxMetadataValue +v') + + convTopLevelKey :: Text -> Either TxMetadataJsonError Word64 + convTopLevelKey :: Text -> Either TxMetadataJsonError Word64 +convTopLevelKey Text +k = + case Parser Integer -> Text -> Maybe Integer forall a. Parser a -> Text -> Maybe a parseAll (Parser Integer pUnsigned Parser Integer -> Parser ByteString () -> Parser Integer @@ -841,292 +846,292 @@ <* Parser ByteString () forall t. Chunk t => Parser t () Atto.endOfInput) Text -k of - Just Integer -n | Integer -n Integer -> Integer -> Bool +k of + Just Integer +n | Integer +n Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool <= Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 forall a. Bounded a => a maxBound :: Word64) - -> Word64 -> Either TxMetadataJsonError Word64 + -> Word64 -> Either TxMetadataJsonError Word64 forall a b. b -> Either a b Right (Integer -> Word64 forall a b. (Integral a, Num b) => a -> b fromIntegral Integer -n) - Maybe Integer +n) + Maybe Integer _ -> TxMetadataJsonError -> Either TxMetadataJsonError Word64 forall a b. a -> Either a b Left (Text -> TxMetadataJsonError TxMetadataJsonToplevelBadKey Text -k) - - validateMetadataValue :: TxMetadataValue -> Either TxMetadataRangeError () - validateMetadataValue :: TxMetadataValue -> Either TxMetadataRangeError () -validateMetadataValue TxMetadataValue -v = - case TxMetadataValue -> [TxMetadataRangeError] +k) + + validateMetadataValue :: TxMetadataValue -> Either TxMetadataRangeError () + validateMetadataValue :: TxMetadataValue -> Either TxMetadataRangeError () +validateMetadataValue TxMetadataValue +v = + case TxMetadataValue -> [TxMetadataRangeError] validateTxMetadataValue TxMetadataValue -v of - [] -> () -> Either TxMetadataRangeError () +v of + [] -> () -> Either TxMetadataRangeError () forall a b. b -> Either a b Right () - TxMetadataRangeError -err : [TxMetadataRangeError] + TxMetadataRangeError +err : [TxMetadataRangeError] _ -> TxMetadataRangeError -> Either TxMetadataRangeError () forall a b. a -> Either a b Left TxMetadataRangeError -err - - metadataValueFromJson :: Aeson.Value - -> Either TxMetadataJsonSchemaError TxMetadataValue - metadataValueFromJson :: Value -> Either TxMetadataJsonSchemaError TxMetadataValue -metadataValueFromJson = - case TxMetadataJsonSchema -schema of - TxMetadataJsonSchema +err + + metadataValueFromJson :: Aeson.Value + -> Either TxMetadataJsonSchemaError TxMetadataValue + metadataValueFromJson :: Value -> Either TxMetadataJsonSchemaError TxMetadataValue +metadataValueFromJson = + case TxMetadataJsonSchema +schema of + TxMetadataJsonSchema TxMetadataJsonNoSchema -> Value -> Either TxMetadataJsonSchemaError TxMetadataValue metadataValueFromJsonNoSchema - TxMetadataJsonSchema + TxMetadataJsonSchema TxMetadataJsonDetailedSchema -> Value -> Either TxMetadataJsonSchemaError TxMetadataValue metadataValueFromJsonDetailedSchema - - --- | Convert a tx metadata value into JSON , using the given choice of mapping --- between JSON and tx metadata. --- --- This conversion is total but is not necessarily invertible. --- See 'TxMetadataJsonSchema' for the details. --- -metadataToJson :: TxMetadataJsonSchema - -> TxMetadata - -> Aeson.Value -metadataToJson :: TxMetadataJsonSchema -> TxMetadata -> Value -metadataToJson TxMetadataJsonSchema -schema = - \(TxMetadata Map Word64 TxMetadataValue -mdMap) -> - [(Text, Value)] -> Value + + +-- | Convert a tx metadata value into JSON , using the given choice of mapping +-- between JSON and tx metadata. +-- +-- This conversion is total but is not necessarily invertible. +-- See 'TxMetadataJsonSchema' for the details. +-- +metadataToJson :: TxMetadataJsonSchema + -> TxMetadata + -> Aeson.Value +metadataToJson :: TxMetadataJsonSchema -> TxMetadata -> Value +metadataToJson TxMetadataJsonSchema +schema = + \(TxMetadata Map Word64 TxMetadataValue +mdMap) -> + [(Text, Value)] -> Value Aeson.object - [ (String -> Text + [ (String -> Text Text.pack (Word64 -> String forall a. Show a => a -> String show Word64 -k), TxMetadataValue -> Value -metadataValueToJson TxMetadataValue -v) - | (Word64 -k, TxMetadataValue -v) <- Map Word64 TxMetadataValue -> [(Word64, TxMetadataValue)] +k), TxMetadataValue -> Value +metadataValueToJson TxMetadataValue +v) + | (Word64 +k, TxMetadataValue +v) <- Map Word64 TxMetadataValue -> [(Word64, TxMetadataValue)] forall k a. Map k a -> [(k, a)] Map.toList Map Word64 TxMetadataValue -mdMap ] - where - metadataValueToJson :: TxMetadataValue -> Aeson.Value - metadataValueToJson :: TxMetadataValue -> Value -metadataValueToJson = - case TxMetadataJsonSchema -schema of - TxMetadataJsonSchema +mdMap ] + where + metadataValueToJson :: TxMetadataValue -> Aeson.Value + metadataValueToJson :: TxMetadataValue -> Value +metadataValueToJson = + case TxMetadataJsonSchema +schema of + TxMetadataJsonSchema TxMetadataJsonNoSchema -> TxMetadataValue -> Value metadataValueToJsonNoSchema - TxMetadataJsonSchema + TxMetadataJsonSchema TxMetadataJsonDetailedSchema -> TxMetadataValue -> Value metadataValueToJsonDetailedSchema - - --- ---------------------------------------------------------------------------- --- JSON conversion using the the "no schema" style --- -metadataValueToJsonNoSchema :: TxMetadataValue -> Aeson.Value -metadataValueToJsonNoSchema :: TxMetadataValue -> Value + +-- ---------------------------------------------------------------------------- +-- JSON conversion using the the "no schema" style +-- + +metadataValueToJsonNoSchema :: TxMetadataValue -> Aeson.Value +metadataValueToJsonNoSchema :: TxMetadataValue -> Value metadataValueToJsonNoSchema = TxMetadataValue -> Value -conv - where - conv :: TxMetadataValue -> Aeson.Value - conv :: TxMetadataValue -> Value -conv (TxMetaNumber Integer -n) = Scientific -> Value +conv + where + conv :: TxMetadataValue -> Aeson.Value + conv :: TxMetadataValue -> Value +conv (TxMetaNumber Integer +n) = Scientific -> Value Aeson.Number (Integer -> Scientific forall a. Num a => Integer -> a fromInteger Integer -n) - conv (TxMetaBytes ByteString -bs) = Text -> Value +n) + conv (TxMetaBytes ByteString +bs) = Text -> Value Aeson.String (Text bytesPrefix - Text -> Text -> Text + Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> ByteString -> Text Text.decodeLatin1 (ByteString -> ByteString Base16.encode ByteString -bs)) - - conv (TxMetaText Text -txt) = Text -> Value +bs)) + + conv (TxMetaText Text +txt) = Text -> Value Aeson.String Text -txt - conv (TxMetaList [TxMetadataValue] -vs) = Array -> Value +txt + conv (TxMetaList [TxMetadataValue] +vs) = Array -> Value Aeson.Array ([Value] -> Array forall a. [a] -> Vector a Vector.fromList ((TxMetadataValue -> Value) -> [TxMetadataValue] -> [Value] forall a b. (a -> b) -> [a] -> [b] map TxMetadataValue -> Value -conv [TxMetadataValue] -vs)) - conv (TxMetaMap [(TxMetadataValue, TxMetadataValue)] -kvs) = [(Text, Value)] -> Value +conv [TxMetadataValue] +vs)) + conv (TxMetaMap [(TxMetadataValue, TxMetadataValue)] +kvs) = [(Text, Value)] -> Value Aeson.object - [ (TxMetadataValue -> Text -convKey TxMetadataValue -k, TxMetadataValue -> Value -conv TxMetadataValue -v) - | (TxMetadataValue -k, TxMetadataValue -v) <- [(TxMetadataValue, TxMetadataValue)] -kvs ] - - -- Metadata allows any value as a key, not just string as JSON does. - -- For simple types we just convert them to string dirctly. - -- For structured keys we render them as JSON and use that as the string. - convKey :: TxMetadataValue -> Text - convKey :: TxMetadataValue -> Text -convKey (TxMetaNumber Integer -n) = String -> Text + [ (TxMetadataValue -> Text +convKey TxMetadataValue +k, TxMetadataValue -> Value +conv TxMetadataValue +v) + | (TxMetadataValue +k, TxMetadataValue +v) <- [(TxMetadataValue, TxMetadataValue)] +kvs ] + + -- Metadata allows any value as a key, not just string as JSON does. + -- For simple types we just convert them to string dirctly. + -- For structured keys we render them as JSON and use that as the string. + convKey :: TxMetadataValue -> Text + convKey :: TxMetadataValue -> Text +convKey (TxMetaNumber Integer +n) = String -> Text Text.pack (Integer -> String forall a. Show a => a -> String show Integer -n) - convKey (TxMetaBytes ByteString -bs) = Text +n) + convKey (TxMetaBytes ByteString +bs) = Text bytesPrefix - Text -> Text -> Text + Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> ByteString -> Text Text.decodeLatin1 (ByteString -> ByteString Base16.encode ByteString -bs) - convKey (TxMetaText Text -txt) = Text -txt - convKey TxMetadataValue -v = Text -> Text +bs) + convKey (TxMetaText Text +txt) = Text +txt + convKey TxMetadataValue +v = Text -> Text Text.Lazy.toStrict - (Text -> Text) + (Text -> Text) -> (TxMetadataValue -> Text) -> TxMetadataValue -> Text forall b c a. (b -> c) -> (a -> b) -> a -> c . Value -> Text forall a. ToJSON a => a -> Text Aeson.Text.encodeToLazyText - (Value -> Text) + (Value -> Text) -> (TxMetadataValue -> Value) -> TxMetadataValue -> Text forall b c a. (b -> c) -> (a -> b) -> a -> c . TxMetadataValue -> Value -conv - (TxMetadataValue -> Text) -> TxMetadataValue -> Text +conv + (TxMetadataValue -> Text) -> TxMetadataValue -> Text forall a b. (a -> b) -> a -> b $ TxMetadataValue -v - -metadataValueFromJsonNoSchema :: Aeson.Value - -> Either TxMetadataJsonSchemaError - TxMetadataValue -metadataValueFromJsonNoSchema :: Value -> Either TxMetadataJsonSchemaError TxMetadataValue +v + +metadataValueFromJsonNoSchema :: Aeson.Value + -> Either TxMetadataJsonSchemaError + TxMetadataValue +metadataValueFromJsonNoSchema :: Value -> Either TxMetadataJsonSchemaError TxMetadataValue metadataValueFromJsonNoSchema = Value -> Either TxMetadataJsonSchemaError TxMetadataValue -conv - where - conv :: Aeson.Value - -> Either TxMetadataJsonSchemaError TxMetadataValue - conv :: Value -> Either TxMetadataJsonSchemaError TxMetadataValue -conv Value +conv + where + conv :: Aeson.Value + -> Either TxMetadataJsonSchemaError TxMetadataValue + conv :: Value -> Either TxMetadataJsonSchemaError TxMetadataValue +conv Value Aeson.Null = TxMetadataJsonSchemaError -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. a -> Either a b Left TxMetadataJsonSchemaError TxMetadataJsonNullNotAllowed - conv Aeson.Bool{} = TxMetadataJsonSchemaError + conv Aeson.Bool{} = TxMetadataJsonSchemaError -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. a -> Either a b Left TxMetadataJsonSchemaError TxMetadataJsonBoolNotAllowed - - conv (Aeson.Number Scientific -d) = - case Scientific -> Either Double Integer + + conv (Aeson.Number Scientific +d) = + case Scientific -> Either Double Integer forall r i. (RealFloat r, Integral i) => Scientific -> Either r i Scientific.floatingOrInteger Scientific -d :: Either Double Integer of - Left Double -n -> TxMetadataJsonSchemaError +d :: Either Double Integer of + Left Double +n -> TxMetadataJsonSchemaError -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. a -> Either a b Left (Double -> TxMetadataJsonSchemaError TxMetadataJsonNumberNotInteger Double -n) - Right Integer -n -> TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue +n) + Right Integer +n -> TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. b -> Either a b Right (Integer -> TxMetadataValue TxMetaNumber Integer -n) - - conv (Aeson.String Text -s) - | Just Text -s' <- Text -> Text -> Maybe Text +n) + + conv (Aeson.String Text +s) + | Just Text +s' <- Text -> Text -> Maybe Text Text.stripPrefix Text bytesPrefix Text -s - , let bs' :: ByteString -bs' = Text -> ByteString +s + , let bs' :: ByteString +bs' = Text -> ByteString Text.encodeUtf8 Text -s' - , Right ByteString -bs <- ByteString -> Either String ByteString +s' + , Right ByteString +bs <- ByteString -> Either String ByteString Base16.decode ByteString -bs' - , Bool -> Bool +bs' + , Bool -> Bool not ((Char -> Bool) -> ByteString -> Bool -BSC.any (\Char -c -> Char -c Char -> Char -> Bool +BSC.any (\Char +c -> Char +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool >= Char 'A' Bool -> Bool -> Bool && Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool <= Char 'F') ByteString -bs') - = TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue +bs') + = TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. b -> Either a b Right (ByteString -> TxMetadataValue TxMetaBytes ByteString -bs) - - conv (Aeson.String Text -s) = TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue +bs) + + conv (Aeson.String Text +s) = TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. b -> Either a b Right (Text -> TxMetadataValue TxMetaText Text -s) - - conv (Aeson.Array Array -vs) = - ([TxMetadataValue] -> TxMetadataValue) +s) + + conv (Aeson.Array Array +vs) = + ([TxMetadataValue] -> TxMetadataValue) -> Either TxMetadataJsonSchemaError [TxMetadataValue] -> Either TxMetadataJsonSchemaError TxMetadataValue forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap [TxMetadataValue] -> TxMetadataValue TxMetaList - (Either TxMetadataJsonSchemaError [TxMetadataValue] + (Either TxMetadataJsonSchemaError [TxMetadataValue] -> Either TxMetadataJsonSchemaError TxMetadataValue) -> ([Value] -> Either TxMetadataJsonSchemaError [TxMetadataValue]) -> [Value] @@ -1138,25 +1143,25 @@ (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse Value -> Either TxMetadataJsonSchemaError TxMetadataValue -conv - ([Value] -> Either TxMetadataJsonSchemaError TxMetadataValue) +conv + ([Value] -> Either TxMetadataJsonSchemaError TxMetadataValue) -> [Value] -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. (a -> b) -> a -> b $ Array -> [Value] forall a. Vector a -> [a] Vector.toList Array -vs - - conv (Aeson.Object Object -kvs) = - ([(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue) +vs + + conv (Aeson.Object Object +kvs) = + ([(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue) -> Either TxMetadataJsonSchemaError [(TxMetadataValue, TxMetadataValue)] -> Either TxMetadataJsonSchemaError TxMetadataValue forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap [(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue TxMetaMap - (Either + (Either TxMetadataJsonSchemaError [(TxMetadataValue, TxMetadataValue)] -> Either TxMetadataJsonSchemaError TxMetadataValue) -> ([(Text, Value)] @@ -1174,19 +1179,19 @@ forall (t :: * -> *) (f :: * -> *) a b. (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) -traverse (\(Text -k,Value -v) -> (,) (Text -> TxMetadataValue -convKey Text -k) (TxMetadataValue -> (TxMetadataValue, TxMetadataValue)) +traverse (\(Text +k,Value +v) -> (,) (Text -> TxMetadataValue +convKey Text +k) (TxMetadataValue -> (TxMetadataValue, TxMetadataValue)) -> Either TxMetadataJsonSchemaError TxMetadataValue -> Either TxMetadataJsonSchemaError (TxMetadataValue, TxMetadataValue) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Value -> Either TxMetadataJsonSchemaError TxMetadataValue -conv Value -v) - ([(Text, Value)] +conv Value +v) + ([(Text, Value)] -> Either TxMetadataJsonSchemaError [(TxMetadataValue, TxMetadataValue)]) -> ([(Text, Value)] -> [(Text, Value)]) @@ -1199,7 +1204,7 @@ List.sortOn (Text, Value) -> Text forall a b. (a, b) -> a fst - ([(Text, Value)] + ([(Text, Value)] -> Either TxMetadataJsonSchemaError TxMetadataValue) -> [(Text, Value)] -> Either TxMetadataJsonSchemaError TxMetadataValue @@ -1207,21 +1212,21 @@ $ Object -> [(Text, Value)] forall k v. HashMap k v -> [(k, v)] HashMap.toList Object -kvs - - convKey :: Text -> TxMetadataValue - convKey :: Text -> TxMetadataValue -convKey Text -s = - TxMetadataValue -> Maybe TxMetadataValue -> TxMetadataValue +kvs + + convKey :: Text -> TxMetadataValue + convKey :: Text -> TxMetadataValue +convKey Text +s = + TxMetadataValue -> Maybe TxMetadataValue -> TxMetadataValue forall a. a -> Maybe a -> a fromMaybe (Text -> TxMetadataValue TxMetaText Text -s) (Maybe TxMetadataValue -> TxMetadataValue) +s) (Maybe TxMetadataValue -> TxMetadataValue) -> Maybe TxMetadataValue -> TxMetadataValue forall a b. (a -> b) -> a -> b $ - Parser TxMetadataValue -> Text -> Maybe TxMetadataValue + Parser TxMetadataValue -> Text -> Maybe TxMetadataValue forall a. Parser a -> Text -> Maybe a parseAll (((Integer -> TxMetadataValue) -> Parser Integer -> Parser TxMetadataValue @@ -1234,7 +1239,7 @@ <* Parser ByteString () forall t. Chunk t => Parser t () Atto.endOfInput) - Parser TxMetadataValue + Parser TxMetadataValue -> Parser TxMetadataValue -> Parser TxMetadataValue forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> ((ByteString -> TxMetadataValue) @@ -1248,187 +1253,187 @@ <* Parser ByteString () forall t. Chunk t => Parser t () Atto.endOfInput)) Text -s - --- | JSON strings that are base16 encoded and prefixed with 'bytesPrefix' will --- be encoded as CBOR bytestrings. -bytesPrefix :: Text -bytesPrefix :: Text +s + +-- | JSON strings that are base16 encoded and prefixed with 'bytesPrefix' will +-- be encoded as CBOR bytestrings. +bytesPrefix :: Text +bytesPrefix :: Text bytesPrefix = Text "0x" - - --- ---------------------------------------------------------------------------- --- JSON conversion using the "detailed schema" style --- -metadataValueToJsonDetailedSchema :: TxMetadataValue -> Aeson.Value -metadataValueToJsonDetailedSchema :: TxMetadataValue -> Value + +-- ---------------------------------------------------------------------------- +-- JSON conversion using the "detailed schema" style +-- + +metadataValueToJsonDetailedSchema :: TxMetadataValue -> Aeson.Value +metadataValueToJsonDetailedSchema :: TxMetadataValue -> Value metadataValueToJsonDetailedSchema = TxMetadataValue -> Value -conv - where - conv :: TxMetadataValue -> Aeson.Value - conv :: TxMetadataValue -> Value -conv (TxMetaNumber Integer -n) = Text -> Value -> Value -singleFieldObject Text +conv + where + conv :: TxMetadataValue -> Aeson.Value + conv :: TxMetadataValue -> Value +conv (TxMetaNumber Integer +n) = Text -> Value -> Value +singleFieldObject Text "int" - (Value -> Value) -> (Scientific -> Value) -> Scientific -> Value + (Value -> Value) -> (Scientific -> Value) -> Scientific -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c . Scientific -> Value Aeson.Number - (Scientific -> Value) -> Scientific -> Value + (Scientific -> Value) -> Scientific -> Value forall a b. (a -> b) -> a -> b $ Integer -> Scientific forall a. Num a => Integer -> a fromInteger Integer -n - conv (TxMetaBytes ByteString -bs) = Text -> Value -> Value -singleFieldObject Text +n + conv (TxMetaBytes ByteString +bs) = Text -> Value -> Value +singleFieldObject Text "bytes" - (Value -> Value) -> (Text -> Value) -> Text -> Value + (Value -> Value) -> (Text -> Value) -> Text -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c . Text -> Value Aeson.String - (Text -> Value) -> Text -> Value + (Text -> Value) -> Text -> Value forall a b. (a -> b) -> a -> b $ ByteString -> Text Text.decodeLatin1 (ByteString -> ByteString Base16.encode ByteString -bs) - conv (TxMetaText Text -txt) = Text -> Value -> Value -singleFieldObject Text +bs) + conv (TxMetaText Text +txt) = Text -> Value -> Value +singleFieldObject Text "string" - (Value -> Value) -> (Text -> Value) -> Text -> Value + (Value -> Value) -> (Text -> Value) -> Text -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c . Text -> Value Aeson.String - (Text -> Value) -> Text -> Value + (Text -> Value) -> Text -> Value forall a b. (a -> b) -> a -> b $ Text -txt - conv (TxMetaList [TxMetadataValue] -vs) = Text -> Value -> Value -singleFieldObject Text +txt + conv (TxMetaList [TxMetadataValue] +vs) = Text -> Value -> Value +singleFieldObject Text "list" - (Value -> Value) -> (Array -> Value) -> Array -> Value + (Value -> Value) -> (Array -> Value) -> Array -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c . Array -> Value Aeson.Array - (Array -> Value) -> Array -> Value + (Array -> Value) -> Array -> Value forall a b. (a -> b) -> a -> b $ [Value] -> Array forall a. [a] -> Vector a Vector.fromList ((TxMetadataValue -> Value) -> [TxMetadataValue] -> [Value] forall a b. (a -> b) -> [a] -> [b] map TxMetadataValue -> Value -conv [TxMetadataValue] -vs) - conv (TxMetaMap [(TxMetadataValue, TxMetadataValue)] -kvs) = Text -> Value -> Value -singleFieldObject Text +conv [TxMetadataValue] +vs) + conv (TxMetaMap [(TxMetadataValue, TxMetadataValue)] +kvs) = Text -> Value -> Value +singleFieldObject Text "map" - (Value -> Value) -> (Array -> Value) -> Array -> Value + (Value -> Value) -> (Array -> Value) -> Array -> Value forall b c a. (b -> c) -> (a -> b) -> a -> c . Array -> Value Aeson.Array - (Array -> Value) -> Array -> Value + (Array -> Value) -> Array -> Value forall a b. (a -> b) -> a -> b $ [Value] -> Array forall a. [a] -> Vector a Vector.fromList - [ [(Text, Value)] -> Value + [ [(Text, Value)] -> Value Aeson.object [ (Text "k", TxMetadataValue -> Value -conv TxMetadataValue -k), (Text +conv TxMetadataValue +k), (Text "v", TxMetadataValue -> Value -conv TxMetadataValue -v) ] - | (TxMetadataValue -k, TxMetadataValue -v) <- [(TxMetadataValue, TxMetadataValue)] -kvs ] - - singleFieldObject :: Text -> Value -> Value -singleFieldObject Text -name Value -v = [(Text, Value)] -> Value +conv TxMetadataValue +v) ] + | (TxMetadataValue +k, TxMetadataValue +v) <- [(TxMetadataValue, TxMetadataValue)] +kvs ] + + singleFieldObject :: Text -> Value -> Value +singleFieldObject Text +name Value +v = [(Text, Value)] -> Value Aeson.object [(Text -name, Value -v)] - -metadataValueFromJsonDetailedSchema :: Aeson.Value - -> Either TxMetadataJsonSchemaError - TxMetadataValue -metadataValueFromJsonDetailedSchema :: Value -> Either TxMetadataJsonSchemaError TxMetadataValue +name, Value +v)] + +metadataValueFromJsonDetailedSchema :: Aeson.Value + -> Either TxMetadataJsonSchemaError + TxMetadataValue +metadataValueFromJsonDetailedSchema :: Value -> Either TxMetadataJsonSchemaError TxMetadataValue metadataValueFromJsonDetailedSchema = Value -> Either TxMetadataJsonSchemaError TxMetadataValue -conv - where - conv :: Aeson.Value - -> Either TxMetadataJsonSchemaError TxMetadataValue - conv :: Value -> Either TxMetadataJsonSchemaError TxMetadataValue -conv (Aeson.Object Object -m) = - case Object -> [(Text, Value)] +conv + where + conv :: Aeson.Value + -> Either TxMetadataJsonSchemaError TxMetadataValue + conv :: Value -> Either TxMetadataJsonSchemaError TxMetadataValue +conv (Aeson.Object Object +m) = + case Object -> [(Text, Value)] forall k v. HashMap k v -> [(k, v)] HashMap.toList Object -m of - [(Text -"int", Aeson.Number Scientific -d)] -> - case Scientific -> Either Double Integer +m of + [(Text +"int", Aeson.Number Scientific +d)] -> + case Scientific -> Either Double Integer forall r i. (RealFloat r, Integral i) => Scientific -> Either r i Scientific.floatingOrInteger Scientific -d :: Either Double Integer of - Left Double -n -> TxMetadataJsonSchemaError +d :: Either Double Integer of + Left Double +n -> TxMetadataJsonSchemaError -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. a -> Either a b Left (Double -> TxMetadataJsonSchemaError TxMetadataJsonNumberNotInteger Double -n) - Right Integer -n -> TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue +n) + Right Integer +n -> TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. b -> Either a b Right (Integer -> TxMetadataValue TxMetaNumber Integer -n) - - [(Text -"bytes", Aeson.String Text -s)] - | Right ByteString -bs <- ByteString -> Either String ByteString +n) + + [(Text +"bytes", Aeson.String Text +s)] + | Right ByteString +bs <- ByteString -> Either String ByteString Base16.decode (Text -> ByteString Text.encodeUtf8 Text -s) - -> TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue +s) + -> TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. b -> Either a b Right (ByteString -> TxMetadataValue TxMetaBytes ByteString -bs) - - [(Text -"string", Aeson.String Text -s)] -> TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue +bs) + + [(Text +"string", Aeson.String Text +s)] -> TxMetadataValue -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. b -> Either a b Right (Text -> TxMetadataValue TxMetaText Text -s) - - [(Text -"list", Aeson.Array Array -vs)] -> - ([TxMetadataValue] -> TxMetadataValue) +s) + + [(Text +"list", Aeson.Array Array +vs)] -> + ([TxMetadataValue] -> TxMetadataValue) -> Either TxMetadataJsonSchemaError [TxMetadataValue] -> Either TxMetadataJsonSchemaError TxMetadataValue forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap [TxMetadataValue] -> TxMetadataValue TxMetaList - (Either TxMetadataJsonSchemaError [TxMetadataValue] + (Either TxMetadataJsonSchemaError [TxMetadataValue] -> Either TxMetadataJsonSchemaError TxMetadataValue) -> ([Value] -> Either TxMetadataJsonSchemaError [TxMetadataValue]) -> [Value] @@ -1440,26 +1445,26 @@ (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse Value -> Either TxMetadataJsonSchemaError TxMetadataValue -conv - ([Value] -> Either TxMetadataJsonSchemaError TxMetadataValue) +conv + ([Value] -> Either TxMetadataJsonSchemaError TxMetadataValue) -> [Value] -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. (a -> b) -> a -> b $ Array -> [Value] forall a. Vector a -> [a] Vector.toList Array -vs - - [(Text -"map", Aeson.Array Array -kvs)] -> - ([(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue) +vs + + [(Text +"map", Aeson.Array Array +kvs)] -> + ([(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue) -> Either TxMetadataJsonSchemaError [(TxMetadataValue, TxMetadataValue)] -> Either TxMetadataJsonSchemaError TxMetadataValue forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap [(TxMetadataValue, TxMetadataValue)] -> TxMetadataValue TxMetaMap - (Either + (Either TxMetadataJsonSchemaError [(TxMetadataValue, TxMetadataValue)] -> Either TxMetadataJsonSchemaError TxMetadataValue) -> ([Value] @@ -1480,19 +1485,19 @@ traverse Value -> Either TxMetadataJsonSchemaError (TxMetadataValue, TxMetadataValue) -convKeyValuePair - ([Value] -> Either TxMetadataJsonSchemaError TxMetadataValue) +convKeyValuePair + ([Value] -> Either TxMetadataJsonSchemaError TxMetadataValue) -> [Value] -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. (a -> b) -> a -> b $ Array -> [Value] forall a. Vector a -> [a] Vector.toList Array -kvs - - [(Text -key, Value -v)] | Text -key Text -> [Text] -> Bool +kvs + + [(Text +key, Value +v)] | Text +key Text -> [Text] -> Bool forall (t :: * -> *) a. (Foldable t, Eq a) => a -> t a -> Bool `elem` [Text "int", Text @@ -1500,58 +1505,58 @@ "string", Text "list", Text "map"] -> - TxMetadataJsonSchemaError + TxMetadataJsonSchemaError -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. a -> Either a b Left (Text -> Value -> TxMetadataJsonSchemaError TxMetadataJsonTypeMismatch Text -key Value -v) - - [(Text, Value)] -kvs -> TxMetadataJsonSchemaError +key Value +v) + + [(Text, Value)] +kvs -> TxMetadataJsonSchemaError -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. a -> Either a b Left ([(Text, Value)] -> TxMetadataJsonSchemaError TxMetadataJsonBadObject [(Text, Value)] -kvs) - - conv Value -v = TxMetadataJsonSchemaError +kvs) + + conv Value +v = TxMetadataJsonSchemaError -> Either TxMetadataJsonSchemaError TxMetadataValue forall a b. a -> Either a b Left (Value -> TxMetadataJsonSchemaError TxMetadataJsonNotObject Value -v) - - convKeyValuePair :: Aeson.Value - -> Either TxMetadataJsonSchemaError - (TxMetadataValue, TxMetadataValue) - convKeyValuePair :: Value +v) + + convKeyValuePair :: Aeson.Value + -> Either TxMetadataJsonSchemaError + (TxMetadataValue, TxMetadataValue) + convKeyValuePair :: Value -> Either TxMetadataJsonSchemaError (TxMetadataValue, TxMetadataValue) -convKeyValuePair (Aeson.Object Object -m) - | Object -> Int +convKeyValuePair (Aeson.Object Object +m) + | Object -> Int forall k v. HashMap k v -> Int HashMap.size Object -m Int -> Int -> Bool +m Int -> Int -> Bool forall a. Eq a => a -> a -> Bool == Int 2 - , Just Value -k <- Object -m Object -> Text -> Maybe Value + , Just Value +k <- Object +m Object -> Text -> Maybe Value forall k v. (Eq k, Hashable k) => HashMap k v -> k -> Maybe v HashMap.!? Text "k" - , Just Value -v <- Object -m Object -> Text -> Maybe Value + , Just Value +v <- Object +m Object -> Text -> Maybe Value forall k v. (Eq k, Hashable k) => HashMap k v -> k -> Maybe v HashMap.!? Text "v" - = (,) (TxMetadataValue + = (,) (TxMetadataValue -> TxMetadataValue -> (TxMetadataValue, TxMetadataValue)) -> Either TxMetadataJsonSchemaError TxMetadataValue -> Either @@ -1559,8 +1564,8 @@ (TxMetadataValue -> (TxMetadataValue, TxMetadataValue)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Value -> Either TxMetadataJsonSchemaError TxMetadataValue -conv Value -k Either +conv Value +k Either TxMetadataJsonSchemaError (TxMetadataValue -> (TxMetadataValue, TxMetadataValue)) -> Either TxMetadataJsonSchemaError TxMetadataValue @@ -1568,29 +1573,29 @@ TxMetadataJsonSchemaError (TxMetadataValue, TxMetadataValue) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Value -> Either TxMetadataJsonSchemaError TxMetadataValue -conv Value -v - - convKeyValuePair Value -v = TxMetadataJsonSchemaError +conv Value +v + + convKeyValuePair Value +v = TxMetadataJsonSchemaError -> Either TxMetadataJsonSchemaError (TxMetadataValue, TxMetadataValue) forall a b. a -> Either a b Left (Value -> TxMetadataJsonSchemaError TxMetadataJsonBadMapPair Value -v) - - --- ---------------------------------------------------------------------------- --- Shared JSON conversion error types --- +v) -data TxMetadataJsonError = - TxMetadataJsonToplevelNotMap - | TxMetadataJsonToplevelBadKey !Text - | TxMetadataJsonSchemaError !Word64 !Aeson.Value !TxMetadataJsonSchemaError - | TxMetadataRangeError !Word64 !Aeson.Value !TxMetadataRangeError - deriving (TxMetadataJsonError -> TxMetadataJsonError -> Bool + +-- ---------------------------------------------------------------------------- +-- Shared JSON conversion error types +-- + +data TxMetadataJsonError = + TxMetadataJsonToplevelNotMap + | TxMetadataJsonToplevelBadKey !Text + | TxMetadataJsonSchemaError !Word64 !Aeson.Value !TxMetadataJsonSchemaError + | TxMetadataRangeError !Word64 !Aeson.Value !TxMetadataRangeError + deriving (TxMetadataJsonError -> TxMetadataJsonError -> Bool (TxMetadataJsonError -> TxMetadataJsonError -> Bool) -> (TxMetadataJsonError -> TxMetadataJsonError -> Bool) -> Eq TxMetadataJsonError @@ -1599,7 +1604,7 @@ $c/= :: TxMetadataJsonError -> TxMetadataJsonError -> Bool == :: TxMetadataJsonError -> TxMetadataJsonError -> Bool $c== :: TxMetadataJsonError -> TxMetadataJsonError -> Bool -Eq, Int -> TxMetadataJsonError -> ShowS +Eq, Int -> TxMetadataJsonError -> ShowS [TxMetadataJsonError] -> ShowS TxMetadataJsonError -> String (Int -> TxMetadataJsonError -> ShowS) @@ -1615,21 +1620,21 @@ showsPrec :: Int -> TxMetadataJsonError -> ShowS $cshowsPrec :: Int -> TxMetadataJsonError -> ShowS Show) - -data TxMetadataJsonSchemaError = - -- Only used for 'TxMetadataJsonNoSchema' - TxMetadataJsonNullNotAllowed - | TxMetadataJsonBoolNotAllowed - -- Used by both mappings - | TxMetadataJsonNumberNotInteger !Double - - -- Only used for 'TxMetadataJsonDetailedSchema' - | TxMetadataJsonNotObject !Aeson.Value - | TxMetadataJsonBadObject ![(Text, Aeson.Value)] - | TxMetadataJsonBadMapPair !Aeson.Value - | TxMetadataJsonTypeMismatch !Text !Aeson.Value - deriving (TxMetadataJsonSchemaError -> TxMetadataJsonSchemaError -> Bool +data TxMetadataJsonSchemaError = + -- Only used for 'TxMetadataJsonNoSchema' + TxMetadataJsonNullNotAllowed + | TxMetadataJsonBoolNotAllowed + + -- Used by both mappings + | TxMetadataJsonNumberNotInteger !Double + + -- Only used for 'TxMetadataJsonDetailedSchema' + | TxMetadataJsonNotObject !Aeson.Value + | TxMetadataJsonBadObject ![(Text, Aeson.Value)] + | TxMetadataJsonBadMapPair !Aeson.Value + | TxMetadataJsonTypeMismatch !Text !Aeson.Value + deriving (TxMetadataJsonSchemaError -> TxMetadataJsonSchemaError -> Bool (TxMetadataJsonSchemaError -> TxMetadataJsonSchemaError -> Bool) -> (TxMetadataJsonSchemaError -> TxMetadataJsonSchemaError -> Bool) -> Eq TxMetadataJsonSchemaError @@ -1638,7 +1643,7 @@ $c/= :: TxMetadataJsonSchemaError -> TxMetadataJsonSchemaError -> Bool == :: TxMetadataJsonSchemaError -> TxMetadataJsonSchemaError -> Bool $c== :: TxMetadataJsonSchemaError -> TxMetadataJsonSchemaError -> Bool -Eq, Int -> TxMetadataJsonSchemaError -> ShowS +Eq, Int -> TxMetadataJsonSchemaError -> ShowS [TxMetadataJsonSchemaError] -> ShowS TxMetadataJsonSchemaError -> String (Int -> TxMetadataJsonSchemaError -> ShowS) @@ -1654,22 +1659,22 @@ showsPrec :: Int -> TxMetadataJsonSchemaError -> ShowS $cshowsPrec :: Int -> TxMetadataJsonSchemaError -> ShowS Show) - -instance Error TxMetadataJsonError where - displayError :: TxMetadataJsonError -> String -displayError TxMetadataJsonError + +instance Error TxMetadataJsonError where + displayError :: TxMetadataJsonError -> String +displayError TxMetadataJsonError TxMetadataJsonToplevelNotMap = - String + String "The JSON metadata top level must be a map (JSON object) from word to " - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ String "value." - displayError (TxMetadataJsonToplevelBadKey Text -k) = - String + displayError (TxMetadataJsonToplevelBadKey Text +k) = + String "The JSON metadata top level must be a map (JSON object) with unsigned " - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ String "integer keys.\nInvalid key: " String -> ShowS @@ -1677,28 +1682,28 @@ ++ Text -> String forall a. Show a => a -> String show Text -k - displayError (TxMetadataJsonSchemaError Word64 -k Value -v TxMetadataJsonSchemaError -detail) = - String +k + displayError (TxMetadataJsonSchemaError Word64 +k Value +v TxMetadataJsonSchemaError +detail) = + String "JSON schema error within the metadata item " String -> ShowS forall a. [a] -> [a] -> [a] ++ Word64 -> String forall a. Show a => a -> String show Word64 -k String -> ShowS +k String -> ShowS forall a. [a] -> [a] -> [a] ++ String ": " - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ LByteString -> String LBS.unpack (Value -> LByteString forall a. ToJSON a => a -> LByteString Aeson.encode Value -v) String -> ShowS +v) String -> ShowS forall a. [a] -> [a] -> [a] ++ String "\n" String -> ShowS @@ -1706,28 +1711,28 @@ ++ TxMetadataJsonSchemaError -> String forall e. Error e => e -> String displayError TxMetadataJsonSchemaError -detail - displayError (TxMetadataRangeError Word64 -k Value -v TxMetadataRangeError -detail) = - String +detail + displayError (TxMetadataRangeError Word64 +k Value +v TxMetadataRangeError +detail) = + String "Value out of range within the metadata item " String -> ShowS forall a. [a] -> [a] -> [a] ++ Word64 -> String forall a. Show a => a -> String show Word64 -k String -> ShowS +k String -> ShowS forall a. [a] -> [a] -> [a] ++ String ": " - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ LByteString -> String LBS.unpack (Value -> LByteString forall a. ToJSON a => a -> LByteString Aeson.encode Value -v) String -> ShowS +v) String -> ShowS forall a. [a] -> [a] -> [a] ++ String "\n" String -> ShowS @@ -1735,63 +1740,63 @@ ++ TxMetadataRangeError -> String forall e. Error e => e -> String displayError TxMetadataRangeError -detail - -instance Error TxMetadataJsonSchemaError where - displayError :: TxMetadataJsonSchemaError -> String -displayError TxMetadataJsonSchemaError +detail + +instance Error TxMetadataJsonSchemaError where + displayError :: TxMetadataJsonSchemaError -> String +displayError TxMetadataJsonSchemaError TxMetadataJsonNullNotAllowed = - String + String "JSON null values are not supported." - displayError TxMetadataJsonSchemaError + displayError TxMetadataJsonSchemaError TxMetadataJsonBoolNotAllowed = - String + String "JSON bool values are not supported." - displayError (TxMetadataJsonNumberNotInteger Double -d) = - String + displayError (TxMetadataJsonNumberNotInteger Double +d) = + String "JSON numbers must be integers. Unexpected value: " String -> ShowS forall a. [a] -> [a] -> [a] ++ Double -> String forall a. Show a => a -> String show Double -d - displayError (TxMetadataJsonNotObject Value -v) = - String +d + displayError (TxMetadataJsonNotObject Value +v) = + String "JSON object expected. Unexpected value: " - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ LByteString -> String LBS.unpack (Value -> LByteString forall a. ToJSON a => a -> LByteString Aeson.encode Value -v) - displayError (TxMetadataJsonBadObject [(Text, Value)] -v) = - String +v) + displayError (TxMetadataJsonBadObject [(Text, Value)] +v) = + String "JSON object does not match the schema.\nExpected a single field named " - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ String "\"int\", \"bytes\", \"string\", \"list\" or \"map\".\n" - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ String "Unexpected object field(s): " - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ LByteString -> String LBS.unpack (Value -> LByteString forall a. ToJSON a => a -> LByteString Aeson.encode ([(Text, Value)] -> Value Aeson.object [(Text, Value)] -v)) - displayError (TxMetadataJsonBadMapPair Value -v) = - String +v)) + displayError (TxMetadataJsonBadMapPair Value +v) = + String "Expected a list of key/value pair { \"k\": ..., \"v\": ... } objects." - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ String "\nUnexpected value: " String -> ShowS @@ -1800,41 +1805,41 @@ LBS.unpack (Value -> LByteString forall a. ToJSON a => a -> LByteString Aeson.encode Value -v) - displayError (TxMetadataJsonTypeMismatch Text -k Value -v) = - String +v) + displayError (TxMetadataJsonTypeMismatch Text +k Value +v) = + String "The value in the field " String -> ShowS forall a. [a] -> [a] -> [a] ++ Text -> String forall a. Show a => a -> String show Text -k String -> ShowS +k String -> ShowS forall a. [a] -> [a] -> [a] ++ String " does not have the type " - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ String "required by the schema.\nUnexpected value: " - String -> ShowS + String -> ShowS forall a. [a] -> [a] -> [a] ++ LByteString -> String LBS.unpack (Value -> LByteString forall a. ToJSON a => a -> LByteString Aeson.encode Value -v) - - --- ---------------------------------------------------------------------------- --- Shared parsing utils --- +v) -parseAll :: Atto.Parser a -> Text -> Maybe a -parseAll :: Parser a -> Text -> Maybe a -parseAll Parser a -p = (String -> Maybe a) -> (a -> Maybe a) -> Either String a -> Maybe a + +-- ---------------------------------------------------------------------------- +-- Shared parsing utils +-- + +parseAll :: Atto.Parser a -> Text -> Maybe a +parseAll :: Parser a -> Text -> Maybe a +parseAll Parser a +p = (String -> Maybe a) -> (a -> Maybe a) -> Either String a -> Maybe a forall a c b. (a -> c) -> (b -> c) -> Either a b -> c either (Maybe a -> String -> Maybe a forall a b. a -> b -> a @@ -1843,43 +1848,43 @@ Nothing) a -> Maybe a forall a. a -> Maybe a Just - (Either String a -> Maybe a) + (Either String a -> Maybe a) -> (Text -> Either String a) -> Text -> Maybe a forall b c a. (b -> c) -> (a -> b) -> a -> c . Parser a -> ByteString -> Either String a forall a. Parser a -> ByteString -> Either String a Atto.parseOnly Parser a -p - (ByteString -> Either String a) +p + (ByteString -> Either String a) -> (Text -> ByteString) -> Text -> Either String a forall b c a. (b -> c) -> (a -> b) -> a -> c . Text -> ByteString Text.encodeUtf8 - -pUnsigned :: Atto.Parser Integer -pUnsigned :: Parser Integer + +pUnsigned :: Atto.Parser Integer +pUnsigned :: Parser Integer pUnsigned = do - ByteString -bs <- (Char -> Bool) -> Parser ByteString ByteString + ByteString +bs <- (Char -> Bool) -> Parser ByteString ByteString Atto.takeWhile1 Char -> Bool Atto.isDigit - -- no redundant leading 0s allowed, or we cannot round-trip properly - Bool -> Parser ByteString () + -- no redundant leading 0s allowed, or we cannot round-trip properly + Bool -> Parser ByteString () forall (f :: * -> *). Alternative f => Bool -> f () guard (Bool -> Bool not (ByteString -> Int BS.length ByteString -bs Int -> Int -> Bool +bs Int -> Int -> Bool forall a. Ord a => a -> a -> Bool > Int 1 Bool -> Bool -> Bool && ByteString -> Char BSC.head ByteString -bs Char -> Char -> Bool +bs Char -> Char -> Bool forall a. Eq a => a -> a -> Bool == Char '0')) - Integer -> Parser Integer + Integer -> Parser Integer forall (m :: * -> *) a. Monad m => a -> m a return (Integer -> Parser Integer) -> Integer -> Parser Integer forall a b. (a -> b) -> a -> b @@ -1887,15 +1892,15 @@ forall a. (a -> Word8 -> a) -> a -> ByteString -> a BS.foldl' Integer -> Word8 -> Integer forall a a. (Integral a, Num a) => a -> a -> a -step Integer +step Integer 0 ByteString -bs - where - step :: a -> a -> a -step a -a a -w = a -a a -> a -> a +bs + where + step :: a -> a -> a +step a +a a +w = a +a a -> a -> a forall a. Num a => a -> a -> a * a 10 a -> a -> a @@ -1903,34 +1908,34 @@ + a -> a forall a b. (Integral a, Num b) => a -> b fromIntegral (a -w a -> a -> a +w a -> a -> a forall a. Num a => a -> a -> a - a 48) - -pSigned :: Atto.Parser Integer -pSigned :: Parser Integer + +pSigned :: Atto.Parser Integer +pSigned :: Parser Integer pSigned = Parser Integer -> Parser Integer forall a. Num a => Parser a -> Parser a Atto.signed Parser Integer pUnsigned - -pBytes :: Atto.Parser ByteString -pBytes :: Parser ByteString ByteString + +pBytes :: Atto.Parser ByteString +pBytes :: Parser ByteString ByteString pBytes = do - ByteString + ByteString _ <- ByteString -> Parser ByteString ByteString Atto.string ByteString "0x" - ByteString -remaining <- Parser ByteString ByteString + ByteString +remaining <- Parser ByteString ByteString Atto.takeByteString - Bool -> Parser ByteString () -> Parser ByteString () + Bool -> Parser ByteString () -> Parser ByteString () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when ((Char -> Bool) -> ByteString -> Bool BSC.any Char -> Bool -hexUpper ByteString -remaining) (Parser ByteString () -> Parser ByteString ()) +hexUpper ByteString +remaining) (Parser ByteString () -> Parser ByteString ()) -> Parser ByteString () -> Parser ByteString () forall a b. (a -> b) -> a -> b $ String -> Parser ByteString () @@ -1941,16 +1946,16 @@ <> ByteString -> String forall a. Show a => a -> String show ByteString -remaining) - case ByteString -> Either String ByteString +remaining) + case ByteString -> Either String ByteString Base16.decode ByteString -remaining of - Right ByteString -bs -> ByteString -> Parser ByteString ByteString +remaining of + Right ByteString +bs -> ByteString -> Parser ByteString ByteString forall (m :: * -> *) a. Monad m => a -> m a return ByteString -bs - Either String ByteString +bs + Either String ByteString _ -> String -> Parser ByteString ByteString forall (m :: * -> *) a. MonadFail m => String -> m a fail (String @@ -1959,18 +1964,18 @@ <> ByteString -> String forall a. Show a => a -> String show ByteString -remaining) - where - hexUpper :: Char -> Bool -hexUpper Char -c = Char -c Char -> Char -> Bool +remaining) + where + hexUpper :: Char -> Bool +hexUpper Char +c = Char +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool >= Char 'A' Bool -> Bool -> Bool && Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool <= Char 'F' - \ No newline at end of file + \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.TxSubmit.ErrorRender.html b/cardano-api/src/Cardano.Api.TxSubmit.ErrorRender.html index 6258df29dcd..ddb5510f759 100644 --- a/cardano-api/src/Cardano.Api.TxSubmit.ErrorRender.html +++ b/cardano-api/src/Cardano.Api.TxSubmit.ErrorRender.html @@ -20,14 +20,14 @@ renderApplyMempoolPayloadErr :: ApplyMempoolPayloadErr -> Text renderApplyMempoolPayloadErr :: ApplyMempoolPayloadErr -> Text -renderApplyMempoolPayloadErr ApplyMempoolPayloadErr -err = +renderApplyMempoolPayloadErr ApplyMempoolPayloadErr +err = case ApplyMempoolPayloadErr -err of - MempoolTxErr UTxOValidationError -ve -> UTxOValidationError -> Text +err of + MempoolTxErr UTxOValidationError +ve -> UTxOValidationError -> Text renderValidationError UTxOValidationError -ve +ve MempoolDlgErr {} -> Text "Delegation error" MempoolUpdateProposalErr {} -> Text @@ -38,33 +38,33 @@ renderValidationError :: UTxOValidationError -> Text renderValidationError :: UTxOValidationError -> Text -renderValidationError UTxOValidationError -ve = +renderValidationError UTxOValidationError +ve = case UTxOValidationError -ve of - UTxOValidationTxValidationError TxValidationError -tve -> TxValidationError -> Text +ve of + UTxOValidationTxValidationError TxValidationError +tve -> TxValidationError -> Text renderTxValidationError TxValidationError -tve - UTxOValidationUTxOError UTxOError -ue -> UTxOError -> Text +tve + UTxOValidationUTxOError UTxOError +ue -> UTxOError -> Text renderUTxOError UTxOError -ue +ue renderTxValidationError :: TxValidationError -> Text renderTxValidationError :: TxValidationError -> Text -renderTxValidationError TxValidationError -tve = +renderTxValidationError TxValidationError +tve = Text "Tx Validation: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> case TxValidationError -tve of - TxValidationLovelaceError Text -txt LovelaceError -e -> +tve of + TxValidationLovelaceError Text +txt LovelaceError +e -> Format Text (Text -> LovelaceError -> Text) -> Text -> LovelaceError -> Text forall a. Format Text a -> a @@ -89,12 +89,12 @@ % Format Text (LovelaceError -> Text) forall a r. Buildable a => Format r (a -> r) build) Text -txt LovelaceError -e - TxValidationFeeTooSmall Tx -tx Lovelace -expected Lovelace -actual -> +txt LovelaceError +e + TxValidationFeeTooSmall Tx +tx Lovelace +expected Lovelace +actual -> Format Text (Tx -> Lovelace -> Lovelace -> Text) -> Tx -> Lovelace -> Lovelace -> Text forall a. Format Text a -> a @@ -135,13 +135,13 @@ % Format Text (Lovelace -> Text) forall a r. Buildable a => Format r (a -> r) build) Tx -tx Lovelace -actual Lovelace -expected - TxValidationWitnessWrongSignature TxInWitness -wit ProtocolMagicId -pmid TxSigData -sig -> +tx Lovelace +actual Lovelace +expected + TxValidationWitnessWrongSignature TxInWitness +wit ProtocolMagicId +pmid TxSigData +sig -> Format Text (TxInWitness -> Text -> Text -> Text) -> TxInWitness -> Text -> Text -> Text forall a. Format Text a -> a @@ -177,16 +177,16 @@ % Format Text (Text -> Text) forall r. Format r (Text -> r) stext) TxInWitness -wit (TxSigData -> Text +wit (TxSigData -> Text forall a. Show a => a -> Text textShow TxSigData -sig) (ProtocolMagicId -> Text +sig) (ProtocolMagicId -> Text forall a. Show a => a -> Text textShow ProtocolMagicId -pmid) - TxValidationWitnessWrongKey TxInWitness -wit Address -addr -> +pmid) + TxValidationWitnessWrongKey TxInWitness +wit Address +addr -> Format Text (TxInWitness -> Address -> Text) -> TxInWitness -> Address -> Text forall a. Format Text a -> a @@ -210,10 +210,10 @@ % Format Text (Address -> Text) forall a r. Buildable a => Format r (a -> r) build) TxInWitness -wit Address -addr - TxValidationMissingInput TxIn -tx -> +wit Address +addr + TxValidationMissingInput TxIn +tx -> Format Text (TxIn -> Text) -> TxIn -> Text forall a. Format Text a -> a sformat (Format (TxIn -> Text) (TxIn -> Text) @@ -223,36 +223,36 @@ % Format Text (TxIn -> Text) forall a r. Buildable a => Format r (a -> r) build) TxIn -tx +tx -- Fields are <expected> <actual> - TxValidationNetworkMagicMismatch NetworkMagic -expected NetworkMagic -actual -> + TxValidationNetworkMagicMismatch NetworkMagic +expected NetworkMagic +actual -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat [ Text "Bad network magic ", NetworkMagic -> Text forall a. Show a => a -> Text textShow NetworkMagic -actual, Text +actual, Text ", expected ", NetworkMagic -> Text forall a. Show a => a -> Text textShow NetworkMagic -expected ] - TxValidationTxTooLarge Natural -expected Natural -actual -> +expected ] + TxValidationTxTooLarge Natural +expected Natural +actual -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat [ Text "Tx is ", Natural -> Text forall a. Show a => a -> Text textShow Natural -actual, Text +actual, Text " bytes, but expected < ", Natural -> Text forall a. Show a => a -> Text textShow Natural -expected, Text +expected, Text " bytes" ] TxValidationError TxValidationUnknownAddressAttributes -> @@ -265,16 +265,16 @@ renderUTxOError :: UTxOError -> Text renderUTxOError :: UTxOError -> Text -renderUTxOError UTxOError -ue = +renderUTxOError UTxOError +ue = Text "UTxOError: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> case UTxOError -ue of - UTxOMissingInput TxIn -tx -> Format Text (TxIn -> Text) -> TxIn -> Text +ue of + UTxOMissingInput TxIn +tx -> Format Text (TxIn -> Text) -> TxIn -> Text forall a. Format Text a -> a sformat (Format (TxIn -> Text) (TxIn -> Text) "Lookup of tx "Format (TxIn -> Text) (TxIn -> Text) @@ -287,12 +287,12 @@ forall r a r'. Format r a -> Format r' r -> Format r' a %Format Text Text " failed") TxIn -tx +tx UTxOError UTxOOverlappingUnion -> Text "Union or two overlapping UTxO sets" -textShow :: Show a => a -> Text +textShow :: Show a => a -> Text textShow :: a -> Text textShow = String -> Text Text.pack (String -> Text) -> (a -> String) -> a -> Text diff --git a/cardano-api/src/Cardano.Api.TxSubmit.Types.html b/cardano-api/src/Cardano.Api.TxSubmit.Types.html index 1eeb03a11bb..b2236716014 100644 --- a/cardano-api/src/Cardano.Api.TxSubmit.Types.html +++ b/cardano-api/src/Cardano.Api.TxSubmit.Types.html @@ -42,7 +42,7 @@ | TxSubmitDecodeFail DecoderError | TxSubmitBadTx Text | TxSubmitFail ApplyMempoolPayloadErr - deriving TxSubmitStatus -> TxSubmitStatus -> Bool + deriving TxSubmitStatus -> TxSubmitStatus -> Bool (TxSubmitStatus -> TxSubmitStatus -> Bool) -> (TxSubmitStatus -> TxSubmitStatus -> Bool) -> Eq TxSubmitStatus forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -52,47 +52,47 @@ $c== :: TxSubmitStatus -> TxSubmitStatus -> Bool Eq -instance ToJSON TxSubmitStatus where - toJSON :: TxSubmitStatus -> Value +instance ToJSON TxSubmitStatus where + toJSON :: TxSubmitStatus -> Value toJSON = TxSubmitStatus -> Value convertJson convertJson :: TxSubmitStatus -> Value convertJson :: TxSubmitStatus -> Value -convertJson TxSubmitStatus -st = +convertJson TxSubmitStatus +st = [Pair] -> Value Aeson.object [ ( Text "status", Text -> Value String Text -statusMsg ) +statusMsg ) , ( Text "message", Text -> Value String (TxSubmitStatus -> Text renderTxSubmitStatus TxSubmitStatus -st) ) +st) ) ] where - statusMsg :: Text - statusMsg :: Text -statusMsg = + statusMsg :: Text + statusMsg :: Text +statusMsg = case TxSubmitStatus -st of +st of TxSubmitOk{} -> Text "success" - TxSubmitStatus -_other -> Text + TxSubmitStatus +_other -> Text "fail" renderTxSubmitStatus :: TxSubmitStatus -> Text renderTxSubmitStatus :: TxSubmitStatus -> Text -renderTxSubmitStatus TxSubmitStatus -st = +renderTxSubmitStatus TxSubmitStatus +st = case TxSubmitStatus -st of - TxSubmitOk TxId -tx -> Format Text (TxId -> Text) -> TxId -> Text +st of + TxSubmitOk TxId +tx -> Format Text (TxId -> Text) -> TxId -> Text forall a. Format Text a -> a sformat (Format (TxId -> Text) (TxId -> Text) "Tx "Format (TxId -> Text) (TxId -> Text) @@ -105,33 +105,33 @@ forall r a r'. Format r a -> Format r' r -> Format r' a %Format Text Text " submitted successfully") TxId -tx +tx TxSubmitStatus TxSubmitDecodeHex -> Text "Provided data was hex encoded and this webapi expects raw binary" TxSubmitStatus TxSubmitEmpty -> Text "Provided transaction has zero length" - TxSubmitDecodeFail DecoderError -err -> Format Text (DecoderError -> Text) -> DecoderError -> Text + TxSubmitDecodeFail DecoderError +err -> Format Text (DecoderError -> Text) -> DecoderError -> Text forall a. Format Text a -> a sformat Format Text (DecoderError -> Text) forall a r. Buildable a => Format r (a -> r) build DecoderError -err - TxSubmitBadTx Text -tt -> [Text] -> Text +err + TxSubmitBadTx Text +tt -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat [Text "Transactions of type '", Text -tt, Text +tt, Text "' not supported"] - TxSubmitFail ApplyMempoolPayloadErr -err -> ApplyMempoolPayloadErr -> Text + TxSubmitFail ApplyMempoolPayloadErr +err -> ApplyMempoolPayloadErr -> Text renderApplyMempoolPayloadErr ApplyMempoolPayloadErr -err +err -textShow :: Show a => a -> Text +textShow :: Show a => a -> Text textShow :: a -> Text textShow = FilePath -> Text Text.pack (FilePath -> Text) -> (a -> FilePath) -> a -> Text diff --git a/cardano-api/src/Cardano.Api.Utils.html b/cardano-api/src/Cardano.Api.Utils.html index 2ea5c56bc0b..429659216b4 100644 --- a/cardano-api/src/Cardano.Api.Utils.html +++ b/cardano-api/src/Cardano.Api.Utils.html @@ -8,34 +8,34 @@ import Prelude -(?!) :: Maybe a -> e -> Either e a +(?!) :: Maybe a -> e -> Either e a Maybe a Nothing ?! :: Maybe a -> e -> Either e a -?! e -e = e -> Either e a +?! e +e = e -> Either e a forall a b. a -> Either a b Left e -e -Just a -x ?! e +e +Just a +x ?! e _ = a -> Either e a forall a b. b -> Either a b Right a -x +x -(?!.) :: Either e a -> (e -> e') -> Either e' a -Left e -e ?!. :: Either e a -> (e -> e') -> Either e' a -?!. e -> e' -f = e' -> Either e' a +(?!.) :: Either e a -> (e -> e') -> Either e' a +Left e +e ?!. :: Either e a -> (e -> e') -> Either e' a +?!. e -> e' +f = e' -> Either e' a forall a b. a -> Either a b Left (e -> e' -f e -e) -Right a -x ?!. e -> e' +f e +e) +Right a +x ?!. e -> e' _ = a -> Either e' a forall a b. b -> Either a b Right a -x +x \ No newline at end of file diff --git a/cardano-api/src/Cardano.Api.Value.html b/cardano-api/src/Cardano.Api.Value.html index c11d9c32403..51efcc874d5 100644 --- a/cardano-api/src/Cardano.Api.Value.html +++ b/cardano-api/src/Cardano.Api.Value.html @@ -83,7 +83,7 @@ -- newtype Lovelace = Lovelace Integer - deriving stock (Int -> Lovelace -> ShowS + deriving stock (Int -> Lovelace -> ShowS [Lovelace] -> ShowS Lovelace -> String (Int -> Lovelace -> ShowS) @@ -97,7 +97,7 @@ showsPrec :: Int -> Lovelace -> ShowS $cshowsPrec :: Int -> Lovelace -> ShowS Show) - deriving newtype (Lovelace -> Lovelace -> Bool + deriving newtype (Lovelace -> Lovelace -> Bool (Lovelace -> Lovelace -> Bool) -> (Lovelace -> Lovelace -> Bool) -> Eq Lovelace forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -105,7 +105,7 @@ $c/= :: Lovelace -> Lovelace -> Bool == :: Lovelace -> Lovelace -> Bool $c== :: Lovelace -> Lovelace -> Bool -Eq, Eq Lovelace +Eq, Eq Lovelace Eq Lovelace -> (Lovelace -> Lovelace -> Ordering) -> (Lovelace -> Lovelace -> Bool) @@ -143,7 +143,7 @@ compare :: Lovelace -> Lovelace -> Ordering $ccompare :: Lovelace -> Lovelace -> Ordering $cp1Ord :: Eq Lovelace -Ord, Int -> Lovelace +Ord, Int -> Lovelace Lovelace -> Int Lovelace -> [Lovelace] Lovelace -> Lovelace @@ -184,7 +184,7 @@ $cpred :: Lovelace -> Lovelace succ :: Lovelace -> Lovelace $csucc :: Lovelace -> Lovelace -Enum, Integer -> Lovelace +Enum, Integer -> Lovelace Lovelace -> Lovelace Lovelace -> Lovelace -> Lovelace (Lovelace -> Lovelace -> Lovelace) @@ -218,7 +218,7 @@ $c- :: Lovelace -> Lovelace -> Lovelace + :: Lovelace -> Lovelace -> Lovelace $c+ :: Lovelace -> Lovelace -> Lovelace -Num, [Lovelace] -> Value +Num, [Lovelace] -> Value [Lovelace] -> Encoding Lovelace -> Value Lovelace -> Encoding @@ -241,7 +241,7 @@ $ctoEncoding :: Lovelace -> Encoding toJSON :: Lovelace -> Value $ctoJSON :: Lovelace -> Value -ToJSON, Value -> Parser [Lovelace] +ToJSON, Value -> Parser [Lovelace] Value -> Parser Lovelace (Value -> Parser Lovelace) -> (Value -> Parser [Lovelace]) -> FromJSON Lovelace @@ -253,19 +253,19 @@ $cparseJSON :: Value -> Parser Lovelace FromJSON) -instance Semigroup Lovelace where - Lovelace Integer -a <> :: Lovelace -> Lovelace -> Lovelace -<> Lovelace Integer -b = Integer -> Lovelace +instance Semigroup Lovelace where + Lovelace Integer +a <> :: Lovelace -> Lovelace -> Lovelace +<> Lovelace Integer +b = Integer -> Lovelace Lovelace (Integer -a Integer -> Integer -> Integer +a Integer -> Integer -> Integer forall a. Num a => a -> a -> a + Integer -b) +b) -instance Monoid Lovelace where - mempty :: Lovelace +instance Monoid Lovelace where + mempty :: Lovelace mempty = Integer -> Lovelace Lovelace Integer 0 @@ -273,20 +273,20 @@ toByronLovelace :: Lovelace -> Maybe Byron.Lovelace toByronLovelace :: Lovelace -> Maybe Lovelace -toByronLovelace (Lovelace Integer -x) = +toByronLovelace (Lovelace Integer +x) = case Integer -> Either LovelaceError Lovelace Byron.integerToLovelace Integer -x of +x of Left LovelaceError _ -> Maybe Lovelace forall a. Maybe a Nothing - Right Lovelace -x' -> Lovelace -> Maybe Lovelace + Right Lovelace +x' -> Lovelace -> Maybe Lovelace forall a. a -> Maybe a Just Lovelace -x' +x' fromByronLovelace :: Byron.Lovelace -> Lovelace fromByronLovelace :: Lovelace -> Lovelace @@ -299,25 +299,25 @@ toShelleyLovelace :: Lovelace -> Shelley.Coin toShelleyLovelace :: Lovelace -> Coin -toShelleyLovelace (Lovelace Integer -l) = Integer -> Coin +toShelleyLovelace (Lovelace Integer +l) = Integer -> Coin Shelley.Coin Integer -l +l --TODO: validate bounds fromShelleyLovelace :: Shelley.Coin -> Lovelace fromShelleyLovelace :: Coin -> Lovelace -fromShelleyLovelace (Shelley.Coin Integer -l) = Integer -> Lovelace +fromShelleyLovelace (Shelley.Coin Integer +l) = Integer -> Lovelace Lovelace Integer -l +l fromShelleyDeltaLovelace :: Shelley.DeltaCoin -> Lovelace fromShelleyDeltaLovelace :: DeltaCoin -> Lovelace -fromShelleyDeltaLovelace (Shelley.DeltaCoin Integer -d) = Integer -> Lovelace +fromShelleyDeltaLovelace (Shelley.DeltaCoin Integer +d) = Integer -> Lovelace Lovelace Integer -d +d -- ---------------------------------------------------------------------------- @@ -325,7 +325,7 @@ -- newtype Quantity = Quantity Integer - deriving newtype (Quantity -> Quantity -> Bool + deriving newtype (Quantity -> Quantity -> Bool (Quantity -> Quantity -> Bool) -> (Quantity -> Quantity -> Bool) -> Eq Quantity forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -333,7 +333,7 @@ $c/= :: Quantity -> Quantity -> Bool == :: Quantity -> Quantity -> Bool $c== :: Quantity -> Quantity -> Bool -Eq, Eq Quantity +Eq, Eq Quantity Eq Quantity -> (Quantity -> Quantity -> Ordering) -> (Quantity -> Quantity -> Bool) @@ -371,7 +371,7 @@ compare :: Quantity -> Quantity -> Ordering $ccompare :: Quantity -> Quantity -> Ordering $cp1Ord :: Eq Quantity -Ord, Integer -> Quantity +Ord, Integer -> Quantity Quantity -> Quantity Quantity -> Quantity -> Quantity (Quantity -> Quantity -> Quantity) @@ -405,7 +405,7 @@ $c- :: Quantity -> Quantity -> Quantity + :: Quantity -> Quantity -> Quantity $c+ :: Quantity -> Quantity -> Quantity -Num, Int -> Quantity -> ShowS +Num, Int -> Quantity -> ShowS [Quantity] -> ShowS Quantity -> String (Int -> Quantity -> ShowS) @@ -418,7 +418,7 @@ $cshow :: Quantity -> String showsPrec :: Int -> Quantity -> ShowS $cshowsPrec :: Int -> Quantity -> ShowS -Show, [Quantity] -> Value +Show, [Quantity] -> Value [Quantity] -> Encoding Quantity -> Value Quantity -> Encoding @@ -441,7 +441,7 @@ $ctoEncoding :: Quantity -> Encoding toJSON :: Quantity -> Value $ctoJSON :: Quantity -> Value -ToJSON, Value -> Parser [Quantity] +ToJSON, Value -> Parser [Quantity] Value -> Parser Quantity (Value -> Parser Quantity) -> (Value -> Parser [Quantity]) -> FromJSON Quantity @@ -451,42 +451,42 @@ $cparseJSONList :: Value -> Parser [Quantity] parseJSON :: Value -> Parser Quantity $cparseJSON :: Value -> Parser Quantity -FromJSON) +FromJSON) -instance Semigroup Quantity where - Quantity Integer -a <> :: Quantity -> Quantity -> Quantity -<> Quantity Integer -b = Integer -> Quantity +instance Semigroup Quantity where + Quantity Integer +a <> :: Quantity -> Quantity -> Quantity +<> Quantity Integer +b = Integer -> Quantity Quantity (Integer -a Integer -> Integer -> Integer +a Integer -> Integer -> Integer forall a. Num a => a -> a -> a + Integer -b) +b) -instance Monoid Quantity where - mempty :: Quantity +instance Monoid Quantity where + mempty :: Quantity mempty = Integer -> Quantity Quantity Integer 0 lovelaceToQuantity :: Lovelace -> Quantity lovelaceToQuantity :: Lovelace -> Quantity -lovelaceToQuantity (Lovelace Integer -x) = Integer -> Quantity +lovelaceToQuantity (Lovelace Integer +x) = Integer -> Quantity Quantity Integer -x +x quantityToLovelace :: Quantity -> Lovelace quantityToLovelace :: Quantity -> Lovelace -quantityToLovelace (Quantity Integer -x) = Integer -> Lovelace +quantityToLovelace (Quantity Integer +x) = Integer -> Lovelace Lovelace Integer -x +x newtype PolicyId = PolicyId ScriptHash - deriving stock (PolicyId -> PolicyId -> Bool + deriving stock (PolicyId -> PolicyId -> Bool (PolicyId -> PolicyId -> Bool) -> (PolicyId -> PolicyId -> Bool) -> Eq PolicyId forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -494,7 +494,7 @@ $c/= :: PolicyId -> PolicyId -> Bool == :: PolicyId -> PolicyId -> Bool $c== :: PolicyId -> PolicyId -> Bool -Eq, Eq PolicyId +Eq, Eq PolicyId Eq PolicyId -> (PolicyId -> PolicyId -> Ordering) -> (PolicyId -> PolicyId -> Bool) @@ -533,7 +533,7 @@ $ccompare :: PolicyId -> PolicyId -> Ordering $cp1Ord :: Eq PolicyId Ord) - deriving (Int -> PolicyId -> ShowS + deriving (Int -> PolicyId -> ShowS [PolicyId] -> ShowS PolicyId -> String (Int -> PolicyId -> ShowS) @@ -546,7 +546,7 @@ $cshow :: PolicyId -> String showsPrec :: Int -> PolicyId -> ShowS $cshowsPrec :: Int -> PolicyId -> ShowS -Show, String -> PolicyId +Show, String -> PolicyId (String -> PolicyId) -> IsString PolicyId forall a. (String -> a) -> IsString a fromString :: String -> PolicyId @@ -555,22 +555,22 @@ instance HasTypeProxy PolicyId where data AsType PolicyId = AsPolicyId - proxyToAsType :: Proxy PolicyId -> AsType PolicyId + proxyToAsType :: Proxy PolicyId -> AsType PolicyId proxyToAsType Proxy PolicyId _ = AsType PolicyId AsPolicyId instance SerialiseAsRawBytes PolicyId where - serialiseToRawBytes :: PolicyId -> ByteString -serialiseToRawBytes (PolicyId ScriptHash -sh) = ScriptHash -> ByteString + serialiseToRawBytes :: PolicyId -> ByteString +serialiseToRawBytes (PolicyId ScriptHash +sh) = ScriptHash -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes ScriptHash -sh - deserialiseFromRawBytes :: AsType PolicyId -> ByteString -> Maybe PolicyId +sh + deserialiseFromRawBytes :: AsType PolicyId -> ByteString -> Maybe PolicyId deserialiseFromRawBytes AsType PolicyId -AsPolicyId ByteString -bs = +AsPolicyId ByteString +bs = ScriptHash -> PolicyId PolicyId (ScriptHash -> PolicyId) -> Maybe ScriptHash -> Maybe PolicyId forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -580,9 +580,9 @@ AsType a -> ByteString -> Maybe a deserialiseFromRawBytes AsType ScriptHash AsScriptHash ByteString -bs +bs -scriptPolicyId :: Script lang -> PolicyId +scriptPolicyId :: Script lang -> PolicyId scriptPolicyId :: Script lang -> PolicyId scriptPolicyId = ScriptHash -> PolicyId PolicyId (ScriptHash -> PolicyId) @@ -594,7 +594,7 @@ newtype AssetName = AssetName ByteString - deriving stock (AssetName -> AssetName -> Bool + deriving stock (AssetName -> AssetName -> Bool (AssetName -> AssetName -> Bool) -> (AssetName -> AssetName -> Bool) -> Eq AssetName forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -602,7 +602,7 @@ $c/= :: AssetName -> AssetName -> Bool == :: AssetName -> AssetName -> Bool $c== :: AssetName -> AssetName -> Bool -Eq, Eq AssetName +Eq, Eq AssetName Eq AssetName -> (AssetName -> AssetName -> Ordering) -> (AssetName -> AssetName -> Bool) @@ -641,7 +641,7 @@ $ccompare :: AssetName -> AssetName -> Ordering $cp1Ord :: Eq AssetName Ord) - deriving newtype (Int -> AssetName -> ShowS + deriving newtype (Int -> AssetName -> ShowS [AssetName] -> ShowS AssetName -> String (Int -> AssetName -> ShowS) @@ -659,23 +659,23 @@ Show) instance IsString AssetName where - fromString :: String -> AssetName -fromString String -s - | let bs :: ByteString -bs = Text -> ByteString + fromString :: String -> AssetName +fromString String +s + | let bs :: ByteString +bs = Text -> ByteString Text.encodeUtf8 (String -> Text Text.pack String -s) +s) , ByteString -> Int BS.length ByteString -bs Int -> Int -> Bool +bs Int -> Int -> Bool forall a. Ord a => a -> a -> Bool <= Int 32 = ByteString -> AssetName AssetName (String -> ByteString BSC.pack String -s) +s) | Bool otherwise = String -> AssetName forall a. HasCallStack => String -> a @@ -684,47 +684,47 @@ instance HasTypeProxy AssetName where data AsType AssetName = AsAssetName - proxyToAsType :: Proxy AssetName -> AsType AssetName -proxyToAsType Proxy AssetName + proxyToAsType :: Proxy AssetName -> AsType AssetName +proxyToAsType Proxy AssetName _ = AsType AssetName AsAssetName instance SerialiseAsRawBytes AssetName where - serialiseToRawBytes :: AssetName -> ByteString -serialiseToRawBytes (AssetName ByteString -bs) = ByteString -bs - deserialiseFromRawBytes :: AsType AssetName -> ByteString -> Maybe AssetName -deserialiseFromRawBytes AsType AssetName -AsAssetName ByteString -bs + serialiseToRawBytes :: AssetName -> ByteString +serialiseToRawBytes (AssetName ByteString +bs) = ByteString +bs + deserialiseFromRawBytes :: AsType AssetName -> ByteString -> Maybe AssetName +deserialiseFromRawBytes AsType AssetName +AsAssetName ByteString +bs | ByteString -> Int BS.length ByteString -bs Int -> Int -> Bool +bs Int -> Int -> Bool forall a. Ord a => a -> a -> Bool <= Int 32 = AssetName -> Maybe AssetName forall a. a -> Maybe a Just (ByteString -> AssetName AssetName ByteString -bs) +bs) | Bool otherwise = Maybe AssetName forall a. Maybe a Nothing -instance ToJSON AssetName where - toJSON :: AssetName -> Value -toJSON (AssetName ByteString -an) = Text -> Value +instance ToJSON AssetName where + toJSON :: AssetName -> Value +toJSON (AssetName ByteString +an) = Text -> Value Aeson.String (Text -> Value) -> Text -> Value forall a b. (a -> b) -> a -> b $ ByteString -> Text Text.decodeUtf8 ByteString -an +an -instance FromJSON AssetName where - parseJSON :: Value -> Parser AssetName +instance FromJSON AssetName where + parseJSON :: Value -> Parser AssetName parseJSON = String -> (Text -> Parser AssetName) -> Value -> Parser AssetName forall a. String -> (Text -> Parser a) -> Value -> Parser a withText String @@ -740,17 +740,17 @@ . Text -> ByteString Text.encodeUtf8) -instance ToJSONKey AssetName where - toJSONKey :: ToJSONKeyFunction AssetName +instance ToJSONKey AssetName where + toJSONKey :: ToJSONKeyFunction AssetName toJSONKey = (AssetName -> Text) -> ToJSONKeyFunction AssetName forall a. (a -> Text) -> ToJSONKeyFunction a -toJSONKeyText (\(AssetName ByteString -asset) -> ByteString -> Text +toJSONKeyText (\(AssetName ByteString +asset) -> ByteString -> Text Text.decodeUtf8 ByteString -asset) +asset) -instance FromJSONKey AssetName where - fromJSONKey :: FromJSONKeyFunction AssetName +instance FromJSONKey AssetName where + fromJSONKey :: FromJSONKeyFunction AssetName fromJSONKey = (Text -> AssetName) -> FromJSONKeyFunction AssetName forall a. (Text -> a) -> FromJSONKeyFunction a FromJSONKeyText (ByteString -> AssetName @@ -763,7 +763,7 @@ data AssetId = AdaAssetId | AssetId !PolicyId !AssetName - deriving (AssetId -> AssetId -> Bool + deriving (AssetId -> AssetId -> Bool (AssetId -> AssetId -> Bool) -> (AssetId -> AssetId -> Bool) -> Eq AssetId forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -771,7 +771,7 @@ $c/= :: AssetId -> AssetId -> Bool == :: AssetId -> AssetId -> Bool $c== :: AssetId -> AssetId -> Bool -Eq, Eq AssetId +Eq, Eq AssetId Eq AssetId -> (AssetId -> AssetId -> Ordering) -> (AssetId -> AssetId -> Bool) @@ -809,7 +809,7 @@ compare :: AssetId -> AssetId -> Ordering $ccompare :: AssetId -> AssetId -> Ordering $cp1Ord :: Eq AssetId -Ord, Int -> AssetId -> ShowS +Ord, Int -> AssetId -> ShowS [AssetId] -> ShowS AssetId -> String (Int -> AssetId -> ShowS) @@ -826,7 +826,7 @@ newtype Value = Value (Map AssetId Quantity) - deriving Value -> Value -> Bool + deriving Value -> Value -> Bool (Value -> Value -> Bool) -> (Value -> Value -> Bool) -> Eq Value forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: Value -> Value -> Bool @@ -835,13 +835,13 @@ $c== :: Value -> Value -> Bool Eq -instance Show Value where - showsPrec :: Int -> Value -> ShowS -showsPrec Int -d Value -v = Bool -> ShowS -> ShowS +instance Show Value where + showsPrec :: Int -> Value -> ShowS +showsPrec Int +d Value +v = Bool -> ShowS -> ShowS showParen (Int -d Int -> Int -> Bool +d Int -> Int -> Bool forall a. Ord a => a -> a -> Bool > Int 10) (ShowS -> ShowS) -> ShowS -> ShowS @@ -855,21 +855,21 @@ forall a. Show a => a -> ShowS shows (Value -> [(AssetId, Quantity)] valueToList Value -v) +v) -instance Semigroup Value where - Value Map AssetId Quantity -a <> :: Value -> Value -> Value -<> Value Map AssetId Quantity -b = Map AssetId Quantity -> Value +instance Semigroup Value where + Value Map AssetId Quantity +a <> :: Value -> Value -> Value +<> Value Map AssetId Quantity +b = Map AssetId Quantity -> Value Value (Map AssetId Quantity -> Map AssetId Quantity -> Map AssetId Quantity mergeAssetMaps Map AssetId Quantity -a Map AssetId Quantity -b) +a Map AssetId Quantity +b) -instance Monoid Value where - mempty :: Value +instance Monoid Value where + mempty :: Value mempty = Map AssetId Quantity -> Value Value Map AssetId Quantity forall k a. Map k a @@ -910,32 +910,32 @@ Applicative f => (k -> x -> y -> Maybe z) -> WhenMatched f k x y z Map.zipWithMaybeMatched AssetId -> Quantity -> Quantity -> Maybe Quantity -mergeQuantity) +mergeQuantity) where - mergeQuantity :: AssetId -> Quantity -> Quantity -> Maybe Quantity - mergeQuantity :: AssetId -> Quantity -> Quantity -> Maybe Quantity -mergeQuantity AssetId -_k Quantity -a Quantity -b = + mergeQuantity :: AssetId -> Quantity -> Quantity -> Maybe Quantity + mergeQuantity :: AssetId -> Quantity -> Quantity -> Maybe Quantity +mergeQuantity AssetId +_k Quantity +a Quantity +b = case Quantity -a Quantity -> Quantity -> Quantity +a Quantity -> Quantity -> Quantity forall a. Semigroup a => a -> a -> a <> Quantity -b of +b of Quantity Integer 0 -> Maybe Quantity forall a. Maybe a Nothing - Quantity -c -> Quantity -> Maybe Quantity + Quantity +c -> Quantity -> Maybe Quantity forall a. a -> Maybe a Just Quantity -c +c -instance ToJSON Value where - toJSON :: Value -> Value -toJSON = ValueNestedRep -> Value +instance ToJSON Value where + toJSON :: Value -> Value +toJSON = ValueNestedRep -> Value forall a. ToJSON a => a -> Value toJSON (ValueNestedRep -> Value) -> (Value -> ValueNestedRep) -> Value -> Value @@ -943,29 +943,29 @@ . Value -> ValueNestedRep valueToNestedRep -instance FromJSON Value where - parseJSON :: Value -> Parser Value -parseJSON Value -v = ValueNestedRep -> Value +instance FromJSON Value where + parseJSON :: Value -> Parser Value +parseJSON Value +v = ValueNestedRep -> Value valueFromNestedRep (ValueNestedRep -> Value) -> Parser ValueNestedRep -> Parser Value forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Value -> Parser ValueNestedRep forall a. FromJSON a => Value -> Parser a parseJSON Value -v +v selectAsset :: Value -> (AssetId -> Quantity) selectAsset :: Value -> AssetId -> Quantity -selectAsset (Value Map AssetId Quantity -m) AssetId -a = Quantity -> AssetId -> Map AssetId Quantity -> Quantity +selectAsset (Value Map AssetId Quantity +m) AssetId +a = Quantity -> AssetId -> Map AssetId Quantity -> Quantity forall k a. Ord k => a -> k -> Map k a -> a Map.findWithDefault Quantity forall a. Monoid a => a mempty AssetId -a Map AssetId Quantity -m +a Map AssetId Quantity +m valueFromList :: [(AssetId, Quantity)] -> Value valueFromList :: [(AssetId, Quantity)] -> Value @@ -996,40 +996,40 @@ valueToList :: Value -> [(AssetId, Quantity)] valueToList :: Value -> [(AssetId, Quantity)] -valueToList (Value Map AssetId Quantity -m) = Map AssetId Quantity -> [(AssetId, Quantity)] +valueToList (Value Map AssetId Quantity +m) = Map AssetId Quantity -> [(AssetId, Quantity)] forall k a. Map k a -> [(k, a)] Map.toList Map AssetId Quantity -m +m -- | This lets you write @a - b@ as @a <> negateValue b@. -- negateValue :: Value -> Value negateValue :: Value -> Value -negateValue (Value Map AssetId Quantity -m) = Map AssetId Quantity -> Value +negateValue (Value Map AssetId Quantity +m) = Map AssetId Quantity -> Value Value ((Quantity -> Quantity) -> Map AssetId Quantity -> Map AssetId Quantity forall a b k. (a -> b) -> Map k a -> Map k b Map.map Quantity -> Quantity forall a. Num a => a -> a negate Map AssetId Quantity -m) +m) filterValue :: (AssetId -> Bool) -> Value -> Value filterValue :: (AssetId -> Bool) -> Value -> Value -filterValue AssetId -> Bool -p (Value Map AssetId Quantity -m) = Map AssetId Quantity -> Value +filterValue AssetId -> Bool +p (Value Map AssetId Quantity +m) = Map AssetId Quantity -> Value Value ((AssetId -> Quantity -> Bool) -> Map AssetId Quantity -> Map AssetId Quantity forall k a. (k -> a -> Bool) -> Map k a -> Map k a -Map.filterWithKey (\AssetId -k Quantity -_v -> AssetId -> Bool -p AssetId -k) Map AssetId Quantity -m) +Map.filterWithKey (\AssetId +k Quantity +_v -> AssetId -> Bool +p AssetId +k) Map AssetId Quantity +m) selectLovelace :: Value -> Lovelace selectLovelace :: Value -> Lovelace @@ -1065,23 +1065,23 @@ -- valueToLovelace :: Value -> Maybe Lovelace valueToLovelace :: Value -> Maybe Lovelace -valueToLovelace Value -v = +valueToLovelace Value +v = case Value -> [(AssetId, Quantity)] valueToList Value -v of +v of [] -> Lovelace -> Maybe Lovelace forall a. a -> Maybe a Just (Integer -> Lovelace Lovelace Integer 0) [(AssetId -AdaAssetId, Quantity -q)] -> Lovelace -> Maybe Lovelace +AdaAssetId, Quantity +q)] -> Lovelace -> Maybe Lovelace forall a. a -> Maybe a Just (Quantity -> Lovelace quantityToLovelace Quantity -q) +q) [(AssetId, Quantity)] _ -> Maybe Lovelace forall a. Maybe a @@ -1089,8 +1089,8 @@ toMaryValue :: Value -> Mary.Value StandardCrypto toMaryValue :: Value -> Value StandardCrypto -toMaryValue Value -v = +toMaryValue Value +v = Integer -> Map (PolicyID StandardCrypto) (Map AssetName Integer) -> Value StandardCrypto @@ -1098,17 +1098,17 @@ Integer -> Map (PolicyID crypto) (Map AssetName Integer) -> Value crypto Mary.Value Integer -lovelace Map (PolicyID StandardCrypto) (Map AssetName Integer) -other +lovelace Map (PolicyID StandardCrypto) (Map AssetName Integer) +other where - Quantity Integer -lovelace = Value -> AssetId -> Quantity + Quantity Integer +lovelace = Value -> AssetId -> Quantity selectAsset Value -v AssetId +v AssetId AdaAssetId --TODO: write QC tests to show it's ok to use Map.fromAscListWith here - other :: Map (PolicyID StandardCrypto) (Map AssetName Integer) -other = (Map AssetName Integer + other :: Map (PolicyID StandardCrypto) (Map AssetName Integer) +other = (Map AssetName Integer -> Map AssetName Integer -> Map AssetName Integer) -> [(PolicyID StandardCrypto, Map AssetName Integer)] -> Map (PolicyID StandardCrypto) (Map AssetName Integer) @@ -1118,42 +1118,42 @@ forall k a. Ord k => Map k a -> Map k a -> Map k a Map.union [ (PolicyId -> PolicyID StandardCrypto -toMaryPolicyID PolicyId -pid, AssetName -> Integer -> Map AssetName Integer +toMaryPolicyID PolicyId +pid, AssetName -> Integer -> Map AssetName Integer forall k a. k -> a -> Map k a Map.singleton (AssetName -> AssetName -toMaryAssetName AssetName -name) Integer -q) - | (AssetId PolicyId -pid AssetName -name, Quantity Integer -q) <- Value -> [(AssetId, Quantity)] +toMaryAssetName AssetName +name) Integer +q) + | (AssetId PolicyId +pid AssetName +name, Quantity Integer +q) <- Value -> [(AssetId, Quantity)] valueToList Value -v ] +v ] - toMaryPolicyID :: PolicyId -> Mary.PolicyID StandardCrypto - toMaryPolicyID :: PolicyId -> PolicyID StandardCrypto -toMaryPolicyID (PolicyId ScriptHash -sh) = ScriptHash StandardCrypto -> PolicyID StandardCrypto + toMaryPolicyID :: PolicyId -> Mary.PolicyID StandardCrypto + toMaryPolicyID :: PolicyId -> PolicyID StandardCrypto +toMaryPolicyID (PolicyId ScriptHash +sh) = ScriptHash StandardCrypto -> PolicyID StandardCrypto forall crypto. ScriptHash crypto -> PolicyID crypto Mary.PolicyID (ScriptHash -> ScriptHash StandardCrypto toShelleyScriptHash ScriptHash -sh) +sh) - toMaryAssetName :: AssetName -> Mary.AssetName - toMaryAssetName :: AssetName -> AssetName -toMaryAssetName (AssetName ByteString -n) = ByteString -> AssetName + toMaryAssetName :: AssetName -> Mary.AssetName + toMaryAssetName :: AssetName -> AssetName +toMaryAssetName (AssetName ByteString +n) = ByteString -> AssetName Mary.AssetName ByteString -n +n fromMaryValue :: Mary.Value StandardCrypto -> Value fromMaryValue :: Value StandardCrypto -> Value -fromMaryValue (Mary.Value Integer -lovelace Map (PolicyID StandardCrypto) (Map AssetName Integer) -other) = +fromMaryValue (Mary.Value Integer +lovelace Map (PolicyID StandardCrypto) (Map AssetName Integer) +other) = Map AssetId Quantity -> Value Value (Map AssetId Quantity -> Value) -> Map AssetId Quantity -> Value forall a b. (a -> b) -> a -> b @@ -1168,8 +1168,8 @@ [ (AssetId AdaAssetId, Integer -> Quantity Quantity Integer -lovelace) | Integer -lovelace Integer -> Integer -> Bool +lovelace) | Integer +lovelace Integer -> Integer -> Bool forall a. Eq a => a -> a -> Bool /= Integer 0 ] @@ -1178,48 +1178,48 @@ forall a. [a] -> [a] -> [a] ++ [ (PolicyId -> AssetName -> AssetId AssetId (PolicyID StandardCrypto -> PolicyId -fromMaryPolicyID PolicyID StandardCrypto -pid) (AssetName -> AssetName -fromMaryAssetName AssetName -name), Integer -> Quantity +fromMaryPolicyID PolicyID StandardCrypto +pid) (AssetName -> AssetName +fromMaryAssetName AssetName +name), Integer -> Quantity Quantity Integer -q) - | (PolicyID StandardCrypto -pid, Map AssetName Integer -as) <- Map (PolicyID StandardCrypto) (Map AssetName Integer) +q) + | (PolicyID StandardCrypto +pid, Map AssetName Integer +as) <- Map (PolicyID StandardCrypto) (Map AssetName Integer) -> [(PolicyID StandardCrypto, Map AssetName Integer)] forall k a. Map k a -> [(k, a)] Map.toList Map (PolicyID StandardCrypto) (Map AssetName Integer) -other - , (AssetName -name, Integer -q) <- Map AssetName Integer -> [(AssetName, Integer)] +other + , (AssetName +name, Integer +q) <- Map AssetName Integer -> [(AssetName, Integer)] forall k a. Map k a -> [(k, a)] Map.toList Map AssetName Integer -as ] +as ] where - fromMaryPolicyID :: Mary.PolicyID StandardCrypto -> PolicyId - fromMaryPolicyID :: PolicyID StandardCrypto -> PolicyId -fromMaryPolicyID (Mary.PolicyID ScriptHash StandardCrypto -sh) = ScriptHash -> PolicyId + fromMaryPolicyID :: Mary.PolicyID StandardCrypto -> PolicyId + fromMaryPolicyID :: PolicyID StandardCrypto -> PolicyId +fromMaryPolicyID (Mary.PolicyID ScriptHash StandardCrypto +sh) = ScriptHash -> PolicyId PolicyId (ScriptHash StandardCrypto -> ScriptHash fromShelleyScriptHash ScriptHash StandardCrypto -sh) +sh) - fromMaryAssetName :: Mary.AssetName -> AssetName - fromMaryAssetName :: AssetName -> AssetName -fromMaryAssetName (Mary.AssetName ByteString -n) = ByteString -> AssetName + fromMaryAssetName :: Mary.AssetName -> AssetName + fromMaryAssetName :: AssetName -> AssetName +fromMaryAssetName (Mary.AssetName ByteString +n) = ByteString -> AssetName AssetName ByteString -n +n -- | Calculate cost of making a UTxO entry for a given 'Value' and -- mininimum UTxO value derived from the 'ProtocolParameters' calcMinimumDeposit :: Value -> Lovelace -> Lovelace calcMinimumDeposit :: Value -> Lovelace -> Lovelace -calcMinimumDeposit Value -v Lovelace -minUTxo = +calcMinimumDeposit Value +v Lovelace +minUTxo = Coin -> Lovelace fromShelleyLovelace (Coin -> Lovelace) -> Coin -> Lovelace forall a b. (a -> b) -> a -> b @@ -1227,9 +1227,9 @@ forall v. Val v => v -> Coin -> Coin Shelley.scaledMinDeposit (Value -> Value StandardCrypto toMaryValue Value -v) (Lovelace -> Coin +v) (Lovelace -> Coin toShelleyLovelace Lovelace -minUTxo) +minUTxo) -- ---------------------------------------------------------------------------- -- An alternative nested representation @@ -1239,7 +1239,7 @@ -- share a 'PolicyId'. -- newtype ValueNestedRep = ValueNestedRep [ValueNestedBundle] - deriving (ValueNestedRep -> ValueNestedRep -> Bool + deriving (ValueNestedRep -> ValueNestedRep -> Bool (ValueNestedRep -> ValueNestedRep -> Bool) -> (ValueNestedRep -> ValueNestedRep -> Bool) -> Eq ValueNestedRep forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -1247,7 +1247,7 @@ $c/= :: ValueNestedRep -> ValueNestedRep -> Bool == :: ValueNestedRep -> ValueNestedRep -> Bool $c== :: ValueNestedRep -> ValueNestedRep -> Bool -Eq, Eq ValueNestedRep +Eq, Eq ValueNestedRep Eq ValueNestedRep -> (ValueNestedRep -> ValueNestedRep -> Ordering) -> (ValueNestedRep -> ValueNestedRep -> Bool) @@ -1285,7 +1285,7 @@ compare :: ValueNestedRep -> ValueNestedRep -> Ordering $ccompare :: ValueNestedRep -> ValueNestedRep -> Ordering $cp1Ord :: Eq ValueNestedRep -Ord, Int -> ValueNestedRep -> ShowS +Ord, Int -> ValueNestedRep -> ShowS [ValueNestedRep] -> ShowS ValueNestedRep -> String (Int -> ValueNestedRep -> ShowS) @@ -1307,7 +1307,7 @@ -- data ValueNestedBundle = ValueNestedBundleAda Quantity | ValueNestedBundle PolicyId (Map AssetName Quantity) - deriving (ValueNestedBundle -> ValueNestedBundle -> Bool + deriving (ValueNestedBundle -> ValueNestedBundle -> Bool (ValueNestedBundle -> ValueNestedBundle -> Bool) -> (ValueNestedBundle -> ValueNestedBundle -> Bool) -> Eq ValueNestedBundle @@ -1316,7 +1316,7 @@ $c/= :: ValueNestedBundle -> ValueNestedBundle -> Bool == :: ValueNestedBundle -> ValueNestedBundle -> Bool $c== :: ValueNestedBundle -> ValueNestedBundle -> Bool -Eq, Eq ValueNestedBundle +Eq, Eq ValueNestedBundle Eq ValueNestedBundle -> (ValueNestedBundle -> ValueNestedBundle -> Ordering) -> (ValueNestedBundle -> ValueNestedBundle -> Bool) @@ -1354,7 +1354,7 @@ compare :: ValueNestedBundle -> ValueNestedBundle -> Ordering $ccompare :: ValueNestedBundle -> ValueNestedBundle -> Ordering $cp1Ord :: Eq ValueNestedBundle -Ord, Int -> ValueNestedBundle -> ShowS +Ord, Int -> ValueNestedBundle -> ShowS [ValueNestedBundle] -> ShowS ValueNestedBundle -> String (Int -> ValueNestedBundle -> ShowS) @@ -1374,8 +1374,8 @@ valueToNestedRep :: Value -> ValueNestedRep valueToNestedRep :: Value -> ValueNestedRep -valueToNestedRep Value -v = +valueToNestedRep Value +v = -- unflatten all the non-ada assets, and add ada separately [ValueNestedBundle] -> ValueNestedRep ValueNestedRep ([ValueNestedBundle] -> ValueNestedRep) @@ -1384,12 +1384,12 @@ $ [ Quantity -> ValueNestedBundle ValueNestedBundleAda Quantity -q | let q :: Quantity -q = Value -> AssetId -> Quantity +q | let q :: Quantity +q = Value -> AssetId -> Quantity selectAsset Value -v AssetId +v AssetId AdaAssetId, Quantity -q Quantity -> Quantity -> Bool +q Quantity -> Quantity -> Bool forall a. Eq a => a -> a -> Bool /= Quantity 0 ] @@ -1397,18 +1397,18 @@ forall a. [a] -> [a] -> [a] ++ [ PolicyId -> Map AssetName Quantity -> ValueNestedBundle ValueNestedBundle PolicyId -pId Map AssetName Quantity -qs | (PolicyId -pId, Map AssetName Quantity -qs) <- Map PolicyId (Map AssetName Quantity) +pId Map AssetName Quantity +qs | (PolicyId +pId, Map AssetName Quantity +qs) <- Map PolicyId (Map AssetName Quantity) -> [(PolicyId, Map AssetName Quantity)] forall k a. Map k a -> [(k, a)] Map.toList Map PolicyId (Map AssetName Quantity) -nonAdaAssets ] +nonAdaAssets ] where - nonAdaAssets :: Map PolicyId (Map AssetName Quantity) - nonAdaAssets :: Map PolicyId (Map AssetName Quantity) -nonAdaAssets = + nonAdaAssets :: Map PolicyId (Map AssetName Quantity) + nonAdaAssets :: Map PolicyId (Map AssetName Quantity) +nonAdaAssets = (Map AssetName Quantity -> Map AssetName Quantity -> Map AssetName Quantity) -> [(PolicyId, Map AssetName Quantity)] @@ -1423,93 +1423,93 @@ forall a. Semigroup a => a -> a -> a (<>)) [ (PolicyId -pId, AssetName -> Quantity -> Map AssetName Quantity +pId, AssetName -> Quantity -> Map AssetName Quantity forall k a. k -> a -> Map k a Map.singleton AssetName -aName Quantity -q) - | (AssetId PolicyId -pId AssetName -aName, Quantity -q) <- Value -> [(AssetId, Quantity)] +aName Quantity +q) + | (AssetId PolicyId +pId AssetName +aName, Quantity +q) <- Value -> [(AssetId, Quantity)] valueToList Value -v ] +v ] valueFromNestedRep :: ValueNestedRep -> Value valueFromNestedRep :: ValueNestedRep -> Value -valueFromNestedRep (ValueNestedRep [ValueNestedBundle] -bundles) = +valueFromNestedRep (ValueNestedRep [ValueNestedBundle] +bundles) = [(AssetId, Quantity)] -> Value valueFromList [ (AssetId -aId, Quantity -q) - | ValueNestedBundle -bundle <- [ValueNestedBundle] -bundles - , (AssetId -aId, Quantity -q) <- case ValueNestedBundle -bundle of - ValueNestedBundleAda Quantity -q -> [ (AssetId +aId, Quantity +q) + | ValueNestedBundle +bundle <- [ValueNestedBundle] +bundles + , (AssetId +aId, Quantity +q) <- case ValueNestedBundle +bundle of + ValueNestedBundleAda Quantity +q -> [ (AssetId AdaAssetId, Quantity -q) ] - ValueNestedBundle PolicyId -pId Map AssetName Quantity -qs -> [ (PolicyId -> AssetName -> AssetId +q) ] + ValueNestedBundle PolicyId +pId Map AssetName Quantity +qs -> [ (PolicyId -> AssetName -> AssetId AssetId PolicyId -pId AssetName -aName, Quantity -q) - | (AssetName -aName, Quantity -q) <- Map AssetName Quantity -> [(AssetName, Quantity)] +pId AssetName +aName, Quantity +q) + | (AssetName +aName, Quantity +q) <- Map AssetName Quantity -> [(AssetName, Quantity)] forall k a. Map k a -> [(k, a)] Map.toList Map AssetName Quantity -qs ] +qs ] ] -instance ToJSON ValueNestedRep where - toJSON :: ValueNestedRep -> Value -toJSON (ValueNestedRep [ValueNestedBundle] -bundles) = [Pair] -> Value +instance ToJSON ValueNestedRep where + toJSON :: ValueNestedRep -> Value +toJSON (ValueNestedRep [ValueNestedBundle] +bundles) = [Pair] -> Value object ([Pair] -> Value) -> [Pair] -> Value forall a b. (a -> b) -> a -> b $ (ValueNestedBundle -> Pair) -> [ValueNestedBundle] -> [Pair] forall a b. (a -> b) -> [a] -> [b] map ValueNestedBundle -> Pair -toPair [ValueNestedBundle] -bundles +toPair [ValueNestedBundle] +bundles where - toPair :: ValueNestedBundle -> (Text, Aeson.Value) - toPair :: ValueNestedBundle -> Pair -toPair (ValueNestedBundleAda Quantity -q) = (Text + toPair :: ValueNestedBundle -> (Text, Aeson.Value) + toPair :: ValueNestedBundle -> Pair +toPair (ValueNestedBundleAda Quantity +q) = (Text "lovelace", Quantity -> Value forall a. ToJSON a => a -> Value toJSON Quantity -q) - toPair (ValueNestedBundle PolicyId -pid Map AssetName Quantity -assets) = (PolicyId -> Text -renderPolicyId PolicyId -pid, Map AssetName Quantity -> Value +q) + toPair (ValueNestedBundle PolicyId +pid Map AssetName Quantity +assets) = (PolicyId -> Text +renderPolicyId PolicyId +pid, Map AssetName Quantity -> Value forall a. ToJSON a => a -> Value toJSON Map AssetName Quantity -assets) +assets) - renderPolicyId :: PolicyId -> Text - renderPolicyId :: PolicyId -> Text -renderPolicyId (PolicyId ScriptHash -sh) = ScriptHash -> Text + renderPolicyId :: PolicyId -> Text + renderPolicyId :: PolicyId -> Text +renderPolicyId (PolicyId ScriptHash +sh) = ScriptHash -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText ScriptHash -sh +sh -instance FromJSON ValueNestedRep where - parseJSON :: Value -> Parser ValueNestedRep -parseJSON = +instance FromJSON ValueNestedRep where + parseJSON :: Value -> Parser ValueNestedRep +parseJSON = String -> (Object -> Parser ValueNestedRep) -> Value @@ -1522,8 +1522,8 @@ -> Value -> Parser ValueNestedRep forall a b. (a -> b) -> a -> b -$ \Object -obj -> +$ \Object +obj -> [ValueNestedBundle] -> ValueNestedRep ValueNestedRep ([ValueNestedBundle] -> ValueNestedRep) -> Parser [ValueNestedBundle] -> Parser ValueNestedRep @@ -1533,29 +1533,29 @@ (Traversable t, Applicative f) => t (f a) -> f (t a) sequenceA [ Pair -> Parser ValueNestedBundle -parsePid Pair -keyValTuple - | Pair -keyValTuple <- Object -> [Pair] +parsePid Pair +keyValTuple + | Pair +keyValTuple <- Object -> [Pair] forall k v. HashMap k v -> [(k, v)] HashMap.toList Object -obj ] +obj ] where - parsePid :: (Text, Aeson.Value) -> Parser ValueNestedBundle - parsePid :: Pair -> Parser ValueNestedBundle -parsePid (Text -"lovelace", Value -q) = Quantity -> ValueNestedBundle + parsePid :: (Text, Aeson.Value) -> Parser ValueNestedBundle + parsePid :: Pair -> Parser ValueNestedBundle +parsePid (Text +"lovelace", Value +q) = Quantity -> ValueNestedBundle ValueNestedBundleAda (Quantity -> ValueNestedBundle) -> Parser Quantity -> Parser ValueNestedBundle forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Value -> Parser Quantity forall a. FromJSON a => Value -> Parser a parseJSON Value -q - parsePid (Text -pid, Value -q) = +q + parsePid (Text +pid, Value +q) = case AsType ScriptHash -> ByteString -> Maybe ScriptHash forall a. SerialiseAsRawBytes a => @@ -1563,18 +1563,18 @@ deserialiseFromRawBytesHex AsType ScriptHash AsScriptHash (Text -> ByteString Text.encodeUtf8 Text -pid) of - Just ScriptHash -sHash -> PolicyId -> Map AssetName Quantity -> ValueNestedBundle +pid) of + Just ScriptHash +sHash -> PolicyId -> Map AssetName Quantity -> ValueNestedBundle ValueNestedBundle (ScriptHash -> PolicyId PolicyId ScriptHash -sHash) (Map AssetName Quantity -> ValueNestedBundle) +sHash) (Map AssetName Quantity -> ValueNestedBundle) -> Parser (Map AssetName Quantity) -> Parser ValueNestedBundle forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Value -> Parser (Map AssetName Quantity) forall a. FromJSON a => Value -> Parser a parseJSON Value -q +q Maybe ScriptHash Nothing -> String -> Parser ValueNestedBundle forall (m :: * -> *) a. MonadFail m => String -> m a @@ -1587,5 +1587,5 @@ forall a. Semigroup a => a -> a -> a <> Text -> String Text.unpack Text -pid +pid \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Byron.Commands.html b/cardano-cli/src/Cardano.CLI.Byron.Commands.html index 3db56dc401b..a27f01466b7 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.Commands.html +++ b/cardano-cli/src/Cardano.CLI.Byron.Commands.html @@ -107,7 +107,7 @@ | PrettyPrintCBOR FilePath - deriving Int -> ByronCommand -> ShowS + deriving Int -> ByronCommand -> ShowS [ByronCommand] -> ShowS ByronCommand -> String (Int -> ByronCommand -> ShowS) @@ -148,7 +148,7 @@ NetworkId FilePath -- ^ Vote filepath. - deriving Int -> NodeCmd -> ShowS + deriving Int -> NodeCmd -> ShowS [NodeCmd] -> ShowS NodeCmd -> String (Int -> NodeCmd -> ShowS) @@ -167,7 +167,7 @@ newtype NewCertificateFile = NewCertificateFile { NewCertificateFile -> String nFp :: FilePath } - deriving (NewCertificateFile -> NewCertificateFile -> Bool + deriving (NewCertificateFile -> NewCertificateFile -> Bool (NewCertificateFile -> NewCertificateFile -> Bool) -> (NewCertificateFile -> NewCertificateFile -> Bool) -> Eq NewCertificateFile @@ -176,7 +176,7 @@ $c/= :: NewCertificateFile -> NewCertificateFile -> Bool == :: NewCertificateFile -> NewCertificateFile -> Bool $c== :: NewCertificateFile -> NewCertificateFile -> Bool -Eq, Int -> NewCertificateFile -> ShowS +Eq, Int -> NewCertificateFile -> ShowS [NewCertificateFile] -> ShowS NewCertificateFile -> String (Int -> NewCertificateFile -> ShowS) @@ -191,7 +191,7 @@ $cshow :: NewCertificateFile -> String showsPrec :: Int -> NewCertificateFile -> ShowS $cshowsPrec :: Int -> NewCertificateFile -> ShowS -Show, String -> NewCertificateFile +Show, String -> NewCertificateFile (String -> NewCertificateFile) -> IsString NewCertificateFile forall a. (String -> a) -> IsString a fromString :: String -> NewCertificateFile diff --git a/cardano-cli/src/Cardano.CLI.Byron.Delegation.html b/cardano-cli/src/Cardano.CLI.Byron.Delegation.html index 2a99ae7eca0..c7ca3abb603 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.Delegation.html +++ b/cardano-cli/src/Cardano.CLI.Byron.Delegation.html @@ -34,7 +34,7 @@ = CertificateValidationErrors !FilePath ![Text] | DlgCertificateDeserialisationFailed !FilePath !Text | ByronDelegationKeyError !ByronKeyFailure - deriving Int -> ByronDelegationError -> ShowS + deriving Int -> ByronDelegationError -> ShowS [ByronDelegationError] -> ShowS ByronDelegationError -> String (Int -> ByronDelegationError -> ShowS) @@ -53,20 +53,20 @@ renderByronDelegationError :: ByronDelegationError -> Text renderByronDelegationError :: ByronDelegationError -> Text -renderByronDelegationError ByronDelegationError -err = +renderByronDelegationError ByronDelegationError +err = case ByronDelegationError -err of - CertificateValidationErrors String -certFp [Text] -errs -> +err of + CertificateValidationErrors String +certFp [Text] +errs -> Text "Certificate validation error(s) at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -certFp Text -> Text -> Text +certFp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Errors: " Text -> Text -> Text @@ -74,17 +74,17 @@ <> [Text] -> Text forall a. Show a => a -> Text textShow [Text] -errs - DlgCertificateDeserialisationFailed String -certFp Text -deSererr -> +errs + DlgCertificateDeserialisationFailed String +certFp Text +deSererr -> Text "Certificate deserialisation error at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -certFp Text -> Text -> Text +certFp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -92,11 +92,11 @@ <> Text -> Text forall a. Show a => a -> Text textShow Text -deSererr - ByronDelegationKeyError ByronKeyFailure -kerr -> ByronKeyFailure -> Text +deSererr + ByronDelegationKeyError ByronKeyFailure +kerr -> ByronKeyFailure -> Text renderByronKeyFailure ByronKeyFailure -kerr +kerr -- TODO: we need to support password-protected secrets. -- | Issue a certificate for genesis delegation to a delegate key, signed by the @@ -109,22 +109,22 @@ -> Dlg.Certificate issueByronGenesisDelegation :: ProtocolMagicId -> EpochNumber -> SigningKey -> VerificationKey -> Certificate -issueByronGenesisDelegation ProtocolMagicId -magic EpochNumber -epoch SigningKey -issuerSK VerificationKey -delegateVK = +issueByronGenesisDelegation ProtocolMagicId +magic EpochNumber +epoch SigningKey +issuerSK VerificationKey +delegateVK = ProtocolMagicId -> VerificationKey -> EpochNumber -> SafeSigner -> Certificate Dlg.signCertificate ProtocolMagicId -magic VerificationKey -delegateVK EpochNumber -epoch (SafeSigner -> Certificate) -> SafeSigner -> Certificate +magic VerificationKey +delegateVK EpochNumber +epoch (SafeSigner -> Certificate) -> SafeSigner -> Certificate forall a b. (a -> b) -> a -> b $ SigningKey -> SafeSigner Crypto.noPassSafeSigner SigningKey -issuerSK +issuerSK -- | Verify that a certificate signifies genesis delegation by assumed genesis key -- to a delegate key, for a given protocol magic. @@ -140,13 +140,13 @@ -> VerificationKey -> VerificationKey -> ExceptT ByronDelegationError IO () -checkByronGenesisDelegation (CertificateFile String -certF) ProtocolMagicId -magic VerificationKey -issuer VerificationKey -delegate = do - Either Text Certificate -ecert <- IO (Either Text Certificate) +checkByronGenesisDelegation (CertificateFile String +certF) ProtocolMagicId +magic VerificationKey +issuer VerificationKey +delegate = do + Either Text Certificate +ecert <- IO (Either Text Certificate) -> ExceptT ByronDelegationError IO (Either Text Certificate) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (Either Text Certificate) @@ -163,32 +163,32 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> IO ByteString LB.readFile String -certF +certF case Either Text Certificate -ecert of - Left Text -e -> ByronDelegationError -> ExceptT ByronDelegationError IO () +ecert of + Left Text +e -> ByronDelegationError -> ExceptT ByronDelegationError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (ByronDelegationError -> ExceptT ByronDelegationError IO ()) -> ByronDelegationError -> ExceptT ByronDelegationError IO () forall a b. (a -> b) -> a -> b $ String -> Text -> ByronDelegationError DlgCertificateDeserialisationFailed String -certF Text -e - Right (Certificate -cert :: Dlg.Certificate) -> do - let issues :: [Text] -issues = Certificate +certF Text +e + Right (Certificate +cert :: Dlg.Certificate) -> do + let issues :: [Text] +issues = Certificate -> ProtocolMagicId -> VerificationKey -> VerificationKey -> [Text] forall a. ACertificate a -> ProtocolMagicId -> VerificationKey -> VerificationKey -> [Text] checkDlgCert Certificate -cert ProtocolMagicId -magic VerificationKey -issuer VerificationKey -delegate +cert ProtocolMagicId +magic VerificationKey +issuer VerificationKey +delegate Bool -> ExceptT ByronDelegationError IO () -> ExceptT ByronDelegationError IO () @@ -196,7 +196,7 @@ unless ([Text] -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null [Text] -issues) (ExceptT ByronDelegationError IO () +issues) (ExceptT ByronDelegationError IO () -> ExceptT ByronDelegationError IO ()) -> ExceptT ByronDelegationError IO () -> ExceptT ByronDelegationError IO () @@ -209,21 +209,21 @@ forall a b. (a -> b) -> a -> b $ String -> [Text] -> ByronDelegationError CertificateValidationErrors String -certF [Text] -issues +certF [Text] +issues -checkDlgCert - :: Dlg.ACertificate a +checkDlgCert + :: Dlg.ACertificate a -> ProtocolMagicId -> Crypto.VerificationKey -> Crypto.VerificationKey -> [Text] checkDlgCert :: ACertificate a -> ProtocolMagicId -> VerificationKey -> VerificationKey -> [Text] -checkDlgCert ACertificate a -cert ProtocolMagicId -magic VerificationKey -issuerVK' VerificationKey -delegateVK' = +checkDlgCert ACertificate a +cert ProtocolMagicId +magic VerificationKey +issuerVK' VerificationKey +delegateVK' = [[Text]] -> [Text] forall a. Monoid a => [a] -> a mconcat @@ -235,8 +235,8 @@ not (Annotated ProtocolMagicId ByteString -> ACertificate ByteString -> Bool Dlg.isValid Annotated ProtocolMagicId ByteString -magic' ACertificate ByteString -cert') +magic' ACertificate ByteString +cert') ] , [ Format Text (VerificationKey -> VerificationKey -> Text) -> VerificationKey -> VerificationKey -> Text @@ -256,7 +256,7 @@ (VerificationKey -> Text) (VerificationKey -> VerificationKey -> Text) forall r. Format r (VerificationKey -> r) -vkFFormat +vkFFormat (VerificationKey -> Text) (VerificationKey -> VerificationKey -> Text) -> Format Text (VerificationKey -> Text) @@ -273,19 +273,19 @@ cat b c -> cat a b -> cat a c .Format Text (VerificationKey -> Text) forall r. Format r (VerificationKey -> r) -vkF) +vkF) ( ACertificate a -> VerificationKey forall a. ACertificate a -> VerificationKey Dlg.issuerVK ACertificate a -cert) VerificationKey -issuerVK' +cert) VerificationKey +issuerVK' | ACertificate a -> VerificationKey forall a. ACertificate a -> VerificationKey Dlg.issuerVK ACertificate a -cert VerificationKey -> VerificationKey -> Bool +cert VerificationKey -> VerificationKey -> Bool forall a. Eq a => a -> a -> Bool /= VerificationKey -issuerVK' +issuerVK' ] , [ Format Text (VerificationKey -> VerificationKey -> Text) -> VerificationKey -> VerificationKey -> Text @@ -305,7 +305,7 @@ (VerificationKey -> Text) (VerificationKey -> VerificationKey -> Text) forall r. Format r (VerificationKey -> r) -vkFFormat +vkFFormat (VerificationKey -> Text) (VerificationKey -> VerificationKey -> Text) -> Format Text (VerificationKey -> Text) @@ -322,36 +322,36 @@ cat b c -> cat a b -> cat a c .Format Text (VerificationKey -> Text) forall r. Format r (VerificationKey -> r) -vkF) +vkF) ( ACertificate a -> VerificationKey forall a. ACertificate a -> VerificationKey Dlg.delegateVK ACertificate a -cert) VerificationKey -delegateVK' +cert) VerificationKey +delegateVK' | ACertificate a -> VerificationKey forall a. ACertificate a -> VerificationKey Dlg.delegateVK ACertificate a -cert VerificationKey -> VerificationKey -> Bool +cert VerificationKey -> VerificationKey -> Bool forall a. Eq a => a -> a -> Bool /= VerificationKey -delegateVK' +delegateVK' ] ] where - magic' :: Annotated ProtocolMagicId ByteString - magic' :: Annotated ProtocolMagicId ByteString -magic' = ProtocolMagicId + magic' :: Annotated ProtocolMagicId ByteString + magic' :: Annotated ProtocolMagicId ByteString +magic' = ProtocolMagicId -> ByteString -> Annotated ProtocolMagicId ByteString forall b a. b -> a -> Annotated b a Annotated ProtocolMagicId -magic (ProtocolMagicId -> ByteString +magic (ProtocolMagicId -> ByteString forall a. ToCBOR a => a -> ByteString serialize' ProtocolMagicId -magic) +magic) - epoch :: EpochNumber - epoch :: EpochNumber -epoch = Annotated EpochNumber a -> EpochNumber + epoch :: EpochNumber + epoch :: EpochNumber +epoch = Annotated EpochNumber a -> EpochNumber forall b a. Annotated b a -> b unAnnotated (Annotated EpochNumber a -> EpochNumber) -> Annotated EpochNumber a -> EpochNumber @@ -359,38 +359,38 @@ $ ACertificate a -> Annotated EpochNumber a forall a. ACertificate a -> Annotated EpochNumber a Dlg.aEpoch ACertificate a -cert +cert - cert' :: Dlg.ACertificate ByteString - cert' :: ACertificate ByteString -cert' = - let unannotated :: Certificate -unannotated = ACertificate a -cert { aEpoch :: Annotated EpochNumber () + cert' :: Dlg.ACertificate ByteString + cert' :: ACertificate ByteString +cert' = + let unannotated :: Certificate +unannotated = ACertificate a +cert { aEpoch :: Annotated EpochNumber () Dlg.aEpoch = EpochNumber -> () -> Annotated EpochNumber () forall b a. b -> a -> Annotated b a Annotated EpochNumber -epoch () +epoch () , annotation :: () Dlg.annotation = () } in Certificate -unannotated { annotation :: ByteString +unannotated { annotation :: ByteString Dlg.annotation = Certificate -> ByteString forall a. ToCBOR a => a -> ByteString serialize' Certificate -unannotated +unannotated , aEpoch :: Annotated EpochNumber ByteString Dlg.aEpoch = EpochNumber -> ByteString -> Annotated EpochNumber ByteString forall b a. b -> a -> Annotated b a Annotated EpochNumber -epoch (EpochNumber -> ByteString +epoch (EpochNumber -> ByteString forall a. ToCBOR a => a -> ByteString serialize' EpochNumber -epoch) } +epoch) } - vkF :: forall r. Format r (Crypto.VerificationKey -> r) - vkF :: Format r (VerificationKey -> r) -vkF = Format r (VerificationKey -> r) + vkF :: forall r. Format r (Crypto.VerificationKey -> r) + vkF :: Format r (VerificationKey -> r) +vkF = Format r (VerificationKey -> r) forall r. Format r (VerificationKey -> r) Crypto.fullVerificationKeyF @@ -409,19 +409,19 @@ serialiseByronWitness :: SomeByronSigningKey -> ByteString serialiseByronWitness :: SomeByronSigningKey -> ByteString -serialiseByronWitness SomeByronSigningKey -sk = +serialiseByronWitness SomeByronSigningKey +sk = case SomeByronSigningKey -sk of - AByronSigningKeyLegacy SigningKey ByronKeyLegacy -bSkey -> SigningKey ByronKeyLegacy -> ByteString +sk of + AByronSigningKeyLegacy SigningKey ByronKeyLegacy +bSkey -> SigningKey ByronKeyLegacy -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes SigningKey ByronKeyLegacy -bSkey - AByronSigningKey SigningKey ByronKey -legBKey -> SigningKey ByronKey -> ByteString +bSkey + AByronSigningKey SigningKey ByronKey +legBKey -> SigningKey ByronKey -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes SigningKey ByronKey -legBKey +legBKey \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Byron.Genesis.html b/cardano-cli/src/Cardano.CLI.Byron.Genesis.html index affcd9973e5..fba557894e6 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.Genesis.html +++ b/cardano-cli/src/Cardano.CLI.Byron.Genesis.html @@ -64,7 +64,7 @@ | ProtocolParametersParseFailed !FilePath !Text | PoorKeyFailure !ByronKeyFailure - deriving Int -> ByronGenesisError -> ShowS + deriving Int -> ByronGenesisError -> ShowS [ByronGenesisError] -> ShowS ByronGenesisError -> String (Int -> ByronGenesisError -> ShowS) @@ -83,90 +83,90 @@ renderByronGenesisError :: ByronGenesisError -> Text renderByronGenesisError :: ByronGenesisError -> Text -renderByronGenesisError ByronGenesisError -err = +renderByronGenesisError ByronGenesisError +err = case ByronGenesisError -err of - ProtocolParametersParseFailed String -pParamFp Text -parseError -> +err of + ProtocolParametersParseFailed String +pParamFp Text +parseError -> Text "Protocol parameters parse failed at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -pParamFp Text -> Text -> Text +pParamFp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -parseError - ByronDelegationCertSerializationError ByronDelegationError -bDelegSerErr -> +parseError + ByronDelegationCertSerializationError ByronDelegationError +bDelegSerErr -> Text "Error while serializing the delegation certificate: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> ByronDelegationError -> Text forall a. Show a => a -> Text textShow ByronDelegationError -bDelegSerErr - ByronDelegationKeySerializationError ByronDelegationError -bKeySerErr -> +bDelegSerErr + ByronDelegationKeySerializationError ByronDelegationError +bKeySerErr -> Text "Error while serializing the delegation key: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> ByronDelegationError -> Text forall a. Show a => a -> Text textShow ByronDelegationError -bKeySerErr - PoorKeyFailure ByronKeyFailure -bKeyFailure -> +bKeySerErr + PoorKeyFailure ByronKeyFailure +bKeyFailure -> Text "Error creating poor keys: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> ByronKeyFailure -> Text forall a. Show a => a -> Text textShow ByronKeyFailure -bKeyFailure - MakeGenesisDelegationError GenesisDelegationError -genDelegError -> +bKeyFailure + MakeGenesisDelegationError GenesisDelegationError +genDelegError -> Text "Error creating genesis delegation: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> GenesisDelegationError -> Text forall a. Show a => a -> Text textShow GenesisDelegationError -genDelegError - GenesisGenerationError GenesisDataGenerationError -genDataGenError -> +genDelegError + GenesisGenerationError GenesisDataGenerationError +genDataGenError -> Text "Error generating genesis: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> GenesisDataGenerationError -> Text forall a. Show a => a -> Text textShow GenesisDataGenerationError -genDataGenError - GenesisOutputDirAlreadyExists String -genOutDir -> +genDataGenError + GenesisOutputDirAlreadyExists String +genOutDir -> Text "Genesis output directory already exists: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -genOutDir - GenesisReadError String -genFp GenesisDataError -genDataError -> +genOutDir + GenesisReadError String +genFp GenesisDataError +genDataError -> Text "Error while reading genesis file at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -genFp Text -> Text -> Text +genFp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -174,29 +174,29 @@ <> GenesisDataError -> Text forall a. Show a => a -> Text textShow GenesisDataError -genDataError - GenesisSpecError Text -genSpecError -> +genDataError + GenesisSpecError Text +genSpecError -> Text "Error while creating genesis spec" Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -> Text forall a. Show a => a -> Text textShow Text -genSpecError - NoGenesisDelegationForKey Text -verKey -> +genSpecError + NoGenesisDelegationForKey Text +verKey -> Text "Error while creating genesis, no delegation certificate for this verification key:" Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -> Text forall a. Show a => a -> Text textShow Text -verKey +verKey newtype NewDirectory = NewDirectory FilePath - deriving (NewDirectory -> NewDirectory -> Bool + deriving (NewDirectory -> NewDirectory -> Bool (NewDirectory -> NewDirectory -> Bool) -> (NewDirectory -> NewDirectory -> Bool) -> Eq NewDirectory forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -204,7 +204,7 @@ $c/= :: NewDirectory -> NewDirectory -> Bool == :: NewDirectory -> NewDirectory -> Bool $c== :: NewDirectory -> NewDirectory -> Bool -Eq, Eq NewDirectory +Eq, Eq NewDirectory Eq NewDirectory -> (NewDirectory -> NewDirectory -> Ordering) -> (NewDirectory -> NewDirectory -> Bool) @@ -242,7 +242,7 @@ compare :: NewDirectory -> NewDirectory -> Ordering $ccompare :: NewDirectory -> NewDirectory -> Ordering $cp1Ord :: Eq NewDirectory -Ord, Int -> NewDirectory -> ShowS +Ord, Int -> NewDirectory -> ShowS [NewDirectory] -> ShowS NewDirectory -> String (Int -> NewDirectory -> ShowS) @@ -257,7 +257,7 @@ $cshow :: NewDirectory -> String showsPrec :: Int -> NewDirectory -> ShowS $cshowsPrec :: Int -> NewDirectory -> ShowS -Show, String -> NewDirectory +Show, String -> NewDirectory (String -> NewDirectory) -> IsString NewDirectory forall a. (String -> a) -> IsString a fromString :: String -> NewDirectory @@ -282,7 +282,7 @@ gpAvvmBalanceFactor :: !Common.LovelacePortion , GenesisParameters -> Maybe Integer gpSeed :: !(Maybe Integer) - } deriving Int -> GenesisParameters -> ShowS + } deriving Int -> GenesisParameters -> ShowS [GenesisParameters] -> ShowS GenesisParameters -> String (Int -> GenesisParameters -> ShowS) @@ -302,10 +302,10 @@ mkGenesisSpec :: GenesisParameters -> ExceptT ByronGenesisError IO Genesis.GenesisSpec mkGenesisSpec :: GenesisParameters -> ExceptT ByronGenesisError IO GenesisSpec -mkGenesisSpec GenesisParameters -gp = do - ByteString -protoParamsRaw <- IO ByteString -> ExceptT ByronGenesisError IO ByteString +mkGenesisSpec GenesisParameters +gp = do + ByteString +protoParamsRaw <- IO ByteString -> ExceptT ByronGenesisError IO ByteString forall (t :: (* -> *) -> * -> *) (m :: * -> *) a. (MonadTrans t, Monad m) => m a -> t m a @@ -322,10 +322,10 @@ forall a b. (a -> b) -> a -> b $ GenesisParameters -> String gpProtocolParamsFile GenesisParameters -gp +gp - ProtocolParameters -protocolParameters <- (Text -> ByronGenesisError) + ProtocolParameters +protocolParameters <- (Text -> ByronGenesisError) -> ExceptT Text IO ProtocolParameters -> ExceptT ByronGenesisError IO ProtocolParameters forall (m :: * -> *) e e' a. @@ -335,7 +335,7 @@ (String -> Text -> ByronGenesisError ProtocolParametersParseFailed (GenesisParameters -> String gpProtocolParamsFile GenesisParameters -gp)) (ExceptT Text IO ProtocolParameters +gp)) (ExceptT Text IO ProtocolParameters -> ExceptT ByronGenesisError IO ProtocolParameters) -> ExceptT Text IO ProtocolParameters -> ExceptT ByronGenesisError IO ProtocolParameters @@ -366,11 +366,11 @@ FromJSON (Either SchemaError) a => ByteString -> Either Text a canonicalDecodePretty ByteString -protoParamsRaw +protoParamsRaw -- We're relying on the generator to fake AVVM and delegation. - GenesisDelegation -genesisDelegation <- (GenesisDelegationError -> ByronGenesisError) + GenesisDelegation +genesisDelegation <- (GenesisDelegationError -> ByronGenesisError) -> ExceptT GenesisDelegationError IO GenesisDelegation -> ExceptT ByronGenesisError IO GenesisDelegation forall (m :: * -> *) e e' a. @@ -430,39 +430,39 @@ forall a. Monoid a => a mempty) GenesisDelegation -genesisDelegation +genesisDelegation ProtocolParameters -protocolParameters +protocolParameters (GenesisParameters -> BlockCount gpK GenesisParameters -gp) +gp) (GenesisParameters -> ProtocolMagic gpProtocolMagic GenesisParameters -gp) +gp) (Bool -> GenesisInitializer -mkGenesisInitialiser Bool +mkGenesisInitialiser Bool True) where - mkGenesisInitialiser :: Bool -> Genesis.GenesisInitializer - mkGenesisInitialiser :: Bool -> GenesisInitializer -mkGenesisInitialiser Bool -useHeavyDlg = + mkGenesisInitialiser :: Bool -> Genesis.GenesisInitializer + mkGenesisInitialiser :: Bool -> GenesisInitializer +mkGenesisInitialiser Bool +useHeavyDlg = TestnetBalanceOptions -> FakeAvvmOptions -> Rational -> Bool -> GenesisInitializer Genesis.GenesisInitializer (GenesisParameters -> TestnetBalanceOptions gpTestnetBalance GenesisParameters -gp) +gp) (GenesisParameters -> FakeAvvmOptions gpFakeAvvmOptions GenesisParameters -gp) +gp) (LovelacePortion -> Rational Common.lovelacePortionToRational (GenesisParameters -> LovelacePortion gpAvvmBalanceFactor GenesisParameters -gp)) +gp)) Bool -useHeavyDlg +useHeavyDlg -- | Generate a genesis, for given blockchain start time, protocol parameters, -- security parameter, protocol magic, testnet balance options, fake AVVM options, @@ -475,12 +475,12 @@ -> ExceptT ByronGenesisError IO (Genesis.GenesisData, Genesis.GeneratedSecrets) mkGenesis :: GenesisParameters -> ExceptT ByronGenesisError IO (GenesisData, GeneratedSecrets) -mkGenesis GenesisParameters -gp = do - GenesisSpec -genesisSpec <- GenesisParameters -> ExceptT ByronGenesisError IO GenesisSpec +mkGenesis GenesisParameters +gp = do + GenesisSpec +genesisSpec <- GenesisParameters -> ExceptT ByronGenesisError IO GenesisSpec mkGenesisSpec GenesisParameters -gp +gp (GenesisDataGenerationError -> ByronGenesisError) -> ExceptT @@ -504,17 +504,17 @@ GenesisDataGenerationError IO (GenesisData, GeneratedSecrets) Genesis.generateGenesisData (GenesisParameters -> UTCTime gpStartTime GenesisParameters -gp) GenesisSpec -genesisSpec +gp) GenesisSpec +genesisSpec -- | Read genesis from a file. readGenesis :: GenesisFile -> NetworkId -> ExceptT ByronGenesisError IO Genesis.Config readGenesis :: GenesisFile -> NetworkId -> ExceptT ByronGenesisError IO Config -readGenesis (GenesisFile String -file) NetworkId -nw = +readGenesis (GenesisFile String +file) NetworkId +nw = (GenesisDataError -> ByronGenesisError) -> ExceptT GenesisDataError IO Config -> ExceptT ByronGenesisError IO Config @@ -523,20 +523,20 @@ (e -> e') -> ExceptT e m a -> ExceptT e' m a firstExceptT (String -> GenesisDataError -> ByronGenesisError GenesisReadError String -file) (ExceptT GenesisDataError IO Config +file) (ExceptT GenesisDataError IO Config -> ExceptT ByronGenesisError IO Config) -> ExceptT GenesisDataError IO Config -> ExceptT ByronGenesisError IO Config forall a b. (a -> b) -> a -> b $ do - (GenesisData -genesisData, GenesisHash -genesisHash) <- String -> ExceptT GenesisDataError IO (GenesisData, GenesisHash) + (GenesisData +genesisData, GenesisHash +genesisHash) <- String -> ExceptT GenesisDataError IO (GenesisData, GenesisHash) forall (m :: * -> *). (MonadError GenesisDataError m, MonadIO m) => String -> m (GenesisData, GenesisHash) Genesis.readGenesisData String -file +file Config -> ExceptT GenesisDataError IO Config forall (m :: * -> *) a. Monad m => a -> m a return Config :: GenesisData @@ -547,14 +547,14 @@ Genesis.Config { configGenesisData :: GenesisData Genesis.configGenesisData = GenesisData -genesisData, +genesisData, configGenesisHash :: GenesisHash Genesis.configGenesisHash = GenesisHash -genesisHash, +genesisHash, configReqNetMagic :: RequiresNetworkMagic Genesis.configReqNetMagic = NetworkId -> RequiresNetworkMagic toByronRequiresNetworkMagic NetworkId -nw, +nw, configUTxOConfiguration :: UTxOConfiguration Genesis.configUTxOConfiguration = UTxOConfiguration UTxO.defaultUTxOConfiguration @@ -572,21 +572,21 @@ -> GenesisData -> GeneratedSecrets -> ExceptT ByronGenesisError IO () -dumpGenesis (NewDirectory String -outDir) GenesisData -genesisData GeneratedSecrets -gs = do - Bool -exists <- IO Bool -> ExceptT ByronGenesisError IO Bool +dumpGenesis (NewDirectory String +outDir) GenesisData +genesisData GeneratedSecrets +gs = do + Bool +exists <- IO Bool -> ExceptT ByronGenesisError IO Bool forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO Bool -> ExceptT ByronGenesisError IO Bool) -> IO Bool -> ExceptT ByronGenesisError IO Bool forall a b. (a -> b) -> a -> b $ String -> IO Bool doesPathExist String -outDir +outDir if Bool -exists +exists then ByronGenesisError -> ExceptT ByronGenesisError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (ByronGenesisError -> ExceptT ByronGenesisError IO ()) @@ -594,7 +594,7 @@ forall a b. (a -> b) -> a -> b $ String -> ByronGenesisError GenesisOutputDirAlreadyExists String -outDir +outDir else IO () -> ExceptT ByronGenesisError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronGenesisError IO ()) @@ -602,7 +602,7 @@ forall a b. (a -> b) -> a -> b $ String -> IO () createDirectory String -outDir +outDir IO () -> ExceptT ByronGenesisError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronGenesisError IO ()) @@ -610,20 +610,20 @@ forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LB.writeFile String -genesisJSONFile (GenesisData -> ByteString +genesisJSONFile (GenesisData -> ByteString forall a. ToJSON Identity a => a -> ByteString canonicalEncodePretty GenesisData -genesisData) +genesisData) - [Certificate] -dlgCerts <- (SigningKey ByronKey -> ExceptT ByronGenesisError IO Certificate) + [Certificate] +dlgCerts <- (SigningKey ByronKey -> ExceptT ByronGenesisError IO Certificate) -> [SigningKey ByronKey] -> ExceptT ByronGenesisError IO [Certificate] forall (t :: * -> *) (m :: * -> *) a b. (Traversable t, Monad m) => (a -> m b) -> t a -> m (t b) mapM SigningKey ByronKey -> ExceptT ByronGenesisError IO Certificate -findDelegateCert ([SigningKey ByronKey] +findDelegateCert ([SigningKey ByronKey] -> ExceptT ByronGenesisError IO [Certificate]) -> ([SigningKey] -> [SigningKey ByronKey]) -> [SigningKey] @@ -640,7 +640,7 @@ forall a b. (a -> b) -> a -> b $ GeneratedSecrets -> [SigningKey] gsRichSecrets GeneratedSecrets -gs +gs IO () -> ExceptT ByronGenesisError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -653,7 +653,7 @@ -> [SigningKey ByronKey] -> IO () forall a. String -> String -> (a -> ByteString) -> [a] -> IO () -wOut String +wOut String "genesis-keys" String "key" SigningKey ByronKey -> ByteString @@ -668,7 +668,7 @@ forall a b. (a -> b) -> a -> b $ GeneratedSecrets -> [SigningKey] gsDlgIssuersSecrets GeneratedSecrets -gs) +gs) IO () -> ExceptT ByronGenesisError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronGenesisError IO ()) @@ -680,7 +680,7 @@ -> [SigningKey ByronKey] -> IO () forall a. String -> String -> (a -> ByteString) -> [a] -> IO () -wOut String +wOut String "delegate-keys" String "key" SigningKey ByronKey -> ByteString @@ -695,7 +695,7 @@ forall a b. (a -> b) -> a -> b $ GeneratedSecrets -> [SigningKey] gsRichSecrets GeneratedSecrets -gs) +gs) IO () -> ExceptT ByronGenesisError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronGenesisError IO ()) @@ -707,7 +707,7 @@ -> [SigningKey ByronKey] -> IO () forall a. String -> String -> (a -> ByteString) -> [a] -> IO () -wOut String +wOut String "poor-keys" String "key" SigningKey ByronKey -> ByteString @@ -728,7 +728,7 @@ forall a b. (a -> b) -> a -> b $ GeneratedSecrets -> [PoorSecret] gsPoorSecrets GeneratedSecrets -gs) +gs) IO () -> ExceptT ByronGenesisError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronGenesisError IO ()) @@ -737,11 +737,11 @@ $ String -> String -> (Certificate -> ByteString) -> [Certificate] -> IO () forall a. String -> String -> (a -> ByteString) -> [a] -> IO () -wOut String +wOut String "delegation-cert" String "json" Certificate -> ByteString serialiseDelegationCert [Certificate] -dlgCerts +dlgCerts IO () -> ExceptT ByronGenesisError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronGenesisError IO ()) @@ -753,37 +753,37 @@ -> [RedeemSigningKey] -> IO () forall a. String -> String -> (a -> ByteString) -> [a] -> IO () -wOut String +wOut String "avvm-secrets" String "secret" RedeemSigningKey -> ByteString -printFakeAvvmSecrets ([RedeemSigningKey] -> IO ()) -> [RedeemSigningKey] -> IO () +printFakeAvvmSecrets ([RedeemSigningKey] -> IO ()) -> [RedeemSigningKey] -> IO () forall a b. (a -> b) -> a -> b $ GeneratedSecrets -> [RedeemSigningKey] gsFakeAvvmSecrets GeneratedSecrets -gs +gs where - dlgCertMap :: Map Common.KeyHash Certificate - dlgCertMap :: Map KeyHash Certificate -dlgCertMap = GenesisDelegation -> Map KeyHash Certificate + dlgCertMap :: Map Common.KeyHash Certificate + dlgCertMap :: Map KeyHash Certificate +dlgCertMap = GenesisDelegation -> Map KeyHash Certificate Genesis.unGenesisDelegation (GenesisDelegation -> Map KeyHash Certificate) -> GenesisDelegation -> Map KeyHash Certificate forall a b. (a -> b) -> a -> b $ GenesisData -> GenesisDelegation Genesis.gdHeavyDelegation GenesisData -genesisData +genesisData - findDelegateCert :: SigningKey ByronKey -> ExceptT ByronGenesisError IO Certificate - findDelegateCert :: SigningKey ByronKey -> ExceptT ByronGenesisError IO Certificate -findDelegateCert bSkey :: SigningKey ByronKey -bSkey@(ByronSigningKey sk) = + findDelegateCert :: SigningKey ByronKey -> ExceptT ByronGenesisError IO Certificate + findDelegateCert :: SigningKey ByronKey -> ExceptT ByronGenesisError IO Certificate +findDelegateCert bSkey :: SigningKey ByronKey +bSkey@(ByronSigningKey sk) = case (Certificate -> Bool) -> [Certificate] -> Maybe Certificate forall (t :: * -> *) a. Foldable t => (a -> Bool) -> t a -> Maybe a find (SigningKey -> Certificate -> Bool -isCertForSK SigningKey -sk) (Map KeyHash Certificate -> [Certificate] +isCertForSK SigningKey +sk) (Map KeyHash Certificate -> [Certificate] forall k a. Map k a -> [a] Map.elems Map KeyHash Certificate -dlgCertMap) of +dlgCertMap) of Maybe Certificate Nothing -> ByronGenesisError -> ExceptT ByronGenesisError IO Certificate forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -814,25 +814,25 @@ Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey ByronKey -bSkey - Just Certificate -x -> Certificate -> ExceptT ByronGenesisError IO Certificate +bSkey + Just Certificate +x -> Certificate -> ExceptT ByronGenesisError IO Certificate forall (m :: * -> *) a x. Monad m => a -> ExceptT x m a right Certificate -x +x - genesisJSONFile :: FilePath - genesisJSONFile :: String -genesisJSONFile = String -outDir String -> ShowS + genesisJSONFile :: FilePath + genesisJSONFile :: String +genesisJSONFile = String +outDir String -> ShowS forall a. Semigroup a => a -> a -> a <> String "/genesis.json" - printFakeAvvmSecrets :: Crypto.RedeemSigningKey -> ByteString - printFakeAvvmSecrets :: RedeemSigningKey -> ByteString -printFakeAvvmSecrets RedeemSigningKey -rskey = Text -> ByteString + printFakeAvvmSecrets :: Crypto.RedeemSigningKey -> ByteString + printFakeAvvmSecrets :: RedeemSigningKey -> ByteString +printFakeAvvmSecrets RedeemSigningKey +rskey = Text -> ByteString encodeUtf8 (Text -> ByteString) -> (Builder -> Text) -> Builder -> ByteString forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -848,38 +848,38 @@ $ RedeemSigningKey -> Builder forall p. Buildable p => p -> Builder build RedeemSigningKey -rskey +rskey -- Compare a given 'SigningKey' with a 'Certificate' 'VerificationKey' - isCertForSK :: Crypto.SigningKey -> Certificate -> Bool - isCertForSK :: SigningKey -> Certificate -> Bool -isCertForSK SigningKey -sk Certificate -cert = Certificate -> VerificationKey + isCertForSK :: Crypto.SigningKey -> Certificate -> Bool + isCertForSK :: SigningKey -> Certificate -> Bool +isCertForSK SigningKey +sk Certificate +cert = Certificate -> VerificationKey forall a. ACertificate a -> VerificationKey delegateVK Certificate -cert VerificationKey -> VerificationKey -> Bool +cert VerificationKey -> VerificationKey -> Bool forall a. Eq a => a -> a -> Bool == SigningKey -> VerificationKey Crypto.toVerification SigningKey -sk +sk - wOut :: String -> String -> (a -> ByteString) -> [a] -> IO () - wOut :: String -> String -> (a -> ByteString) -> [a] -> IO () -wOut = String -> String -> String -> (a -> ByteString) -> [a] -> IO () + wOut :: String -> String -> (a -> ByteString) -> [a] -> IO () + wOut :: String -> String -> (a -> ByteString) -> [a] -> IO () +wOut = String -> String -> String -> (a -> ByteString) -> [a] -> IO () forall a. String -> String -> String -> (a -> ByteString) -> [a] -> IO () writeSecrets String -outDir +outDir -writeSecrets :: FilePath -> String -> String -> (a -> ByteString) -> [a] -> IO () +writeSecrets :: FilePath -> String -> String -> (a -> ByteString) -> [a] -> IO () writeSecrets :: String -> String -> String -> (a -> ByteString) -> [a] -> IO () -writeSecrets String -outDir String -prefix String -suffix a -> ByteString -secretOp [a] -xs = +writeSecrets String +outDir String +prefix String +suffix a -> ByteString +secretOp [a] +xs = [(a, Int)] -> ((a, Int) -> IO ()) -> IO () forall (t :: * -> *) (m :: * -> *) a b. (Foldable t, Monad m) => @@ -887,18 +887,18 @@ forM_ ([a] -> [Int] -> [(a, Int)] forall a b. [a] -> [b] -> [(a, b)] zip [a] -xs [Int +xs [Int 0::Int ..]) (((a, Int) -> IO ()) -> IO ()) -> ((a, Int) -> IO ()) -> IO () forall a b. (a -> b) -> a -> b $ - \(a -secret, Int -nr)-> do - let filename :: String -filename = String -outDir String -> ShowS + \(a +secret, Int +nr)-> do + let filename :: String +filename = String +outDir String -> ShowS </> String -prefix String -> ShowS +prefix String -> ShowS forall a. Semigroup a => a -> a -> a <> String "." String -> ShowS @@ -907,24 +907,24 @@ forall r. PrintfType r => String -> r printf String "%03d" Int -nr String -> ShowS +nr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "." String -> ShowS forall a. Semigroup a => a -> a -> a <> String -suffix +suffix String -> ByteString -> IO () BS.writeFile String -filename (ByteString -> IO ()) -> ByteString -> IO () +filename (ByteString -> IO ()) -> ByteString -> IO () forall a b. (a -> b) -> a -> b $ a -> ByteString -secretOp a -secret +secretOp a +secret #ifdef UNIX String -> FileMode -> IO () setFileMode String -filename FileMode +filename FileMode ownerReadMode #else setPermissions filename (emptyPermissions {readable = True}) diff --git a/cardano-cli/src/Cardano.CLI.Byron.Key.html b/cardano-cli/src/Cardano.CLI.Byron.Key.html index 4793a414e6c..c9e406f74c2 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.Key.html +++ b/cardano-cli/src/Cardano.CLI.Byron.Key.html @@ -41,7 +41,7 @@ | SigningKeyDeserialisationFailed !FilePath | VerificationKeyDeserialisationFailed !FilePath !Text | CannotMigrateFromNonLegacySigningKey !FilePath - deriving Int -> ByronKeyFailure -> ShowS + deriving Int -> ByronKeyFailure -> ShowS [ByronKeyFailure] -> ShowS ByronKeyFailure -> String (Int -> ByronKeyFailure -> ShowS) @@ -60,29 +60,29 @@ renderByronKeyFailure :: ByronKeyFailure -> Text renderByronKeyFailure :: ByronKeyFailure -> Text -renderByronKeyFailure ByronKeyFailure -err = +renderByronKeyFailure ByronKeyFailure +err = case ByronKeyFailure -err of - CannotMigrateFromNonLegacySigningKey String -fp -> +err of + CannotMigrateFromNonLegacySigningKey String +fp -> Text "Migrate from non-legacy Byron key unnecessary: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -fp - ReadSigningKeyFailure String -sKeyFp Text -readErr -> +fp + ReadSigningKeyFailure String +sKeyFp Text +readErr -> Text "Error reading signing key at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -sKeyFp Text -> Text -> Text +sKeyFp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -90,17 +90,17 @@ <> Text -> Text forall a. Show a => a -> Text textShow Text -readErr - ReadVerificationKeyFailure String -vKeyFp Text -readErr -> +readErr + ReadVerificationKeyFailure String +vKeyFp Text +readErr -> Text "Error reading verification key at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -vKeyFp Text -> Text -> Text +vKeyFp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -108,35 +108,35 @@ <> Text -> Text forall a. Show a => a -> Text textShow Text -readErr - LegacySigningKeyDeserialisationFailed String -fp -> +readErr + LegacySigningKeyDeserialisationFailed String +fp -> Text "Error attempting to deserialise a legacy signing key at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -fp - SigningKeyDeserialisationFailed String -sKeyFp -> +fp + SigningKeyDeserialisationFailed String +sKeyFp -> Text "Error deserialising signing key at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -sKeyFp - VerificationKeyDeserialisationFailed String -vKeyFp Text -deSerError -> +sKeyFp + VerificationKeyDeserialisationFailed String +vKeyFp Text +deSerError -> Text "Error deserialising verification key at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -vKeyFp Text -> Text -> Text +vKeyFp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -144,11 +144,11 @@ <> Text -> Text forall a. Show a => a -> Text textShow Text -deSerError +deSerError newtype NewSigningKeyFile = NewSigningKeyFile FilePath - deriving (NewSigningKeyFile -> NewSigningKeyFile -> Bool + deriving (NewSigningKeyFile -> NewSigningKeyFile -> Bool (NewSigningKeyFile -> NewSigningKeyFile -> Bool) -> (NewSigningKeyFile -> NewSigningKeyFile -> Bool) -> Eq NewSigningKeyFile @@ -157,7 +157,7 @@ $c/= :: NewSigningKeyFile -> NewSigningKeyFile -> Bool == :: NewSigningKeyFile -> NewSigningKeyFile -> Bool $c== :: NewSigningKeyFile -> NewSigningKeyFile -> Bool -Eq, Eq NewSigningKeyFile +Eq, Eq NewSigningKeyFile Eq NewSigningKeyFile -> (NewSigningKeyFile -> NewSigningKeyFile -> Ordering) -> (NewSigningKeyFile -> NewSigningKeyFile -> Bool) @@ -195,7 +195,7 @@ compare :: NewSigningKeyFile -> NewSigningKeyFile -> Ordering $ccompare :: NewSigningKeyFile -> NewSigningKeyFile -> Ordering $cp1Ord :: Eq NewSigningKeyFile -Ord, Int -> NewSigningKeyFile -> ShowS +Ord, Int -> NewSigningKeyFile -> ShowS [NewSigningKeyFile] -> ShowS NewSigningKeyFile -> String (Int -> NewSigningKeyFile -> ShowS) @@ -210,7 +210,7 @@ $cshow :: NewSigningKeyFile -> String showsPrec :: Int -> NewSigningKeyFile -> ShowS $cshowsPrec :: Int -> NewSigningKeyFile -> ShowS -Show, String -> NewSigningKeyFile +Show, String -> NewSigningKeyFile (String -> NewSigningKeyFile) -> IsString NewSigningKeyFile forall a. (String -> a) -> IsString a fromString :: String -> NewSigningKeyFile @@ -219,7 +219,7 @@ newtype NewVerificationKeyFile = NewVerificationKeyFile FilePath - deriving (NewVerificationKeyFile -> NewVerificationKeyFile -> Bool + deriving (NewVerificationKeyFile -> NewVerificationKeyFile -> Bool (NewVerificationKeyFile -> NewVerificationKeyFile -> Bool) -> (NewVerificationKeyFile -> NewVerificationKeyFile -> Bool) -> Eq NewVerificationKeyFile @@ -228,7 +228,7 @@ $c/= :: NewVerificationKeyFile -> NewVerificationKeyFile -> Bool == :: NewVerificationKeyFile -> NewVerificationKeyFile -> Bool $c== :: NewVerificationKeyFile -> NewVerificationKeyFile -> Bool -Eq, Eq NewVerificationKeyFile +Eq, Eq NewVerificationKeyFile Eq NewVerificationKeyFile -> (NewVerificationKeyFile -> NewVerificationKeyFile -> Ordering) -> (NewVerificationKeyFile -> NewVerificationKeyFile -> Bool) @@ -273,7 +273,7 @@ compare :: NewVerificationKeyFile -> NewVerificationKeyFile -> Ordering $ccompare :: NewVerificationKeyFile -> NewVerificationKeyFile -> Ordering $cp1Ord :: Eq NewVerificationKeyFile -Ord, Int -> NewVerificationKeyFile -> ShowS +Ord, Int -> NewVerificationKeyFile -> ShowS [NewVerificationKeyFile] -> ShowS NewVerificationKeyFile -> String (Int -> NewVerificationKeyFile -> ShowS) @@ -288,7 +288,7 @@ $cshow :: NewVerificationKeyFile -> String showsPrec :: Int -> NewVerificationKeyFile -> ShowS $cshowsPrec :: Int -> NewVerificationKeyFile -> ShowS -Show, String -> NewVerificationKeyFile +Show, String -> NewVerificationKeyFile (String -> NewVerificationKeyFile) -> IsString NewVerificationKeyFile forall a. (String -> a) -> IsString a @@ -300,7 +300,7 @@ -- its hash and formatted view. prettyPublicKey :: VerificationKey ByronKey-> Text prettyPublicKey :: VerificationKey ByronKey -> Text -prettyPublicKey (ByronVerificationKey vk) = +prettyPublicKey (ByronVerificationKey vk) = Format Text (AddressHash VerificationKey @@ -376,14 +376,14 @@ (VerificationKey -> AddressHash VerificationKey forall a. ToCBOR a => a -> AddressHash a Common.addressHash VerificationKey -vk) VerificationKey -vk VerificationKey -vk +vk) VerificationKey +vk VerificationKey +vk byronWitnessToVerKey :: SomeByronSigningKey -> VerificationKey ByronKey byronWitnessToVerKey :: SomeByronSigningKey -> VerificationKey ByronKey -byronWitnessToVerKey (AByronSigningKeyLegacy SigningKey ByronKeyLegacy -sKeyLeg) = VerificationKey ByronKeyLegacy -> VerificationKey ByronKey +byronWitnessToVerKey (AByronSigningKeyLegacy SigningKey ByronKeyLegacy +sKeyLeg) = VerificationKey ByronKeyLegacy -> VerificationKey ByronKey forall keyroleA keyroleB. CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB @@ -395,32 +395,32 @@ Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey ByronKeyLegacy -sKeyLeg -byronWitnessToVerKey (AByronSigningKey SigningKey ByronKey -sKeyNonLeg) = SigningKey ByronKey -> VerificationKey ByronKey +sKeyLeg +byronWitnessToVerKey (AByronSigningKey SigningKey ByronKey +sKeyNonLeg) = SigningKey ByronKey -> VerificationKey ByronKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey ByronKey -sKeyNonLeg +sKeyNonLeg -- TODO: we need to support password-protected secrets. -- | Read signing key from a file. readByronSigningKey :: ByronKeyFormat -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey readByronSigningKey :: ByronKeyFormat -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey -readByronSigningKey ByronKeyFormat -bKeyFormat (SigningKeyFile String -fp) = do - ByteString -sK <- (IOException -> ByronKeyFailure) +readByronSigningKey ByronKeyFormat +bKeyFormat (SigningKeyFile String +fp) = do + ByteString +sK <- (IOException -> ByronKeyFailure) -> IO ByteString -> ExceptT ByronKeyFailure IO ByteString forall (m :: * -> *) x a. MonadIO m => (IOException -> x) -> IO a -> ExceptT x m a handleIOExceptT (String -> Text -> ByronKeyFailure ReadSigningKeyFailure String -fp (Text -> ByronKeyFailure) +fp (Text -> ByronKeyFailure) -> (IOException -> Text) -> IOException -> ByronKeyFailure forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -437,9 +437,9 @@ forall a b. (a -> b) -> a -> b $ String -> IO ByteString SB.readFile String -fp +fp case ByronKeyFormat -bKeyFormat of +bKeyFormat of ByronKeyFormat LegacyByronKeyFormat -> case AsType (SigningKey ByronKeyLegacy) @@ -451,9 +451,9 @@ forall a. AsType a -> AsType (SigningKey a) AsSigningKey AsType ByronKeyLegacy AsByronKeyLegacy) ByteString -sK of - Just SigningKey ByronKeyLegacy -legKey -> SomeByronSigningKey +sK of + Just SigningKey ByronKeyLegacy +legKey -> SomeByronSigningKey -> ExceptT ByronKeyFailure IO SomeByronSigningKey forall (m :: * -> *) a x. Monad m => a -> ExceptT x m a right (SomeByronSigningKey @@ -463,7 +463,7 @@ forall a b. (a -> b) -> a -> b $ SigningKey ByronKeyLegacy -> SomeByronSigningKey AByronSigningKeyLegacy SigningKey ByronKeyLegacy -legKey +legKey Maybe (SigningKey ByronKeyLegacy) Nothing -> ByronKeyFailure -> ExceptT ByronKeyFailure IO SomeByronSigningKey forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -473,7 +473,7 @@ forall a b. (a -> b) -> a -> b $ String -> ByronKeyFailure LegacySigningKeyDeserialisationFailed String -fp +fp ByronKeyFormat NonLegacyByronKeyFormat -> case AsType (SigningKey ByronKey) @@ -485,9 +485,9 @@ forall a. AsType a -> AsType (SigningKey a) AsSigningKey AsType ByronKey AsByronKey) ByteString -sK of - Just SigningKey ByronKey -nonLegSKey -> SomeByronSigningKey +sK of + Just SigningKey ByronKey +nonLegSKey -> SomeByronSigningKey -> ExceptT ByronKeyFailure IO SomeByronSigningKey forall (m :: * -> *) a x. Monad m => a -> ExceptT x m a right (SomeByronSigningKey @@ -497,7 +497,7 @@ forall a b. (a -> b) -> a -> b $ SigningKey ByronKey -> SomeByronSigningKey AByronSigningKey SigningKey ByronKey -nonLegSKey +nonLegSKey Maybe (SigningKey ByronKey) Nothing -> ByronKeyFailure -> ExceptT ByronKeyFailure IO SomeByronSigningKey forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -507,23 +507,23 @@ forall a b. (a -> b) -> a -> b $ String -> ByronKeyFailure SigningKeyDeserialisationFailed String -fp +fp -- | Read verification key from a file. Throw an error if the file can't be read -- or the key fails to deserialise. readPaymentVerificationKey :: VerificationKeyFile -> ExceptT ByronKeyFailure IO Crypto.VerificationKey readPaymentVerificationKey :: VerificationKeyFile -> ExceptT ByronKeyFailure IO VerificationKey -readPaymentVerificationKey (VerificationKeyFile String -fp) = do - ByteString -vkB <- (IOException -> ByronKeyFailure) +readPaymentVerificationKey (VerificationKeyFile String +fp) = do + ByteString +vkB <- (IOException -> ByronKeyFailure) -> IO ByteString -> ExceptT ByronKeyFailure IO ByteString forall (m :: * -> *) x a. MonadIO m => (IOException -> x) -> IO a -> ExceptT x m a handleIOExceptT (String -> Text -> ByronKeyFailure ReadVerificationKeyFailure String -fp (Text -> ByronKeyFailure) +fp (Text -> ByronKeyFailure) -> (IOException -> Text) -> IOException -> ByronKeyFailure forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -537,10 +537,10 @@ forall e. Exception e => e -> String displayException) (String -> IO ByteString SB.readFile String -fp) +fp) -- Verification Key - let eVk :: ExceptT VerificationKeyParseError IO VerificationKey -eVk = Either VerificationKeyParseError VerificationKey + let eVk :: ExceptT VerificationKeyParseError IO VerificationKey +eVk = Either VerificationKeyParseError VerificationKey -> ExceptT VerificationKeyParseError IO VerificationKey forall (m :: * -> *) x a. Monad m => Either x a -> ExceptT x m a hoistEither (Either VerificationKeyParseError VerificationKey @@ -566,7 +566,7 @@ forall a b. (a -> b) -> a -> b $ ByteString -> String UTF8.toString ByteString -vkB +vkB -- Convert error to 'CliError' (VerificationKeyParseError -> ByronKeyFailure) -> ExceptT VerificationKeyParseError IO VerificationKey @@ -576,7 +576,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> Text -> ByronKeyFailure VerificationKeyDeserialisationFailed String -fp (Text -> ByronKeyFailure) +fp (Text -> ByronKeyFailure) -> (VerificationKeyParseError -> Text) -> VerificationKeyParseError -> ByronKeyFailure @@ -594,6 +594,6 @@ . VerificationKeyParseError -> String forall a. Show a => a -> String show) ExceptT VerificationKeyParseError IO VerificationKey -eVk +eVk \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Byron.Legacy.html b/cardano-cli/src/Cardano.CLI.Byron.Legacy.html index fe54c702e0c..c43bd40ab95 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.Legacy.html +++ b/cardano-cli/src/Cardano.CLI.Byron.Legacy.html @@ -29,15 +29,15 @@ encodeXPrv :: Wallet.XPrv -> E.Encoding encodeXPrv :: XPrv -> Encoding -encodeXPrv XPrv -a = ByteString -> Encoding +encodeXPrv XPrv +a = ByteString -> Encoding E.encodeBytes (ByteString -> Encoding) -> ByteString -> Encoding forall a b. (a -> b) -> a -> b $ XPrv -> ByteString Wallet.unXPrv XPrv -a +a -decodeXPrv :: D.Decoder s Wallet.XPrv +decodeXPrv :: D.Decoder s Wallet.XPrv decodeXPrv :: Decoder s XPrv decodeXPrv = Either String XPrv -> Decoder s XPrv @@ -61,41 +61,41 @@ -- Stolen from: cardano-sl/binary/src/Pos/Binary/Class/Core.hs -- | Enforces that the input size is the same as the decoded one, failing in -- case it's not. -enforceSize :: Text -> Int -> D.Decoder s () +enforceSize :: Text -> Int -> D.Decoder s () enforceSize :: Text -> Int -> Decoder s () -enforceSize Text -lbl Int -requestedSize = Decoder s Int +enforceSize Text +lbl Int +requestedSize = Decoder s Int forall s. Decoder s Int D.decodeListLenCanonical Decoder s Int -> (Int -> Decoder s ()) -> Decoder s () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= Int -> Text -> Int -> Decoder s () forall s. Int -> Text -> Int -> Decoder s () matchSize Int -requestedSize Text -lbl +requestedSize Text +lbl -- Stolen from: cardano-sl/binary/src/Pos/Binary/Class/Core.hs -- | Compare two sizes, failing if they are not equal. -matchSize :: Int -> Text -> Int -> D.Decoder s () +matchSize :: Int -> Text -> Int -> D.Decoder s () matchSize :: Int -> Text -> Int -> Decoder s () -matchSize Int -requestedSize Text -lbl Int -actualSize = +matchSize Int +requestedSize Text +lbl Int +actualSize = Bool -> Decoder s () -> Decoder s () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Int -actualSize Int -> Int -> Bool +actualSize Int -> Int -> Bool forall a. Eq a => a -> a -> Bool /= Int -requestedSize) (Decoder s () -> Decoder s ()) -> Decoder s () -> Decoder s () +requestedSize) (Decoder s () -> Decoder s ()) -> Decoder s () -> Decoder s () forall a b. (a -> b) -> a -> b $ Text -> Decoder s () forall e s a. Buildable e => e -> Decoder s a cborError (Text -lbl Text -> Text -> Text +lbl Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " failed the size check. Expected " Text -> Text -> Text @@ -103,7 +103,7 @@ <> Int -> Text forall a b. (Show a, ConvertText String b) => a -> b show Int -requestedSize Text -> Text -> Text +requestedSize Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text ", found " Text -> Text -> Text @@ -111,14 +111,14 @@ <> Int -> Text forall a b. (Show a, ConvertText String b) => a -> b show Int -actualSize) +actualSize) -- | Encoder for a Byron/Classic signing key. -- Lifted from cardano-sl legacy codebase. encodeLegacyDelegateKey :: LegacyDelegateKey -> E.Encoding encodeLegacyDelegateKey :: LegacyDelegateKey -> Encoding -encodeLegacyDelegateKey (LegacyDelegateKey (SigningKey XPrv -sk)) +encodeLegacyDelegateKey (LegacyDelegateKey (SigningKey XPrv +sk)) = Word -> Encoding E.encodeListLen Word 4 @@ -139,7 +139,7 @@ forall a. Semigroup a => a -> a -> a <> XPrv -> Encoding encodeXPrv XPrv -sk +sk Encoding -> Encoding -> Encoding forall a. Semigroup a => a -> a -> a <> Encoding @@ -155,7 +155,7 @@ -- | Decoder for a Byron/Classic signing key. -- Lifted from cardano-sl legacy codebase. -decodeLegacyDelegateKey :: D.Decoder s LegacyDelegateKey +decodeLegacyDelegateKey :: D.Decoder s LegacyDelegateKey decodeLegacyDelegateKey :: Decoder s LegacyDelegateKey decodeLegacyDelegateKey = do Text -> Int -> Decoder s () @@ -173,8 +173,8 @@ Decoder s ByteString forall s. Decoder s ByteString D.decodeBytes - SigningKey -pkey <- do + SigningKey +pkey <- do Text -> Int -> Decoder s () forall s. Text -> Int -> Decoder s () enforceSize Text @@ -216,5 +216,5 @@ forall a b. (a -> b) -> a -> b $ SigningKey -> LegacyDelegateKey LegacyDelegateKey SigningKey -pkey +pkey \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Byron.Parsers.html b/cardano-cli/src/Cardano.CLI.Byron.Parsers.html index 34fb60dd7bd..8ae7d6e3990 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.Parsers.html +++ b/cardano-cli/src/Cardano.CLI.Byron.Parsers.html @@ -66,22 +66,22 @@ import Cardano.CLI.Shelley.Commands (ByronKeyFormat (..)) import Cardano.CLI.Types -command' :: String -> String -> Parser a -> Mod CommandFields a +command' :: String -> String -> Parser a -> Mod CommandFields a command' :: String -> String -> Parser a -> Mod CommandFields a -command' String -c String -descr Parser a -p = +command' String +c String +descr Parser a +p = String -> ParserInfo a -> Mod CommandFields a forall a. String -> ParserInfo a -> Mod CommandFields a command String -c (ParserInfo a -> Mod CommandFields a) +c (ParserInfo a -> Mod CommandFields a) -> ParserInfo a -> Mod CommandFields a forall a b. (a -> b) -> a -> b $ Parser a -> InfoMod a -> ParserInfo a forall a. Parser a -> InfoMod a -> ParserInfo a info (Parser a -p Parser a -> Parser (a -> a) -> Parser a +p Parser a -> Parser (a -> a) -> Parser a forall (f :: * -> *) a b. Applicative f => f a -> f (a -> b) -> f b <**> Parser (a -> a) forall a. Parser (a -> a) @@ -93,7 +93,7 @@ mconcat [ String -> InfoMod a forall a. String -> InfoMod a progDesc String -descr ] +descr ] backwardsCompatibilityCommands :: Parser ClientCommand backwardsCompatibilityCommands :: Parser ClientCommand @@ -103,32 +103,32 @@ (Foldable t, Alternative f) => t (f a) -> f a asum [Parser ClientCommand] -hiddenCmds +hiddenCmds where - convertToByronCommand :: Mod CommandFields ByronCommand -> Parser ClientCommand - convertToByronCommand :: Mod CommandFields ByronCommand -> Parser ClientCommand -convertToByronCommand Mod CommandFields ByronCommand -p = ByronCommand -> ClientCommand + convertToByronCommand :: Mod CommandFields ByronCommand -> Parser ClientCommand + convertToByronCommand :: Mod CommandFields ByronCommand -> Parser ClientCommand +convertToByronCommand Mod CommandFields ByronCommand +p = ByronCommand -> ClientCommand ByronCommand (ByronCommand -> ClientCommand) -> Parser ByronCommand -> Parser ClientCommand forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Mod CommandFields ByronCommand -> Parser ByronCommand forall a. Mod CommandFields a -> Parser a Opt.subparser (Mod CommandFields ByronCommand -p Mod CommandFields ByronCommand +p Mod CommandFields ByronCommand -> Mod CommandFields ByronCommand -> Mod CommandFields ByronCommand forall a. Semigroup a => a -> a -> a <> Mod CommandFields ByronCommand forall (f :: * -> *) a. Mod f a Opt.internal) - hiddenCmds :: [Parser ClientCommand] - hiddenCmds :: [Parser ClientCommand] -hiddenCmds = (Mod CommandFields ByronCommand -> Parser ClientCommand) + hiddenCmds :: [Parser ClientCommand] + hiddenCmds :: [Parser ClientCommand] +hiddenCmds = (Mod CommandFields ByronCommand -> Parser ClientCommand) -> [Mod CommandFields ByronCommand] -> [Parser ClientCommand] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map Mod CommandFields ByronCommand -> Parser ClientCommand -convertToByronCommand [ Mod CommandFields ByronCommand +convertToByronCommand [ Mod CommandFields ByronCommand parseGenesisRelatedValues , Mod CommandFields ByronCommand parseKeyRelatedValues @@ -150,7 +150,7 @@ t (f a) -> f a asum [ String -> ParserInfo ByronCommand -> Parser ByronCommand -subParser String +subParser String "key" (Parser ByronCommand -> InfoMod ByronCommand -> ParserInfo ByronCommand forall a. Parser a -> InfoMod a -> ParserInfo a @@ -166,7 +166,7 @@ Opt.progDesc String "Byron key utility commands") , String -> ParserInfo ByronCommand -> Parser ByronCommand -subParser String +subParser String "transaction" (Parser ByronCommand -> InfoMod ByronCommand -> ParserInfo ByronCommand forall a. Parser a -> InfoMod a -> ParserInfo a @@ -182,7 +182,7 @@ Opt.progDesc String "Byron transaction commands") , String -> ParserInfo ByronCommand -> Parser ByronCommand -subParser String +subParser String "query" (Parser ByronCommand -> InfoMod ByronCommand -> ParserInfo ByronCommand forall a. Parser a -> InfoMod a -> ParserInfo a @@ -198,7 +198,7 @@ Opt.progDesc String "Byron node query commands.") , String -> ParserInfo ByronCommand -> Parser ByronCommand -subParser String +subParser String "genesis" (Parser ByronCommand -> InfoMod ByronCommand -> ParserInfo ByronCommand forall a. Parser a -> InfoMod a -> ParserInfo a @@ -214,7 +214,7 @@ Opt.progDesc String "Byron genesis block commands") , String -> ParserInfo ByronCommand -> Parser ByronCommand -subParser String +subParser String "governance" (Parser ByronCommand -> InfoMod ByronCommand -> ParserInfo ByronCommand forall a. Parser a -> InfoMod a -> ParserInfo a @@ -233,7 +233,7 @@ Opt.progDesc String "Byron governance commands") , String -> ParserInfo ByronCommand -> Parser ByronCommand -subParser String +subParser String "miscellaneous" (Parser ByronCommand -> InfoMod ByronCommand -> ParserInfo ByronCommand forall a. Parser a -> InfoMod a -> ParserInfo a @@ -255,11 +255,11 @@ pNodeCmdBackwardCompatible ] where - subParser :: String -> ParserInfo ByronCommand -> Parser ByronCommand - subParser :: String -> ParserInfo ByronCommand -> Parser ByronCommand -subParser String -name ParserInfo ByronCommand -pInfo = Mod CommandFields ByronCommand -> Parser ByronCommand + subParser :: String -> ParserInfo ByronCommand -> Parser ByronCommand + subParser :: String -> ParserInfo ByronCommand -> Parser ByronCommand +subParser String +name ParserInfo ByronCommand +pInfo = Mod CommandFields ByronCommand -> Parser ByronCommand forall a. Mod CommandFields a -> Parser a Opt.subparser (Mod CommandFields ByronCommand -> Parser ByronCommand) -> Mod CommandFields ByronCommand -> Parser ByronCommand @@ -267,14 +267,14 @@ $ String -> ParserInfo ByronCommand -> Mod CommandFields ByronCommand forall a. String -> ParserInfo a -> Mod CommandFields a Opt.command String -name ParserInfo ByronCommand -pInfo Mod CommandFields ByronCommand +name ParserInfo ByronCommand +pInfo Mod CommandFields ByronCommand -> Mod CommandFields ByronCommand -> Mod CommandFields ByronCommand forall a. Semigroup a => a -> a -> a <> String -> Mod CommandFields ByronCommand forall (f :: * -> *) a. HasMetavar f => String -> Mod f a Opt.metavar String -name +name pNodeCmdBackwardCompatible :: Parser NodeCmd pNodeCmdBackwardCompatible :: Parser NodeCmd @@ -966,8 +966,8 @@ -> Parser ByteString TxId -> Parser ByteString TxId forall a b. (a -> b) -> a -> b $ do - ByteString -bstr <- (Char -> Bool) -> Parser ByteString + ByteString +bstr <- (Char -> Bool) -> Parser ByteString Atto.takeWhile1 Char -> Bool Char.isHexDigit case AsType TxId -> ByteString -> Maybe TxId @@ -976,12 +976,12 @@ AsType a -> ByteString -> Maybe a deserialiseFromRawBytesHex AsType TxId AsTxId ByteString -bstr of - Just TxId -addr -> TxId -> Parser ByteString TxId +bstr of + Just TxId +addr -> TxId -> Parser ByteString TxId forall (m :: * -> *) a. Monad m => a -> m a return TxId -addr +addr Maybe TxId Nothing -> String -> Parser ByteString TxId forall (m :: * -> *) a. MonadFail m => String -> m a @@ -994,7 +994,7 @@ ++ ByteString -> String forall a b. (Show a, ConvertText String b) => a -> b show ByteString -bstr +bstr parseTxIxAtto :: Atto.Parser TxIx parseTxIxAtto :: Parser ByteString TxIx @@ -1013,19 +1013,19 @@ -> Mod OptionFields (TxOut ByronEra) -> Parser (TxOut ByronEra) forall a. ReadM a -> Mod OptionFields a -> Parser a option - ( (\(Text -addr, Word64 -lovelace) -> AddressInEra ByronEra + ( (\(Text +addr, Word64 +lovelace) -> AddressInEra ByronEra -> TxOutValue ByronEra -> TxOutDatumHash ByronEra -> TxOut ByronEra forall era. AddressInEra era -> TxOutValue era -> TxOutDatumHash era -> TxOut era TxOut (Text -> AddressInEra ByronEra -pAddressInEra Text -addr) +pAddressInEra Text +addr) (Word64 -> TxOutValue ByronEra -pLovelaceTxOut Word64 -lovelace) +pLovelaceTxOut Word64 +lovelace) TxOutDatumHash ByronEra forall era. TxOutDatumHash era TxOutDatumHashNone) @@ -1060,15 +1060,15 @@ help String "Specify a transaction output, as a pair of an address and lovelace." where - pAddressInEra :: Text -> AddressInEra ByronEra - pAddressInEra :: Text -> AddressInEra ByronEra -pAddressInEra Text -t = + pAddressInEra :: Text -> AddressInEra ByronEra + pAddressInEra :: Text -> AddressInEra ByronEra +pAddressInEra Text +t = case Text -> Either DecoderError Address decodeAddressBase58 Text -t of - Left DecoderError -err -> Text -> AddressInEra ByronEra +t of + Left DecoderError +err -> Text -> AddressInEra ByronEra forall a. HasCallStack => Text -> a panic (Text -> AddressInEra ByronEra) -> Text -> AddressInEra ByronEra forall a b. (a -> b) -> a -> b @@ -1079,9 +1079,9 @@ Text.pack (DecoderError -> String forall a b. (Show a, ConvertText String b) => a -> b show DecoderError -err) - Right Address -byronAddress -> AddressTypeInEra ByronAddr ByronEra +err) + Right Address +byronAddress -> AddressTypeInEra ByronAddr ByronEra -> Address ByronAddr -> AddressInEra ByronEra forall addrtype era. AddressTypeInEra addrtype era @@ -1093,14 +1093,14 @@ forall a b. (a -> b) -> a -> b $ Address -> Address ByronAddr ByronAddress Address -byronAddress +byronAddress - pLovelaceTxOut :: Word64 -> TxOutValue ByronEra - pLovelaceTxOut :: Word64 -> TxOutValue ByronEra -pLovelaceTxOut Word64 -l = + pLovelaceTxOut :: Word64 -> TxOutValue ByronEra + pLovelaceTxOut :: Word64 -> TxOutValue ByronEra +pLovelaceTxOut Word64 +l = if Word64 -l Word64 -> Word64 -> Bool +l Word64 -> Word64 -> Bool forall a. Ord a => a -> a -> Bool > (Word64 forall a. Bounded a => a @@ -1112,7 +1112,7 @@ $ Word64 -> Text forall a b. (Show a, ConvertText String b) => a -> b show Word64 -l Text -> Text -> Text +l Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " lovelace exceeds the Word64 upper bound" @@ -1130,18 +1130,18 @@ $ Word64 -> Integer forall a. Integral a => a -> Integer toInteger Word64 -l +l -readerFromAttoParser :: Atto.Parser a -> Opt.ReadM a +readerFromAttoParser :: Atto.Parser a -> Opt.ReadM a readerFromAttoParser :: Parser a -> ReadM a -readerFromAttoParser Parser a -p = +readerFromAttoParser Parser a +p = (String -> Either String a) -> ReadM a forall a. (String -> Either String a) -> ReadM a Opt.eitherReader (Parser a -> ByteString -> Either String a forall a. Parser a -> ByteString -> Either String a Atto.parseOnly (Parser a -p Parser a -> Parser ByteString () -> Parser a +p Parser a -> Parser ByteString () -> Parser a forall (f :: * -> *) a b. Applicative f => f a -> f b -> f a <* Parser ByteString () forall t. Chunk t => Parser t () @@ -2101,7 +2101,7 @@ option ((String -> Either String SystemTag) -> ReadM SystemTag forall a. (String -> Either String a) -> ReadM a eitherReader String -> Either String SystemTag -checkSysTag) +checkSysTag) ( String -> Mod OptionFields SystemTag forall (f :: * -> *) a. HasName f => String -> Mod f a long String @@ -2122,26 +2122,26 @@ "Identify which system (linux, win64, etc) the update proposal is for." ) where - checkSysTag :: String -> Either String SystemTag - checkSysTag :: String -> Either String SystemTag -checkSysTag String -name = - let tag :: SystemTag -tag = Text -> SystemTag + checkSysTag :: String -> Either String SystemTag + checkSysTag :: String -> Either String SystemTag +checkSysTag String +name = + let tag :: SystemTag +tag = Text -> SystemTag SystemTag (Text -> SystemTag) -> Text -> SystemTag forall a b. (a -> b) -> a -> b $ String -> Text forall a b. ConvertText a b => a -> b toS String -name +name in case SystemTag -> Either SystemTagError () forall (m :: * -> *). MonadError SystemTagError m => SystemTag -> m () checkSystemTag SystemTag -tag of - Left SystemTagError -err -> String -> Either String SystemTag +tag of + Left SystemTagError +err -> String -> Either String SystemTag forall a b. a -> Either a b Left (String -> Either String SystemTag) -> (Text -> String) -> Text -> Either String SystemTag @@ -2158,11 +2158,11 @@ sformat Format Text (SystemTagError -> Text) forall a r. Buildable a => Format r (a -> r) build SystemTagError -err +err Right () -> SystemTag -> Either String SystemTag forall a b. b -> Either a b Right SystemTag -tag +tag parseInstallerHash :: Parser InstallerHash parseInstallerHash :: Parser InstallerHash @@ -2500,7 +2500,7 @@ option ((String -> Either String ApplicationName) -> ReadM ApplicationName forall a. (String -> Either String a) -> ReadM a eitherReader String -> Either String ApplicationName -checkAppNameLength) +checkAppNameLength) ( String -> Mod OptionFields ApplicationName forall (f :: * -> *) a. HasName f => String -> Mod f a long String @@ -2523,26 +2523,26 @@ "The name of the application." ) where - checkAppNameLength :: String -> Either String ApplicationName - checkAppNameLength :: String -> Either String ApplicationName -checkAppNameLength String -name = - let appName :: ApplicationName -appName = Text -> ApplicationName + checkAppNameLength :: String -> Either String ApplicationName + checkAppNameLength :: String -> Either String ApplicationName +checkAppNameLength String +name = + let appName :: ApplicationName +appName = Text -> ApplicationName ApplicationName (Text -> ApplicationName) -> Text -> ApplicationName forall a b. (a -> b) -> a -> b $ String -> Text forall a b. ConvertText a b => a -> b toS String -name +name in case ApplicationName -> Either ApplicationNameError () forall (m :: * -> *). MonadError ApplicationNameError m => ApplicationName -> m () checkApplicationName ApplicationName -appName of - Left ApplicationNameError -err -> String -> Either String ApplicationName +appName of + Left ApplicationNameError +err -> String -> Either String ApplicationName forall a b. a -> Either a b Left (String -> Either String ApplicationName) -> (Text -> String) -> Text -> Either String ApplicationName @@ -2560,11 +2560,11 @@ sformat Format Text (ApplicationNameError -> Text) forall a r. Buildable a => Format r (a -> r) build ApplicationNameError -err +err Right () -> ApplicationName -> Either String ApplicationName forall a b. b -> Either a b Right ApplicationName -appName +appName parseNumSoftwareVersion :: Parser NumSoftwareVersion parseNumSoftwareVersion :: Parser NumSoftwareVersion @@ -2666,12 +2666,12 @@ ) -parseWord :: Integral a => String -> String -> String -> Parser a +parseWord :: Integral a => String -> String -> String -> Parser a parseWord :: String -> String -> String -> Parser a -parseWord String -optname String -desc String -metvar = ReadM a -> Mod OptionFields a -> Parser a +parseWord String +optname String +desc String +metvar = ReadM a -> Mod OptionFields a -> Parser a forall a. ReadM a -> Mod OptionFields a -> Parser a option (Integer -> a forall a. Num a => Integer -> a @@ -2685,25 +2685,25 @@ $ String -> Mod OptionFields a forall (f :: * -> *) a. HasName f => String -> Mod f a long String -optname Mod OptionFields a -> Mod OptionFields a -> Mod OptionFields a +optname Mod OptionFields a -> Mod OptionFields a -> Mod OptionFields a forall a. Semigroup a => a -> a -> a <> String -> Mod OptionFields a forall (f :: * -> *) a. HasMetavar f => String -> Mod f a metavar String -metvar Mod OptionFields a -> Mod OptionFields a -> Mod OptionFields a +metvar Mod OptionFields a -> Mod OptionFields a -> Mod OptionFields a forall a. Semigroup a => a -> a -> a <> String -> Mod OptionFields a forall (f :: * -> *) a. String -> Mod f a help String -desc +desc parseAddress :: String -> String -> Parser (Address ByronAddr) parseAddress :: String -> String -> Parser (Address ByronAddr) -parseAddress String -opt String -desc = +parseAddress String +opt String +desc = ReadM (Address ByronAddr) -> Mod OptionFields (Address ByronAddr) -> Parser (Address ByronAddr) @@ -2723,7 +2723,7 @@ $ String -> Mod OptionFields (Address ByronAddr) forall (f :: * -> *) a. HasName f => String -> Mod f a long String -opt Mod OptionFields (Address ByronAddr) +opt Mod OptionFields (Address ByronAddr) -> Mod OptionFields (Address ByronAddr) -> Mod OptionFields (Address ByronAddr) forall a. Semigroup a => a -> a -> a @@ -2737,7 +2737,7 @@ <> String -> Mod OptionFields (Address ByronAddr) forall (f :: * -> *) a. String -> Mod f a help String -desc +desc parseByronKeyFormat :: Parser ByronKeyFormat parseByronKeyFormat :: Parser ByronKeyFormat @@ -2864,15 +2864,15 @@ parseNewDirectory :: String -> String -> Parser NewDirectory parseNewDirectory :: String -> String -> Parser NewDirectory -parseNewDirectory String -opt String -desc = String -> NewDirectory +parseNewDirectory String +opt String +desc = String -> NewDirectory NewDirectory (String -> NewDirectory) -> Parser String -> Parser NewDirectory forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> String -> Parser String parseFilePath String -opt String -desc +opt String +desc parseFractionWithDefault :: String @@ -2880,10 +2880,10 @@ -> Double -> Parser Rational parseFractionWithDefault :: String -> String -> Double -> Parser Rational -parseFractionWithDefault String -optname String -desc Double -w = +parseFractionWithDefault String +optname String +desc Double +w = Double -> Rational forall a. Real a => a -> Rational toRational (Double -> Rational) -> Parser Double -> Parser Rational @@ -2895,7 +2895,7 @@ ( String -> Mod OptionFields Double forall (f :: * -> *) a. HasName f => String -> Mod f a long String -optname +optname Mod OptionFields Double -> Mod OptionFields Double -> Mod OptionFields Double forall a. Semigroup a => a -> a -> a @@ -2909,21 +2909,21 @@ <> String -> Mod OptionFields Double forall (f :: * -> *) a. String -> Mod f a help String -desc +desc Mod OptionFields Double -> Mod OptionFields Double -> Mod OptionFields Double forall a. Semigroup a => a -> a -> a <> Double -> Mod OptionFields Double forall (f :: * -> *) a. HasValue f => a -> Mod f a value Double -w +w ) pNetworkId :: Parser NetworkId pNetworkId :: Parser NetworkId pNetworkId = Parser NetworkId -pMainnet' Parser NetworkId -> Parser NetworkId -> Parser NetworkId +pMainnet' Parser NetworkId -> Parser NetworkId -> Parser NetworkId forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> (NetworkMagic -> NetworkId) -> Parser NetworkMagic -> Parser NetworkId @@ -2932,9 +2932,9 @@ Testnet Parser NetworkMagic pTestnetMagic where - pMainnet' :: Parser NetworkId - pMainnet' :: Parser NetworkId -pMainnet' = + pMainnet' :: Parser NetworkId + pMainnet' :: Parser NetworkId +pMainnet' = NetworkId -> Mod FlagFields NetworkId -> Parser NetworkId forall a. a -> Mod FlagFields a -> Parser a Opt.flag' NetworkId @@ -2990,8 +2990,8 @@ parseNewSigningKeyFile :: String -> Parser NewSigningKeyFile parseNewSigningKeyFile :: String -> Parser NewSigningKeyFile -parseNewSigningKeyFile String -opt = +parseNewSigningKeyFile String +opt = String -> NewSigningKeyFile NewSigningKeyFile (String -> NewSigningKeyFile) @@ -2999,26 +2999,26 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> String -> Parser String parseFilePath String -opt String +opt String "Non-existent file to write the signing key to." parseNewTxFile :: String -> Parser NewTxFile parseNewTxFile :: String -> Parser NewTxFile -parseNewTxFile String -opt = +parseNewTxFile String +opt = String -> NewTxFile NewTxFile (String -> NewTxFile) -> Parser String -> Parser NewTxFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> String -> Parser String parseFilePath String -opt String +opt String "Non-existent file to write the signed transaction to." parseNewVerificationKeyFile :: String -> Parser NewVerificationKeyFile parseNewVerificationKeyFile :: String -> Parser NewVerificationKeyFile -parseNewVerificationKeyFile String -opt = +parseNewVerificationKeyFile String +opt = String -> NewVerificationKeyFile NewVerificationKeyFile (String -> NewVerificationKeyFile) @@ -3026,13 +3026,13 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> String -> Parser String parseFilePath String -opt String +opt String "Non-existent file to write the verification key to." parseProtocolMagicId :: String -> Parser ProtocolMagicId parseProtocolMagicId :: String -> Parser ProtocolMagicId -parseProtocolMagicId String -arg = +parseProtocolMagicId String +arg = NumSoftwareVersion -> ProtocolMagicId ProtocolMagicId (NumSoftwareVersion -> ProtocolMagicId) @@ -3041,7 +3041,7 @@ <$> String -> String -> Parser NumSoftwareVersion forall a. Integral a => String -> String -> Parser a parseIntegral String -arg String +arg String "The magic number unique to any instance of Cardano." parseProtocolMagic :: Parser ProtocolMagic @@ -3081,22 +3081,22 @@ parseTxFile :: String -> Parser TxFile parseTxFile :: String -> Parser TxFile -parseTxFile String -opt = +parseTxFile String +opt = String -> TxFile TxFile (String -> TxFile) -> Parser String -> Parser TxFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> String -> Parser String parseFilePath String -opt String +opt String "File containing the signed transaction." parseUTCTime :: String -> String -> Parser UTCTime parseUTCTime :: String -> String -> Parser UTCTime -parseUTCTime String -optname String -desc = +parseUTCTime String +optname String +desc = ReadM UTCTime -> Mod OptionFields UTCTime -> Parser UTCTime forall a. ReadM a -> Mod OptionFields a -> Parser a option (POSIXTime -> UTCTime @@ -3118,7 +3118,7 @@ $ String -> Mod OptionFields UTCTime forall (f :: * -> *) a. HasName f => String -> Mod f a long String -optname Mod OptionFields UTCTime +optname Mod OptionFields UTCTime -> Mod OptionFields UTCTime -> Mod OptionFields UTCTime forall a. Semigroup a => a -> a -> a <> String -> Mod OptionFields UTCTime @@ -3130,17 +3130,17 @@ <> String -> Mod OptionFields UTCTime forall (f :: * -> *) a. String -> Mod f a help String -desc +desc cliParseBase58Address :: Text -> Address ByronAddr cliParseBase58Address :: Text -> Address ByronAddr -cliParseBase58Address Text -t = +cliParseBase58Address Text +t = case Text -> Either DecoderError Address decodeAddressBase58 Text -t of - Left DecoderError -err -> Text -> Address ByronAddr +t of + Left DecoderError +err -> Text -> Address ByronAddr forall a. HasCallStack => Text -> a panic (Text -> Address ByronAddr) -> Text -> Address ByronAddr forall a b. (a -> b) -> a -> b @@ -3151,17 +3151,17 @@ Text.pack (DecoderError -> String forall a b. (Show a, ConvertText String b) => a -> b show DecoderError -err) - Right Address -byronAddress -> Address -> Address ByronAddr +err) + Right Address +byronAddress -> Address -> Address ByronAddr ByronAddress Address -byronAddress +byronAddress parseFraction :: String -> String -> Parser Rational parseFraction :: String -> String -> Parser Rational -parseFraction String -optname String -desc = +parseFraction String +optname String +desc = ReadM Rational -> Mod OptionFields Rational -> Parser Rational forall a. ReadM a -> Mod OptionFields a -> Parser a option (Double -> Rational @@ -3176,7 +3176,7 @@ String -> Mod OptionFields Rational forall (f :: * -> *) a. HasName f => String -> Mod f a long String -optname +optname Mod OptionFields Rational -> Mod OptionFields Rational -> Mod OptionFields Rational forall a. Semigroup a => a -> a -> a @@ -3190,13 +3190,13 @@ <> String -> Mod OptionFields Rational forall (f :: * -> *) a. String -> Mod f a help String -desc +desc -parseIntegral :: Integral a => String -> String -> Parser a +parseIntegral :: Integral a => String -> String -> Parser a parseIntegral :: String -> String -> Parser a -parseIntegral String -optname String -desc = ReadM a -> Mod OptionFields a -> Parser a +parseIntegral String +optname String +desc = ReadM a -> Mod OptionFields a -> Parser a forall a. ReadM a -> Mod OptionFields a -> Parser a option (Integer -> a forall a. Num a => Integer -> a @@ -3210,7 +3210,7 @@ $ String -> Mod OptionFields a forall (f :: * -> *) a. HasName f => String -> Mod f a long String -optname Mod OptionFields a -> Mod OptionFields a -> Mod OptionFields a +optname Mod OptionFields a -> Mod OptionFields a -> Mod OptionFields a forall a. Semigroup a => a -> a -> a <> String -> Mod OptionFields a forall (f :: * -> *) a. HasMetavar f => String -> Mod f a @@ -3220,23 +3220,23 @@ <> String -> Mod OptionFields a forall (f :: * -> *) a. String -> Mod f a help String -desc +desc parseLovelace :: String -> String -> Parser Byron.Lovelace parseLovelace :: String -> String -> Parser Lovelace -parseLovelace String -optname String -desc = +parseLovelace String +optname String +desc = ReadM Lovelace -> Mod OptionFields Lovelace -> Parser Lovelace forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option (Parser Lovelace -> ReadM Lovelace forall a. Parser a -> ReadM a readerFromAttoParser Parser Lovelace -parseLovelaceAtto) +parseLovelaceAtto) ( String -> Mod OptionFields Lovelace forall (f :: * -> *) a. HasName f => String -> Mod f a long String -optname +optname Mod OptionFields Lovelace -> Mod OptionFields Lovelace -> Mod OptionFields Lovelace forall a. Semigroup a => a -> a -> a @@ -3250,18 +3250,18 @@ <> String -> Mod OptionFields Lovelace forall (f :: * -> *) a. String -> Mod f a help String -desc +desc ) where - parseLovelaceAtto :: Atto.Parser Byron.Lovelace - parseLovelaceAtto :: Parser Lovelace -parseLovelaceAtto = do - Integer -i <- Parser Integer + parseLovelaceAtto :: Atto.Parser Byron.Lovelace + parseLovelaceAtto :: Parser Lovelace +parseLovelaceAtto = do + Integer +i <- Parser Integer forall a. Integral a => Parser a Atto.decimal if Integer -i Integer -> Integer -> Bool +i Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool > Word64 -> Integer forall a. Integral a => a -> Integer @@ -3275,19 +3275,19 @@ $ Integer -> String forall a b. (Show a, ConvertText String b) => a -> b show Integer -i String -> String -> String +i String -> String -> String forall a. Semigroup a => a -> a -> a <> String " lovelace exceeds the Word64 upper bound" else case Lovelace -> Maybe Lovelace toByronLovelace (Integer -> Lovelace Lovelace Integer -i) of - Just Lovelace -byronLovelace -> Lovelace -> Parser Lovelace +i) of + Just Lovelace +byronLovelace -> Lovelace -> Parser Lovelace forall (m :: * -> *) a. Monad m => a -> m a return Lovelace -byronLovelace +byronLovelace Maybe Lovelace Nothing -> Text -> Parser Lovelace forall a. HasCallStack => Text -> a @@ -3300,19 +3300,19 @@ Text.pack (Integer -> String forall a b. (Show a, ConvertText String b) => a -> b show Integer -i) +i) readDouble :: ReadM Double readDouble :: ReadM Double readDouble = do - Double -f <- ReadM Double + Double +f <- ReadM Double forall a. Read a => ReadM a auto Bool -> ReadM () -> ReadM () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Double -f Double -> Double -> Bool +f Double -> Double -> Bool forall a. Ord a => a -> a -> Bool < Double 0) (ReadM () -> ReadM ()) -> ReadM () -> ReadM () @@ -3324,7 +3324,7 @@ Bool -> ReadM () -> ReadM () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Double -f Double -> Double -> Bool +f Double -> Double -> Bool forall a. Ord a => a -> a -> Bool > Double 1) (ReadM () -> ReadM ()) -> ReadM () -> ReadM () @@ -3336,20 +3336,20 @@ Double -> ReadM Double forall (m :: * -> *) a. Monad m => a -> m a return Double -f +f parseFilePath :: String -> String -> Parser FilePath parseFilePath :: String -> String -> Parser String -parseFilePath String -optname String -desc = +parseFilePath String +optname String +desc = Mod OptionFields String -> Parser String forall s. IsString s => Mod OptionFields s -> Parser s strOption ( String -> Mod OptionFields String forall (f :: * -> *) a. HasName f => String -> Mod f a long String -optname +optname Mod OptionFields String -> Mod OptionFields String -> Mod OptionFields String forall a. Semigroup a => a -> a -> a @@ -3363,7 +3363,7 @@ <> String -> Mod OptionFields String forall (f :: * -> *) a. String -> Mod f a help String -desc +desc Mod OptionFields String -> Mod OptionFields String -> Mod OptionFields String forall a. Semigroup a => a -> a -> a @@ -3376,28 +3376,28 @@ parseSigningKeyFile :: String -> String -> Parser SigningKeyFile parseSigningKeyFile :: String -> String -> Parser SigningKeyFile -parseSigningKeyFile String -opt String -desc = String -> SigningKeyFile +parseSigningKeyFile String +opt String +desc = String -> SigningKeyFile SigningKeyFile (String -> SigningKeyFile) -> Parser String -> Parser SigningKeyFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> String -> Parser String parseFilePath String -opt String -desc +opt String +desc parseGenesisFile :: String -> Parser GenesisFile parseGenesisFile :: String -> Parser GenesisFile -parseGenesisFile String -opt = +parseGenesisFile String +opt = String -> GenesisFile GenesisFile (String -> GenesisFile) -> Parser String -> Parser GenesisFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> String -> Parser String parseFilePath String -opt String +opt String "Genesis JSON file." \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Byron.Query.html b/cardano-cli/src/Cardano.CLI.Byron.Query.html index 3e8a54fb90a..b7a6d20aa9e 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.Query.html +++ b/cardano-cli/src/Cardano.CLI.Byron.Query.html @@ -23,7 +23,7 @@ {- HLINT ignore "Reduce duplication" -} newtype ByronQueryError = ByronQueryEnvVarSocketErr EnvSocketError - deriving Int -> ByronQueryError -> ShowS + deriving Int -> ByronQueryError -> ShowS [ByronQueryError] -> ShowS ByronQueryError -> String (Int -> ByronQueryError -> ShowS) @@ -42,14 +42,14 @@ renderByronQueryError :: ByronQueryError -> Text renderByronQueryError :: ByronQueryError -> Text -renderByronQueryError ByronQueryError -err = +renderByronQueryError ByronQueryError +err = case ByronQueryError -err of - ByronQueryEnvVarSocketErr EnvSocketError -sockEnvErr -> EnvSocketError -> Text +err of + ByronQueryEnvVarSocketErr EnvSocketError +sockEnvErr -> EnvSocketError -> Text renderEnvSocketError EnvSocketError -sockEnvErr +sockEnvErr -------------------------------------------------------------------------------- -- Query local node's chain tip @@ -57,10 +57,10 @@ runGetLocalNodeTip :: NetworkId -> ExceptT ByronQueryError IO () runGetLocalNodeTip :: NetworkId -> ExceptT ByronQueryError IO () -runGetLocalNodeTip NetworkId -networkId = do - SocketPath String -sockPath <- (EnvSocketError -> ByronQueryError) +runGetLocalNodeTip NetworkId +networkId = do + SocketPath String +sockPath <- (EnvSocketError -> ByronQueryError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ByronQueryError IO SocketPath forall (m :: * -> *) x y a. @@ -70,18 +70,18 @@ ByronQueryEnvVarSocketErr ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let connctInfo :: LocalNodeConnectInfo ByronMode -connctInfo = + let connctInfo :: LocalNodeConnectInfo ByronMode +connctInfo = LocalNodeConnectInfo :: forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo { localNodeSocketPath :: String localNodeSocketPath = String -sockPath, +sockPath, localNodeNetworkId :: NetworkId localNodeNetworkId = NetworkId -networkId, +networkId, localConsensusModeParams :: ConsensusModeParams ByronMode localConsensusModeParams = EpochSlots -> ConsensusModeParams ByronMode ByronModeParams (Word64 -> EpochSlots @@ -89,8 +89,8 @@ 21600) } - ChainTip -tip <- IO ChainTip -> ExceptT ByronQueryError IO ChainTip + ChainTip +tip <- IO ChainTip -> ExceptT ByronQueryError IO ChainTip forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO ChainTip -> ExceptT ByronQueryError IO ChainTip) -> IO ChainTip -> ExceptT ByronQueryError IO ChainTip @@ -98,7 +98,7 @@ $ LocalNodeConnectInfo ByronMode -> IO ChainTip forall mode. LocalNodeConnectInfo mode -> IO ChainTip getLocalChainTip LocalNodeConnectInfo ByronMode -connctInfo +connctInfo IO () -> ExceptT ByronQueryError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronQueryError IO ()) @@ -126,7 +126,7 @@ $ ChainTip -> ByteString forall a. ToJSON a => a -> ByteString encodePretty ChainTip -tip +tip \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Byron.Run.html b/cardano-cli/src/Cardano.CLI.Byron.Run.html index 9d28f795afd..bc35919b5dd 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.Run.html +++ b/cardano-cli/src/Cardano.CLI.Byron.Run.html @@ -50,7 +50,7 @@ | ByronCmdTxSubmitError !(ApplyTxErr ByronBlock) | ByronCmdUpdateProposalError !ByronUpdateProposalError | ByronCmdVoteError !ByronVoteError - deriving Int -> ByronClientCmdError -> ShowS + deriving Int -> ByronClientCmdError -> ShowS [ByronClientCmdError] -> ShowS ByronClientCmdError -> String (Int -> ByronClientCmdError -> ShowS) @@ -69,36 +69,36 @@ renderByronClientCmdError :: ByronClientCmdError -> Text renderByronClientCmdError :: ByronClientCmdError -> Text -renderByronClientCmdError ByronClientCmdError -err = +renderByronClientCmdError ByronClientCmdError +err = case ByronClientCmdError -err of - ByronCmdDelegationError ByronDelegationError -e -> ByronDelegationError -> Text +err of + ByronCmdDelegationError ByronDelegationError +e -> ByronDelegationError -> Text renderByronDelegationError ByronDelegationError -e - ByronCmdGenesisError ByronGenesisError -e -> ByronGenesisError -> Text +e + ByronCmdGenesisError ByronGenesisError +e -> ByronGenesisError -> Text renderByronGenesisError ByronGenesisError -e - ByronCmdHelpersError HelpersError -e -> HelpersError -> Text +e + ByronCmdHelpersError HelpersError +e -> HelpersError -> Text renderHelpersError HelpersError -e - ByronCmdKeyFailure ByronKeyFailure -e -> ByronKeyFailure -> Text +e + ByronCmdKeyFailure ByronKeyFailure +e -> ByronKeyFailure -> Text renderByronKeyFailure ByronKeyFailure -e - ByronCmdQueryError ByronQueryError -e -> ByronQueryError -> Text +e + ByronCmdQueryError ByronQueryError +e -> ByronQueryError -> Text renderByronQueryError ByronQueryError -e - ByronCmdTxError ByronTxError -e -> ByronTxError -> Text +e + ByronCmdTxError ByronTxError +e -> ByronTxError -> Text renderByronTxError ByronTxError -e - ByronCmdTxSubmitError ApplyTxErr ByronBlock -e -> +e + ByronCmdTxSubmitError ApplyTxErr ByronBlock +e -> Text "Error while submitting Byron tx: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -107,35 +107,35 @@ forall a b. (Show a, ConvertText String b) => a -> b show ApplyMempoolPayloadErr ApplyTxErr ByronBlock -e) - ByronCmdUpdateProposalError ByronUpdateProposalError -e -> ByronUpdateProposalError -> Text +e) + ByronCmdUpdateProposalError ByronUpdateProposalError +e -> ByronUpdateProposalError -> Text renderByronUpdateProposalError ByronUpdateProposalError -e - ByronCmdVoteError ByronVoteError -e -> ByronVoteError -> Text +e + ByronCmdVoteError ByronVoteError +e -> ByronVoteError -> Text renderByronVoteError ByronVoteError -e +e runByronClientCommand :: ByronCommand -> ExceptT ByronClientCmdError IO () runByronClientCommand :: ByronCommand -> ExceptT ByronClientCmdError IO () -runByronClientCommand ByronCommand -c = +runByronClientCommand ByronCommand +c = case ByronCommand -c of - NodeCmd NodeCmd -bc -> NodeCmd -> ExceptT ByronClientCmdError IO () +c of + NodeCmd NodeCmd +bc -> NodeCmd -> ExceptT ByronClientCmdError IO () runNodeCmd NodeCmd -bc - Genesis NewDirectory -outDir GenesisParameters -params -> NewDirectory +bc + Genesis NewDirectory +outDir GenesisParameters +params -> NewDirectory -> GenesisParameters -> ExceptT ByronClientCmdError IO () runGenesisCommand NewDirectory -outDir GenesisParameters -params - GetLocalNodeTip NetworkId -network -> (ByronQueryError -> ByronClientCmdError) +outDir GenesisParameters +params + GetLocalNodeTip NetworkId +network -> (ByronQueryError -> ByronClientCmdError) -> ExceptT ByronQueryError IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) x y a. @@ -149,78 +149,78 @@ forall a b. (a -> b) -> a -> b $ NetworkId -> ExceptT ByronQueryError IO () runGetLocalNodeTip NetworkId -network - ValidateCBOR CBORObject -cborObject String -fp -> CBORObject -> String -> ExceptT ByronClientCmdError IO () +network + ValidateCBOR CBORObject +cborObject String +fp -> CBORObject -> String -> ExceptT ByronClientCmdError IO () runValidateCBOR CBORObject -cborObject String -fp - PrettyPrintCBOR String -fp -> String -> ExceptT ByronClientCmdError IO () +cborObject String +fp + PrettyPrintCBOR String +fp -> String -> ExceptT ByronClientCmdError IO () runPrettyPrintCBOR String -fp - PrettySigningKeyPublic ByronKeyFormat -bKeyFormat SigningKeyFile -skF -> ByronKeyFormat +fp + PrettySigningKeyPublic ByronKeyFormat +bKeyFormat SigningKeyFile +skF -> ByronKeyFormat -> SigningKeyFile -> ExceptT ByronClientCmdError IO () runPrettySigningKeyPublic ByronKeyFormat -bKeyFormat SigningKeyFile -skF - MigrateDelegateKeyFrom SigningKeyFile -oldKey NewSigningKeyFile -nskf -> +bKeyFormat SigningKeyFile +skF + MigrateDelegateKeyFrom SigningKeyFile +oldKey NewSigningKeyFile +nskf -> SigningKeyFile -> NewSigningKeyFile -> ExceptT ByronClientCmdError IO () runMigrateDelegateKeyFrom SigningKeyFile -oldKey NewSigningKeyFile -nskf - PrintGenesisHash GenesisFile -genFp -> GenesisFile -> ExceptT ByronClientCmdError IO () +oldKey NewSigningKeyFile +nskf + PrintGenesisHash GenesisFile +genFp -> GenesisFile -> ExceptT ByronClientCmdError IO () runPrintGenesisHash GenesisFile -genFp - PrintSigningKeyAddress ByronKeyFormat -bKeyFormat NetworkId -networkid SigningKeyFile -skF -> ByronKeyFormat +genFp + PrintSigningKeyAddress ByronKeyFormat +bKeyFormat NetworkId +networkid SigningKeyFile +skF -> ByronKeyFormat -> NetworkId -> SigningKeyFile -> ExceptT ByronClientCmdError IO () runPrintSigningKeyAddress ByronKeyFormat -bKeyFormat NetworkId -networkid SigningKeyFile -skF - Keygen NewSigningKeyFile -nskf -> NewSigningKeyFile -> ExceptT ByronClientCmdError IO () +bKeyFormat NetworkId +networkid SigningKeyFile +skF + Keygen NewSigningKeyFile +nskf -> NewSigningKeyFile -> ExceptT ByronClientCmdError IO () runKeygen NewSigningKeyFile -nskf - ToVerification ByronKeyFormat -bKeyFormat SigningKeyFile -skFp NewVerificationKeyFile -nvkFp -> ByronKeyFormat +nskf + ToVerification ByronKeyFormat +bKeyFormat SigningKeyFile +skFp NewVerificationKeyFile +nvkFp -> ByronKeyFormat -> SigningKeyFile -> NewVerificationKeyFile -> ExceptT ByronClientCmdError IO () runToVerification ByronKeyFormat -bKeyFormat SigningKeyFile -skFp NewVerificationKeyFile -nvkFp - SubmitTx NetworkId -network TxFile -fp -> NetworkId -> TxFile -> ExceptT ByronClientCmdError IO () +bKeyFormat SigningKeyFile +skFp NewVerificationKeyFile +nvkFp + SubmitTx NetworkId +network TxFile +fp -> NetworkId -> TxFile -> ExceptT ByronClientCmdError IO () runSubmitTx NetworkId -network TxFile -fp - GetTxId TxFile -fp -> TxFile -> ExceptT ByronClientCmdError IO () +network TxFile +fp + GetTxId TxFile +fp -> TxFile -> ExceptT ByronClientCmdError IO () runGetTxId TxFile -fp - SpendGenesisUTxO GenesisFile -genFp NetworkId -nw ByronKeyFormat -era NewTxFile -nftx SigningKeyFile -ctKey Address ByronAddr -genRichAddr [TxOut ByronEra] -outs -> +fp + SpendGenesisUTxO GenesisFile +genFp NetworkId +nw ByronKeyFormat +era NewTxFile +nftx SigningKeyFile +ctKey Address ByronAddr +genRichAddr [TxOut ByronEra] +outs -> GenesisFile -> NetworkId -> ByronKeyFormat @@ -230,20 +230,20 @@ -> [TxOut ByronEra] -> ExceptT ByronClientCmdError IO () runSpendGenesisUTxO GenesisFile -genFp NetworkId -nw ByronKeyFormat -era NewTxFile -nftx SigningKeyFile -ctKey Address ByronAddr -genRichAddr [TxOut ByronEra] -outs - SpendUTxO NetworkId -nw ByronKeyFormat -era NewTxFile -nftx SigningKeyFile -ctKey [TxIn] -ins [TxOut ByronEra] -outs -> +genFp NetworkId +nw ByronKeyFormat +era NewTxFile +nftx SigningKeyFile +ctKey Address ByronAddr +genRichAddr [TxOut ByronEra] +outs + SpendUTxO NetworkId +nw ByronKeyFormat +era NewTxFile +nftx SigningKeyFile +ctKey [TxIn] +ins [TxOut ByronEra] +outs -> NetworkId -> ByronKeyFormat -> NewTxFile @@ -252,22 +252,22 @@ -> [TxOut ByronEra] -> ExceptT ByronClientCmdError IO () runSpendUTxO NetworkId -nw ByronKeyFormat -era NewTxFile -nftx SigningKeyFile -ctKey [TxIn] -ins [TxOut ByronEra] -outs +nw ByronKeyFormat +era NewTxFile +nftx SigningKeyFile +ctKey [TxIn] +ins [TxOut ByronEra] +outs runNodeCmd :: NodeCmd -> ExceptT ByronClientCmdError IO () runNodeCmd :: NodeCmd -> ExceptT ByronClientCmdError IO () -runNodeCmd (CreateVote NetworkId -nw SigningKeyFile -sKey String -upPropFp Bool -voteBool String -outputFp) = +runNodeCmd (CreateVote NetworkId +nw SigningKeyFile +sKey String +upPropFp Bool +voteBool String +outputFp) = (ByronVoteError -> ByronClientCmdError) -> ExceptT ByronVoteError IO () -> ExceptT ByronClientCmdError IO () @@ -286,15 +286,15 @@ -> String -> ExceptT ByronVoteError IO () runVoteCreation NetworkId -nw SigningKeyFile -sKey String -upPropFp Bool -voteBool String -outputFp +nw SigningKeyFile +sKey String +upPropFp Bool +voteBool String +outputFp -runNodeCmd (SubmitUpdateProposal NetworkId -network String -proposalFp) = +runNodeCmd (SubmitUpdateProposal NetworkId +network String +proposalFp) = (ByronUpdateProposalError -> ByronClientCmdError) -> ExceptT ByronUpdateProposalError IO () -> ExceptT ByronClientCmdError IO () @@ -310,12 +310,12 @@ forall a b. (a -> b) -> a -> b $ NetworkId -> String -> ExceptT ByronUpdateProposalError IO () submitByronUpdateProposal NetworkId -network String -proposalFp +network String +proposalFp -runNodeCmd (SubmitVote NetworkId -network String -voteFp) = +runNodeCmd (SubmitVote NetworkId +network String +voteFp) = (ByronVoteError -> ByronClientCmdError) -> ExceptT ByronVoteError IO () -> ExceptT ByronClientCmdError IO () @@ -329,18 +329,18 @@ forall a b. (a -> b) -> a -> b $ NetworkId -> String -> ExceptT ByronVoteError IO () submitByronVote NetworkId -network String -voteFp +network String +voteFp -runNodeCmd (UpdateProposal NetworkId -nw SigningKeyFile -sKey ProtocolVersion -pVer SoftwareVersion -sVer SystemTag -sysTag InstallerHash -insHash String -outputFp ByronProtocolParametersUpdate -params) = +runNodeCmd (UpdateProposal NetworkId +nw SigningKeyFile +sKey ProtocolVersion +pVer SoftwareVersion +sVer SystemTag +sysTag InstallerHash +insHash String +outputFp ByronProtocolParametersUpdate +params) = (ByronUpdateProposalError -> ByronClientCmdError) -> ExceptT ByronUpdateProposalError IO () -> ExceptT ByronClientCmdError IO () @@ -364,24 +364,24 @@ -> ByronProtocolParametersUpdate -> ExceptT ByronUpdateProposalError IO () runProposalCreation NetworkId -nw SigningKeyFile -sKey ProtocolVersion -pVer SoftwareVersion -sVer SystemTag -sysTag InstallerHash -insHash String -outputFp ByronProtocolParametersUpdate -params +nw SigningKeyFile +sKey ProtocolVersion +pVer SoftwareVersion +sVer SystemTag +sysTag InstallerHash +insHash String +outputFp ByronProtocolParametersUpdate +params runGenesisCommand :: NewDirectory -> GenesisParameters -> ExceptT ByronClientCmdError IO () runGenesisCommand :: NewDirectory -> GenesisParameters -> ExceptT ByronClientCmdError IO () -runGenesisCommand NewDirectory -outDir GenesisParameters -params = do - (GenesisData -genData, GeneratedSecrets -genSecrets) <- (ByronGenesisError -> ByronClientCmdError) +runGenesisCommand NewDirectory +outDir GenesisParameters +params = do + (GenesisData +genData, GeneratedSecrets +genSecrets) <- (ByronGenesisError -> ByronClientCmdError) -> ExceptT ByronGenesisError IO (GenesisData, GeneratedSecrets) -> ExceptT ByronClientCmdError IO (GenesisData, GeneratedSecrets) forall (m :: * -> *) x y a. @@ -396,7 +396,7 @@ $ GenesisParameters -> ExceptT ByronGenesisError IO (GenesisData, GeneratedSecrets) mkGenesis GenesisParameters -params +params (ByronGenesisError -> ByronClientCmdError) -> ExceptT ByronGenesisError IO () -> ExceptT ByronClientCmdError IO () @@ -414,17 +414,17 @@ -> GeneratedSecrets -> ExceptT ByronGenesisError IO () dumpGenesis NewDirectory -outDir GenesisData -genData GeneratedSecrets -genSecrets +outDir GenesisData +genData GeneratedSecrets +genSecrets runValidateCBOR :: CBORObject -> FilePath -> ExceptT ByronClientCmdError IO () runValidateCBOR :: CBORObject -> String -> ExceptT ByronClientCmdError IO () -runValidateCBOR CBORObject -cborObject String -fp = do - LByteString -bs <- (HelpersError -> ByronClientCmdError) +runValidateCBOR CBORObject +cborObject String +fp = do + LByteString +bs <- (HelpersError -> ByronClientCmdError) -> ExceptT HelpersError IO LByteString -> ExceptT ByronClientCmdError IO LByteString forall (m :: * -> *) x y a. @@ -438,9 +438,9 @@ forall a b. (a -> b) -> a -> b $ String -> ExceptT HelpersError IO LByteString readCBOR String -fp - Text -res <- Either ByronClientCmdError Text +fp + Text +res <- Either ByronClientCmdError Text -> ExceptT ByronClientCmdError IO Text forall (m :: * -> *) x a. Monad m => Either x a -> ExceptT x m a hoistEither (Either ByronClientCmdError Text @@ -462,8 +462,8 @@ forall a b. (a -> b) -> a -> b $ CBORObject -> LByteString -> Either HelpersError Text validateCBOR CBORObject -cborObject LByteString -bs +cborObject LByteString +bs IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronClientCmdError IO ()) @@ -471,14 +471,14 @@ forall a b. (a -> b) -> a -> b $ Text -> IO () putTextLn Text -res +res runPrettyPrintCBOR :: FilePath -> ExceptT ByronClientCmdError IO () runPrettyPrintCBOR :: String -> ExceptT ByronClientCmdError IO () -runPrettyPrintCBOR String -fp = do - LByteString -bs <- (HelpersError -> ByronClientCmdError) +runPrettyPrintCBOR String +fp = do + LByteString +bs <- (HelpersError -> ByronClientCmdError) -> ExceptT HelpersError IO LByteString -> ExceptT ByronClientCmdError IO LByteString forall (m :: * -> *) x y a. @@ -492,7 +492,7 @@ forall a b. (a -> b) -> a -> b $ String -> ExceptT HelpersError IO LByteString readCBOR String -fp +fp (HelpersError -> ByronClientCmdError) -> ExceptT HelpersError IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) x y a. @@ -504,16 +504,16 @@ forall a b. (a -> b) -> a -> b $ LByteString -> ExceptT HelpersError IO () pPrintCBOR LByteString -bs +bs runPrettySigningKeyPublic :: ByronKeyFormat -> SigningKeyFile -> ExceptT ByronClientCmdError IO () runPrettySigningKeyPublic :: ByronKeyFormat -> SigningKeyFile -> ExceptT ByronClientCmdError IO () -runPrettySigningKeyPublic ByronKeyFormat -bKeyFormat SigningKeyFile -skF = do - SomeByronSigningKey -sK <- (ByronKeyFailure -> ByronClientCmdError) +runPrettySigningKeyPublic ByronKeyFormat +bKeyFormat SigningKeyFile +skF = do + SomeByronSigningKey +sK <- (ByronKeyFailure -> ByronClientCmdError) -> ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ByronClientCmdError IO SomeByronSigningKey forall (m :: * -> *) x y a. @@ -528,8 +528,8 @@ $ ByronKeyFormat -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey readByronSigningKey ByronKeyFormat -bKeyFormat SigningKeyFile -skF +bKeyFormat SigningKeyFile +skF IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronClientCmdError IO ()) @@ -553,7 +553,7 @@ forall a b. (a -> b) -> a -> b $ SomeByronSigningKey -> VerificationKey ByronKey byronWitnessToVerKey SomeByronSigningKey -sK +sK runMigrateDelegateKeyFrom :: SigningKeyFile @@ -562,12 +562,12 @@ -> ExceptT ByronClientCmdError IO () runMigrateDelegateKeyFrom :: SigningKeyFile -> NewSigningKeyFile -> ExceptT ByronClientCmdError IO () -runMigrateDelegateKeyFrom oldKey :: SigningKeyFile -oldKey@(SigningKeyFile String -fp) (NewSigningKeyFile String -newKey) = do - SomeByronSigningKey -sk <- (ByronKeyFailure -> ByronClientCmdError) +runMigrateDelegateKeyFrom oldKey :: SigningKeyFile +oldKey@(SigningKeyFile String +fp) (NewSigningKeyFile String +newKey) = do + SomeByronSigningKey +sk <- (ByronKeyFailure -> ByronClientCmdError) -> ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ByronClientCmdError IO SomeByronSigningKey forall (m :: * -> *) x y a. @@ -583,11 +583,11 @@ -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey readByronSigningKey ByronKeyFormat LegacyByronKeyFormat SigningKeyFile -oldKey - SomeByronSigningKey -migratedWitness <- case SomeByronSigningKey -sk of - AByronSigningKeyLegacy (ByronSigningKeyLegacy sKey) -> +oldKey + SomeByronSigningKey +migratedWitness <- case SomeByronSigningKey +sk of + AByronSigningKeyLegacy (ByronSigningKeyLegacy sKey) -> SomeByronSigningKey -> ExceptT ByronClientCmdError IO SomeByronSigningKey forall (m :: * -> *) a. Monad m => a -> m a @@ -607,7 +607,7 @@ forall a b. (a -> b) -> a -> b $ SigningKey -> SigningKey ByronKey ByronSigningKey SigningKey -sKey +sKey AByronSigningKey SigningKey ByronKey _ -> ByronClientCmdError @@ -629,7 +629,7 @@ forall a b. (a -> b) -> a -> b $ String -> ByronKeyFailure CannotMigrateFromNonLegacySigningKey String -fp +fp (HelpersError -> ByronClientCmdError) -> ExceptT HelpersError IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) x y a. @@ -645,19 +645,19 @@ cat b c -> cat a b -> cat a c . String -> ByteString -> ExceptT HelpersError IO () ensureNewFileLBS String -newKey (ByteString -> ExceptT ByronClientCmdError IO ()) +newKey (ByteString -> ExceptT ByronClientCmdError IO ()) -> ByteString -> ExceptT ByronClientCmdError IO () forall a b. (a -> b) -> a -> b $ SomeByronSigningKey -> ByteString serialiseByronWitness SomeByronSigningKey -migratedWitness +migratedWitness runPrintGenesisHash :: GenesisFile -> ExceptT ByronClientCmdError IO () runPrintGenesisHash :: GenesisFile -> ExceptT ByronClientCmdError IO () -runPrintGenesisHash GenesisFile -genFp = do - Config -genesis <- (ByronGenesisError -> ByronClientCmdError) +runPrintGenesisHash GenesisFile +genFp = do + Config +genesis <- (ByronGenesisError -> ByronClientCmdError) -> ExceptT ByronGenesisError IO Config -> ExceptT ByronClientCmdError IO Config forall (m :: * -> *) x y a. @@ -672,8 +672,8 @@ $ GenesisFile -> NetworkId -> ExceptT ByronGenesisError IO Config readGenesis GenesisFile -genFp NetworkId -dummyNetwork +genFp NetworkId +dummyNetwork IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronClientCmdError IO ()) @@ -686,19 +686,19 @@ -> Text -> ExceptT ByronClientCmdError IO () forall a b. (a -> b) -> a -> b $ Config -> Text -formatter Config -genesis +formatter Config +genesis where -- For this purpose of getting the hash, it does not matter what network -- value we use here. - dummyNetwork :: NetworkId - dummyNetwork :: NetworkId -dummyNetwork = NetworkId + dummyNetwork :: NetworkId + dummyNetwork :: NetworkId +dummyNetwork = NetworkId Mainnet - formatter :: Genesis.Config -> Text - formatter :: Config -> Text -formatter = Format Text (AbstractHash Blake2b_256 Raw -> Text) + formatter :: Genesis.Config -> Text + formatter :: Config -> Text +formatter = Format Text (AbstractHash Blake2b_256 Raw -> Text) -> AbstractHash Blake2b_256 Raw -> Text forall a. Format Text a -> a F.sformat Format Text (AbstractHash Blake2b_256 Raw -> Text) @@ -728,12 +728,12 @@ -> ExceptT ByronClientCmdError IO () runPrintSigningKeyAddress :: ByronKeyFormat -> NetworkId -> SigningKeyFile -> ExceptT ByronClientCmdError IO () -runPrintSigningKeyAddress ByronKeyFormat -bKeyFormat NetworkId -networkid SigningKeyFile -skF = do - SomeByronSigningKey -sK <- (ByronKeyFailure -> ByronClientCmdError) +runPrintSigningKeyAddress ByronKeyFormat +bKeyFormat NetworkId +networkid SigningKeyFile +skF = do + SomeByronSigningKey +sK <- (ByronKeyFailure -> ByronClientCmdError) -> ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ByronClientCmdError IO SomeByronSigningKey forall (m :: * -> *) x y a. @@ -748,10 +748,10 @@ $ ByronKeyFormat -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey readByronSigningKey ByronKeyFormat -bKeyFormat SigningKeyFile -skF - let sKeyAddr :: Text -sKeyAddr = Address ByronAddr -> Text +bKeyFormat SigningKeyFile +skF + let sKeyAddr :: Text +sKeyAddr = Address ByronAddr -> Text prettyAddress (Address ByronAddr -> Text) -> (VerificationKey ByronKey -> Address ByronAddr) -> VerificationKey ByronKey @@ -761,12 +761,12 @@ cat b c -> cat a b -> cat a c . NetworkId -> VerificationKey ByronKey -> Address ByronAddr makeByronAddress NetworkId -networkid (VerificationKey ByronKey -> Text) +networkid (VerificationKey ByronKey -> Text) -> VerificationKey ByronKey -> Text forall a b. (a -> b) -> a -> b $ SomeByronSigningKey -> VerificationKey ByronKey byronWitnessToVerKey SomeByronSigningKey -sK +sK IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronClientCmdError IO ()) @@ -774,14 +774,14 @@ forall a b. (a -> b) -> a -> b $ Text -> IO () putTextLn Text -sKeyAddr +sKeyAddr runKeygen :: NewSigningKeyFile -> ExceptT ByronClientCmdError IO () runKeygen :: NewSigningKeyFile -> ExceptT ByronClientCmdError IO () -runKeygen (NewSigningKeyFile String -skF) = do - SigningKey ByronKey -sK <- IO (SigningKey ByronKey) +runKeygen (NewSigningKeyFile String +skF) = do + SigningKey ByronKey +sK <- IO (SigningKey ByronKey) -> ExceptT ByronClientCmdError IO (SigningKey ByronKey) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (SigningKey ByronKey) @@ -810,25 +810,25 @@ cat b c -> cat a b -> cat a c . String -> ByteString -> ExceptT HelpersError IO () ensureNewFileLBS String -skF (ByteString -> ExceptT ByronClientCmdError IO ()) +skF (ByteString -> ExceptT ByronClientCmdError IO ()) -> ByteString -> ExceptT ByronClientCmdError IO () forall a b. (a -> b) -> a -> b $ SigningKey ByronKey -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes SigningKey ByronKey -sK +sK runToVerification :: ByronKeyFormat -> SigningKeyFile -> NewVerificationKeyFile -> ExceptT ByronClientCmdError IO () runToVerification :: ByronKeyFormat -> SigningKeyFile -> NewVerificationKeyFile -> ExceptT ByronClientCmdError IO () -runToVerification ByronKeyFormat -bKeyFormat SigningKeyFile -skFp (NewVerificationKeyFile String -vkFp) = do - SomeByronSigningKey -sk <- (ByronKeyFailure -> ByronClientCmdError) +runToVerification ByronKeyFormat +bKeyFormat SigningKeyFile +skFp (NewVerificationKeyFile String +vkFp) = do + SomeByronSigningKey +sk <- (ByronKeyFailure -> ByronClientCmdError) -> ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ByronClientCmdError IO SomeByronSigningKey forall (m :: * -> *) x y a. @@ -843,18 +843,18 @@ $ ByronKeyFormat -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey readByronSigningKey ByronKeyFormat -bKeyFormat SigningKeyFile -skFp - let ByronVerificationKey vK = SomeByronSigningKey -> VerificationKey ByronKey +bKeyFormat SigningKeyFile +skFp + let ByronVerificationKey vK = SomeByronSigningKey -> VerificationKey ByronKey byronWitnessToVerKey SomeByronSigningKey -sk - let vKey :: Text -vKey = Builder -> Text +sk + let vKey :: Text +vKey = Builder -> Text Builder.toLazyText (Builder -> Text) -> Builder -> Text forall a b. (a -> b) -> a -> b $ VerificationKey -> Builder Crypto.formatFullVerificationKey VerificationKey -vK +vK (HelpersError -> ByronClientCmdError) -> ExceptT HelpersError IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) x y a. @@ -870,16 +870,16 @@ (String -> a -> IO ()) -> String -> a -> ExceptT HelpersError IO () ensureNewFile String -> Text -> IO () TL.writeFile String -vkFp Text -vKey +vkFp Text +vKey runSubmitTx :: NetworkId -> TxFile -> ExceptT ByronClientCmdError IO () runSubmitTx :: NetworkId -> TxFile -> ExceptT ByronClientCmdError IO () -runSubmitTx NetworkId -network TxFile -fp = do - ATxAux ByteString -tx <- (ByronTxError -> ByronClientCmdError) +runSubmitTx NetworkId +network TxFile +fp = do + ATxAux ByteString +tx <- (ByronTxError -> ByronClientCmdError) -> ExceptT ByronTxError IO (ATxAux ByteString) -> ExceptT ByronClientCmdError IO (ATxAux ByteString) forall (m :: * -> *) x y a. @@ -893,7 +893,7 @@ forall a b. (a -> b) -> a -> b $ TxFile -> ExceptT ByronTxError IO (ATxAux ByteString) readByronTx TxFile -fp +fp (ByronTxError -> ByronClientCmdError) -> ExceptT ByronTxError IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) x y a. @@ -906,14 +906,14 @@ $ NetworkId -> GenTx ByronBlock -> ExceptT ByronTxError IO () nodeSubmitTx NetworkId -network (ATxAux ByteString -> GenTx ByronBlock +network (ATxAux ByteString -> GenTx ByronBlock normalByronTxToGenTx ATxAux ByteString -tx) +tx) runGetTxId :: TxFile -> ExceptT ByronClientCmdError IO () runGetTxId :: TxFile -> ExceptT ByronClientCmdError IO () -runGetTxId TxFile -fp = (ByronTxError -> ByronClientCmdError) +runGetTxId TxFile +fp = (ByronTxError -> ByronClientCmdError) -> ExceptT ByronTxError IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) x y a. Functor m => @@ -923,21 +923,21 @@ -> ExceptT ByronTxError IO () -> ExceptT ByronClientCmdError IO () forall a b. (a -> b) -> a -> b $ do - ATxAux ByteString -tx <- TxFile -> ExceptT ByronTxError IO (ATxAux ByteString) + ATxAux ByteString +tx <- TxFile -> ExceptT ByronTxError IO (ATxAux ByteString) readByronTx TxFile -fp - let txbody :: TxBody ByronEra -txbody = Tx ByronEra -> TxBody ByronEra +fp + let txbody :: TxBody ByronEra +txbody = Tx ByronEra -> TxBody ByronEra forall era. Tx era -> TxBody era getTxBody (ATxAux ByteString -> Tx ByronEra ByronTx ATxAux ByteString -tx) - txid :: TxId -txid = TxBody ByronEra -> TxId +tx) + txid :: TxId +txid = TxBody ByronEra -> TxId forall era. TxBody era -> TxId getTxId TxBody ByronEra -txbody +txbody IO () -> ExceptT ByronTxError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ByronTxError IO ()) @@ -949,7 +949,7 @@ $ TxId -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytesHex TxId -txid +txid runSpendGenesisUTxO :: GenesisFile @@ -968,16 +968,16 @@ -> Address ByronAddr -> [TxOut ByronEra] -> ExceptT ByronClientCmdError IO () -runSpendGenesisUTxO GenesisFile -genesisFile NetworkId -nw ByronKeyFormat -bKeyFormat (NewTxFile String -ctTx) SigningKeyFile -ctKey Address ByronAddr -genRichAddr [TxOut ByronEra] -outs = do - Config -genesis <- (ByronGenesisError -> ByronClientCmdError) +runSpendGenesisUTxO GenesisFile +genesisFile NetworkId +nw ByronKeyFormat +bKeyFormat (NewTxFile String +ctTx) SigningKeyFile +ctKey Address ByronAddr +genRichAddr [TxOut ByronEra] +outs = do + Config +genesis <- (ByronGenesisError -> ByronClientCmdError) -> ExceptT ByronGenesisError IO Config -> ExceptT ByronClientCmdError IO Config forall (m :: * -> *) x y a. @@ -991,10 +991,10 @@ forall a b. (a -> b) -> a -> b $ GenesisFile -> NetworkId -> ExceptT ByronGenesisError IO Config readGenesis GenesisFile -genesisFile NetworkId -nw - SomeByronSigningKey -sk <- (ByronKeyFailure -> ByronClientCmdError) +genesisFile NetworkId +nw + SomeByronSigningKey +sk <- (ByronKeyFailure -> ByronClientCmdError) -> ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ByronClientCmdError IO SomeByronSigningKey forall (m :: * -> *) x y a. @@ -1009,22 +1009,22 @@ $ ByronKeyFormat -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey readByronSigningKey ByronKeyFormat -bKeyFormat SigningKeyFile -ctKey +bKeyFormat SigningKeyFile +ctKey - let tx :: Tx ByronEra -tx = Config + let tx :: Tx ByronEra +tx = Config -> NetworkId -> SomeByronSigningKey -> Address ByronAddr -> [TxOut ByronEra] -> Tx ByronEra txSpendGenesisUTxOByronPBFT Config -genesis NetworkId -nw SomeByronSigningKey -sk Address ByronAddr -genRichAddr [TxOut ByronEra] -outs +genesis NetworkId +nw SomeByronSigningKey +sk Address ByronAddr +genRichAddr [TxOut ByronEra] +outs (HelpersError -> ByronClientCmdError) -> ExceptT HelpersError IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) x y a. @@ -1040,13 +1040,13 @@ cat b c -> cat a b -> cat a c . String -> ByteString -> ExceptT HelpersError IO () ensureNewFileLBS String -ctTx (ByteString -> ExceptT ByronClientCmdError IO ()) +ctTx (ByteString -> ExceptT ByronClientCmdError IO ()) -> ByteString -> ExceptT ByronClientCmdError IO () forall a b. (a -> b) -> a -> b $ Tx ByronEra -> ByteString forall a. SerialiseAsCBOR a => a -> ByteString serialiseToCBOR Tx ByronEra -tx +tx runSpendUTxO :: NetworkId @@ -1063,15 +1063,15 @@ -> [TxIn] -> [TxOut ByronEra] -> ExceptT ByronClientCmdError IO () -runSpendUTxO NetworkId -nw ByronKeyFormat -bKeyFormat (NewTxFile String -ctTx) SigningKeyFile -ctKey [TxIn] -ins [TxOut ByronEra] -outs = do - SomeByronSigningKey -sk <- (ByronKeyFailure -> ByronClientCmdError) +runSpendUTxO NetworkId +nw ByronKeyFormat +bKeyFormat (NewTxFile String +ctTx) SigningKeyFile +ctKey [TxIn] +ins [TxOut ByronEra] +outs = do + SomeByronSigningKey +sk <- (ByronKeyFailure -> ByronClientCmdError) -> ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ByronClientCmdError IO SomeByronSigningKey forall (m :: * -> *) x y a. @@ -1086,17 +1086,17 @@ $ ByronKeyFormat -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey readByronSigningKey ByronKeyFormat -bKeyFormat SigningKeyFile -ctKey +bKeyFormat SigningKeyFile +ctKey - let gTx :: Tx ByronEra -gTx = NetworkId + let gTx :: Tx ByronEra +gTx = NetworkId -> SomeByronSigningKey -> [TxIn] -> [TxOut ByronEra] -> Tx ByronEra txSpendUTxOByronPBFT NetworkId -nw SomeByronSigningKey -sk [TxIn] -ins [TxOut ByronEra] -outs +nw SomeByronSigningKey +sk [TxIn] +ins [TxOut ByronEra] +outs (HelpersError -> ByronClientCmdError) -> ExceptT HelpersError IO () -> ExceptT ByronClientCmdError IO () forall (m :: * -> *) x y a. @@ -1112,11 +1112,11 @@ cat b c -> cat a b -> cat a c . String -> ByteString -> ExceptT HelpersError IO () ensureNewFileLBS String -ctTx (ByteString -> ExceptT ByronClientCmdError IO ()) +ctTx (ByteString -> ExceptT ByronClientCmdError IO ()) -> ByteString -> ExceptT ByronClientCmdError IO () forall a b. (a -> b) -> a -> b $ Tx ByronEra -> ByteString forall a. SerialiseAsCBOR a => a -> ByteString serialiseToCBOR Tx ByronEra -gTx +gTx \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Byron.Tx.html b/cardano-cli/src/Cardano.CLI.Byron.Tx.html index 2272825176f..0470bb2dfda 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.Tx.html +++ b/cardano-cli/src/Cardano.CLI.Byron.Tx.html @@ -55,7 +55,7 @@ | ByronTxSubmitError !Text | ByronTxSubmitErrorEraMismatch !EraMismatch | EnvSocketError !EnvSocketError - deriving Int -> ByronTxError -> ShowS + deriving Int -> ByronTxError -> ShowS [ByronTxError] -> ShowS ByronTxError -> String (Int -> ByronTxError -> ShowS) @@ -74,20 +74,20 @@ renderByronTxError :: ByronTxError -> Text renderByronTxError :: ByronTxError -> Text -renderByronTxError ByronTxError -err = +renderByronTxError ByronTxError +err = case ByronTxError -err of - ByronTxSubmitError Text -res -> Text +err of + ByronTxSubmitError Text +res -> Text "Error while submitting tx: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -res - ByronTxSubmitErrorEraMismatch EraMismatch{Text +res + ByronTxSubmitErrorEraMismatch EraMismatch{Text ledgerEraName :: EraMismatch -> Text ledgerEraName :: Text -ledgerEraName, Text +ledgerEraName, Text otherEraName :: EraMismatch -> Text otherEraName :: Text otherEraName} -> @@ -99,27 +99,27 @@ "The node is running in the " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -ledgerEraName Text -> Text -> Text +ledgerEraName Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " era, but the transaction is for the " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -otherEraName Text -> Text -> Text +otherEraName Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " era." - TxDeserialisationFailed String -txFp DecoderError -decErr -> + TxDeserialisationFailed String +txFp DecoderError +decErr -> Text "Transaction deserialisation failed at " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -txFp Text -> Text -> Text +txFp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -127,16 +127,16 @@ <> DecoderError -> Text forall a. Show a => a -> Text textShow DecoderError -decErr - EnvSocketError EnvSocketError -envSockErr -> EnvSocketError -> Text +decErr + EnvSocketError EnvSocketError +envSockErr -> EnvSocketError -> Text renderEnvSocketError EnvSocketError -envSockErr +envSockErr newtype TxFile = TxFile FilePath - deriving (TxFile -> TxFile -> Bool + deriving (TxFile -> TxFile -> Bool (TxFile -> TxFile -> Bool) -> (TxFile -> TxFile -> Bool) -> Eq TxFile forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -144,7 +144,7 @@ $c/= :: TxFile -> TxFile -> Bool == :: TxFile -> TxFile -> Bool $c== :: TxFile -> TxFile -> Bool -Eq, Eq TxFile +Eq, Eq TxFile Eq TxFile -> (TxFile -> TxFile -> Ordering) -> (TxFile -> TxFile -> Bool) @@ -182,7 +182,7 @@ compare :: TxFile -> TxFile -> Ordering $ccompare :: TxFile -> TxFile -> Ordering $cp1Ord :: Eq TxFile -Ord, Int -> TxFile -> ShowS +Ord, Int -> TxFile -> ShowS [TxFile] -> ShowS TxFile -> String (Int -> TxFile -> ShowS) @@ -195,7 +195,7 @@ $cshow :: TxFile -> String showsPrec :: Int -> TxFile -> ShowS $cshowsPrec :: Int -> TxFile -> ShowS -Show, String -> TxFile +Show, String -> TxFile (String -> TxFile) -> IsString TxFile forall a. (String -> a) -> IsString a fromString :: String -> TxFile @@ -204,7 +204,7 @@ newtype NewTxFile = NewTxFile FilePath - deriving (NewTxFile -> NewTxFile -> Bool + deriving (NewTxFile -> NewTxFile -> Bool (NewTxFile -> NewTxFile -> Bool) -> (NewTxFile -> NewTxFile -> Bool) -> Eq NewTxFile forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -212,7 +212,7 @@ $c/= :: NewTxFile -> NewTxFile -> Bool == :: NewTxFile -> NewTxFile -> Bool $c== :: NewTxFile -> NewTxFile -> Bool -Eq, Eq NewTxFile +Eq, Eq NewTxFile Eq NewTxFile -> (NewTxFile -> NewTxFile -> Ordering) -> (NewTxFile -> NewTxFile -> Bool) @@ -250,7 +250,7 @@ compare :: NewTxFile -> NewTxFile -> Ordering $ccompare :: NewTxFile -> NewTxFile -> Ordering $cp1Ord :: Eq NewTxFile -Ord, Int -> NewTxFile -> ShowS +Ord, Int -> NewTxFile -> ShowS [NewTxFile] -> ShowS NewTxFile -> String (Int -> NewTxFile -> ShowS) @@ -265,7 +265,7 @@ $cshow :: NewTxFile -> String showsPrec :: Int -> NewTxFile -> ShowS $cshowsPrec :: Int -> NewTxFile -> ShowS -Show, String -> NewTxFile +Show, String -> NewTxFile (String -> NewTxFile) -> IsString NewTxFile forall a. (String -> a) -> IsString a fromString :: String -> NewTxFile @@ -277,8 +277,8 @@ -- its full structure. prettyAddress :: Address ByronAddr -> Text prettyAddress :: Address ByronAddr -> Text -prettyAddress (ByronAddress Address -addr) = Format Text (Address -> Address -> Text) +prettyAddress (ByronAddress Address +addr) = Format Text (Address -> Address -> Text) -> Address -> Address -> Text forall a. Format Text a -> a sformat @@ -296,62 +296,62 @@ forall r. Format r (Address -> r) Common.addressDetailedF) Address -addr Address -addr +addr Address +addr readByronTx :: TxFile -> ExceptT ByronTxError IO (UTxO.ATxAux ByteString) readByronTx :: TxFile -> ExceptT ByronTxError IO (ATxAux ByteString) -readByronTx (TxFile String -fp) = do - ByteString -txBS <- IO ByteString -> ExceptT ByronTxError IO ByteString +readByronTx (TxFile String +fp) = do + ByteString +txBS <- IO ByteString -> ExceptT ByronTxError IO ByteString forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO ByteString -> ExceptT ByronTxError IO ByteString) -> IO ByteString -> ExceptT ByronTxError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString LB.readFile String -fp +fp case ByteString -> Either DecoderError (ATxAux ByteString) fromCborTxAux ByteString -txBS of - Left DecoderError -e -> ByronTxError -> ExceptT ByronTxError IO (ATxAux ByteString) +txBS of + Left DecoderError +e -> ByronTxError -> ExceptT ByronTxError IO (ATxAux ByteString) forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (ByronTxError -> ExceptT ByronTxError IO (ATxAux ByteString)) -> ByronTxError -> ExceptT ByronTxError IO (ATxAux ByteString) forall a b. (a -> b) -> a -> b $ String -> DecoderError -> ByronTxError TxDeserialisationFailed String -fp DecoderError -e - Right ATxAux ByteString -tx -> ATxAux ByteString -> ExceptT ByronTxError IO (ATxAux ByteString) +fp DecoderError +e + Right ATxAux ByteString +tx -> ATxAux ByteString -> ExceptT ByronTxError IO (ATxAux ByteString) forall (f :: * -> *) a. Applicative f => a -> f a pure ATxAux ByteString -tx +tx -- | The 'GenTx' is all the kinds of transactions that can be submitted -- and \"normal\" Byron transactions are just one of the kinds. normalByronTxToGenTx :: UTxO.ATxAux ByteString -> GenTx ByronBlock normalByronTxToGenTx :: ATxAux ByteString -> GenTx ByronBlock -normalByronTxToGenTx ATxAux ByteString -tx' = TxId -> ATxAux ByteString -> GenTx ByronBlock +normalByronTxToGenTx ATxAux ByteString +tx' = TxId -> ATxAux ByteString -> GenTx ByronBlock Byron.ByronTx (ATxAux ByteString -> TxId Byron.byronIdTx ATxAux ByteString -tx') ATxAux ByteString -tx' +tx') ATxAux ByteString +tx' -- | Given a genesis, and a pair of a genesis public key and address, -- reconstruct a TxIn corresponding to the genesis UTxO entry. genesisUTxOTxIn :: Genesis.Config -> Crypto.VerificationKey -> Common.Address -> UTxO.TxIn genesisUTxOTxIn :: Config -> VerificationKey -> Address -> TxIn -genesisUTxOTxIn Config -gc VerificationKey -vk Address -genAddr = +genesisUTxOTxIn Config +gc VerificationKey +vk Address +genAddr = Maybe TxIn -> TxIn -handleMissingAddr (Maybe TxIn -> TxIn) -> Maybe TxIn -> TxIn +handleMissingAddr (Maybe TxIn -> TxIn) -> Maybe TxIn -> TxIn forall a b. (a -> b) -> a -> b $ (TxIn, TxOut) -> TxIn forall a b. (a, b) -> a @@ -360,12 +360,12 @@ <$> Address -> Map Address (TxIn, TxOut) -> Maybe (TxIn, TxOut) forall k a. Ord k => k -> Map k a -> Maybe a Map.lookup Address -genAddr Map Address (TxIn, TxOut) -initialUtxo +genAddr Map Address (TxIn, TxOut) +initialUtxo where - initialUtxo :: Map Common.Address (UTxO.TxIn, UTxO.TxOut) - initialUtxo :: Map Address (TxIn, TxOut) -initialUtxo = + initialUtxo :: Map Common.Address (UTxO.TxIn, UTxO.TxOut) + initialUtxo :: Map Address (TxIn, TxOut) +initialUtxo = [(Address, (TxIn, TxOut))] -> Map Address (TxIn, TxOut) forall k a. Ord k => [(k, a)] -> Map k a Map.fromList @@ -379,18 +379,18 @@ . ((TxIn, TxOut) -> Maybe (Address, (TxIn, TxOut))) -> [(TxIn, TxOut)] -> [(Address, (TxIn, TxOut))] forall a b. (a -> Maybe b) -> [a] -> [b] -mapMaybe (\(TxIn -inp, TxOut -out) -> TxIn -> Address -> TxOut -> (Address, (TxIn, TxOut)) -mkEntry TxIn -inp Address -genAddr (TxOut -> (Address, (TxIn, TxOut))) +mapMaybe (\(TxIn +inp, TxOut +out) -> TxIn -> Address -> TxOut -> (Address, (TxIn, TxOut)) +mkEntry TxIn +inp Address +genAddr (TxOut -> (Address, (TxIn, TxOut))) -> Maybe TxOut -> Maybe (Address, (TxIn, TxOut)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> VerificationKey -> TxOut -> Maybe TxOut -keyMatchesUTxO VerificationKey -vk TxOut -out) +keyMatchesUTxO VerificationKey +vk TxOut +out) ([(TxIn, TxOut)] -> [(Address, (TxIn, TxOut))]) -> (Config -> [(TxIn, TxOut)]) -> Config @@ -399,7 +399,7 @@ Category cat => cat b c -> cat a b -> cat a c . [(CompactTxIn, CompactTxOut)] -> [(TxIn, TxOut)] -fromCompactTxInTxOutList +fromCompactTxInTxOutList ([(CompactTxIn, CompactTxOut)] -> [(TxIn, TxOut)]) -> (Config -> [(CompactTxIn, CompactTxOut)]) -> Config @@ -430,25 +430,25 @@ -> Config -> Map Address (TxIn, TxOut) forall a b. (a -> b) -> a -> b $ Config -gc +gc where - mkEntry :: UTxO.TxIn + mkEntry :: UTxO.TxIn -> Common.Address -> UTxO.TxOut -> (Common.Address, (UTxO.TxIn, UTxO.TxOut)) - mkEntry :: TxIn -> Address -> TxOut -> (Address, (TxIn, TxOut)) -mkEntry TxIn -inp Address -addr TxOut -out = (Address -addr, (TxIn -inp, TxOut -out)) + mkEntry :: TxIn -> Address -> TxOut -> (Address, (TxIn, TxOut)) +mkEntry TxIn +inp Address +addr TxOut +out = (Address +addr, (TxIn +inp, TxOut +out)) - fromCompactTxInTxOutList :: [(UTxO.CompactTxIn, UTxO.CompactTxOut)] + fromCompactTxInTxOutList :: [(UTxO.CompactTxIn, UTxO.CompactTxOut)] -> [(UTxO.TxIn, UTxO.TxOut)] - fromCompactTxInTxOutList :: [(CompactTxIn, CompactTxOut)] -> [(TxIn, TxOut)] -fromCompactTxInTxOutList = + fromCompactTxInTxOutList :: [(CompactTxIn, CompactTxOut)] -> [(TxIn, TxOut)] +fromCompactTxInTxOutList = ((CompactTxIn, CompactTxOut) -> (TxIn, TxOut)) -> [(CompactTxIn, CompactTxOut)] -> [(TxIn, TxOut)] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -463,26 +463,26 @@ UTxO.fromCompactTxIn CompactTxOut -> TxOut UTxO.fromCompactTxOut) - keyMatchesUTxO :: Crypto.VerificationKey -> UTxO.TxOut -> Maybe UTxO.TxOut - keyMatchesUTxO :: VerificationKey -> TxOut -> Maybe TxOut -keyMatchesUTxO VerificationKey -key TxOut -out = + keyMatchesUTxO :: Crypto.VerificationKey -> UTxO.TxOut -> Maybe UTxO.TxOut + keyMatchesUTxO :: VerificationKey -> TxOut -> Maybe TxOut +keyMatchesUTxO VerificationKey +key TxOut +out = if VerificationKey -> Address -> Bool Common.checkVerKeyAddress VerificationKey -key (TxOut -> Address +key (TxOut -> Address UTxO.txOutAddress TxOut -out) +out) then TxOut -> Maybe TxOut forall a. a -> Maybe a Just TxOut -out else Maybe TxOut +out else Maybe TxOut forall a. Maybe a Nothing - handleMissingAddr :: Maybe UTxO.TxIn -> UTxO.TxIn - handleMissingAddr :: Maybe TxIn -> TxIn -handleMissingAddr = TxIn -> Maybe TxIn -> TxIn + handleMissingAddr :: Maybe UTxO.TxIn -> UTxO.TxIn + handleMissingAddr :: Maybe TxIn -> TxIn +handleMissingAddr = TxIn -> Maybe TxIn -> TxIn forall a. a -> Maybe a -> a fromMaybe (TxIn -> Maybe TxIn -> TxIn) -> (String -> TxIn) -> String -> Maybe TxIn -> TxIn @@ -502,7 +502,7 @@ T.unpack (Address ByronAddr -> Text prettyAddress (Address -> Address ByronAddr ByronAddress Address -genAddr)) +genAddr)) String -> ShowS forall a. Semigroup a => a -> a -> a <> String @@ -526,7 +526,7 @@ ByronAddress (Map Address (TxIn, TxOut) -> [Address] forall k a. Map k a -> [k] Map.keys Map Address (TxIn, TxOut) -initialUtxo)) +initialUtxo)) -- | Generate a transaction spending genesis UTxO at a given address, -- to given outputs, signed by the given key. @@ -543,14 +543,14 @@ -> Address ByronAddr -> [TxOut ByronEra] -> Tx ByronEra -txSpendGenesisUTxOByronPBFT Config -gc NetworkId -nId SomeByronSigningKey -sk (ByronAddress Address -bAddr) [TxOut ByronEra] -outs = do - let txBodyCont :: TxBodyContent BuildTx ByronEra -txBodyCont = +txSpendGenesisUTxOByronPBFT Config +gc NetworkId +nId SomeByronSigningKey +sk (ByronAddress Address +bAddr) [TxOut ByronEra] +outs = do + let txBodyCont :: TxBodyContent BuildTx ByronEra +txBodyCont = TxIns BuildTx ByronEra -> TxInsCollateral ByronEra -> [TxOut ByronEra] @@ -585,7 +585,7 @@ TxBodyContent [ (TxIn -> TxIn fromByronTxIn TxIn -txIn +txIn , Witness WitCtxTxIn ByronEra -> BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra) forall a. a -> BuildTxWith BuildTx a @@ -598,7 +598,7 @@ forall era. TxInsCollateral era TxInsCollateralNone [TxOut ByronEra] -outs +outs (TxFeesImplicitInEra ByronEra -> TxFee ByronEra forall era. TxFeesImplicitInEra era -> TxFee era TxFeeImplicit TxFeesImplicitInEra ByronEra @@ -649,9 +649,9 @@ IsCardanoEra era => TxBodyContent BuildTx era -> Either (TxBodyError era) (TxBody era) makeTransactionBody TxBodyContent BuildTx ByronEra -txBodyCont of - Left TxBodyError ByronEra -err -> String -> Tx ByronEra +txBodyCont of + Left TxBodyError ByronEra +err -> String -> Tx ByronEra forall a. HasCallStack => String -> a error (String -> Tx ByronEra) -> String -> Tx ByronEra forall a b. (a -> b) -> a -> b @@ -661,32 +661,32 @@ <> TxBodyError ByronEra -> String forall a b. (Show a, ConvertText String b) => a -> b show TxBodyError ByronEra -err - Right TxBody ByronEra -txBody -> let bWit :: KeyWitness ByronEra -bWit = SomeByronSigningKey +err + Right TxBody ByronEra +txBody -> let bWit :: KeyWitness ByronEra +bWit = SomeByronSigningKey -> NetworkId -> TxBody ByronEra -> KeyWitness ByronEra fromByronWitness SomeByronSigningKey -sk NetworkId -nId TxBody ByronEra -txBody +sk NetworkId +nId TxBody ByronEra +txBody in [KeyWitness ByronEra] -> TxBody ByronEra -> Tx ByronEra forall era. [KeyWitness era] -> TxBody era -> Tx era makeSignedTransaction [KeyWitness ByronEra -bWit] TxBody ByronEra -txBody +bWit] TxBody ByronEra +txBody where - ByronVerificationKey vKey = SomeByronSigningKey -> VerificationKey ByronKey + ByronVerificationKey vKey = SomeByronSigningKey -> VerificationKey ByronKey byronWitnessToVerKey SomeByronSigningKey -sk +sk - txIn :: UTxO.TxIn - txIn :: TxIn -txIn = Config -> VerificationKey -> Address -> TxIn + txIn :: UTxO.TxIn + txIn :: TxIn +txIn = Config -> VerificationKey -> Address -> TxIn genesisUTxOTxIn Config -gc VerificationKey -vKey Address -bAddr +gc VerificationKey +vKey Address +bAddr -- | Generate a transaction from given Tx inputs to outputs, -- signed by the given key. @@ -698,13 +698,13 @@ -> Tx ByronEra txSpendUTxOByronPBFT :: NetworkId -> SomeByronSigningKey -> [TxIn] -> [TxOut ByronEra] -> Tx ByronEra -txSpendUTxOByronPBFT NetworkId -nId SomeByronSigningKey -sk [TxIn] -txIns [TxOut ByronEra] -outs = do - let txBodyCont :: TxBodyContent BuildTx ByronEra -txBodyCont = TxIns BuildTx ByronEra +txSpendUTxOByronPBFT NetworkId +nId SomeByronSigningKey +sk [TxIn] +txIns [TxOut ByronEra] +outs = do + let txBodyCont :: TxBodyContent BuildTx ByronEra +txBodyCont = TxIns BuildTx ByronEra -> TxInsCollateral ByronEra -> [TxOut ByronEra] -> TxFee ByronEra @@ -737,7 +737,7 @@ -> TxBodyContent build era TxBodyContent [ ( TxIn -txIn +txIn , Witness WitCtxTxIn ByronEra -> BuildTxWith BuildTx (Witness WitCtxTxIn ByronEra) forall a. a -> BuildTxWith BuildTx a @@ -745,15 +745,15 @@ forall witctx era. KeyWitnessInCtx witctx -> Witness witctx era KeyWitness KeyWitnessInCtx WitCtxTxIn KeyWitnessForSpending) - ) | TxIn -txIn <- [TxIn] -txIns + ) | TxIn +txIn <- [TxIn] +txIns ] TxInsCollateral ByronEra forall era. TxInsCollateral era TxInsCollateralNone [TxOut ByronEra] -outs +outs (TxFeesImplicitInEra ByronEra -> TxFee ByronEra forall era. TxFeesImplicitInEra era -> TxFee era TxFeeImplicit TxFeesImplicitInEra ByronEra @@ -804,9 +804,9 @@ IsCardanoEra era => TxBodyContent BuildTx era -> Either (TxBodyError era) (TxBody era) makeTransactionBody TxBodyContent BuildTx ByronEra -txBodyCont of - Left TxBodyError ByronEra -err -> String -> Tx ByronEra +txBodyCont of + Left TxBodyError ByronEra +err -> String -> Tx ByronEra forall a. HasCallStack => String -> a error (String -> Tx ByronEra) -> String -> Tx ByronEra forall a b. (a -> b) -> a -> b @@ -816,32 +816,32 @@ <> TxBodyError ByronEra -> String forall a b. (Show a, ConvertText String b) => a -> b show TxBodyError ByronEra -err - Right TxBody ByronEra -txBody -> let bWit :: KeyWitness ByronEra -bWit = SomeByronSigningKey +err + Right TxBody ByronEra +txBody -> let bWit :: KeyWitness ByronEra +bWit = SomeByronSigningKey -> NetworkId -> TxBody ByronEra -> KeyWitness ByronEra fromByronWitness SomeByronSigningKey -sk NetworkId -nId TxBody ByronEra -txBody +sk NetworkId +nId TxBody ByronEra +txBody in [KeyWitness ByronEra] -> TxBody ByronEra -> Tx ByronEra forall era. [KeyWitness era] -> TxBody era -> Tx era makeSignedTransaction [KeyWitness ByronEra -bWit] TxBody ByronEra -txBody +bWit] TxBody ByronEra +txBody fromByronWitness :: SomeByronSigningKey -> NetworkId -> TxBody ByronEra -> KeyWitness ByronEra fromByronWitness :: SomeByronSigningKey -> NetworkId -> TxBody ByronEra -> KeyWitness ByronEra -fromByronWitness SomeByronSigningKey -bw NetworkId -nId TxBody ByronEra -txBody = +fromByronWitness SomeByronSigningKey +bw NetworkId +nId TxBody ByronEra +txBody = case SomeByronSigningKey -bw of - AByronSigningKeyLegacy SigningKey ByronKeyLegacy -sk -> NetworkId +bw of + AByronSigningKeyLegacy SigningKey ByronKeyLegacy +sk -> NetworkId -> TxBody ByronEra -> SigningKey ByronKeyLegacy -> KeyWitness ByronEra @@ -850,20 +850,20 @@ NetworkId -> TxBody ByronEra -> SigningKey key -> KeyWitness ByronEra makeByronKeyWitness NetworkId -nId TxBody ByronEra -txBody SigningKey ByronKeyLegacy -sk - AByronSigningKey SigningKey ByronKey -sk' -> NetworkId +nId TxBody ByronEra +txBody SigningKey ByronKeyLegacy +sk + AByronSigningKey SigningKey ByronKey +sk' -> NetworkId -> TxBody ByronEra -> SigningKey ByronKey -> KeyWitness ByronEra forall key. IsByronKey key => NetworkId -> TxBody ByronEra -> SigningKey key -> KeyWitness ByronEra makeByronKeyWitness NetworkId -nId TxBody ByronEra -txBody SigningKey ByronKey -sk' +nId TxBody ByronEra +txBody SigningKey ByronKey +sk' -- | Submit a transaction to a node specified by topology info. nodeSubmitTx @@ -871,11 +871,11 @@ -> GenTx ByronBlock -> ExceptT ByronTxError IO () nodeSubmitTx :: NetworkId -> GenTx ByronBlock -> ExceptT ByronTxError IO () -nodeSubmitTx NetworkId -network GenTx ByronBlock -gentx = do - SocketPath String -socketPath <- (EnvSocketError -> ByronTxError) +nodeSubmitTx NetworkId +network GenTx ByronBlock +gentx = do + SocketPath String +socketPath <- (EnvSocketError -> ByronTxError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ByronTxError IO SocketPath forall (m :: * -> *) x y a. @@ -884,26 +884,26 @@ firstExceptT EnvSocketError -> ByronTxError EnvSocketError ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let connctInfo :: LocalNodeConnectInfo CardanoMode -connctInfo = + let connctInfo :: LocalNodeConnectInfo CardanoMode +connctInfo = LocalNodeConnectInfo :: forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo { localNodeSocketPath :: String localNodeSocketPath = String -socketPath, +socketPath, localNodeNetworkId :: NetworkId localNodeNetworkId = NetworkId -network, +network, localConsensusModeParams :: ConsensusModeParams CardanoMode localConsensusModeParams = EpochSlots -> ConsensusModeParams CardanoMode CardanoModeParams (Word64 -> EpochSlots EpochSlots Word64 21600) } - SubmitResult (TxValidationErrorInMode CardanoMode) -res <- IO (SubmitResult (TxValidationErrorInMode CardanoMode)) + SubmitResult (TxValidationErrorInMode CardanoMode) +res <- IO (SubmitResult (TxValidationErrorInMode CardanoMode)) -> ExceptT ByronTxError IO @@ -928,15 +928,15 @@ -> TxInMode mode -> IO (SubmitResult (TxValidationErrorInMode mode)) submitTxToNodeLocal LocalNodeConnectInfo CardanoMode -connctInfo (GenTx ByronBlock +connctInfo (GenTx ByronBlock -> EraInMode ByronEra CardanoMode -> TxInMode CardanoMode forall mode. GenTx ByronBlock -> EraInMode ByronEra mode -> TxInMode mode TxInByronSpecial GenTx ByronBlock -gentx EraInMode ByronEra CardanoMode +gentx EraInMode ByronEra CardanoMode ByronEraInCardanoMode) case SubmitResult (TxValidationErrorInMode CardanoMode) -res of +res of SubmitResult (TxValidationErrorInMode CardanoMode) Net.Tx.SubmitSuccess -> IO () -> ExceptT ByronTxError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -946,13 +946,13 @@ $ Text -> IO () putTextLn Text "Transaction successfully submitted." - Net.Tx.SubmitFail TxValidationErrorInMode CardanoMode -reason -> + Net.Tx.SubmitFail TxValidationErrorInMode CardanoMode +reason -> case TxValidationErrorInMode CardanoMode -reason of - TxValidationErrorInMode TxValidationError era -err EraInMode era CardanoMode -_eraInMode -> ByronTxError -> ExceptT ByronTxError IO () +reason of + TxValidationErrorInMode TxValidationError era +err EraInMode era CardanoMode +_eraInMode -> ByronTxError -> ExceptT ByronTxError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (ByronTxError -> ExceptT ByronTxError IO ()) -> (String -> ByronTxError) -> String -> ExceptT ByronTxError IO () @@ -972,16 +972,16 @@ $ TxValidationError era -> String forall a b. (Show a, ConvertText String b) => a -> b show TxValidationError era -err - TxValidationEraMismatch EraMismatch -mismatchErr -> ByronTxError -> ExceptT ByronTxError IO () +err + TxValidationEraMismatch EraMismatch +mismatchErr -> ByronTxError -> ExceptT ByronTxError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (ByronTxError -> ExceptT ByronTxError IO ()) -> ByronTxError -> ExceptT ByronTxError IO () forall a b. (a -> b) -> a -> b $ EraMismatch -> ByronTxError ByronTxSubmitErrorEraMismatch EraMismatch -mismatchErr +mismatchErr () -> ExceptT ByronTxError IO () forall (m :: * -> *) a. Monad m => a -> m a @@ -991,8 +991,8 @@ --TODO: remove these local definitions when the updated ledger lib is available fromCborTxAux :: LB.ByteString -> Either Binary.DecoderError (UTxO.ATxAux B.ByteString) fromCborTxAux :: ByteString -> Either DecoderError (ATxAux ByteString) -fromCborTxAux ByteString -lbs = +fromCborTxAux ByteString +lbs = (ATxAux ByteSpan -> ATxAux ByteString) -> Either DecoderError (ATxAux ByteSpan) -> Either DecoderError (ATxAux ByteString) @@ -1001,8 +1001,8 @@ forall (f :: * -> *). Functor f => ByteString -> f ByteSpan -> f ByteString -annotationBytes ByteString -lbs) +annotationBytes ByteString +lbs) (Either DecoderError (ATxAux ByteSpan) -> Either DecoderError (ATxAux ByteString)) -> Either DecoderError (ATxAux ByteSpan) @@ -1020,12 +1020,12 @@ forall s. Decoder s (ATxAux ByteSpan) forall a s. FromCBOR a => Decoder s a Binary.fromCBOR ByteString -lbs +lbs where - annotationBytes :: Functor f => LB.ByteString -> f Binary.ByteSpan -> f B.ByteString - annotationBytes :: ByteString -> f ByteSpan -> f ByteString -annotationBytes ByteString -bytes = (ByteSpan -> ByteString) -> f ByteSpan -> f ByteString + annotationBytes :: Functor f => LB.ByteString -> f Binary.ByteSpan -> f B.ByteString + annotationBytes :: ByteString -> f ByteSpan -> f ByteString +annotationBytes ByteString +bytes = (ByteSpan -> ByteString) -> f ByteSpan -> f ByteString forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap (ByteString -> ByteString LB.toStrict (ByteString -> ByteString) @@ -1035,7 +1035,7 @@ cat b c -> cat a b -> cat a c . ByteString -> ByteSpan -> ByteString Binary.slice ByteString -bytes) +bytes) toCborTxAux :: UTxO.ATxAux ByteString -> LB.ByteString toCborTxAux :: ATxAux ByteString -> ByteString diff --git a/cardano-cli/src/Cardano.CLI.Byron.UpdateProposal.html b/cardano-cli/src/Cardano.CLI.Byron.UpdateProposal.html index 08f3ac32bea..dec35fe7ae6 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.UpdateProposal.html +++ b/cardano-cli/src/Cardano.CLI.Byron.UpdateProposal.html @@ -38,7 +38,7 @@ | ByronUpdateProposalTxError !ByronTxError | ReadSigningKeyFailure !FilePath !ByronKeyFailure | UpdateProposalDecodingError !FilePath - deriving Int -> ByronUpdateProposalError -> ShowS + deriving Int -> ByronUpdateProposalError -> ShowS [ByronUpdateProposalError] -> ShowS ByronUpdateProposalError -> String (Int -> ByronUpdateProposalError -> ShowS) @@ -57,20 +57,20 @@ renderByronUpdateProposalError :: ByronUpdateProposalError -> Text renderByronUpdateProposalError :: ByronUpdateProposalError -> Text -renderByronUpdateProposalError ByronUpdateProposalError -err = +renderByronUpdateProposalError ByronUpdateProposalError +err = case ByronUpdateProposalError -err of - ByronReadUpdateProposalFileFailure String -fp Text -rErr -> +err of + ByronReadUpdateProposalFileFailure String +fp Text +rErr -> Text "Error reading update proposal at " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -78,25 +78,25 @@ <> Text -> Text forall a. Show a => a -> Text textShow Text -rErr - ByronUpdateProposalWriteError HelpersError -hErr -> +rErr + ByronUpdateProposalWriteError HelpersError +hErr -> Text "Error writing update proposal: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> HelpersError -> Text renderHelpersError HelpersError -hErr - ByronUpdateProposalGenesisReadError String -fp ByronGenesisError -rErr -> +hErr + ByronUpdateProposalGenesisReadError String +fp ByronGenesisError +rErr -> Text "Error reading update proposal at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -104,26 +104,26 @@ <> ByronGenesisError -> Text forall a. Show a => a -> Text textShow ByronGenesisError -rErr - ByronUpdateProposalTxError ByronTxError -txErr -> +rErr + ByronUpdateProposalTxError ByronTxError +txErr -> Text "Error submitting update proposal: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> ByronTxError -> Text forall a. Show a => a -> Text textShow ByronTxError -txErr - ReadSigningKeyFailure String -fp ByronKeyFailure -rErr -> +txErr + ReadSigningKeyFailure String +fp ByronKeyFailure +rErr -> Text "Error reading signing key at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -131,16 +131,16 @@ <> ByronKeyFailure -> Text forall a. Show a => a -> Text textShow ByronKeyFailure -rErr - UpdateProposalDecodingError String -fp -> +rErr + UpdateProposalDecodingError String +fp -> Text "Error decoding update proposal at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -fp +fp runProposalCreation :: NetworkId @@ -161,19 +161,19 @@ -> String -> ByronProtocolParametersUpdate -> ExceptT ByronUpdateProposalError IO () -runProposalCreation NetworkId -nw sKey :: SigningKeyFile -sKey@(SigningKeyFile String -sKeyfp) ProtocolVersion -pVer SoftwareVersion -sVer - SystemTag -sysTag InstallerHash -insHash String -outputFp ByronProtocolParametersUpdate -params = do - SomeByronSigningKey -sK <- (ByronKeyFailure -> ByronUpdateProposalError) +runProposalCreation NetworkId +nw sKey :: SigningKeyFile +sKey@(SigningKeyFile String +sKeyfp) ProtocolVersion +pVer SoftwareVersion +sVer + SystemTag +sysTag InstallerHash +insHash String +outputFp ByronProtocolParametersUpdate +params = do + SomeByronSigningKey +sK <- (ByronKeyFailure -> ByronUpdateProposalError) -> ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ByronUpdateProposalError IO SomeByronSigningKey forall (m :: * -> *) x y a. @@ -181,7 +181,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> ByronKeyFailure -> ByronUpdateProposalError ReadSigningKeyFailure String -sKeyfp) (ExceptT ByronKeyFailure IO SomeByronSigningKey +sKeyfp) (ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ByronUpdateProposalError IO SomeByronSigningKey) -> ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ByronUpdateProposalError IO SomeByronSigningKey @@ -190,9 +190,9 @@ -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey readByronSigningKey ByronKeyFormat NonLegacyByronKeyFormat SigningKeyFile -sKey - let proposal :: ByronUpdateProposal -proposal = NetworkId +sKey + let proposal :: ByronUpdateProposal +proposal = NetworkId -> ProtocolVersion -> SoftwareVersion -> SystemTag @@ -201,13 +201,13 @@ -> ByronProtocolParametersUpdate -> ByronUpdateProposal makeByronUpdateProposal NetworkId -nw ProtocolVersion -pVer SoftwareVersion -sVer SystemTag -sysTag InstallerHash -insHash SomeByronSigningKey -sK ByronProtocolParametersUpdate -params +nw ProtocolVersion +pVer SoftwareVersion +sVer SystemTag +sysTag InstallerHash +insHash SomeByronSigningKey +sK ByronProtocolParametersUpdate +params (HelpersError -> ByronUpdateProposalError) -> ExceptT HelpersError IO () -> ExceptT ByronUpdateProposalError IO () @@ -223,27 +223,27 @@ $ String -> ByteString -> ExceptT HelpersError IO () ensureNewFileLBS String -outputFp (ByteString -> ExceptT HelpersError IO ()) +outputFp (ByteString -> ExceptT HelpersError IO ()) -> ByteString -> ExceptT HelpersError IO () forall a b. (a -> b) -> a -> b $ ByronUpdateProposal -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes ByronUpdateProposal -proposal +proposal readByronUpdateProposal :: FilePath -> ExceptT ByronUpdateProposalError IO ByronUpdateProposal readByronUpdateProposal :: String -> ExceptT ByronUpdateProposalError IO ByronUpdateProposal -readByronUpdateProposal String -fp = do - ByteString -proposalBs <- (IOException -> ByronUpdateProposalError) +readByronUpdateProposal String +fp = do + ByteString +proposalBs <- (IOException -> ByronUpdateProposalError) -> IO ByteString -> ExceptT ByronUpdateProposalError IO ByteString forall (m :: * -> *) x a. MonadIO m => (IOException -> x) -> IO a -> ExceptT x m a handleIOExceptT (String -> Text -> ByronUpdateProposalError ByronReadUpdateProposalFileFailure String -fp (Text -> ByronUpdateProposalError) +fp (Text -> ByronUpdateProposalError) -> (IOException -> Text) -> IOException -> ByronUpdateProposalError forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -262,16 +262,16 @@ forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -fp - let mProposal :: Maybe ByronUpdateProposal -mProposal = AsType ByronUpdateProposal +fp + let mProposal :: Maybe ByronUpdateProposal +mProposal = AsType ByronUpdateProposal -> ByteString -> Maybe ByronUpdateProposal forall a. SerialiseAsRawBytes a => AsType a -> ByteString -> Maybe a deserialiseFromRawBytes AsType ByronUpdateProposal AsByronUpdateProposal ByteString -proposalBs +proposalBs Either ByronUpdateProposalError ByronUpdateProposal -> ExceptT ByronUpdateProposalError IO ByronUpdateProposal forall (m :: * -> *) x a. Monad m => Either x a -> ExceptT x m a @@ -296,28 +296,28 @@ forall a b. (a -> b) -> a -> b $ String -> ByronUpdateProposalError UpdateProposalDecodingError String -fp) ByronUpdateProposal +fp) ByronUpdateProposal -> Either ByronUpdateProposalError ByronUpdateProposal forall a b. b -> Either a b Right Maybe ByronUpdateProposal -mProposal +mProposal submitByronUpdateProposal :: NetworkId -> FilePath -> ExceptT ByronUpdateProposalError IO () submitByronUpdateProposal :: NetworkId -> String -> ExceptT ByronUpdateProposalError IO () -submitByronUpdateProposal NetworkId -network String -proposalFp = do - ByronUpdateProposal -proposal <- String -> ExceptT ByronUpdateProposalError IO ByronUpdateProposal +submitByronUpdateProposal NetworkId +network String +proposalFp = do + ByronUpdateProposal +proposal <- String -> ExceptT ByronUpdateProposalError IO ByronUpdateProposal readByronUpdateProposal String -proposalFp - let genTx :: GenTx ByronBlock -genTx = ByronUpdateProposal -> GenTx ByronBlock +proposalFp + let genTx :: GenTx ByronBlock +genTx = ByronUpdateProposal -> GenTx ByronBlock toByronLedgerUpdateProposal ByronUpdateProposal -proposal +proposal Tracer (ExceptT ByronUpdateProposalError IO) String -> String -> ExceptT ByronUpdateProposalError IO () forall (m :: * -> *) a. Tracer m a -> a -> m () @@ -335,7 +335,7 @@ condense (GenTx ByronBlock -> TxId (GenTx ByronBlock) forall tx. HasTxId tx => tx -> TxId tx txId GenTx ByronBlock -genTx) +genTx) (ByronTxError -> ByronUpdateProposalError) -> ExceptT ByronTxError IO () -> ExceptT ByronUpdateProposalError IO () @@ -350,7 +350,7 @@ forall a b. (a -> b) -> a -> b $ NetworkId -> GenTx ByronBlock -> ExceptT ByronTxError IO () nodeSubmitTx NetworkId -network GenTx ByronBlock -genTx +network GenTx ByronBlock +genTx \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Byron.Vote.html b/cardano-cli/src/Cardano.CLI.Byron.Vote.html index 16da0411554..4d92c122e2b 100644 --- a/cardano-cli/src/Cardano.CLI.Byron.Vote.html +++ b/cardano-cli/src/Cardano.CLI.Byron.Vote.html @@ -41,7 +41,7 @@ | ByronVoteUpdateProposalFailure !ByronUpdateProposalError | ByronVoteUpdateProposalDecodingError !Binary.DecoderError | ByronVoteUpdateHelperError !HelpersError - deriving Int -> ByronVoteError -> ShowS + deriving Int -> ByronVoteError -> ShowS [ByronVoteError] -> ShowS ByronVoteError -> String (Int -> ByronVoteError -> ShowS) @@ -60,85 +60,85 @@ renderByronVoteError :: ByronVoteError -> Text renderByronVoteError :: ByronVoteError -> Text -renderByronVoteError ByronVoteError -bVerr = +renderByronVoteError ByronVoteError +bVerr = case ByronVoteError -bVerr of - ByronVoteDecodingError String -fp -> Text +bVerr of + ByronVoteDecodingError String +fp -> Text "Error decoding Byron vote at " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -fp - ByronVoteGenesisReadError ByronGenesisError -genErr -> Text +fp + ByronVoteGenesisReadError ByronGenesisError +genErr -> Text "Error reading the genesis file:" Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack (ByronGenesisError -> String forall a b. (Show a, ConvertText String b) => a -> b show ByronGenesisError -genErr) - ByronVoteReadFileFailure String -fp Text -err -> Text +genErr) + ByronVoteReadFileFailure String +fp Text +err -> Text "Error reading Byron vote at " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -err - ByronVoteTxSubmissionError ByronTxError -txErr -> Text +err + ByronVoteTxSubmissionError ByronTxError +txErr -> Text "Error submitting the transaction: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack (ByronTxError -> String forall a b. (Show a, ConvertText String b) => a -> b show ByronTxError -txErr) - ByronVoteUpdateProposalDecodingError DecoderError -err -> Text +txErr) + ByronVoteUpdateProposalDecodingError DecoderError +err -> Text "Error decoding Byron update proposal: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack (DecoderError -> String forall a b. (Show a, ConvertText String b) => a -> b show DecoderError -err) - ByronVoteUpdateProposalFailure ByronUpdateProposalError -err -> Text +err) + ByronVoteUpdateProposalFailure ByronUpdateProposalError +err -> Text "Error reading the update proposal: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack (ByronUpdateProposalError -> String forall a b. (Show a, ConvertText String b) => a -> b show ByronUpdateProposalError -err) - ByronVoteUpdateHelperError HelpersError -err ->Text +err) + ByronVoteUpdateHelperError HelpersError +err ->Text "Error creating the vote: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack (HelpersError -> String forall a b. (Show a, ConvertText String b) => a -> b show HelpersError -err) - ByronVoteKeyReadFailure ByronKeyFailure -err -> Text +err) + ByronVoteKeyReadFailure ByronKeyFailure +err -> Text "Error reading the signing key: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack (ByronKeyFailure -> String forall a b. (Show a, ConvertText String b) => a -> b show ByronKeyFailure -err) +err) runVoteCreation @@ -154,14 +154,14 @@ -> Bool -> String -> ExceptT ByronVoteError IO () -runVoteCreation NetworkId -nw SigningKeyFile -sKey String -upPropFp Bool -voteBool String -outputFp = do - SomeByronSigningKey -sK <- (ByronKeyFailure -> ByronVoteError) +runVoteCreation NetworkId +nw SigningKeyFile +sKey String +upPropFp Bool +voteBool String +outputFp = do + SomeByronSigningKey +sK <- (ByronKeyFailure -> ByronVoteError) -> ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ByronVoteError IO SomeByronSigningKey forall (m :: * -> *) x y a. @@ -177,9 +177,9 @@ -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey readByronSigningKey ByronKeyFormat NonLegacyByronKeyFormat SigningKeyFile -sKey - ByronUpdateProposal -proposal <- (ByronUpdateProposalError -> ByronVoteError) +sKey + ByronUpdateProposal +proposal <- (ByronUpdateProposalError -> ByronVoteError) -> ExceptT ByronUpdateProposalError IO ByronUpdateProposal -> ExceptT ByronVoteError IO ByronUpdateProposal forall (m :: * -> *) x y a. @@ -193,15 +193,15 @@ forall a b. (a -> b) -> a -> b $ String -> ExceptT ByronUpdateProposalError IO ByronUpdateProposal readByronUpdateProposal String -upPropFp - let vote :: ByronVote -vote = NetworkId +upPropFp + let vote :: ByronVote +vote = NetworkId -> SomeByronSigningKey -> ByronUpdateProposal -> Bool -> ByronVote makeByronVote NetworkId -nw SomeByronSigningKey -sK ByronUpdateProposal -proposal Bool -voteBool +nw SomeByronSigningKey +sK ByronUpdateProposal +proposal Bool +voteBool (HelpersError -> ByronVoteError) -> ExceptT HelpersError IO () -> ExceptT ByronVoteError IO () forall (m :: * -> *) x y a. @@ -217,31 +217,31 @@ cat b c -> cat a b -> cat a c . String -> ByteString -> ExceptT HelpersError IO () ensureNewFileLBS String -outputFp +outputFp (ByteString -> ExceptT ByronVoteError IO ()) -> ByteString -> ExceptT ByronVoteError IO () forall a b. (a -> b) -> a -> b $ ByronVote -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytes ByronVote -vote +vote submitByronVote :: NetworkId -> FilePath -> ExceptT ByronVoteError IO () submitByronVote :: NetworkId -> String -> ExceptT ByronVoteError IO () -submitByronVote NetworkId -network String -voteFp = do - ByronVote -vote <- String -> ExceptT ByronVoteError IO ByronVote +submitByronVote NetworkId +network String +voteFp = do + ByronVote +vote <- String -> ExceptT ByronVoteError IO ByronVote readByronVote String -voteFp - let genTx :: GenTx ByronBlock -genTx = ByronVote -> GenTx ByronBlock +voteFp + let genTx :: GenTx ByronBlock +genTx = ByronVote -> GenTx ByronBlock toByronLedgertoByronVote ByronVote -vote +vote Tracer (ExceptT ByronVoteError IO) String -> String -> ExceptT ByronVoteError IO () forall (m :: * -> *) a. Tracer m a -> a -> m () @@ -255,7 +255,7 @@ condense (GenTx ByronBlock -> TxId (GenTx ByronBlock) forall tx. HasTxId tx => tx -> TxId tx txId GenTx ByronBlock -genTx)) +genTx)) (ByronTxError -> ByronVoteError) -> ExceptT ByronTxError IO () -> ExceptT ByronVoteError IO () forall (m :: * -> *) x y a. @@ -267,30 +267,30 @@ forall a b. (a -> b) -> a -> b $ NetworkId -> GenTx ByronBlock -> ExceptT ByronTxError IO () nodeSubmitTx NetworkId -network GenTx ByronBlock -genTx +network GenTx ByronBlock +genTx readByronVote :: FilePath -> ExceptT ByronVoteError IO ByronVote readByronVote :: String -> ExceptT ByronVoteError IO ByronVote -readByronVote String -fp = do - ByteString -voteBs <- IO ByteString -> ExceptT ByronVoteError IO ByteString +readByronVote String +fp = do + ByteString +voteBs <- IO ByteString -> ExceptT ByronVoteError IO ByteString forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO ByteString -> ExceptT ByronVoteError IO ByteString) -> IO ByteString -> ExceptT ByronVoteError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -fp - let mVote :: Maybe ByronVote -mVote = AsType ByronVote -> ByteString -> Maybe ByronVote +fp + let mVote :: Maybe ByronVote +mVote = AsType ByronVote -> ByteString -> Maybe ByronVote forall a. SerialiseAsRawBytes a => AsType a -> ByteString -> Maybe a deserialiseFromRawBytes AsType ByronVote AsByronVote ByteString -voteBs +voteBs Either ByronVoteError ByronVote -> ExceptT ByronVoteError IO ByronVote forall (m :: * -> *) x a. Monad m => Either x a -> ExceptT x m a @@ -311,8 +311,8 @@ forall a b. (a -> b) -> a -> b $ String -> ByronVoteError ByronVoteDecodingError String -fp) ByronVote -> Either ByronVoteError ByronVote +fp) ByronVote -> Either ByronVoteError ByronVote forall a b. b -> Either a b Right Maybe ByronVote -mVote +mVote \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Environment.html b/cardano-cli/src/Cardano.CLI.Environment.html index 9d1315d3e00..a31f265af04 100644 --- a/cardano-cli/src/Cardano.CLI.Environment.html +++ b/cardano-cli/src/Cardano.CLI.Environment.html @@ -16,7 +16,7 @@ import Cardano.CLI.Helpers (textShow) import Cardano.CLI.Types (SocketPath (..)) -newtype EnvSocketError = CliEnvVarLookup Text deriving Int -> EnvSocketError -> ShowS +newtype EnvSocketError = CliEnvVarLookup Text deriving Int -> EnvSocketError -> ShowS [EnvSocketError] -> ShowS EnvSocketError -> String (Int -> EnvSocketError -> ShowS) @@ -35,12 +35,12 @@ renderEnvSocketError :: EnvSocketError -> Text renderEnvSocketError :: EnvSocketError -> Text -renderEnvSocketError EnvSocketError -err = +renderEnvSocketError EnvSocketError +err = case EnvSocketError -err of - CliEnvVarLookup Text -txt -> +err of + CliEnvVarLookup Text +txt -> Text "Error while looking up environment variable: CARDANO_NODE_SOCKET_PATH " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -50,7 +50,7 @@ <> Text -> Text forall a. Show a => a -> Text textShow Text -txt +txt -- | Read the node socket path from the environment. -- Fails if the environment variable is not set. @@ -70,7 +70,7 @@ $ Text -> EnvSocketError CliEnvVarLookup (String -> Text Text.pack String -envName)) (SocketPath -> ExceptT EnvSocketError IO SocketPath +envName)) (SocketPath -> ExceptT EnvSocketError IO SocketPath forall (f :: * -> *) a. Applicative f => a -> f a pure (SocketPath -> ExceptT EnvSocketError IO SocketPath) -> (String -> SocketPath) @@ -89,10 +89,10 @@ forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (String -> IO (Maybe String) lookupEnv String -envName) +envName) where - envName :: String - envName :: String -envName = String + envName :: String + envName :: String +envName = String "CARDANO_NODE_SOCKET_PATH" \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Helpers.html b/cardano-cli/src/Cardano.CLI.Helpers.html index 1a694413106..070fde37c8c 100644 --- a/cardano-cli/src/Cardano.CLI.Helpers.html +++ b/cardano-cli/src/Cardano.CLI.Helpers.html @@ -37,7 +37,7 @@ | IOError' !FilePath !IOException | OutputMustNotAlreadyExist FilePath | ReadCBORFileFailure !FilePath !Text - deriving Int -> HelpersError -> ShowS + deriving Int -> HelpersError -> ShowS [HelpersError] -> ShowS HelpersError -> String (Int -> HelpersError -> ShowS) @@ -56,57 +56,57 @@ renderHelpersError :: HelpersError -> Text renderHelpersError :: HelpersError -> Text -renderHelpersError HelpersError -err = +renderHelpersError HelpersError +err = case HelpersError -err of - OutputMustNotAlreadyExist String -fp -> Text +err of + OutputMustNotAlreadyExist String +fp -> Text "Output file/directory must not already exist: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -fp - ReadCBORFileFailure String -fp Text -err' -> Text +fp + ReadCBORFileFailure String +fp Text +err' -> Text "CBOR read failure at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack (Text -> String forall a b. (Show a, ConvertText String b) => a -> b show Text -err') - CBORPrettyPrintError DeserialiseFailure -err' -> Text +err') + CBORPrettyPrintError DeserialiseFailure +err' -> Text "Error with CBOR decoding: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack (DeserialiseFailure -> String forall a b. (Show a, ConvertText String b) => a -> b show DeserialiseFailure -err') - CBORDecodingError DeserialiseFailure -err' -> Text +err') + CBORDecodingError DeserialiseFailure +err' -> Text "Error with CBOR decoding: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack (DeserialiseFailure -> String forall a b. (Show a, ConvertText String b) => a -> b show DeserialiseFailure -err') - IOError' String -fp IOException -ioE -> Text +err') + IOError' String +fp IOException +ioE -> Text "Error at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -115,17 +115,17 @@ Text.pack (IOException -> String forall a b. (Show a, ConvertText String b) => a -> b show IOException -ioE) +ioE) -decodeCBOR +decodeCBOR :: LByteString - -> (forall s. Decoder s a) - -> Either HelpersError (LB.ByteString, a) + -> (forall s. Decoder s a) + -> Either HelpersError (LB.ByteString, a) decodeCBOR :: LByteString -> (forall s. Decoder s a) -> Either HelpersError (LByteString, a) -decodeCBOR LByteString -bs forall s. Decoder s a -decoder = +decodeCBOR LByteString +bs forall s. Decoder s a +decoder = (DeserialiseFailure -> HelpersError) -> Either DeserialiseFailure (LByteString, a) -> Either HelpersError (LByteString, a) @@ -144,29 +144,29 @@ (forall s. Decoder s a) -> LByteString -> Either DeserialiseFailure (LByteString, a) deserialiseFromBytes forall s. Decoder s a -decoder LByteString -bs +decoder LByteString +bs -- | Checks if a path exists and throws and error if it does. -ensureNewFile :: (FilePath -> a -> IO ()) -> FilePath -> a -> ExceptT HelpersError IO () +ensureNewFile :: (FilePath -> a -> IO ()) -> FilePath -> a -> ExceptT HelpersError IO () ensureNewFile :: (String -> a -> IO ()) -> String -> a -> ExceptT HelpersError IO () -ensureNewFile String -> a -> IO () -writer String -outFile a -blob = do - Bool -exists <- IO Bool -> ExceptT HelpersError IO Bool +ensureNewFile String -> a -> IO () +writer String +outFile a +blob = do + Bool +exists <- IO Bool -> ExceptT HelpersError IO Bool forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO Bool -> ExceptT HelpersError IO Bool) -> IO Bool -> ExceptT HelpersError IO Bool forall a b. (a -> b) -> a -> b $ String -> IO Bool doesPathExist String -outFile +outFile Bool -> ExceptT HelpersError IO () -> ExceptT HelpersError IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when Bool -exists (ExceptT HelpersError IO () -> ExceptT HelpersError IO ()) +exists (ExceptT HelpersError IO () -> ExceptT HelpersError IO ()) -> ExceptT HelpersError IO () -> ExceptT HelpersError IO () forall a b. (a -> b) -> a -> b $ @@ -177,16 +177,16 @@ forall a b. (a -> b) -> a -> b $ String -> HelpersError OutputMustNotAlreadyExist String -outFile +outFile IO () -> ExceptT HelpersError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT HelpersError IO ()) -> IO () -> ExceptT HelpersError IO () forall a b. (a -> b) -> a -> b $ String -> a -> IO () -writer String -outFile a -blob +writer String +outFile a +blob ensureNewFileLBS :: FilePath -> ByteString -> ExceptT HelpersError IO () ensureNewFileLBS :: String -> ByteString -> ExceptT HelpersError IO () @@ -199,8 +199,8 @@ pPrintCBOR :: LByteString -> ExceptT HelpersError IO () pPrintCBOR :: LByteString -> ExceptT HelpersError IO () -pPrintCBOR LByteString -bs = do +pPrintCBOR LByteString +bs = do case (forall s. Decoder s Term) -> LByteString -> Either DeserialiseFailure (LByteString, Term) forall a. @@ -208,19 +208,19 @@ -> LByteString -> Either DeserialiseFailure (LByteString, a) deserialiseFromBytes forall s. Decoder s Term decodeTerm LByteString -bs of - Left DeserialiseFailure -err -> HelpersError -> ExceptT HelpersError IO () +bs of + Left DeserialiseFailure +err -> HelpersError -> ExceptT HelpersError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (HelpersError -> ExceptT HelpersError IO ()) -> HelpersError -> ExceptT HelpersError IO () forall a b. (a -> b) -> a -> b $ DeserialiseFailure -> HelpersError CBORPrettyPrintError DeserialiseFailure -err - Right (LByteString -remaining, Term -decodedVal) -> do +err + Right (LByteString +remaining, Term +decodedVal) -> do IO () -> ExceptT HelpersError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT HelpersError IO ()) @@ -245,23 +245,23 @@ forall a b. (a -> b) -> a -> b $ Term -> Encoding encodeTerm Term -decodedVal +decodedVal Bool -> ExceptT HelpersError IO () -> ExceptT HelpersError IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () unless (LByteString -> Bool LB.null LByteString -remaining) (ExceptT HelpersError IO () -> ExceptT HelpersError IO ()) +remaining) (ExceptT HelpersError IO () -> ExceptT HelpersError IO ()) -> ExceptT HelpersError IO () -> ExceptT HelpersError IO () forall a b. (a -> b) -> a -> b $ LByteString -> ExceptT HelpersError IO () pPrintCBOR LByteString -remaining +remaining readCBOR :: FilePath -> ExceptT HelpersError IO LByteString readCBOR :: String -> ExceptT HelpersError IO LByteString -readCBOR String -fp = +readCBOR String +fp = (IOException -> HelpersError) -> IO LByteString -> ExceptT HelpersError IO LByteString forall (m :: * -> *) x a. @@ -270,7 +270,7 @@ handleIOExceptT (String -> Text -> HelpersError ReadCBORFileFailure String -fp (Text -> HelpersError) +fp (Text -> HelpersError) -> (IOException -> Text) -> IOException -> HelpersError forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -286,17 +286,17 @@ displayException) (String -> IO LByteString LB.readFile String -fp) +fp) validateCBOR :: CBORObject -> LByteString -> Either HelpersError Text validateCBOR :: CBORObject -> LByteString -> Either HelpersError Text -validateCBOR CBORObject -cborObject LByteString -bs = +validateCBOR CBORObject +cborObject LByteString +bs = case CBORObject -cborObject of - CBORBlockByron EpochSlots -epochSlots -> do +cborObject of + CBORBlockByron EpochSlots +epochSlots -> do () () -> Either HelpersError (LByteString, ABlockOrBoundary ByteSpan) -> Either HelpersError () @@ -308,10 +308,10 @@ LByteString -> (forall s. Decoder s a) -> Either HelpersError (LByteString, a) decodeCBOR LByteString -bs (EpochSlots -> Decoder s (ABlockOrBoundary ByteSpan) +bs (EpochSlots -> Decoder s (ABlockOrBoundary ByteSpan) forall s. EpochSlots -> Decoder s (ABlockOrBoundary ByteSpan) fromCBORABlockOrBoundary EpochSlots -epochSlots) +epochSlots) Text -> Either HelpersError Text forall a b. b -> Either a b Right Text @@ -330,9 +330,9 @@ LByteString -> (forall s. Decoder s a) -> Either HelpersError (LByteString, a) decodeCBOR LByteString -bs (forall s. Decoder s Certificate +bs (forall s. Decoder s Certificate forall a s. FromCBOR a => Decoder s a -fromCBOR :: Decoder s Delegation.Certificate) +fromCBOR :: Decoder s Delegation.Certificate) Text -> Either HelpersError Text forall a b. b -> Either a b Right Text @@ -350,9 +350,9 @@ LByteString -> (forall s. Decoder s a) -> Either HelpersError (LByteString, a) decodeCBOR LByteString -bs (forall s. Decoder s Tx +bs (forall s. Decoder s Tx forall a s. FromCBOR a => Decoder s a -fromCBOR :: Decoder s UTxO.Tx) +fromCBOR :: Decoder s UTxO.Tx) Text -> Either HelpersError Text forall a b. b -> Either a b Right Text @@ -371,9 +371,9 @@ LByteString -> (forall s. Decoder s a) -> Either HelpersError (LByteString, a) decodeCBOR LByteString -bs (forall s. Decoder s Proposal +bs (forall s. Decoder s Proposal forall a s. FromCBOR a => Decoder s a -fromCBOR :: Decoder s Update.Proposal) +fromCBOR :: Decoder s Update.Proposal) Text -> Either HelpersError Text forall a b. b -> Either a b Right Text @@ -392,16 +392,16 @@ LByteString -> (forall s. Decoder s a) -> Either HelpersError (LByteString, a) decodeCBOR LByteString -bs (forall s. Decoder s Vote +bs (forall s. Decoder s Vote forall a s. FromCBOR a => Decoder s a -fromCBOR :: Decoder s Update.Vote) +fromCBOR :: Decoder s Update.Vote) Text -> Either HelpersError Text forall a b. b -> Either a b Right Text "Valid Byron vote." -textShow :: Show a => a -> Text +textShow :: Show a => a -> Text textShow :: a -> Text textShow = String -> Text Text.pack (String -> Text) -> (a -> String) -> a -> Text diff --git a/cardano-cli/src/Cardano.CLI.Mary.RenderValue.html b/cardano-cli/src/Cardano.CLI.Mary.RenderValue.html index c65d4a9a597..ef61b4e4842 100644 --- a/cardano-cli/src/Cardano.CLI.Mary.RenderValue.html +++ b/cardano-cli/src/Cardano.CLI.Mary.RenderValue.html @@ -27,7 +27,7 @@ -- ^ Render the ADA asset ID. | RenderNoAdaAssetId -- ^ Do not render the ADA asset ID. - deriving (Int -> RenderAdaAssetId -> ShowS + deriving (Int -> RenderAdaAssetId -> ShowS [RenderAdaAssetId] -> ShowS RenderAdaAssetId -> String (Int -> RenderAdaAssetId -> ShowS) @@ -42,7 +42,7 @@ $cshow :: RenderAdaAssetId -> String showsPrec :: Int -> RenderAdaAssetId -> ShowS $cshowsPrec :: Int -> RenderAdaAssetId -> ShowS -Show, RenderAdaAssetId -> RenderAdaAssetId -> Bool +Show, RenderAdaAssetId -> RenderAdaAssetId -> Bool (RenderAdaAssetId -> RenderAdaAssetId -> Bool) -> (RenderAdaAssetId -> RenderAdaAssetId -> Bool) -> Eq RenderAdaAssetId @@ -56,7 +56,7 @@ -- | Options which detail how a representation of a 'Value' should be -- rendered. newtype RenderValueOptions = RenderValueOptions RenderAdaAssetId - deriving Int -> RenderValueOptions -> ShowS + deriving Int -> RenderValueOptions -> ShowS [RenderValueOptions] -> ShowS RenderValueOptions -> String (Int -> RenderValueOptions -> ShowS) @@ -84,9 +84,9 @@ -- Note that this textual representation can be parsed by 'parseValue'. renderValue :: RenderValueOptions -> Value -> Text renderValue :: RenderValueOptions -> Value -> Text -renderValue (RenderValueOptions RenderAdaAssetId -renderAdaAssetId) Value -v = +renderValue (RenderValueOptions RenderAdaAssetId +renderAdaAssetId) Value +v = Text -> [Text] -> Text Text.intercalate Text @@ -95,14 +95,14 @@ forall a b. (a -> b) -> [a] -> [b] map (RenderAdaAssetId -> (AssetId, Quantity) -> Text renderAssetIdQuantityPair RenderAdaAssetId -renderAdaAssetId) [(AssetId, Quantity)] -vals) +renderAdaAssetId) [(AssetId, Quantity)] +vals) where - vals :: [(AssetId, Quantity)] - vals :: [(AssetId, Quantity)] -vals = Value -> [(AssetId, Quantity)] + vals :: [(AssetId, Quantity)] + vals :: [(AssetId, Quantity)] +vals = Value -> [(AssetId, Quantity)] valueToList Value -v +v -- | How a \"prettified\" representation of a 'Value' should be indented. data RenderIndentation @@ -110,7 +110,7 @@ -- ^ Indent with a tab character (\'\\t\'). | IndentSpaces !Int -- ^ Indent with a provided number of spaces. - deriving Int -> RenderIndentation -> ShowS + deriving Int -> RenderIndentation -> ShowS [RenderIndentation] -> ShowS RenderIndentation -> String (Int -> RenderIndentation -> ShowS) @@ -134,7 +134,7 @@ rpvoIndentation :: !RenderIndentation , RenderPrettyValueOptions -> RenderAdaAssetId rpvoRenderAdaAssetId :: !RenderAdaAssetId - } deriving Int -> RenderPrettyValueOptions -> ShowS + } deriving Int -> RenderPrettyValueOptions -> ShowS [RenderPrettyValueOptions] -> ShowS RenderPrettyValueOptions -> String (Int -> RenderPrettyValueOptions -> ShowS) @@ -168,9 +168,9 @@ -- | Render a \"prettified\" textual representation of a 'Value'. renderPrettyValue :: RenderPrettyValueOptions -> Value -> Text renderPrettyValue :: RenderPrettyValueOptions -> Value -> Text -renderPrettyValue RenderPrettyValueOptions -opts Value -v = +renderPrettyValue RenderPrettyValueOptions +opts Value +v = Text -> [Text] -> Text Text.intercalate (Text @@ -178,7 +178,7 @@ forall a. Semigroup a => a -> a -> a <> RenderIndentation -> Text renderIndentation RenderIndentation -rpvoIndentation Text -> Text -> Text +rpvoIndentation Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text "+ ") @@ -186,26 +186,26 @@ forall a b. (a -> b) -> [a] -> [b] map (RenderAdaAssetId -> (AssetId, Quantity) -> Text renderAssetIdQuantityPair RenderAdaAssetId -rpvoRenderAdaAssetId) [(AssetId, Quantity)] -vals) +rpvoRenderAdaAssetId) [(AssetId, Quantity)] +vals) where RenderPrettyValueOptions - { RenderIndentation + { RenderIndentation rpvoIndentation :: RenderIndentation rpvoIndentation :: RenderPrettyValueOptions -> RenderIndentation -rpvoIndentation - , RenderAdaAssetId +rpvoIndentation + , RenderAdaAssetId rpvoRenderAdaAssetId :: RenderAdaAssetId rpvoRenderAdaAssetId :: RenderPrettyValueOptions -> RenderAdaAssetId -rpvoRenderAdaAssetId +rpvoRenderAdaAssetId } = RenderPrettyValueOptions -opts +opts - vals :: [(AssetId, Quantity)] - vals :: [(AssetId, Quantity)] -vals = Value -> [(AssetId, Quantity)] + vals :: [(AssetId, Quantity)] + vals :: [(AssetId, Quantity)] +vals = Value -> [(AssetId, Quantity)] valueToList Value -v +v ------------------------------------------------------------------------------ -- Helpers @@ -216,19 +216,19 @@ renderIndentation RenderIndentation IndentTab = Text "\t" -renderIndentation (IndentSpaces Int -n) = Int -> Text -> Text +renderIndentation (IndentSpaces Int +n) = Int -> Text -> Text Text.replicate Int -n Text +n Text " " renderPolicyId :: PolicyId -> Text renderPolicyId :: PolicyId -> Text -renderPolicyId (PolicyId ScriptHash -scriptHash) = ScriptHash -> Text +renderPolicyId (PolicyId ScriptHash +scriptHash) = ScriptHash -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText ScriptHash -scriptHash +scriptHash renderAssetId :: RenderAdaAssetId -> AssetId -> Text renderAssetId :: RenderAdaAssetId -> AssetId -> Text @@ -242,43 +242,43 @@ forall a. Monoid a => a mempty renderAssetId RenderAdaAssetId -_ (AssetId PolicyId -polId (AssetName ByteString -assetName)) +_ (AssetId PolicyId +polId (AssetName ByteString +assetName)) | ByteString -> Bool BS.null ByteString -assetName = PolicyId -> Text +assetName = PolicyId -> Text renderPolicyId PolicyId -polId +polId | Bool otherwise = PolicyId -> Text renderPolicyId PolicyId -polId Text -> Text -> Text +polId Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text "." Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> ByteString -> Text Text.decodeUtf8 ByteString -assetName +assetName renderAssetIdQuantityPair :: RenderAdaAssetId -> (AssetId, Quantity) -> Text renderAssetIdQuantityPair :: RenderAdaAssetId -> (AssetId, Quantity) -> Text -renderAssetIdQuantityPair RenderAdaAssetId -renderAdaAssetId (AssetId -aId, Quantity -quant) = +renderAssetIdQuantityPair RenderAdaAssetId +renderAdaAssetId (AssetId +aId, Quantity +quant) = String -> Text Text.pack (Quantity -> String forall a. Show a => a -> String show Quantity -quant) Text -> Text -> Text +quant) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> RenderAdaAssetId -> AssetId -> Text renderAssetId RenderAdaAssetId -renderAdaAssetId AssetId -aId +renderAdaAssetId AssetId +aId \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Mary.TxOutParser.html b/cardano-cli/src/Cardano.CLI.Mary.TxOutParser.html index aa148732513..7ad4726afb4 100644 --- a/cardano-cli/src/Cardano.CLI.Mary.TxOutParser.html +++ b/cardano-cli/src/Cardano.CLI.Mary.TxOutParser.html @@ -21,8 +21,8 @@ parseTxOutAnyEra :: Parser TxOutAnyEra parseTxOutAnyEra :: Parser TxOutAnyEra parseTxOutAnyEra = do - AddressAny -addr <- Parser AddressAny + AddressAny +addr <- Parser AddressAny parseAddressAny ParsecT String () Identity () forall s (m :: * -> *) u. Stream s m Char => ParsecT s u m () @@ -47,7 +47,7 @@ spaces) AddressAny -> Value -> TxOutAnyEra TxOutAnyEra AddressAny -addr (Value -> TxOutAnyEra) +addr (Value -> TxOutAnyEra) -> ParsecT String () Identity Value -> Parser TxOutAnyEra forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> ParsecT String () Identity Value @@ -56,8 +56,8 @@ parseAddressAny :: Parser AddressAny parseAddressAny :: Parser AddressAny parseAddressAny = do - Text -str <- Parser Text + Text +str <- Parser Text plausibleAddressString Parser Text -> String -> Parser Text forall s u (m :: * -> *) a. ParsecT s u m a -> String -> ParsecT s u m a @@ -69,17 +69,17 @@ AsType addr -> Text -> Maybe addr deserialiseAddress AsType AddressAny AsAddressAny Text -str of +str of Maybe AddressAny Nothing -> String -> Parser AddressAny forall (m :: * -> *) a. MonadFail m => String -> m a fail String "expecting valid address" - Just AddressAny -addr -> AddressAny -> Parser AddressAny + Just AddressAny +addr -> AddressAny -> Parser AddressAny forall (f :: * -> *) a. Applicative f => a -> f a pure AddressAny -addr +addr plausibleAddressString :: Parser Text plausibleAddressString :: Parser Text @@ -96,26 +96,26 @@ Stream s m Char => (Char -> Bool) -> ParsecT s u m Char satisfy Char -> Bool -isPlausibleAddressChar) +isPlausibleAddressChar) where -- Covers both base58 and bech32 (with constrained prefixes) - isPlausibleAddressChar :: Char -> Bool -isPlausibleAddressChar Char -c = + isPlausibleAddressChar :: Char -> Bool +isPlausibleAddressChar Char +c = Char -> Bool isAsciiLower Char -c +c Bool -> Bool -> Bool || Char -> Bool isAsciiUpper Char -c +c Bool -> Bool -> Bool || Char -> Bool isDigit Char -c +c Bool -> Bool -> Bool || Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Eq a => a -> a -> Bool == Char '_' diff --git a/cardano-cli/src/Cardano.CLI.Mary.ValueParser.html b/cardano-cli/src/Cardano.CLI.Mary.ValueParser.html index db8d1b5f349..a12d746d4f3 100644 --- a/cardano-cli/src/Cardano.CLI.Mary.ValueParser.html +++ b/cardano-cli/src/Cardano.CLI.Mary.ValueParser.html @@ -34,39 +34,39 @@ -- | Evaluate a 'ValueExpr' and construct a 'Value'. evalValueExpr :: ValueExpr -> Value evalValueExpr :: ValueExpr -> Value -evalValueExpr ValueExpr -vExpr = +evalValueExpr ValueExpr +vExpr = case ValueExpr -vExpr of - ValueExprAdd ValueExpr -x ValueExpr -y -> ValueExpr -> Value +vExpr of + ValueExprAdd ValueExpr +x ValueExpr +y -> ValueExpr -> Value evalValueExpr ValueExpr -x Value -> Value -> Value +x Value -> Value -> Value forall a. Semigroup a => a -> a -> a <> ValueExpr -> Value evalValueExpr ValueExpr -y - ValueExprNegate ValueExpr -x -> Value -> Value +y + ValueExprNegate ValueExpr +x -> Value -> Value negateValue (ValueExpr -> Value evalValueExpr ValueExpr -x) - ValueExprLovelace Quantity -quant -> [(AssetId, Quantity)] -> Value +x) + ValueExprLovelace Quantity +quant -> [(AssetId, Quantity)] -> Value valueFromList [(AssetId AdaAssetId, Quantity -quant)] - ValueExprMultiAsset PolicyId -polId AssetName -aName Quantity -quant -> +quant)] + ValueExprMultiAsset PolicyId +polId AssetName +aName Quantity +quant -> [(AssetId, Quantity)] -> Value valueFromList [(PolicyId -> AssetName -> AssetId AssetId PolicyId -polId AssetName -aName , Quantity -quant)] +polId AssetName +aName , Quantity +quant)] ------------------------------------------------------------------------------ @@ -79,7 +79,7 @@ | ValueExprNegate !ValueExpr | ValueExprLovelace !Quantity | ValueExprMultiAsset !PolicyId !AssetName !Quantity - deriving (ValueExpr -> ValueExpr -> Bool + deriving (ValueExpr -> ValueExpr -> Bool (ValueExpr -> ValueExpr -> Bool) -> (ValueExpr -> ValueExpr -> Bool) -> Eq ValueExpr forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -87,7 +87,7 @@ $c/= :: ValueExpr -> ValueExpr -> Bool == :: ValueExpr -> ValueExpr -> Bool $c== :: ValueExpr -> ValueExpr -> Bool -Eq, Eq ValueExpr +Eq, Eq ValueExpr Eq ValueExpr -> (ValueExpr -> ValueExpr -> Ordering) -> (ValueExpr -> ValueExpr -> Bool) @@ -125,7 +125,7 @@ compare :: ValueExpr -> ValueExpr -> Ordering $ccompare :: ValueExpr -> ValueExpr -> Ordering $cp1Ord :: Eq ValueExpr -Ord, Int -> ValueExpr -> ShowS +Ord, Int -> ValueExpr -> ShowS [ValueExpr] -> ShowS ValueExpr -> String (Int -> ValueExpr -> ShowS) @@ -152,7 +152,7 @@ Stream s m t => OperatorTable s u m a -> ParsecT s u m a -> ParsecT s u m a buildExpressionParser OperatorTable String () Identity ValueExpr -operatorTable ParsecT String () Identity ValueExpr +operatorTable ParsecT String () Identity ValueExpr valueExprTerm ParsecT String () Identity ValueExpr -> String -> ParsecT String () Identity ValueExpr @@ -161,8 +161,8 @@ <?> String "multi-asset value expression" where - operatorTable :: OperatorTable String () Identity ValueExpr -operatorTable = + operatorTable :: OperatorTable String () Identity ValueExpr +operatorTable = [ [ParsecT String () Identity (ValueExpr -> ValueExpr) -> Operator String () Identity ValueExpr forall s u (m :: * -> *) a. @@ -182,8 +182,8 @@ valueExprTerm :: Parser ValueExpr valueExprTerm :: ParsecT String () Identity ValueExpr valueExprTerm = do - Quantity -q <- ParsecT String () Identity Quantity + Quantity +q <- ParsecT String () Identity Quantity -> ParsecT String () Identity Quantity forall s u (m :: * -> *) a. ParsecT s u m a -> ParsecT s u m a try ParsecT String () Identity Quantity @@ -193,17 +193,17 @@ ParsecT s u m a -> String -> ParsecT s u m a <?> String "quantity (word64)" - AssetId -aId <- ParsecT String () Identity AssetId + AssetId +aId <- ParsecT String () Identity AssetId -> ParsecT String () Identity AssetId forall s u (m :: * -> *) a. ParsecT s u m a -> ParsecT s u m a try ParsecT String () Identity AssetId -assetIdUnspecified ParsecT String () Identity AssetId +assetIdUnspecified ParsecT String () Identity AssetId -> ParsecT String () Identity AssetId -> ParsecT String () Identity AssetId forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> ParsecT String () Identity AssetId -assetIdSpecified ParsecT String () Identity AssetId +assetIdSpecified ParsecT String () Identity AssetId -> String -> ParsecT String () Identity AssetId forall s u (m :: * -> *) a. ParsecT s u m a -> String -> ParsecT s u m a @@ -219,24 +219,24 @@ -> ValueExpr -> ParsecT String () Identity ValueExpr forall a b. (a -> b) -> a -> b $ case AssetId -aId of +aId of AssetId AdaAssetId -> Quantity -> ValueExpr ValueExprLovelace Quantity -q - AssetId PolicyId -polId AssetName -aName -> PolicyId -> AssetName -> Quantity -> ValueExpr +q + AssetId PolicyId +polId AssetName +aName -> PolicyId -> AssetName -> Quantity -> ValueExpr ValueExprMultiAsset PolicyId -polId AssetName -aName Quantity -q +polId AssetName +aName Quantity +q where -- Parse an asset ID which must be lead by one or more whitespace -- characters and may be trailed by whitespace characters. - assetIdSpecified :: Parser AssetId - assetIdSpecified :: ParsecT String () Identity AssetId -assetIdSpecified = ParsecT String () Identity Char + assetIdSpecified :: Parser AssetId + assetIdSpecified :: ParsecT String () Identity AssetId +assetIdSpecified = ParsecT String () Identity Char -> ParsecT String () Identity String forall (f :: * -> *) a. Alternative f => f a -> f [a] some ParsecT String () Identity Char @@ -249,9 +249,9 @@ assetId -- Default for if an asset ID is not specified. - assetIdUnspecified :: Parser AssetId - assetIdUnspecified :: ParsecT String () Identity AssetId -assetIdUnspecified = + assetIdUnspecified :: Parser AssetId + assetIdUnspecified :: ParsecT String () Identity AssetId +assetIdUnspecified = ParsecT String () Identity () forall s (m :: * -> *) u. Stream s m Char => ParsecT s u m () spaces @@ -332,11 +332,11 @@ word64 :: Parser Integer word64 :: Parser Integer word64 = do - Integer -i <- Parser Integer + Integer +i <- Parser Integer decimal if Integer -i Integer -> Integer -> Bool +i Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool > Word64 -> Integer forall a b. (Integral a, Num b) => a -> b @@ -355,17 +355,17 @@ <> Integer -> String forall a. Show a => a -> String show Integer -i +i else Integer -> Parser Integer forall (m :: * -> *) a. Monad m => a -> m a return Integer -i +i decimal :: Parser Integer decimal :: Parser Integer decimal = do - String -digits <- ParsecT String () Identity Char + String +digits <- ParsecT String () Identity Char -> ParsecT String () Identity String forall s (m :: * -> *) t u a. Stream s m t => @@ -381,28 +381,28 @@ forall (t :: * -> *) b a. Foldable t => (b -> a -> b) -> b -> t a -> b -foldl' (\Integer -x Char -d -> Integer +foldl' (\Integer +x Char +d -> Integer 10Integer -> Integer -> Integer forall a. Num a => a -> a -> a *Integer -x Integer -> Integer -> Integer +x Integer -> Integer -> Integer forall a. Num a => a -> a -> a + Int -> Integer forall a. Integral a => a -> Integer toInteger (Char -> Int Char.digitToInt Char -d)) Integer +d)) Integer 0 String -digits +digits -- | Asset name parser. assetName :: Parser AssetName assetName :: Parser AssetName assetName = String -> AssetName -toAssetName (String -> AssetName) +toAssetName (String -> AssetName) -> ParsecT String () Identity String -> Parser AssetName forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> ParsecT String () Identity Char @@ -412,8 +412,8 @@ forall s (m :: * -> *) u. Stream s m Char => ParsecT s u m Char alphaNum where - toAssetName :: String -> AssetName -toAssetName = ByteString -> AssetName + toAssetName :: String -> AssetName +toAssetName = ByteString -> AssetName AssetName (ByteString -> AssetName) -> (String -> ByteString) -> String -> AssetName forall b c a. (b -> c) -> (a -> b) -> a -> c @@ -427,8 +427,8 @@ policyId :: Parser PolicyId policyId :: Parser PolicyId policyId = do - String -hexText <- ParsecT String () Identity Char + String +hexText <- ParsecT String () Identity Char -> ParsecT String () Identity String forall s (m :: * -> *) t u a. Stream s m t => @@ -437,13 +437,13 @@ forall s (m :: * -> *) u. Stream s m Char => ParsecT s u m Char hexDigit case String -> Maybe PolicyId -textToPolicyId String -hexText of - Just PolicyId -p -> PolicyId -> Parser PolicyId +textToPolicyId String +hexText of + Just PolicyId +p -> PolicyId -> Parser PolicyId forall (f :: * -> *) a. Applicative f => a -> f a pure PolicyId -p +p Maybe PolicyId Nothing -> String -> Parser PolicyId @@ -459,13 +459,13 @@ show (String -> Int forall (t :: * -> *) a. Foldable t => t a -> Int length String -hexText) String -> ShowS +hexText) String -> ShowS forall a. [a] -> [a] -> [a] ++ String " hex digits" where - textToPolicyId :: String -> Maybe PolicyId -textToPolicyId = + textToPolicyId :: String -> Maybe PolicyId +textToPolicyId = (ScriptHash -> PolicyId) -> Maybe ScriptHash -> Maybe PolicyId forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap ScriptHash -> PolicyId @@ -497,13 +497,13 @@ -> ParsecT String () Identity AssetId forall s u (m :: * -> *) a. ParsecT s u m a -> ParsecT s u m a try ParsecT String () Identity AssetId -adaAssetId +adaAssetId ParsecT String () Identity AssetId -> ParsecT String () Identity AssetId -> ParsecT String () Identity AssetId forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> ParsecT String () Identity AssetId -nonAdaAssetId +nonAdaAssetId ParsecT String () Identity AssetId -> String -> ParsecT String () Identity AssetId forall s u (m :: * -> *) a. @@ -512,9 +512,9 @@ "asset ID" where -- Parse the ADA asset ID. - adaAssetId :: Parser AssetId - adaAssetId :: ParsecT String () Identity AssetId -adaAssetId = String -> ParsecT String () Identity String + adaAssetId :: Parser AssetId + adaAssetId :: ParsecT String () Identity AssetId +adaAssetId = String -> ParsecT String () Identity String forall s (m :: * -> *) u. Stream s m Char => String -> ParsecT s u m String @@ -526,33 +526,33 @@ AdaAssetId -- Parse a multi-asset ID. - nonAdaAssetId :: Parser AssetId - nonAdaAssetId :: ParsecT String () Identity AssetId -nonAdaAssetId = do - PolicyId -polId <- Parser PolicyId + nonAdaAssetId :: Parser AssetId + nonAdaAssetId :: ParsecT String () Identity AssetId +nonAdaAssetId = do + PolicyId +polId <- Parser PolicyId policyId PolicyId -> ParsecT String () Identity AssetId -fullAssetId PolicyId -polId ParsecT String () Identity AssetId +fullAssetId PolicyId +polId ParsecT String () Identity AssetId -> ParsecT String () Identity AssetId -> ParsecT String () Identity AssetId forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> PolicyId -> ParsecT String () Identity AssetId -assetIdNoAssetName PolicyId -polId +assetIdNoAssetName PolicyId +polId -- Parse a fully specified multi-asset ID with both a policy ID and asset -- name. - fullAssetId :: PolicyId -> Parser AssetId - fullAssetId :: PolicyId -> ParsecT String () Identity AssetId -fullAssetId PolicyId -polId = do + fullAssetId :: PolicyId -> Parser AssetId + fullAssetId :: PolicyId -> ParsecT String () Identity AssetId +fullAssetId PolicyId +polId = do () _ <- ParsecT String () Identity () period - AssetName -aName <- Parser AssetName + AssetName +aName <- Parser AssetName assetName Parser AssetName -> String -> Parser AssetName forall s u (m :: * -> *) a. ParsecT s u m a -> String -> ParsecT s u m a @@ -562,18 +562,18 @@ forall (f :: * -> *) a. Applicative f => a -> f a pure (PolicyId -> AssetName -> AssetId AssetId PolicyId -polId AssetName -aName) +polId AssetName +aName) -- Parse a multi-asset ID that specifies a policy ID, but no asset name. - assetIdNoAssetName :: PolicyId -> Parser AssetId - assetIdNoAssetName :: PolicyId -> ParsecT String () Identity AssetId -assetIdNoAssetName PolicyId -polId = AssetId -> ParsecT String () Identity AssetId + assetIdNoAssetName :: PolicyId -> Parser AssetId + assetIdNoAssetName :: PolicyId -> ParsecT String () Identity AssetId +assetIdNoAssetName PolicyId +polId = AssetId -> ParsecT String () Identity AssetId forall (f :: * -> *) a. Applicative f => a -> f a pure (PolicyId -> AssetName -> AssetId AssetId PolicyId -polId AssetName +polId AssetName "") -- | Quantity (word64) parser. diff --git a/cardano-cli/src/Cardano.CLI.Parsers.html b/cardano-cli/src/Cardano.CLI.Parsers.html index 7f3ced2994b..26864035081 100644 --- a/cardano-cli/src/Cardano.CLI.Parsers.html +++ b/cardano-cli/src/Cardano.CLI.Parsers.html @@ -13,22 +13,22 @@ import Cardano.CLI.Run (ClientCommand (..)) import Cardano.CLI.Shelley.Parsers (parseShelleyCommands) -command' :: String -> String -> Parser a -> Mod CommandFields a +command' :: String -> String -> Parser a -> Mod CommandFields a command' :: String -> String -> Parser a -> Mod CommandFields a -command' String -c String -descr Parser a -p = +command' String +c String +descr Parser a +p = String -> ParserInfo a -> Mod CommandFields a forall a. String -> ParserInfo a -> Mod CommandFields a command String -c (ParserInfo a -> Mod CommandFields a) +c (ParserInfo a -> Mod CommandFields a) -> ParserInfo a -> Mod CommandFields a forall a b. (a -> b) -> a -> b $ Parser a -> InfoMod a -> ParserInfo a forall a. Parser a -> InfoMod a -> ParserInfo a info (Parser a -p Parser a -> Parser (a -> a) -> Parser a +p Parser a -> Parser (a -> a) -> Parser a forall (f :: * -> *) a b. Applicative f => f a -> f (a -> b) -> f b <**> Parser (a -> a) forall a. Parser (a -> a) @@ -40,7 +40,7 @@ mconcat [ String -> InfoMod a forall a. String -> InfoMod a progDesc String -descr ] +descr ] opts :: ParserInfo ClientCommand opts :: ParserInfo ClientCommand diff --git a/cardano-cli/src/Cardano.CLI.Run.Friendly.html b/cardano-cli/src/Cardano.CLI.Run.Friendly.html index 8558191aa97..aa32b207a98 100644 --- a/cardano-cli/src/Cardano.CLI.Run.Friendly.html +++ b/cardano-cli/src/Cardano.CLI.Run.Friendly.html @@ -33,10 +33,10 @@ import Cardano.CLI.Helpers (textShow) -friendlyTxBodyBS :: CardanoEra era -> Api.TxBody era -> ByteString +friendlyTxBodyBS :: CardanoEra era -> Api.TxBody era -> ByteString friendlyTxBodyBS :: CardanoEra era -> TxBody era -> ByteString -friendlyTxBodyBS CardanoEra era -era = +friendlyTxBodyBS CardanoEra era +era = Config -> Value -> ByteString forall a. ToJSON a => Config -> a -> ByteString encodePretty ((Text -> Text -> Ordering) -> Config -> Config @@ -51,13 +51,13 @@ . CardanoEra era -> TxBody era -> Value forall era. CardanoEra era -> TxBody era -> Value friendlyTxBody CardanoEra era -era +era -friendlyTxBody :: CardanoEra era -> Api.TxBody era -> Value +friendlyTxBody :: CardanoEra era -> Api.TxBody era -> Value friendlyTxBody :: CardanoEra era -> TxBody era -> Value -friendlyTxBody CardanoEra era -era TxBody era -txbody = +friendlyTxBody CardanoEra era +era TxBody era +txbody = Object -> Value Object (Object -> Value) -> Object -> Value forall a b. (a -> b) -> a -> b @@ -70,66 +70,66 @@ .= CardanoEra era -> Value forall a. ToJSON a => a -> Value toJSON CardanoEra era -era] +era] Object -> Object -> Object forall a. Semigroup a => a -> a -> a <> case TxBody era -txbody of - ByronTxBody Annotated Tx ByteString -body -> Annotated Tx ByteString -> Object +txbody of + ByronTxBody Annotated Tx ByteString +body -> Annotated Tx ByteString -> Object friendlyTxBodyByron Annotated Tx ByteString -body +body ShelleyTxBody ShelleyBasedEra era -ShelleyBasedEraShelley TxBody (ShelleyLedgerEra era) -body [Script (ShelleyLedgerEra era)] -_scripts TxBodyScriptData era -_ Maybe (AuxiliaryData (ShelleyLedgerEra era)) -aux -> +ShelleyBasedEraShelley TxBody (ShelleyLedgerEra era) +body [Script (ShelleyLedgerEra era)] +_scripts TxBodyScriptData era +_ Maybe (AuxiliaryData (ShelleyLedgerEra era)) +aux -> Maybe (Metadata (ShelleyEra StandardCrypto)) -> Object -> Object forall a. Show a => Maybe a -> Object -> Object addAuxData Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (Metadata (ShelleyEra StandardCrypto)) -aux (Object -> Object) -> Object -> Object +aux (Object -> Object) -> Object -> Object forall a b. (a -> b) -> a -> b $ TxBody (ShelleyEra StandardCrypto) -> Object friendlyTxBodyShelley TxBody (ShelleyLedgerEra era) TxBody (ShelleyEra StandardCrypto) -body +body ShelleyTxBody ShelleyBasedEra era -ShelleyBasedEraAllegra TxBody (ShelleyLedgerEra era) -body [Script (ShelleyLedgerEra era)] -_scripts TxBodyScriptData era -_ Maybe (AuxiliaryData (ShelleyLedgerEra era)) -aux -> +ShelleyBasedEraAllegra TxBody (ShelleyLedgerEra era) +body [Script (ShelleyLedgerEra era)] +_scripts TxBodyScriptData era +_ Maybe (AuxiliaryData (ShelleyLedgerEra era)) +aux -> Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) -> Object -> Object forall a. Show a => Maybe a -> Object -> Object addAuxData Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (ShelleyMAEra 'Allegra StandardCrypto)) -aux (Object -> Object) -> Object -> Object +aux (Object -> Object) -> Object -> Object forall a b. (a -> b) -> a -> b $ TxBody (ShelleyMAEra 'Allegra StandardCrypto) -> Object friendlyTxBodyAllegra TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Allegra StandardCrypto) -body +body ShelleyTxBody ShelleyBasedEra era -ShelleyBasedEraMary TxBody (ShelleyLedgerEra era) -body [Script (ShelleyLedgerEra era)] -_scripts TxBodyScriptData era -_ Maybe (AuxiliaryData (ShelleyLedgerEra era)) -aux -> +ShelleyBasedEraMary TxBody (ShelleyLedgerEra era) +body [Script (ShelleyLedgerEra era)] +_scripts TxBodyScriptData era +_ Maybe (AuxiliaryData (ShelleyLedgerEra era)) +aux -> Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) -> Object -> Object forall a. Show a => Maybe a -> Object -> Object addAuxData Maybe (AuxiliaryData (ShelleyLedgerEra era)) Maybe (AuxiliaryData (ShelleyMAEra 'Mary StandardCrypto)) -aux (Object -> Object) -> Object -> Object +aux (Object -> Object) -> Object -> Object forall a b. (a -> b) -> a -> b $ TxBody (ShelleyMAEra 'Mary StandardCrypto) -> Object friendlyTxBodyMary TxBody (ShelleyLedgerEra era) TxBody (ShelleyMAEra 'Mary StandardCrypto) -body +body ShelleyTxBody ShelleyBasedEra era ShelleyBasedEraAlonzo TxBody (ShelleyLedgerEra era) _ [Script (ShelleyLedgerEra era)] @@ -141,7 +141,7 @@ panic Text "friendlyTxBody: Alonzo not implemented yet" -- TODO alonzo -addAuxData :: Show a => Maybe a -> Object -> Object +addAuxData :: Show a => Maybe a -> Object -> Object addAuxData :: Maybe a -> Object -> Object addAuxData = Text -> Value -> Object -> Object forall k v. @@ -184,8 +184,8 @@ friendlyTxBodyShelley :: Shelley.TxBody (Ledger.ShelleyEra StandardCrypto) -> Object friendlyTxBodyShelley :: TxBody (ShelleyEra StandardCrypto) -> Object -friendlyTxBodyShelley TxBody (ShelleyEra StandardCrypto) -body = +friendlyTxBodyShelley TxBody (ShelleyEra StandardCrypto) +body = [(Text, Value)] -> Object forall k v. (Eq k, Hashable k) => [(k, v)] -> HashMap k v HashMap.fromList @@ -203,7 +203,7 @@ TransTxBody ToCBOR era) => Set (TxIn (Crypto era)) Shelley._inputs TxBody (ShelleyEra StandardCrypto) -body +body , Text "outputs" Text -> StrictSeq Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -222,7 +222,7 @@ TransTxBody ToCBOR era) => StrictSeq (TxOut era) Shelley._outputs TxBody (ShelleyEra StandardCrypto) -body) +body) , Text "certificates" Text -> StrictSeq Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -242,7 +242,7 @@ TransTxBody ToCBOR era) => StrictSeq (DCert (Crypto era)) Shelley._certs TxBody (ShelleyEra StandardCrypto) -body) +body) , Text "withdrawals" Text -> Map (RewardAcnt StandardCrypto) Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -259,7 +259,7 @@ TransTxBody ToCBOR era) => Wdrl (Crypto era) Shelley._wdrls TxBody (ShelleyEra StandardCrypto) -body) +body) , Text "fee" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -274,7 +274,7 @@ TransTxBody ToCBOR era) => Coin Shelley._txfee TxBody (ShelleyEra StandardCrypto) -body +body , Text "time to live" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -289,7 +289,7 @@ TransTxBody ToCBOR era) => SlotNo Shelley._ttl TxBody (ShelleyEra StandardCrypto) -body +body , Text "update" Text -> StrictMaybe Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -310,7 +310,7 @@ TransTxBody ToCBOR era) => StrictMaybe (Update era) Shelley._txUpdate TxBody (ShelleyEra StandardCrypto) -body) +body) , Text "metadata hash" Text -> StrictMaybe Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -332,7 +332,7 @@ TransTxBody ToCBOR era) => StrictMaybe (AuxiliaryDataHash (Crypto era)) Shelley._mdHash TxBody (ShelleyEra StandardCrypto) -body) +body) ] friendlyTxBodyAllegra @@ -340,26 +340,26 @@ friendlyTxBodyAllegra :: TxBody (ShelleyMAEra 'Allegra StandardCrypto) -> Object friendlyTxBodyAllegra (ShelleyMA.TxBody - Set (TxIn (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) -inputs - StrictSeq (TxOut (ShelleyMAEra 'Allegra StandardCrypto)) -outputs - StrictSeq (DCert (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) -certificates - (Shelley.Wdrl Map + Set (TxIn (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) +inputs + StrictSeq (TxOut (ShelleyMAEra 'Allegra StandardCrypto)) +outputs + StrictSeq (DCert (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) +certificates + (Shelley.Wdrl Map (RewardAcnt (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) Coin -withdrawals) - Coin -txfee - ValidityInterval -validity - StrictMaybe (Update (ShelleyMAEra 'Allegra StandardCrypto)) -update - StrictMaybe +withdrawals) + Coin +txfee + ValidityInterval +validity + StrictMaybe (Update (ShelleyMAEra 'Allegra StandardCrypto)) +update + StrictMaybe (AuxiliaryDataHash (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) -adHash - Value (ShelleyMAEra 'Allegra StandardCrypto) -_mint -- mint is not used in Allegra, only in Mary+ +adHash + Value (ShelleyMAEra 'Allegra StandardCrypto) +_mint -- mint is not used in Allegra, only in Mary+ ) = [(Text, Value)] -> Object forall k v. (Eq k, Hashable k) => [(k, v)] -> HashMap k v @@ -369,7 +369,7 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (TxIn StandardCrypto) Set (TxIn (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) -inputs +inputs , Text "outputs" Text -> StrictSeq Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -379,7 +379,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap TxOut (ShelleyMAEra 'Allegra StandardCrypto) -> Value friendlyTxOutAllegra StrictSeq (TxOut (ShelleyMAEra 'Allegra StandardCrypto)) -outputs +outputs , Text "certificates" Text -> StrictSeq Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -390,25 +390,25 @@ forall a. Show a => a -> Text textShow StrictSeq (DCert StandardCrypto) StrictSeq (DCert (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) -certificates +certificates , Text "withdrawals" Text -> Map (RewardAcnt StandardCrypto) Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Map (RewardAcnt StandardCrypto) Coin Map (RewardAcnt (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) Coin -withdrawals +withdrawals , Text "fee" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -txfee +txfee , Text "validity interval" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ValidityInterval -> Value friendlyValidityInterval ValidityInterval -validity +validity , Text "update" Text -> StrictMaybe Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -419,7 +419,7 @@ fmap Update (ShelleyMAEra 'Allegra StandardCrypto) -> Text forall a. Show a => a -> Text textShow StrictMaybe (Update (ShelleyMAEra 'Allegra StandardCrypto)) -update +update , Text "auxiliary data hash" Text -> StrictMaybe Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -432,7 +432,7 @@ textShow StrictMaybe (AuxiliaryDataHash StandardCrypto) StrictMaybe (AuxiliaryDataHash (Crypto (ShelleyMAEra 'Allegra StandardCrypto))) -adHash +adHash ] friendlyTxBodyMary @@ -440,25 +440,25 @@ friendlyTxBodyMary :: TxBody (ShelleyMAEra 'Mary StandardCrypto) -> Object friendlyTxBodyMary (ShelleyMA.TxBody - Set (TxIn (Crypto (ShelleyMAEra 'Mary StandardCrypto))) -inputs - StrictSeq (TxOut (ShelleyMAEra 'Mary StandardCrypto)) -outputs - StrictSeq (DCert (Crypto (ShelleyMAEra 'Mary StandardCrypto))) -certificates - (Shelley.Wdrl Map (RewardAcnt (Crypto (ShelleyMAEra 'Mary StandardCrypto))) Coin -withdrawals) - Coin -txfee - ValidityInterval -validity - StrictMaybe (Update (ShelleyMAEra 'Mary StandardCrypto)) -update - StrictMaybe + Set (TxIn (Crypto (ShelleyMAEra 'Mary StandardCrypto))) +inputs + StrictSeq (TxOut (ShelleyMAEra 'Mary StandardCrypto)) +outputs + StrictSeq (DCert (Crypto (ShelleyMAEra 'Mary StandardCrypto))) +certificates + (Shelley.Wdrl Map (RewardAcnt (Crypto (ShelleyMAEra 'Mary StandardCrypto))) Coin +withdrawals) + Coin +txfee + ValidityInterval +validity + StrictMaybe (Update (ShelleyMAEra 'Mary StandardCrypto)) +update + StrictMaybe (AuxiliaryDataHash (Crypto (ShelleyMAEra 'Mary StandardCrypto))) -adHash - Value (ShelleyMAEra 'Mary StandardCrypto) -mint) = +adHash + Value (ShelleyMAEra 'Mary StandardCrypto) +mint) = [(Text, Value)] -> Object forall k v. (Eq k, Hashable k) => [(k, v)] -> HashMap k v HashMap.fromList @@ -467,7 +467,7 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (TxIn StandardCrypto) Set (TxIn (Crypto (ShelleyMAEra 'Mary StandardCrypto))) -inputs +inputs , Text "outputs" Text -> StrictSeq Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -477,7 +477,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap TxOut (ShelleyMAEra 'Mary StandardCrypto) -> Value friendlyTxOutMary StrictSeq (TxOut (ShelleyMAEra 'Mary StandardCrypto)) -outputs +outputs , Text "certificates" Text -> StrictSeq Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -488,24 +488,24 @@ forall a. Show a => a -> Text textShow StrictSeq (DCert StandardCrypto) StrictSeq (DCert (Crypto (ShelleyMAEra 'Mary StandardCrypto))) -certificates +certificates , Text "withdrawals" Text -> Map (RewardAcnt StandardCrypto) Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Map (RewardAcnt StandardCrypto) Coin Map (RewardAcnt (Crypto (ShelleyMAEra 'Mary StandardCrypto))) Coin -withdrawals +withdrawals , Text "fee" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -txfee +txfee , Text "validity interval" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ValidityInterval -> Value friendlyValidityInterval ValidityInterval -validity +validity , Text "update" Text -> StrictMaybe Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -516,7 +516,7 @@ fmap Update (ShelleyMAEra 'Mary StandardCrypto) -> Text forall a. Show a => a -> Text textShow StrictMaybe (Update (ShelleyMAEra 'Mary StandardCrypto)) -update +update , Text "auxiliary data hash" Text -> StrictMaybe Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -529,22 +529,22 @@ textShow StrictMaybe (AuxiliaryDataHash StandardCrypto) StrictMaybe (AuxiliaryDataHash (Crypto (ShelleyMAEra 'Mary StandardCrypto))) -adHash +adHash , Text "mint" Text -> Value StandardCrypto -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value (ShelleyMAEra 'Mary StandardCrypto) Value StandardCrypto -mint +mint ] friendlyValidityInterval :: ShelleyMA.ValidityInterval -> Value friendlyValidityInterval :: ValidityInterval -> Value friendlyValidityInterval - ShelleyMA.ValidityInterval{StrictMaybe SlotNo + ShelleyMA.ValidityInterval{StrictMaybe SlotNo invalidBefore :: ValidityInterval -> StrictMaybe SlotNo invalidBefore :: StrictMaybe SlotNo -invalidBefore, StrictMaybe SlotNo +invalidBefore, StrictMaybe SlotNo invalidHereafter :: ValidityInterval -> StrictMaybe SlotNo invalidHereafter :: StrictMaybe SlotNo invalidHereafter} = @@ -554,19 +554,19 @@ "invalid before" Text -> StrictMaybe SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= StrictMaybe SlotNo -invalidBefore +invalidBefore , Text "invalid hereafter" Text -> StrictMaybe SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= StrictMaybe SlotNo -invalidHereafter +invalidHereafter ] friendlyTxOutShelley :: TxOut (Ledger.ShelleyEra StandardCrypto) -> Value friendlyTxOutShelley :: TxOut (ShelleyEra StandardCrypto) -> Value -friendlyTxOutShelley (TxOut Addr (Crypto (ShelleyEra StandardCrypto)) -addr Value (ShelleyEra StandardCrypto) -amount) = +friendlyTxOutShelley (TxOut Addr (Crypto (ShelleyEra StandardCrypto)) +addr Value (ShelleyEra StandardCrypto) +amount) = Object -> Value Object (Object -> Value) -> Object -> Value forall a b. (a -> b) -> a -> b @@ -579,18 +579,18 @@ forall a. ToJSON a => a -> Value toJSON Value (ShelleyEra StandardCrypto) Coin -amount) (Object -> Object) -> Object -> Object +amount) (Object -> Object) -> Object -> Object forall a b. (a -> b) -> a -> b $ Addr StandardCrypto -> Object friendlyAddress Addr StandardCrypto Addr (Crypto (ShelleyEra StandardCrypto)) -addr +addr friendlyTxOutAllegra :: TxOut (ShelleyMAEra 'Allegra StandardCrypto) -> Value friendlyTxOutAllegra :: TxOut (ShelleyMAEra 'Allegra StandardCrypto) -> Value -friendlyTxOutAllegra (TxOut Addr (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) -addr Value (ShelleyMAEra 'Allegra StandardCrypto) -amount) = +friendlyTxOutAllegra (TxOut Addr (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) +addr Value (ShelleyMAEra 'Allegra StandardCrypto) +amount) = Object -> Value Object (Object -> Value) -> Object -> Value forall a b. (a -> b) -> a -> b @@ -603,18 +603,18 @@ forall a. ToJSON a => a -> Value toJSON Value (ShelleyMAEra 'Allegra StandardCrypto) Coin -amount) (Object -> Object) -> Object -> Object +amount) (Object -> Object) -> Object -> Object forall a b. (a -> b) -> a -> b $ Addr StandardCrypto -> Object friendlyAddress Addr StandardCrypto Addr (Crypto (ShelleyMAEra 'Allegra StandardCrypto)) -addr +addr friendlyTxOutMary :: TxOut (ShelleyMAEra 'Mary StandardCrypto) -> Value friendlyTxOutMary :: TxOut (ShelleyMAEra 'Mary StandardCrypto) -> Value -friendlyTxOutMary (TxOut Addr (Crypto (ShelleyMAEra 'Mary StandardCrypto)) -addr Value (ShelleyMAEra 'Mary StandardCrypto) -amount) = +friendlyTxOutMary (TxOut Addr (Crypto (ShelleyMAEra 'Mary StandardCrypto)) +addr Value (ShelleyMAEra 'Mary StandardCrypto) +amount) = Object -> Value Object (Object -> Value) -> Object -> Value forall a b. (a -> b) -> a -> b @@ -627,28 +627,28 @@ forall a. ToJSON a => a -> Value toJSON Value (ShelleyMAEra 'Mary StandardCrypto) Value StandardCrypto -amount) (Object -> Object) -> Object -> Object +amount) (Object -> Object) -> Object -> Object forall a b. (a -> b) -> a -> b $ Addr StandardCrypto -> Object friendlyAddress Addr StandardCrypto Addr (Crypto (ShelleyMAEra 'Mary StandardCrypto)) -addr +addr friendlyAddress :: Addr StandardCrypto -> Object friendlyAddress :: Addr StandardCrypto -> Object -friendlyAddress Addr StandardCrypto -addr = +friendlyAddress Addr StandardCrypto +addr = [(Text, Value)] -> Object forall k v. (Eq k, Hashable k) => [(k, v)] -> HashMap k v HashMap.fromList ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object forall a b. (a -> b) -> a -> b $ case Addr StandardCrypto -addr of - Addr Network -net PaymentCredential StandardCrypto -cred StakeReference StandardCrypto -ref -> +addr of + Addr Network +net PaymentCredential StandardCrypto +cred StakeReference StandardCrypto +ref -> [ Text "address" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -659,24 +659,24 @@ "network" Text -> Network -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Network -net +net , Text "credential" Text -> PaymentCredential StandardCrypto -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PaymentCredential StandardCrypto -cred +cred , Text "stake reference" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= StakeReference StandardCrypto -> Text forall a. Show a => a -> Text textShow StakeReference StandardCrypto -ref +ref , Text "Bech32" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -addressBech32 +addressBech32 ] ] AddrBootstrap BootstrapAddress StandardCrypto @@ -690,37 +690,37 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -> Value String Text -addressBech32]] +addressBech32]] where - addressBech32 :: Text -addressBech32 = + addressBech32 :: Text +addressBech32 = case Addr StandardCrypto -> AddressInEra ShelleyEra forall era. IsShelleyBasedEra era => Addr StandardCrypto -> AddressInEra era fromShelleyAddr @Api.ShelleyEra Addr StandardCrypto -addr of +addr of AddressInEra (ShelleyAddressInEra ShelleyBasedEra ShelleyEra -_) Address addrtype -a -> Address addrtype -> Text +_) Address addrtype +a -> Address addrtype -> Text forall addr. SerialiseAddress addr => addr -> Text serialiseAddress Address addrtype -a +a AddressInEra AddressTypeInEra addrtype ShelleyEra -ByronAddressInAnyEra Address addrtype -a -> Address addrtype -> Text +ByronAddressInAnyEra Address addrtype +a -> Address addrtype -> Text forall addr. SerialiseAddress addr => addr -> Text serialiseAddress Address addrtype -a +a assertObject :: HasCallStack => Value -> Object assertObject :: Value -> Object assertObject = \case - Object Object -obj -> Object -obj - Value -val -> Text -> Object + Object Object +obj -> Object +obj + Value +val -> Text -> Object forall a. HasCallStack => Text -> a panic (Text -> Object) -> Text -> Object forall a b. (a -> b) -> a -> b @@ -728,12 +728,12 @@ "expected JSON Object, but got " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -typ +typ where - typ :: Text -typ = + typ :: Text +typ = case Value -val of +val of Array{} -> Text "an Array" Bool{} -> Text diff --git a/cardano-cli/src/Cardano.CLI.Run.html b/cardano-cli/src/Cardano.CLI.Run.html index 297a35a97ce..001b382cd0f 100644 --- a/cardano-cli/src/Cardano.CLI.Run.html +++ b/cardano-cli/src/Cardano.CLI.Run.html @@ -39,7 +39,7 @@ | DeprecatedShelleySubcommand ShelleyCommand | DisplayVersion - deriving Int -> ClientCommand -> ShowS + deriving Int -> ClientCommand -> ShowS [ClientCommand] -> ShowS ClientCommand -> String (Int -> ClientCommand -> ShowS) @@ -59,7 +59,7 @@ data ClientCommandErrors = ByronClientError ByronClientCmdError | ShelleyClientError ShelleyCommand ShelleyClientCmdError - deriving Int -> ClientCommandErrors -> ShowS + deriving Int -> ClientCommandErrors -> ShowS [ClientCommandErrors] -> ShowS ClientCommandErrors -> String (Int -> ClientCommandErrors -> ShowS) @@ -78,8 +78,8 @@ runClientCommand :: ClientCommand -> ExceptT ClientCommandErrors IO () runClientCommand :: ClientCommand -> ExceptT ClientCommandErrors IO () -runClientCommand (ByronCommand ByronCommand -c) = (ByronClientCmdError -> ClientCommandErrors) +runClientCommand (ByronCommand ByronCommand +c) = (ByronClientCmdError -> ClientCommandErrors) -> ExceptT ByronClientCmdError IO () -> ExceptT ClientCommandErrors IO () forall (m :: * -> *) x y a. @@ -93,9 +93,9 @@ forall a b. (a -> b) -> a -> b $ ByronCommand -> ExceptT ByronClientCmdError IO () runByronClientCommand ByronCommand -c -runClientCommand (ShelleyCommand ShelleyCommand -c) = (ShelleyClientCmdError -> ClientCommandErrors) +c +runClientCommand (ShelleyCommand ShelleyCommand +c) = (ShelleyClientCmdError -> ClientCommandErrors) -> ExceptT ShelleyClientCmdError IO () -> ExceptT ClientCommandErrors IO () forall (m :: * -> *) x y a. @@ -103,16 +103,16 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (ShelleyCommand -> ShelleyClientCmdError -> ClientCommandErrors ShelleyClientError ShelleyCommand -c) (ExceptT ShelleyClientCmdError IO () +c) (ExceptT ShelleyClientCmdError IO () -> ExceptT ClientCommandErrors IO ()) -> ExceptT ShelleyClientCmdError IO () -> ExceptT ClientCommandErrors IO () forall a b. (a -> b) -> a -> b $ ShelleyCommand -> ExceptT ShelleyClientCmdError IO () runShelleyClientCommand ShelleyCommand -c -runClientCommand (DeprecatedShelleySubcommand ShelleyCommand -c) = +c +runClientCommand (DeprecatedShelleySubcommand ShelleyCommand +c) = (ShelleyClientCmdError -> ClientCommandErrors) -> ExceptT ShelleyClientCmdError IO () -> ExceptT ClientCommandErrors IO () @@ -121,7 +121,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (ShelleyCommand -> ShelleyClientCmdError -> ClientCommandErrors ShelleyClientError ShelleyCommand -c) +c) (ExceptT ShelleyClientCmdError IO () -> ExceptT ClientCommandErrors IO ()) -> ExceptT ShelleyClientCmdError IO () @@ -140,49 +140,49 @@ forall a b. (a -> b) -> a -> b $ ShelleyCommand -> ExceptT ShelleyClientCmdError IO () runShelleyClientCommand ShelleyCommand -c +c runClientCommand ClientCommand DisplayVersion = ExceptT ClientCommandErrors IO () runDisplayVersion renderClientCommandError :: ClientCommandErrors -> Text renderClientCommandError :: ClientCommandErrors -> Text -renderClientCommandError (ByronClientError ByronClientCmdError -err) = +renderClientCommandError (ByronClientError ByronClientCmdError +err) = ByronClientCmdError -> Text renderByronClientCmdError ByronClientCmdError -err -renderClientCommandError (ShelleyClientError ShelleyCommand -cmd ShelleyClientCmdError -err) = +err +renderClientCommandError (ShelleyClientError ShelleyCommand +cmd ShelleyClientCmdError +err) = ShelleyCommand -> ShelleyClientCmdError -> Text renderShelleyClientCmdError ShelleyCommand -cmd ShelleyClientCmdError -err +cmd ShelleyClientCmdError +err -- | Combine an 'ExceptT' that will write a warning message to @stderr@ with -- the provided 'ExceptT'. -ioExceptTWithWarning :: MonadIO m => Text -> ExceptT e m () -> ExceptT e m () +ioExceptTWithWarning :: MonadIO m => Text -> ExceptT e m () -> ExceptT e m () ioExceptTWithWarning :: Text -> ExceptT e m () -> ExceptT e m () -ioExceptTWithWarning Text -warningMsg ExceptT e m () -e = +ioExceptTWithWarning Text +warningMsg ExceptT e m () +e = IO () -> ExceptT e m () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (Handle -> Text -> IO () Text.hPutStrLn Handle stderr Text -warningMsg) ExceptT e m () -> ExceptT e m () -> ExceptT e m () +warningMsg) ExceptT e m () -> ExceptT e m () -> ExceptT e m () forall (m :: * -> *) a b. Monad m => m a -> m b -> m b >> ExceptT e m () -e +e -- | Used in the event that Shelley-related commands are run using the -- now-deprecated \"shelley\" subcommand. -runShelleyClientCommandWithDeprecationWarning - :: MonadIO m - => ExceptT e m () - -> ExceptT e m () +runShelleyClientCommandWithDeprecationWarning + :: MonadIO m + => ExceptT e m () + -> ExceptT e m () runShelleyClientCommandWithDeprecationWarning :: ExceptT e m () -> ExceptT e m () runShelleyClientCommandWithDeprecationWarning = Text -> ExceptT e m () -> ExceptT e m () @@ -190,11 +190,11 @@ MonadIO m => Text -> ExceptT e m () -> ExceptT e m () ioExceptTWithWarning Text -warningMsg +warningMsg where - warningMsg :: Text - warningMsg :: Text -warningMsg = + warningMsg :: Text + warningMsg :: Text +warningMsg = Text "WARNING: The \"shelley\" subcommand is now deprecated and will be " Text -> Text -> Text @@ -221,7 +221,7 @@ mconcat [ Text "cardano-cli ", Version -> Text -renderVersion Version +renderVersion Version version , Text " - ", String -> Text @@ -235,15 +235,15 @@ Text.pack String compilerName, Text "-", Version -> Text -renderVersion Version +renderVersion Version compilerVersion , Text "\ngit rev ", Text gitRev ] where - renderVersion :: Version -> Text -renderVersion = String -> Text + renderVersion :: Version -> Text +renderVersion = String -> Text Text.pack (String -> Text) -> (Version -> String) -> Version -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Commands.html b/cardano-cli/src/Cardano.CLI.Shelley.Commands.html index 36d9024c5ed..0e82e2da023 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Commands.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Commands.html @@ -76,7 +76,7 @@ | GovernanceCmd GovernanceCmd | GenesisCmd GenesisCmd | TextViewCmd TextViewCmd - deriving Int -> ShelleyCommand -> ShowS + deriving Int -> ShelleyCommand -> ShowS [ShelleyCommand] -> ShowS ShelleyCommand -> String (Int -> ShelleyCommand -> ShowS) @@ -95,50 +95,50 @@ renderShelleyCommand :: ShelleyCommand -> Text renderShelleyCommand :: ShelleyCommand -> Text -renderShelleyCommand ShelleyCommand -sc = +renderShelleyCommand ShelleyCommand +sc = case ShelleyCommand -sc of - AddressCmd AddressCmd -cmd -> AddressCmd -> Text +sc of + AddressCmd AddressCmd +cmd -> AddressCmd -> Text renderAddressCmd AddressCmd -cmd - StakeAddressCmd StakeAddressCmd -cmd -> StakeAddressCmd -> Text +cmd + StakeAddressCmd StakeAddressCmd +cmd -> StakeAddressCmd -> Text renderStakeAddressCmd StakeAddressCmd -cmd - KeyCmd KeyCmd -cmd -> KeyCmd -> Text +cmd + KeyCmd KeyCmd +cmd -> KeyCmd -> Text renderKeyCmd KeyCmd -cmd - TransactionCmd TransactionCmd -cmd -> TransactionCmd -> Text +cmd + TransactionCmd TransactionCmd +cmd -> TransactionCmd -> Text renderTransactionCmd TransactionCmd -cmd - NodeCmd NodeCmd -cmd -> NodeCmd -> Text +cmd + NodeCmd NodeCmd +cmd -> NodeCmd -> Text renderNodeCmd NodeCmd -cmd - PoolCmd PoolCmd -cmd -> PoolCmd -> Text +cmd + PoolCmd PoolCmd +cmd -> PoolCmd -> Text renderPoolCmd PoolCmd -cmd - QueryCmd QueryCmd -cmd -> QueryCmd -> Text +cmd + QueryCmd QueryCmd +cmd -> QueryCmd -> Text renderQueryCmd QueryCmd -cmd - GovernanceCmd GovernanceCmd -cmd -> GovernanceCmd -> Text +cmd + GovernanceCmd GovernanceCmd +cmd -> GovernanceCmd -> Text renderGovernanceCmd GovernanceCmd -cmd - GenesisCmd GenesisCmd -cmd -> GenesisCmd -> Text +cmd + GenesisCmd GenesisCmd +cmd -> GenesisCmd -> Text renderGenesisCmd GenesisCmd -cmd - TextViewCmd TextViewCmd -cmd -> TextViewCmd -> Text +cmd + TextViewCmd TextViewCmd +cmd -> TextViewCmd -> Text renderTextViewCmd TextViewCmd -cmd +cmd data AddressCmd = AddressKeyGen AddressKeyType VerificationKeyFile SigningKeyFile @@ -150,7 +150,7 @@ (Maybe OutputFile) | AddressBuildMultiSig ScriptFile NetworkId (Maybe OutputFile) | AddressInfo Text (Maybe OutputFile) - deriving Int -> AddressCmd -> ShowS + deriving Int -> AddressCmd -> ShowS [AddressCmd] -> ShowS AddressCmd -> String (Int -> AddressCmd -> ShowS) @@ -170,10 +170,10 @@ renderAddressCmd :: AddressCmd -> Text renderAddressCmd :: AddressCmd -> Text -renderAddressCmd AddressCmd -cmd = +renderAddressCmd AddressCmd +cmd = case AddressCmd -cmd of +cmd of AddressKeyGen {} -> Text "address key-gen" AddressKeyHash {} -> Text @@ -195,7 +195,7 @@ (VerificationKeyOrHashOrFile StakePoolKey) OutputFile | StakeKeyDeRegistrationCert (VerificationKeyOrFile StakeKey) OutputFile - deriving Int -> StakeAddressCmd -> ShowS + deriving Int -> StakeAddressCmd -> ShowS [StakeAddressCmd] -> ShowS StakeAddressCmd -> String (Int -> StakeAddressCmd -> ShowS) @@ -214,10 +214,10 @@ renderStakeAddressCmd :: StakeAddressCmd -> Text renderStakeAddressCmd :: StakeAddressCmd -> Text -renderStakeAddressCmd StakeAddressCmd -cmd = +renderStakeAddressCmd StakeAddressCmd +cmd = case StakeAddressCmd -cmd of +cmd of StakeAddressKeyGen {} -> Text "stake-address key-gen" StakeAddressKeyHash {} -> Text @@ -240,7 +240,7 @@ | KeyConvertITNExtendedToStakeKey SomeKeyFile OutputFile | KeyConvertITNBip32ToStakeKey SomeKeyFile OutputFile | KeyConvertCardanoAddressSigningKey CardanoAddressKeyType SigningKeyFile OutputFile - deriving Int -> KeyCmd -> ShowS + deriving Int -> KeyCmd -> ShowS [KeyCmd] -> ShowS KeyCmd -> String (Int -> KeyCmd -> ShowS) @@ -257,10 +257,10 @@ renderKeyCmd :: KeyCmd -> Text renderKeyCmd :: KeyCmd -> Text -renderKeyCmd KeyCmd -cmd = +renderKeyCmd KeyCmd +cmd = case KeyCmd -cmd of +cmd of KeyGetVerificationKey {} -> Text "key verification-key" KeyNonExtendedKey {} -> Text @@ -322,7 +322,7 @@ Value | TxGetTxId InputTxFile | TxView InputTxFile - deriving Int -> TransactionCmd -> ShowS + deriving Int -> TransactionCmd -> ShowS [TransactionCmd] -> ShowS TransactionCmd -> String (Int -> TransactionCmd -> ShowS) @@ -340,7 +340,7 @@ Show data InputTxFile = InputTxBodyFile TxBodyFile | InputTxFile TxFile - deriving Int -> InputTxFile -> ShowS + deriving Int -> InputTxFile -> ShowS [InputTxFile] -> ShowS InputTxFile -> String (Int -> InputTxFile -> ShowS) @@ -366,7 +366,7 @@ | ParamsFromFile !ProtocolParamsFile -- ^ Obtain protocol parameters from a file structured by the -- 'cardano-api' 'ProtocolParameters' data type. - deriving Int -> ProtocolParamsSourceSpec -> ShowS + deriving Int -> ProtocolParamsSourceSpec -> ShowS [ProtocolParamsSourceSpec] -> ShowS ProtocolParamsSourceSpec -> String (Int -> ProtocolParamsSourceSpec -> ShowS) @@ -385,10 +385,10 @@ renderTransactionCmd :: TransactionCmd -> Text renderTransactionCmd :: TransactionCmd -> Text -renderTransactionCmd TransactionCmd -cmd = +renderTransactionCmd TransactionCmd +cmd = case TransactionCmd -cmd of +cmd of TxBuildRaw {} -> Text "transaction build-raw" TxSign {} -> Text @@ -418,7 +418,7 @@ | NodeNewCounter ColdVerificationKeyOrFile Word OpCertCounterFile | NodeIssueOpCert (VerificationKeyOrFile KesKey) SigningKeyFile OpCertCounterFile KESPeriod OutputFile - deriving Int -> NodeCmd -> ShowS + deriving Int -> NodeCmd -> ShowS [NodeCmd] -> ShowS NodeCmd -> String (Int -> NodeCmd -> ShowS) @@ -435,10 +435,10 @@ renderNodeCmd :: NodeCmd -> Text renderNodeCmd :: NodeCmd -> Text -renderNodeCmd NodeCmd -cmd = do +renderNodeCmd NodeCmd +cmd = do case NodeCmd -cmd of +cmd of NodeKeyGenCold {} -> Text "node key-gen" NodeKeyGenKES {} -> Text @@ -483,7 +483,7 @@ OutputFile | PoolGetId (VerificationKeyOrFile StakePoolKey) OutputFormat | PoolMetadataHash PoolMetadataFile (Maybe OutputFile) - deriving Int -> PoolCmd -> ShowS + deriving Int -> PoolCmd -> ShowS [PoolCmd] -> ShowS PoolCmd -> String (Int -> PoolCmd -> ShowS) @@ -500,10 +500,10 @@ renderPoolCmd :: PoolCmd -> Text renderPoolCmd :: PoolCmd -> Text -renderPoolCmd PoolCmd -cmd = +renderPoolCmd PoolCmd +cmd = case PoolCmd -cmd of +cmd of PoolRegistrationCert {} -> Text "stake-pool registration-certificate" PoolRetirementCert {} -> Text @@ -523,7 +523,7 @@ | QueryProtocolState' AnyConsensusModeParams NetworkId (Maybe OutputFile) | QueryStakeSnapshot' AnyConsensusModeParams NetworkId (Hash StakePoolKey) | QueryPoolParams' AnyConsensusModeParams NetworkId (Hash StakePoolKey) - deriving Int -> QueryCmd -> ShowS + deriving Int -> QueryCmd -> ShowS [QueryCmd] -> ShowS QueryCmd -> String (Int -> QueryCmd -> ShowS) @@ -540,10 +540,10 @@ renderQueryCmd :: QueryCmd -> Text renderQueryCmd :: QueryCmd -> Text -renderQueryCmd QueryCmd -cmd = +renderQueryCmd QueryCmd +cmd = case QueryCmd -cmd of +cmd of QueryProtocolParameters' {} -> Text "query protocol-parameters " QueryTip {} -> Text @@ -578,7 +578,7 @@ | GovernanceUpdateProposal OutputFile EpochNo [VerificationKeyFile] ProtocolParametersUpdate - deriving Int -> GovernanceCmd -> ShowS + deriving Int -> GovernanceCmd -> ShowS [GovernanceCmd] -> ShowS GovernanceCmd -> String (Int -> GovernanceCmd -> ShowS) @@ -597,10 +597,10 @@ renderGovernanceCmd :: GovernanceCmd -> Text renderGovernanceCmd :: GovernanceCmd -> Text -renderGovernanceCmd GovernanceCmd -cmd = +renderGovernanceCmd GovernanceCmd +cmd = case GovernanceCmd -cmd of +cmd of GovernanceGenesisKeyDelegationCertificate {} -> Text "governance create-genesis-key-delegation-certificate" GovernanceMIRPayStakeAddressesCertificate {} -> Text @@ -620,7 +620,7 @@ data TextViewCmd = TextViewInfo !FilePath (Maybe OutputFile) - deriving Int -> TextViewCmd -> ShowS + deriving Int -> TextViewCmd -> ShowS [TextViewCmd] -> ShowS TextViewCmd -> String (Int -> TextViewCmd -> ShowS) @@ -656,7 +656,7 @@ | GenesisTxIn VerificationKeyFile NetworkId (Maybe OutputFile) | GenesisAddr VerificationKeyFile NetworkId (Maybe OutputFile) | GenesisHashFile GenesisFile - deriving Int -> GenesisCmd -> ShowS + deriving Int -> GenesisCmd -> ShowS [GenesisCmd] -> ShowS GenesisCmd -> String (Int -> GenesisCmd -> ShowS) @@ -675,10 +675,10 @@ renderGenesisCmd :: GenesisCmd -> Text renderGenesisCmd :: GenesisCmd -> Text -renderGenesisCmd GenesisCmd -cmd = +renderGenesisCmd GenesisCmd +cmd = case GenesisCmd -cmd of +cmd of GenesisCreate {} -> Text "genesis create" GenesisCreateStaked {} -> Text @@ -706,7 +706,7 @@ newtype ProtocolParamsFile = ProtocolParamsFile FilePath - deriving (Int -> ProtocolParamsFile -> ShowS + deriving (Int -> ProtocolParamsFile -> ShowS [ProtocolParamsFile] -> ShowS ProtocolParamsFile -> String (Int -> ProtocolParamsFile -> ShowS) @@ -721,7 +721,7 @@ $cshow :: ProtocolParamsFile -> String showsPrec :: Int -> ProtocolParamsFile -> ShowS $cshowsPrec :: Int -> ProtocolParamsFile -> ShowS -Show, ProtocolParamsFile -> ProtocolParamsFile -> Bool +Show, ProtocolParamsFile -> ProtocolParamsFile -> Bool (ProtocolParamsFile -> ProtocolParamsFile -> Bool) -> (ProtocolParamsFile -> ProtocolParamsFile -> Bool) -> Eq ProtocolParamsFile @@ -734,7 +734,7 @@ newtype TxInCount = TxInCount Int - deriving Int -> TxInCount -> ShowS + deriving Int -> TxInCount -> ShowS [TxInCount] -> ShowS TxInCount -> String (Int -> TxInCount -> ShowS) @@ -753,7 +753,7 @@ newtype TxOutCount = TxOutCount Int - deriving Int -> TxOutCount -> ShowS + deriving Int -> TxOutCount -> ShowS [TxOutCount] -> ShowS TxOutCount -> String (Int -> TxOutCount -> ShowS) @@ -772,7 +772,7 @@ newtype TxShelleyWitnessCount = TxShelleyWitnessCount Int - deriving Int -> TxShelleyWitnessCount -> ShowS + deriving Int -> TxShelleyWitnessCount -> ShowS [TxShelleyWitnessCount] -> ShowS TxShelleyWitnessCount -> String (Int -> TxShelleyWitnessCount -> ShowS) @@ -791,7 +791,7 @@ newtype TxByronWitnessCount = TxByronWitnessCount Int - deriving Int -> TxByronWitnessCount -> ShowS + deriving Int -> TxByronWitnessCount -> ShowS [TxByronWitnessCount] -> ShowS TxByronWitnessCount -> String (Int -> TxByronWitnessCount -> ShowS) @@ -810,7 +810,7 @@ newtype BlockId = BlockId String -- Probably not a String - deriving Int -> BlockId -> ShowS + deriving Int -> BlockId -> ShowS [BlockId] -> ShowS BlockId -> String (Int -> BlockId -> ShowS) @@ -827,7 +827,7 @@ newtype GenesisKeyFile = GenesisKeyFile FilePath - deriving Int -> GenesisKeyFile -> ShowS + deriving Int -> GenesisKeyFile -> ShowS [GenesisKeyFile] -> ShowS GenesisKeyFile -> String (Int -> GenesisKeyFile -> ShowS) @@ -847,7 +847,7 @@ data MetadataFile = MetadataFileJSON FilePath | MetadataFileCBOR FilePath - deriving Int -> MetadataFile -> ShowS + deriving Int -> MetadataFile -> ShowS [MetadataFile] -> ShowS MetadataFile -> String (Int -> MetadataFile -> ShowS) @@ -866,7 +866,7 @@ newtype OutputFile = OutputFile FilePath - deriving Int -> OutputFile -> ShowS + deriving Int -> OutputFile -> ShowS [OutputFile] -> ShowS OutputFile -> String (Int -> OutputFile -> ShowS) @@ -885,7 +885,7 @@ newtype PoolId = PoolId String -- Probably not a String - deriving Int -> PoolId -> ShowS + deriving Int -> PoolId -> ShowS [PoolId] -> ShowS PoolId -> String (Int -> PoolId -> ShowS) @@ -903,7 +903,7 @@ newtype PoolMetadataFile = PoolMetadataFile { PoolMetadataFile -> String unPoolMetadataFile :: FilePath } - deriving Int -> PoolMetadataFile -> ShowS + deriving Int -> PoolMetadataFile -> ShowS [PoolMetadataFile] -> ShowS PoolMetadataFile -> String (Int -> PoolMetadataFile -> ShowS) @@ -922,7 +922,7 @@ newtype GenesisDir = GenesisDir FilePath - deriving Int -> GenesisDir -> ShowS + deriving Int -> GenesisDir -> ShowS [GenesisDir] -> ShowS GenesisDir -> String (Int -> GenesisDir -> ShowS) @@ -945,7 +945,7 @@ data SomeKeyFile = AVerificationKeyFile VerificationKeyFile | ASigningKeyFile SigningKeyFile - deriving Int -> SomeKeyFile -> ShowS + deriving Int -> SomeKeyFile -> ShowS [SomeKeyFile] -> ShowS SomeKeyFile -> String (Int -> SomeKeyFile -> ShowS) @@ -966,7 +966,7 @@ = AddressKeyShelley | AddressKeyShelleyExtended | AddressKeyByron - deriving Int -> AddressKeyType -> ShowS + deriving Int -> AddressKeyType -> ShowS [AddressKeyType] -> ShowS AddressKeyType -> String (Int -> AddressKeyType -> ShowS) @@ -987,7 +987,7 @@ = ByronPaymentKey ByronKeyFormat | ByronGenesisKey ByronKeyFormat | ByronDelegateKey ByronKeyFormat - deriving Int -> ByronKeyType -> ShowS + deriving Int -> ByronKeyType -> ShowS [ByronKeyType] -> ShowS ByronKeyType -> String (Int -> ByronKeyType -> ShowS) @@ -1006,7 +1006,7 @@ data ByronKeyFormat = NonLegacyByronKeyFormat | LegacyByronKeyFormat - deriving Int -> ByronKeyFormat -> ShowS + deriving Int -> ByronKeyFormat -> ShowS [ByronKeyFormat] -> ShowS ByronKeyFormat -> String (Int -> ByronKeyFormat -> ShowS) @@ -1029,7 +1029,7 @@ | CardanoAddressShelleyStakeKey | CardanoAddressIcarusPaymentKey | CardanoAddressByronPaymentKey - deriving Int -> CardanoAddressKeyType -> ShowS + deriving Int -> CardanoAddressKeyType -> ShowS [CardanoAddressKeyType] -> ShowS CardanoAddressKeyType -> String (Int -> CardanoAddressKeyType -> ShowS) @@ -1048,7 +1048,7 @@ newtype OpCertCounterFile = OpCertCounterFile FilePath - deriving Int -> OpCertCounterFile -> ShowS + deriving Int -> OpCertCounterFile -> ShowS [OpCertCounterFile] -> ShowS OpCertCounterFile -> String (Int -> OpCertCounterFile -> ShowS) @@ -1067,7 +1067,7 @@ newtype PrivKeyFile = PrivKeyFile FilePath - deriving Int -> PrivKeyFile -> ShowS + deriving Int -> PrivKeyFile -> ShowS [PrivKeyFile] -> ShowS PrivKeyFile -> String (Int -> PrivKeyFile -> ShowS) @@ -1086,7 +1086,7 @@ newtype WitnessFile = WitnessFile FilePath - deriving Int -> WitnessFile -> ShowS + deriving Int -> WitnessFile -> ShowS [WitnessFile] -> ShowS WitnessFile -> String (Int -> WitnessFile -> ShowS) @@ -1105,7 +1105,7 @@ newtype TxBodyFile = TxBodyFile FilePath - deriving Int -> TxBodyFile -> ShowS + deriving Int -> TxBodyFile -> ShowS [TxBodyFile] -> ShowS TxBodyFile -> String (Int -> TxBodyFile -> ShowS) @@ -1124,7 +1124,7 @@ newtype TxFile = TxFile FilePath - deriving Int -> TxFile -> ShowS + deriving Int -> TxFile -> ShowS [TxFile] -> ShowS TxFile -> String (Int -> TxFile -> ShowS) @@ -1142,7 +1142,7 @@ -- | A raw verification key given in Base64, and decoded into a ByteString. newtype VerificationKeyBase64 = VerificationKeyBase64 String - deriving Int -> VerificationKeyBase64 -> ShowS + deriving Int -> VerificationKeyBase64 -> ShowS [VerificationKeyBase64] -> ShowS VerificationKeyBase64 -> String (Int -> VerificationKeyBase64 -> ShowS) @@ -1169,7 +1169,7 @@ -- -- If specified, both the network ID and derivation path are extracted -- from the address and used in the construction of the Byron witness. - deriving Int -> WitnessSigningData -> ShowS + deriving Int -> WitnessSigningData -> ShowS [WitnessSigningData] -> ShowS WitnessSigningData -> String (Int -> WitnessSigningData -> ShowS) @@ -1197,7 +1197,7 @@ = ColdStakePoolVerificationKey !(VerificationKey StakePoolKey) | ColdGenesisDelegateVerificationKey !(VerificationKey GenesisDelegateKey) | ColdVerificationKeyFile !VerificationKeyFile - deriving Int -> ColdVerificationKeyOrFile -> ShowS + deriving Int -> ColdVerificationKeyOrFile -> ShowS [ColdVerificationKeyOrFile] -> ShowS ColdVerificationKeyOrFile -> String (Int -> ColdVerificationKeyOrFile -> ShowS) diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Key.html b/cardano-cli/src/Cardano.CLI.Shelley.Key.html index ec1babc3caa..3bf45b8ae8f 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Key.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Key.html @@ -55,15 +55,15 @@ ------------------------------------------------------------------------------ -- | Input format/encoding. -data InputFormat a where +data InputFormat a where -- | Bech32 encoding. - InputFormatBech32 :: SerialiseAsBech32 a => InputFormat a + InputFormatBech32 :: SerialiseAsBech32 a => InputFormat a -- | Hex/Base16 encoding. - InputFormatHex :: SerialiseAsRawBytes a => InputFormat a + InputFormatHex :: SerialiseAsRawBytes a => InputFormat a -- | Text envelope format. - InputFormatTextEnvelope :: HasTextEnvelope a => InputFormat a + InputFormatTextEnvelope :: HasTextEnvelope a => InputFormat a -- | Input decoding error. data InputDecodeError @@ -76,7 +76,7 @@ | InputInvalidError -- ^ The provided data does not represent a valid value of the provided -- type. - deriving (InputDecodeError -> InputDecodeError -> Bool + deriving (InputDecodeError -> InputDecodeError -> Bool (InputDecodeError -> InputDecodeError -> Bool) -> (InputDecodeError -> InputDecodeError -> Bool) -> Eq InputDecodeError @@ -85,7 +85,7 @@ $c/= :: InputDecodeError -> InputDecodeError -> Bool == :: InputDecodeError -> InputDecodeError -> Bool $c== :: InputDecodeError -> InputDecodeError -> Bool -Eq, Int -> InputDecodeError -> ShowS +Eq, Int -> InputDecodeError -> ShowS [InputDecodeError] -> ShowS InputDecodeError -> String (Int -> InputDecodeError -> ShowS) @@ -103,7 +103,7 @@ Show) instance Error InputDecodeError where - displayError :: InputDecodeError -> String + displayError :: InputDecodeError -> String displayError = Text -> String Text.unpack (Text -> String) -> (InputDecodeError -> Text) -> InputDecodeError -> String @@ -116,24 +116,24 @@ -- | Render an error message for a 'InputDecodeError'. renderInputDecodeError :: InputDecodeError -> Text renderInputDecodeError :: InputDecodeError -> Text -renderInputDecodeError InputDecodeError -err = +renderInputDecodeError InputDecodeError +err = case InputDecodeError -err of - InputTextEnvelopeError TextEnvelopeError -textEnvErr -> +err of + InputTextEnvelopeError TextEnvelopeError +textEnvErr -> String -> Text Text.pack (TextEnvelopeError -> String forall e. Error e => e -> String displayError TextEnvelopeError -textEnvErr) - InputBech32DecodeError Bech32DecodeError -decodeErr -> +textEnvErr) + InputBech32DecodeError Bech32DecodeError +decodeErr -> String -> Text Text.pack (Bech32DecodeError -> String forall e. Error e => e -> String displayError Bech32DecodeError -decodeErr) +decodeErr) InputDecodeError InputInvalidError -> Text "Invalid key." @@ -142,8 +142,8 @@ -- -- Note that this type isn't intended to be exported, but only used as a -- helper within the 'deserialiseInput' function. -data DeserialiseInputResult a - = DeserialiseInputSuccess !a +data DeserialiseInputResult a + = DeserialiseInputSuccess !a -- ^ Input successfully deserialised. | DeserialiseInputError !InputDecodeError -- ^ The provided data is of the expected format/encoding, but an error @@ -155,85 +155,85 @@ -- | Deserialise an input of some type that is formatted in some way. deserialiseInput - :: forall a. - AsType a - -> NonEmpty (InputFormat a) + :: forall a. + AsType a + -> NonEmpty (InputFormat a) -> ByteString - -> Either InputDecodeError a + -> Either InputDecodeError a deserialiseInput :: AsType a -> NonEmpty (InputFormat a) -> ByteString -> Either InputDecodeError a -deserialiseInput AsType a -asType NonEmpty (InputFormat a) -acceptedFormats ByteString -inputBs = +deserialiseInput AsType a +asType NonEmpty (InputFormat a) +acceptedFormats ByteString +inputBs = [InputFormat a] -> Either InputDecodeError a -go (NonEmpty (InputFormat a) -> [InputFormat a] +go (NonEmpty (InputFormat a) -> [InputFormat a] forall a. NonEmpty a -> [a] NE.toList NonEmpty (InputFormat a) -acceptedFormats) +acceptedFormats) where - inputText :: Text - inputText :: Text -inputText = ByteString -> Text + inputText :: Text + inputText :: Text +inputText = ByteString -> Text Text.decodeUtf8 ByteString -inputBs +inputBs - go :: [InputFormat a] -> Either InputDecodeError a - go :: [InputFormat a] -> Either InputDecodeError a -go [] = InputDecodeError -> Either InputDecodeError a + go :: [InputFormat a] -> Either InputDecodeError a + go :: [InputFormat a] -> Either InputDecodeError a +go [] = InputDecodeError -> Either InputDecodeError a forall a b. a -> Either a b Left InputDecodeError InputInvalidError - go (InputFormat a -kf:[InputFormat a] -kfs) = - let res :: DeserialiseInputResult a -res = + go (InputFormat a +kf:[InputFormat a] +kfs) = + let res :: DeserialiseInputResult a +res = case InputFormat a -kf of +kf of InputFormat a InputFormatBech32 -> DeserialiseInputResult a SerialiseAsBech32 a => DeserialiseInputResult a -deserialiseBech32 +deserialiseBech32 InputFormat a InputFormatHex -> DeserialiseInputResult a SerialiseAsRawBytes a => DeserialiseInputResult a -deserialiseHex +deserialiseHex InputFormat a InputFormatTextEnvelope -> DeserialiseInputResult a HasTextEnvelope a => DeserialiseInputResult a -deserialiseTextEnvelope +deserialiseTextEnvelope in case DeserialiseInputResult a -res of - DeserialiseInputSuccess a -a -> a -> Either InputDecodeError a +res of + DeserialiseInputSuccess a +a -> a -> Either InputDecodeError a forall a b. b -> Either a b Right a -a - DeserialiseInputError InputDecodeError -err -> InputDecodeError -> Either InputDecodeError a +a + DeserialiseInputError InputDecodeError +err -> InputDecodeError -> Either InputDecodeError a forall a b. a -> Either a b Left InputDecodeError -err +err DeserialiseInputResult a DeserialiseInputErrorFormatMismatch -> [InputFormat a] -> Either InputDecodeError a -go [InputFormat a] -kfs +go [InputFormat a] +kfs - deserialiseTextEnvelope :: HasTextEnvelope a => DeserialiseInputResult a - deserialiseTextEnvelope :: DeserialiseInputResult a -deserialiseTextEnvelope = do - let textEnvRes :: Either TextEnvelopeError a - textEnvRes :: Either TextEnvelopeError a -textEnvRes = + deserialiseTextEnvelope :: HasTextEnvelope a => DeserialiseInputResult a + deserialiseTextEnvelope :: DeserialiseInputResult a +deserialiseTextEnvelope = do + let textEnvRes :: Either TextEnvelopeError a + textEnvRes :: Either TextEnvelopeError a +textEnvRes = AsType a -> TextEnvelope -> Either TextEnvelopeError a forall a. HasTextEnvelope a => AsType a -> TextEnvelope -> Either TextEnvelopeError a deserialiseFromTextEnvelope AsType a -asType +asType (TextEnvelope -> Either TextEnvelopeError a) -> Either TextEnvelopeError TextEnvelope -> Either TextEnvelopeError a @@ -248,24 +248,24 @@ TextEnvelopeAesonDecodeError (ByteString -> Either String TextEnvelope forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecodeStrict' ByteString -inputBs) +inputBs) case Either TextEnvelopeError a -textEnvRes of - Right a -res -> a -> DeserialiseInputResult a +textEnvRes of + Right a +res -> a -> DeserialiseInputResult a forall a. a -> DeserialiseInputResult a DeserialiseInputSuccess a -res +res -- The input was valid a text envelope, but there was a type mismatch -- error. - Left err :: TextEnvelopeError -err@TextEnvelopeTypeError{} -> + Left err :: TextEnvelopeError +err@TextEnvelopeTypeError{} -> InputDecodeError -> DeserialiseInputResult a forall a. InputDecodeError -> DeserialiseInputResult a DeserialiseInputError (TextEnvelopeError -> InputDecodeError InputTextEnvelopeError TextEnvelopeError -err) +err) -- The input was not valid a text envelope. Left TextEnvelopeError @@ -273,21 +273,21 @@ forall a. DeserialiseInputResult a DeserialiseInputErrorFormatMismatch - deserialiseBech32 :: SerialiseAsBech32 a => DeserialiseInputResult a - deserialiseBech32 :: DeserialiseInputResult a -deserialiseBech32 = + deserialiseBech32 :: SerialiseAsBech32 a => DeserialiseInputResult a + deserialiseBech32 :: DeserialiseInputResult a +deserialiseBech32 = case AsType a -> Text -> Either Bech32DecodeError a forall a. SerialiseAsBech32 a => AsType a -> Text -> Either Bech32DecodeError a deserialiseFromBech32 AsType a -asType Text -inputText of - Right a -res -> a -> DeserialiseInputResult a +asType Text +inputText of + Right a +res -> a -> DeserialiseInputResult a forall a. a -> DeserialiseInputResult a DeserialiseInputSuccess a -res +res -- The input was not valid Bech32. Left (Bech32DecodingError DecodingError @@ -296,22 +296,22 @@ DeserialiseInputErrorFormatMismatch -- The input was valid Bech32, but some other error occurred. - Left Bech32DecodeError -err -> InputDecodeError -> DeserialiseInputResult a + Left Bech32DecodeError +err -> InputDecodeError -> DeserialiseInputResult a forall a. InputDecodeError -> DeserialiseInputResult a DeserialiseInputError (InputDecodeError -> DeserialiseInputResult a) -> InputDecodeError -> DeserialiseInputResult a forall a b. (a -> b) -> a -> b $ Bech32DecodeError -> InputDecodeError InputBech32DecodeError Bech32DecodeError -err +err - deserialiseHex :: SerialiseAsRawBytes a => DeserialiseInputResult a - deserialiseHex :: DeserialiseInputResult a -deserialiseHex + deserialiseHex :: SerialiseAsRawBytes a => DeserialiseInputResult a + deserialiseHex :: DeserialiseInputResult a +deserialiseHex | ByteString -> Bool -isValidHex ByteString -inputBs = +isValidHex ByteString +inputBs = DeserialiseInputResult a -> (a -> DeserialiseInputResult a) -> Maybe a @@ -330,38 +330,38 @@ SerialiseAsRawBytes a => AsType a -> ByteString -> Maybe a deserialiseFromRawBytesHex AsType a -asType ByteString -inputBs) +asType ByteString +inputBs) | Bool otherwise = DeserialiseInputResult a forall a. DeserialiseInputResult a DeserialiseInputErrorFormatMismatch - isValidHex :: ByteString -> Bool - isValidHex :: ByteString -> Bool -isValidHex ByteString -x = + isValidHex :: ByteString -> Bool + isValidHex :: ByteString -> Bool +isValidHex ByteString +x = (Char -> Bool) -> String -> Bool forall (t :: * -> *) a. Foldable t => (a -> Bool) -> t a -> Bool all (Char -> String -> Bool forall (t :: * -> *) a. (Foldable t, Eq a) => a -> t a -> Bool `elem` String -hexAlpha) (Char -> Char +hexAlpha) (Char -> Char toLower (Char -> Char) -> ShowS forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> ByteString -> String BSC.unpack ByteString -x) +x) Bool -> Bool -> Bool && Int -> Bool forall a. Integral a => a -> Bool even (ByteString -> Int BSC.length ByteString -x) +x) where - hexAlpha :: [Char] - hexAlpha :: String -hexAlpha = String + hexAlpha :: [Char] + hexAlpha :: String +hexAlpha = String "0123456789abcdef" -- | Deserialise an input of some type that is formatted in some way. @@ -369,80 +369,80 @@ -- The provided 'ByteString' can either be Bech32-encoded or in the text -- envelope format. deserialiseInputAnyOf - :: forall b. - [FromSomeType SerialiseAsBech32 b] - -> [FromSomeType HasTextEnvelope b] + :: forall b. + [FromSomeType SerialiseAsBech32 b] + -> [FromSomeType HasTextEnvelope b] -> ByteString - -> Either InputDecodeError b + -> Either InputDecodeError b deserialiseInputAnyOf :: [FromSomeType SerialiseAsBech32 b] -> [FromSomeType HasTextEnvelope b] -> ByteString -> Either InputDecodeError b -deserialiseInputAnyOf [FromSomeType SerialiseAsBech32 b] -bech32Types [FromSomeType HasTextEnvelope b] -textEnvTypes ByteString -inputBs = +deserialiseInputAnyOf [FromSomeType SerialiseAsBech32 b] +bech32Types [FromSomeType HasTextEnvelope b] +textEnvTypes ByteString +inputBs = case DeserialiseInputResult b -deserialiseBech32 DeserialiseInputResult b +deserialiseBech32 DeserialiseInputResult b -> DeserialiseInputResult b -> DeserialiseInputResult b -`orTry` DeserialiseInputResult b -deserialiseTextEnvelope of - DeserialiseInputSuccess b -res -> b -> Either InputDecodeError b +`orTry` DeserialiseInputResult b +deserialiseTextEnvelope of + DeserialiseInputSuccess b +res -> b -> Either InputDecodeError b forall a b. b -> Either a b Right b -res - DeserialiseInputError InputDecodeError -err -> InputDecodeError -> Either InputDecodeError b +res + DeserialiseInputError InputDecodeError +err -> InputDecodeError -> Either InputDecodeError b forall a b. a -> Either a b Left InputDecodeError -err +err DeserialiseInputResult b DeserialiseInputErrorFormatMismatch -> InputDecodeError -> Either InputDecodeError b forall a b. a -> Either a b Left InputDecodeError InputInvalidError where - inputText :: Text - inputText :: Text -inputText = ByteString -> Text + inputText :: Text + inputText :: Text +inputText = ByteString -> Text Text.decodeUtf8 ByteString -inputBs +inputBs - orTry - :: DeserialiseInputResult b - -> DeserialiseInputResult b - -> DeserialiseInputResult b - orTry :: DeserialiseInputResult b + orTry + :: DeserialiseInputResult b + -> DeserialiseInputResult b + -> DeserialiseInputResult b + orTry :: DeserialiseInputResult b -> DeserialiseInputResult b -> DeserialiseInputResult b -orTry DeserialiseInputResult b -x DeserialiseInputResult b -y = +orTry DeserialiseInputResult b +x DeserialiseInputResult b +y = case DeserialiseInputResult b -x of +x of DeserialiseInputSuccess b _ -> DeserialiseInputResult b -x +x DeserialiseInputError InputDecodeError _ -> DeserialiseInputResult b -x +x DeserialiseInputResult b DeserialiseInputErrorFormatMismatch -> DeserialiseInputResult b -y +y - deserialiseTextEnvelope :: DeserialiseInputResult b - deserialiseTextEnvelope :: DeserialiseInputResult b -deserialiseTextEnvelope = do - let textEnvRes :: Either TextEnvelopeError b - textEnvRes :: Either TextEnvelopeError b -textEnvRes = + deserialiseTextEnvelope :: DeserialiseInputResult b + deserialiseTextEnvelope :: DeserialiseInputResult b +deserialiseTextEnvelope = do + let textEnvRes :: Either TextEnvelopeError b + textEnvRes :: Either TextEnvelopeError b +textEnvRes = [FromSomeType HasTextEnvelope b] -> TextEnvelope -> Either TextEnvelopeError b forall b. [FromSomeType HasTextEnvelope b] -> TextEnvelope -> Either TextEnvelopeError b deserialiseFromTextEnvelopeAnyOf [FromSomeType HasTextEnvelope b] -textEnvTypes +textEnvTypes (TextEnvelope -> Either TextEnvelopeError b) -> Either TextEnvelopeError TextEnvelope -> Either TextEnvelopeError b @@ -457,24 +457,24 @@ TextEnvelopeAesonDecodeError (ByteString -> Either String TextEnvelope forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecodeStrict' ByteString -inputBs) +inputBs) case Either TextEnvelopeError b -textEnvRes of - Right b -res -> b -> DeserialiseInputResult b +textEnvRes of + Right b +res -> b -> DeserialiseInputResult b forall a. a -> DeserialiseInputResult a DeserialiseInputSuccess b -res +res -- The input was valid a text envelope, but there was a type mismatch -- error. - Left err :: TextEnvelopeError -err@TextEnvelopeTypeError{} -> + Left err :: TextEnvelopeError +err@TextEnvelopeTypeError{} -> InputDecodeError -> DeserialiseInputResult b forall a. InputDecodeError -> DeserialiseInputResult a DeserialiseInputError (TextEnvelopeError -> InputDecodeError InputTextEnvelopeError TextEnvelopeError -err) +err) -- The input was not valid a text envelope. Left TextEnvelopeError @@ -482,22 +482,22 @@ forall a. DeserialiseInputResult a DeserialiseInputErrorFormatMismatch - deserialiseBech32 :: DeserialiseInputResult b - deserialiseBech32 :: DeserialiseInputResult b -deserialiseBech32 = + deserialiseBech32 :: DeserialiseInputResult b + deserialiseBech32 :: DeserialiseInputResult b +deserialiseBech32 = case [FromSomeType SerialiseAsBech32 b] -> Text -> Either Bech32DecodeError b forall b. [FromSomeType SerialiseAsBech32 b] -> Text -> Either Bech32DecodeError b deserialiseAnyOfFromBech32 [FromSomeType SerialiseAsBech32 b] -bech32Types Text -inputText of - Right b -res -> b -> DeserialiseInputResult b +bech32Types Text +inputText of + Right b +res -> b -> DeserialiseInputResult b forall a. a -> DeserialiseInputResult a DeserialiseInputSuccess b -res +res -- The input was not valid Bech32. Left (Bech32DecodingError DecodingError @@ -506,15 +506,15 @@ DeserialiseInputErrorFormatMismatch -- The input was valid Bech32, but some other error occurred. - Left Bech32DecodeError -err -> InputDecodeError -> DeserialiseInputResult b + Left Bech32DecodeError +err -> InputDecodeError -> DeserialiseInputResult b forall a. InputDecodeError -> DeserialiseInputResult a DeserialiseInputError (InputDecodeError -> DeserialiseInputResult b) -> InputDecodeError -> DeserialiseInputResult b forall a b. (a -> b) -> a -> b $ Bech32DecodeError -> InputDecodeError InputBech32DecodeError Bech32DecodeError -err +err ------------------------------------------------------------------------------ -- Cryptographic key deserialisation @@ -524,19 +524,19 @@ -- -- The contents of the file can either be Bech32-encoded, hex-encoded, or in -- the text envelope format. -readKeyFile - :: AsType a - -> NonEmpty (InputFormat a) +readKeyFile + :: AsType a + -> NonEmpty (InputFormat a) -> FilePath - -> IO (Either (FileError InputDecodeError) a) + -> IO (Either (FileError InputDecodeError) a) readKeyFile :: AsType a -> NonEmpty (InputFormat a) -> String -> IO (Either (FileError InputDecodeError) a) -readKeyFile AsType a -asType NonEmpty (InputFormat a) -acceptedFormats String -path = +readKeyFile AsType a +asType NonEmpty (InputFormat a) +acceptedFormats String +path = ExceptT (FileError InputDecodeError) IO a -> IO (Either (FileError InputDecodeError) a) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) @@ -546,8 +546,8 @@ -> IO (Either (FileError InputDecodeError) a) forall a b. (a -> b) -> a -> b $ do - ByteString -content <- (IOException -> FileError InputDecodeError) + ByteString +content <- (IOException -> FileError InputDecodeError) -> IO ByteString -> ExceptT (FileError InputDecodeError) IO ByteString forall (m :: * -> *) x a. @@ -556,14 +556,14 @@ handleIOExceptT (String -> IOException -> FileError InputDecodeError forall e. String -> IOException -> FileError e FileIOError String -path) (IO ByteString +path) (IO ByteString -> ExceptT (FileError InputDecodeError) IO ByteString) -> IO ByteString -> ExceptT (FileError InputDecodeError) IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -path +path (InputDecodeError -> FileError InputDecodeError) -> ExceptT InputDecodeError IO a -> ExceptT (FileError InputDecodeError) IO a @@ -573,7 +573,7 @@ firstExceptT (String -> InputDecodeError -> FileError InputDecodeError forall e. String -> e -> FileError e FileError String -path) (ExceptT InputDecodeError IO a +path) (ExceptT InputDecodeError IO a -> ExceptT (FileError InputDecodeError) IO a) -> ExceptT InputDecodeError IO a -> ExceptT (FileError InputDecodeError) IO a @@ -594,22 +594,22 @@ -> ByteString -> Either InputDecodeError a deserialiseInput AsType a -asType NonEmpty (InputFormat a) -acceptedFormats ByteString -content +asType NonEmpty (InputFormat a) +acceptedFormats ByteString +content -- | Read a cryptographic key from a file. -- -- The contents of the file must be in the text envelope format. -readKeyFileTextEnvelope - :: HasTextEnvelope a - => AsType a +readKeyFileTextEnvelope + :: HasTextEnvelope a + => AsType a -> FilePath - -> IO (Either (FileError InputDecodeError) a) + -> IO (Either (FileError InputDecodeError) a) readKeyFileTextEnvelope :: AsType a -> String -> IO (Either (FileError InputDecodeError) a) -readKeyFileTextEnvelope AsType a -asType String -fp = +readKeyFileTextEnvelope AsType a +asType String +fp = (FileError TextEnvelopeError -> FileError InputDecodeError) -> Either (FileError TextEnvelopeError) a -> Either (FileError InputDecodeError) a @@ -617,7 +617,7 @@ Bifunctor p => (a -> b) -> p a c -> p b c first FileError TextEnvelopeError -> FileError InputDecodeError -toInputDecodeError (Either (FileError TextEnvelopeError) a +toInputDecodeError (Either (FileError TextEnvelopeError) a -> Either (FileError InputDecodeError) a) -> IO (Either (FileError TextEnvelopeError) a) -> IO (Either (FileError InputDecodeError) a) @@ -627,43 +627,43 @@ HasTextEnvelope a => AsType a -> String -> IO (Either (FileError TextEnvelopeError) a) readFileTextEnvelope AsType a -asType String -fp +asType String +fp where - toInputDecodeError + toInputDecodeError :: FileError TextEnvelopeError -> FileError InputDecodeError - toInputDecodeError :: FileError TextEnvelopeError -> FileError InputDecodeError -toInputDecodeError FileError TextEnvelopeError -err = + toInputDecodeError :: FileError TextEnvelopeError -> FileError InputDecodeError +toInputDecodeError FileError TextEnvelopeError +err = case FileError TextEnvelopeError -err of - FileIOError String -path IOException -ex -> String -> IOException -> FileError InputDecodeError +err of + FileIOError String +path IOException +ex -> String -> IOException -> FileError InputDecodeError forall e. String -> IOException -> FileError e FileIOError String -path IOException -ex - FileError String -path TextEnvelopeError -textEnvErr -> +path IOException +ex + FileError String +path TextEnvelopeError +textEnvErr -> String -> InputDecodeError -> FileError InputDecodeError forall e. String -> e -> FileError e FileError String -path (TextEnvelopeError -> InputDecodeError +path (TextEnvelopeError -> InputDecodeError InputTextEnvelopeError TextEnvelopeError -textEnvErr) - FileErrorTempFile String -targetP String -tempP Handle -h -> +textEnvErr) + FileErrorTempFile String +targetP String +tempP Handle +h -> String -> String -> Handle -> FileError InputDecodeError forall e. String -> String -> Handle -> FileError e FileErrorTempFile String -targetP String -tempP Handle -h +targetP String +tempP Handle +h -- | Read a cryptographic key from a file given that it is one of the provided -- types. @@ -671,19 +671,19 @@ -- The contents of the file can either be Bech32-encoded or in the text -- envelope format. readKeyFileAnyOf - :: forall b. - [FromSomeType SerialiseAsBech32 b] - -> [FromSomeType HasTextEnvelope b] + :: forall b. + [FromSomeType SerialiseAsBech32 b] + -> [FromSomeType HasTextEnvelope b] -> FilePath - -> IO (Either (FileError InputDecodeError) b) + -> IO (Either (FileError InputDecodeError) b) readKeyFileAnyOf :: [FromSomeType SerialiseAsBech32 b] -> [FromSomeType HasTextEnvelope b] -> String -> IO (Either (FileError InputDecodeError) b) -readKeyFileAnyOf [FromSomeType SerialiseAsBech32 b] -bech32Types [FromSomeType HasTextEnvelope b] -textEnvTypes String -path = +readKeyFileAnyOf [FromSomeType SerialiseAsBech32 b] +bech32Types [FromSomeType HasTextEnvelope b] +textEnvTypes String +path = ExceptT (FileError InputDecodeError) IO b -> IO (Either (FileError InputDecodeError) b) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) @@ -693,8 +693,8 @@ -> IO (Either (FileError InputDecodeError) b) forall a b. (a -> b) -> a -> b $ do - ByteString -content <- (IOException -> FileError InputDecodeError) + ByteString +content <- (IOException -> FileError InputDecodeError) -> IO ByteString -> ExceptT (FileError InputDecodeError) IO ByteString forall (m :: * -> *) x a. @@ -703,14 +703,14 @@ handleIOExceptT (String -> IOException -> FileError InputDecodeError forall e. String -> IOException -> FileError e FileIOError String -path) (IO ByteString +path) (IO ByteString -> ExceptT (FileError InputDecodeError) IO ByteString) -> IO ByteString -> ExceptT (FileError InputDecodeError) IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -path +path (InputDecodeError -> FileError InputDecodeError) -> ExceptT InputDecodeError IO b -> ExceptT (FileError InputDecodeError) IO b @@ -720,7 +720,7 @@ firstExceptT (String -> InputDecodeError -> FileError InputDecodeError forall e. String -> e -> FileError e FileError String -path) (ExceptT InputDecodeError IO b +path) (ExceptT InputDecodeError IO b -> ExceptT (FileError InputDecodeError) IO b) -> ExceptT InputDecodeError IO b -> ExceptT (FileError InputDecodeError) IO b @@ -741,9 +741,9 @@ -> ByteString -> Either InputDecodeError b deserialiseInputAnyOf [FromSomeType SerialiseAsBech32 b] -bech32Types [FromSomeType HasTextEnvelope b] -textEnvTypes ByteString -content +bech32Types [FromSomeType HasTextEnvelope b] +textEnvTypes ByteString +content ------------------------------------------------------------------------------ -- Signing key deserialisation @@ -754,19 +754,19 @@ -- The contents of the file can either be Bech32-encoded, hex-encoded, or in -- the text envelope format. readSigningKeyFile - :: forall keyrole. - ( HasTextEnvelope (SigningKey keyrole) - , SerialiseAsBech32 (SigningKey keyrole) + :: forall keyrole. + ( HasTextEnvelope (SigningKey keyrole) + , SerialiseAsBech32 (SigningKey keyrole) ) - => AsType keyrole + => AsType keyrole -> SigningKeyFile - -> IO (Either (FileError InputDecodeError) (SigningKey keyrole)) + -> IO (Either (FileError InputDecodeError) (SigningKey keyrole)) readSigningKeyFile :: AsType keyrole -> SigningKeyFile -> IO (Either (FileError InputDecodeError) (SigningKey keyrole)) -readSigningKeyFile AsType keyrole -asType (SigningKeyFile String -fp) = +readSigningKeyFile AsType keyrole +asType (SigningKeyFile String +fp) = AsType (SigningKey keyrole) -> NonEmpty (InputFormat (SigningKey keyrole)) -> String @@ -780,7 +780,7 @@ (AsType keyrole -> AsType (SigningKey keyrole) forall a. AsType a -> AsType (SigningKey a) AsSigningKey AsType keyrole -asType) +asType) ([InputFormat (SigningKey keyrole)] -> NonEmpty (InputFormat (SigningKey keyrole)) forall a. [a] -> NonEmpty a @@ -792,7 +792,7 @@ forall a. HasTextEnvelope a => InputFormat a InputFormatTextEnvelope]) String -fp +fp -- | Read a signing key from a file given that it is one of the provided types -- of signing key. @@ -800,19 +800,19 @@ -- The contents of the file can either be Bech32-encoded or in the text -- envelope format. readSigningKeyFileAnyOf - :: forall b. - [FromSomeType SerialiseAsBech32 b] - -> [FromSomeType HasTextEnvelope b] + :: forall b. + [FromSomeType SerialiseAsBech32 b] + -> [FromSomeType HasTextEnvelope b] -> SigningKeyFile - -> IO (Either (FileError InputDecodeError) b) + -> IO (Either (FileError InputDecodeError) b) readSigningKeyFileAnyOf :: [FromSomeType SerialiseAsBech32 b] -> [FromSomeType HasTextEnvelope b] -> SigningKeyFile -> IO (Either (FileError InputDecodeError) b) -readSigningKeyFileAnyOf [FromSomeType SerialiseAsBech32 b] -bech32Types [FromSomeType HasTextEnvelope b] -textEnvTypes (SigningKeyFile String -fp) = +readSigningKeyFileAnyOf [FromSomeType SerialiseAsBech32 b] +bech32Types [FromSomeType HasTextEnvelope b] +textEnvTypes (SigningKeyFile String +fp) = [FromSomeType SerialiseAsBech32 b] -> [FromSomeType HasTextEnvelope b] -> String @@ -823,52 +823,52 @@ -> String -> IO (Either (FileError InputDecodeError) b) readKeyFileAnyOf [FromSomeType SerialiseAsBech32 b] -bech32Types [FromSomeType HasTextEnvelope b] -textEnvTypes String -fp +bech32Types [FromSomeType HasTextEnvelope b] +textEnvTypes String +fp ------------------------------------------------------------------------------ -- Verification key deserialisation ------------------------------------------------------------------------------ -- | Either a verification key or path to a verification key file. -data VerificationKeyOrFile keyrole - = VerificationKeyValue !(VerificationKey keyrole) +data VerificationKeyOrFile keyrole + = VerificationKeyValue !(VerificationKey keyrole) -- ^ A verification key. | VerificationKeyFilePath !VerificationKeyFile -- ^ A path to a verification key file. -- Note that this file hasn't been validated at all (whether it exists, -- contains a key of the correct type, etc.) -deriving instance Show (VerificationKey keyrole) - => Show (VerificationKeyOrFile keyrole) +deriving instance Show (VerificationKey keyrole) + => Show (VerificationKeyOrFile keyrole) -deriving instance Eq (VerificationKey keyrole) - => Eq (VerificationKeyOrFile keyrole) +deriving instance Eq (VerificationKey keyrole) + => Eq (VerificationKeyOrFile keyrole) -- | Read a verification key or verification key file and return a -- verification key. -- -- If a filepath is provided, the file can either be formatted as Bech32, hex, -- or text envelope. -readVerificationKeyOrFile - :: ( HasTextEnvelope (VerificationKey keyrole) - , SerialiseAsBech32 (VerificationKey keyrole) +readVerificationKeyOrFile + :: ( HasTextEnvelope (VerificationKey keyrole) + , SerialiseAsBech32 (VerificationKey keyrole) ) - => AsType keyrole - -> VerificationKeyOrFile keyrole - -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) + => AsType keyrole + -> VerificationKeyOrFile keyrole + -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile :: AsType keyrole -> VerificationKeyOrFile keyrole -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) -readVerificationKeyOrFile AsType keyrole -asType VerificationKeyOrFile keyrole -verKeyOrFile = +readVerificationKeyOrFile AsType keyrole +asType VerificationKeyOrFile keyrole +verKeyOrFile = case VerificationKeyOrFile keyrole -verKeyOrFile of - VerificationKeyValue VerificationKey keyrole -vk -> Either (FileError InputDecodeError) (VerificationKey keyrole) +verKeyOrFile of + VerificationKeyValue VerificationKey keyrole +vk -> Either (FileError InputDecodeError) (VerificationKey keyrole) -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) forall (f :: * -> *) a. Applicative f => a -> f a @@ -876,9 +876,9 @@ -> Either (FileError InputDecodeError) (VerificationKey keyrole) forall a b. b -> Either a b Right VerificationKey keyrole -vk) - VerificationKeyFilePath (VerificationKeyFile String -fp) -> +vk) + VerificationKeyFilePath (VerificationKeyFile String +fp) -> AsType (VerificationKey keyrole) -> NonEmpty (InputFormat (VerificationKey keyrole)) -> String @@ -893,7 +893,7 @@ (AsType keyrole -> AsType (VerificationKey keyrole) forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey AsType keyrole -asType) +asType) ([InputFormat (VerificationKey keyrole)] -> NonEmpty (InputFormat (VerificationKey keyrole)) forall a. [a] -> NonEmpty a @@ -905,29 +905,29 @@ forall a. HasTextEnvelope a => InputFormat a InputFormatTextEnvelope]) String -fp +fp -- | Read a verification key or verification key file and return a -- verification key. -- -- If a filepath is provided, it will be interpreted as a text envelope -- formatted file. -readVerificationKeyOrTextEnvFile - :: HasTextEnvelope (VerificationKey keyrole) - => AsType keyrole - -> VerificationKeyOrFile keyrole - -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) +readVerificationKeyOrTextEnvFile + :: HasTextEnvelope (VerificationKey keyrole) + => AsType keyrole + -> VerificationKeyOrFile keyrole + -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrTextEnvFile :: AsType keyrole -> VerificationKeyOrFile keyrole -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) -readVerificationKeyOrTextEnvFile AsType keyrole -asType VerificationKeyOrFile keyrole -verKeyOrFile = +readVerificationKeyOrTextEnvFile AsType keyrole +asType VerificationKeyOrFile keyrole +verKeyOrFile = case VerificationKeyOrFile keyrole -verKeyOrFile of - VerificationKeyValue VerificationKey keyrole -vk -> Either (FileError InputDecodeError) (VerificationKey keyrole) +verKeyOrFile of + VerificationKeyValue VerificationKey keyrole +vk -> Either (FileError InputDecodeError) (VerificationKey keyrole) -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) forall (f :: * -> *) a. Applicative f => a -> f a @@ -935,9 +935,9 @@ -> Either (FileError InputDecodeError) (VerificationKey keyrole) forall a b. b -> Either a b Right VerificationKey keyrole -vk) - VerificationKeyFilePath (VerificationKeyFile String -fp) -> +vk) + VerificationKeyFilePath (VerificationKeyFile String +fp) -> AsType (VerificationKey keyrole) -> String -> IO @@ -948,13 +948,13 @@ readKeyFileTextEnvelope (AsType keyrole -> AsType (VerificationKey keyrole) forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey AsType keyrole -asType) String -fp +asType) String +fp data PaymentVerifier = PaymentVerifierKey VerificationKeyTextOrFile | PaymentVerifierScriptFile ScriptFile - deriving (PaymentVerifier -> PaymentVerifier -> Bool + deriving (PaymentVerifier -> PaymentVerifier -> Bool (PaymentVerifier -> PaymentVerifier -> Bool) -> (PaymentVerifier -> PaymentVerifier -> Bool) -> Eq PaymentVerifier @@ -963,7 +963,7 @@ $c/= :: PaymentVerifier -> PaymentVerifier -> Bool == :: PaymentVerifier -> PaymentVerifier -> Bool $c== :: PaymentVerifier -> PaymentVerifier -> Bool -Eq, Int -> PaymentVerifier -> ShowS +Eq, Int -> PaymentVerifier -> ShowS [PaymentVerifier] -> ShowS PaymentVerifier -> String (Int -> PaymentVerifier -> ShowS) @@ -983,7 +983,7 @@ data StakeVerifier = StakeVerifierKey (VerificationKeyOrFile StakeKey) | StakeVerifierScriptFile ScriptFile - deriving (StakeVerifier -> StakeVerifier -> Bool + deriving (StakeVerifier -> StakeVerifier -> Bool (StakeVerifier -> StakeVerifier -> Bool) -> (StakeVerifier -> StakeVerifier -> Bool) -> Eq StakeVerifier forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -991,7 +991,7 @@ $c/= :: StakeVerifier -> StakeVerifier -> Bool == :: StakeVerifier -> StakeVerifier -> Bool $c== :: StakeVerifier -> StakeVerifier -> Bool -Eq, Int -> StakeVerifier -> ShowS +Eq, Int -> StakeVerifier -> ShowS [StakeVerifier] -> ShowS StakeVerifier -> String (Int -> StakeVerifier -> ShowS) @@ -1013,7 +1013,7 @@ data VerificationKeyTextOrFile = VktofVerificationKeyText !Text | VktofVerificationKeyFile !VerificationKeyFile - deriving (VerificationKeyTextOrFile -> VerificationKeyTextOrFile -> Bool + deriving (VerificationKeyTextOrFile -> VerificationKeyTextOrFile -> Bool (VerificationKeyTextOrFile -> VerificationKeyTextOrFile -> Bool) -> (VerificationKeyTextOrFile -> VerificationKeyTextOrFile -> Bool) -> Eq VerificationKeyTextOrFile @@ -1022,7 +1022,7 @@ $c/= :: VerificationKeyTextOrFile -> VerificationKeyTextOrFile -> Bool == :: VerificationKeyTextOrFile -> VerificationKeyTextOrFile -> Bool $c== :: VerificationKeyTextOrFile -> VerificationKeyTextOrFile -> Bool -Eq, Int -> VerificationKeyTextOrFile -> ShowS +Eq, Int -> VerificationKeyTextOrFile -> ShowS [VerificationKeyTextOrFile] -> ShowS VerificationKeyTextOrFile -> String (Int -> VerificationKeyTextOrFile -> ShowS) @@ -1044,7 +1044,7 @@ data VerificationKeyTextOrFileError = VerificationKeyTextError !InputDecodeError | VerificationKeyFileError !(FileError InputDecodeError) - deriving Int -> VerificationKeyTextOrFileError -> ShowS + deriving Int -> VerificationKeyTextOrFileError -> ShowS [VerificationKeyTextOrFileError] -> ShowS VerificationKeyTextOrFileError -> String (Int -> VerificationKeyTextOrFileError -> ShowS) @@ -1064,20 +1064,20 @@ -- | Render an error message for a 'VerificationKeyTextOrFileError'. renderVerificationKeyTextOrFileError :: VerificationKeyTextOrFileError -> Text renderVerificationKeyTextOrFileError :: VerificationKeyTextOrFileError -> Text -renderVerificationKeyTextOrFileError VerificationKeyTextOrFileError -vkTextOrFileErr = +renderVerificationKeyTextOrFileError VerificationKeyTextOrFileError +vkTextOrFileErr = case VerificationKeyTextOrFileError -vkTextOrFileErr of - VerificationKeyTextError InputDecodeError -err -> InputDecodeError -> Text +vkTextOrFileErr of + VerificationKeyTextError InputDecodeError +err -> InputDecodeError -> Text renderInputDecodeError InputDecodeError -err - VerificationKeyFileError FileError InputDecodeError -err -> String -> Text +err + VerificationKeyFileError FileError InputDecodeError +err -> String -> Text Text.pack (FileError InputDecodeError -> String forall e. Error e => e -> String displayError FileError InputDecodeError -err) +err) -- | Deserialise a verification key from text or a verification key file given -- that it is one of the provided types. @@ -1085,23 +1085,23 @@ -- If a filepath is provided, the file can either be formatted as Bech32, hex, -- or text envelope. readVerificationKeyTextOrFileAnyOf - :: forall b. - [FromSomeType SerialiseAsBech32 b] - -> [FromSomeType HasTextEnvelope b] + :: forall b. + [FromSomeType SerialiseAsBech32 b] + -> [FromSomeType HasTextEnvelope b] -> VerificationKeyTextOrFile - -> IO (Either VerificationKeyTextOrFileError b) + -> IO (Either VerificationKeyTextOrFileError b) readVerificationKeyTextOrFileAnyOf :: [FromSomeType SerialiseAsBech32 b] -> [FromSomeType HasTextEnvelope b] -> VerificationKeyTextOrFile -> IO (Either VerificationKeyTextOrFileError b) -readVerificationKeyTextOrFileAnyOf [FromSomeType SerialiseAsBech32 b] -bech32Types [FromSomeType HasTextEnvelope b] -textEnvTypes VerificationKeyTextOrFile -verKeyTextOrFile = +readVerificationKeyTextOrFileAnyOf [FromSomeType SerialiseAsBech32 b] +bech32Types [FromSomeType HasTextEnvelope b] +textEnvTypes VerificationKeyTextOrFile +verKeyTextOrFile = case VerificationKeyTextOrFile -verKeyTextOrFile of - VktofVerificationKeyText Text -vkText -> +verKeyTextOrFile of + VktofVerificationKeyText Text +vkText -> Either VerificationKeyTextOrFileError b -> IO (Either VerificationKeyTextOrFileError b) forall (f :: * -> *) a. Applicative f => a -> f a @@ -1133,12 +1133,12 @@ -> ByteString -> Either InputDecodeError b deserialiseInputAnyOf [FromSomeType SerialiseAsBech32 b] -bech32Types [FromSomeType HasTextEnvelope b] -textEnvTypes (Text -> ByteString +bech32Types [FromSomeType HasTextEnvelope b] +textEnvTypes (Text -> ByteString Text.encodeUtf8 Text -vkText) - VktofVerificationKeyFile (VerificationKeyFile String -fp) -> +vkText) + VktofVerificationKeyFile (VerificationKeyFile String +fp) -> (FileError InputDecodeError -> VerificationKeyTextOrFileError) -> Either (FileError InputDecodeError) b -> Either VerificationKeyTextOrFileError b @@ -1162,46 +1162,46 @@ -> String -> IO (Either (FileError InputDecodeError) b) readKeyFileAnyOf [FromSomeType SerialiseAsBech32 b] -bech32Types [FromSomeType HasTextEnvelope b] -textEnvTypes String -fp +bech32Types [FromSomeType HasTextEnvelope b] +textEnvTypes String +fp -- | Verification key, verification key hash, or path to a verification key -- file. -data VerificationKeyOrHashOrFile keyrole - = VerificationKeyOrFile !(VerificationKeyOrFile keyrole) +data VerificationKeyOrHashOrFile keyrole + = VerificationKeyOrFile !(VerificationKeyOrFile keyrole) -- ^ Either a verification key or path to a verification key file. - | VerificationKeyHash !(Hash keyrole) + | VerificationKeyHash !(Hash keyrole) -- ^ A verification key hash. -deriving instance (Show (VerificationKeyOrFile keyrole), Show (Hash keyrole)) - => Show (VerificationKeyOrHashOrFile keyrole) +deriving instance (Show (VerificationKeyOrFile keyrole), Show (Hash keyrole)) + => Show (VerificationKeyOrHashOrFile keyrole) -deriving instance (Eq (VerificationKeyOrFile keyrole), Eq (Hash keyrole)) - => Eq (VerificationKeyOrHashOrFile keyrole) +deriving instance (Eq (VerificationKeyOrFile keyrole), Eq (Hash keyrole)) + => Eq (VerificationKeyOrHashOrFile keyrole) -- | Read a verification key or verification key hash or verification key file -- and return a verification key hash. -- -- If a filepath is provided, the file can either be formatted as Bech32, hex, -- or text envelope. -readVerificationKeyOrHashOrFile - :: (Key keyrole, SerialiseAsBech32 (VerificationKey keyrole)) - => AsType keyrole - -> VerificationKeyOrHashOrFile keyrole - -> IO (Either (FileError InputDecodeError) (Hash keyrole)) +readVerificationKeyOrHashOrFile + :: (Key keyrole, SerialiseAsBech32 (VerificationKey keyrole)) + => AsType keyrole + -> VerificationKeyOrHashOrFile keyrole + -> IO (Either (FileError InputDecodeError) (Hash keyrole)) readVerificationKeyOrHashOrFile :: AsType keyrole -> VerificationKeyOrHashOrFile keyrole -> IO (Either (FileError InputDecodeError) (Hash keyrole)) -readVerificationKeyOrHashOrFile AsType keyrole -asType VerificationKeyOrHashOrFile keyrole -verKeyOrHashOrFile = +readVerificationKeyOrHashOrFile AsType keyrole +asType VerificationKeyOrHashOrFile keyrole +verKeyOrHashOrFile = case VerificationKeyOrHashOrFile keyrole -verKeyOrHashOrFile of - VerificationKeyOrFile VerificationKeyOrFile keyrole -vkOrFile -> do - Either (FileError InputDecodeError) (VerificationKey keyrole) -eitherVk <- AsType keyrole +verKeyOrHashOrFile of + VerificationKeyOrFile VerificationKeyOrFile keyrole +vkOrFile -> do + Either (FileError InputDecodeError) (VerificationKey keyrole) +eitherVk <- AsType keyrole -> VerificationKeyOrFile keyrole -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) @@ -1213,8 +1213,8 @@ -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType keyrole -asType VerificationKeyOrFile keyrole -vkOrFile +asType VerificationKeyOrFile keyrole +vkOrFile Either (FileError InputDecodeError) (Hash keyrole) -> IO (Either (FileError InputDecodeError) (Hash keyrole)) forall (f :: * -> *) a. Applicative f => a -> f a @@ -1227,38 +1227,38 @@ -> Either (FileError InputDecodeError) (Hash keyrole) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Either (FileError InputDecodeError) (VerificationKey keyrole) -eitherVk) - VerificationKeyHash Hash keyrole -vkHash -> Either (FileError InputDecodeError) (Hash keyrole) +eitherVk) + VerificationKeyHash Hash keyrole +vkHash -> Either (FileError InputDecodeError) (Hash keyrole) -> IO (Either (FileError InputDecodeError) (Hash keyrole)) forall (f :: * -> *) a. Applicative f => a -> f a pure (Hash keyrole -> Either (FileError InputDecodeError) (Hash keyrole) forall a b. b -> Either a b Right Hash keyrole -vkHash) +vkHash) -- | Read a verification key or verification key hash or verification key file -- and return a verification key hash. -- -- If a filepath is provided, it will be interpreted as a text envelope -- formatted file. -readVerificationKeyOrHashOrTextEnvFile - :: Key keyrole - => AsType keyrole - -> VerificationKeyOrHashOrFile keyrole - -> IO (Either (FileError InputDecodeError) (Hash keyrole)) +readVerificationKeyOrHashOrTextEnvFile + :: Key keyrole + => AsType keyrole + -> VerificationKeyOrHashOrFile keyrole + -> IO (Either (FileError InputDecodeError) (Hash keyrole)) readVerificationKeyOrHashOrTextEnvFile :: AsType keyrole -> VerificationKeyOrHashOrFile keyrole -> IO (Either (FileError InputDecodeError) (Hash keyrole)) -readVerificationKeyOrHashOrTextEnvFile AsType keyrole -asType VerificationKeyOrHashOrFile keyrole -verKeyOrHashOrFile = +readVerificationKeyOrHashOrTextEnvFile AsType keyrole +asType VerificationKeyOrHashOrFile keyrole +verKeyOrHashOrFile = case VerificationKeyOrHashOrFile keyrole -verKeyOrHashOrFile of - VerificationKeyOrFile VerificationKeyOrFile keyrole -vkOrFile -> do - Either (FileError InputDecodeError) (VerificationKey keyrole) -eitherVk <- AsType keyrole +verKeyOrHashOrFile of + VerificationKeyOrFile VerificationKeyOrFile keyrole +vkOrFile -> do + Either (FileError InputDecodeError) (VerificationKey keyrole) +eitherVk <- AsType keyrole -> VerificationKeyOrFile keyrole -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) @@ -1269,8 +1269,8 @@ -> IO (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrTextEnvFile AsType keyrole -asType VerificationKeyOrFile keyrole -vkOrFile +asType VerificationKeyOrFile keyrole +vkOrFile Either (FileError InputDecodeError) (Hash keyrole) -> IO (Either (FileError InputDecodeError) (Hash keyrole)) forall (f :: * -> *) a. Applicative f => a -> f a @@ -1283,13 +1283,13 @@ -> Either (FileError InputDecodeError) (Hash keyrole) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Either (FileError InputDecodeError) (VerificationKey keyrole) -eitherVk) - VerificationKeyHash Hash keyrole -vkHash -> Either (FileError InputDecodeError) (Hash keyrole) +eitherVk) + VerificationKeyHash Hash keyrole +vkHash -> Either (FileError InputDecodeError) (Hash keyrole) -> IO (Either (FileError InputDecodeError) (Hash keyrole)) forall (f :: * -> *) a. Applicative f => a -> f a pure (Hash keyrole -> Either (FileError InputDecodeError) (Hash keyrole) forall a b. b -> Either a b Right Hash keyrole -vkHash) +vkHash) \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Orphans.html b/cardano-cli/src/Cardano.CLI.Shelley.Orphans.html index ac5de3f2592..5d20c9996be 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Orphans.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Orphans.html @@ -45,8 +45,8 @@ import qualified Cardano.Ledger.Mary.Value as Ledger.Mary -instance ToJSON (OneEraHash xs) where - toJSON :: OneEraHash xs -> Value +instance ToJSON (OneEraHash xs) where + toJSON :: OneEraHash xs -> Value toJSON = Text -> Value forall a. ToJSON a => a -> Value toJSON @@ -82,73 +82,73 @@ forall k (xs :: [k]). OneEraHash xs -> ShortByteString getOneEraHash -deriving newtype instance ToJSON ByronHash +deriving newtype instance ToJSON ByronHash -- This instance is temporarily duplicated in cardano-config -instance ToJSON (HeaderHash blk) => ToJSON (Tip blk) where - toJSON :: Tip blk -> Value -toJSON Tip blk +instance ToJSON (HeaderHash blk) => ToJSON (Tip blk) where + toJSON :: Tip blk -> Value +toJSON Tip blk TipGenesis = [Pair] -> Value object [ Text "genesis" Text -> Bool -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Bool True ] - toJSON (Tip SlotNo -slotNo HeaderHash blk -headerHash BlockNo -blockNo) = + toJSON (Tip SlotNo +slotNo HeaderHash blk +headerHash BlockNo +blockNo) = [Pair] -> Value object [ Text "slotNo" Text -> SlotNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slotNo +slotNo , Text "headerHash" Text -> HeaderHash blk -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= HeaderHash blk -headerHash +headerHash , Text "blockNo" Text -> BlockNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= BlockNo -blockNo +blockNo ] -- This instance is temporarily duplicated in cardano-config -deriving newtype instance ToJSON BlockNo +deriving newtype instance ToJSON BlockNo -- -- Simple newtype wrappers JSON conversion -- -deriving newtype instance ToJSON (TxId era) +deriving newtype instance ToJSON (TxId era) -deriving newtype instance ToJSON (ShelleyHash era) -deriving newtype instance ToJSON (HashHeader era) +deriving newtype instance ToJSON (ShelleyHash era) +deriving newtype instance ToJSON (HashHeader era) -deriving newtype instance ToJSON (AuxiliaryDataHash StandardCrypto) -deriving newtype instance ToJSON Ledger.LogWeight -deriving newtype instance ToJSON (Ledger.PoolDistr StandardCrypto) +deriving newtype instance ToJSON (AuxiliaryDataHash StandardCrypto) +deriving newtype instance ToJSON Ledger.LogWeight +deriving newtype instance ToJSON (Ledger.PoolDistr StandardCrypto) -deriving newtype instance ToJSON (Ledger.Stake StandardCrypto) +deriving newtype instance ToJSON (Ledger.Stake StandardCrypto) -deriving instance ToJSON (Ledger.StakeReference StandardCrypto) +deriving instance ToJSON (Ledger.StakeReference StandardCrypto) -deriving instance ToJSON (Ledger.PrtclState StandardCrypto) -deriving instance ToJSON Ledger.TicknState -deriving instance ToJSON (Ledger.ChainDepState StandardCrypto) +deriving instance ToJSON (Ledger.PrtclState StandardCrypto) +deriving instance ToJSON Ledger.TicknState +deriving instance ToJSON (Ledger.ChainDepState StandardCrypto) -deriving instance ToJSONKey Ledger.Ptr +deriving instance ToJSONKey Ledger.Ptr -deriving newtype instance ToJSON (Ledger.Mary.PolicyID StandardCrypto) +deriving newtype instance ToJSON (Ledger.Mary.PolicyID StandardCrypto) -instance (ToJSONKey k, ToJSON v) => ToJSON (SetAlgebra.BiMap v k v) where - toJSON :: BiMap v k v -> Value -toJSON = Map k v -> Value +instance (ToJSONKey k, ToJSON v) => ToJSON (SetAlgebra.BiMap v k v) where + toJSON :: BiMap v k v -> Value +toJSON = Map k v -> Value forall a. ToJSON a => a -> Value toJSON (Map k v -> Value) -> (BiMap v k v -> Map k v) -> BiMap v k v -> Value diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Parsers.html b/cardano-cli/src/Cardano.CLI.Shelley.Parsers.html index 83a2fedf448..b6e59709bb5 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Parsers.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Parsers.html @@ -412,7 +412,7 @@ (Parser AddressCmd -> InfoMod AddressCmd -> ParserInfo AddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser AddressCmd -pAddressKeyGen (InfoMod AddressCmd -> ParserInfo AddressCmd) +pAddressKeyGen (InfoMod AddressCmd -> ParserInfo AddressCmd) -> InfoMod AddressCmd -> ParserInfo AddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod AddressCmd @@ -426,7 +426,7 @@ (Parser AddressCmd -> InfoMod AddressCmd -> ParserInfo AddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser AddressCmd -pAddressKeyHash (InfoMod AddressCmd -> ParserInfo AddressCmd) +pAddressKeyHash (InfoMod AddressCmd -> ParserInfo AddressCmd) -> InfoMod AddressCmd -> ParserInfo AddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod AddressCmd @@ -440,7 +440,7 @@ (Parser AddressCmd -> InfoMod AddressCmd -> ParserInfo AddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser AddressCmd -pAddressBuild (InfoMod AddressCmd -> ParserInfo AddressCmd) +pAddressBuild (InfoMod AddressCmd -> ParserInfo AddressCmd) -> InfoMod AddressCmd -> ParserInfo AddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod AddressCmd @@ -454,7 +454,7 @@ (Parser AddressCmd -> InfoMod AddressCmd -> ParserInfo AddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser AddressCmd -pAddressBuildScript (InfoMod AddressCmd -> ParserInfo AddressCmd) +pAddressBuildScript (InfoMod AddressCmd -> ParserInfo AddressCmd) -> InfoMod AddressCmd -> ParserInfo AddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod AddressCmd @@ -468,7 +468,7 @@ (Parser AddressCmd -> InfoMod AddressCmd -> ParserInfo AddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser AddressCmd -pAddressInfo (InfoMod AddressCmd -> ParserInfo AddressCmd) +pAddressInfo (InfoMod AddressCmd -> ParserInfo AddressCmd) -> InfoMod AddressCmd -> ParserInfo AddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod AddressCmd @@ -477,9 +477,9 @@ "Print information about an address.") ] where - pAddressKeyGen :: Parser AddressCmd - pAddressKeyGen :: Parser AddressCmd -pAddressKeyGen = AddressKeyType + pAddressKeyGen :: Parser AddressCmd + pAddressKeyGen :: Parser AddressCmd +pAddressKeyGen = AddressKeyType -> VerificationKeyFile -> SigningKeyFile -> AddressCmd AddressKeyGen (AddressKeyType -> VerificationKeyFile -> SigningKeyFile -> AddressCmd) @@ -502,9 +502,9 @@ pSigningKeyFile FileDirection Output - pAddressKeyHash :: Parser AddressCmd - pAddressKeyHash :: Parser AddressCmd -pAddressKeyHash = + pAddressKeyHash :: Parser AddressCmd + pAddressKeyHash :: Parser AddressCmd +pAddressKeyHash = VerificationKeyTextOrFile -> Maybe OutputFile -> AddressCmd AddressKeyHash (VerificationKeyTextOrFile -> Maybe OutputFile -> AddressCmd) @@ -519,9 +519,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pAddressBuild :: Parser AddressCmd - pAddressBuild :: Parser AddressCmd -pAddressBuild = PaymentVerifier + pAddressBuild :: Parser AddressCmd + pAddressBuild :: Parser AddressCmd +pAddressBuild = PaymentVerifier -> Maybe StakeVerifier -> NetworkId -> Maybe OutputFile @@ -560,9 +560,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pAddressBuildScript :: Parser AddressCmd - pAddressBuildScript :: Parser AddressCmd -pAddressBuildScript = ScriptFile -> NetworkId -> Maybe OutputFile -> AddressCmd + pAddressBuildScript :: Parser AddressCmd + pAddressBuildScript :: Parser AddressCmd +pAddressBuildScript = ScriptFile -> NetworkId -> Maybe OutputFile -> AddressCmd AddressBuildMultiSig (ScriptFile -> NetworkId -> Maybe OutputFile -> AddressCmd) -> Parser ScriptFile @@ -581,9 +581,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pAddressInfo :: Parser AddressCmd - pAddressInfo :: Parser AddressCmd -pAddressInfo = Text -> Maybe OutputFile -> AddressCmd + pAddressInfo :: Parser AddressCmd + pAddressInfo :: Parser AddressCmd +pAddressInfo = Text -> Maybe OutputFile -> AddressCmd AddressInfo (Text -> Maybe OutputFile -> AddressCmd) -> Parser Text -> Parser (Maybe OutputFile -> AddressCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -752,9 +752,9 @@ pScriptFor :: String -> String -> Parser ScriptFile pScriptFor :: String -> String -> Parser ScriptFile -pScriptFor String -name String -help = String -> ScriptFile +pScriptFor String +name String +help = String -> ScriptFile ScriptFile (String -> ScriptFile) -> Parser String -> Parser ScriptFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Mod OptionFields String -> Parser String @@ -763,7 +763,7 @@ ( String -> Mod OptionFields String forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String -name +name Mod OptionFields String -> Mod OptionFields String -> Mod OptionFields String forall a. Semigroup a => a -> a -> a @@ -777,7 +777,7 @@ <> String -> Mod OptionFields String forall (f :: * -> *) a. String -> Mod f a Opt.help String -help +help Mod OptionFields String -> Mod OptionFields String -> Mod OptionFields String forall a. Semigroup a => a -> a -> a @@ -788,22 +788,22 @@ "file") ) -pScriptWitnessFiles :: forall witctx. - WitCtx witctx +pScriptWitnessFiles :: forall witctx. + WitCtx witctx -> String -> String - -> Parser (ScriptWitnessFiles witctx) + -> Parser (ScriptWitnessFiles witctx) pScriptWitnessFiles :: WitCtx witctx -> String -> String -> Parser (ScriptWitnessFiles witctx) -pScriptWitnessFiles WitCtx witctx -witctx String -scriptFlagPrefix String -help = +pScriptWitnessFiles WitCtx witctx +witctx String +scriptFlagPrefix String +help = ScriptFile -> Maybe (ScriptDatumOrFile witctx, ScriptRedeemerOrFile, ExecutionUnits) -> ScriptWitnessFiles witctx -toScriptWitnessFiles +toScriptWitnessFiles (ScriptFile -> Maybe (ScriptDatumOrFile witctx, ScriptRedeemerOrFile, ExecutionUnits) @@ -816,7 +816,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> String -> Parser ScriptFile pScriptFor (String -scriptFlagPrefix String -> String -> String +scriptFlagPrefix String -> String -> String forall a. [a] -> [a] -> [a] ++ String "-script-file") @@ -824,7 +824,7 @@ "The file containing the script to witness " String -> String -> String forall a. [a] -> [a] -> [a] ++ String -help) +help) Parser (Maybe (ScriptDatumOrFile witctx, ScriptRedeemerOrFile, ExecutionUnits) @@ -853,7 +853,7 @@ ExecutionUnits)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser (ScriptDatumOrFile witctx) -pScriptDatumOrFile +pScriptDatumOrFile Parser (ScriptRedeemerOrFile -> ExecutionUnits @@ -866,7 +866,7 @@ ExecutionUnits)) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser ScriptRedeemerOrFile -pScriptRedeemerOrFile +pScriptRedeemerOrFile Parser (ExecutionUnits -> (ScriptDatumOrFile witctx, ScriptRedeemerOrFile, @@ -876,29 +876,29 @@ (ScriptDatumOrFile witctx, ScriptRedeemerOrFile, ExecutionUnits) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser ExecutionUnits -pExecutionUnits) +pExecutionUnits) where - toScriptWitnessFiles :: ScriptFile - -> Maybe (ScriptDatumOrFile witctx, + toScriptWitnessFiles :: ScriptFile + -> Maybe (ScriptDatumOrFile witctx, ScriptRedeemerOrFile, ExecutionUnits) - -> ScriptWitnessFiles witctx - toScriptWitnessFiles :: ScriptFile + -> ScriptWitnessFiles witctx + toScriptWitnessFiles :: ScriptFile -> Maybe (ScriptDatumOrFile witctx, ScriptRedeemerOrFile, ExecutionUnits) -> ScriptWitnessFiles witctx -toScriptWitnessFiles ScriptFile -sf Maybe +toScriptWitnessFiles ScriptFile +sf Maybe (ScriptDatumOrFile witctx, ScriptRedeemerOrFile, ExecutionUnits) Nothing = ScriptFile -> ScriptWitnessFiles witctx forall witctx. ScriptFile -> ScriptWitnessFiles witctx SimpleScriptWitnessFile ScriptFile -sf - toScriptWitnessFiles ScriptFile -sf (Just (ScriptDatumOrFile witctx -d,ScriptRedeemerOrFile -r,ExecutionUnits -e)) = ScriptFile +sf + toScriptWitnessFiles ScriptFile +sf (Just (ScriptDatumOrFile witctx +d,ScriptRedeemerOrFile +r,ExecutionUnits +e)) = ScriptFile -> ScriptDatumOrFile witctx -> ScriptRedeemerOrFile -> ExecutionUnits @@ -910,16 +910,16 @@ -> ExecutionUnits -> ScriptWitnessFiles witctx PlutusScriptWitnessFiles ScriptFile -sf ScriptDatumOrFile witctx -d ScriptRedeemerOrFile -r ExecutionUnits -e +sf ScriptDatumOrFile witctx +d ScriptRedeemerOrFile +r ExecutionUnits +e - pScriptDatumOrFile :: Parser (ScriptDatumOrFile witctx) - pScriptDatumOrFile :: Parser (ScriptDatumOrFile witctx) -pScriptDatumOrFile = + pScriptDatumOrFile :: Parser (ScriptDatumOrFile witctx) + pScriptDatumOrFile :: Parser (ScriptDatumOrFile witctx) +pScriptDatumOrFile = case WitCtx witctx -witctx of +witctx of WitCtx witctx WitCtxTxIn -> ScriptRedeemerOrFile -> ScriptDatumOrFile WitCtxTxIn ScriptDatumOrFileForTxIn (ScriptRedeemerOrFile -> ScriptDatumOrFile WitCtxTxIn) @@ -927,7 +927,7 @@ -> Parser (ScriptDatumOrFile WitCtxTxIn) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> Parser ScriptRedeemerOrFile -pScriptDataOrFile String +pScriptDataOrFile String "datum" WitCtx witctx WitCtxMint -> ScriptDatumOrFile WitCtxMint @@ -942,24 +942,24 @@ pure ScriptDatumOrFile WitCtxStake NoScriptDatumOrFileForStake - pScriptRedeemerOrFile :: Parser ScriptDataOrFile - pScriptRedeemerOrFile :: Parser ScriptRedeemerOrFile -pScriptRedeemerOrFile = String -> Parser ScriptRedeemerOrFile -pScriptDataOrFile String + pScriptRedeemerOrFile :: Parser ScriptDataOrFile + pScriptRedeemerOrFile :: Parser ScriptRedeemerOrFile +pScriptRedeemerOrFile = String -> Parser ScriptRedeemerOrFile +pScriptDataOrFile String "redeemer" - pScriptDataOrFile :: String -> Parser ScriptDataOrFile - pScriptDataOrFile :: String -> Parser ScriptRedeemerOrFile -pScriptDataOrFile String -dataFlagPrefix = + pScriptDataOrFile :: String -> Parser ScriptDataOrFile + pScriptDataOrFile :: String -> Parser ScriptRedeemerOrFile +pScriptDataOrFile String +dataFlagPrefix = String -> ScriptRedeemerOrFile ScriptDataFile (String -> ScriptRedeemerOrFile) -> Parser String -> Parser ScriptRedeemerOrFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> Parser String forall s. IsString s => String -> Parser s -pScriptDataFile String -dataFlagPrefix +pScriptDataFile String +dataFlagPrefix Parser ScriptRedeemerOrFile -> Parser ScriptRedeemerOrFile -> Parser ScriptRedeemerOrFile forall (f :: * -> *) a. Alternative f => f a -> f a -> f a @@ -968,19 +968,19 @@ -> Parser ScriptData -> Parser ScriptRedeemerOrFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> Parser ScriptData -pScriptDataValue String -dataFlagPrefix +pScriptDataValue String +dataFlagPrefix - pScriptDataFile :: String -> Parser s -pScriptDataFile String -dataFlagPrefix = + pScriptDataFile :: String -> Parser s +pScriptDataFile String +dataFlagPrefix = Mod OptionFields s -> Parser s forall s. IsString s => Mod OptionFields s -> Parser s Opt.strOption ( String -> Mod OptionFields s forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long (String -dataFlagPrefix String -> String -> String +dataFlagPrefix String -> String -> String forall a. [a] -> [a] -> [a] ++ String "-file") @@ -999,24 +999,24 @@ String -> String -> String forall a. [a] -> [a] -> [a] ++ String -dataFlagPrefix String -> String -> String +dataFlagPrefix String -> String -> String forall a. [a] -> [a] -> [a] ++ String ".") ) - pScriptDataValue :: String -> Parser ScriptData -pScriptDataValue String -dataFlagPrefix = + pScriptDataValue :: String -> Parser ScriptData +pScriptDataValue String +dataFlagPrefix = ReadM ScriptData -> Mod OptionFields ScriptData -> Parser ScriptData forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM ScriptData -readerScriptData +readerScriptData ( String -> Mod OptionFields ScriptData forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long (String -dataFlagPrefix String -> String -> String +dataFlagPrefix String -> String -> String forall a. [a] -> [a] -> [a] ++ String "-value") @@ -1036,16 +1036,16 @@ "The value for the script input " String -> String -> String forall a. [a] -> [a] -> [a] ++ String -dataFlagPrefix String -> String -> String +dataFlagPrefix String -> String -> String forall a. [a] -> [a] -> [a] ++ String ".") ) - readerScriptData :: ReadM ScriptData -readerScriptData = do - Value -v <- Parser Value -> ReadM Value + readerScriptData :: ReadM ScriptData +readerScriptData = do + Value +v <- Parser Value -> ReadM Value forall a. Parser a -> ReadM a readerFromAttoParser Parser Value Aeson.Parser.json @@ -1053,22 +1053,22 @@ -> Value -> Either ScriptDataJsonError ScriptData scriptDataFromJson ScriptDataJsonSchema ScriptDataJsonNoSchema Value -v of - Left ScriptDataJsonError -err -> String -> ReadM ScriptData +v of + Left ScriptDataJsonError +err -> String -> ReadM ScriptData forall (m :: * -> *) a. MonadFail m => String -> m a fail (ScriptDataJsonError -> String forall e. Error e => e -> String displayError ScriptDataJsonError -err) - Right ScriptData -sd -> ScriptData -> ReadM ScriptData +err) + Right ScriptData +sd -> ScriptData -> ReadM ScriptData forall (m :: * -> *) a. Monad m => a -> m a return ScriptData -sd +sd - pExecutionUnits :: Parser ExecutionUnits -pExecutionUnits = + pExecutionUnits :: Parser ExecutionUnits +pExecutionUnits = (Word64 -> Word64 -> ExecutionUnits) -> (Word64, Word64) -> ExecutionUnits forall a b c. (a -> b -> c) -> (a, b) -> c @@ -1121,7 +1121,7 @@ -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser StakeAddressCmd -pStakeAddressKeyGen (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) +pStakeAddressKeyGen (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod StakeAddressCmd @@ -1136,7 +1136,7 @@ -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser StakeAddressCmd -pStakeAddressBuild (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) +pStakeAddressBuild (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod StakeAddressCmd @@ -1151,7 +1151,7 @@ -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser StakeAddressCmd -pStakeAddressKeyHash (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) +pStakeAddressKeyHash (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod StakeAddressCmd @@ -1166,7 +1166,7 @@ -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser StakeAddressCmd -pStakeAddressRegistrationCert (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) +pStakeAddressRegistrationCert (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod StakeAddressCmd @@ -1181,7 +1181,7 @@ -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser StakeAddressCmd -pStakeAddressDeregistrationCert (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) +pStakeAddressDeregistrationCert (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod StakeAddressCmd @@ -1196,7 +1196,7 @@ -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser StakeAddressCmd -pStakeAddressDelegationCert (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) +pStakeAddressDelegationCert (InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd) -> InfoMod StakeAddressCmd -> ParserInfo StakeAddressCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod StakeAddressCmd @@ -1205,9 +1205,9 @@ "Create a stake address delegation certificate") ] where - pStakeAddressKeyGen :: Parser StakeAddressCmd - pStakeAddressKeyGen :: Parser StakeAddressCmd -pStakeAddressKeyGen = VerificationKeyFile -> SigningKeyFile -> StakeAddressCmd + pStakeAddressKeyGen :: Parser StakeAddressCmd + pStakeAddressKeyGen :: Parser StakeAddressCmd +pStakeAddressKeyGen = VerificationKeyFile -> SigningKeyFile -> StakeAddressCmd StakeAddressKeyGen (VerificationKeyFile -> SigningKeyFile -> StakeAddressCmd) -> Parser VerificationKeyFile @@ -1223,9 +1223,9 @@ pSigningKeyFile FileDirection Output - pStakeAddressKeyHash :: Parser StakeAddressCmd - pStakeAddressKeyHash :: Parser StakeAddressCmd -pStakeAddressKeyHash = VerificationKeyOrFile StakeKey + pStakeAddressKeyHash :: Parser StakeAddressCmd + pStakeAddressKeyHash :: Parser StakeAddressCmd +pStakeAddressKeyHash = VerificationKeyOrFile StakeKey -> Maybe OutputFile -> StakeAddressCmd StakeAddressKeyHash (VerificationKeyOrFile StakeKey -> Maybe OutputFile -> StakeAddressCmd) @@ -1239,9 +1239,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pStakeAddressBuild :: Parser StakeAddressCmd - pStakeAddressBuild :: Parser StakeAddressCmd -pStakeAddressBuild = VerificationKeyOrFile StakeKey + pStakeAddressBuild :: Parser StakeAddressCmd + pStakeAddressBuild :: Parser StakeAddressCmd +pStakeAddressBuild = VerificationKeyOrFile StakeKey -> NetworkId -> Maybe OutputFile -> StakeAddressCmd StakeAddressBuild (VerificationKeyOrFile StakeKey -> NetworkId -> Maybe OutputFile -> StakeAddressCmd) @@ -1261,9 +1261,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pStakeAddressRegistrationCert :: Parser StakeAddressCmd - pStakeAddressRegistrationCert :: Parser StakeAddressCmd -pStakeAddressRegistrationCert = VerificationKeyOrFile StakeKey -> OutputFile -> StakeAddressCmd + pStakeAddressRegistrationCert :: Parser StakeAddressCmd + pStakeAddressRegistrationCert :: Parser StakeAddressCmd +pStakeAddressRegistrationCert = VerificationKeyOrFile StakeKey -> OutputFile -> StakeAddressCmd StakeKeyRegistrationCert (VerificationKeyOrFile StakeKey -> OutputFile -> StakeAddressCmd) -> Parser (VerificationKeyOrFile StakeKey) @@ -1277,9 +1277,9 @@ <*> Parser OutputFile pOutputFile - pStakeAddressDeregistrationCert :: Parser StakeAddressCmd - pStakeAddressDeregistrationCert :: Parser StakeAddressCmd -pStakeAddressDeregistrationCert = VerificationKeyOrFile StakeKey -> OutputFile -> StakeAddressCmd + pStakeAddressDeregistrationCert :: Parser StakeAddressCmd + pStakeAddressDeregistrationCert :: Parser StakeAddressCmd +pStakeAddressDeregistrationCert = VerificationKeyOrFile StakeKey -> OutputFile -> StakeAddressCmd StakeKeyDeRegistrationCert (VerificationKeyOrFile StakeKey -> OutputFile -> StakeAddressCmd) -> Parser (VerificationKeyOrFile StakeKey) @@ -1293,9 +1293,9 @@ <*> Parser OutputFile pOutputFile - pStakeAddressDelegationCert :: Parser StakeAddressCmd - pStakeAddressDelegationCert :: Parser StakeAddressCmd -pStakeAddressDelegationCert = VerificationKeyOrFile StakeKey + pStakeAddressDelegationCert :: Parser StakeAddressCmd + pStakeAddressDelegationCert :: Parser StakeAddressCmd +pStakeAddressDelegationCert = VerificationKeyOrFile StakeKey -> VerificationKeyOrHashOrFile StakePoolKey -> OutputFile -> StakeAddressCmd @@ -1343,7 +1343,7 @@ Parser KeyCmd -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser KeyCmd -pKeyGetVerificationKey (InfoMod KeyCmd -> ParserInfo KeyCmd) +pKeyGetVerificationKey (InfoMod KeyCmd -> ParserInfo KeyCmd) -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a b. (a -> b) -> a -> b $ @@ -1367,7 +1367,7 @@ Parser KeyCmd -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser KeyCmd -pKeyNonExtendedKey (InfoMod KeyCmd -> ParserInfo KeyCmd) +pKeyNonExtendedKey (InfoMod KeyCmd -> ParserInfo KeyCmd) -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a b. (a -> b) -> a -> b $ @@ -1395,7 +1395,7 @@ Parser KeyCmd -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser KeyCmd -pKeyConvertByronKey (InfoMod KeyCmd -> ParserInfo KeyCmd) +pKeyConvertByronKey (InfoMod KeyCmd -> ParserInfo KeyCmd) -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a b. (a -> b) -> a -> b $ @@ -1423,7 +1423,7 @@ Parser KeyCmd -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser KeyCmd -pKeyConvertByronGenesisVKey (InfoMod KeyCmd -> ParserInfo KeyCmd) +pKeyConvertByronGenesisVKey (InfoMod KeyCmd -> ParserInfo KeyCmd) -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a b. (a -> b) -> a -> b $ @@ -1451,7 +1451,7 @@ Parser KeyCmd -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser KeyCmd -pKeyConvertITNKey (InfoMod KeyCmd -> ParserInfo KeyCmd) +pKeyConvertITNKey (InfoMod KeyCmd -> ParserInfo KeyCmd) -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a b. (a -> b) -> a -> b $ @@ -1479,7 +1479,7 @@ Parser KeyCmd -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser KeyCmd -pKeyConvertITNExtendedKey (InfoMod KeyCmd -> ParserInfo KeyCmd) +pKeyConvertITNExtendedKey (InfoMod KeyCmd -> ParserInfo KeyCmd) -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a b. (a -> b) -> a -> b $ @@ -1507,7 +1507,7 @@ Parser KeyCmd -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser KeyCmd -pKeyConvertITNBip32Key (InfoMod KeyCmd -> ParserInfo KeyCmd) +pKeyConvertITNBip32Key (InfoMod KeyCmd -> ParserInfo KeyCmd) -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a b. (a -> b) -> a -> b $ @@ -1535,7 +1535,7 @@ Parser KeyCmd -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser KeyCmd -pKeyConvertCardanoAddressSigningKey (InfoMod KeyCmd -> ParserInfo KeyCmd) +pKeyConvertCardanoAddressSigningKey (InfoMod KeyCmd -> ParserInfo KeyCmd) -> InfoMod KeyCmd -> ParserInfo KeyCmd forall a b. (a -> b) -> a -> b $ @@ -1551,9 +1551,9 @@ "to a corresponding Shelley-format key." ] where - pKeyGetVerificationKey :: Parser KeyCmd - pKeyGetVerificationKey :: Parser KeyCmd -pKeyGetVerificationKey = + pKeyGetVerificationKey :: Parser KeyCmd + pKeyGetVerificationKey :: Parser KeyCmd +pKeyGetVerificationKey = SigningKeyFile -> VerificationKeyFile -> KeyCmd KeyGetVerificationKey (SigningKeyFile -> VerificationKeyFile -> KeyCmd) @@ -1569,9 +1569,9 @@ pVerificationKeyFile FileDirection Output - pKeyNonExtendedKey :: Parser KeyCmd - pKeyNonExtendedKey :: Parser KeyCmd -pKeyNonExtendedKey = + pKeyNonExtendedKey :: Parser KeyCmd + pKeyNonExtendedKey :: Parser KeyCmd +pKeyNonExtendedKey = VerificationKeyFile -> VerificationKeyFile -> KeyCmd KeyNonExtendedKey (VerificationKeyFile -> VerificationKeyFile -> KeyCmd) @@ -1588,9 +1588,9 @@ pVerificationKeyFile FileDirection Output - pKeyConvertByronKey :: Parser KeyCmd - pKeyConvertByronKey :: Parser KeyCmd -pKeyConvertByronKey = + pKeyConvertByronKey :: Parser KeyCmd + pKeyConvertByronKey :: Parser KeyCmd +pKeyConvertByronKey = Maybe Text -> ByronKeyType -> SomeKeyFile -> OutputFile -> KeyCmd KeyConvertByronKey (Maybe Text -> ByronKeyType -> SomeKeyFile -> OutputFile -> KeyCmd) @@ -1600,26 +1600,26 @@ <$> Parser Text -> Parser (Maybe Text) forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) optional Parser Text -pPassword +pPassword Parser (ByronKeyType -> SomeKeyFile -> OutputFile -> KeyCmd) -> Parser ByronKeyType -> Parser (SomeKeyFile -> OutputFile -> KeyCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser ByronKeyType -pByronKeyType +pByronKeyType Parser (SomeKeyFile -> OutputFile -> KeyCmd) -> Parser SomeKeyFile -> Parser (OutputFile -> KeyCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser SomeKeyFile -pByronKeyFile +pByronKeyFile Parser (OutputFile -> KeyCmd) -> Parser OutputFile -> Parser KeyCmd forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser OutputFile pOutputFile - pPassword :: Parser Text - pPassword :: Parser Text -pPassword = Mod OptionFields Text -> Parser Text + pPassword :: Parser Text + pPassword :: Parser Text +pPassword = Mod OptionFields Text -> Parser Text forall s. IsString s => Mod OptionFields s -> Parser s Opt.strOption ( String -> Mod OptionFields Text @@ -1642,9 +1642,9 @@ "Password for signing key (if applicable)." ) - pByronKeyType :: Parser ByronKeyType - pByronKeyType :: Parser ByronKeyType -pByronKeyType = + pByronKeyType :: Parser ByronKeyType + pByronKeyType :: Parser ByronKeyType +pByronKeyType = ByronKeyType -> Mod FlagFields ByronKeyType -> Parser ByronKeyType forall a. a -> Mod FlagFields a -> Parser a Opt.flag' (ByronKeyFormat -> ByronKeyType @@ -1758,15 +1758,15 @@ "Use a Byron-era genesis delegate key, in legacy SL format." ) - pByronKeyFile :: Parser SomeKeyFile - pByronKeyFile :: Parser SomeKeyFile -pByronKeyFile = + pByronKeyFile :: Parser SomeKeyFile + pByronKeyFile :: Parser SomeKeyFile +pByronKeyFile = (SigningKeyFile -> SomeKeyFile ASigningKeyFile (SigningKeyFile -> SomeKeyFile) -> Parser SigningKeyFile -> Parser SomeKeyFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser SigningKeyFile -pByronSigningKeyFile) +pByronSigningKeyFile) Parser SomeKeyFile -> Parser SomeKeyFile -> Parser SomeKeyFile forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> (VerificationKeyFile -> SomeKeyFile @@ -1774,11 +1774,11 @@ -> Parser VerificationKeyFile -> Parser SomeKeyFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser VerificationKeyFile -pByronVerificationKeyFile) +pByronVerificationKeyFile) - pByronSigningKeyFile :: Parser SigningKeyFile - pByronSigningKeyFile :: Parser SigningKeyFile -pByronSigningKeyFile = + pByronSigningKeyFile :: Parser SigningKeyFile + pByronSigningKeyFile :: Parser SigningKeyFile +pByronSigningKeyFile = String -> SigningKeyFile SigningKeyFile (String -> SigningKeyFile) -> Parser String -> Parser SigningKeyFile @@ -1815,9 +1815,9 @@ "file") ) - pByronVerificationKeyFile :: Parser VerificationKeyFile - pByronVerificationKeyFile :: Parser VerificationKeyFile -pByronVerificationKeyFile = + pByronVerificationKeyFile :: Parser VerificationKeyFile + pByronVerificationKeyFile :: Parser VerificationKeyFile +pByronVerificationKeyFile = String -> VerificationKeyFile VerificationKeyFile (String -> VerificationKeyFile) -> Parser String -> Parser VerificationKeyFile @@ -1854,24 +1854,24 @@ "file") ) - pKeyConvertByronGenesisVKey :: Parser KeyCmd - pKeyConvertByronGenesisVKey :: Parser KeyCmd -pKeyConvertByronGenesisVKey = + pKeyConvertByronGenesisVKey :: Parser KeyCmd + pKeyConvertByronGenesisVKey :: Parser KeyCmd +pKeyConvertByronGenesisVKey = VerificationKeyBase64 -> OutputFile -> KeyCmd KeyConvertByronGenesisVKey (VerificationKeyBase64 -> OutputFile -> KeyCmd) -> Parser VerificationKeyBase64 -> Parser (OutputFile -> KeyCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser VerificationKeyBase64 -pByronGenesisVKeyBase64 +pByronGenesisVKeyBase64 Parser (OutputFile -> KeyCmd) -> Parser OutputFile -> Parser KeyCmd forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser OutputFile pOutputFile - pByronGenesisVKeyBase64 :: Parser VerificationKeyBase64 - pByronGenesisVKeyBase64 :: Parser VerificationKeyBase64 -pByronGenesisVKeyBase64 = + pByronGenesisVKeyBase64 :: Parser VerificationKeyBase64 + pByronGenesisVKeyBase64 :: Parser VerificationKeyBase64 +pByronGenesisVKeyBase64 = String -> VerificationKeyBase64 VerificationKeyBase64 (String -> VerificationKeyBase64) -> Parser String -> Parser VerificationKeyBase64 @@ -1900,63 +1900,63 @@ "Base64 string for the Byron genesis verification key." ) - pKeyConvertITNKey :: Parser KeyCmd - pKeyConvertITNKey :: Parser KeyCmd -pKeyConvertITNKey = + pKeyConvertITNKey :: Parser KeyCmd + pKeyConvertITNKey :: Parser KeyCmd +pKeyConvertITNKey = SomeKeyFile -> OutputFile -> KeyCmd KeyConvertITNStakeKey (SomeKeyFile -> OutputFile -> KeyCmd) -> Parser SomeKeyFile -> Parser (OutputFile -> KeyCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser SomeKeyFile -pITNKeyFIle +pITNKeyFIle Parser (OutputFile -> KeyCmd) -> Parser OutputFile -> Parser KeyCmd forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser OutputFile pOutputFile - pKeyConvertITNExtendedKey :: Parser KeyCmd - pKeyConvertITNExtendedKey :: Parser KeyCmd -pKeyConvertITNExtendedKey = + pKeyConvertITNExtendedKey :: Parser KeyCmd + pKeyConvertITNExtendedKey :: Parser KeyCmd +pKeyConvertITNExtendedKey = SomeKeyFile -> OutputFile -> KeyCmd KeyConvertITNExtendedToStakeKey (SomeKeyFile -> OutputFile -> KeyCmd) -> Parser SomeKeyFile -> Parser (OutputFile -> KeyCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser SomeKeyFile -pITNSigningKeyFile +pITNSigningKeyFile Parser (OutputFile -> KeyCmd) -> Parser OutputFile -> Parser KeyCmd forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser OutputFile pOutputFile - pKeyConvertITNBip32Key :: Parser KeyCmd - pKeyConvertITNBip32Key :: Parser KeyCmd -pKeyConvertITNBip32Key = + pKeyConvertITNBip32Key :: Parser KeyCmd + pKeyConvertITNBip32Key :: Parser KeyCmd +pKeyConvertITNBip32Key = SomeKeyFile -> OutputFile -> KeyCmd KeyConvertITNBip32ToStakeKey (SomeKeyFile -> OutputFile -> KeyCmd) -> Parser SomeKeyFile -> Parser (OutputFile -> KeyCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser SomeKeyFile -pITNSigningKeyFile +pITNSigningKeyFile Parser (OutputFile -> KeyCmd) -> Parser OutputFile -> Parser KeyCmd forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser OutputFile pOutputFile - pITNKeyFIle :: Parser SomeKeyFile - pITNKeyFIle :: Parser SomeKeyFile -pITNKeyFIle = Parser SomeKeyFile -pITNSigningKeyFile + pITNKeyFIle :: Parser SomeKeyFile + pITNKeyFIle :: Parser SomeKeyFile +pITNKeyFIle = Parser SomeKeyFile +pITNSigningKeyFile Parser SomeKeyFile -> Parser SomeKeyFile -> Parser SomeKeyFile forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> Parser SomeKeyFile -pITNVerificationKeyFile +pITNVerificationKeyFile - pITNSigningKeyFile :: Parser SomeKeyFile - pITNSigningKeyFile :: Parser SomeKeyFile -pITNSigningKeyFile = + pITNSigningKeyFile :: Parser SomeKeyFile + pITNSigningKeyFile :: Parser SomeKeyFile +pITNSigningKeyFile = SigningKeyFile -> SomeKeyFile ASigningKeyFile (SigningKeyFile -> SomeKeyFile) -> (String -> SigningKeyFile) -> String -> SomeKeyFile @@ -1998,9 +1998,9 @@ "file") ) - pITNVerificationKeyFile :: Parser SomeKeyFile - pITNVerificationKeyFile :: Parser SomeKeyFile -pITNVerificationKeyFile = + pITNVerificationKeyFile :: Parser SomeKeyFile + pITNVerificationKeyFile :: Parser SomeKeyFile +pITNVerificationKeyFile = VerificationKeyFile -> SomeKeyFile AVerificationKeyFile (VerificationKeyFile -> SomeKeyFile) -> (String -> VerificationKeyFile) -> String -> SomeKeyFile @@ -2042,9 +2042,9 @@ "file") ) - pKeyConvertCardanoAddressSigningKey :: Parser KeyCmd - pKeyConvertCardanoAddressSigningKey :: Parser KeyCmd -pKeyConvertCardanoAddressSigningKey = + pKeyConvertCardanoAddressSigningKey :: Parser KeyCmd + pKeyConvertCardanoAddressSigningKey :: Parser KeyCmd +pKeyConvertCardanoAddressSigningKey = CardanoAddressKeyType -> SigningKeyFile -> OutputFile -> KeyCmd KeyConvertCardanoAddressSigningKey (CardanoAddressKeyType -> SigningKeyFile -> OutputFile -> KeyCmd) @@ -2052,7 +2052,7 @@ -> Parser (SigningKeyFile -> OutputFile -> KeyCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser CardanoAddressKeyType -pCardanoAddressKeyType +pCardanoAddressKeyType Parser (SigningKeyFile -> OutputFile -> KeyCmd) -> Parser SigningKeyFile -> Parser (OutputFile -> KeyCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b @@ -2064,9 +2064,9 @@ <*> Parser OutputFile pOutputFile - pCardanoAddressKeyType :: Parser CardanoAddressKeyType - pCardanoAddressKeyType :: Parser CardanoAddressKeyType -pCardanoAddressKeyType = + pCardanoAddressKeyType :: Parser CardanoAddressKeyType + pCardanoAddressKeyType :: Parser CardanoAddressKeyType +pCardanoAddressKeyType = CardanoAddressKeyType -> Mod FlagFields CardanoAddressKeyType -> Parser CardanoAddressKeyType @@ -2169,7 +2169,7 @@ -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionBuild (InfoMod TransactionCmd -> ParserInfo TransactionCmd) +pTransactionBuild (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod TransactionCmd @@ -2184,7 +2184,7 @@ -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionSign (InfoMod TransactionCmd -> ParserInfo TransactionCmd) +pTransactionSign (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod TransactionCmd @@ -2199,7 +2199,7 @@ -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionCreateWitness (InfoMod TransactionCmd -> ParserInfo TransactionCmd) +pTransactionCreateWitness (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod TransactionCmd @@ -2214,7 +2214,7 @@ -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionAssembleTxBodyWit +pTransactionAssembleTxBodyWit (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a b. (a -> b) -> a -> b @@ -2223,7 +2223,7 @@ Opt.progDesc String "Assemble a tx body and witness(es) to form a transaction") , Parser TransactionCmd -pSignWitnessBackwardCompatible +pSignWitnessBackwardCompatible , String -> ParserInfo TransactionCmd -> Parser TransactionCmd forall a. String -> ParserInfo a -> Parser a subParser String @@ -2232,7 +2232,7 @@ -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionSubmit (InfoMod TransactionCmd -> ParserInfo TransactionCmd) +pTransactionSubmit (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> (String -> InfoMod TransactionCmd) -> String -> ParserInfo TransactionCmd @@ -2262,7 +2262,7 @@ -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionPolicyId (InfoMod TransactionCmd -> ParserInfo TransactionCmd) +pTransactionPolicyId (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod TransactionCmd @@ -2277,7 +2277,7 @@ -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionCalculateMinFee (InfoMod TransactionCmd -> ParserInfo TransactionCmd) +pTransactionCalculateMinFee (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod TransactionCmd @@ -2292,7 +2292,7 @@ -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionCalculateMinValue (InfoMod TransactionCmd -> ParserInfo TransactionCmd) +pTransactionCalculateMinValue (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod TransactionCmd @@ -2307,7 +2307,7 @@ -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionId (InfoMod TransactionCmd -> ParserInfo TransactionCmd) +pTransactionId (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod TransactionCmd @@ -2325,7 +2325,7 @@ -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionView (InfoMod TransactionCmd -> ParserInfo TransactionCmd) +pTransactionView (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod TransactionCmd @@ -2334,14 +2334,14 @@ "Print a transaction" ] where - assembleInfo :: ParserInfo TransactionCmd - assembleInfo :: ParserInfo TransactionCmd -assembleInfo = + assembleInfo :: ParserInfo TransactionCmd + assembleInfo :: ParserInfo TransactionCmd +assembleInfo = Parser TransactionCmd -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser TransactionCmd -pTransactionAssembleTxBodyWit +pTransactionAssembleTxBodyWit (InfoMod TransactionCmd -> ParserInfo TransactionCmd) -> InfoMod TransactionCmd -> ParserInfo TransactionCmd forall a b. (a -> b) -> a -> b @@ -2350,9 +2350,9 @@ Opt.progDesc String "Assemble a tx body and witness(es) to form a transaction" - pSignWitnessBackwardCompatible :: Parser TransactionCmd - pSignWitnessBackwardCompatible :: Parser TransactionCmd -pSignWitnessBackwardCompatible = + pSignWitnessBackwardCompatible :: Parser TransactionCmd + pSignWitnessBackwardCompatible :: Parser TransactionCmd +pSignWitnessBackwardCompatible = Mod CommandFields TransactionCmd -> Parser TransactionCmd forall a. Mod CommandFields a -> Parser a Opt.subparser @@ -2364,7 +2364,7 @@ forall a. String -> ParserInfo a -> Mod CommandFields a Opt.command String "sign-witness" ParserInfo TransactionCmd -assembleInfo Mod CommandFields TransactionCmd +assembleInfo Mod CommandFields TransactionCmd -> Mod CommandFields TransactionCmd -> Mod CommandFields TransactionCmd forall a. Semigroup a => a -> a -> a @@ -2372,9 +2372,9 @@ forall (f :: * -> *) a. Mod f a Opt.internal - pTransactionBuild :: Parser TransactionCmd - pTransactionBuild :: Parser TransactionCmd -pTransactionBuild = AnyCardanoEra + pTransactionBuild :: Parser TransactionCmd + pTransactionBuild :: Parser TransactionCmd +pTransactionBuild = AnyCardanoEra -> [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] -> [TxIn] -> [TxOutAnyEra] @@ -2804,7 +2804,7 @@ -> Parser (Maybe ProtocolParamsSourceSpec) forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) optional Parser ProtocolParamsSourceSpec -pProtocolParamsSourceSpec +pProtocolParamsSourceSpec Parser (Maybe UpdateProposalFile -> TxBodyFile -> TransactionCmd) -> Parser (Maybe UpdateProposalFile) -> Parser (TxBodyFile -> TransactionCmd) @@ -2820,9 +2820,9 @@ pTxBodyFile FileDirection Output - pTransactionSign :: Parser TransactionCmd - pTransactionSign :: Parser TransactionCmd -pTransactionSign = TxBodyFile + pTransactionSign :: Parser TransactionCmd + pTransactionSign :: Parser TransactionCmd +pTransactionSign = TxBodyFile -> [WitnessSigningData] -> Maybe NetworkId -> TxFile @@ -2862,9 +2862,9 @@ pTxFile FileDirection Output - pTransactionCreateWitness :: Parser TransactionCmd - pTransactionCreateWitness :: Parser TransactionCmd -pTransactionCreateWitness = TxBodyFile + pTransactionCreateWitness :: Parser TransactionCmd + pTransactionCreateWitness :: Parser TransactionCmd +pTransactionCreateWitness = TxBodyFile -> WitnessSigningData -> Maybe NetworkId -> OutputFile @@ -2905,9 +2905,9 @@ <*> Parser OutputFile pOutputFile - pTransactionAssembleTxBodyWit :: Parser TransactionCmd - pTransactionAssembleTxBodyWit :: Parser TransactionCmd -pTransactionAssembleTxBodyWit = TxBodyFile -> [WitnessFile] -> OutputFile -> TransactionCmd + pTransactionAssembleTxBodyWit :: Parser TransactionCmd + pTransactionAssembleTxBodyWit :: Parser TransactionCmd +pTransactionAssembleTxBodyWit = TxBodyFile -> [WitnessFile] -> OutputFile -> TransactionCmd TxAssembleTxBodyWitness (TxBodyFile -> [WitnessFile] -> OutputFile -> TransactionCmd) -> Parser TxBodyFile @@ -2929,9 +2929,9 @@ <*> Parser OutputFile pOutputFile - pTransactionSubmit :: Parser TransactionCmd - pTransactionSubmit :: Parser TransactionCmd -pTransactionSubmit = AnyConsensusModeParams -> NetworkId -> String -> TransactionCmd + pTransactionSubmit :: Parser TransactionCmd + pTransactionSubmit :: Parser TransactionCmd +pTransactionSubmit = AnyConsensusModeParams -> NetworkId -> String -> TransactionCmd TxSubmit (AnyConsensusModeParams -> NetworkId -> String -> TransactionCmd) -> Parser AnyConsensusModeParams -> Parser (NetworkId -> String -> TransactionCmd) @@ -2949,18 +2949,18 @@ <*> Parser String pTxSubmitFile - pTransactionPolicyId :: Parser TransactionCmd - pTransactionPolicyId :: Parser TransactionCmd -pTransactionPolicyId = ScriptFile -> TransactionCmd + pTransactionPolicyId :: Parser TransactionCmd + pTransactionPolicyId :: Parser TransactionCmd +pTransactionPolicyId = ScriptFile -> TransactionCmd TxMintedPolicyId (ScriptFile -> TransactionCmd) -> Parser ScriptFile -> Parser TransactionCmd forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser ScriptFile pScript - pTransactionCalculateMinFee :: Parser TransactionCmd - pTransactionCalculateMinFee :: Parser TransactionCmd -pTransactionCalculateMinFee = + pTransactionCalculateMinFee :: Parser TransactionCmd + pTransactionCalculateMinFee :: Parser TransactionCmd +pTransactionCalculateMinFee = TxBodyFile -> Maybe NetworkId -> ProtocolParamsSourceSpec @@ -3028,7 +3028,7 @@ -> TransactionCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser ProtocolParamsSourceSpec -pProtocolParamsSourceSpec +pProtocolParamsSourceSpec Parser (TxInCount -> TxOutCount @@ -3064,25 +3064,25 @@ <*> Parser TxByronWitnessCount pTxByronWitnessCount - pTransactionCalculateMinValue :: Parser TransactionCmd - pTransactionCalculateMinValue :: Parser TransactionCmd -pTransactionCalculateMinValue = ProtocolParamsSourceSpec -> Value -> TransactionCmd + pTransactionCalculateMinValue :: Parser TransactionCmd + pTransactionCalculateMinValue :: Parser TransactionCmd +pTransactionCalculateMinValue = ProtocolParamsSourceSpec -> Value -> TransactionCmd TxCalculateMinValue (ProtocolParamsSourceSpec -> Value -> TransactionCmd) -> Parser ProtocolParamsSourceSpec -> Parser (Value -> TransactionCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser ProtocolParamsSourceSpec -pProtocolParamsSourceSpec +pProtocolParamsSourceSpec Parser (Value -> TransactionCmd) -> Parser Value -> Parser TransactionCmd forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Value pMultiAsset - pProtocolParamsSourceSpec :: Parser ProtocolParamsSourceSpec - pProtocolParamsSourceSpec :: Parser ProtocolParamsSourceSpec -pProtocolParamsSourceSpec = + pProtocolParamsSourceSpec :: Parser ProtocolParamsSourceSpec + pProtocolParamsSourceSpec :: Parser ProtocolParamsSourceSpec +pProtocolParamsSourceSpec = GenesisFile -> ProtocolParamsSourceSpec ParamsFromGenesis (GenesisFile -> ProtocolParamsSourceSpec) -> Parser GenesisFile -> Parser ProtocolParamsSourceSpec @@ -3104,18 +3104,18 @@ <$> Parser ProtocolParamsFile pProtocolParamsFile - pTransactionId :: Parser TransactionCmd - pTransactionId :: Parser TransactionCmd -pTransactionId = InputTxFile -> TransactionCmd + pTransactionId :: Parser TransactionCmd + pTransactionId :: Parser TransactionCmd +pTransactionId = InputTxFile -> TransactionCmd TxGetTxId (InputTxFile -> TransactionCmd) -> Parser InputTxFile -> Parser TransactionCmd forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser InputTxFile pInputTxFile - pTransactionView :: Parser TransactionCmd - pTransactionView :: Parser TransactionCmd -pTransactionView = InputTxFile -> TransactionCmd + pTransactionView :: Parser TransactionCmd + pTransactionView :: Parser TransactionCmd +pTransactionView = InputTxFile -> TransactionCmd TxView (InputTxFile -> TransactionCmd) -> Parser InputTxFile -> Parser TransactionCmd forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -3137,7 +3137,7 @@ (Parser NodeCmd -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser NodeCmd -pKeyGenOperator (InfoMod NodeCmd -> ParserInfo NodeCmd) +pKeyGenOperator (InfoMod NodeCmd -> ParserInfo NodeCmd) -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a b. (a -> b) -> a -> b $ @@ -3153,7 +3153,7 @@ (Parser NodeCmd -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser NodeCmd -pKeyGenKES (InfoMod NodeCmd -> ParserInfo NodeCmd) +pKeyGenKES (InfoMod NodeCmd -> ParserInfo NodeCmd) -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a b. (a -> b) -> a -> b $ @@ -3168,7 +3168,7 @@ (Parser NodeCmd -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser NodeCmd -pKeyGenVRF (InfoMod NodeCmd -> ParserInfo NodeCmd) +pKeyGenVRF (InfoMod NodeCmd -> ParserInfo NodeCmd) -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a b. (a -> b) -> a -> b $ @@ -3183,7 +3183,7 @@ (Parser NodeCmd -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser NodeCmd -pKeyHashVRF (InfoMod NodeCmd -> ParserInfo NodeCmd) +pKeyHashVRF (InfoMod NodeCmd -> ParserInfo NodeCmd) -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a b. (a -> b) -> a -> b $ @@ -3198,7 +3198,7 @@ (Parser NodeCmd -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser NodeCmd -pNewCounter (InfoMod NodeCmd -> ParserInfo NodeCmd) +pNewCounter (InfoMod NodeCmd -> ParserInfo NodeCmd) -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a b. (a -> b) -> a -> b $ @@ -3213,7 +3213,7 @@ (Parser NodeCmd -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser NodeCmd -pIssueOpCert (InfoMod NodeCmd -> ParserInfo NodeCmd) +pIssueOpCert (InfoMod NodeCmd -> ParserInfo NodeCmd) -> InfoMod NodeCmd -> ParserInfo NodeCmd forall a b. (a -> b) -> a -> b $ @@ -3223,9 +3223,9 @@ "Issue a node operational certificate") ] where - pKeyGenOperator :: Parser NodeCmd - pKeyGenOperator :: Parser NodeCmd -pKeyGenOperator = + pKeyGenOperator :: Parser NodeCmd + pKeyGenOperator :: Parser NodeCmd +pKeyGenOperator = VerificationKeyFile -> SigningKeyFile -> OpCertCounterFile -> NodeCmd NodeKeyGenCold (VerificationKeyFile @@ -3246,9 +3246,9 @@ <*> Parser OpCertCounterFile pOperatorCertIssueCounterFile - pKeyGenKES :: Parser NodeCmd - pKeyGenKES :: Parser NodeCmd -pKeyGenKES = + pKeyGenKES :: Parser NodeCmd + pKeyGenKES :: Parser NodeCmd +pKeyGenKES = VerificationKeyFile -> SigningKeyFile -> NodeCmd NodeKeyGenKES (VerificationKeyFile -> SigningKeyFile -> NodeCmd) -> Parser VerificationKeyFile -> Parser (SigningKeyFile -> NodeCmd) @@ -3262,9 +3262,9 @@ pSigningKeyFile FileDirection Output - pKeyGenVRF :: Parser NodeCmd - pKeyGenVRF :: Parser NodeCmd -pKeyGenVRF = + pKeyGenVRF :: Parser NodeCmd + pKeyGenVRF :: Parser NodeCmd +pKeyGenVRF = VerificationKeyFile -> SigningKeyFile -> NodeCmd NodeKeyGenVRF (VerificationKeyFile -> SigningKeyFile -> NodeCmd) -> Parser VerificationKeyFile -> Parser (SigningKeyFile -> NodeCmd) @@ -3278,9 +3278,9 @@ pSigningKeyFile FileDirection Output - pKeyHashVRF :: Parser NodeCmd - pKeyHashVRF :: Parser NodeCmd -pKeyHashVRF = + pKeyHashVRF :: Parser NodeCmd + pKeyHashVRF :: Parser NodeCmd +pKeyHashVRF = VerificationKeyOrFile VrfKey -> Maybe OutputFile -> NodeCmd NodeKeyHashVRF (VerificationKeyOrFile VrfKey -> Maybe OutputFile -> NodeCmd) -> Parser (VerificationKeyOrFile VrfKey) @@ -3297,9 +3297,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pNewCounter :: Parser NodeCmd - pNewCounter :: Parser NodeCmd -pNewCounter = + pNewCounter :: Parser NodeCmd + pNewCounter :: Parser NodeCmd +pNewCounter = ColdVerificationKeyOrFile -> Word -> OpCertCounterFile -> NodeCmd NodeNewCounter (ColdVerificationKeyOrFile -> Word -> OpCertCounterFile -> NodeCmd) -> Parser ColdVerificationKeyOrFile @@ -3311,16 +3311,16 @@ -> Parser Word -> Parser (OpCertCounterFile -> NodeCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Word -pCounterValue +pCounterValue Parser (OpCertCounterFile -> NodeCmd) -> Parser OpCertCounterFile -> Parser NodeCmd forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser OpCertCounterFile pOperatorCertIssueCounterFile - pCounterValue :: Parser Word - pCounterValue :: Parser Word -pCounterValue = + pCounterValue :: Parser Word + pCounterValue :: Parser Word +pCounterValue = ReadM Word -> Mod OptionFields Word -> Parser Word forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM Word @@ -3346,9 +3346,9 @@ "The next certificate issue counter value to use." ) - pIssueOpCert :: Parser NodeCmd - pIssueOpCert :: Parser NodeCmd -pIssueOpCert = + pIssueOpCert :: Parser NodeCmd + pIssueOpCert :: Parser NodeCmd +pIssueOpCert = VerificationKeyOrFile KesKey -> SigningKeyFile -> OpCertCounterFile @@ -3437,7 +3437,7 @@ (Parser PoolCmd -> InfoMod PoolCmd -> ParserInfo PoolCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser PoolCmd -pId (InfoMod PoolCmd -> ParserInfo PoolCmd) +pId (InfoMod PoolCmd -> ParserInfo PoolCmd) -> InfoMod PoolCmd -> ParserInfo PoolCmd forall a b. (a -> b) -> a -> b $ @@ -3452,7 +3452,7 @@ (Parser PoolCmd -> InfoMod PoolCmd -> ParserInfo PoolCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser PoolCmd -pPoolMetadataHashSubCmd (InfoMod PoolCmd -> ParserInfo PoolCmd) +pPoolMetadataHashSubCmd (InfoMod PoolCmd -> ParserInfo PoolCmd) -> InfoMod PoolCmd -> ParserInfo PoolCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod PoolCmd @@ -3461,9 +3461,9 @@ "Print the hash of pool metadata.") ] where - pId :: Parser PoolCmd - pId :: Parser PoolCmd -pId = VerificationKeyOrFile StakePoolKey -> OutputFormat -> PoolCmd + pId :: Parser PoolCmd + pId :: Parser PoolCmd +pId = VerificationKeyOrFile StakePoolKey -> OutputFormat -> PoolCmd PoolGetId (VerificationKeyOrFile StakePoolKey -> OutputFormat -> PoolCmd) -> Parser (VerificationKeyOrFile StakePoolKey) -> Parser (OutputFormat -> PoolCmd) @@ -3475,9 +3475,9 @@ <*> Parser OutputFormat pOutputFormat - pPoolMetadataHashSubCmd :: Parser PoolCmd - pPoolMetadataHashSubCmd :: Parser PoolCmd -pPoolMetadataHashSubCmd = PoolMetadataFile -> Maybe OutputFile -> PoolCmd + pPoolMetadataHashSubCmd :: Parser PoolCmd + pPoolMetadataHashSubCmd :: Parser PoolCmd +pPoolMetadataHashSubCmd = PoolMetadataFile -> Maybe OutputFile -> PoolCmd PoolMetadataHash (PoolMetadataFile -> Maybe OutputFile -> PoolCmd) -> Parser PoolMetadataFile -> Parser (Maybe OutputFile -> PoolCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -3504,7 +3504,7 @@ (Parser QueryCmd -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser QueryCmd -pQueryProtocolParameters (InfoMod QueryCmd -> ParserInfo QueryCmd) +pQueryProtocolParameters (InfoMod QueryCmd -> ParserInfo QueryCmd) -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod QueryCmd @@ -3518,7 +3518,7 @@ (Parser QueryCmd -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser QueryCmd -pQueryTip (InfoMod QueryCmd -> ParserInfo QueryCmd) +pQueryTip (InfoMod QueryCmd -> ParserInfo QueryCmd) -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod QueryCmd @@ -3532,7 +3532,7 @@ (Parser QueryCmd -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser QueryCmd -pQueryStakeDistribution (InfoMod QueryCmd -> ParserInfo QueryCmd) +pQueryStakeDistribution (InfoMod QueryCmd -> ParserInfo QueryCmd) -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod QueryCmd @@ -3546,7 +3546,7 @@ (Parser QueryCmd -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser QueryCmd -pQueryStakeAddressInfo (InfoMod QueryCmd -> ParserInfo QueryCmd) +pQueryStakeAddressInfo (InfoMod QueryCmd -> ParserInfo QueryCmd) -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod QueryCmd @@ -3562,7 +3562,7 @@ (Parser QueryCmd -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser QueryCmd -pQueryUTxO (InfoMod QueryCmd -> ParserInfo QueryCmd) +pQueryUTxO (InfoMod QueryCmd -> ParserInfo QueryCmd) -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod QueryCmd @@ -3577,7 +3577,7 @@ (Parser QueryCmd -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser QueryCmd -pQueryLedgerState (InfoMod QueryCmd -> ParserInfo QueryCmd) +pQueryLedgerState (InfoMod QueryCmd -> ParserInfo QueryCmd) -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod QueryCmd @@ -3591,7 +3591,7 @@ (Parser QueryCmd -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser QueryCmd -pQueryProtocolState (InfoMod QueryCmd -> ParserInfo QueryCmd) +pQueryProtocolState (InfoMod QueryCmd -> ParserInfo QueryCmd) -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod QueryCmd @@ -3605,7 +3605,7 @@ (Parser QueryCmd -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser QueryCmd -pQueryStakeSnapshot (InfoMod QueryCmd -> ParserInfo QueryCmd) +pQueryStakeSnapshot (InfoMod QueryCmd -> ParserInfo QueryCmd) -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod QueryCmd @@ -3619,7 +3619,7 @@ (Parser QueryCmd -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser QueryCmd -pQueryPoolParams (InfoMod QueryCmd -> ParserInfo QueryCmd) +pQueryPoolParams (InfoMod QueryCmd -> ParserInfo QueryCmd) -> InfoMod QueryCmd -> ParserInfo QueryCmd forall a b. (a -> b) -> a -> b $ String -> InfoMod QueryCmd @@ -3628,9 +3628,9 @@ "Dump the pool parameters (Ledger.NewEpochState.esLState._delegationState._pState._pParams -- advanced command)") ] where - pQueryProtocolParameters :: Parser QueryCmd - pQueryProtocolParameters :: Parser QueryCmd -pQueryProtocolParameters = + pQueryProtocolParameters :: Parser QueryCmd + pQueryProtocolParameters :: Parser QueryCmd +pQueryProtocolParameters = AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd QueryProtocolParameters' (AnyConsensusModeParams @@ -3651,9 +3651,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pQueryTip :: Parser QueryCmd - pQueryTip :: Parser QueryCmd -pQueryTip = AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd + pQueryTip :: Parser QueryCmd + pQueryTip :: Parser QueryCmd +pQueryTip = AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd QueryTip (AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd) @@ -3673,9 +3673,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pQueryUTxO :: Parser QueryCmd - pQueryUTxO :: Parser QueryCmd -pQueryUTxO = + pQueryUTxO :: Parser QueryCmd + pQueryUTxO :: Parser QueryCmd +pQueryUTxO = AnyConsensusModeParams -> QueryFilter -> NetworkId -> Maybe OutputFile -> QueryCmd QueryUTxO' @@ -3704,9 +3704,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pQueryStakeDistribution :: Parser QueryCmd - pQueryStakeDistribution :: Parser QueryCmd -pQueryStakeDistribution = + pQueryStakeDistribution :: Parser QueryCmd + pQueryStakeDistribution :: Parser QueryCmd +pQueryStakeDistribution = AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd QueryStakeDistribution' (AnyConsensusModeParams @@ -3727,9 +3727,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pQueryStakeAddressInfo :: Parser QueryCmd - pQueryStakeAddressInfo :: Parser QueryCmd -pQueryStakeAddressInfo = + pQueryStakeAddressInfo :: Parser QueryCmd + pQueryStakeAddressInfo :: Parser QueryCmd +pQueryStakeAddressInfo = AnyConsensusModeParams -> StakeAddress -> NetworkId -> Maybe OutputFile -> QueryCmd QueryStakeAddressInfo @@ -3758,9 +3758,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pQueryLedgerState :: Parser QueryCmd - pQueryLedgerState :: Parser QueryCmd -pQueryLedgerState = AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd + pQueryLedgerState :: Parser QueryCmd + pQueryLedgerState :: Parser QueryCmd +pQueryLedgerState = AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd QueryDebugLedgerState' (AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd) @@ -3780,9 +3780,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pQueryProtocolState :: Parser QueryCmd - pQueryProtocolState :: Parser QueryCmd -pQueryProtocolState = AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd + pQueryProtocolState :: Parser QueryCmd + pQueryProtocolState :: Parser QueryCmd +pQueryProtocolState = AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd QueryProtocolState' (AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> QueryCmd) @@ -3802,9 +3802,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pQueryStakeSnapshot :: Parser QueryCmd - pQueryStakeSnapshot :: Parser QueryCmd -pQueryStakeSnapshot = AnyConsensusModeParams + pQueryStakeSnapshot :: Parser QueryCmd + pQueryStakeSnapshot :: Parser QueryCmd +pQueryStakeSnapshot = AnyConsensusModeParams -> NetworkId -> Hash StakePoolKey -> QueryCmd QueryStakeSnapshot' (AnyConsensusModeParams @@ -3825,9 +3825,9 @@ <*> Parser (Hash StakePoolKey) pStakePoolVerificationKeyHash - pQueryPoolParams :: Parser QueryCmd - pQueryPoolParams :: Parser QueryCmd -pQueryPoolParams = AnyConsensusModeParams + pQueryPoolParams :: Parser QueryCmd + pQueryPoolParams :: Parser QueryCmd +pQueryPoolParams = AnyConsensusModeParams -> NetworkId -> Hash StakePoolKey -> QueryCmd QueryPoolParams' (AnyConsensusModeParams @@ -3865,11 +3865,11 @@ -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info (Parser GovernanceCmd -pMIRPayStakeAddresses Parser GovernanceCmd +pMIRPayStakeAddresses Parser GovernanceCmd -> Parser GovernanceCmd -> Parser GovernanceCmd forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> Parser GovernanceCmd -mirCertParsers) (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) +mirCertParsers) (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a b. (a -> b) -> a -> b $ @@ -3885,7 +3885,7 @@ -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GovernanceCmd -pGovernanceGenesisKeyDelegationCertificate (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) +pGovernanceGenesisKeyDelegationCertificate (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a b. (a -> b) -> a -> b $ @@ -3901,7 +3901,7 @@ -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GovernanceCmd -pUpdateProposal (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) +pUpdateProposal (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a b. (a -> b) -> a -> b $ @@ -3911,9 +3911,9 @@ "Create an update proposal") ] where - mirCertParsers :: Parser GovernanceCmd - mirCertParsers :: Parser GovernanceCmd -mirCertParsers = [Parser GovernanceCmd] -> Parser GovernanceCmd + mirCertParsers :: Parser GovernanceCmd + mirCertParsers :: Parser GovernanceCmd +mirCertParsers = [Parser GovernanceCmd] -> Parser GovernanceCmd forall (t :: * -> *) (f :: * -> *) a. (Foldable t, Alternative f) => t (f a) -> f a @@ -3925,7 +3925,7 @@ -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GovernanceCmd -pMIRPayStakeAddresses (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) +pMIRPayStakeAddresses (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a b. (a -> b) -> a -> b $ @@ -3940,7 +3940,7 @@ -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GovernanceCmd -pMIRTransferToTreasury (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) +pMIRTransferToTreasury (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a b. (a -> b) -> a -> b $ @@ -3956,7 +3956,7 @@ -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GovernanceCmd -pMIRTransferToReserves (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) +pMIRTransferToReserves (InfoMod GovernanceCmd -> ParserInfo GovernanceCmd) -> InfoMod GovernanceCmd -> ParserInfo GovernanceCmd forall a b. (a -> b) -> a -> b $ @@ -3967,9 +3967,9 @@ \ to the reserves pot") ] - pMIRPayStakeAddresses :: Parser GovernanceCmd - pMIRPayStakeAddresses :: Parser GovernanceCmd -pMIRPayStakeAddresses = MIRPot + pMIRPayStakeAddresses :: Parser GovernanceCmd + pMIRPayStakeAddresses :: Parser GovernanceCmd +pMIRPayStakeAddresses = MIRPot -> [StakeAddress] -> [Lovelace] -> OutputFile -> GovernanceCmd GovernanceMIRPayStakeAddressesCertificate (MIRPot @@ -3979,7 +3979,7 @@ ([StakeAddress] -> [Lovelace] -> OutputFile -> GovernanceCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser MIRPot -pMIRPot +pMIRPot Parser ([StakeAddress] -> [Lovelace] -> OutputFile -> GovernanceCmd) -> Parser [StakeAddress] @@ -4002,9 +4002,9 @@ <*> Parser OutputFile pOutputFile - pMIRTransferToTreasury :: Parser GovernanceCmd - pMIRTransferToTreasury :: Parser GovernanceCmd -pMIRTransferToTreasury = Lovelace -> OutputFile -> TransferDirection -> GovernanceCmd + pMIRTransferToTreasury :: Parser GovernanceCmd + pMIRTransferToTreasury :: Parser GovernanceCmd +pMIRTransferToTreasury = Lovelace -> OutputFile -> TransferDirection -> GovernanceCmd GovernanceMIRTransfer (Lovelace -> OutputFile -> TransferDirection -> GovernanceCmd) -> Parser Lovelace @@ -4025,9 +4025,9 @@ pure TransferDirection TransferToTreasury - pMIRTransferToReserves :: Parser GovernanceCmd - pMIRTransferToReserves :: Parser GovernanceCmd -pMIRTransferToReserves = Lovelace -> OutputFile -> TransferDirection -> GovernanceCmd + pMIRTransferToReserves :: Parser GovernanceCmd + pMIRTransferToReserves :: Parser GovernanceCmd +pMIRTransferToReserves = Lovelace -> OutputFile -> TransferDirection -> GovernanceCmd GovernanceMIRTransfer (Lovelace -> OutputFile -> TransferDirection -> GovernanceCmd) -> Parser Lovelace @@ -4048,9 +4048,9 @@ pure TransferDirection TransferToReserves - pGovernanceGenesisKeyDelegationCertificate :: Parser GovernanceCmd - pGovernanceGenesisKeyDelegationCertificate :: Parser GovernanceCmd -pGovernanceGenesisKeyDelegationCertificate = + pGovernanceGenesisKeyDelegationCertificate :: Parser GovernanceCmd + pGovernanceGenesisKeyDelegationCertificate :: Parser GovernanceCmd +pGovernanceGenesisKeyDelegationCertificate = VerificationKeyOrHashOrFile GenesisKey -> VerificationKeyOrHashOrFile GenesisDelegateKey -> VerificationKeyOrHashOrFile VrfKey @@ -4095,9 +4095,9 @@ <*> Parser OutputFile pOutputFile - pMIRPot :: Parser Shelley.MIRPot - pMIRPot :: Parser MIRPot -pMIRPot = + pMIRPot :: Parser Shelley.MIRPot + pMIRPot :: Parser MIRPot +pMIRPot = MIRPot -> Mod FlagFields MIRPot -> Parser MIRPot forall a. a -> Mod FlagFields a -> Parser a Opt.flag' MIRPot @@ -4133,9 +4133,9 @@ "Use the treasury pot." ) - pUpdateProposal :: Parser GovernanceCmd - pUpdateProposal :: Parser GovernanceCmd -pUpdateProposal = OutputFile + pUpdateProposal :: Parser GovernanceCmd + pUpdateProposal :: Parser GovernanceCmd +pUpdateProposal = OutputFile -> EpochNo -> [VerificationKeyFile] -> ProtocolParametersUpdate @@ -4256,7 +4256,7 @@ (Parser GenesisCmd -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GenesisCmd -pGenesisKeyGen (InfoMod GenesisCmd -> ParserInfo GenesisCmd) +pGenesisKeyGen (InfoMod GenesisCmd -> ParserInfo GenesisCmd) -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a b. (a -> b) -> a -> b $ @@ -4271,7 +4271,7 @@ (Parser GenesisCmd -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GenesisCmd -pGenesisDelegateKeyGen (InfoMod GenesisCmd -> ParserInfo GenesisCmd) +pGenesisDelegateKeyGen (InfoMod GenesisCmd -> ParserInfo GenesisCmd) -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a b. (a -> b) -> a -> b $ @@ -4286,7 +4286,7 @@ (Parser GenesisCmd -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GenesisCmd -pGenesisUTxOKeyGen (InfoMod GenesisCmd -> ParserInfo GenesisCmd) +pGenesisUTxOKeyGen (InfoMod GenesisCmd -> ParserInfo GenesisCmd) -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a b. (a -> b) -> a -> b $ @@ -4301,7 +4301,7 @@ (Parser GenesisCmd -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GenesisCmd -pGenesisKeyHash (InfoMod GenesisCmd -> ParserInfo GenesisCmd) +pGenesisKeyHash (InfoMod GenesisCmd -> ParserInfo GenesisCmd) -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a b. (a -> b) -> a -> b $ @@ -4316,7 +4316,7 @@ (Parser GenesisCmd -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GenesisCmd -pGenesisVerKey (InfoMod GenesisCmd -> ParserInfo GenesisCmd) +pGenesisVerKey (InfoMod GenesisCmd -> ParserInfo GenesisCmd) -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a b. (a -> b) -> a -> b $ @@ -4331,7 +4331,7 @@ (Parser GenesisCmd -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GenesisCmd -pGenesisAddr (InfoMod GenesisCmd -> ParserInfo GenesisCmd) +pGenesisAddr (InfoMod GenesisCmd -> ParserInfo GenesisCmd) -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a b. (a -> b) -> a -> b $ @@ -4346,7 +4346,7 @@ (Parser GenesisCmd -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GenesisCmd -pGenesisTxIn (InfoMod GenesisCmd -> ParserInfo GenesisCmd) +pGenesisTxIn (InfoMod GenesisCmd -> ParserInfo GenesisCmd) -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a b. (a -> b) -> a -> b $ @@ -4361,7 +4361,7 @@ (Parser GenesisCmd -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GenesisCmd -pGenesisCreate (InfoMod GenesisCmd -> ParserInfo GenesisCmd) +pGenesisCreate (InfoMod GenesisCmd -> ParserInfo GenesisCmd) -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a b. (a -> b) -> a -> b $ @@ -4380,7 +4380,7 @@ (Parser GenesisCmd -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GenesisCmd -pGenesisCreateStaked (InfoMod GenesisCmd -> ParserInfo GenesisCmd) +pGenesisCreateStaked (InfoMod GenesisCmd -> ParserInfo GenesisCmd) -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a b. (a -> b) -> a -> b $ @@ -4399,7 +4399,7 @@ (Parser GenesisCmd -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info Parser GenesisCmd -pGenesisHash (InfoMod GenesisCmd -> ParserInfo GenesisCmd) +pGenesisHash (InfoMod GenesisCmd -> ParserInfo GenesisCmd) -> InfoMod GenesisCmd -> ParserInfo GenesisCmd forall a b. (a -> b) -> a -> b $ @@ -4409,9 +4409,9 @@ "Compute the hash of a genesis file") ] where - pGenesisKeyGen :: Parser GenesisCmd - pGenesisKeyGen :: Parser GenesisCmd -pGenesisKeyGen = + pGenesisKeyGen :: Parser GenesisCmd + pGenesisKeyGen :: Parser GenesisCmd +pGenesisKeyGen = VerificationKeyFile -> SigningKeyFile -> GenesisCmd GenesisKeyGenGenesis (VerificationKeyFile -> SigningKeyFile -> GenesisCmd) -> Parser VerificationKeyFile @@ -4426,9 +4426,9 @@ pSigningKeyFile FileDirection Output - pGenesisDelegateKeyGen :: Parser GenesisCmd - pGenesisDelegateKeyGen :: Parser GenesisCmd -pGenesisDelegateKeyGen = + pGenesisDelegateKeyGen :: Parser GenesisCmd + pGenesisDelegateKeyGen :: Parser GenesisCmd +pGenesisDelegateKeyGen = VerificationKeyFile -> SigningKeyFile -> OpCertCounterFile -> GenesisCmd GenesisKeyGenDelegate (VerificationKeyFile @@ -4452,9 +4452,9 @@ <*> Parser OpCertCounterFile pOperatorCertIssueCounterFile - pGenesisUTxOKeyGen :: Parser GenesisCmd - pGenesisUTxOKeyGen :: Parser GenesisCmd -pGenesisUTxOKeyGen = + pGenesisUTxOKeyGen :: Parser GenesisCmd + pGenesisUTxOKeyGen :: Parser GenesisCmd +pGenesisUTxOKeyGen = VerificationKeyFile -> SigningKeyFile -> GenesisCmd GenesisKeyGenUTxO (VerificationKeyFile -> SigningKeyFile -> GenesisCmd) -> Parser VerificationKeyFile @@ -4469,9 +4469,9 @@ pSigningKeyFile FileDirection Output - pGenesisKeyHash :: Parser GenesisCmd - pGenesisKeyHash :: Parser GenesisCmd -pGenesisKeyHash = + pGenesisKeyHash :: Parser GenesisCmd + pGenesisKeyHash :: Parser GenesisCmd +pGenesisKeyHash = VerificationKeyFile -> GenesisCmd GenesisCmdKeyHash (VerificationKeyFile -> GenesisCmd) -> Parser VerificationKeyFile -> Parser GenesisCmd @@ -4480,9 +4480,9 @@ pVerificationKeyFile FileDirection Input - pGenesisVerKey :: Parser GenesisCmd - pGenesisVerKey :: Parser GenesisCmd -pGenesisVerKey = + pGenesisVerKey :: Parser GenesisCmd + pGenesisVerKey :: Parser GenesisCmd +pGenesisVerKey = VerificationKeyFile -> SigningKeyFile -> GenesisCmd GenesisVerKey (VerificationKeyFile -> SigningKeyFile -> GenesisCmd) -> Parser VerificationKeyFile @@ -4497,9 +4497,9 @@ pSigningKeyFile FileDirection Output - pGenesisAddr :: Parser GenesisCmd - pGenesisAddr :: Parser GenesisCmd -pGenesisAddr = + pGenesisAddr :: Parser GenesisCmd + pGenesisAddr :: Parser GenesisCmd +pGenesisAddr = VerificationKeyFile -> NetworkId -> Maybe OutputFile -> GenesisCmd GenesisAddr (VerificationKeyFile -> NetworkId -> Maybe OutputFile -> GenesisCmd) @@ -4518,9 +4518,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pGenesisTxIn :: Parser GenesisCmd - pGenesisTxIn :: Parser GenesisCmd -pGenesisTxIn = + pGenesisTxIn :: Parser GenesisCmd + pGenesisTxIn :: Parser GenesisCmd +pGenesisTxIn = VerificationKeyFile -> NetworkId -> Maybe OutputFile -> GenesisCmd GenesisTxIn (VerificationKeyFile -> NetworkId -> Maybe OutputFile -> GenesisCmd) @@ -4539,9 +4539,9 @@ <*> Parser (Maybe OutputFile) pMaybeOutputFile - pGenesisCreate :: Parser GenesisCmd - pGenesisCreate :: Parser GenesisCmd -pGenesisCreate = + pGenesisCreate :: Parser GenesisCmd + pGenesisCreate :: Parser GenesisCmd +pGenesisCreate = GenesisDir -> Word -> Word @@ -4566,7 +4566,7 @@ -> GenesisCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser GenesisDir -pGenesisDir +pGenesisDir Parser (Word -> Word @@ -4580,7 +4580,7 @@ -> Maybe SystemStart -> Maybe Lovelace -> NetworkId -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Word -pGenesisNumGenesisKeys +pGenesisNumGenesisKeys Parser (Word -> Maybe SystemStart -> Maybe Lovelace -> NetworkId -> GenesisCmd) @@ -4589,28 +4589,28 @@ (Maybe SystemStart -> Maybe Lovelace -> NetworkId -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Word -pGenesisNumUTxOKeys +pGenesisNumUTxOKeys Parser (Maybe SystemStart -> Maybe Lovelace -> NetworkId -> GenesisCmd) -> Parser (Maybe SystemStart) -> Parser (Maybe Lovelace -> NetworkId -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser (Maybe SystemStart) -pMaybeSystemStart +pMaybeSystemStart Parser (Maybe Lovelace -> NetworkId -> GenesisCmd) -> Parser (Maybe Lovelace) -> Parser (NetworkId -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser (Maybe Lovelace) -pInitialSupplyNonDelegated +pInitialSupplyNonDelegated Parser (NetworkId -> GenesisCmd) -> Parser NetworkId -> Parser GenesisCmd forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser NetworkId pNetworkId - pGenesisCreateStaked :: Parser GenesisCmd - pGenesisCreateStaked :: Parser GenesisCmd -pGenesisCreateStaked = + pGenesisCreateStaked :: Parser GenesisCmd + pGenesisCreateStaked :: Parser GenesisCmd +pGenesisCreateStaked = GenesisDir -> Word -> Word @@ -4654,7 +4654,7 @@ -> GenesisCmd) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser GenesisDir -pGenesisDir +pGenesisDir Parser (Word -> Word @@ -4683,7 +4683,7 @@ -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Word -pGenesisNumGenesisKeys +pGenesisNumGenesisKeys Parser (Word -> Word @@ -4710,7 +4710,7 @@ -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Word -pGenesisNumUTxOKeys +pGenesisNumUTxOKeys Parser (Word -> Word @@ -4735,7 +4735,7 @@ -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Word -pGenesisNumPools +pGenesisNumPools Parser (Word -> Maybe SystemStart @@ -4758,7 +4758,7 @@ -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Word -pGenesisNumStDelegs +pGenesisNumStDelegs Parser (Maybe SystemStart -> Maybe Lovelace @@ -4774,7 +4774,7 @@ -> Lovelace -> NetworkId -> Word -> Word -> Word -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser (Maybe SystemStart) -pMaybeSystemStart +pMaybeSystemStart Parser (Maybe Lovelace -> Lovelace -> NetworkId -> Word -> Word -> Word -> GenesisCmd) @@ -4783,14 +4783,14 @@ (Lovelace -> NetworkId -> Word -> Word -> Word -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser (Maybe Lovelace) -pInitialSupplyNonDelegated +pInitialSupplyNonDelegated Parser (Lovelace -> NetworkId -> Word -> Word -> Word -> GenesisCmd) -> Parser Lovelace -> Parser (NetworkId -> Word -> Word -> Word -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Lovelace -pInitialSupplyDelegated +pInitialSupplyDelegated Parser (NetworkId -> Word -> Word -> Word -> GenesisCmd) -> Parser NetworkId -> Parser (Word -> Word -> Word -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b @@ -4800,20 +4800,20 @@ -> Parser Word -> Parser (Word -> Word -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Word -pBulkPoolCredFiles +pBulkPoolCredFiles Parser (Word -> Word -> GenesisCmd) -> Parser Word -> Parser (Word -> GenesisCmd) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Word -pBulkPoolsPerFile +pBulkPoolsPerFile Parser (Word -> GenesisCmd) -> Parser Word -> Parser GenesisCmd forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Word -pStuffedUtxoCount +pStuffedUtxoCount - pGenesisHash :: Parser GenesisCmd - pGenesisHash :: Parser GenesisCmd -pGenesisHash = + pGenesisHash :: Parser GenesisCmd + pGenesisHash :: Parser GenesisCmd +pGenesisHash = GenesisFile -> GenesisCmd GenesisHashFile (GenesisFile -> GenesisCmd) -> Parser GenesisFile -> Parser GenesisCmd @@ -4822,9 +4822,9 @@ pGenesisFile String "The genesis file." - pGenesisDir :: Parser GenesisDir - pGenesisDir :: Parser GenesisDir -pGenesisDir = + pGenesisDir :: Parser GenesisDir + pGenesisDir :: Parser GenesisDir +pGenesisDir = String -> GenesisDir GenesisDir (String -> GenesisDir) -> Parser String -> Parser GenesisDir forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -4852,9 +4852,9 @@ "The genesis directory containing the genesis template and required genesis/delegation/spending keys." ) - pMaybeSystemStart :: Parser (Maybe SystemStart) - pMaybeSystemStart :: Parser (Maybe SystemStart) -pMaybeSystemStart = + pMaybeSystemStart :: Parser (Maybe SystemStart) + pMaybeSystemStart :: Parser (Maybe SystemStart) +pMaybeSystemStart = Parser SystemStart -> Parser (Maybe SystemStart) forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) Opt.optional (Parser SystemStart -> Parser (Maybe SystemStart)) @@ -4868,7 +4868,7 @@ Category cat => cat b c -> cat a b -> cat a c . String -> UTCTime -convertTime (String -> SystemStart) -> Parser String -> Parser SystemStart +convertTime (String -> SystemStart) -> Parser String -> Parser SystemStart forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Mod OptionFields String -> Parser String @@ -4894,9 +4894,9 @@ "The genesis start time in YYYY-MM-DDThh:mm:ssZ format. If unspecified, will be the current time +30 seconds." ) - pGenesisNumGenesisKeys :: Parser Word - pGenesisNumGenesisKeys :: Parser Word -pGenesisNumGenesisKeys = + pGenesisNumGenesisKeys :: Parser Word + pGenesisNumGenesisKeys :: Parser Word +pGenesisNumGenesisKeys = ReadM Word -> Mod OptionFields Word -> Parser Word forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM Word @@ -4929,9 +4929,9 @@ 0 ) - pGenesisNumUTxOKeys :: Parser Word - pGenesisNumUTxOKeys :: Parser Word -pGenesisNumUTxOKeys = + pGenesisNumUTxOKeys :: Parser Word + pGenesisNumUTxOKeys :: Parser Word +pGenesisNumUTxOKeys = ReadM Word -> Mod OptionFields Word -> Parser Word forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM Word @@ -4964,9 +4964,9 @@ 0 ) - pGenesisNumPools :: Parser Word - pGenesisNumPools :: Parser Word -pGenesisNumPools = + pGenesisNumPools :: Parser Word + pGenesisNumPools :: Parser Word +pGenesisNumPools = ReadM Word -> Mod OptionFields Word -> Parser Word forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM Word @@ -4999,9 +4999,9 @@ 0 ) - pGenesisNumStDelegs :: Parser Word - pGenesisNumStDelegs :: Parser Word -pGenesisNumStDelegs = + pGenesisNumStDelegs :: Parser Word + pGenesisNumStDelegs :: Parser Word +pGenesisNumStDelegs = ReadM Word -> Mod OptionFields Word -> Parser Word forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM Word @@ -5034,9 +5034,9 @@ 0 ) - pStuffedUtxoCount :: Parser Word - pStuffedUtxoCount :: Parser Word -pStuffedUtxoCount = + pStuffedUtxoCount :: Parser Word + pStuffedUtxoCount :: Parser Word +pStuffedUtxoCount = ReadM Word -> Mod OptionFields Word -> Parser Word forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM Word @@ -5069,9 +5069,9 @@ 0 ) - convertTime :: String -> UTCTime - convertTime :: String -> UTCTime -convertTime = + convertTime :: String -> UTCTime + convertTime :: String -> UTCTime +convertTime = Bool -> TimeLocale -> String -> String -> UTCTime forall t. ParseTime t => @@ -5086,9 +5086,9 @@ Just String "%H:%M:%SZ") - pInitialSupplyNonDelegated :: Parser (Maybe Lovelace) - pInitialSupplyNonDelegated :: Parser (Maybe Lovelace) -pInitialSupplyNonDelegated = + pInitialSupplyNonDelegated :: Parser (Maybe Lovelace) + pInitialSupplyNonDelegated :: Parser (Maybe Lovelace) +pInitialSupplyNonDelegated = Parser Lovelace -> Parser (Maybe Lovelace) forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) Opt.optional (Parser Lovelace -> Parser (Maybe Lovelace)) @@ -5124,9 +5124,9 @@ "The initial coin supply in Lovelace which will be evenly distributed across initial, non-delegating stake holders." ) - pInitialSupplyDelegated :: Parser Lovelace - pInitialSupplyDelegated :: Parser Lovelace -pInitialSupplyDelegated = + pInitialSupplyDelegated :: Parser Lovelace + pInitialSupplyDelegated :: Parser Lovelace +pInitialSupplyDelegated = (Maybe Integer -> Lovelace) -> Parser (Maybe Integer) -> Parser Lovelace forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -5180,9 +5180,9 @@ 0 ) - pBulkPoolCredFiles :: Parser Word - pBulkPoolCredFiles :: Parser Word -pBulkPoolCredFiles = + pBulkPoolCredFiles :: Parser Word + pBulkPoolCredFiles :: Parser Word +pBulkPoolCredFiles = ReadM Word -> Mod OptionFields Word -> Parser Word forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM Word @@ -5215,9 +5215,9 @@ 0 ) - pBulkPoolsPerFile :: Parser Word - pBulkPoolsPerFile :: Parser Word -pBulkPoolsPerFile = + pBulkPoolsPerFile :: Parser Word + pBulkPoolsPerFile :: Parser Word +pBulkPoolsPerFile = ReadM Word -> Mod OptionFields Word -> Parser Word forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM Word @@ -5258,7 +5258,7 @@ data FileDirection = Input | Output - deriving (FileDirection -> FileDirection -> Bool + deriving (FileDirection -> FileDirection -> Bool (FileDirection -> FileDirection -> Bool) -> (FileDirection -> FileDirection -> Bool) -> Eq FileDirection forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -5266,7 +5266,7 @@ $c/= :: FileDirection -> FileDirection -> Bool == :: FileDirection -> FileDirection -> Bool $c== :: FileDirection -> FileDirection -> Bool -Eq, Int -> FileDirection -> String -> String +Eq, Int -> FileDirection -> String -> String [FileDirection] -> String -> String FileDirection -> String (Int -> FileDirection -> String -> String) @@ -5432,7 +5432,7 @@ <> String -> Mod OptionFields String forall (f :: * -> *) a. String -> Mod f a Opt.help String -helpText +helpText Mod OptionFields String -> Mod OptionFields String -> Mod OptionFields String forall a. Semigroup a => a -> a -> a @@ -5480,8 +5480,8 @@ String "the use of the certificate.") where - helpText :: String -helpText = String + helpText :: String +helpText = String "Filepath of the certificate. This encompasses all \ \types of certificates (stake pool certificates, \ \stake key certificates etc). Optionally specify a script witness." @@ -5687,13 +5687,13 @@ pWithdrawal :: Parser (StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake)) pWithdrawal = - (\(StakeAddress -stakeAddr,Lovelace -lovelace) Maybe (ScriptWitnessFiles WitCtxStake) -maybeScriptFp -> (StakeAddress -stakeAddr, Lovelace -lovelace, Maybe (ScriptWitnessFiles WitCtxStake) -maybeScriptFp)) + (\(StakeAddress +stakeAddr,Lovelace +lovelace) Maybe (ScriptWitnessFiles WitCtxStake) +maybeScriptFp -> (StakeAddress +stakeAddr, Lovelace +lovelace, Maybe (ScriptWitnessFiles WitCtxStake) +maybeScriptFp)) ((StakeAddress, Lovelace) -> Maybe (ScriptWitnessFiles WitCtxStake) -> (StakeAddress, Lovelace, @@ -5711,7 +5711,7 @@ Opt.option (Parser (StakeAddress, Lovelace) -> ReadM (StakeAddress, Lovelace) forall a. Parser a -> ReadM a readerFromAttoParser Parser (StakeAddress, Lovelace) -parseWithdrawal) +parseWithdrawal) ( String -> Mod OptionFields (StakeAddress, Lovelace) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -5731,7 +5731,7 @@ <> String -> Mod OptionFields (StakeAddress, Lovelace) forall (f :: * -> *) a. String -> Mod f a Opt.help String -helpText +helpText ) Parser (Maybe (ScriptWitnessFiles WitCtxStake) @@ -5757,16 +5757,16 @@ String "the withdrawal of rewards.") where - helpText :: String -helpText = String + helpText :: String +helpText = String "The reward withdrawal as StakeAddress+Lovelace where \ \StakeAddress is the Bech32-encoded stake address \ \followed by the amount in Lovelace. Optionally specify \ \a script witness." - parseWithdrawal :: Atto.Parser (StakeAddress, Lovelace) - parseWithdrawal :: Parser (StakeAddress, Lovelace) -parseWithdrawal = + parseWithdrawal :: Atto.Parser (StakeAddress, Lovelace) + parseWithdrawal :: Parser (StakeAddress, Lovelace) +parseWithdrawal = (,) (StakeAddress -> Lovelace -> (StakeAddress, Lovelace)) -> Parser ByteString StakeAddress -> Parser ByteString (Lovelace -> (StakeAddress, Lovelace)) @@ -5963,8 +5963,8 @@ pSigningKeyFile :: FileDirection -> Parser SigningKeyFile pSigningKeyFile :: FileDirection -> Parser SigningKeyFile -pSigningKeyFile FileDirection -fdir = +pSigningKeyFile FileDirection +fdir = String -> SigningKeyFile SigningKeyFile (String -> SigningKeyFile) -> Parser String -> Parser SigningKeyFile @@ -5992,7 +5992,7 @@ Opt.help (FileDirection -> String forall a b. (Show a, ConvertText String b) => a -> b show FileDirection -fdir String -> String -> String +fdir String -> String -> String forall a. [a] -> [a] -> [a] ++ String " filepath of the signing key.") @@ -6160,8 +6160,8 @@ pGenesisFile :: String -> Parser GenesisFile pGenesisFile :: String -> Parser GenesisFile -pGenesisFile String -desc = +pGenesisFile String +desc = String -> GenesisFile GenesisFile (String -> GenesisFile) -> Parser String -> Parser GenesisFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -6186,7 +6186,7 @@ <> String -> Mod OptionFields String forall (f :: * -> *) a. String -> Mod f a Opt.help String -desc +desc Mod OptionFields String -> Mod OptionFields String -> Mod OptionFields String forall a. Semigroup a => a -> a -> a @@ -6464,12 +6464,12 @@ ) pVerificationKey - :: forall keyrole. SerialiseAsBech32 (VerificationKey keyrole) - => AsType keyrole - -> Parser (VerificationKey keyrole) + :: forall keyrole. SerialiseAsBech32 (VerificationKey keyrole) + => AsType keyrole + -> Parser (VerificationKey keyrole) pVerificationKey :: AsType keyrole -> Parser (VerificationKey keyrole) -pVerificationKey AsType keyrole -asType = +pVerificationKey AsType keyrole +asType = ReadM (VerificationKey keyrole) -> Mod OptionFields (VerificationKey keyrole) -> Parser (VerificationKey keyrole) @@ -6480,7 +6480,7 @@ SerialiseAsBech32 (VerificationKey keyrole) => AsType keyrole -> ReadM (VerificationKey keyrole) readVerificationKey AsType keyrole -asType) +asType) ( String -> Mod OptionFields (VerificationKey keyrole) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -6503,13 +6503,13 @@ "Verification key (Bech32 or hex-encoded)." ) -pVerificationKeyOrFile - :: SerialiseAsBech32 (VerificationKey keyrole) - => AsType keyrole - -> Parser (VerificationKeyOrFile keyrole) +pVerificationKeyOrFile + :: SerialiseAsBech32 (VerificationKey keyrole) + => AsType keyrole + -> Parser (VerificationKeyOrFile keyrole) pVerificationKeyOrFile :: AsType keyrole -> Parser (VerificationKeyOrFile keyrole) -pVerificationKeyOrFile AsType keyrole -asType = +pVerificationKeyOrFile AsType keyrole +asType = VerificationKey keyrole -> VerificationKeyOrFile keyrole forall keyrole. VerificationKey keyrole -> VerificationKeyOrFile keyrole @@ -6522,7 +6522,7 @@ SerialiseAsBech32 (VerificationKey keyrole) => AsType keyrole -> Parser (VerificationKey keyrole) pVerificationKey AsType keyrole -asType +asType Parser (VerificationKeyOrFile keyrole) -> Parser (VerificationKeyOrFile keyrole) -> Parser (VerificationKeyOrFile keyrole) @@ -6540,8 +6540,8 @@ pVerificationKeyFile :: FileDirection -> Parser VerificationKeyFile pVerificationKeyFile :: FileDirection -> Parser VerificationKeyFile -pVerificationKeyFile FileDirection -fdir = +pVerificationKeyFile FileDirection +fdir = String -> VerificationKeyFile VerificationKeyFile (String -> VerificationKeyFile) -> Parser String -> Parser VerificationKeyFile @@ -6569,7 +6569,7 @@ Opt.help (FileDirection -> String forall a b. (Show a, ConvertText String b) => a -> b show FileDirection -fdir String -> String -> String +fdir String -> String -> String forall a. [a] -> [a] -> [a] ++ String " filepath of the verification key.") @@ -6585,8 +6585,8 @@ pExtendedVerificationKeyFile :: FileDirection -> Parser VerificationKeyFile pExtendedVerificationKeyFile :: FileDirection -> Parser VerificationKeyFile -pExtendedVerificationKeyFile FileDirection -fdir = +pExtendedVerificationKeyFile FileDirection +fdir = String -> VerificationKeyFile VerificationKeyFile (String -> VerificationKeyFile) -> Parser String -> Parser VerificationKeyFile @@ -6614,7 +6614,7 @@ Opt.help (FileDirection -> String forall a b. (Show a, ConvertText String b) => a -> b show FileDirection -fdir String -> String -> String +fdir String -> String -> String forall a. [a] -> [a] -> [a] ++ String " filepath of the ed25519-bip32 verification key.") @@ -6678,7 +6678,7 @@ -> ReadM (Hash GenesisKey) forall a. (String -> Either String a) -> ReadM a Opt.eitherReader String -> Either String (Hash GenesisKey) -deserialiseFromHex) +deserialiseFromHex) ( String -> Mod OptionFields (Hash GenesisKey) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -6701,9 +6701,9 @@ "Genesis verification key hash (hex-encoded)." ) where - deserialiseFromHex :: String -> Either String (Hash GenesisKey) - deserialiseFromHex :: String -> Either String (Hash GenesisKey) -deserialiseFromHex = + deserialiseFromHex :: String -> Either String (Hash GenesisKey) + deserialiseFromHex :: String -> Either String (Hash GenesisKey) +deserialiseFromHex = Either String (Hash GenesisKey) -> (Hash GenesisKey -> Either String (Hash GenesisKey)) -> Maybe (Hash GenesisKey) @@ -6750,7 +6750,7 @@ -> ReadM (VerificationKey GenesisKey) forall a. (String -> Either String a) -> ReadM a Opt.eitherReader String -> Either String (VerificationKey GenesisKey) -deserialiseFromHex) +deserialiseFromHex) ( String -> Mod OptionFields (VerificationKey GenesisKey) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -6773,9 +6773,9 @@ "Genesis verification key (hex-encoded)." ) where - deserialiseFromHex :: String -> Either String (VerificationKey GenesisKey) - deserialiseFromHex :: String -> Either String (VerificationKey GenesisKey) -deserialiseFromHex = + deserialiseFromHex :: String -> Either String (VerificationKey GenesisKey) + deserialiseFromHex :: String -> Either String (VerificationKey GenesisKey) +deserialiseFromHex = Either String (VerificationKey GenesisKey) -> (VerificationKey GenesisKey -> Either String (VerificationKey GenesisKey)) @@ -6921,7 +6921,7 @@ -> ReadM (Hash GenesisDelegateKey) forall a. (String -> Either String a) -> ReadM a Opt.eitherReader String -> Either String (Hash GenesisDelegateKey) -deserialiseFromHex) +deserialiseFromHex) ( String -> Mod OptionFields (Hash GenesisDelegateKey) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -6944,9 +6944,9 @@ "Genesis delegate verification key hash (hex-encoded)." ) where - deserialiseFromHex :: String -> Either String (Hash GenesisDelegateKey) - deserialiseFromHex :: String -> Either String (Hash GenesisDelegateKey) -deserialiseFromHex = + deserialiseFromHex :: String -> Either String (Hash GenesisDelegateKey) + deserialiseFromHex :: String -> Either String (Hash GenesisDelegateKey) +deserialiseFromHex = Either String (Hash GenesisDelegateKey) -> (Hash GenesisDelegateKey -> Either String (Hash GenesisDelegateKey)) @@ -6998,7 +6998,7 @@ -> ReadM (VerificationKey GenesisDelegateKey) forall a. (String -> Either String a) -> ReadM a Opt.eitherReader String -> Either String (VerificationKey GenesisDelegateKey) -deserialiseFromHex) +deserialiseFromHex) ( String -> Mod OptionFields (VerificationKey GenesisDelegateKey) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -7021,11 +7021,11 @@ "Genesis delegate verification key (hex-encoded)." ) where - deserialiseFromHex + deserialiseFromHex :: String -> Either String (VerificationKey GenesisDelegateKey) - deserialiseFromHex :: String -> Either String (VerificationKey GenesisDelegateKey) -deserialiseFromHex = + deserialiseFromHex :: String -> Either String (VerificationKey GenesisDelegateKey) +deserialiseFromHex = Either String (VerificationKey GenesisDelegateKey) -> (VerificationKey GenesisDelegateKey -> Either String (VerificationKey GenesisDelegateKey)) @@ -7165,7 +7165,7 @@ -> ReadM (VerificationKey KesKey) forall a. (String -> Either String a) -> ReadM a Opt.eitherReader String -> Either String (VerificationKey KesKey) -deserialiseVerKey) +deserialiseVerKey) ( String -> Mod OptionFields (VerificationKey KesKey) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -7188,67 +7188,67 @@ "A Bech32 or hex-encoded hot KES verification key." ) where - asType :: AsType (VerificationKey KesKey) - asType :: AsType (VerificationKey KesKey) -asType = AsType KesKey -> AsType (VerificationKey KesKey) + asType :: AsType (VerificationKey KesKey) + asType :: AsType (VerificationKey KesKey) +asType = AsType KesKey -> AsType (VerificationKey KesKey) forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey AsType KesKey AsKesKey - deserialiseVerKey :: String -> Either String (VerificationKey KesKey) - deserialiseVerKey :: String -> Either String (VerificationKey KesKey) -deserialiseVerKey String -str = + deserialiseVerKey :: String -> Either String (VerificationKey KesKey) + deserialiseVerKey :: String -> Either String (VerificationKey KesKey) +deserialiseVerKey String +str = case AsType (VerificationKey KesKey) -> Text -> Either Bech32DecodeError (VerificationKey KesKey) forall a. SerialiseAsBech32 a => AsType a -> Text -> Either Bech32DecodeError a deserialiseFromBech32 AsType (VerificationKey KesKey) -asType (String -> Text +asType (String -> Text Text.pack String -str) of - Right VerificationKey KesKey -res -> VerificationKey KesKey -> Either String (VerificationKey KesKey) +str) of + Right VerificationKey KesKey +res -> VerificationKey KesKey -> Either String (VerificationKey KesKey) forall a b. b -> Either a b Right VerificationKey KesKey -res +res -- The input was valid Bech32, but some other error occurred. - Left err :: Bech32DecodeError -err@(Bech32UnexpectedPrefix Text + Left err :: Bech32DecodeError +err@(Bech32UnexpectedPrefix Text _ Set Text _) -> String -> Either String (VerificationKey KesKey) forall a b. a -> Either a b Left (Bech32DecodeError -> String forall e. Error e => e -> String displayError Bech32DecodeError -err) - Left err :: Bech32DecodeError -err@(Bech32DataPartToBytesError Text +err) + Left err :: Bech32DecodeError +err@(Bech32DataPartToBytesError Text _) -> String -> Either String (VerificationKey KesKey) forall a b. a -> Either a b Left (Bech32DecodeError -> String forall e. Error e => e -> String displayError Bech32DecodeError -err) - Left err :: Bech32DecodeError -err@(Bech32DeserialiseFromBytesError ByteString +err) + Left err :: Bech32DecodeError +err@(Bech32DeserialiseFromBytesError ByteString _) -> String -> Either String (VerificationKey KesKey) forall a b. a -> Either a b Left (Bech32DecodeError -> String forall e. Error e => e -> String displayError Bech32DecodeError -err) - Left err :: Bech32DecodeError -err@(Bech32WrongPrefix Text +err) + Left err :: Bech32DecodeError +err@(Bech32WrongPrefix Text _ Text _) -> String -> Either String (VerificationKey KesKey) forall a b. a -> Either a b Left (Bech32DecodeError -> String forall e. Error e => e -> String displayError Bech32DecodeError -err) +err) -- The input was not valid Bech32. Attempt to deserialise it as hex. Left (Bech32DecodingError DecodingError @@ -7259,14 +7259,14 @@ SerialiseAsRawBytes a => AsType a -> ByteString -> Maybe a deserialiseFromRawBytesHex AsType (VerificationKey KesKey) -asType (String -> ByteString +asType (String -> ByteString BSC.pack String -str) of - Just VerificationKey KesKey -res' -> VerificationKey KesKey -> Either String (VerificationKey KesKey) +str) of + Just VerificationKey KesKey +res' -> VerificationKey KesKey -> Either String (VerificationKey KesKey) forall a b. b -> Either a b Right VerificationKey KesKey -res' +res' Maybe (VerificationKey KesKey) Nothing -> String -> Either String (VerificationKey KesKey) forall a b. a -> Either a b @@ -7334,7 +7334,7 @@ pNetworkId :: Parser NetworkId pNetworkId = Parser NetworkId -pMainnet Parser NetworkId -> Parser NetworkId -> Parser NetworkId +pMainnet Parser NetworkId -> Parser NetworkId -> Parser NetworkId forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> (NetworkMagic -> NetworkId) -> Parser NetworkMagic -> Parser NetworkId @@ -7343,9 +7343,9 @@ Testnet Parser NetworkMagic pTestnetMagic where - pMainnet :: Parser NetworkId - pMainnet :: Parser NetworkId -pMainnet = + pMainnet :: Parser NetworkId + pMainnet :: Parser NetworkId +pMainnet = NetworkId -> Mod FlagFields NetworkId -> Parser NetworkId forall a. a -> Mod FlagFields a -> Parser a Opt.flag' NetworkId @@ -7648,23 +7648,23 @@ renderTxIn :: TxIn -> Text renderTxIn :: TxIn -> Text -renderTxIn (TxIn TxId -txid (TxIx Word -txix)) = +renderTxIn (TxIn TxId +txid (TxIx Word +txix)) = [Text] -> Text forall a. Monoid a => [a] -> a mconcat [ TxId -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText TxId -txid +txid , Text "#" , String -> Text Text.pack (Word -> String forall a b. (Show a, ConvertText String b) => a -> b show Word -txix) +txix) ] parseTxId :: Atto.Parser TxId @@ -7676,8 +7676,8 @@ -> Parser ByteString TxId -> Parser ByteString TxId forall a b. (a -> b) -> a -> b $ do - ByteString -bstr <- (Char -> Bool) -> Parser ByteString + ByteString +bstr <- (Char -> Bool) -> Parser ByteString Atto.takeWhile1 Char -> Bool Char.isHexDigit case AsType TxId -> ByteString -> Maybe TxId @@ -7686,12 +7686,12 @@ AsType a -> ByteString -> Maybe a deserialiseFromRawBytesHex AsType TxId AsTxId ByteString -bstr of - Just TxId -addr -> TxId -> Parser ByteString TxId +bstr of + Just TxId +addr -> TxId -> Parser ByteString TxId forall (m :: * -> *) a. Monad m => a -> m a return TxId -addr +addr Maybe TxId Nothing -> String -> Parser ByteString TxId forall (m :: * -> *) a. MonadFail m => String -> m a @@ -7704,7 +7704,7 @@ ++ ByteString -> String forall a b. (Show a, ConvertText String b) => a -> b show ByteString -bstr +bstr parseTxIx :: Atto.Parser TxIx parseTxIx :: Parser ByteString TxIx @@ -7815,7 +7815,7 @@ <> String -> Mod OptionFields Value forall (f :: * -> *) a. String -> Mod f a Opt.help String -helpText +helpText ) Parser ([ScriptWitnessFiles WitCtxMint] @@ -7840,8 +7840,8 @@ "the minting of assets for a particular policy Id.") where - helpText :: String -helpText = String + helpText :: String +helpText = String "Mint multi-asset value(s) with the multi-asset cli syntax. \ \You must specifiy a script witness." @@ -8091,8 +8091,8 @@ pTxBodyFile :: FileDirection -> Parser TxBodyFile pTxBodyFile :: FileDirection -> Parser TxBodyFile -pTxBodyFile FileDirection -fdir = +pTxBodyFile FileDirection +fdir = String -> TxBodyFile TxBodyFile (String -> TxBodyFile) -> Parser String -> Parser TxBodyFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -8103,7 +8103,7 @@ ( String -> Mod OptionFields String forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String -optName +optName Mod OptionFields String -> Mod OptionFields String -> Mod OptionFields String forall a. Semigroup a => a -> a -> a @@ -8119,7 +8119,7 @@ Opt.help (FileDirection -> String forall a b. (Show a, ConvertText String b) => a -> b show FileDirection -fdir String -> String -> String +fdir String -> String -> String forall a. [a] -> [a] -> [a] ++ String " filepath of the JSON TxBody.") @@ -8151,10 +8151,10 @@ ) ) where - optName :: String -optName = + optName :: String +optName = case FileDirection -fdir of +fdir of FileDirection Input -> String "tx-body-file" @@ -8165,8 +8165,8 @@ pTxFile :: FileDirection -> Parser TxFile pTxFile :: FileDirection -> Parser TxFile -pTxFile FileDirection -fdir = +pTxFile FileDirection +fdir = String -> TxFile TxFile (String -> TxFile) -> Parser String -> Parser TxFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -8177,7 +8177,7 @@ ( String -> Mod OptionFields String forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String -optName +optName Mod OptionFields String -> Mod OptionFields String -> Mod OptionFields String forall a. Semigroup a => a -> a -> a @@ -8193,7 +8193,7 @@ Opt.help (FileDirection -> String forall a b. (Show a, ConvertText String b) => a -> b show FileDirection -fdir String -> String -> String +fdir String -> String -> String forall a. [a] -> [a] -> [a] ++ String " filepath of the JSON Tx.") @@ -8225,10 +8225,10 @@ ) ) where - optName :: String -optName = + optName :: String +optName = case FileDirection -fdir of +fdir of FileDirection Input -> String "tx-file" @@ -8394,16 +8394,16 @@ pQueryFilter :: Parser QueryFilter pQueryFilter :: Parser QueryFilter pQueryFilter = Parser QueryFilter -pAddresses Parser QueryFilter -> Parser QueryFilter -> Parser QueryFilter +pAddresses Parser QueryFilter -> Parser QueryFilter -> Parser QueryFilter forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> QueryFilter -> Parser QueryFilter forall (f :: * -> *) a. Applicative f => a -> f a pure QueryFilter NoFilter where - pAddresses :: Parser QueryFilter - pAddresses :: Parser QueryFilter -pAddresses = Set AddressAny -> QueryFilter + pAddresses :: Parser QueryFilter + pAddresses :: Parser QueryFilter +pAddresses = Set AddressAny -> QueryFilter FilterByAddress (Set AddressAny -> QueryFilter) -> ([AddressAny] -> Set AddressAny) -> [AddressAny] -> QueryFilter forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). @@ -8492,7 +8492,7 @@ -> ReadM (Address ByronAddr) forall a. (String -> Either String a) -> ReadM a Opt.eitherReader String -> Either String (Address ByronAddr) -deserialise) +deserialise) ( String -> Mod OptionFields (Address ByronAddr) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -8515,9 +8515,9 @@ "Byron address (Base58-encoded)." ) where - deserialise :: String -> Either String (Address ByronAddr) - deserialise :: String -> Either String (Address ByronAddr) -deserialise = + deserialise :: String -> Either String (Address ByronAddr) + deserialise :: String -> Either String (Address ByronAddr) +deserialise = Either String (Address ByronAddr) -> (Address ByronAddr -> Either String (Address ByronAddr)) -> Maybe (Address ByronAddr) @@ -8798,7 +8798,7 @@ ((String -> Maybe (Hash StakePoolKey)) -> ReadM (Hash StakePoolKey) forall a. (String -> Maybe a) -> ReadM a Opt.maybeReader String -> Maybe (Hash StakePoolKey) -pBech32OrHexStakePoolId) +pBech32OrHexStakePoolId) ( String -> Mod OptionFields (Hash StakePoolKey) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -8822,22 +8822,22 @@ \Bech32-encoded or hex-encoded)." ) where - pBech32OrHexStakePoolId :: String -> Maybe (Hash StakePoolKey) - pBech32OrHexStakePoolId :: String -> Maybe (Hash StakePoolKey) -pBech32OrHexStakePoolId String -str = + pBech32OrHexStakePoolId :: String -> Maybe (Hash StakePoolKey) + pBech32OrHexStakePoolId :: String -> Maybe (Hash StakePoolKey) +pBech32OrHexStakePoolId String +str = String -> Maybe (Hash StakePoolKey) -pBech32StakePoolId String -str Maybe (Hash StakePoolKey) +pBech32StakePoolId String +str Maybe (Hash StakePoolKey) -> Maybe (Hash StakePoolKey) -> Maybe (Hash StakePoolKey) forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> String -> Maybe (Hash StakePoolKey) -pHexStakePoolId String -str +pHexStakePoolId String +str - pHexStakePoolId :: String -> Maybe (Hash StakePoolKey) - pHexStakePoolId :: String -> Maybe (Hash StakePoolKey) -pHexStakePoolId = + pHexStakePoolId :: String -> Maybe (Hash StakePoolKey) + pHexStakePoolId :: String -> Maybe (Hash StakePoolKey) +pHexStakePoolId = AsType (Hash StakePoolKey) -> ByteString -> Maybe (Hash StakePoolKey) forall a. @@ -8854,9 +8854,9 @@ . String -> ByteString BSC.pack - pBech32StakePoolId :: String -> Maybe (Hash StakePoolKey) - pBech32StakePoolId :: String -> Maybe (Hash StakePoolKey) -pBech32StakePoolId = + pBech32StakePoolId :: String -> Maybe (Hash StakePoolKey) + pBech32StakePoolId :: String -> Maybe (Hash StakePoolKey) +pBech32StakePoolId = (Bech32DecodeError -> Maybe (Hash StakePoolKey)) -> (Hash StakePoolKey -> Maybe (Hash StakePoolKey)) -> Either Bech32DecodeError (Hash StakePoolKey) @@ -9039,7 +9039,7 @@ ((String -> Either String (Hash VrfKey)) -> ReadM (Hash VrfKey) forall a. (String -> Either String a) -> ReadM a Opt.eitherReader String -> Either String (Hash VrfKey) -deserialiseFromHex) +deserialiseFromHex) ( String -> Mod OptionFields (Hash VrfKey) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -9060,9 +9060,9 @@ "VRF verification key hash (hex-encoded)." ) where - deserialiseFromHex :: String -> Either String (Hash VrfKey) - deserialiseFromHex :: String -> Either String (Hash VrfKey) -deserialiseFromHex = + deserialiseFromHex :: String -> Either String (Hash VrfKey) + deserialiseFromHex :: String -> Either String (Hash VrfKey) +deserialiseFromHex = Either String (Hash VrfKey) -> (Hash VrfKey -> Either String (Hash VrfKey)) -> Maybe (Hash VrfKey) @@ -9531,11 +9531,11 @@ -> Parser ByteString -> Parser StakePoolRelay forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser ByteString -pDNSName +pDNSName where - pDNSName :: Parser ByteString - pDNSName :: Parser ByteString -pDNSName = ReadM ByteString + pDNSName :: Parser ByteString + pDNSName :: Parser ByteString +pDNSName = ReadM ByteString -> Mod OptionFields ByteString -> Parser ByteString forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ((String -> Either String ByteString) -> ReadM ByteString @@ -9571,7 +9571,7 @@ -> Parser ByteString -> Parser (Maybe PortNumber -> StakePoolRelay) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser ByteString -pDNSName Parser (Maybe PortNumber -> StakePoolRelay) +pDNSName Parser (Maybe PortNumber -> StakePoolRelay) -> Parser (Maybe PortNumber) -> Parser StakePoolRelay forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser PortNumber -> Parser (Maybe PortNumber) @@ -9579,9 +9579,9 @@ optional Parser PortNumber pPort where - pDNSName :: Parser ByteString - pDNSName :: Parser ByteString -pDNSName = ReadM ByteString + pDNSName :: Parser ByteString + pDNSName :: Parser ByteString +pDNSName = ReadM ByteString -> Mod OptionFields ByteString -> Parser ByteString forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ((String -> Either String ByteString) -> ReadM ByteString @@ -9611,21 +9611,21 @@ eDNSName :: String -> Either String ByteString eDNSName :: String -> Either String ByteString -eDNSName String -str = +eDNSName String +str = -- We're using 'Shelley.textToDns' to validate the string. case Text -> Maybe DnsName Shelley.textToDns (String -> Text forall a b. ConvertText a b => a -> b toS String -str) of +str) of Maybe DnsName Nothing -> String -> Either String ByteString forall a b. a -> Either a b Left String "DNS name is more than 64 bytes" - Just DnsName -dnsName -> ByteString -> Either String ByteString + Just DnsName +dnsName -> ByteString -> Either String ByteString forall a b. b -> Either a b Right (ByteString -> Either String ByteString) -> (DnsName -> ByteString) -> DnsName -> Either String ByteString @@ -9642,12 +9642,12 @@ -> DnsName -> Either String ByteString forall a b. (a -> b) -> a -> b $ DnsName -dnsName +dnsName pSingleHostAddress :: Parser StakePoolRelay pSingleHostAddress :: Parser StakePoolRelay pSingleHostAddress = Maybe IPv4 -> Maybe IPv6 -> PortNumber -> StakePoolRelay -singleHostAddress +singleHostAddress (Maybe IPv4 -> Maybe IPv6 -> PortNumber -> StakePoolRelay) -> Parser (Maybe IPv4) -> Parser (Maybe IPv6 -> PortNumber -> StakePoolRelay) @@ -9669,15 +9669,15 @@ <*> Parser PortNumber pPort where - singleHostAddress :: Maybe IP.IPv4 -> Maybe IP.IPv6 -> PortNumber -> StakePoolRelay - singleHostAddress :: Maybe IPv4 -> Maybe IPv6 -> PortNumber -> StakePoolRelay -singleHostAddress Maybe IPv4 -ipv4 Maybe IPv6 -ipv6 PortNumber -port = + singleHostAddress :: Maybe IP.IPv4 -> Maybe IP.IPv6 -> PortNumber -> StakePoolRelay + singleHostAddress :: Maybe IPv4 -> Maybe IPv6 -> PortNumber -> StakePoolRelay +singleHostAddress Maybe IPv4 +ipv4 Maybe IPv6 +ipv6 PortNumber +port = case (Maybe IPv4 -ipv4, Maybe IPv6 -ipv6) of +ipv4, Maybe IPv6 +ipv6) of (Maybe IPv4 Nothing, Maybe IPv6 Nothing) -> @@ -9685,46 +9685,46 @@ forall a. HasCallStack => Text -> a panic Text "Please enter either an IPv4 or IPv6 address for the pool relay" - (Just IPv4 -i4, Maybe IPv6 + (Just IPv4 +i4, Maybe IPv6 Nothing) -> Maybe IPv4 -> Maybe IPv6 -> Maybe PortNumber -> StakePoolRelay StakePoolRelayIp (IPv4 -> Maybe IPv4 forall a. a -> Maybe a Just IPv4 -i4) Maybe IPv6 +i4) Maybe IPv6 forall a. Maybe a Nothing (PortNumber -> Maybe PortNumber forall a. a -> Maybe a Just PortNumber -port) +port) (Maybe IPv4 -Nothing, Just IPv6 -i6) -> +Nothing, Just IPv6 +i6) -> Maybe IPv4 -> Maybe IPv6 -> Maybe PortNumber -> StakePoolRelay StakePoolRelayIp Maybe IPv4 forall a. Maybe a Nothing (IPv6 -> Maybe IPv6 forall a. a -> Maybe a Just IPv6 -i6) (PortNumber -> Maybe PortNumber +i6) (PortNumber -> Maybe PortNumber forall a. a -> Maybe a Just PortNumber -port) - (Just IPv4 -i4, Just IPv6 -i6) -> +port) + (Just IPv4 +i4, Just IPv6 +i6) -> Maybe IPv4 -> Maybe IPv6 -> Maybe PortNumber -> StakePoolRelay StakePoolRelayIp (IPv4 -> Maybe IPv4 forall a. a -> Maybe a Just IPv4 -i4) (IPv6 -> Maybe IPv6 +i4) (IPv6 -> Maybe IPv6 forall a. a -> Maybe a Just IPv6 -i6) (PortNumber -> Maybe PortNumber +i6) (PortNumber -> Maybe PortNumber forall a. a -> Maybe a Just PortNumber -port) +port) @@ -9887,7 +9887,7 @@ -> ReadM (Hash StakePoolMetadata) forall a. (String -> Maybe a) -> ReadM a Opt.maybeReader String -> Maybe (Hash StakePoolMetadata) -metadataHash) +metadataHash) ( String -> Mod OptionFields (Hash StakePoolMetadata) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -9910,9 +9910,9 @@ "Pool metadata hash." ) where - metadataHash :: String -> Maybe (Hash StakePoolMetadata) - metadataHash :: String -> Maybe (Hash StakePoolMetadata) -metadataHash = AsType (Hash StakePoolMetadata) + metadataHash :: String -> Maybe (Hash StakePoolMetadata) + metadataHash :: String -> Maybe (Hash StakePoolMetadata) +metadataHash = AsType (Hash StakePoolMetadata) -> ByteString -> Maybe (Hash StakePoolMetadata) forall a. SerialiseAsRawBytes a => @@ -11507,7 +11507,7 @@ <$> Parser PraosNonce -> ReadM PraosNonce forall a. Parser a -> ReadM a readerFromAttoParser Parser PraosNonce -parsePraosNonce) +parsePraosNonce) ( String -> Mod OptionFields (Maybe PraosNonce) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String @@ -11552,18 +11552,18 @@ "Reset the Praos extra entropy to none." ) where - parsePraosNonce :: Atto.Parser PraosNonce - parsePraosNonce :: Parser PraosNonce -parsePraosNonce = ByteString -> PraosNonce + parsePraosNonce :: Atto.Parser PraosNonce + parsePraosNonce :: Parser PraosNonce +parsePraosNonce = ByteString -> PraosNonce makePraosNonce (ByteString -> PraosNonce) -> Parser ByteString -> Parser PraosNonce forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser ByteString -parseEntropyBytes +parseEntropyBytes - parseEntropyBytes :: Atto.Parser ByteString - parseEntropyBytes :: Parser ByteString -parseEntropyBytes = (String -> Parser ByteString) + parseEntropyBytes :: Atto.Parser ByteString + parseEntropyBytes :: Parser ByteString +parseEntropyBytes = (String -> Parser ByteString) -> (ByteString -> Parser ByteString) -> Either String ByteString -> Parser ByteString @@ -11636,7 +11636,7 @@ -> Parser AnyConsensusModeParams -> Parser AnyConsensusModeParams forall (f :: * -> *) a b. Applicative f => f a -> f b -> f b *> Parser AnyConsensusModeParams -pByronConsensusMode +pByronConsensusMode , () -> Mod FlagFields () -> Parser () forall a. a -> Mod FlagFields a -> Parser a Opt.flag' () @@ -11655,7 +11655,7 @@ -> Parser AnyConsensusModeParams -> Parser AnyConsensusModeParams forall (f :: * -> *) a b. Applicative f => f a -> f b -> f b *> Parser AnyConsensusModeParams -pCardanoConsensusMode +pCardanoConsensusMode , -- Default to the Cardano consensus mode. AnyConsensusModeParams -> Parser AnyConsensusModeParams forall (f :: * -> *) a. Applicative f => a -> f a @@ -11684,9 +11684,9 @@ defaultByronEpochSlots ] where - pCardanoConsensusMode :: Parser AnyConsensusModeParams - pCardanoConsensusMode :: Parser AnyConsensusModeParams -pCardanoConsensusMode = ConsensusModeParams CardanoMode -> AnyConsensusModeParams + pCardanoConsensusMode :: Parser AnyConsensusModeParams + pCardanoConsensusMode :: Parser AnyConsensusModeParams +pCardanoConsensusMode = ConsensusModeParams CardanoMode -> AnyConsensusModeParams forall mode. ConsensusModeParams mode -> AnyConsensusModeParams AnyConsensusModeParams (ConsensusModeParams CardanoMode -> AnyConsensusModeParams) -> (EpochSlots -> ConsensusModeParams CardanoMode) @@ -11701,9 +11701,9 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser EpochSlots pEpochSlots - pByronConsensusMode :: Parser AnyConsensusModeParams - pByronConsensusMode :: Parser AnyConsensusModeParams -pByronConsensusMode = ConsensusModeParams ByronMode -> AnyConsensusModeParams + pByronConsensusMode :: Parser AnyConsensusModeParams + pByronConsensusMode :: Parser AnyConsensusModeParams +pByronConsensusMode = ConsensusModeParams ByronMode -> AnyConsensusModeParams forall mode. ConsensusModeParams mode -> AnyConsensusModeParams AnyConsensusModeParams (ConsensusModeParams ByronMode -> AnyConsensusModeParams) -> (EpochSlots -> ConsensusModeParams ByronMode) @@ -11776,14 +11776,14 @@ -> Parser Natural -> Parser (Natural -> (Natural, Natural)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Parser Natural -pProtocolMajorVersion Parser (Natural -> (Natural, Natural)) +pProtocolMajorVersion Parser (Natural -> (Natural, Natural)) -> Parser Natural -> Parser (Natural, Natural) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Parser Natural -pProtocolMinorVersion +pProtocolMinorVersion where - pProtocolMajorVersion :: Parser Natural -pProtocolMajorVersion = + pProtocolMajorVersion :: Parser Natural +pProtocolMajorVersion = ReadM Natural -> Mod OptionFields Natural -> Parser Natural forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM Natural @@ -11808,8 +11808,8 @@ Opt.help String "Major protocol version. An increase indicates a hard fork." ) - pProtocolMinorVersion :: Parser Natural -pProtocolMinorVersion = + pProtocolMinorVersion :: Parser Natural +pProtocolMinorVersion = ReadM Natural -> Mod OptionFields Natural -> Parser Natural forall a. ReadM a -> Mod OptionFields a -> Parser a Opt.option ReadM Natural @@ -11843,12 +11843,12 @@ parseLovelace :: Atto.Parser Lovelace parseLovelace :: Parser Lovelace parseLovelace = do - Integer -i <- Parser Integer + Integer +i <- Parser Integer forall a. Integral a => Parser a Atto.decimal if Integer -i Integer -> Integer -> Bool +i Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool > Word64 -> Integer forall a. Integral a => a -> Integer @@ -11862,7 +11862,7 @@ $ Integer -> String forall a b. (Show a, ConvertText String b) => a -> b show Integer -i String -> String -> String +i String -> String -> String forall a. Semigroup a => a -> a -> a <> String " lovelace exceeds the Word64 upper bound" @@ -11872,13 +11872,13 @@ forall a b. (a -> b) -> a -> b $ Integer -> Lovelace Lovelace Integer -i +i parseAddressAny :: Atto.Parser AddressAny parseAddressAny :: Parser AddressAny parseAddressAny = do - Text -str <- Parser Text + Text +str <- Parser Text lexPlausibleAddressString case AsType AddressAny -> Text -> Maybe AddressAny forall addr. @@ -11886,23 +11886,23 @@ AsType addr -> Text -> Maybe addr deserialiseAddress AsType AddressAny AsAddressAny Text -str of +str of Maybe AddressAny Nothing -> String -> Parser AddressAny forall (m :: * -> *) a. MonadFail m => String -> m a fail String "invalid address" - Just AddressAny -addr -> AddressAny -> Parser AddressAny + Just AddressAny +addr -> AddressAny -> Parser AddressAny forall (f :: * -> *) a. Applicative f => a -> f a pure AddressAny -addr +addr parseStakeAddress :: Atto.Parser StakeAddress parseStakeAddress :: Parser ByteString StakeAddress parseStakeAddress = do - Text -str <- Parser Text + Text +str <- Parser Text lexPlausibleAddressString case AsType StakeAddress -> Text -> Maybe StakeAddress forall addr. @@ -11910,7 +11910,7 @@ AsType addr -> Text -> Maybe addr deserialiseAddress AsType StakeAddress AsStakeAddress Text -str of +str of Maybe StakeAddress Nothing -> String -> Parser ByteString StakeAddress forall (m :: * -> *) a. MonadFail m => String -> m a @@ -11922,12 +11922,12 @@ forall a. Semigroup a => a -> a -> a <> Text -> String Text.unpack Text -str - Just StakeAddress -addr -> StakeAddress -> Parser ByteString StakeAddress +str + Just StakeAddress +addr -> StakeAddress -> Parser ByteString StakeAddress forall (f :: * -> *) a. Applicative f => a -> f a pure StakeAddress -addr +addr lexPlausibleAddressString :: Atto.Parser Text lexPlausibleAddressString :: Parser Text @@ -11937,47 +11937,47 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> (Char -> Bool) -> Parser ByteString Atto.takeWhile1 Char -> Bool -isPlausibleAddressChar +isPlausibleAddressChar where -- Covers both base58 and bech32 (with constrained prefixes) - isPlausibleAddressChar :: Char -> Bool -isPlausibleAddressChar Char -c = + isPlausibleAddressChar :: Char -> Bool +isPlausibleAddressChar Char +c = (Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool >= Char 'a' Bool -> Bool -> Bool && Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool <= Char 'z') Bool -> Bool -> Bool || (Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool >= Char 'A' Bool -> Bool -> Bool && Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool <= Char 'Z') Bool -> Bool -> Bool || (Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool >= Char '0' Bool -> Bool -> Bool && Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Ord a => a -> a -> Bool <= Char '9') Bool -> Bool -> Bool || Char -c Char -> Char -> Bool +c Char -> Char -> Bool forall a. Eq a => a -> a -> Bool == Char '_' @@ -11989,21 +11989,21 @@ -- | Read a Bech32 or hex-encoded verification key. readVerificationKey - :: forall keyrole. SerialiseAsBech32 (VerificationKey keyrole) - => AsType keyrole - -> Opt.ReadM (VerificationKey keyrole) + :: forall keyrole. SerialiseAsBech32 (VerificationKey keyrole) + => AsType keyrole + -> Opt.ReadM (VerificationKey keyrole) readVerificationKey :: AsType keyrole -> ReadM (VerificationKey keyrole) -readVerificationKey AsType keyrole -asType = +readVerificationKey AsType keyrole +asType = (String -> Either String (VerificationKey keyrole)) -> ReadM (VerificationKey keyrole) forall a. (String -> Either String a) -> ReadM a Opt.eitherReader String -> Either String (VerificationKey keyrole) -deserialiseFromBech32OrHex +deserialiseFromBech32OrHex where - keyFormats :: NonEmpty (InputFormat (VerificationKey keyrole)) - keyFormats :: NonEmpty (InputFormat (VerificationKey keyrole)) -keyFormats = [InputFormat (VerificationKey keyrole)] + keyFormats :: NonEmpty (InputFormat (VerificationKey keyrole)) + keyFormats :: NonEmpty (InputFormat (VerificationKey keyrole)) +keyFormats = [InputFormat (VerificationKey keyrole)] -> NonEmpty (InputFormat (VerificationKey keyrole)) forall a. [a] -> NonEmpty a NE.fromList [InputFormat (VerificationKey keyrole) @@ -12012,12 +12012,12 @@ forall a. SerialiseAsRawBytes a => InputFormat a InputFormatHex] - deserialiseFromBech32OrHex + deserialiseFromBech32OrHex :: String - -> Either String (VerificationKey keyrole) - deserialiseFromBech32OrHex :: String -> Either String (VerificationKey keyrole) -deserialiseFromBech32OrHex String -str = + -> Either String (VerificationKey keyrole) + deserialiseFromBech32OrHex :: String -> Either String (VerificationKey keyrole) +deserialiseFromBech32OrHex String +str = (InputDecodeError -> String) -> Either InputDecodeError (VerificationKey keyrole) -> Either String (VerificationKey keyrole) @@ -12049,20 +12049,20 @@ deserialiseInput (AsType keyrole -> AsType (VerificationKey keyrole) forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey AsType keyrole -asType) NonEmpty (InputFormat (VerificationKey keyrole)) -keyFormats (String -> ByteString +asType) NonEmpty (InputFormat (VerificationKey keyrole)) +keyFormats (String -> ByteString BSC.pack String -str) +str) readOutputFormat :: Opt.ReadM OutputFormat readOutputFormat :: ReadM OutputFormat readOutputFormat = do - String -s <- ReadM String + String +s <- ReadM String forall s. IsString s => ReadM s Opt.str case String -s of +s of String "hex" -> OutputFormat -> ReadM OutputFormat forall (f :: * -> *) a. Applicative f => a -> f a @@ -12084,7 +12084,7 @@ String -> String -> String forall a. Semigroup a => a -> a -> a <> String -s +s String -> String -> String forall a. Semigroup a => a -> a -> a <> String @@ -12092,37 +12092,37 @@ readURIOfMaxLength :: Int -> Opt.ReadM Text readURIOfMaxLength :: Int -> ReadM Text -readURIOfMaxLength Int -maxLen = +readURIOfMaxLength Int +maxLen = String -> Text Text.pack (String -> Text) -> ReadM String -> ReadM Text forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Int -> ReadM String readStringOfMaxLength Int -maxLen +maxLen readStringOfMaxLength :: Int -> Opt.ReadM String readStringOfMaxLength :: Int -> ReadM String -readStringOfMaxLength Int -maxLen = do - String -s <- ReadM String +readStringOfMaxLength Int +maxLen = do + String +s <- ReadM String forall s. IsString s => ReadM s Opt.str - let strLen :: Int -strLen = String -> Int + let strLen :: Int +strLen = String -> Int forall a. HasLength a => a -> Int length String -s +s if Int -strLen Int -> Int -> Bool +strLen Int -> Int -> Bool forall a. Ord a => a -> a -> Bool <= Int -maxLen +maxLen then String -> ReadM String forall (f :: * -> *) a. Applicative f => a -> f a pure String -s +s else String -> ReadM String forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> ReadM String) -> String -> ReadM String @@ -12135,7 +12135,7 @@ <> Int -> String forall a b. (Show a, ConvertText String b) => a -> b show Int -strLen +strLen String -> String -> String forall a. Semigroup a => a -> a -> a <> String @@ -12147,25 +12147,25 @@ readRational ReadM Rational -> (Rational -> ReadM Rational) -> ReadM Rational forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= Rational -> ReadM Rational -checkUnitInterval +checkUnitInterval where - checkUnitInterval :: Rational -> Opt.ReadM Rational - checkUnitInterval :: Rational -> ReadM Rational -checkUnitInterval Rational -q + checkUnitInterval :: Rational -> Opt.ReadM Rational + checkUnitInterval :: Rational -> ReadM Rational +checkUnitInterval Rational +q | Rational -q Rational -> Rational -> Bool +q Rational -> Rational -> Bool forall a. Ord a => a -> a -> Bool >= Rational 0 Bool -> Bool -> Bool && Rational -q Rational -> Rational -> Bool +q Rational -> Rational -> Bool forall a. Ord a => a -> a -> Bool <= Rational 1 = Rational -> ReadM Rational forall (m :: * -> *) a. Monad m => a -> m a return Rational -q +q | Bool otherwise = String -> ReadM Rational forall (m :: * -> *) a. MonadFail m => String -> m a @@ -12183,16 +12183,16 @@ readerFromAttoParser Parser Scientific Atto.scientific -readerFromAttoParser :: Atto.Parser a -> Opt.ReadM a +readerFromAttoParser :: Atto.Parser a -> Opt.ReadM a readerFromAttoParser :: Parser a -> ReadM a -readerFromAttoParser Parser a -p = +readerFromAttoParser Parser a +p = (String -> Either String a) -> ReadM a forall a. (String -> Either String a) -> ReadM a Opt.eitherReader (Parser a -> ByteString -> Either String a forall a. Parser a -> ByteString -> Either String a Atto.parseOnly (Parser a -p Parser a -> Parser ByteString () -> Parser a +p Parser a -> Parser ByteString () -> Parser a forall (f :: * -> *) a b. Applicative f => f a -> f b -> f a <* Parser ByteString () forall t. Chunk t => Parser t () @@ -12204,10 +12204,10 @@ . String -> ByteString BSC.pack) -readerFromParsecParser :: Parsec.Parser a -> Opt.ReadM a +readerFromParsecParser :: Parsec.Parser a -> Opt.ReadM a readerFromParsecParser :: Parser a -> ReadM a -readerFromParsecParser Parser a -p = +readerFromParsecParser Parser a +p = (String -> Either String a) -> ReadM a forall a. (String -> Either String a) -> ReadM a Opt.eitherReader ((ParseError -> String) -> Either ParseError a -> Either String a @@ -12215,7 +12215,7 @@ Bifunctor p => (a -> b) -> p a c -> p b c first ParseError -> String -formatError (Either ParseError a -> Either String a) +formatError (Either ParseError a -> Either String a) -> (String -> Either ParseError a) -> String -> Either String a forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -12225,7 +12225,7 @@ Stream s Identity t => Parsec s () a -> String -> s -> Either ParseError a Parsec.parse (Parser a -p Parser a -> ParsecT String () Identity () -> Parser a +p Parser a -> ParsecT String () Identity () -> Parser a forall (f :: * -> *) a b. Applicative f => f a -> f b -> f a <* ParsecT String () Identity () forall s (m :: * -> *) t u. @@ -12236,9 +12236,9 @@ where --TODO: the default parsec error formatting is quite good, but we could -- customise it somewhat: - formatError :: ParseError -> String -formatError ParseError -err = + formatError :: ParseError -> String +formatError ParseError +err = String -> String -> String -> String -> String -> [Message] -> String Parsec.showErrorMessages String @@ -12250,13 +12250,13 @@ "end of input" (ParseError -> [Message] Parsec.errorMessages ParseError -err) +err) -subParser :: String -> ParserInfo a -> Parser a +subParser :: String -> ParserInfo a -> Parser a subParser :: String -> ParserInfo a -> Parser a -subParser String -availableCommand ParserInfo a -pInfo = +subParser String +availableCommand ParserInfo a +pInfo = Mod CommandFields a -> Parser a forall a. Mod CommandFields a -> Parser a Opt.hsubparser (Mod CommandFields a -> Parser a) @@ -12265,11 +12265,11 @@ $ String -> ParserInfo a -> Mod CommandFields a forall a. String -> ParserInfo a -> Mod CommandFields a Opt.command String -availableCommand ParserInfo a -pInfo Mod CommandFields a -> Mod CommandFields a -> Mod CommandFields a +availableCommand ParserInfo a +pInfo Mod CommandFields a -> Mod CommandFields a -> Mod CommandFields a forall a. Semigroup a => a -> a -> a <> String -> Mod CommandFields a forall (f :: * -> *) a. HasMetavar f => String -> Mod f a Opt.metavar String -availableCommand +availableCommand \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.Address.Info.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.Address.Info.html index 4e0e0a88501..96a509355a0 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.Address.Info.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.Address.Info.html @@ -14,7 +14,7 @@ import qualified Data.ByteString.Lazy.Char8 as LBS newtype ShelleyAddressInfoError = ShelleyAddressInvalid Text - deriving Int -> ShelleyAddressInfoError -> ShowS + deriving Int -> ShelleyAddressInfoError -> ShowS [ShelleyAddressInfoError] -> ShowS ShelleyAddressInfoError -> String (Int -> ShelleyAddressInfoError -> ShowS) @@ -32,16 +32,16 @@ Show instance Error ShelleyAddressInfoError where - displayError :: ShelleyAddressInfoError -> String -displayError (ShelleyAddressInvalid Text -addrTxt) = + displayError :: ShelleyAddressInfoError -> String +displayError (ShelleyAddressInvalid Text +addrTxt) = String "Invalid address: " String -> ShowS forall a. Semigroup a => a -> a -> a <> Text -> String forall a b. (Show a, ConvertText String b) => a -> b show Text -addrTxt +addrTxt data AddressInfo = AddressInfo { AddressInfo -> Text @@ -56,10 +56,10 @@ aiBase16 :: !Text } -instance ToJSON AddressInfo where - toJSON :: AddressInfo -> Value -toJSON AddressInfo -addrInfo = +instance ToJSON AddressInfo where + toJSON :: AddressInfo -> Value +toJSON AddressInfo +addrInfo = [Pair] -> Value object [ Text @@ -67,40 +67,40 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AddressInfo -> Text aiType AddressInfo -addrInfo +addrInfo , Text "era" Text -> Text -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AddressInfo -> Text aiEra AddressInfo -addrInfo +addrInfo , Text "encoding" Text -> Text -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AddressInfo -> Text aiEncoding AddressInfo -addrInfo +addrInfo , Text "address" Text -> Text -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AddressInfo -> Text aiAddress AddressInfo -addrInfo +addrInfo , Text "base16" Text -> Text -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AddressInfo -> Text aiBase16 AddressInfo -addrInfo +addrInfo ] runAddressInfo :: Text -> Maybe OutputFile -> ExceptT ShelleyAddressInfoError IO () runAddressInfo :: Text -> Maybe OutputFile -> ExceptT ShelleyAddressInfoError IO () -runAddressInfo Text -addrTxt Maybe OutputFile -mOutputFp = do - AddressInfo -addrInfo <- case (AddressAny -> Either AddressAny StakeAddress +runAddressInfo Text +addrTxt Maybe OutputFile +mOutputFp = do + AddressInfo +addrInfo <- case (AddressAny -> Either AddressAny StakeAddress forall a b. a -> Either a b Left (AddressAny -> Either AddressAny StakeAddress) -> Maybe AddressAny -> Maybe (Either AddressAny StakeAddress) @@ -111,7 +111,7 @@ AsType addr -> Text -> Maybe addr deserialiseAddress AsType AddressAny AsAddressAny Text -addrTxt) +addrTxt) Maybe (Either AddressAny StakeAddress) -> Maybe (Either AddressAny StakeAddress) -> Maybe (Either AddressAny StakeAddress) @@ -127,7 +127,7 @@ AsType addr -> Text -> Maybe addr deserialiseAddress AsType StakeAddress AsStakeAddress Text -addrTxt) of +addrTxt) of Maybe (Either AddressAny StakeAddress) Nothing -> @@ -141,10 +141,10 @@ forall a b. (a -> b) -> a -> b $ Text -> ShelleyAddressInfoError ShelleyAddressInvalid Text -addrTxt +addrTxt - Just (Left (AddressByron Address ByronAddr -payaddr)) -> + Just (Left (AddressByron Address ByronAddr +payaddr)) -> AddressInfo -> ExceptT ShelleyAddressInfoError IO AddressInfo forall (f :: * -> *) a. Applicative f => a -> f a pure (AddressInfo -> ExceptT ShelleyAddressInfoError IO AddressInfo) @@ -163,16 +163,16 @@ "base58" , aiAddress :: Text aiAddress = Text -addrTxt +addrTxt , aiBase16 :: Text aiBase16 = Address ByronAddr -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText Address ByronAddr -payaddr +payaddr } - Just (Left (AddressShelley Address ShelleyAddr -payaddr)) -> + Just (Left (AddressShelley Address ShelleyAddr +payaddr)) -> AddressInfo -> ExceptT ShelleyAddressInfoError IO AddressInfo forall (f :: * -> *) a. Applicative f => a -> f a pure (AddressInfo -> ExceptT ShelleyAddressInfoError IO AddressInfo) @@ -191,16 +191,16 @@ "bech32" , aiAddress :: Text aiAddress = Text -addrTxt +addrTxt , aiBase16 :: Text aiBase16 = Address ShelleyAddr -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText Address ShelleyAddr -payaddr +payaddr } - Just (Right StakeAddress -addr) -> + Just (Right StakeAddress +addr) -> AddressInfo -> ExceptT ShelleyAddressInfoError IO AddressInfo forall (f :: * -> *) a. Applicative f => a -> f a pure (AddressInfo -> ExceptT ShelleyAddressInfoError IO AddressInfo) @@ -219,30 +219,30 @@ "bech32" , aiAddress :: Text aiAddress = Text -addrTxt +addrTxt , aiBase16 :: Text aiBase16 = StakeAddress -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText StakeAddress -addr +addr } case Maybe OutputFile -mOutputFp of - Just (OutputFile String -fpath) -> IO () -> ExceptT ShelleyAddressInfoError IO () +mOutputFp of + Just (OutputFile String +fpath) -> IO () -> ExceptT ShelleyAddressInfoError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyAddressInfoError IO ()) -> IO () -> ExceptT ShelleyAddressInfoError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -fpath (ByteString -> IO ()) -> ByteString -> IO () +fpath (ByteString -> IO ()) -> ByteString -> IO () forall a b. (a -> b) -> a -> b $ AddressInfo -> ByteString forall a. ToJSON a => a -> ByteString encodePretty AddressInfo -addrInfo +addrInfo Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyAddressInfoError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -255,6 +255,6 @@ $ AddressInfo -> ByteString forall a. ToJSON a => a -> ByteString encodePretty AddressInfo -addrInfo +addrInfo \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.Address.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.Address.html index f4990f3b2fe..9676c57ed12 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.Address.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.Address.html @@ -41,7 +41,7 @@ | ShelleyAddressCmdReadScriptFileError !(FileError ScriptDecodeError) | ShelleyAddressCmdVerificationKeyTextOrFileError !VerificationKeyTextOrFileError | ShelleyAddressCmdWriteFileError !(FileError ()) - deriving Int -> ShelleyAddressCmdError -> ShowS + deriving Int -> ShelleyAddressCmdError -> ShowS [ShelleyAddressCmdError] -> ShowS ShelleyAddressCmdError -> String (Int -> ShelleyAddressCmdError -> ShowS) @@ -60,95 +60,95 @@ renderShelleyAddressCmdError :: ShelleyAddressCmdError -> Text renderShelleyAddressCmdError :: ShelleyAddressCmdError -> Text -renderShelleyAddressCmdError ShelleyAddressCmdError -err = +renderShelleyAddressCmdError ShelleyAddressCmdError +err = case ShelleyAddressCmdError -err of - ShelleyAddressCmdAddressInfoError ShelleyAddressInfoError -addrInfoErr -> +err of + ShelleyAddressCmdAddressInfoError ShelleyAddressInfoError +addrInfoErr -> String -> Text Text.pack (ShelleyAddressInfoError -> String forall e. Error e => e -> String displayError ShelleyAddressInfoError -addrInfoErr) - ShelleyAddressCmdReadKeyFileError FileError InputDecodeError -fileErr -> +addrInfoErr) + ShelleyAddressCmdReadKeyFileError FileError InputDecodeError +fileErr -> String -> Text Text.pack (FileError InputDecodeError -> String forall e. Error e => e -> String displayError FileError InputDecodeError -fileErr) - ShelleyAddressCmdVerificationKeyTextOrFileError VerificationKeyTextOrFileError -vkTextOrFileErr -> +fileErr) + ShelleyAddressCmdVerificationKeyTextOrFileError VerificationKeyTextOrFileError +vkTextOrFileErr -> VerificationKeyTextOrFileError -> Text renderVerificationKeyTextOrFileError VerificationKeyTextOrFileError -vkTextOrFileErr - ShelleyAddressCmdReadScriptFileError FileError ScriptDecodeError -fileErr -> +vkTextOrFileErr + ShelleyAddressCmdReadScriptFileError FileError ScriptDecodeError +fileErr -> String -> Text Text.pack (FileError ScriptDecodeError -> String forall e. Error e => e -> String displayError FileError ScriptDecodeError -fileErr) - ShelleyAddressCmdWriteFileError FileError () -fileErr -> String -> Text +fileErr) + ShelleyAddressCmdWriteFileError FileError () +fileErr -> String -> Text Text.pack (FileError () -> String forall e. Error e => e -> String displayError FileError () -fileErr) +fileErr) runAddressCmd :: AddressCmd -> ExceptT ShelleyAddressCmdError IO () runAddressCmd :: AddressCmd -> ExceptT ShelleyAddressCmdError IO () -runAddressCmd AddressCmd -cmd = +runAddressCmd AddressCmd +cmd = case AddressCmd -cmd of - AddressKeyGen AddressKeyType -kt VerificationKeyFile -vkf SigningKeyFile -skf -> AddressKeyType +cmd of + AddressKeyGen AddressKeyType +kt VerificationKeyFile +vkf SigningKeyFile +skf -> AddressKeyType -> VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyAddressCmdError IO () runAddressKeyGen AddressKeyType -kt VerificationKeyFile -vkf SigningKeyFile -skf - AddressKeyHash VerificationKeyTextOrFile -vkf Maybe OutputFile -mOFp -> VerificationKeyTextOrFile +kt VerificationKeyFile +vkf SigningKeyFile +skf + AddressKeyHash VerificationKeyTextOrFile +vkf Maybe OutputFile +mOFp -> VerificationKeyTextOrFile -> Maybe OutputFile -> ExceptT ShelleyAddressCmdError IO () runAddressKeyHash VerificationKeyTextOrFile -vkf Maybe OutputFile -mOFp - AddressBuild PaymentVerifier -paymentVerifier Maybe StakeVerifier -mbStakeVerifier NetworkId -nw Maybe OutputFile -mOutFp -> PaymentVerifier +vkf Maybe OutputFile +mOFp + AddressBuild PaymentVerifier +paymentVerifier Maybe StakeVerifier +mbStakeVerifier NetworkId +nw Maybe OutputFile +mOutFp -> PaymentVerifier -> Maybe StakeVerifier -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyAddressCmdError IO () runAddressBuild PaymentVerifier -paymentVerifier Maybe StakeVerifier -mbStakeVerifier NetworkId -nw Maybe OutputFile -mOutFp - AddressBuildMultiSig ScriptFile -sFp NetworkId -nId Maybe OutputFile -mOutFp -> ScriptFile +paymentVerifier Maybe StakeVerifier +mbStakeVerifier NetworkId +nw Maybe OutputFile +mOutFp + AddressBuildMultiSig ScriptFile +sFp NetworkId +nId Maybe OutputFile +mOutFp -> ScriptFile -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyAddressCmdError IO () runAddressBuildScript ScriptFile -sFp NetworkId -nId Maybe OutputFile -mOutFp - AddressInfo Text -txt Maybe OutputFile -mOFp -> (ShelleyAddressInfoError -> ShelleyAddressCmdError) +sFp NetworkId +nId Maybe OutputFile +mOutFp + AddressInfo Text +txt Maybe OutputFile +mOFp -> (ShelleyAddressInfoError -> ShelleyAddressCmdError) -> ExceptT ShelleyAddressInfoError IO () -> ExceptT ShelleyAddressCmdError IO () forall (m :: * -> *) x y a. @@ -162,8 +162,8 @@ forall a b. (a -> b) -> a -> b $ Text -> Maybe OutputFile -> ExceptT ShelleyAddressInfoError IO () runAddressInfo Text -txt Maybe OutputFile -mOFp +txt Maybe OutputFile +mOFp runAddressKeyGen :: AddressKeyType -> VerificationKeyFile @@ -173,39 +173,39 @@ -> VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyAddressCmdError IO () -runAddressKeyGen AddressKeyType -kt (VerificationKeyFile String -vkeyPath) (SigningKeyFile String -skeyPath) = +runAddressKeyGen AddressKeyType +kt (VerificationKeyFile String +vkeyPath) (SigningKeyFile String +skeyPath) = case AddressKeyType -kt of +kt of AddressKeyType AddressKeyShelley -> AsType PaymentKey -> ExceptT ShelleyAddressCmdError IO () forall keyrole. Key keyrole => AsType keyrole -> ExceptT ShelleyAddressCmdError IO () -generateAndWriteKeyFiles AsType PaymentKey +generateAndWriteKeyFiles AsType PaymentKey AsPaymentKey AddressKeyType AddressKeyShelleyExtended -> AsType PaymentExtendedKey -> ExceptT ShelleyAddressCmdError IO () forall keyrole. Key keyrole => AsType keyrole -> ExceptT ShelleyAddressCmdError IO () -generateAndWriteKeyFiles AsType PaymentExtendedKey +generateAndWriteKeyFiles AsType PaymentExtendedKey AsPaymentExtendedKey AddressKeyType AddressKeyByron -> AsType ByronKey -> ExceptT ShelleyAddressCmdError IO () forall keyrole. Key keyrole => AsType keyrole -> ExceptT ShelleyAddressCmdError IO () -generateAndWriteKeyFiles AsType ByronKey +generateAndWriteKeyFiles AsType ByronKey AsByronKey where - generateAndWriteKeyFiles :: AsType keyrole -> ExceptT ShelleyAddressCmdError IO () -generateAndWriteKeyFiles AsType keyrole -asType = do - SigningKey keyrole -skey <- IO (SigningKey keyrole) + generateAndWriteKeyFiles :: AsType keyrole -> ExceptT ShelleyAddressCmdError IO () +generateAndWriteKeyFiles AsType keyrole +asType = do + SigningKey keyrole +skey <- IO (SigningKey keyrole) -> ExceptT ShelleyAddressCmdError IO (SigningKey keyrole) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (SigningKey keyrole) @@ -218,14 +218,14 @@ Key keyrole => AsType keyrole -> IO (SigningKey keyrole) generateSigningKey AsType keyrole -asType - let vkey :: VerificationKey keyrole -vkey = SigningKey keyrole -> VerificationKey keyrole +asType + let vkey :: VerificationKey keyrole +vkey = SigningKey keyrole -> VerificationKey keyrole forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey keyrole -skey +skey (FileError () -> ShelleyAddressCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyAddressCmdError IO () @@ -259,11 +259,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -skeyDesc) SigningKey keyrole -skey +skeyDesc) SigningKey keyrole +skey (FileError () -> ShelleyAddressCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyAddressCmdError IO () @@ -297,18 +297,18 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -vkeyDesc) VerificationKey keyrole -vkey +vkeyDesc) VerificationKey keyrole +vkey - skeyDesc, vkeyDesc :: TextEnvelopeDescr - skeyDesc :: TextEnvelopeDescr -skeyDesc = TextEnvelopeDescr + skeyDesc, vkeyDesc :: TextEnvelopeDescr + skeyDesc :: TextEnvelopeDescr +skeyDesc = TextEnvelopeDescr "Payment Signing Key" - vkeyDesc :: TextEnvelopeDescr -vkeyDesc = TextEnvelopeDescr + vkeyDesc :: TextEnvelopeDescr +vkeyDesc = TextEnvelopeDescr "Payment Verification Key" @@ -317,11 +317,11 @@ -> ExceptT ShelleyAddressCmdError IO () runAddressKeyHash :: VerificationKeyTextOrFile -> Maybe OutputFile -> ExceptT ShelleyAddressCmdError IO () -runAddressKeyHash VerificationKeyTextOrFile -vkeyTextOrFile Maybe OutputFile -mOutputFp = do - SomeAddressVerificationKey -vkey <- (VerificationKeyTextOrFileError -> ShelleyAddressCmdError) +runAddressKeyHash VerificationKeyTextOrFile +vkeyTextOrFile Maybe OutputFile +mOutputFp = do + SomeAddressVerificationKey +vkey <- (VerificationKeyTextOrFileError -> ShelleyAddressCmdError) -> ExceptT VerificationKeyTextOrFileError IO SomeAddressVerificationKey -> ExceptT ShelleyAddressCmdError IO SomeAddressVerificationKey @@ -341,10 +341,10 @@ -> ExceptT VerificationKeyTextOrFileError IO SomeAddressVerificationKey readAddressVerificationKeyTextOrFile VerificationKeyTextOrFile -vkeyTextOrFile +vkeyTextOrFile - let hexKeyHash :: ByteString -hexKeyHash = (forall keyrole. + let hexKeyHash :: ByteString +hexKeyHash = (forall keyrole. Key keyrole => VerificationKey keyrole -> ByteString) -> SomeAddressVerificationKey -> ByteString @@ -366,20 +366,20 @@ Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash) SomeAddressVerificationKey -vkey +vkey case Maybe OutputFile -mOutputFp of - Just (OutputFile String -fpath) -> IO () -> ExceptT ShelleyAddressCmdError IO () +mOutputFp of + Just (OutputFile String +fpath) -> IO () -> ExceptT ShelleyAddressCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyAddressCmdError IO ()) -> IO () -> ExceptT ShelleyAddressCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () BS.writeFile String -fpath ByteString -hexKeyHash +fpath ByteString +hexKeyHash Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyAddressCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -388,7 +388,7 @@ forall a b. (a -> b) -> a -> b $ ByteString -> IO () BS.putStrLn ByteString -hexKeyHash +hexKeyHash runAddressBuild :: PaymentVerifier @@ -401,18 +401,18 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyAddressCmdError IO () -runAddressBuild PaymentVerifier -paymentVerifier Maybe StakeVerifier -mbStakeVerifier NetworkId -nw Maybe OutputFile -mOutFp = do - Text -outText <- case PaymentVerifier -paymentVerifier of - PaymentVerifierKey VerificationKeyTextOrFile -payVkeyTextOrFile -> do - SomeAddressVerificationKey -payVKey <- (VerificationKeyTextOrFileError -> ShelleyAddressCmdError) +runAddressBuild PaymentVerifier +paymentVerifier Maybe StakeVerifier +mbStakeVerifier NetworkId +nw Maybe OutputFile +mOutFp = do + Text +outText <- case PaymentVerifier +paymentVerifier of + PaymentVerifierKey VerificationKeyTextOrFile +payVkeyTextOrFile -> do + SomeAddressVerificationKey +payVKey <- (VerificationKeyTextOrFileError -> ShelleyAddressCmdError) -> ExceptT VerificationKeyTextOrFileError IO SomeAddressVerificationKey -> ExceptT ShelleyAddressCmdError IO SomeAddressVerificationKey @@ -432,23 +432,23 @@ -> ExceptT VerificationKeyTextOrFileError IO SomeAddressVerificationKey readAddressVerificationKeyTextOrFile VerificationKeyTextOrFile -payVkeyTextOrFile +payVkeyTextOrFile - AddressAny -addr <- case SomeAddressVerificationKey -payVKey of - AByronVerificationKey VerificationKey ByronKey -vk -> + AddressAny +addr <- case SomeAddressVerificationKey +payVKey of + AByronVerificationKey VerificationKey ByronKey +vk -> AddressAny -> ExceptT ShelleyAddressCmdError IO AddressAny forall (m :: * -> *) a. Monad m => a -> m a return (Address ByronAddr -> AddressAny AddressByron (NetworkId -> VerificationKey ByronKey -> Address ByronAddr makeByronAddress NetworkId -nw VerificationKey ByronKey -vk)) +nw VerificationKey ByronKey +vk)) - APaymentVerificationKey VerificationKey PaymentKey -vk -> + APaymentVerificationKey VerificationKey PaymentKey +vk -> Address ShelleyAddr -> AddressAny AddressShelley (Address ShelleyAddr -> AddressAny) -> ExceptT ShelleyAddressCmdError IO (Address ShelleyAddr) @@ -459,12 +459,12 @@ -> NetworkId -> ExceptT ShelleyAddressCmdError IO (Address ShelleyAddr) buildShelleyAddress VerificationKey PaymentKey -vk Maybe StakeVerifier -mbStakeVerifier NetworkId -nw +vk Maybe StakeVerifier +mbStakeVerifier NetworkId +nw - APaymentExtendedVerificationKey VerificationKey PaymentExtendedKey -vk -> + APaymentExtendedVerificationKey VerificationKey PaymentExtendedKey +vk -> Address ShelleyAddr -> AddressAny AddressShelley (Address ShelleyAddr -> AddressAny) -> ExceptT ShelleyAddressCmdError IO (Address ShelleyAddr) @@ -479,12 +479,12 @@ CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey VerificationKey PaymentExtendedKey -vk) Maybe StakeVerifier -mbStakeVerifier NetworkId -nw +vk) Maybe StakeVerifier +mbStakeVerifier NetworkId +nw - AGenesisUTxOVerificationKey VerificationKey GenesisUTxOKey -vk -> + AGenesisUTxOVerificationKey VerificationKey GenesisUTxOKey +vk -> Address ShelleyAddr -> AddressAny AddressShelley (Address ShelleyAddr -> AddressAny) -> ExceptT ShelleyAddressCmdError IO (Address ShelleyAddr) @@ -499,9 +499,9 @@ CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey VerificationKey GenesisUTxOKey -vk) Maybe StakeVerifier -mbStakeVerifier NetworkId -nw +vk) Maybe StakeVerifier +mbStakeVerifier NetworkId +nw Text -> ExceptT ShelleyAddressCmdError IO Text forall (m :: * -> *) a. Monad m => a -> m a @@ -511,13 +511,13 @@ $ AddressAny -> Text forall addr. SerialiseAddress addr => addr -> Text serialiseAddress (AddressAny -addr :: AddressAny) +addr :: AddressAny) - PaymentVerifierScriptFile (ScriptFile String -fp) -> do - ScriptInAnyLang ScriptLanguage lang -_lang Script lang -script <- + PaymentVerifierScriptFile (ScriptFile String +fp) -> do + ScriptInAnyLang ScriptLanguage lang +_lang Script lang +script <- (FileError ScriptDecodeError -> ShelleyAddressCmdError) -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang -> ExceptT ShelleyAddressCmdError IO ScriptInAnyLang @@ -533,14 +533,14 @@ $ String -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang readFileScriptInAnyLang String -fp +fp - let payCred :: PaymentCredential -payCred = ScriptHash -> PaymentCredential + let payCred :: PaymentCredential +payCred = ScriptHash -> PaymentCredential PaymentCredentialByScript (Script lang -> ScriptHash forall lang. Script lang -> ScriptHash hashScript Script lang -script) +script) Address ShelleyAddr -> Text forall addr. SerialiseAddress addr => addr -> Text @@ -556,28 +556,28 @@ -> StakeAddressReference -> Address ShelleyAddr makeShelleyAddress NetworkId -nw PaymentCredential -payCred (StakeAddressReference -> Text) +nw PaymentCredential +payCred (StakeAddressReference -> Text) -> ExceptT ShelleyAddressCmdError IO StakeAddressReference -> ExceptT ShelleyAddressCmdError IO Text forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe StakeVerifier -> ExceptT ShelleyAddressCmdError IO StakeAddressReference makeStakeAddressRef Maybe StakeVerifier -mbStakeVerifier +mbStakeVerifier case Maybe OutputFile -mOutFp of - Just (OutputFile String -fpath) -> IO () -> ExceptT ShelleyAddressCmdError IO () +mOutFp of + Just (OutputFile String +fpath) -> IO () -> ExceptT ShelleyAddressCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyAddressCmdError IO ()) -> IO () -> ExceptT ShelleyAddressCmdError IO () forall a b. (a -> b) -> a -> b $ String -> Text -> IO () Text.writeFile String -fpath Text -outText +fpath Text +outText Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyAddressCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -586,30 +586,30 @@ forall a b. (a -> b) -> a -> b $ Text -> IO () Text.putStr Text -outText +outText makeStakeAddressRef :: Maybe StakeVerifier -> ExceptT ShelleyAddressCmdError IO StakeAddressReference makeStakeAddressRef :: Maybe StakeVerifier -> ExceptT ShelleyAddressCmdError IO StakeAddressReference -makeStakeAddressRef Maybe StakeVerifier -mbStakeVerifier = do +makeStakeAddressRef Maybe StakeVerifier +mbStakeVerifier = do case Maybe StakeVerifier -mbStakeVerifier of +mbStakeVerifier of Maybe StakeVerifier Nothing -> StakeAddressReference -> ExceptT ShelleyAddressCmdError IO StakeAddressReference forall (f :: * -> *) a. Applicative f => a -> f a pure StakeAddressReference NoStakeAddress - Just StakeVerifier -stakeVerifier -> case StakeVerifier -stakeVerifier of - StakeVerifierKey VerificationKeyOrFile StakeKey -stkVkeyOrFile -> do - Maybe (VerificationKey StakeKey) -mstakeVKey <- (FileError InputDecodeError -> ShelleyAddressCmdError) + Just StakeVerifier +stakeVerifier -> case StakeVerifier +stakeVerifier of + StakeVerifierKey VerificationKeyOrFile StakeKey +stkVkeyOrFile -> do + Maybe (VerificationKey StakeKey) +mstakeVKey <- (FileError InputDecodeError -> ShelleyAddressCmdError) -> ExceptT (FileError InputDecodeError) IO (Maybe (VerificationKey StakeKey)) -> ExceptT @@ -670,7 +670,7 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType StakeKey AsStakeKey VerificationKeyOrFile StakeKey -stkVkeyOrFile +stkVkeyOrFile StakeAddressReference -> ExceptT ShelleyAddressCmdError IO StakeAddressReference @@ -709,13 +709,13 @@ VerificationKey keyrole -> Hash keyrole verificationKeyHash) Maybe (VerificationKey StakeKey) -mstakeVKey +mstakeVKey - StakeVerifierScriptFile (ScriptFile String -fp) -> do - ScriptInAnyLang ScriptLanguage lang -_lang Script lang -script <- + StakeVerifierScriptFile (ScriptFile String +fp) -> do + ScriptInAnyLang ScriptLanguage lang +_lang Script lang +script <- (FileError ScriptDecodeError -> ShelleyAddressCmdError) -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang -> ExceptT ShelleyAddressCmdError IO ScriptInAnyLang @@ -731,20 +731,20 @@ $ String -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang readFileScriptInAnyLang String -fp +fp - let stakeCred :: StakeCredential -stakeCred = ScriptHash -> StakeCredential + let stakeCred :: StakeCredential +stakeCred = ScriptHash -> StakeCredential StakeCredentialByScript (Script lang -> ScriptHash forall lang. Script lang -> ScriptHash hashScript Script lang -script) +script) StakeAddressReference -> ExceptT ShelleyAddressCmdError IO StakeAddressReference forall (m :: * -> *) a. Monad m => a -> m a return (StakeCredential -> StakeAddressReference StakeAddressByValue StakeCredential -stakeCred) +stakeCred) buildShelleyAddress :: VerificationKey PaymentKey @@ -755,29 +755,29 @@ -> Maybe StakeVerifier -> NetworkId -> ExceptT ShelleyAddressCmdError IO (Address ShelleyAddr) -buildShelleyAddress VerificationKey PaymentKey -vkey Maybe StakeVerifier -mbStakeVerifier NetworkId -nw = +buildShelleyAddress VerificationKey PaymentKey +vkey Maybe StakeVerifier +mbStakeVerifier NetworkId +nw = NetworkId -> PaymentCredential -> StakeAddressReference -> Address ShelleyAddr makeShelleyAddress NetworkId -nw (Hash PaymentKey -> PaymentCredential +nw (Hash PaymentKey -> PaymentCredential PaymentCredentialByKey (VerificationKey PaymentKey -> Hash PaymentKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey PaymentKey -vkey)) (StakeAddressReference -> Address ShelleyAddr) +vkey)) (StakeAddressReference -> Address ShelleyAddr) -> ExceptT ShelleyAddressCmdError IO StakeAddressReference -> ExceptT ShelleyAddressCmdError IO (Address ShelleyAddr) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe StakeVerifier -> ExceptT ShelleyAddressCmdError IO StakeAddressReference makeStakeAddressRef Maybe StakeVerifier -mbStakeVerifier +mbStakeVerifier -- @@ -791,7 +791,7 @@ | APaymentVerificationKey (VerificationKey PaymentKey) | APaymentExtendedVerificationKey (VerificationKey PaymentExtendedKey) | AGenesisUTxOVerificationKey (VerificationKey GenesisUTxOKey) - deriving (Int -> SomeAddressVerificationKey -> ShowS + deriving (Int -> SomeAddressVerificationKey -> ShowS [SomeAddressVerificationKey] -> ShowS SomeAddressVerificationKey -> String (Int -> SomeAddressVerificationKey -> ShowS) @@ -808,35 +808,35 @@ $cshowsPrec :: Int -> SomeAddressVerificationKey -> ShowS Show) -foldSomeAddressVerificationKey :: (forall keyrole. Key keyrole => - VerificationKey keyrole -> a) - -> SomeAddressVerificationKey -> a +foldSomeAddressVerificationKey :: (forall keyrole. Key keyrole => + VerificationKey keyrole -> a) + -> SomeAddressVerificationKey -> a foldSomeAddressVerificationKey :: (forall keyrole. Key keyrole => VerificationKey keyrole -> a) -> SomeAddressVerificationKey -> a -foldSomeAddressVerificationKey forall keyrole. Key keyrole => VerificationKey keyrole -> a -f (AByronVerificationKey VerificationKey ByronKey -vk) = VerificationKey ByronKey -> a +foldSomeAddressVerificationKey forall keyrole. Key keyrole => VerificationKey keyrole -> a +f (AByronVerificationKey VerificationKey ByronKey +vk) = VerificationKey ByronKey -> a +forall keyrole. Key keyrole => VerificationKey keyrole -> a +f VerificationKey ByronKey +vk +foldSomeAddressVerificationKey forall keyrole. Key keyrole => VerificationKey keyrole -> a +f (APaymentVerificationKey VerificationKey PaymentKey +vk) = VerificationKey PaymentKey -> a forall keyrole. Key keyrole => VerificationKey keyrole -> a -f VerificationKey ByronKey +f VerificationKey PaymentKey vk -foldSomeAddressVerificationKey forall keyrole. Key keyrole => VerificationKey keyrole -> a -f (APaymentVerificationKey VerificationKey PaymentKey -vk) = VerificationKey PaymentKey -> a +foldSomeAddressVerificationKey forall keyrole. Key keyrole => VerificationKey keyrole -> a +f (APaymentExtendedVerificationKey VerificationKey PaymentExtendedKey +vk) = VerificationKey PaymentExtendedKey -> a forall keyrole. Key keyrole => VerificationKey keyrole -> a -f VerificationKey PaymentKey +f VerificationKey PaymentExtendedKey vk -foldSomeAddressVerificationKey forall keyrole. Key keyrole => VerificationKey keyrole -> a -f (APaymentExtendedVerificationKey VerificationKey PaymentExtendedKey -vk) = VerificationKey PaymentExtendedKey -> a +foldSomeAddressVerificationKey forall keyrole. Key keyrole => VerificationKey keyrole -> a +f (AGenesisUTxOVerificationKey VerificationKey GenesisUTxOKey +vk) = VerificationKey GenesisUTxOKey -> a forall keyrole. Key keyrole => VerificationKey keyrole -> a -f VerificationKey PaymentExtendedKey +f VerificationKey GenesisUTxOKey vk -foldSomeAddressVerificationKey forall keyrole. Key keyrole => VerificationKey keyrole -> a -f (AGenesisUTxOVerificationKey VerificationKey GenesisUTxOKey -vk) = VerificationKey GenesisUTxOKey -> a -forall keyrole. Key keyrole => VerificationKey keyrole -> a -f VerificationKey GenesisUTxOKey -vk readAddressVerificationKeyTextOrFile :: VerificationKeyTextOrFile @@ -844,8 +844,8 @@ readAddressVerificationKeyTextOrFile :: VerificationKeyTextOrFile -> ExceptT VerificationKeyTextOrFileError IO SomeAddressVerificationKey -readAddressVerificationKeyTextOrFile VerificationKeyTextOrFile -vkTextOrFile = +readAddressVerificationKeyTextOrFile VerificationKeyTextOrFile +vkTextOrFile = IO (Either VerificationKeyTextOrFileError SomeAddressVerificationKey) -> ExceptT @@ -872,12 +872,12 @@ -> VerificationKeyTextOrFile -> IO (Either VerificationKeyTextOrFileError b) readVerificationKeyTextOrFileAnyOf [FromSomeType SerialiseAsBech32 SomeAddressVerificationKey] -bech32Types [FromSomeType HasTextEnvelope SomeAddressVerificationKey] -textEnvTypes VerificationKeyTextOrFile -vkTextOrFile +bech32Types [FromSomeType HasTextEnvelope SomeAddressVerificationKey] +textEnvTypes VerificationKeyTextOrFile +vkTextOrFile where - bech32Types :: [FromSomeType SerialiseAsBech32 SomeAddressVerificationKey] -bech32Types = + bech32Types :: [FromSomeType SerialiseAsBech32 SomeAddressVerificationKey] +bech32Types = [ AsType (VerificationKey PaymentKey) -> (VerificationKey PaymentKey -> SomeAddressVerificationKey) -> FromSomeType SerialiseAsBech32 SomeAddressVerificationKey @@ -906,8 +906,8 @@ APaymentExtendedVerificationKey ] - textEnvTypes :: [FromSomeType HasTextEnvelope SomeAddressVerificationKey] -textEnvTypes = + textEnvTypes :: [FromSomeType HasTextEnvelope SomeAddressVerificationKey] +textEnvTypes = [ AsType (VerificationKey ByronKey) -> (VerificationKey ByronKey -> SomeAddressVerificationKey) -> FromSomeType HasTextEnvelope SomeAddressVerificationKey @@ -973,10 +973,10 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyAddressCmdError IO () -runAddressBuildScript ScriptFile -scriptFile NetworkId -networkId Maybe OutputFile -mOutputFile = do +runAddressBuildScript ScriptFile +scriptFile NetworkId +networkId Maybe OutputFile +mOutputFile = do IO () -> ExceptT ShelleyAddressCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO IO () @@ -988,11 +988,11 @@ -> ExceptT ShelleyAddressCmdError IO () runAddressBuild (ScriptFile -> PaymentVerifier PaymentVerifierScriptFile ScriptFile -scriptFile) Maybe StakeVerifier +scriptFile) Maybe StakeVerifier forall a. Maybe a Nothing NetworkId -networkId Maybe OutputFile -mOutputFile +networkId Maybe OutputFile +mOutputFile deprecationWarning :: IO () deprecationWarning :: IO () diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.Genesis.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.Genesis.html index ca95552c5fa..1838f64fb75 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.Genesis.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.Genesis.html @@ -102,7 +102,7 @@ | ShelleyGenesisCmdPoolCmdError !ShelleyPoolCmdError | ShelleyGenesisCmdStakeAddressCmdError !ShelleyStakeAddressCmdError | ShelleyGenesisCmdCostModelsError !FilePath - deriving Int -> ShelleyGenesisCmdError -> ShowS + deriving Int -> ShelleyGenesisCmdError -> ShowS [ShelleyGenesisCmdError] -> ShowS ShelleyGenesisCmdError -> String (Int -> ShelleyGenesisCmdError -> ShowS) @@ -121,20 +121,20 @@ renderShelleyGenesisCmdError :: ShelleyGenesisCmdError -> Text renderShelleyGenesisCmdError :: ShelleyGenesisCmdError -> Text -renderShelleyGenesisCmdError ShelleyGenesisCmdError -err = +renderShelleyGenesisCmdError ShelleyGenesisCmdError +err = case ShelleyGenesisCmdError -err of - ShelleyGenesisCmdAesonDecodeError String -fp Text -decErr -> +err of + ShelleyGenesisCmdAesonDecodeError String +fp Text +decErr -> Text "Error while decoding Shelley genesis at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " Error: " Text -> Text -> Text @@ -142,27 +142,27 @@ <> Text -> Text forall a. Show a => a -> Text textShow Text -decErr - ShelleyGenesisCmdGenesisFileError FileError () -fe -> String -> Text +decErr + ShelleyGenesisCmdGenesisFileError FileError () +fe -> String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b $ FileError () -> String forall e. Error e => e -> String displayError FileError () -fe - ShelleyGenesisCmdFileError FileError () -fe -> String -> Text +fe + ShelleyGenesisCmdFileError FileError () +fe -> String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b $ FileError () -> String forall e. Error e => e -> String displayError FileError () -fe - ShelleyGenesisCmdMismatchedGenesisKeyFiles [Int] -gfiles [Int] -dfiles [Int] -vfiles -> +fe + ShelleyGenesisCmdMismatchedGenesisKeyFiles [Int] +gfiles [Int] +dfiles [Int] +vfiles -> Text "Mismatch between the files found:\n" Text -> Text -> Text @@ -173,7 +173,7 @@ <> [Int] -> Text forall a. Show a => a -> Text textShow [Int] -gfiles Text -> Text -> Text +gfiles Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text "\n" @@ -185,7 +185,7 @@ <> [Int] -> Text forall a. Show a => a -> Text textShow [Int] -dfiles Text -> Text -> Text +dfiles Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text "\n" @@ -197,9 +197,9 @@ <> [Int] -> Text forall a. Show a => a -> Text textShow [Int] -vfiles - ShelleyGenesisCmdFilesNoIndex [String] -files -> +vfiles + ShelleyGenesisCmdFilesNoIndex [String] +files -> Text "The genesis keys files are expected to have a numeric index but these do not:\n" Text -> Text -> Text @@ -209,9 +209,9 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map String -> Text Text.pack [String] -files) - ShelleyGenesisCmdFilesDupIndex [String] -files -> +files) + ShelleyGenesisCmdFilesDupIndex [String] +files -> Text "The genesis keys files are expected to have a unique numeric index but these do not:\n" Text -> Text -> Text @@ -221,148 +221,148 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map String -> Text Text.pack [String] -files) - ShelleyGenesisCmdTextEnvReadFileError FileError TextEnvelopeError -fileErr -> String -> Text +files) + ShelleyGenesisCmdTextEnvReadFileError FileError TextEnvelopeError +fileErr -> String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b $ FileError TextEnvelopeError -> String forall e. Error e => e -> String displayError FileError TextEnvelopeError -fileErr - ShelleyGenesisCmdUnexpectedAddressVerificationKey (VerificationKeyFile String -file) Text -expect SomeAddressVerificationKey -got -> [Text] -> Text +fileErr + ShelleyGenesisCmdUnexpectedAddressVerificationKey (VerificationKeyFile String +file) Text +expect SomeAddressVerificationKey +got -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat [ Text "Unexpected address verification key type in file ", String -> Text Text.pack String -file +file , Text ", expected: ", Text -expect, Text +expect, Text ", got: ", SomeAddressVerificationKey -> Text forall a. Show a => a -> Text textShow SomeAddressVerificationKey -got +got ] - ShelleyGenesisCmdTooFewPoolsForBulkCreds Word -pools Word -files Word -perPool -> [Text] -> Text + ShelleyGenesisCmdTooFewPoolsForBulkCreds Word +pools Word +files Word +perPool -> [Text] -> Text forall a. Monoid a => [a] -> a mconcat [ Text "Number of pools requested for generation (", Word -> Text forall a. Show a => a -> Text textShow Word -pools +pools , Text ") is insufficient to fill ", Word -> Text forall a. Show a => a -> Text textShow Word -files +files , Text " bulk files, with ", Word -> Text forall a. Show a => a -> Text textShow Word -perPool, Text +perPool, Text " pools per file." ] - ShelleyGenesisCmdAddressCmdError ShelleyAddressCmdError -e -> ShelleyAddressCmdError -> Text + ShelleyGenesisCmdAddressCmdError ShelleyAddressCmdError +e -> ShelleyAddressCmdError -> Text renderShelleyAddressCmdError ShelleyAddressCmdError -e - ShelleyGenesisCmdNodeCmdError ShelleyNodeCmdError -e -> ShelleyNodeCmdError -> Text +e + ShelleyGenesisCmdNodeCmdError ShelleyNodeCmdError +e -> ShelleyNodeCmdError -> Text renderShelleyNodeCmdError ShelleyNodeCmdError -e - ShelleyGenesisCmdPoolCmdError ShelleyPoolCmdError -e -> ShelleyPoolCmdError -> Text +e + ShelleyGenesisCmdPoolCmdError ShelleyPoolCmdError +e -> ShelleyPoolCmdError -> Text renderShelleyPoolCmdError ShelleyPoolCmdError -e - ShelleyGenesisCmdStakeAddressCmdError ShelleyStakeAddressCmdError -e -> ShelleyStakeAddressCmdError -> Text +e + ShelleyGenesisCmdStakeAddressCmdError ShelleyStakeAddressCmdError +e -> ShelleyStakeAddressCmdError -> Text renderShelleyStakeAddressCmdError ShelleyStakeAddressCmdError -e - ShelleyGenesisCmdCostModelsError String -fp -> +e + ShelleyGenesisCmdCostModelsError String +fp -> Text "Cost model is invalid: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -fp +fp runGenesisCmd :: GenesisCmd -> ExceptT ShelleyGenesisCmdError IO () runGenesisCmd :: GenesisCmd -> ExceptT ShelleyGenesisCmdError IO () -runGenesisCmd (GenesisKeyGenGenesis VerificationKeyFile -vk SigningKeyFile -sk) = VerificationKeyFile +runGenesisCmd (GenesisKeyGenGenesis VerificationKeyFile +vk SigningKeyFile +sk) = VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyGenGenesis VerificationKeyFile -vk SigningKeyFile -sk -runGenesisCmd (GenesisKeyGenDelegate VerificationKeyFile -vk SigningKeyFile -sk OpCertCounterFile -ctr) = VerificationKeyFile +vk SigningKeyFile +sk +runGenesisCmd (GenesisKeyGenDelegate VerificationKeyFile +vk SigningKeyFile +sk OpCertCounterFile +ctr) = VerificationKeyFile -> SigningKeyFile -> OpCertCounterFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyGenDelegate VerificationKeyFile -vk SigningKeyFile -sk OpCertCounterFile -ctr -runGenesisCmd (GenesisKeyGenUTxO VerificationKeyFile -vk SigningKeyFile -sk) = VerificationKeyFile +vk SigningKeyFile +sk OpCertCounterFile +ctr +runGenesisCmd (GenesisKeyGenUTxO VerificationKeyFile +vk SigningKeyFile +sk) = VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyGenUTxO VerificationKeyFile -vk SigningKeyFile -sk -runGenesisCmd (GenesisCmdKeyHash VerificationKeyFile -vk) = VerificationKeyFile -> ExceptT ShelleyGenesisCmdError IO () +vk SigningKeyFile +sk +runGenesisCmd (GenesisCmdKeyHash VerificationKeyFile +vk) = VerificationKeyFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyHash VerificationKeyFile -vk -runGenesisCmd (GenesisVerKey VerificationKeyFile -vk SigningKeyFile -sk) = VerificationKeyFile +vk +runGenesisCmd (GenesisVerKey VerificationKeyFile +vk SigningKeyFile +sk) = VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisVerKey VerificationKeyFile -vk SigningKeyFile -sk -runGenesisCmd (GenesisTxIn VerificationKeyFile -vk NetworkId -nw Maybe OutputFile -mOutFile) = VerificationKeyFile +vk SigningKeyFile +sk +runGenesisCmd (GenesisTxIn VerificationKeyFile +vk NetworkId +nw Maybe OutputFile +mOutFile) = VerificationKeyFile -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisTxIn VerificationKeyFile -vk NetworkId -nw Maybe OutputFile -mOutFile -runGenesisCmd (GenesisAddr VerificationKeyFile -vk NetworkId -nw Maybe OutputFile -mOutFile) = VerificationKeyFile +vk NetworkId +nw Maybe OutputFile +mOutFile +runGenesisCmd (GenesisAddr VerificationKeyFile +vk NetworkId +nw Maybe OutputFile +mOutFile) = VerificationKeyFile -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisAddr VerificationKeyFile -vk NetworkId -nw Maybe OutputFile -mOutFile -runGenesisCmd (GenesisCreate GenesisDir -gd Word -gn Word -un Maybe SystemStart -ms Maybe Lovelace -am NetworkId -nw) = GenesisDir +vk NetworkId +nw Maybe OutputFile +mOutFile +runGenesisCmd (GenesisCreate GenesisDir +gd Word +gn Word +un Maybe SystemStart +ms Maybe Lovelace +am NetworkId +nw) = GenesisDir -> Word -> Word -> Maybe SystemStart @@ -370,25 +370,25 @@ -> NetworkId -> ExceptT ShelleyGenesisCmdError IO () runGenesisCreate GenesisDir -gd Word -gn Word -un Maybe SystemStart -ms Maybe Lovelace -am NetworkId -nw -runGenesisCmd (GenesisCreateStaked GenesisDir -gd Word -gn Word -gp Word -gl Word -un Maybe SystemStart -ms Maybe Lovelace -am Lovelace -ds NetworkId -nw Word -bf Word -bp Word -su) = GenesisDir +gd Word +gn Word +un Maybe SystemStart +ms Maybe Lovelace +am NetworkId +nw +runGenesisCmd (GenesisCreateStaked GenesisDir +gd Word +gn Word +gp Word +gl Word +un Maybe SystemStart +ms Maybe Lovelace +am Lovelace +ds NetworkId +nw Word +bf Word +bp Word +su) = GenesisDir -> Word -> Word -> Word @@ -402,22 +402,22 @@ -> Word -> ExceptT ShelleyGenesisCmdError IO () runGenesisCreateStaked GenesisDir -gd Word -gn Word -gp Word -gl Word -un Maybe SystemStart -ms Maybe Lovelace -am Lovelace -ds NetworkId -nw Word -bf Word -bp Word -su -runGenesisCmd (GenesisHashFile GenesisFile -gf) = GenesisFile -> ExceptT ShelleyGenesisCmdError IO () +gd Word +gn Word +gp Word +gl Word +un Maybe SystemStart +ms Maybe Lovelace +am Lovelace +ds NetworkId +nw Word +bf Word +bp Word +su +runGenesisCmd (GenesisHashFile GenesisFile +gf) = GenesisFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisHashFile GenesisFile -gf +gf -- -- Genesis command implementations @@ -427,12 +427,12 @@ -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyGenGenesis :: VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyGenesisCmdError IO () -runGenesisKeyGenGenesis (VerificationKeyFile String -vkeyPath) - (SigningKeyFile String -skeyPath) = do - SigningKey GenesisKey -skey <- IO (SigningKey GenesisKey) +runGenesisKeyGenGenesis (VerificationKeyFile String +vkeyPath) + (SigningKeyFile String +skeyPath) = do + SigningKey GenesisKey +skey <- IO (SigningKey GenesisKey) -> ExceptT ShelleyGenesisCmdError IO (SigningKey GenesisKey) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (SigningKey GenesisKey) @@ -446,13 +446,13 @@ AsType keyrole -> IO (SigningKey keyrole) generateSigningKey AsType GenesisKey AsGenesisKey - let vkey :: VerificationKey GenesisKey -vkey = SigningKey GenesisKey -> VerificationKey GenesisKey + let vkey :: VerificationKey GenesisKey +vkey = SigningKey GenesisKey -> VerificationKey GenesisKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey GenesisKey -skey +skey (FileError () -> ShelleyGenesisCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -486,11 +486,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -skeyDesc) SigningKey GenesisKey -skey +skeyDesc) SigningKey GenesisKey +skey (FileError () -> ShelleyGenesisCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -524,18 +524,18 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -vkeyDesc) VerificationKey GenesisKey -vkey +vkeyDesc) VerificationKey GenesisKey +vkey where - skeyDesc, vkeyDesc :: TextEnvelopeDescr - skeyDesc :: TextEnvelopeDescr -skeyDesc = TextEnvelopeDescr + skeyDesc, vkeyDesc :: TextEnvelopeDescr + skeyDesc :: TextEnvelopeDescr +skeyDesc = TextEnvelopeDescr "Genesis Signing Key" - vkeyDesc :: TextEnvelopeDescr -vkeyDesc = TextEnvelopeDescr + vkeyDesc :: TextEnvelopeDescr +vkeyDesc = TextEnvelopeDescr "Genesis Verification Key" @@ -547,14 +547,14 @@ -> SigningKeyFile -> OpCertCounterFile -> ExceptT ShelleyGenesisCmdError IO () -runGenesisKeyGenDelegate (VerificationKeyFile String -vkeyPath) - (SigningKeyFile String -skeyPath) - (OpCertCounterFile String -ocertCtrPath) = do - SigningKey GenesisDelegateKey -skey <- IO (SigningKey GenesisDelegateKey) +runGenesisKeyGenDelegate (VerificationKeyFile String +vkeyPath) + (SigningKeyFile String +skeyPath) + (OpCertCounterFile String +ocertCtrPath) = do + SigningKey GenesisDelegateKey +skey <- IO (SigningKey GenesisDelegateKey) -> ExceptT ShelleyGenesisCmdError IO (SigningKey GenesisDelegateKey) forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -571,13 +571,13 @@ AsType keyrole -> IO (SigningKey keyrole) generateSigningKey AsType GenesisDelegateKey AsGenesisDelegateKey - let vkey :: VerificationKey GenesisDelegateKey -vkey = SigningKey GenesisDelegateKey -> VerificationKey GenesisDelegateKey + let vkey :: VerificationKey GenesisDelegateKey +vkey = SigningKey GenesisDelegateKey -> VerificationKey GenesisDelegateKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey GenesisDelegateKey -skey +skey (FileError () -> ShelleyGenesisCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -611,11 +611,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -skeyDesc) SigningKey GenesisDelegateKey -skey +skeyDesc) SigningKey GenesisDelegateKey +skey (FileError () -> ShelleyGenesisCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -649,11 +649,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -vkeyDesc) VerificationKey GenesisDelegateKey -vkey +vkeyDesc) VerificationKey GenesisDelegateKey +vkey (FileError () -> ShelleyGenesisCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -687,10 +687,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -ocertCtrPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +ocertCtrPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -certCtrDesc) +certCtrDesc) (OperationalCertificateIssueCounter -> IO (Either (FileError ()) ())) -> OperationalCertificateIssueCounter @@ -701,23 +701,23 @@ -> OperationalCertificateIssueCounter OperationalCertificateIssueCounter Word64 -initialCounter +initialCounter (VerificationKey GenesisDelegateKey -> VerificationKey StakePoolKey forall keyroleA keyroleB. CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey VerificationKey GenesisDelegateKey -vkey) -- Cast to a 'StakePoolKey' +vkey) -- Cast to a 'StakePoolKey' where - skeyDesc, vkeyDesc, certCtrDesc :: TextEnvelopeDescr - skeyDesc :: TextEnvelopeDescr -skeyDesc = TextEnvelopeDescr + skeyDesc, vkeyDesc, certCtrDesc :: TextEnvelopeDescr + skeyDesc :: TextEnvelopeDescr +skeyDesc = TextEnvelopeDescr "Genesis delegate operator key" - vkeyDesc :: TextEnvelopeDescr -vkeyDesc = TextEnvelopeDescr + vkeyDesc :: TextEnvelopeDescr +vkeyDesc = TextEnvelopeDescr "Genesis delegate operator key" - certCtrDesc :: TextEnvelopeDescr -certCtrDesc = TextEnvelopeDescr + certCtrDesc :: TextEnvelopeDescr +certCtrDesc = TextEnvelopeDescr "Next certificate issue number: " TextEnvelopeDescr -> TextEnvelopeDescr -> TextEnvelopeDescr forall a. Semigroup a => a -> a -> a @@ -726,11 +726,11 @@ fromString (Word64 -> String forall a b. (Show a, ConvertText String b) => a -> b show Word64 -initialCounter) +initialCounter) - initialCounter :: Word64 - initialCounter :: Word64 -initialCounter = Word64 + initialCounter :: Word64 + initialCounter :: Word64 +initialCounter = Word64 0 @@ -738,12 +738,12 @@ -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyGenDelegateVRF :: VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyGenesisCmdError IO () -runGenesisKeyGenDelegateVRF (VerificationKeyFile String -vkeyPath) - (SigningKeyFile String -skeyPath) = do - SigningKey VrfKey -skey <- IO (SigningKey VrfKey) +runGenesisKeyGenDelegateVRF (VerificationKeyFile String +vkeyPath) + (SigningKeyFile String +skeyPath) = do + SigningKey VrfKey +skey <- IO (SigningKey VrfKey) -> ExceptT ShelleyGenesisCmdError IO (SigningKey VrfKey) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (SigningKey VrfKey) @@ -757,13 +757,13 @@ AsType keyrole -> IO (SigningKey keyrole) generateSigningKey AsType VrfKey AsVrfKey - let vkey :: VerificationKey VrfKey -vkey = SigningKey VrfKey -> VerificationKey VrfKey + let vkey :: VerificationKey VrfKey +vkey = SigningKey VrfKey -> VerificationKey VrfKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey VrfKey -skey +skey (FileError () -> ShelleyGenesisCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -797,11 +797,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -skeyDesc) SigningKey VrfKey -skey +skeyDesc) SigningKey VrfKey +skey (FileError () -> ShelleyGenesisCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -835,18 +835,18 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -vkeyDesc) VerificationKey VrfKey -vkey +vkeyDesc) VerificationKey VrfKey +vkey where - skeyDesc, vkeyDesc :: TextEnvelopeDescr - skeyDesc :: TextEnvelopeDescr -skeyDesc = TextEnvelopeDescr + skeyDesc, vkeyDesc :: TextEnvelopeDescr + skeyDesc :: TextEnvelopeDescr +skeyDesc = TextEnvelopeDescr "VRF Signing Key" - vkeyDesc :: TextEnvelopeDescr -vkeyDesc = TextEnvelopeDescr + vkeyDesc :: TextEnvelopeDescr +vkeyDesc = TextEnvelopeDescr "VRF Verification Key" @@ -854,12 +854,12 @@ -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyGenUTxO :: VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyGenesisCmdError IO () -runGenesisKeyGenUTxO (VerificationKeyFile String -vkeyPath) - (SigningKeyFile String -skeyPath) = do - SigningKey GenesisUTxOKey -skey <- IO (SigningKey GenesisUTxOKey) +runGenesisKeyGenUTxO (VerificationKeyFile String +vkeyPath) + (SigningKeyFile String +skeyPath) = do + SigningKey GenesisUTxOKey +skey <- IO (SigningKey GenesisUTxOKey) -> ExceptT ShelleyGenesisCmdError IO (SigningKey GenesisUTxOKey) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (SigningKey GenesisUTxOKey) @@ -873,13 +873,13 @@ AsType keyrole -> IO (SigningKey keyrole) generateSigningKey AsType GenesisUTxOKey AsGenesisUTxOKey - let vkey :: VerificationKey GenesisUTxOKey -vkey = SigningKey GenesisUTxOKey -> VerificationKey GenesisUTxOKey + let vkey :: VerificationKey GenesisUTxOKey +vkey = SigningKey GenesisUTxOKey -> VerificationKey GenesisUTxOKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey GenesisUTxOKey -skey +skey (FileError () -> ShelleyGenesisCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -913,11 +913,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -skeyDesc) SigningKey GenesisUTxOKey -skey +skeyDesc) SigningKey GenesisUTxOKey +skey (FileError () -> ShelleyGenesisCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -951,27 +951,27 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -vkeyDesc) VerificationKey GenesisUTxOKey -vkey +vkeyDesc) VerificationKey GenesisUTxOKey +vkey where - skeyDesc, vkeyDesc :: TextEnvelopeDescr - skeyDesc :: TextEnvelopeDescr -skeyDesc = TextEnvelopeDescr + skeyDesc, vkeyDesc :: TextEnvelopeDescr + skeyDesc :: TextEnvelopeDescr +skeyDesc = TextEnvelopeDescr "Genesis Initial UTxO Signing Key" - vkeyDesc :: TextEnvelopeDescr -vkeyDesc = TextEnvelopeDescr + vkeyDesc :: TextEnvelopeDescr +vkeyDesc = TextEnvelopeDescr "Genesis Initial UTxO Verification Key" runGenesisKeyHash :: VerificationKeyFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyHash :: VerificationKeyFile -> ExceptT ShelleyGenesisCmdError IO () -runGenesisKeyHash (VerificationKeyFile String -vkeyPath) = do - SomeGenesisKey VerificationKey -vkey <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) +runGenesisKeyHash (VerificationKeyFile String +vkeyPath) = do + SomeGenesisKey VerificationKey +vkey <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) -> ExceptT (FileError TextEnvelopeError) IO (SomeGenesisKey VerificationKey) -> ExceptT @@ -1069,7 +1069,7 @@ AGenesisUTxOKey ] String -vkeyPath +vkeyPath IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyGenesisCmdError IO ()) @@ -1077,36 +1077,36 @@ forall a b. (a -> b) -> a -> b $ ByteString -> IO () BS.putStrLn (SomeGenesisKey VerificationKey -> ByteString -renderKeyHash SomeGenesisKey VerificationKey -vkey) +renderKeyHash SomeGenesisKey VerificationKey +vkey) where - renderKeyHash :: SomeGenesisKey VerificationKey -> ByteString - renderKeyHash :: SomeGenesisKey VerificationKey -> ByteString -renderKeyHash (AGenesisKey VerificationKey GenesisKey -vk) = VerificationKey GenesisKey -> ByteString + renderKeyHash :: SomeGenesisKey VerificationKey -> ByteString + renderKeyHash :: SomeGenesisKey VerificationKey -> ByteString +renderKeyHash (AGenesisKey VerificationKey GenesisKey +vk) = VerificationKey GenesisKey -> ByteString forall keyrole. Key keyrole => VerificationKey keyrole -> ByteString -renderVerificationKeyHash VerificationKey GenesisKey -vk - renderKeyHash (AGenesisDelegateKey VerificationKey GenesisDelegateKey -vk) = VerificationKey GenesisDelegateKey -> ByteString +renderVerificationKeyHash VerificationKey GenesisKey +vk + renderKeyHash (AGenesisDelegateKey VerificationKey GenesisDelegateKey +vk) = VerificationKey GenesisDelegateKey -> ByteString forall keyrole. Key keyrole => VerificationKey keyrole -> ByteString -renderVerificationKeyHash VerificationKey GenesisDelegateKey -vk - renderKeyHash (AGenesisUTxOKey VerificationKey GenesisUTxOKey -vk) = VerificationKey GenesisUTxOKey -> ByteString +renderVerificationKeyHash VerificationKey GenesisDelegateKey +vk + renderKeyHash (AGenesisUTxOKey VerificationKey GenesisUTxOKey +vk) = VerificationKey GenesisUTxOKey -> ByteString forall keyrole. Key keyrole => VerificationKey keyrole -> ByteString -renderVerificationKeyHash VerificationKey GenesisUTxOKey -vk +renderVerificationKeyHash VerificationKey GenesisUTxOKey +vk - renderVerificationKeyHash :: Key keyrole => VerificationKey keyrole -> ByteString - renderVerificationKeyHash :: VerificationKey keyrole -> ByteString -renderVerificationKeyHash = Hash keyrole -> ByteString + renderVerificationKeyHash :: Key keyrole => VerificationKey keyrole -> ByteString + renderVerificationKeyHash :: VerificationKey keyrole -> ByteString +renderVerificationKeyHash = Hash keyrole -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytesHex (Hash keyrole -> ByteString) @@ -1127,11 +1127,11 @@ -> ExceptT ShelleyGenesisCmdError IO () runGenesisVerKey :: VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyGenesisCmdError IO () -runGenesisVerKey (VerificationKeyFile String -vkeyPath) (SigningKeyFile String -skeyPath) = do - SomeGenesisKey SigningKey -skey <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) +runGenesisVerKey (VerificationKeyFile String +vkeyPath) (SigningKeyFile String +skeyPath) = do + SomeGenesisKey SigningKey +skey <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) -> ExceptT (FileError TextEnvelopeError) IO (SomeGenesisKey SigningKey) -> ExceptT ShelleyGenesisCmdError IO (SomeGenesisKey SigningKey) @@ -1214,23 +1214,23 @@ AGenesisUTxOKey ] String -skeyPath +skeyPath - let vkey :: SomeGenesisKey VerificationKey - vkey :: SomeGenesisKey VerificationKey -vkey = case SomeGenesisKey SigningKey -skey of - AGenesisKey SigningKey GenesisKey -sk -> VerificationKey GenesisKey -> SomeGenesisKey VerificationKey + let vkey :: SomeGenesisKey VerificationKey + vkey :: SomeGenesisKey VerificationKey +vkey = case SomeGenesisKey SigningKey +skey of + AGenesisKey SigningKey GenesisKey +sk -> VerificationKey GenesisKey -> SomeGenesisKey VerificationKey forall (f :: * -> *). f GenesisKey -> SomeGenesisKey f AGenesisKey (SigningKey GenesisKey -> VerificationKey GenesisKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey GenesisKey -sk) - AGenesisDelegateKey SigningKey GenesisDelegateKey -sk -> VerificationKey GenesisDelegateKey +sk) + AGenesisDelegateKey SigningKey GenesisDelegateKey +sk -> VerificationKey GenesisDelegateKey -> SomeGenesisKey VerificationKey forall (f :: * -> *). f GenesisDelegateKey -> SomeGenesisKey f AGenesisDelegateKey (SigningKey GenesisDelegateKey -> VerificationKey GenesisDelegateKey @@ -1238,16 +1238,16 @@ Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey GenesisDelegateKey -sk) - AGenesisUTxOKey SigningKey GenesisUTxOKey -sk -> VerificationKey GenesisUTxOKey -> SomeGenesisKey VerificationKey +sk) + AGenesisUTxOKey SigningKey GenesisUTxOKey +sk -> VerificationKey GenesisUTxOKey -> SomeGenesisKey VerificationKey forall (f :: * -> *). f GenesisUTxOKey -> SomeGenesisKey f AGenesisUTxOKey (SigningKey GenesisUTxOKey -> VerificationKey GenesisUTxOKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey GenesisUTxOKey -sk) +sk) (FileError () -> ShelleyGenesisCmdError) -> ExceptT (FileError ()) IO () @@ -1282,9 +1282,9 @@ forall a b. (a -> b) -> a -> b $ case SomeGenesisKey VerificationKey -vkey of - AGenesisKey VerificationKey GenesisKey -vk -> String +vkey of + AGenesisKey VerificationKey GenesisKey +vk -> String -> Maybe TextEnvelopeDescr -> VerificationKey GenesisKey -> IO (Either (FileError ()) ()) @@ -1293,12 +1293,12 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath Maybe TextEnvelopeDescr +vkeyPath Maybe TextEnvelopeDescr forall a. Maybe a Nothing VerificationKey GenesisKey -vk - AGenesisDelegateKey VerificationKey GenesisDelegateKey -vk -> String +vk + AGenesisDelegateKey VerificationKey GenesisDelegateKey +vk -> String -> Maybe TextEnvelopeDescr -> VerificationKey GenesisDelegateKey -> IO (Either (FileError ()) ()) @@ -1307,12 +1307,12 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath Maybe TextEnvelopeDescr +vkeyPath Maybe TextEnvelopeDescr forall a. Maybe a Nothing VerificationKey GenesisDelegateKey -vk - AGenesisUTxOKey VerificationKey GenesisUTxOKey -vk -> String +vk + AGenesisUTxOKey VerificationKey GenesisUTxOKey +vk -> String -> Maybe TextEnvelopeDescr -> VerificationKey GenesisUTxOKey -> IO (Either (FileError ()) ()) @@ -1321,15 +1321,15 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath Maybe TextEnvelopeDescr +vkeyPath Maybe TextEnvelopeDescr forall a. Maybe a Nothing VerificationKey GenesisUTxOKey -vk +vk -data SomeGenesisKey f - = AGenesisKey (f GenesisKey) - | AGenesisDelegateKey (f GenesisDelegateKey) - | AGenesisUTxOKey (f GenesisUTxOKey) +data SomeGenesisKey f + = AGenesisKey (f GenesisKey) + | AGenesisDelegateKey (f GenesisDelegateKey) + | AGenesisUTxOKey (f GenesisUTxOKey) runGenesisTxIn :: VerificationKeyFile -> NetworkId -> Maybe OutputFile @@ -1338,12 +1338,12 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyGenesisCmdError IO () -runGenesisTxIn (VerificationKeyFile String -vkeyPath) NetworkId -network Maybe OutputFile -mOutFile = do - VerificationKey GenesisUTxOKey -vkey <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) +runGenesisTxIn (VerificationKeyFile String +vkeyPath) NetworkId +network Maybe OutputFile +mOutFile = do + VerificationKey GenesisUTxOKey +vkey <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey GenesisUTxOKey) -> ExceptT @@ -1399,16 +1399,16 @@ forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey AsType GenesisUTxOKey AsGenesisUTxOKey) String -vkeyPath - let txin :: TxIn -txin = NetworkId -> Hash GenesisUTxOKey -> TxIn +vkeyPath + let txin :: TxIn +txin = NetworkId -> Hash GenesisUTxOKey -> TxIn genesisUTxOPseudoTxIn NetworkId -network (VerificationKey GenesisUTxOKey -> Hash GenesisUTxOKey +network (VerificationKey GenesisUTxOKey -> Hash GenesisUTxOKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey GenesisUTxOKey -vkey) +vkey) IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyGenesisCmdError IO ()) @@ -1416,9 +1416,9 @@ forall a b. (a -> b) -> a -> b $ Maybe OutputFile -> Text -> IO () writeOutput Maybe OutputFile -mOutFile (TxIn -> Text +mOutFile (TxIn -> Text renderTxIn TxIn -txin) +txin) runGenesisAddr :: VerificationKeyFile -> NetworkId -> Maybe OutputFile @@ -1427,12 +1427,12 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyGenesisCmdError IO () -runGenesisAddr (VerificationKeyFile String -vkeyPath) NetworkId -network Maybe OutputFile -mOutFile = do - VerificationKey GenesisUTxOKey -vkey <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) +runGenesisAddr (VerificationKeyFile String +vkeyPath) NetworkId +network Maybe OutputFile +mOutFile = do + VerificationKey GenesisUTxOKey +vkey <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey GenesisUTxOKey) -> ExceptT @@ -1488,9 +1488,9 @@ forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey AsType GenesisUTxOKey AsGenesisUTxOKey) String -vkeyPath - let vkh :: Hash PaymentKey -vkh = VerificationKey PaymentKey -> Hash PaymentKey +vkeyPath + let vkh :: Hash PaymentKey +vkh = VerificationKey PaymentKey -> Hash PaymentKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole @@ -1499,16 +1499,16 @@ CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey VerificationKey GenesisUTxOKey -vkey) - addr :: Address ShelleyAddr -addr = NetworkId +vkey) + addr :: Address ShelleyAddr +addr = NetworkId -> PaymentCredential -> StakeAddressReference -> Address ShelleyAddr makeShelleyAddress NetworkId -network (Hash PaymentKey -> PaymentCredential +network (Hash PaymentKey -> PaymentCredential PaymentCredentialByKey Hash PaymentKey -vkh) +vkh) StakeAddressReference NoStakeAddress IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -1518,17 +1518,17 @@ forall a b. (a -> b) -> a -> b $ Maybe OutputFile -> Text -> IO () writeOutput Maybe OutputFile -mOutFile (Address ShelleyAddr -> Text +mOutFile (Address ShelleyAddr -> Text forall addr. SerialiseAddress addr => addr -> Text serialiseAddress Address ShelleyAddr -addr) +addr) writeOutput :: Maybe OutputFile -> Text -> IO () writeOutput :: Maybe OutputFile -> Text -> IO () -writeOutput (Just (OutputFile String -fpath)) = String -> Text -> IO () +writeOutput (Just (OutputFile String +fpath)) = String -> Text -> IO () Text.writeFile String -fpath +fpath writeOutput Maybe OutputFile Nothing = Text -> IO () Text.putStrLn @@ -1552,15 +1552,15 @@ -> Maybe Lovelace -> NetworkId -> ExceptT ShelleyGenesisCmdError IO () -runGenesisCreate (GenesisDir String -rootdir) - Word -genNumGenesisKeys Word -genNumUTxOKeys - Maybe SystemStart -mStart Maybe Lovelace -mAmount NetworkId -network = do +runGenesisCreate (GenesisDir String +rootdir) + Word +genNumGenesisKeys Word +genNumUTxOKeys + Maybe SystemStart +mStart Maybe Lovelace +mAmount NetworkId +network = do IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyGenesisCmdError IO ()) @@ -1570,31 +1570,31 @@ Bool -> String -> IO () createDirectoryIfMissing Bool False String -rootdir +rootdir Bool -> String -> IO () createDirectoryIfMissing Bool False String -gendir +gendir Bool -> String -> IO () createDirectoryIfMissing Bool False String -deldir +deldir Bool -> String -> IO () createDirectoryIfMissing Bool False String -utxodir +utxodir - ShelleyGenesis StandardShelley -template <- String + ShelleyGenesis StandardShelley +template <- String -> (ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley) -> ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) readShelleyGenesis (String -rootdir String -> ShowS +rootdir String -> ShowS </> String "genesis.spec.json") ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley -adjustTemplate +adjustTemplate [Word] -> (Word -> ExceptT ShelleyGenesisCmdError IO ()) @@ -1604,21 +1604,21 @@ t a -> (a -> m b) -> m () forM_ [ Word 1 .. Word -genNumGenesisKeys ] ((Word -> ExceptT ShelleyGenesisCmdError IO ()) +genNumGenesisKeys ] ((Word -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO ()) -> (Word -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO () forall a b. (a -> b) -> a -> b -$ \Word -index -> do +$ \Word +index -> do String -> Word -> ExceptT ShelleyGenesisCmdError IO () createGenesisKeys String -gendir Word -index +gendir Word +index String -> Word -> ExceptT ShelleyGenesisCmdError IO () createDelegateKeys String -deldir Word -index +deldir Word +index [Word] -> (Word -> ExceptT ShelleyGenesisCmdError IO ()) @@ -1628,37 +1628,37 @@ t a -> (a -> m b) -> m () forM_ [ Word 1 .. Word -genNumUTxOKeys ] ((Word -> ExceptT ShelleyGenesisCmdError IO ()) +genNumUTxOKeys ] ((Word -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO ()) -> (Word -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO () forall a b. (a -> b) -> a -> b -$ \Word -index -> +$ \Word +index -> String -> Word -> ExceptT ShelleyGenesisCmdError IO () createUtxoKeys String -utxodir Word -index +utxodir Word +index - Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -genDlgs <- String + Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) +genDlgs <- String -> String -> ExceptT ShelleyGenesisCmdError IO (Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey)) readGenDelegsMap String -gendir String -deldir - [AddressInEra ShelleyEra] -utxoAddrs <- String +gendir String +deldir + [AddressInEra ShelleyEra] +utxoAddrs <- String -> NetworkId -> ExceptT ShelleyGenesisCmdError IO [AddressInEra ShelleyEra] readInitialFundAddresses String -utxodir NetworkId -network - SystemStart -start <- ExceptT ShelleyGenesisCmdError IO SystemStart +utxodir NetworkId +network + SystemStart +start <- ExceptT ShelleyGenesisCmdError IO SystemStart -> (SystemStart -> ExceptT ShelleyGenesisCmdError IO SystemStart) -> Maybe SystemStart -> ExceptT ShelleyGenesisCmdError IO SystemStart @@ -1672,11 +1672,11 @@ getCurrentTimePlus30) SystemStart -> ExceptT ShelleyGenesisCmdError IO SystemStart forall (f :: * -> *) a. Applicative f => a -> f a pure Maybe SystemStart -mStart +mStart - let (ShelleyGenesis StandardShelley -shelleyGenesis, AlonzoGenesis -alonzoGenesis) = + let (ShelleyGenesis StandardShelley +shelleyGenesis, AlonzoGenesis +alonzoGenesis) = SystemStart -> Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -> Maybe Lovelace @@ -1698,15 +1698,15 @@ updateTemplate -- Shelley genesis parameters SystemStart -start Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -genDlgs Maybe Lovelace -mAmount [AddressInEra ShelleyEra] -utxoAddrs Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) +start Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) +genDlgs Maybe Lovelace +mAmount [AddressInEra ShelleyEra] +utxoAddrs Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) forall a. Monoid a => a mempty (Integer -> Lovelace Lovelace Integer 0) [] [] ShelleyGenesis StandardShelley -template +template -- Alono genesis parameters TODO: Parameterize (Integer -> Lovelace Lovelace Integer @@ -1730,42 +1730,42 @@ ToJSON genesis => String -> genesis -> ExceptT ShelleyGenesisCmdError IO () writeFileGenesis (String -rootdir String -> ShowS +rootdir String -> ShowS </> String "genesis.json") ShelleyGenesis StandardShelley -shelleyGenesis +shelleyGenesis String -> AlonzoGenesis -> ExceptT ShelleyGenesisCmdError IO () forall genesis. ToJSON genesis => String -> genesis -> ExceptT ShelleyGenesisCmdError IO () writeFileGenesis (String -rootdir String -> ShowS +rootdir String -> ShowS </> String "genesis.alonzo.json") AlonzoGenesis -alonzoGenesis +alonzoGenesis --TODO: rationalise the naming convention on these genesis json files. where - adjustTemplate :: ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley -adjustTemplate ShelleyGenesis StandardShelley -t = ShelleyGenesis StandardShelley -t { sgNetworkMagic :: Word32 + adjustTemplate :: ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley +adjustTemplate ShelleyGenesis StandardShelley +t = ShelleyGenesis StandardShelley +t { sgNetworkMagic :: Word32 sgNetworkMagic = NetworkMagic -> Word32 unNetworkMagic (NetworkId -> NetworkMagic toNetworkMagic NetworkId -network) } - gendir :: String -gendir = String -rootdir String -> ShowS +network) } + gendir :: String +gendir = String +rootdir String -> ShowS </> String "genesis-keys" - deldir :: String -deldir = String -rootdir String -> ShowS + deldir :: String +deldir = String +rootdir String -> ShowS </> String "delegate-keys" - utxodir :: String -utxodir = String -rootdir String -> ShowS + utxodir :: String +utxodir = String +rootdir String -> ShowS </> String "utxo-keys" @@ -1796,22 +1796,22 @@ -> Word -> Word -> ExceptT ShelleyGenesisCmdError IO () -runGenesisCreateStaked (GenesisDir String -rootdir) - Word -genNumGenesisKeys Word -genNumUTxOKeys Word -genNumPools Word -genNumStDelegs - Maybe SystemStart -mStart Maybe Lovelace -mNonDlgAmount Lovelace -stDlgAmount NetworkId -network - Word -bulkPoolCredFiles Word -bulkPoolsPerFile Word -numStuffedUtxo = do +runGenesisCreateStaked (GenesisDir String +rootdir) + Word +genNumGenesisKeys Word +genNumUTxOKeys Word +genNumPools Word +genNumStDelegs + Maybe SystemStart +mStart Maybe Lovelace +mNonDlgAmount Lovelace +stDlgAmount NetworkId +network + Word +bulkPoolCredFiles Word +bulkPoolsPerFile Word +numStuffedUtxo = do IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyGenesisCmdError IO ()) @@ -1821,39 +1821,39 @@ Bool -> String -> IO () createDirectoryIfMissing Bool False String -rootdir +rootdir Bool -> String -> IO () createDirectoryIfMissing Bool False String -gendir +gendir Bool -> String -> IO () createDirectoryIfMissing Bool False String -deldir +deldir Bool -> String -> IO () createDirectoryIfMissing Bool False String -pooldir +pooldir Bool -> String -> IO () createDirectoryIfMissing Bool False String -stdeldir +stdeldir Bool -> String -> IO () createDirectoryIfMissing Bool False String -utxodir +utxodir - ShelleyGenesis StandardShelley -template <- String + ShelleyGenesis StandardShelley +template <- String -> (ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley) -> ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) readShelleyGenesis (String -rootdir String -> ShowS +rootdir String -> ShowS </> String "genesis.spec.json") ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley -adjustTemplate +adjustTemplate [Word] -> (Word -> ExceptT ShelleyGenesisCmdError IO ()) @@ -1863,21 +1863,21 @@ t a -> (a -> m b) -> m () forM_ [ Word 1 .. Word -genNumGenesisKeys ] ((Word -> ExceptT ShelleyGenesisCmdError IO ()) +genNumGenesisKeys ] ((Word -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO ()) -> (Word -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO () forall a b. (a -> b) -> a -> b -$ \Word -index -> do +$ \Word +index -> do String -> Word -> ExceptT ShelleyGenesisCmdError IO () createGenesisKeys String -gendir Word -index +gendir Word +index String -> Word -> ExceptT ShelleyGenesisCmdError IO () createDelegateKeys String -deldir Word -index +deldir Word +index [Word] -> (Word -> ExceptT ShelleyGenesisCmdError IO ()) @@ -1887,20 +1887,20 @@ t a -> (a -> m b) -> m () forM_ [ Word 1 .. Word -genNumUTxOKeys ] ((Word -> ExceptT ShelleyGenesisCmdError IO ()) +genNumUTxOKeys ] ((Word -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO ()) -> (Word -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO () forall a b. (a -> b) -> a -> b -$ \Word -index -> +$ \Word +index -> String -> Word -> ExceptT ShelleyGenesisCmdError IO () createUtxoKeys String -utxodir Word -index +utxodir Word +index - [PoolParams StandardCrypto] -pools <- [Word] + [PoolParams StandardCrypto] +pools <- [Word] -> (Word -> ExceptT ShelleyGenesisCmdError IO (PoolParams StandardCrypto)) -> ExceptT ShelleyGenesisCmdError IO [PoolParams StandardCrypto] @@ -1909,40 +1909,40 @@ t a -> (a -> m b) -> m (t b) forM [ Word 1 .. Word -genNumPools ] ((Word +genNumPools ] ((Word -> ExceptT ShelleyGenesisCmdError IO (PoolParams StandardCrypto)) -> ExceptT ShelleyGenesisCmdError IO [PoolParams StandardCrypto]) -> (Word -> ExceptT ShelleyGenesisCmdError IO (PoolParams StandardCrypto)) -> ExceptT ShelleyGenesisCmdError IO [PoolParams StandardCrypto] forall a b. (a -> b) -> a -> b -$ \Word -index -> do +$ \Word +index -> do String -> Word -> ExceptT ShelleyGenesisCmdError IO () createPoolCredentials String -pooldir Word -index +pooldir Word +index NetworkId -> String -> Word -> ExceptT ShelleyGenesisCmdError IO (PoolParams StandardCrypto) buildPool NetworkId -network String -pooldir Word -index +network String +pooldir Word +index Bool -> ExceptT ShelleyGenesisCmdError IO () -> ExceptT ShelleyGenesisCmdError IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Word -bulkPoolCredFiles Word -> Word -> Word +bulkPoolCredFiles Word -> Word -> Word forall a. Num a => a -> a -> a * Word -bulkPoolsPerFile Word -> Word -> Bool +bulkPoolsPerFile Word -> Word -> Bool forall a. Ord a => a -> a -> Bool > Word -genNumPools) (ExceptT ShelleyGenesisCmdError IO () +genNumPools) (ExceptT ShelleyGenesisCmdError IO () -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -1955,39 +1955,39 @@ forall a b. (a -> b) -> a -> b $ Word -> Word -> Word -> ShelleyGenesisCmdError ShelleyGenesisCmdTooFewPoolsForBulkCreds Word -genNumPools Word -bulkPoolCredFiles Word -bulkPoolsPerFile +genNumPools Word +bulkPoolCredFiles Word +bulkPoolsPerFile -- We generate the bulk files for the last pool indices, -- so that all the non-bulk pools have stable indices at beginning: - let bulkOffset :: Word -bulkOffset = Word -> Word + let bulkOffset :: Word +bulkOffset = Word -> Word forall a b. (Integral a, Num b) => a -> b fromIntegral (Word -> Word) -> Word -> Word forall a b. (a -> b) -> a -> b $ Word -genNumPools Word -> Word -> Word +genNumPools Word -> Word -> Word forall a. Num a => a -> a -> a - Word -bulkPoolCredFiles Word -> Word -> Word +bulkPoolCredFiles Word -> Word -> Word forall a. Num a => a -> a -> a * Word -bulkPoolsPerFile - [Word] -bulkIndices :: [Word] = [ Word +bulkPoolsPerFile + [Word] +bulkIndices :: [Word] = [ Word 1 Word -> Word -> Word forall a. Num a => a -> a -> a + Word -bulkOffset .. Word -genNumPools ] - [[Word]] -bulkSlices :: [[Word]] = Int -> [Word] -> [[Word]] +bulkOffset .. Word +genNumPools ] + [[Word]] +bulkSlices :: [[Word]] = Int -> [Word] -> [[Word]] forall e. Int -> [e] -> [[e]] List.chunksOf (Word -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Word -bulkPoolsPerFile) [Word] -bulkIndices +bulkPoolsPerFile) [Word] +bulkIndices [(Word, [Word])] -> ((Word, [Word]) -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO () @@ -1998,8 +1998,8 @@ forall a b. [a] -> [b] -> [(a, b)] zip [ Word 1 .. Word -bulkPoolCredFiles ] [[Word]] -bulkSlices) (((Word, [Word]) -> ExceptT ShelleyGenesisCmdError IO ()) +bulkPoolCredFiles ] [[Word]] +bulkSlices) (((Word, [Word]) -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO ()) -> ((Word, [Word]) -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO () @@ -2010,7 +2010,7 @@ forall a b c. (a -> b -> c) -> (a, b) -> c uncurry (String -> Word -> [Word] -> ExceptT ShelleyGenesisCmdError IO () writeBulkPoolCredentials String -pooldir) +pooldir) [Word] -> (Word -> ExceptT ShelleyGenesisCmdError IO ()) @@ -2020,20 +2020,20 @@ t a -> (a -> m b) -> m () forM_ [ Word 1 .. Word -genNumStDelegs ] ((Word -> ExceptT ShelleyGenesisCmdError IO ()) +genNumStDelegs ] ((Word -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO ()) -> (Word -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO () forall a b. (a -> b) -> a -> b -$ \Word -index -> +$ \Word +index -> String -> Word -> ExceptT ShelleyGenesisCmdError IO () createDelegatorCredentials String -stdeldir Word -index +stdeldir Word +index - [Delegation] -delegations :: [Delegation] <- + [Delegation] +delegations :: [Delegation] <- -- Distribute M delegates across N pools: [(PoolParams StandardCrypto, Word)] -> ((PoolParams StandardCrypto, Word) @@ -2043,52 +2043,52 @@ (Traversable t, Monad m) => t a -> (a -> m b) -> m (t b) forM [ (PoolParams StandardCrypto -pool, Word -delegIx) - | (PoolParams StandardCrypto -pool, Word -poolIx) <- [PoolParams StandardCrypto] +pool, Word +delegIx) + | (PoolParams StandardCrypto +pool, Word +poolIx) <- [PoolParams StandardCrypto] -> [Word] -> [(PoolParams StandardCrypto, Word)] forall a b. [a] -> [b] -> [(a, b)] zip [PoolParams StandardCrypto] -pools [Word +pools [Word 1 ..] - , Word -delegIxLocal <- [ Word + , Word +delegIxLocal <- [ Word 1 .. Word -delegsPerPool ] [Word] -> [Word] -> [Word] +delegsPerPool ] [Word] -> [Word] -> [Word] forall a. [a] -> [a] -> [a] ++ -- Add all remaining delegates to the last pool: if Word -delegsRemaining Word -> Word -> Bool +delegsRemaining Word -> Word -> Bool forall a. Eq a => a -> a -> Bool /= Word 0 Bool -> Bool -> Bool && Word -poolIx Word -> Word -> Bool +poolIx Word -> Word -> Bool forall a. Eq a => a -> a -> Bool == Word -genNumPools +genNumPools then [ Word -delegsPerPool Word -> Word -> Word +delegsPerPool Word -> Word -> Word forall a. Num a => a -> a -> a + Word 1 .. Word -delegsPerPool Word -> Word -> Word +delegsPerPool Word -> Word -> Word forall a. Num a => a -> a -> a + Word -delegsRemaining ] +delegsRemaining ] else [] - , let delegIx :: Word -delegIx = Word -delegIxLocal Word -> Word -> Word + , let delegIx :: Word +delegIx = Word +delegIxLocal Word -> Word -> Word forall a. Num a => a -> a -> a + Word -delegsPerPool Word -> Word -> Word +delegsPerPool Word -> Word -> Word forall a. Num a => a -> a -> a * (Word -poolIx Word -> Word -> Word +poolIx Word -> Word -> Word forall a. Num a => a -> a -> a - Word 1)] (((PoolParams StandardCrypto, Word) @@ -2110,28 +2110,28 @@ -> Word -> ExceptT ShelleyGenesisCmdError IO Delegation computeDelegation NetworkId -network String -stdeldir) +network String +stdeldir) - Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -genDlgs <- String + Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) +genDlgs <- String -> String -> ExceptT ShelleyGenesisCmdError IO (Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey)) readGenDelegsMap String -gendir String -deldir - [AddressInEra ShelleyEra] -nonDelegAddrs <- String +gendir String +deldir + [AddressInEra ShelleyEra] +nonDelegAddrs <- String -> NetworkId -> ExceptT ShelleyGenesisCmdError IO [AddressInEra ShelleyEra] readInitialFundAddresses String -utxodir NetworkId -network - SystemStart -start <- ExceptT ShelleyGenesisCmdError IO SystemStart +utxodir NetworkId +network + SystemStart +start <- ExceptT ShelleyGenesisCmdError IO SystemStart -> (SystemStart -> ExceptT ShelleyGenesisCmdError IO SystemStart) -> Maybe SystemStart -> ExceptT ShelleyGenesisCmdError IO SystemStart @@ -2145,10 +2145,10 @@ getCurrentTimePlus30) SystemStart -> ExceptT ShelleyGenesisCmdError IO SystemStart forall (f :: * -> *) a. Applicative f => a -> f a pure Maybe SystemStart -mStart +mStart - [AddressInEra ShelleyEra] -stuffedUtxoAddrs <- IO [AddressInEra ShelleyEra] + [AddressInEra ShelleyEra] +stuffedUtxoAddrs <- IO [AddressInEra ShelleyEra] -> ExceptT ShelleyGenesisCmdError IO [AddressInEra ShelleyEra] forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO [AddressInEra ShelleyEra] @@ -2161,13 +2161,13 @@ replicateM (Word -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Word -numStuffedUtxo) +numStuffedUtxo) IO (AddressInEra ShelleyEra) -genStuffedAddress +genStuffedAddress - let poolMap :: Map (Ledger.KeyHash Ledger.Staking StandardCrypto) (Ledger.PoolParams StandardCrypto) - poolMap :: Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) -poolMap = [(KeyHash 'Staking StandardCrypto, PoolParams StandardCrypto)] + let poolMap :: Map (Ledger.KeyHash Ledger.Staking StandardCrypto) (Ledger.PoolParams StandardCrypto) + poolMap :: Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) +poolMap = [(KeyHash 'Staking StandardCrypto, PoolParams StandardCrypto)] -> Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) forall k a. Ord k => [(k, a)] -> Map k a @@ -2180,23 +2180,23 @@ forall a b. (a -> b) -> a -> b $ Delegation -> (KeyHash 'Staking StandardCrypto, PoolParams StandardCrypto) -mkDelegationMapEntry (Delegation +mkDelegationMapEntry (Delegation -> (KeyHash 'Staking StandardCrypto, PoolParams StandardCrypto)) -> [Delegation] -> [(KeyHash 'Staking StandardCrypto, PoolParams StandardCrypto)] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [Delegation] -delegations - delegAddrs :: [AddressInEra ShelleyEra] -delegAddrs = Delegation -> AddressInEra ShelleyEra +delegations + delegAddrs :: [AddressInEra ShelleyEra] +delegAddrs = Delegation -> AddressInEra ShelleyEra dInitialUtxoAddr (Delegation -> AddressInEra ShelleyEra) -> [Delegation] -> [AddressInEra ShelleyEra] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [Delegation] -delegations - (ShelleyGenesis StandardShelley -shelleyGenesis, AlonzoGenesis -alonzoGenesis) = +delegations + (ShelleyGenesis StandardShelley +shelleyGenesis, AlonzoGenesis +alonzoGenesis) = SystemStart -> Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -> Maybe Lovelace @@ -2218,16 +2218,16 @@ updateTemplate -- Shelley genesis parameters SystemStart -start Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -genDlgs Maybe Lovelace -mNonDlgAmount [AddressInEra ShelleyEra] -nonDelegAddrs Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) -poolMap +start Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) +genDlgs Maybe Lovelace +mNonDlgAmount [AddressInEra ShelleyEra] +nonDelegAddrs Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) +poolMap Lovelace -stDlgAmount [AddressInEra ShelleyEra] -delegAddrs [AddressInEra ShelleyEra] -stuffedUtxoAddrs ShelleyGenesis StandardShelley -template +stDlgAmount [AddressInEra ShelleyEra] +delegAddrs [AddressInEra ShelleyEra] +stuffedUtxoAddrs ShelleyGenesis StandardShelley +template -- Alonzo genesis parameters TODO: Parameterize (Integer -> Lovelace Lovelace Integer @@ -2251,19 +2251,19 @@ ToJSON genesis => String -> genesis -> ExceptT ShelleyGenesisCmdError IO () writeFileGenesis (String -rootdir String -> ShowS +rootdir String -> ShowS </> String "genesis.json") ShelleyGenesis StandardShelley -shelleyGenesis +shelleyGenesis String -> AlonzoGenesis -> ExceptT ShelleyGenesisCmdError IO () forall genesis. ToJSON genesis => String -> genesis -> ExceptT ShelleyGenesisCmdError IO () writeFileGenesis (String -rootdir String -> ShowS +rootdir String -> ShowS </> String "genesis.alonzo.json") AlonzoGenesis -alonzoGenesis +alonzoGenesis --TODO: rationalise the naming convention on these genesis json files. IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -2284,29 +2284,29 @@ , Word -> Text forall a. Show a => a -> Text textShow Word -genNumGenesisKeys, Text +genNumGenesisKeys, Text " genesis keys, " , Word -> Text forall a. Show a => a -> Text textShow Word -genNumUTxOKeys, Text +genNumUTxOKeys, Text " non-delegating UTxO keys, " , Word -> Text forall a. Show a => a -> Text textShow Word -genNumPools, Text +genNumPools, Text " stake pools, " , Word -> Text forall a. Show a => a -> Text textShow Word -genNumStDelegs, Text +genNumStDelegs, Text " delegating UTxO keys, " , Int -> Text forall a. Show a => a -> Text textShow ([Delegation] -> Int forall a. HasLength a => a -> Int length [Delegation] -delegations), Text +delegations), Text " delegation relationships, " , Int -> Text forall a. Show a => a -> Text @@ -2314,14 +2314,14 @@ -> Int forall k a. Map k a -> Int Map.size Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) -poolMap), Text +poolMap), Text " delegation map entries, " , Int -> Text forall a. Show a => a -> Text textShow ([AddressInEra ShelleyEra] -> Int forall a. HasLength a => a -> Int length [AddressInEra ShelleyEra] -delegAddrs), Text +delegAddrs), Text " delegating addresses" ] [Text] -> [Text] -> [Text] forall a. [a] -> [a] -> [a] @@ -2334,17 +2334,17 @@ , Word -> Text forall a. Show a => a -> Text textShow Word -bulkPoolCredFiles, Text +bulkPoolCredFiles, Text " bulk pool credential files, " , Word -> Text forall a. Show a => a -> Text textShow Word -bulkPoolsPerFile, Text +bulkPoolsPerFile, Text " pools per bulk credential file, indices starting from " , Word -> Text forall a. Show a => a -> Text textShow Word -bulkOffset, Text +bulkOffset, Text ", " , Int -> Text forall a. Show a => a -> Text @@ -2353,7 +2353,7 @@ $ [Word] -> Int forall a. HasLength a => a -> Int length [Word] -bulkIndices, Text +bulkIndices, Text " total pools in bulk nodes, each bulk node having this many entries: " , [Int] -> Text forall a. Show a => a -> Text @@ -2364,72 +2364,72 @@ length ([Word] -> Int) -> [[Word]] -> [Int] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [[Word]] -bulkSlices +bulkSlices ] | Word -bulkPoolCredFiles Word -> Word -> Word +bulkPoolCredFiles Word -> Word -> Word forall a. Num a => a -> a -> a * Word -bulkPoolsPerFile Word -> Word -> Bool +bulkPoolsPerFile Word -> Word -> Bool forall a. Ord a => a -> a -> Bool > Word 0 ] where - (,) Word -delegsPerPool Word -delegsRemaining = Word -> Word -> (Word, Word) + (,) Word +delegsPerPool Word +delegsRemaining = Word -> Word -> (Word, Word) forall a. Integral a => a -> a -> (a, a) divMod Word -genNumStDelegs Word -genNumPools - adjustTemplate :: ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley -adjustTemplate ShelleyGenesis StandardShelley -t = ShelleyGenesis StandardShelley -t { sgNetworkMagic :: Word32 +genNumStDelegs Word +genNumPools + adjustTemplate :: ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley +adjustTemplate ShelleyGenesis StandardShelley +t = ShelleyGenesis StandardShelley +t { sgNetworkMagic :: Word32 sgNetworkMagic = NetworkMagic -> Word32 unNetworkMagic (NetworkId -> NetworkMagic toNetworkMagic NetworkId -network) } - mkDelegationMapEntry :: Delegation -> (Ledger.KeyHash Ledger.Staking StandardCrypto, Ledger.PoolParams StandardCrypto) - mkDelegationMapEntry :: Delegation +network) } + mkDelegationMapEntry :: Delegation -> (Ledger.KeyHash Ledger.Staking StandardCrypto, Ledger.PoolParams StandardCrypto) + mkDelegationMapEntry :: Delegation -> (KeyHash 'Staking StandardCrypto, PoolParams StandardCrypto) -mkDelegationMapEntry Delegation -d = (Delegation -> KeyHash 'Staking StandardCrypto +mkDelegationMapEntry Delegation +d = (Delegation -> KeyHash 'Staking StandardCrypto dDelegStaking Delegation -d, Delegation -> PoolParams StandardCrypto +d, Delegation -> PoolParams StandardCrypto dPoolParams Delegation -d) +d) - gendir :: String -gendir = String -rootdir String -> ShowS + gendir :: String +gendir = String +rootdir String -> ShowS </> String "genesis-keys" - deldir :: String -deldir = String -rootdir String -> ShowS + deldir :: String +deldir = String +rootdir String -> ShowS </> String "delegate-keys" - pooldir :: String -pooldir = String -rootdir String -> ShowS + pooldir :: String +pooldir = String +rootdir String -> ShowS </> String "pools" - stdeldir :: String -stdeldir = String -rootdir String -> ShowS + stdeldir :: String +stdeldir = String +rootdir String -> ShowS </> String "stake-delegator-keys" - utxodir :: String -utxodir = String -rootdir String -> ShowS + utxodir :: String +utxodir = String +rootdir String -> ShowS </> String "utxo-keys" - genStuffedAddress :: IO (AddressInEra ShelleyEra) - genStuffedAddress :: IO (AddressInEra ShelleyEra) -genStuffedAddress = + genStuffedAddress :: IO (AddressInEra ShelleyEra) + genStuffedAddress :: IO (AddressInEra ShelleyEra) +genStuffedAddress = Address ShelleyAddr -> AddressInEra ShelleyEra forall era. IsShelleyBasedEra era => @@ -2477,7 +2477,7 @@ forall c (discriminator :: KeyRole). Crypto c => Int -> KeyHash discriminator c -mkKeyHash (Int -> KeyHash 'Payment StandardCrypto) +mkKeyHash (Int -> KeyHash 'Payment StandardCrypto) -> (ByteString -> Int) -> ByteString -> KeyHash 'Payment StandardCrypto @@ -2485,7 +2485,7 @@ Category cat => cat b c -> cat a b -> cat a c . ByteString -> Int -read64BitInt +read64BitInt (ByteString -> PaymentCredential StandardCrypto) -> IO ByteString -> IO (PaymentCredential StandardCrypto) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -2506,9 +2506,9 @@ forall crypto. StakeReference crypto Ledger.StakeRefNull) - read64BitInt :: ByteString -> Int - read64BitInt :: ByteString -> Int -read64BitInt = (Word64 -> Int + read64BitInt :: ByteString -> Int + read64BitInt :: ByteString -> Int +read64BitInt = (Word64 -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral :: Word64 -> Int) (Word64 -> Int) -> (ByteString -> Word64) -> ByteString -> Int @@ -2526,9 +2526,9 @@ . ByteString -> ByteString LBS.fromStrict - mkDummyHash :: forall h a. HashAlgorithm h => Proxy h -> Int -> Hash.Hash h a - mkDummyHash :: Proxy h -> Int -> Hash h a -mkDummyHash Proxy h + mkDummyHash :: forall h a. HashAlgorithm h => Proxy h -> Int -> Hash.Hash h a + mkDummyHash :: Proxy h -> Int -> Hash h a +mkDummyHash Proxy h _ = Hash h Int -> Hash h a coerce (Hash h Int -> Hash h a) -> (Int -> Hash h Int) -> Int -> Hash h a forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). @@ -2536,13 +2536,13 @@ cat b c -> cat a b -> cat a c . (Int -> Encoding) -> Int -> Hash h Int forall h a. HashAlgorithm h => (a -> Encoding) -> a -> Hash h a -Ledger.hashWithSerialiser @h Int -> Encoding +Ledger.hashWithSerialiser @h Int -> Encoding forall a. ToCBOR a => a -> Encoding toCBOR - mkKeyHash :: forall c discriminator. Crypto c => Int -> Ledger.KeyHash discriminator c - mkKeyHash :: Int -> KeyHash discriminator c -mkKeyHash = Hash (ADDRHASH c) (VerKeyDSIGN (DSIGN c)) + mkKeyHash :: forall c discriminator. Crypto c => Int -> Ledger.KeyHash discriminator c + mkKeyHash :: Int -> KeyHash discriminator c +mkKeyHash = Hash (ADDRHASH c) (VerKeyDSIGN (DSIGN c)) -> KeyHash discriminator c forall (discriminator :: KeyRole) crypto. Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) @@ -2558,17 +2558,17 @@ . Proxy (ADDRHASH c) -> Int -> Hash (ADDRHASH c) (VerKeyDSIGN (DSIGN c)) forall h a. HashAlgorithm h => Proxy h -> Int -> Hash h a -mkDummyHash (Proxy (ADDRHASH c) +mkDummyHash (Proxy (ADDRHASH c) forall k (t :: k). Proxy t -Proxy @(ADDRHASH c)) +Proxy @(ADDRHASH c)) -- ------------------------------------------------------------------------------------------------- createDelegateKeys :: FilePath -> Word -> ExceptT ShelleyGenesisCmdError IO () createDelegateKeys :: String -> Word -> ExceptT ShelleyGenesisCmdError IO () -createDelegateKeys String -dir Word -index = do +createDelegateKeys String +dir Word +index = do IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyGenesisCmdError IO ()) @@ -2577,7 +2577,7 @@ $ Bool -> String -> IO () createDirectoryIfMissing Bool False String -dir +dir VerificationKeyFile -> SigningKeyFile -> OpCertCounterFile @@ -2587,19 +2587,19 @@ VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "delegate" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey") SigningKeyFile -coldSK +coldSK OpCertCounterFile -opCertCtr +opCertCtr VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyGenDelegateVRF @@ -2607,12 +2607,12 @@ VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "delegate" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vrf.vkey") @@ -2620,12 +2620,12 @@ SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "delegate" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vrf.skey") @@ -2646,17 +2646,17 @@ -> SigningKeyFile -> ExceptT ShelleyNodeCmdError IO () runNodeKeyGenKES VerificationKeyFile -kesVK +kesVK (String -> SigningKeyFile SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "delegate" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".kes.skey") @@ -2671,11 +2671,11 @@ forall keyrole. VerificationKeyFile -> VerificationKeyOrFile keyrole VerificationKeyFilePath VerificationKeyFile -kesVK) +kesVK) SigningKeyFile -coldSK +coldSK OpCertCounterFile -opCertCtr +opCertCtr (Word -> KESPeriod KESPeriod Word 0) @@ -2683,69 +2683,69 @@ OutputFile (String -> OutputFile) -> String -> OutputFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "opcert" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".cert") where - strIndex :: String -strIndex = Word -> String + strIndex :: String +strIndex = Word -> String forall a b. (Show a, ConvertText String b) => a -> b show Word -index - kesVK :: VerificationKeyFile -kesVK = String -> VerificationKeyFile +index + kesVK :: VerificationKeyFile +kesVK = String -> VerificationKeyFile VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "delegate" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".kes.vkey" - coldSK :: SigningKeyFile -coldSK = String -> SigningKeyFile + coldSK :: SigningKeyFile +coldSK = String -> SigningKeyFile SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "delegate" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey" - opCertCtr :: OpCertCounterFile -opCertCtr = String -> OpCertCounterFile + opCertCtr :: OpCertCounterFile +opCertCtr = String -> OpCertCounterFile OpCertCounterFile (String -> OpCertCounterFile) -> String -> OpCertCounterFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "delegate" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".counter" createGenesisKeys :: FilePath -> Word -> ExceptT ShelleyGenesisCmdError IO () createGenesisKeys :: String -> Word -> ExceptT ShelleyGenesisCmdError IO () -createGenesisKeys String -dir Word -index = do +createGenesisKeys String +dir Word +index = do IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyGenesisCmdError IO ()) @@ -2754,12 +2754,12 @@ $ Bool -> String -> IO () createDirectoryIfMissing Bool False String -dir - let strIndex :: String -strIndex = Word -> String +dir + let strIndex :: String +strIndex = Word -> String forall a b. (Show a, ConvertText String b) => a -> b show Word -index +index VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyGenGenesis @@ -2767,12 +2767,12 @@ VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "genesis" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey") @@ -2780,12 +2780,12 @@ SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "genesis" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey") @@ -2793,9 +2793,9 @@ createUtxoKeys :: FilePath -> Word -> ExceptT ShelleyGenesisCmdError IO () createUtxoKeys :: String -> Word -> ExceptT ShelleyGenesisCmdError IO () -createUtxoKeys String -dir Word -index = do +createUtxoKeys String +dir Word +index = do IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyGenesisCmdError IO ()) @@ -2804,12 +2804,12 @@ $ Bool -> String -> IO () createDirectoryIfMissing Bool False String -dir - let strIndex :: String -strIndex = Word -> String +dir + let strIndex :: String +strIndex = Word -> String forall a b. (Show a, ConvertText String b) => a -> b show Word -index +index VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisKeyGenUTxO @@ -2817,12 +2817,12 @@ VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "utxo" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey") @@ -2830,21 +2830,21 @@ SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "utxo" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey") createPoolCredentials :: FilePath -> Word -> ExceptT ShelleyGenesisCmdError IO () createPoolCredentials :: String -> Word -> ExceptT ShelleyGenesisCmdError IO () -createPoolCredentials String -dir Word -index = do +createPoolCredentials String +dir Word +index = do IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyGenesisCmdError IO ()) @@ -2853,7 +2853,7 @@ $ Bool -> String -> IO () createDirectoryIfMissing Bool False String -dir +dir (ShelleyNodeCmdError -> ShelleyGenesisCmdError) -> ExceptT ShelleyNodeCmdError IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -2871,17 +2871,17 @@ -> SigningKeyFile -> ExceptT ShelleyNodeCmdError IO () runNodeKeyGenKES VerificationKeyFile -kesVK +kesVK (String -> SigningKeyFile SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "kes" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey") @@ -2892,12 +2892,12 @@ VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "vrf" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey") @@ -2905,12 +2905,12 @@ SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "vrf" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey") @@ -2923,19 +2923,19 @@ VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "cold" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey") SigningKeyFile -coldSK +coldSK OpCertCounterFile -opCertCtr +opCertCtr VerificationKeyOrFile KesKey -> SigningKeyFile -> OpCertCounterFile @@ -2947,11 +2947,11 @@ forall keyrole. VerificationKeyFile -> VerificationKeyOrFile keyrole VerificationKeyFilePath VerificationKeyFile -kesVK) +kesVK) SigningKeyFile -coldSK +coldSK OpCertCounterFile -opCertCtr +opCertCtr (Word -> KESPeriod KESPeriod Word 0) @@ -2959,12 +2959,12 @@ OutputFile (String -> OutputFile) -> String -> OutputFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "opcert" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".cert") @@ -2988,12 +2988,12 @@ VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "staking-reward" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey") @@ -3001,69 +3001,69 @@ SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "staking-reward" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey") where - strIndex :: String -strIndex = Word -> String + strIndex :: String +strIndex = Word -> String forall a b. (Show a, ConvertText String b) => a -> b show Word -index - kesVK :: VerificationKeyFile -kesVK = String -> VerificationKeyFile +index + kesVK :: VerificationKeyFile +kesVK = String -> VerificationKeyFile VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "kes" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey" - coldSK :: SigningKeyFile -coldSK = String -> SigningKeyFile + coldSK :: SigningKeyFile +coldSK = String -> SigningKeyFile SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "cold" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey" - opCertCtr :: OpCertCounterFile -opCertCtr = String -> OpCertCounterFile + opCertCtr :: OpCertCounterFile +opCertCtr = String -> OpCertCounterFile OpCertCounterFile (String -> OpCertCounterFile) -> String -> OpCertCounterFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "opcert" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".counter" createDelegatorCredentials :: FilePath -> Word -> ExceptT ShelleyGenesisCmdError IO () createDelegatorCredentials :: String -> Word -> ExceptT ShelleyGenesisCmdError IO () -createDelegatorCredentials String -dir Word -index = do +createDelegatorCredentials String +dir Word +index = do IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyGenesisCmdError IO ()) @@ -3072,7 +3072,7 @@ $ Bool -> String -> IO () createDirectoryIfMissing Bool False String -dir +dir (ShelleyAddressCmdError -> ShelleyGenesisCmdError) -> ExceptT ShelleyAddressCmdError IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -3094,17 +3094,17 @@ AddressKeyType AddressKeyShelley VerificationKeyFile -addrVK +addrVK (String -> SigningKeyFile SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "payment" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey") @@ -3128,12 +3128,12 @@ VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "staking" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey") @@ -3141,32 +3141,32 @@ SigningKeyFile (String -> SigningKeyFile) -> String -> SigningKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "staking" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey") where - strIndex :: String -strIndex = Word -> String + strIndex :: String +strIndex = Word -> String forall a b. (Show a, ConvertText String b) => a -> b show Word -index - addrVK :: VerificationKeyFile -addrVK = String -> VerificationKeyFile +index + addrVK :: VerificationKeyFile +addrVK = String -> VerificationKeyFile VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -dir String -> ShowS +dir String -> ShowS </> String "payment" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey" @@ -3186,11 +3186,11 @@ -> String -> Word -> ExceptT ShelleyGenesisCmdError IO (PoolParams StandardCrypto) -buildPool NetworkId -nw String -dir Word -index = do - StakePoolVerificationKey poolColdVK <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) +buildPool NetworkId +nw String +dir Word +index = do + StakePoolVerificationKey poolColdVK <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey StakePoolKey) -> ExceptT ShelleyGenesisCmdError IO (VerificationKey StakePoolKey) @@ -3253,8 +3253,8 @@ forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey AsType StakePoolKey AsStakePoolKey) String -poolColdVKF - VrfVerificationKey poolVrfVK <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) +poolColdVKF + VrfVerificationKey poolVrfVK <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey VrfKey) -> ExceptT ShelleyGenesisCmdError IO (VerificationKey VrfKey) @@ -3306,9 +3306,9 @@ forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey AsType VrfKey AsVrfKey) String -poolVrfVKF - VerificationKey StakeKey -rewardsSVK <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) +poolVrfVKF + VerificationKey StakeKey +rewardsSVK <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey StakeKey) -> ExceptT ShelleyGenesisCmdError IO (VerificationKey StakeKey) @@ -3354,7 +3354,7 @@ forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey AsType StakeKey AsStakeKey) String -poolRewardVKF +poolRewardVKF PoolParams StandardCrypto -> ExceptT ShelleyGenesisCmdError IO (PoolParams StandardCrypto) forall (f :: * -> *) a. Applicative f => a -> f a @@ -3376,7 +3376,7 @@ Crypto crypto => VKey kd crypto -> KeyHash kd crypto Ledger.hashKey VKey 'StakePool StandardCrypto -poolColdVK +poolColdVK , _poolVrf :: Hash StandardCrypto (VerKeyVRF StandardCrypto) Ledger._poolVrf = VerKeyVRF PraosVRF -> Hash Blake2b_256 (VerKeyVRF PraosVRF) forall v h. @@ -3384,7 +3384,7 @@ VerKeyVRF v -> Hash h (VerKeyVRF v) Ledger.hashVerKeyVRF VerKeyVRF StandardCrypto VerKeyVRF PraosVRF -poolVrfVK +poolVrfVK , _poolPledge :: Coin Ledger._poolPledge = Integer -> Coin Ledger.Coin Integer @@ -3405,7 +3405,7 @@ forall a b. (a -> b) -> a -> b $ NetworkId -> StakeCredential -> StakeAddress makeStakeAddress NetworkId -nw (StakeCredential -> StakeAddress) +nw (StakeCredential -> StakeAddress) -> StakeCredential -> StakeAddress forall a b. (a -> b) -> a -> b $ Hash StakeKey -> StakeCredential @@ -3414,7 +3414,7 @@ Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakeKey -rewardsSVK) +rewardsSVK) , _poolOwners :: Set (KeyHash 'Staking StandardCrypto) Ledger._poolOwners = Set (KeyHash 'Staking StandardCrypto) forall a. Monoid a => a @@ -3429,53 +3429,53 @@ Ledger.SNothing } where - strIndex :: String -strIndex = Word -> String + strIndex :: String +strIndex = Word -> String forall a b. (Show a, ConvertText String b) => a -> b show Word -index - poolColdVKF :: String -poolColdVKF = String -dir String -> ShowS +index + poolColdVKF :: String +poolColdVKF = String +dir String -> ShowS </> String "cold" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey" - poolVrfVKF :: String -poolVrfVKF = String -dir String -> ShowS + poolVrfVKF :: String +poolVrfVKF = String +dir String -> ShowS </> String "vrf" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey" - poolRewardVKF :: String -poolRewardVKF = String -dir String -> ShowS + poolRewardVKF :: String +poolRewardVKF = String +dir String -> ShowS </> String "staking-reward" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey" writeBulkPoolCredentials :: FilePath -> Word -> [Word] -> ExceptT ShelleyGenesisCmdError IO () writeBulkPoolCredentials :: String -> Word -> [Word] -> ExceptT ShelleyGenesisCmdError IO () -writeBulkPoolCredentials String -dir Word -bulkIx [Word] -poolIxs = do - [(TextEnvelope, TextEnvelope, TextEnvelope)] -creds <- (Word +writeBulkPoolCredentials String +dir Word +bulkIx [Word] +poolIxs = do + [(TextEnvelope, TextEnvelope, TextEnvelope)] +creds <- (Word -> ExceptT ShelleyGenesisCmdError IO @@ -3493,8 +3493,8 @@ ShelleyGenesisCmdError IO (TextEnvelope, TextEnvelope, TextEnvelope) -readPoolCreds [Word] -poolIxs +readPoolCreds [Word] +poolIxs (IOException -> ShelleyGenesisCmdError) -> IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) x a. @@ -3511,42 +3511,42 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -bulkFile) (IO () -> ExceptT ShelleyGenesisCmdError IO ()) +bulkFile) (IO () -> ExceptT ShelleyGenesisCmdError IO ()) -> IO () -> ExceptT ShelleyGenesisCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -bulkFile (ByteString -> IO ()) -> ByteString -> IO () +bulkFile (ByteString -> IO ()) -> ByteString -> IO () forall a b. (a -> b) -> a -> b $ [(TextEnvelope, TextEnvelope, TextEnvelope)] -> ByteString forall a. ToJSON a => a -> ByteString Aeson.encode [(TextEnvelope, TextEnvelope, TextEnvelope)] -creds +creds where - bulkFile :: String -bulkFile = String -dir String -> ShowS + bulkFile :: String +bulkFile = String +dir String -> ShowS </> String "bulk" String -> ShowS forall a. [a] -> [a] -> [a] ++ Word -> String forall a b. (Show a, ConvertText String b) => a -> b show Word -bulkIx String -> ShowS +bulkIx String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".creds" - readPoolCreds :: Word -> ExceptT ShelleyGenesisCmdError IO + readPoolCreds :: Word -> ExceptT ShelleyGenesisCmdError IO (TextEnvelope, TextEnvelope, TextEnvelope) - readPoolCreds :: Word + readPoolCreds :: Word -> ExceptT ShelleyGenesisCmdError IO (TextEnvelope, TextEnvelope, TextEnvelope) -readPoolCreds Word -ix = do +readPoolCreds Word +ix = do (,,) (TextEnvelope -> TextEnvelope -> TextEnvelope @@ -3559,8 +3559,8 @@ -> TextEnvelope -> (TextEnvelope, TextEnvelope, TextEnvelope)) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> String -> ExceptT ShelleyGenesisCmdError IO TextEnvelope -readEnvelope String -poolCert +readEnvelope String +poolCert ExceptT ShelleyGenesisCmdError IO @@ -3573,8 +3573,8 @@ (TextEnvelope -> (TextEnvelope, TextEnvelope, TextEnvelope)) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> String -> ExceptT ShelleyGenesisCmdError IO TextEnvelope -readEnvelope String -poolVrfSKF +readEnvelope String +poolVrfSKF ExceptT ShelleyGenesisCmdError IO @@ -3586,53 +3586,53 @@ (TextEnvelope, TextEnvelope, TextEnvelope) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> String -> ExceptT ShelleyGenesisCmdError IO TextEnvelope -readEnvelope String -poolKesSKF +readEnvelope String +poolKesSKF where - strIndex :: String -strIndex = Word -> String + strIndex :: String +strIndex = Word -> String forall a b. (Show a, ConvertText String b) => a -> b show Word -ix - poolCert :: String -poolCert = String -dir String -> ShowS +ix + poolCert :: String +poolCert = String +dir String -> ShowS </> String "opcert" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".cert" - poolVrfSKF :: String -poolVrfSKF = String -dir String -> ShowS + poolVrfSKF :: String +poolVrfSKF = String +dir String -> ShowS </> String "vrf" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey" - poolKesSKF :: String -poolKesSKF = String -dir String -> ShowS + poolKesSKF :: String +poolKesSKF = String +dir String -> ShowS </> String "kes" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndex String -> ShowS +strIndex String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".skey" - readEnvelope :: FilePath -> ExceptT ShelleyGenesisCmdError IO TextEnvelope - readEnvelope :: String -> ExceptT ShelleyGenesisCmdError IO TextEnvelope -readEnvelope String -fp = do - ByteString -content <- (IOException -> ShelleyGenesisCmdError) + readEnvelope :: FilePath -> ExceptT ShelleyGenesisCmdError IO TextEnvelope + readEnvelope :: String -> ExceptT ShelleyGenesisCmdError IO TextEnvelope +readEnvelope String +fp = do + ByteString +content <- (IOException -> ShelleyGenesisCmdError) -> IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString forall (m :: * -> *) x a. MonadIO m => @@ -3648,13 +3648,13 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fp) (IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString) +fp) (IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString) -> IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -fp +fp (String -> ShelleyGenesisCmdError) -> ExceptT String IO TextEnvelope -> ExceptT ShelleyGenesisCmdError IO TextEnvelope @@ -3663,7 +3663,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> Text -> ShelleyGenesisCmdError ShelleyGenesisCmdAesonDecodeError String -fp (Text -> ShelleyGenesisCmdError) +fp (Text -> ShelleyGenesisCmdError) -> (String -> Text) -> String -> ShelleyGenesisCmdError forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -3688,7 +3688,7 @@ ByteString -> Either String TextEnvelope forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecodeStrict' ByteString -content +content computeDelegation :: NetworkId -> FilePath -> Ledger.PoolParams StandardCrypto -> Word -> ExceptT ShelleyGenesisCmdError IO Delegation computeDelegation :: NetworkId @@ -3696,13 +3696,13 @@ -> PoolParams StandardCrypto -> Word -> ExceptT ShelleyGenesisCmdError IO Delegation -computeDelegation NetworkId -nw String -delegDir PoolParams StandardCrypto -pool Word -delegIx = do - SomeAddressVerificationKey -paySVK <- (VerificationKeyTextOrFileError -> ShelleyGenesisCmdError) +computeDelegation NetworkId +nw String +delegDir PoolParams StandardCrypto +pool Word +delegIx = do + SomeAddressVerificationKey +paySVK <- (VerificationKeyTextOrFileError -> ShelleyGenesisCmdError) -> ExceptT VerificationKeyTextOrFileError IO SomeAddressVerificationKey -> ExceptT ShelleyGenesisCmdError IO SomeAddressVerificationKey @@ -3733,12 +3733,12 @@ readAddressVerificationKeyTextOrFile (VerificationKeyFile -> VerificationKeyTextOrFile VktofVerificationKeyFile VerificationKeyFile -payVKF) - Address ShelleyAddr -initialUtxoAddr <- case SomeAddressVerificationKey -paySVK of - APaymentVerificationKey VerificationKey PaymentKey -payVK -> +payVKF) + Address ShelleyAddr +initialUtxoAddr <- case SomeAddressVerificationKey +paySVK of + APaymentVerificationKey VerificationKey PaymentKey +payVK -> (ShelleyAddressCmdError -> ShelleyGenesisCmdError) -> ExceptT ShelleyAddressCmdError IO (Address ShelleyAddr) -> ExceptT ShelleyGenesisCmdError IO (Address ShelleyAddr) @@ -3757,7 +3757,7 @@ -> NetworkId -> ExceptT ShelleyAddressCmdError IO (Address ShelleyAddr) buildShelleyAddress VerificationKey PaymentKey -payVK (StakeVerifier -> Maybe StakeVerifier +payVK (StakeVerifier -> Maybe StakeVerifier forall a. a -> Maybe a Just (StakeVerifier -> Maybe StakeVerifier) -> (String -> StakeVerifier) -> String -> Maybe StakeVerifier @@ -3786,8 +3786,8 @@ VerificationKeyFile (String -> Maybe StakeVerifier) -> String -> Maybe StakeVerifier forall a b. (a -> b) -> a -> b $ String -stakeVKF) NetworkId -nw +stakeVKF) NetworkId +nw SomeAddressVerificationKey _ -> ShelleyGenesisCmdError -> ExceptT ShelleyGenesisCmdError IO (Address ShelleyAddr) @@ -3800,11 +3800,11 @@ $ VerificationKeyFile -> Text -> SomeAddressVerificationKey -> ShelleyGenesisCmdError ShelleyGenesisCmdUnexpectedAddressVerificationKey VerificationKeyFile -payVKF Text +payVKF Text "APaymentVerificationKey" SomeAddressVerificationKey -paySVK +paySVK - StakeVerificationKey stakeVK <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) + StakeVerificationKey stakeVK <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey StakeKey) -> ExceptT ShelleyGenesisCmdError IO (VerificationKey StakeKey) @@ -3850,7 +3850,7 @@ forall a. AsType a -> AsType (VerificationKey a) AsVerificationKey AsType StakeKey AsStakeKey) String -stakeVKF +stakeVKF Delegation -> ExceptT ShelleyGenesisCmdError IO Delegation forall (f :: * -> *) a. Applicative f => a -> f a @@ -3865,46 +3865,46 @@ IsShelleyBasedEra era => Address ShelleyAddr -> AddressInEra era shelleyAddressInEra Address ShelleyAddr -initialUtxoAddr +initialUtxoAddr , dDelegStaking :: KeyHash 'Staking StandardCrypto dDelegStaking = VKey 'Staking StandardCrypto -> KeyHash 'Staking StandardCrypto forall crypto (kd :: KeyRole). Crypto crypto => VKey kd crypto -> KeyHash kd crypto Ledger.hashKey VKey 'Staking StandardCrypto -stakeVK +stakeVK , dPoolParams :: PoolParams StandardCrypto dPoolParams = PoolParams StandardCrypto -pool +pool } where - strIndexDeleg :: String -strIndexDeleg = Word -> String + strIndexDeleg :: String +strIndexDeleg = Word -> String forall a b. (Show a, ConvertText String b) => a -> b show Word -delegIx - payVKF :: VerificationKeyFile -payVKF = String -> VerificationKeyFile +delegIx + payVKF :: VerificationKeyFile +payVKF = String -> VerificationKeyFile VerificationKeyFile (String -> VerificationKeyFile) -> String -> VerificationKeyFile forall a b. (a -> b) -> a -> b $ String -delegDir String -> ShowS +delegDir String -> ShowS </> String "payment" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndexDeleg String -> ShowS +strIndexDeleg String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey" - stakeVKF :: String -stakeVKF = String -delegDir String -> ShowS + stakeVKF :: String +stakeVKF = String +delegDir String -> ShowS </> String "staking" String -> ShowS forall a. [a] -> [a] -> [a] ++ String -strIndexDeleg String -> ShowS +strIndexDeleg String -> ShowS forall a. [a] -> [a] -> [a] ++ String ".vkey" @@ -3914,7 +3914,7 @@ getCurrentTimePlus30 :: ExceptT ShelleyGenesisCmdError IO UTCTime getCurrentTimePlus30 = UTCTime -> UTCTime -plus30sec (UTCTime -> UTCTime) +plus30sec (UTCTime -> UTCTime) -> ExceptT ShelleyGenesisCmdError IO UTCTime -> ExceptT ShelleyGenesisCmdError IO UTCTime forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -3923,9 +3923,9 @@ liftIO IO UTCTime getCurrentTime where - plus30sec :: UTCTime -> UTCTime - plus30sec :: UTCTime -> UTCTime -plus30sec = NominalDiffTime -> UTCTime -> UTCTime + plus30sec :: UTCTime -> UTCTime + plus30sec :: UTCTime -> UTCTime +plus30sec = NominalDiffTime -> UTCTime -> UTCTime addUTCTime (NominalDiffTime 30 :: NominalDiffTime) @@ -3939,11 +3939,11 @@ -> ShelleyGenesis StandardShelley) -> ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) -readShelleyGenesis String -fpath ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley -adjustDefaults = do +readShelleyGenesis String +fpath ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley +adjustDefaults = do ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) -readAndDecode +readAndDecode ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) -> (ShelleyGenesisCmdError -> ExceptT @@ -3953,29 +3953,29 @@ forall e (m :: * -> *) a. MonadError e m => m a -> (e -> m a) -> m a -`catchError` \ShelleyGenesisCmdError -err -> +`catchError` \ShelleyGenesisCmdError +err -> case ShelleyGenesisCmdError -err of +err of ShelleyGenesisCmdGenesisFileError (FileIOError String -_ IOException -ioe) +_ IOException +ioe) | IOException -> Bool isDoesNotExistError IOException -ioe -> ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) -writeDefault +ioe -> ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) +writeDefault ShelleyGenesisCmdError _ -> ShelleyGenesisCmdError -> ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left ShelleyGenesisCmdError -err +err where - readAndDecode :: ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) -readAndDecode = do - ByteString -lbs <- (IOException -> ShelleyGenesisCmdError) + readAndDecode :: ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) +readAndDecode = do + ByteString +lbs <- (IOException -> ShelleyGenesisCmdError) -> IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString forall (m :: * -> *) x a. MonadIO m => @@ -3991,12 +3991,12 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) (IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString) +fpath) (IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString) -> IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString LBS.readFile String -fpath +fpath (String -> ShelleyGenesisCmdError) -> ExceptT String IO (ShelleyGenesis StandardShelley) -> ExceptT @@ -4006,7 +4006,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> Text -> ShelleyGenesisCmdError ShelleyGenesisCmdAesonDecodeError String -fpath (Text -> ShelleyGenesisCmdError) +fpath (Text -> ShelleyGenesisCmdError) -> (String -> Text) -> String -> ShelleyGenesisCmdError forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -4037,17 +4037,17 @@ $ ByteString -> Either String (ShelleyGenesis StandardShelley) forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecode' ByteString -lbs +lbs - defaults :: ShelleyGenesis StandardShelley - defaults :: ShelleyGenesis StandardShelley -defaults = ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley -adjustDefaults ShelleyGenesis StandardShelley + defaults :: ShelleyGenesis StandardShelley + defaults :: ShelleyGenesis StandardShelley +defaults = ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley +adjustDefaults ShelleyGenesis StandardShelley forall crypto. ShelleyGenesis crypto shelleyGenesisDefaults - writeDefault :: ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) -writeDefault = do + writeDefault :: ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) +writeDefault = do (IOException -> ShelleyGenesisCmdError) -> IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) x a. @@ -4064,22 +4064,22 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) (IO () -> ExceptT ShelleyGenesisCmdError IO ()) +fpath) (IO () -> ExceptT ShelleyGenesisCmdError IO ()) -> IO () -> ExceptT ShelleyGenesisCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -fpath (ShelleyGenesis StandardShelley -> ByteString +fpath (ShelleyGenesis StandardShelley -> ByteString forall a. ToJSON a => a -> ByteString encodePretty ShelleyGenesis StandardShelley -defaults) +defaults) ShelleyGenesis StandardShelley -> ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) forall (m :: * -> *) a. Monad m => a -> m a return ShelleyGenesis StandardShelley -defaults +defaults updateTemplate @@ -4129,47 +4129,47 @@ -> Natural -> Natural -> (ShelleyGenesis StandardShelley, AlonzoGenesis) -updateTemplate (SystemStart UTCTime -start) - Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -genDelegMap Maybe Lovelace -mAmountNonDeleg [AddressInEra ShelleyEra] -utxoAddrsNonDeleg - Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) -poolSpecs (Lovelace Integer -amountDeleg) [AddressInEra ShelleyEra] -utxoAddrsDeleg [AddressInEra ShelleyEra] -stuffedUtxoAddrs - ShelleyGenesis StandardShelley -template Lovelace -adaPerUtxoWrd' (Lovelace -exMem,Lovelace -exStep) (Word64 -maxTxMem, Word64 -maxTxStep) - (Word64 -maxBlkMem, Word64 -maxBlkStep) Natural -maxValSize' Natural -collPercent Natural -maxColInputs = do +updateTemplate (SystemStart UTCTime +start) + Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) +genDelegMap Maybe Lovelace +mAmountNonDeleg [AddressInEra ShelleyEra] +utxoAddrsNonDeleg + Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) +poolSpecs (Lovelace Integer +amountDeleg) [AddressInEra ShelleyEra] +utxoAddrsDeleg [AddressInEra ShelleyEra] +stuffedUtxoAddrs + ShelleyGenesis StandardShelley +template Lovelace +adaPerUtxoWrd' (Lovelace +exMem,Lovelace +exStep) (Word64 +maxTxMem, Word64 +maxTxStep) + (Word64 +maxBlkMem, Word64 +maxBlkStep) Natural +maxValSize' Natural +collPercent Natural +maxColInputs = do - let shelleyGenesis :: ShelleyGenesis StandardShelley -shelleyGenesis = ShelleyGenesis StandardShelley -template + let shelleyGenesis :: ShelleyGenesis StandardShelley +shelleyGenesis = ShelleyGenesis StandardShelley +template { sgSystemStart :: UTCTime sgSystemStart = UTCTime -start +start , sgMaxLovelaceSupply :: Word64 sgMaxLovelaceSupply = Integer -> Word64 forall a b. (Integral a, Num b) => a -> b fromIntegral (Integer -> Word64) -> Integer -> Word64 forall a b. (a -> b) -> a -> b $ Integer -nonDelegCoin Integer -> Integer -> Integer +nonDelegCoin Integer -> Integer -> Integer forall a. Num a => a -> a -> a + Integer -delegCoin +delegCoin , sgGenDelegs :: Map (KeyHash 'Genesis (Crypto StandardShelley)) (GenDelegPair (Crypto StandardShelley)) @@ -4177,7 +4177,7 @@ Map (KeyHash 'Genesis (Crypto StandardShelley)) (GenDelegPair (Crypto StandardShelley)) -shelleyDelKeys +shelleyDelKeys , sgInitialFunds :: Map (Addr (Crypto StandardShelley)) Coin sgInitialFunds = [(Addr StandardCrypto, Coin)] -> Map (Addr StandardCrypto) Coin forall k a. Ord k => [(k, a)] -> Map k a @@ -4185,18 +4185,18 @@ [ (AddressInEra ShelleyEra -> Addr StandardCrypto forall era. AddressInEra era -> Addr StandardCrypto toShelleyAddr AddressInEra ShelleyEra -addr, Lovelace -> Coin +addr, Lovelace -> Coin toShelleyLovelace Lovelace -v) - | (AddressInEra ShelleyEra -addr, Lovelace -v) <- +v) + | (AddressInEra ShelleyEra +addr, Lovelace +v) <- Integer -> [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] -distribute Integer -nonDelegCoin [AddressInEra ShelleyEra] -utxoAddrsNonDeleg [(AddressInEra ShelleyEra, Lovelace)] +distribute Integer +nonDelegCoin [AddressInEra ShelleyEra] +utxoAddrsNonDeleg [(AddressInEra ShelleyEra, Lovelace)] -> [(AddressInEra ShelleyEra, Lovelace)] -> [(AddressInEra ShelleyEra, Lovelace)] forall a. [a] -> [a] -> [a] @@ -4204,16 +4204,16 @@ Integer -> [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] -distribute Integer -delegCoin [AddressInEra ShelleyEra] -utxoAddrsDeleg [(AddressInEra ShelleyEra, Lovelace)] +distribute Integer +delegCoin [AddressInEra ShelleyEra] +utxoAddrsDeleg [(AddressInEra ShelleyEra, Lovelace)] -> [(AddressInEra ShelleyEra, Lovelace)] -> [(AddressInEra ShelleyEra, Lovelace)] forall a. [a] -> [a] -> [a] ++ [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] -mkStuffedUtxo [AddressInEra ShelleyEra] -stuffedUtxoAddrs ] +mkStuffedUtxo [AddressInEra ShelleyEra] +stuffedUtxoAddrs ] , sgStaking :: ShelleyGenesisStaking (Crypto StandardShelley) sgStaking = ShelleyGenesisStaking :: forall crypto. @@ -4230,14 +4230,14 @@ [ (PoolParams StandardCrypto -> KeyHash 'StakePool StandardCrypto forall crypto. PoolParams crypto -> KeyHash 'StakePool crypto Ledger._poolId PoolParams StandardCrypto -poolParams, PoolParams StandardCrypto -poolParams) - | PoolParams StandardCrypto -poolParams <- Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) +poolParams, PoolParams StandardCrypto +poolParams) + | PoolParams StandardCrypto +poolParams <- Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) -> [PoolParams StandardCrypto] forall k a. Map k a -> [a] Map.elems Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) -poolSpecs ] +poolSpecs ] , sgsStake :: Map (KeyHash 'Staking StandardCrypto) (KeyHash 'StakePool StandardCrypto) @@ -4251,17 +4251,17 @@ (KeyHash 'StakePool StandardCrypto) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Map (KeyHash 'Staking StandardCrypto) (PoolParams StandardCrypto) -poolSpecs +poolSpecs } } - cModel :: Map Language CostModel -cModel = case Maybe CostModelParams + cModel :: Map Language CostModel +cModel = case Maybe CostModelParams Plutus.defaultCostModelParams of - Just CostModelParams -m -> + Just CostModelParams +m -> if CostModelParams -> Bool Alonzo.validateCostModelParams CostModelParams -m +m then Language -> CostModel -> Map Language CostModel forall k a. k -> a -> Map k a Map.singleton Language @@ -4270,7 +4270,7 @@ forall a b. (a -> b) -> a -> b $ CostModelParams -> CostModel Alonzo.CostModel CostModelParams -m +m else Text -> Map Language CostModel forall a. HasCallStack => Text -> a panic Text @@ -4281,8 +4281,8 @@ forall a. HasCallStack => Text -> a panic Text "updateTemplate: Could not extract cost model params from Plutus.defaultCostModel" - alonzoGenesis :: AlonzoGenesis -alonzoGenesis = AlonzoGenesis :: Coin + alonzoGenesis :: AlonzoGenesis +alonzoGenesis = AlonzoGenesis :: Coin -> Map Language CostModel -> Prices -> ExUnits @@ -4295,44 +4295,44 @@ { adaPerUTxOWord :: Coin Alonzo.adaPerUTxOWord = Lovelace -> Coin toShelleyLovelace Lovelace -adaPerUtxoWrd' +adaPerUtxoWrd' , costmdls :: Map Language CostModel Alonzo.costmdls = Map Language CostModel -cModel +cModel , prices :: Prices Alonzo.prices = Coin -> Coin -> Prices Alonzo.Prices (Lovelace -> Coin toShelleyLovelace Lovelace -exMem) (Lovelace -> Coin +exMem) (Lovelace -> Coin toShelleyLovelace Lovelace -exStep) +exStep) , maxTxExUnits :: ExUnits Alonzo.maxTxExUnits = Word64 -> Word64 -> ExUnits Alonzo.ExUnits Word64 -maxTxMem Word64 -maxTxStep +maxTxMem Word64 +maxTxStep , maxBlockExUnits :: ExUnits Alonzo.maxBlockExUnits = Word64 -> Word64 -> ExUnits Alonzo.ExUnits Word64 -maxBlkMem Word64 -maxBlkStep +maxBlkMem Word64 +maxBlkStep , maxValSize :: Natural Alonzo.maxValSize = Natural -maxValSize' +maxValSize' , collateralPercentage :: Natural Alonzo.collateralPercentage = Natural -collPercent +collPercent , maxCollateralInputs :: Natural Alonzo.maxCollateralInputs = Natural -maxColInputs +maxColInputs } (ShelleyGenesis StandardShelley -shelleyGenesis, AlonzoGenesis -alonzoGenesis) +shelleyGenesis, AlonzoGenesis +alonzoGenesis) where - nonDelegCoin, delegCoin :: Integer - nonDelegCoin :: Integer -nonDelegCoin = Word64 -> Integer + nonDelegCoin, delegCoin :: Integer + nonDelegCoin :: Integer +nonDelegCoin = Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 -> Integer) -> Word64 -> Integer forall a b. (a -> b) -> a -> b @@ -4341,25 +4341,25 @@ fromMaybe (ShelleyGenesis StandardShelley -> Word64 forall era. ShelleyGenesis era -> Word64 sgMaxLovelaceSupply ShelleyGenesis StandardShelley -template) (Lovelace -> Word64 +template) (Lovelace -> Word64 forall a. Integral a => Lovelace -> a -unLovelace (Lovelace -> Word64) -> Maybe Lovelace -> Maybe Word64 +unLovelace (Lovelace -> Word64) -> Maybe Lovelace -> Maybe Word64 forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe Lovelace -mAmountNonDeleg) - delegCoin :: Integer -delegCoin = Integer -> Integer +mAmountNonDeleg) + delegCoin :: Integer +delegCoin = Integer -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral Integer -amountDeleg +amountDeleg - distribute :: Integer -> [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] - distribute :: Integer + distribute :: Integer -> [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] + distribute :: Integer -> [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] -distribute Integer -funds [AddressInEra ShelleyEra] -addrs = +distribute Integer +funds [AddressInEra ShelleyEra] +addrs = ([(AddressInEra ShelleyEra, Lovelace)], Integer) -> [(AddressInEra ShelleyEra, Lovelace)] forall a b. (a, b) -> a @@ -4380,88 +4380,88 @@ List.foldl' ([(AddressInEra ShelleyEra, Lovelace)], Integer) -> AddressInEra ShelleyEra -> ([(AddressInEra ShelleyEra, Lovelace)], Integer) -folder ([], Integer -> Integer +folder ([], Integer -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral Integer -funds) [AddressInEra ShelleyEra] -addrs +funds) [AddressInEra ShelleyEra] +addrs where - nAddrs, coinPerAddr, splitThreshold :: Integer - nAddrs :: Integer -nAddrs = Int -> Integer + nAddrs, coinPerAddr, splitThreshold :: Integer + nAddrs :: Integer +nAddrs = Int -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Int -> Integer) -> Int -> Integer forall a b. (a -> b) -> a -> b $ [AddressInEra ShelleyEra] -> Int forall a. HasLength a => a -> Int length [AddressInEra ShelleyEra] -addrs - coinPerAddr :: Integer -coinPerAddr = Integer -funds Integer -> Integer -> Integer +addrs + coinPerAddr :: Integer +coinPerAddr = Integer +funds Integer -> Integer -> Integer forall a. Integral a => a -> a -> a `div` Integer -nAddrs - splitThreshold :: Integer -splitThreshold = Integer -coinPerAddr Integer -> Integer -> Integer +nAddrs + splitThreshold :: Integer +splitThreshold = Integer +coinPerAddr Integer -> Integer -> Integer forall a. Num a => a -> a -> a + Integer -nAddrs +nAddrs - folder :: ([(AddressInEra ShelleyEra, Lovelace)], Integer) + folder :: ([(AddressInEra ShelleyEra, Lovelace)], Integer) -> AddressInEra ShelleyEra -> ([(AddressInEra ShelleyEra, Lovelace)], Integer) - folder :: ([(AddressInEra ShelleyEra, Lovelace)], Integer) + folder :: ([(AddressInEra ShelleyEra, Lovelace)], Integer) -> AddressInEra ShelleyEra -> ([(AddressInEra ShelleyEra, Lovelace)], Integer) -folder ([(AddressInEra ShelleyEra, Lovelace)] -acc, Integer -rest) AddressInEra ShelleyEra -addr +folder ([(AddressInEra ShelleyEra, Lovelace)] +acc, Integer +rest) AddressInEra ShelleyEra +addr | Integer -rest Integer -> Integer -> Bool +rest Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool > Integer -splitThreshold = +splitThreshold = ((AddressInEra ShelleyEra -addr, Integer -> Lovelace +addr, Integer -> Lovelace Lovelace Integer -coinPerAddr) (AddressInEra ShelleyEra, Lovelace) +coinPerAddr) (AddressInEra ShelleyEra, Lovelace) -> [(AddressInEra ShelleyEra, Lovelace)] -> [(AddressInEra ShelleyEra, Lovelace)] forall a. a -> [a] -> [a] : [(AddressInEra ShelleyEra, Lovelace)] -acc, Integer -rest Integer -> Integer -> Integer +acc, Integer +rest Integer -> Integer -> Integer forall a. Num a => a -> a -> a - Integer -coinPerAddr) +coinPerAddr) | Bool otherwise = ((AddressInEra ShelleyEra -addr, Integer -> Lovelace +addr, Integer -> Lovelace Lovelace Integer -rest) (AddressInEra ShelleyEra, Lovelace) +rest) (AddressInEra ShelleyEra, Lovelace) -> [(AddressInEra ShelleyEra, Lovelace)] -> [(AddressInEra ShelleyEra, Lovelace)] forall a. a -> [a] -> [a] : [(AddressInEra ShelleyEra, Lovelace)] -acc, Integer +acc, Integer 0) - mkStuffedUtxo :: [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] - mkStuffedUtxo :: [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] -mkStuffedUtxo [AddressInEra ShelleyEra] -xs = (, Integer -> Lovelace + mkStuffedUtxo :: [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] + mkStuffedUtxo :: [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] +mkStuffedUtxo [AddressInEra ShelleyEra] +xs = (, Integer -> Lovelace Lovelace Integer -minUtxoVal) (AddressInEra ShelleyEra -> (AddressInEra ShelleyEra, Lovelace)) +minUtxoVal) (AddressInEra ShelleyEra -> (AddressInEra ShelleyEra, Lovelace)) -> [AddressInEra ShelleyEra] -> [(AddressInEra ShelleyEra, Lovelace)] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [AddressInEra ShelleyEra] -xs - where (Coin Integer -minUtxoVal) = PParams' Identity StandardShelley -> HKD Identity Coin +xs + where (Coin Integer +minUtxoVal) = PParams' Identity StandardShelley -> HKD Identity Coin forall (f :: * -> *) era. PParams' f era -> HKD f Coin Shelley._minUTxOValue (PParams' Identity StandardShelley -> HKD Identity Coin) -> PParams' Identity StandardShelley -> HKD Identity Coin @@ -4469,50 +4469,50 @@ $ ShelleyGenesis StandardShelley -> PParams' Identity StandardShelley forall era. ShelleyGenesis era -> PParams era sgProtocolParams ShelleyGenesis StandardShelley -template +template - shelleyDelKeys :: Map (KeyHash 'Genesis StandardCrypto) (GenDelegPair StandardCrypto) -shelleyDelKeys = + shelleyDelKeys :: Map (KeyHash 'Genesis StandardCrypto) (GenDelegPair StandardCrypto) +shelleyDelKeys = [(KeyHash 'Genesis StandardCrypto, GenDelegPair StandardCrypto)] -> Map (KeyHash 'Genesis StandardCrypto) (GenDelegPair StandardCrypto) forall k a. Ord k => [(k, a)] -> Map k a Map.fromList [ (KeyHash 'Genesis StandardCrypto -gh, KeyHash 'GenesisDelegate StandardCrypto +gh, KeyHash 'GenesisDelegate StandardCrypto -> Hash StandardCrypto (VerKeyVRF StandardCrypto) -> GenDelegPair StandardCrypto forall crypto. KeyHash 'GenesisDelegate crypto -> Hash crypto (VerKeyVRF crypto) -> GenDelegPair crypto Ledger.GenDelegPair KeyHash 'GenesisDelegate StandardCrypto -gdh Hash StandardCrypto (VerKeyVRF StandardCrypto) -h) - | (GenesisKeyHash gh, - (GenesisDelegateKeyHash gdh, VrfKeyHash h)) <- Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) +gdh Hash StandardCrypto (VerKeyVRF StandardCrypto) +h) + | (GenesisKeyHash gh, + (GenesisDelegateKeyHash gdh, VrfKeyHash h)) <- Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -> [(Hash GenesisKey, (Hash GenesisDelegateKey, Hash VrfKey))] forall k a. Map k a -> [(k, a)] Map.toList Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -genDelegMap +genDelegMap ] - unLovelace :: Integral a => Lovelace -> a - unLovelace :: Lovelace -> a -unLovelace (Lovelace Integer -coin) = Integer -> a + unLovelace :: Integral a => Lovelace -> a + unLovelace :: Lovelace -> a +unLovelace (Lovelace Integer +coin) = Integer -> a forall a b. (Integral a, Num b) => a -> b fromIntegral Integer -coin +coin -writeFileGenesis - :: ToJSON genesis +writeFileGenesis + :: ToJSON genesis => FilePath - -> genesis + -> genesis -> ExceptT ShelleyGenesisCmdError IO () writeFileGenesis :: String -> genesis -> ExceptT ShelleyGenesisCmdError IO () -writeFileGenesis String -fpath genesis -genesis = +writeFileGenesis String +fpath genesis +genesis = (IOException -> ShelleyGenesisCmdError) -> IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) x a. @@ -4529,16 +4529,16 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) (IO () -> ExceptT ShelleyGenesisCmdError IO ()) +fpath) (IO () -> ExceptT ShelleyGenesisCmdError IO ()) -> IO () -> ExceptT ShelleyGenesisCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -fpath (genesis -> ByteString +fpath (genesis -> ByteString forall a. ToJSON a => a -> ByteString encodePretty genesis -genesis) +genesis) -- ---------------------------------------------------------------------------- @@ -4552,38 +4552,38 @@ ShelleyGenesisCmdError IO (Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey)) -readGenDelegsMap String -gendir String -deldir = do - Map Int (VerificationKey GenesisKey) -gkm <- String +readGenDelegsMap String +gendir String +deldir = do + Map Int (VerificationKey GenesisKey) +gkm <- String -> ExceptT ShelleyGenesisCmdError IO (Map Int (VerificationKey GenesisKey)) readGenesisKeys String -gendir - Map Int (VerificationKey GenesisDelegateKey) -dkm <- String +gendir + Map Int (VerificationKey GenesisDelegateKey) +dkm <- String -> ExceptT ShelleyGenesisCmdError IO (Map Int (VerificationKey GenesisDelegateKey)) readDelegateKeys String -deldir - Map Int (VerificationKey VrfKey) -vkm <- String +deldir + Map Int (VerificationKey VrfKey) +vkm <- String -> ExceptT ShelleyGenesisCmdError IO (Map Int (VerificationKey VrfKey)) readDelegateVrfKeys String -deldir +deldir - let combinedMap :: Map Int (VerificationKey GenesisKey, + let combinedMap :: Map Int (VerificationKey GenesisKey, (VerificationKey GenesisDelegateKey, VerificationKey VrfKey)) - combinedMap :: Map + combinedMap :: Map Int (VerificationKey GenesisKey, (VerificationKey GenesisDelegateKey, VerificationKey VrfKey)) -combinedMap = +combinedMap = (VerificationKey GenesisKey -> (VerificationKey GenesisDelegateKey, VerificationKey VrfKey) -> (VerificationKey GenesisKey, @@ -4600,7 +4600,7 @@ (a -> b -> c) -> Map k a -> Map k b -> Map k c Map.intersectionWith (,) Map Int (VerificationKey GenesisKey) -gkm +gkm ((VerificationKey GenesisDelegateKey -> VerificationKey VrfKey -> (VerificationKey GenesisDelegateKey, VerificationKey VrfKey)) @@ -4613,13 +4613,13 @@ (a -> b -> c) -> Map k a -> Map k b -> Map k c Map.intersectionWith (,) Map Int (VerificationKey GenesisDelegateKey) -dkm Map Int (VerificationKey VrfKey) -vkm) +dkm Map Int (VerificationKey VrfKey) +vkm) -- All the maps should have an identical set of keys. Complain if not. - let gkmExtra :: Map Int (VerificationKey GenesisKey) -gkmExtra = Map Int (VerificationKey GenesisKey) -gkm Map Int (VerificationKey GenesisKey) + let gkmExtra :: Map Int (VerificationKey GenesisKey) +gkmExtra = Map Int (VerificationKey GenesisKey) +gkm Map Int (VerificationKey GenesisKey) -> Map Int (VerificationKey GenesisKey, @@ -4630,10 +4630,10 @@ Int (VerificationKey GenesisKey, (VerificationKey GenesisDelegateKey, VerificationKey VrfKey)) -combinedMap - dkmExtra :: Map Int (VerificationKey GenesisDelegateKey) -dkmExtra = Map Int (VerificationKey GenesisDelegateKey) -dkm Map Int (VerificationKey GenesisDelegateKey) +combinedMap + dkmExtra :: Map Int (VerificationKey GenesisDelegateKey) +dkmExtra = Map Int (VerificationKey GenesisDelegateKey) +dkm Map Int (VerificationKey GenesisDelegateKey) -> Map Int (VerificationKey GenesisKey, @@ -4644,10 +4644,10 @@ Int (VerificationKey GenesisKey, (VerificationKey GenesisDelegateKey, VerificationKey VrfKey)) -combinedMap - vkmExtra :: Map Int (VerificationKey VrfKey) -vkmExtra = Map Int (VerificationKey VrfKey) -vkm Map Int (VerificationKey VrfKey) +combinedMap + vkmExtra :: Map Int (VerificationKey VrfKey) +vkmExtra = Map Int (VerificationKey VrfKey) +vkm Map Int (VerificationKey VrfKey) -> Map Int (VerificationKey GenesisKey, @@ -4658,7 +4658,7 @@ Int (VerificationKey GenesisKey, (VerificationKey GenesisDelegateKey, VerificationKey VrfKey)) -combinedMap +combinedMap Bool -> ExceptT ShelleyGenesisCmdError IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -4666,15 +4666,15 @@ unless (Map Int (VerificationKey GenesisKey) -> Bool forall k a. Map k a -> Bool Map.null Map Int (VerificationKey GenesisKey) -gkmExtra Bool -> Bool -> Bool +gkmExtra Bool -> Bool -> Bool && Map Int (VerificationKey GenesisDelegateKey) -> Bool forall k a. Map k a -> Bool Map.null Map Int (VerificationKey GenesisDelegateKey) -dkmExtra Bool -> Bool -> Bool +dkmExtra Bool -> Bool -> Bool && Map Int (VerificationKey VrfKey) -> Bool forall k a. Map k a -> Bool Map.null Map Int (VerificationKey VrfKey) -vkmExtra) (ExceptT ShelleyGenesisCmdError IO () +vkmExtra) (ExceptT ShelleyGenesisCmdError IO () -> ExceptT ShelleyGenesisCmdError IO ()) -> ExceptT ShelleyGenesisCmdError IO () -> ExceptT ShelleyGenesisCmdError IO () @@ -4690,29 +4690,29 @@ (Map Int (VerificationKey GenesisKey) -> [Int] forall k a. Map k a -> [k] Map.keys Map Int (VerificationKey GenesisKey) -gkm) (Map Int (VerificationKey GenesisDelegateKey) -> [Int] +gkm) (Map Int (VerificationKey GenesisDelegateKey) -> [Int] forall k a. Map k a -> [k] Map.keys Map Int (VerificationKey GenesisDelegateKey) -dkm) (Map Int (VerificationKey VrfKey) -> [Int] +dkm) (Map Int (VerificationKey VrfKey) -> [Int] forall k a. Map k a -> [k] Map.keys Map Int (VerificationKey VrfKey) -vkm) +vkm) - let delegsMap :: Map (Hash GenesisKey) + let delegsMap :: Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) - delegsMap :: Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -delegsMap = + delegsMap :: Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) +delegsMap = [(Hash GenesisKey, (Hash GenesisDelegateKey, Hash VrfKey))] -> Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) forall k a. Ord k => [(k, a)] -> Map k a Map.fromList [ (Hash GenesisKey -gh, (Hash GenesisDelegateKey -dh, Hash VrfKey -vh)) - | (VerificationKey GenesisKey -g,(VerificationKey GenesisDelegateKey -d,VerificationKey VrfKey -v)) <- Map +gh, (Hash GenesisDelegateKey +dh, Hash VrfKey +vh)) + | (VerificationKey GenesisKey +g,(VerificationKey GenesisDelegateKey +d,VerificationKey VrfKey +v)) <- Map Int (VerificationKey GenesisKey, (VerificationKey GenesisDelegateKey, VerificationKey VrfKey)) @@ -4723,28 +4723,28 @@ Int (VerificationKey GenesisKey, (VerificationKey GenesisDelegateKey, VerificationKey VrfKey)) -combinedMap - , let gh :: Hash GenesisKey -gh = VerificationKey GenesisKey -> Hash GenesisKey +combinedMap + , let gh :: Hash GenesisKey +gh = VerificationKey GenesisKey -> Hash GenesisKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey GenesisKey -g - dh :: Hash GenesisDelegateKey -dh = VerificationKey GenesisDelegateKey -> Hash GenesisDelegateKey +g + dh :: Hash GenesisDelegateKey +dh = VerificationKey GenesisDelegateKey -> Hash GenesisDelegateKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey GenesisDelegateKey -d - vh :: Hash VrfKey -vh = VerificationKey VrfKey -> Hash VrfKey +d + vh :: Hash VrfKey +vh = VerificationKey VrfKey -> Hash VrfKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey VrfKey -v +v ] Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) @@ -4754,7 +4754,7 @@ (Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey)) forall (f :: * -> *) a. Applicative f => a -> f a pure Map (Hash GenesisKey) (Hash GenesisDelegateKey, Hash VrfKey) -delegsMap +delegsMap readGenesisKeys :: FilePath -> ExceptT ShelleyGenesisCmdError IO @@ -4762,26 +4762,26 @@ readGenesisKeys :: String -> ExceptT ShelleyGenesisCmdError IO (Map Int (VerificationKey GenesisKey)) -readGenesisKeys String -gendir = do - [String] -files <- IO [String] -> ExceptT ShelleyGenesisCmdError IO [String] +readGenesisKeys String +gendir = do + [String] +files <- IO [String] -> ExceptT ShelleyGenesisCmdError IO [String] forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (String -> IO [String] listDirectory String -gendir) - [(String, Int)] -fileIxs <- [String] -> ExceptT ShelleyGenesisCmdError IO [(String, Int)] +gendir) + [(String, Int)] +fileIxs <- [String] -> ExceptT ShelleyGenesisCmdError IO [(String, Int)] extractFileNameIndexes [ String -gendir String -> ShowS +gendir String -> ShowS </> String -file - | String -file <- [String] -files +file + | String +file <- [String] +files , ShowS takeExtension String -file String -> String -> Bool +file String -> String -> Bool forall a. Eq a => a -> a -> Bool == String ".vkey" ] @@ -4836,7 +4836,7 @@ t (m a) -> m (t a) sequence [ (,) Int -ix (VerificationKey GenesisKey -> (Int, VerificationKey GenesisKey)) +ix (VerificationKey GenesisKey -> (Int, VerificationKey GenesisKey)) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey GenesisKey) -> ExceptT @@ -4845,17 +4845,17 @@ <$> String -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey GenesisKey) -readKey String -file - | (String -file, Int -ix) <- [(String, Int)] -fileIxs ] +readKey String +file + | (String +file, Int +ix) <- [(String, Int)] +fileIxs ] where - readKey :: String + readKey :: String -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey GenesisKey) -readKey = IO +readKey = IO (Either (FileError TextEnvelopeError) (VerificationKey GenesisKey)) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey GenesisKey) @@ -4895,26 +4895,26 @@ ShelleyGenesisCmdError IO (Map Int (VerificationKey GenesisDelegateKey)) -readDelegateKeys String -deldir = do - [String] -files <- IO [String] -> ExceptT ShelleyGenesisCmdError IO [String] +readDelegateKeys String +deldir = do + [String] +files <- IO [String] -> ExceptT ShelleyGenesisCmdError IO [String] forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (String -> IO [String] listDirectory String -deldir) - [(String, Int)] -fileIxs <- [String] -> ExceptT ShelleyGenesisCmdError IO [(String, Int)] +deldir) + [(String, Int)] +fileIxs <- [String] -> ExceptT ShelleyGenesisCmdError IO [(String, Int)] extractFileNameIndexes [ String -deldir String -> ShowS +deldir String -> ShowS </> String -file - | String -file <- [String] -files +file + | String +file <- [String] +files , ShowS takeExtensions String -file String -> String -> Bool +file String -> String -> Bool forall a. Eq a => a -> a -> Bool == String ".vkey" ] @@ -4977,7 +4977,7 @@ t (m a) -> m (t a) sequence [ (,) Int -ix (VerificationKey GenesisDelegateKey +ix (VerificationKey GenesisDelegateKey -> (Int, VerificationKey GenesisDelegateKey)) -> ExceptT (FileError TextEnvelopeError) @@ -4993,19 +4993,19 @@ (FileError TextEnvelopeError) IO (VerificationKey GenesisDelegateKey) -readKey String -file - | (String -file, Int -ix) <- [(String, Int)] -fileIxs ] +readKey String +file + | (String +file, Int +ix) <- [(String, Int)] +fileIxs ] where - readKey :: String + readKey :: String -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey GenesisDelegateKey) -readKey = IO +readKey = IO (Either (FileError TextEnvelopeError) (VerificationKey GenesisDelegateKey)) -> ExceptT @@ -5053,26 +5053,26 @@ readDelegateVrfKeys :: String -> ExceptT ShelleyGenesisCmdError IO (Map Int (VerificationKey VrfKey)) -readDelegateVrfKeys String -deldir = do - [String] -files <- IO [String] -> ExceptT ShelleyGenesisCmdError IO [String] +readDelegateVrfKeys String +deldir = do + [String] +files <- IO [String] -> ExceptT ShelleyGenesisCmdError IO [String] forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (String -> IO [String] listDirectory String -deldir) - [(String, Int)] -fileIxs <- [String] -> ExceptT ShelleyGenesisCmdError IO [(String, Int)] +deldir) + [(String, Int)] +fileIxs <- [String] -> ExceptT ShelleyGenesisCmdError IO [(String, Int)] extractFileNameIndexes [ String -deldir String -> ShowS +deldir String -> ShowS </> String -file - | String -file <- [String] -files +file + | String +file <- [String] +files , ShowS takeExtensions String -file String -> String -> Bool +file String -> String -> Bool forall a. Eq a => a -> a -> Bool == String ".vrf.vkey" ] @@ -5114,7 +5114,7 @@ t (m a) -> m (t a) sequence [ (,) Int -ix (VerificationKey VrfKey -> (Int, VerificationKey VrfKey)) +ix (VerificationKey VrfKey -> (Int, VerificationKey VrfKey)) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey VrfKey) -> ExceptT @@ -5123,17 +5123,17 @@ <$> String -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey VrfKey) -readKey String -file - | (String -file, Int -ix) <- [(String, Int)] -fileIxs ] +readKey String +file + | (String +file, Int +ix) <- [(String, Int)] +fileIxs ] where - readKey :: String + readKey :: String -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey VrfKey) -readKey = IO (Either (FileError TextEnvelopeError) (VerificationKey VrfKey)) +readKey = IO (Either (FileError TextEnvelopeError) (VerificationKey VrfKey)) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey VrfKey) forall (m :: * -> *) x a. m (Either x a) -> ExceptT x m a @@ -5168,48 +5168,48 @@ -- extractFileNameIndex :: FilePath -> Maybe Int extractFileNameIndex :: String -> Maybe Int -extractFileNameIndex String -fp = +extractFileNameIndex String +fp = case (Char -> Bool) -> ShowS forall a. (a -> Bool) -> [a] -> [a] filter Char -> Bool isDigit String -fp of +fp of [] -> Maybe Int forall a. Maybe a Nothing - String -xs -> String -> Maybe Int + String +xs -> String -> Maybe Int forall a. Read a => String -> Maybe a readMaybe String -xs +xs extractFileNameIndexes :: [FilePath] -> ExceptT ShelleyGenesisCmdError IO [(FilePath, Int)] extractFileNameIndexes :: [String] -> ExceptT ShelleyGenesisCmdError IO [(String, Int)] -extractFileNameIndexes [String] -files = do +extractFileNameIndexes [String] +files = do case [ String -file | (String -file, Maybe Int +file | (String +file, Maybe Int Nothing) <- [(String, Maybe Int)] -filesIxs ] of +filesIxs ] of [] -> () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. Monad m => a -> m a return () - [String] -files' -> ShelleyGenesisCmdError -> ExceptT ShelleyGenesisCmdError IO () + [String] +files' -> ShelleyGenesisCmdError -> ExceptT ShelleyGenesisCmdError IO () forall e (m :: * -> *) a. MonadError e m => e -> m a throwError ([String] -> ShelleyGenesisCmdError ShelleyGenesisCmdFilesNoIndex [String] -files') +files') case ([(String, Int)] -> Bool) -> [[(String, Int)]] -> [[(String, Int)]] forall a. (a -> Bool) -> [a] -> [a] -filter (\[(String, Int)] -g -> [(String, Int)] -> Int +filter (\[(String, Int)] +g -> [(String, Int)] -> Int forall a. HasLength a => a -> Int length [(String, Int)] -g Int -> Int -> Bool +g Int -> Int -> Bool forall a. Ord a => a -> a -> Bool > Int 1) @@ -5256,16 +5256,16 @@ -> [(String, Int)] -> [[(String, Int)]] forall a b. (a -> b) -> a -> b $ [ (String -file, Int -ix) | (String -file, Just Int -ix) <- [(String, Maybe Int)] -filesIxs ] of +file, Int +ix) | (String +file, Just Int +ix) <- [(String, Maybe Int)] +filesIxs ] of [] -> () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. Monad m => a -> m a return () - ([(String, Int)] -g:[[(String, Int)]] + ([(String, Int)] +g:[[(String, Int)]] _) -> ShelleyGenesisCmdError -> ExceptT ShelleyGenesisCmdError IO () forall e (m :: * -> *) a. MonadError e m => e -> m a throwError ([String] -> ShelleyGenesisCmdError @@ -5274,42 +5274,42 @@ map (String, Int) -> String forall a b. (a, b) -> a fst [(String, Int)] -g)) +g)) [(String, Int)] -> ExceptT ShelleyGenesisCmdError IO [(String, Int)] forall (m :: * -> *) a. Monad m => a -> m a return [ (String -file, Int -ix) | (String -file, Just Int -ix) <- [(String, Maybe Int)] -filesIxs ] +file, Int +ix) | (String +file, Just Int +ix) <- [(String, Maybe Int)] +filesIxs ] where - filesIxs :: [(String, Maybe Int)] -filesIxs = [ (String -file, String -> Maybe Int + filesIxs :: [(String, Maybe Int)] +filesIxs = [ (String +file, String -> Maybe Int extractFileNameIndex String -file) | String -file <- [String] -files ] +file) | String +file <- [String] +files ] readInitialFundAddresses :: FilePath -> NetworkId -> ExceptT ShelleyGenesisCmdError IO [AddressInEra ShelleyEra] readInitialFundAddresses :: String -> NetworkId -> ExceptT ShelleyGenesisCmdError IO [AddressInEra ShelleyEra] -readInitialFundAddresses String -utxodir NetworkId -nw = do - [String] -files <- IO [String] -> ExceptT ShelleyGenesisCmdError IO [String] +readInitialFundAddresses String +utxodir NetworkId +nw = do + [String] +files <- IO [String] -> ExceptT ShelleyGenesisCmdError IO [String] forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (String -> IO [String] listDirectory String -utxodir) - [VerificationKey GenesisUTxOKey] -vkeys <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) +utxodir) + [VerificationKey GenesisUTxOKey] +vkeys <- (FileError TextEnvelopeError -> ShelleyGenesisCmdError) -> ExceptT (FileError TextEnvelopeError) IO [VerificationKey GenesisUTxOKey] -> ExceptT @@ -5367,15 +5367,15 @@ AsVerificationKey AsType GenesisUTxOKey AsGenesisUTxOKey) (String -utxodir String -> ShowS +utxodir String -> ShowS </> String -file) - | String -file <- [String] -files +file) + | String +file <- [String] +files , ShowS takeExtension String -file String -> String -> Bool +file String -> String -> Bool forall a. Eq a => a -> a -> Bool == String ".vkey" ] @@ -5383,11 +5383,11 @@ -> ExceptT ShelleyGenesisCmdError IO [AddressInEra ShelleyEra] forall (m :: * -> *) a. Monad m => a -> m a return [ AddressInEra ShelleyEra -addr | VerificationKey GenesisUTxOKey -vkey <- [VerificationKey GenesisUTxOKey] -vkeys - , let vkh :: Hash PaymentKey -vkh = VerificationKey PaymentKey -> Hash PaymentKey +addr | VerificationKey GenesisUTxOKey +vkey <- [VerificationKey GenesisUTxOKey] +vkeys + , let vkh :: Hash PaymentKey +vkh = VerificationKey PaymentKey -> Hash PaymentKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole @@ -5396,9 +5396,9 @@ CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey VerificationKey GenesisUTxOKey -vkey) - addr :: AddressInEra ShelleyEra -addr = NetworkId +vkey) + addr :: AddressInEra ShelleyEra +addr = NetworkId -> PaymentCredential -> StakeAddressReference -> AddressInEra ShelleyEra @@ -5407,9 +5407,9 @@ NetworkId -> PaymentCredential -> StakeAddressReference -> AddressInEra era makeShelleyAddressInEra NetworkId -nw (Hash PaymentKey -> PaymentCredential +nw (Hash PaymentKey -> PaymentCredential PaymentCredentialByKey Hash PaymentKey -vkh) +vkh) StakeAddressReference NoStakeAddress ] @@ -5418,10 +5418,10 @@ -- | Hash a genesis file runGenesisHashFile :: GenesisFile -> ExceptT ShelleyGenesisCmdError IO () runGenesisHashFile :: GenesisFile -> ExceptT ShelleyGenesisCmdError IO () -runGenesisHashFile (GenesisFile String -fpath) = do - ByteString -content <- (IOException -> ShelleyGenesisCmdError) +runGenesisHashFile (GenesisFile String +fpath) = do + ByteString +content <- (IOException -> ShelleyGenesisCmdError) -> IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString forall (m :: * -> *) x a. MonadIO m => @@ -5437,22 +5437,22 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) (IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString) +fpath) (IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString) -> IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -fpath - let gh :: Crypto.Hash Crypto.Blake2b_256 ByteString - gh :: Hash Blake2b_256 ByteString -gh = (ByteString -> ByteString) +fpath + let gh :: Crypto.Hash Crypto.Blake2b_256 ByteString + gh :: Hash Blake2b_256 ByteString +gh = (ByteString -> ByteString) -> ByteString -> Hash Blake2b_256 ByteString forall h a. HashAlgorithm h => (a -> ByteString) -> a -> Hash h a Crypto.hashWith ByteString -> ByteString forall a. a -> a id ByteString -content +content IO () -> ExceptT ShelleyGenesisCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyGenesisCmdError IO ()) @@ -5462,7 +5462,7 @@ Text.putStrLn (Hash Blake2b_256 ByteString -> Text forall h a. Hash h a -> Text Crypto.hashToTextAsHex Hash Blake2b_256 ByteString -gh) +gh) -- -- Alonzo genesis @@ -5477,10 +5477,10 @@ :: FilePath -> ExceptT ShelleyGenesisCmdError IO Alonzo.AlonzoGenesis readAlonzoGenesis :: String -> ExceptT ShelleyGenesisCmdError IO AlonzoGenesis -readAlonzoGenesis String -fpath = do +readAlonzoGenesis String +fpath = do ExceptT ShelleyGenesisCmdError IO AlonzoGenesis -readAndDecode +readAndDecode ExceptT ShelleyGenesisCmdError IO AlonzoGenesis -> (ShelleyGenesisCmdError -> ExceptT ShelleyGenesisCmdError IO AlonzoGenesis) @@ -5488,16 +5488,16 @@ forall e (m :: * -> *) a. MonadError e m => m a -> (e -> m a) -> m a -`catchError` \ShelleyGenesisCmdError -err -> +`catchError` \ShelleyGenesisCmdError +err -> case ShelleyGenesisCmdError -err of +err of ShelleyGenesisCmdGenesisFileError (FileIOError String -_ IOException -ioe) +_ IOException +ioe) | IOException -> Bool isDoesNotExistError IOException -ioe -> Text -> ExceptT ShelleyGenesisCmdError IO AlonzoGenesis +ioe -> Text -> ExceptT ShelleyGenesisCmdError IO AlonzoGenesis forall a. HasCallStack => Text -> a panic Text "Shelley genesis file not found." @@ -5506,14 +5506,14 @@ -> ExceptT ShelleyGenesisCmdError IO AlonzoGenesis forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left ShelleyGenesisCmdError -err +err where - readAndDecode :: ExceptT ShelleyGenesisCmdError IO Alonzo.AlonzoGenesis - readAndDecode :: ExceptT ShelleyGenesisCmdError IO AlonzoGenesis -readAndDecode = do - ByteString -lbs <- (IOException -> ShelleyGenesisCmdError) + readAndDecode :: ExceptT ShelleyGenesisCmdError IO Alonzo.AlonzoGenesis + readAndDecode :: ExceptT ShelleyGenesisCmdError IO AlonzoGenesis +readAndDecode = do + ByteString +lbs <- (IOException -> ShelleyGenesisCmdError) -> IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString forall (m :: * -> *) x a. MonadIO m => @@ -5529,12 +5529,12 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) (IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString) +fpath) (IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString) -> IO ByteString -> ExceptT ShelleyGenesisCmdError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString LBS.readFile String -fpath +fpath (String -> ShelleyGenesisCmdError) -> ExceptT String IO AlonzoGenesis -> ExceptT ShelleyGenesisCmdError IO AlonzoGenesis @@ -5543,7 +5543,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> Text -> ShelleyGenesisCmdError ShelleyGenesisCmdAesonDecodeError String -fpath (Text -> ShelleyGenesisCmdError) +fpath (Text -> ShelleyGenesisCmdError) -> (String -> Text) -> String -> ShelleyGenesisCmdError forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -5568,5 +5568,5 @@ $ ByteString -> Either String AlonzoGenesis forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecode' ByteString -lbs +lbs \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.Governance.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.Governance.html index 5089663c582..8dae14d2c51 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.Governance.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.Governance.html @@ -32,7 +32,7 @@ -- ^ Number of stake verification keys !Int -- ^ Number of reward amounts - deriving Int -> ShelleyGovernanceCmdError -> ShowS + deriving Int -> ShelleyGovernanceCmdError -> ShowS [ShelleyGovernanceCmdError] -> ShowS ShelleyGovernanceCmdError -> String (Int -> ShelleyGovernanceCmdError -> ShowS) @@ -51,44 +51,44 @@ renderShelleyGovernanceError :: ShelleyGovernanceCmdError -> Text renderShelleyGovernanceError :: ShelleyGovernanceCmdError -> Text -renderShelleyGovernanceError ShelleyGovernanceCmdError -err = +renderShelleyGovernanceError ShelleyGovernanceCmdError +err = case ShelleyGovernanceCmdError -err of - ShelleyGovernanceCmdTextEnvReadError FileError TextEnvelopeError -fileErr -> String -> Text +err of + ShelleyGovernanceCmdTextEnvReadError FileError TextEnvelopeError +fileErr -> String -> Text Text.pack (FileError TextEnvelopeError -> String forall e. Error e => e -> String displayError FileError TextEnvelopeError -fileErr) - ShelleyGovernanceCmdKeyReadError FileError InputDecodeError -fileErr -> String -> Text +fileErr) + ShelleyGovernanceCmdKeyReadError FileError InputDecodeError +fileErr -> String -> Text Text.pack (FileError InputDecodeError -> String forall e. Error e => e -> String displayError FileError InputDecodeError -fileErr) - ShelleyGovernanceCmdTextEnvWriteError FileError () -fileErr -> String -> Text +fileErr) + ShelleyGovernanceCmdTextEnvWriteError FileError () +fileErr -> String -> Text Text.pack (FileError () -> String forall e. Error e => e -> String displayError FileError () -fileErr) +fileErr) -- TODO: The equality check is still not working for empty update proposals. ShelleyGovernanceCmdError ShelleyGovernanceCmdEmptyUpdateProposalError -> Text "Empty update proposals are not allowed" - ShelleyGovernanceCmdMIRCertificateKeyRewardMistmach String -fp Int -numVKeys Int -numRwdAmts -> + ShelleyGovernanceCmdMIRCertificateKeyRewardMistmach String +fp Int +numVKeys Int +numRwdAmts -> Text "Error creating the MIR certificate at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text -textShow String -fp +textShow String +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -96,8 +96,8 @@ forall a. Semigroup a => a -> a -> a <> Int -> Text forall a. Show a => a -> Text -textShow Int -numVKeys +textShow Int +numVKeys Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -105,81 +105,81 @@ forall a. Semigroup a => a -> a -> a <> Int -> Text forall a. Show a => a -> Text -textShow Int -numRwdAmts +textShow Int +numRwdAmts Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " are not equivalent." where - textShow :: a -> Text -textShow a -x = String -> Text + textShow :: a -> Text +textShow a +x = String -> Text Text.pack (a -> String forall a b. (Show a, ConvertText String b) => a -> b show a -x) +x) runGovernanceCmd :: GovernanceCmd -> ExceptT ShelleyGovernanceCmdError IO () runGovernanceCmd :: GovernanceCmd -> ExceptT ShelleyGovernanceCmdError IO () -runGovernanceCmd (GovernanceMIRPayStakeAddressesCertificate MIRPot -mirpot [StakeAddress] -vKeys [Lovelace] -rewards OutputFile -out) = +runGovernanceCmd (GovernanceMIRPayStakeAddressesCertificate MIRPot +mirpot [StakeAddress] +vKeys [Lovelace] +rewards OutputFile +out) = MIRPot -> [StakeAddress] -> [Lovelace] -> OutputFile -> ExceptT ShelleyGovernanceCmdError IO () runGovernanceMIRCertificatePayStakeAddrs MIRPot -mirpot [StakeAddress] -vKeys [Lovelace] -rewards OutputFile -out -runGovernanceCmd (GovernanceMIRTransfer Lovelace -amt OutputFile -out TransferDirection -direction) = +mirpot [StakeAddress] +vKeys [Lovelace] +rewards OutputFile +out +runGovernanceCmd (GovernanceMIRTransfer Lovelace +amt OutputFile +out TransferDirection +direction) = Lovelace -> OutputFile -> TransferDirection -> ExceptT ShelleyGovernanceCmdError IO () runGovernanceMIRCertificateTransfer Lovelace -amt OutputFile -out TransferDirection -direction -runGovernanceCmd (GovernanceGenesisKeyDelegationCertificate VerificationKeyOrHashOrFile GenesisKey -genVk VerificationKeyOrHashOrFile GenesisDelegateKey -genDelegVk VerificationKeyOrHashOrFile VrfKey -vrfVk OutputFile -out) = +amt OutputFile +out TransferDirection +direction +runGovernanceCmd (GovernanceGenesisKeyDelegationCertificate VerificationKeyOrHashOrFile GenesisKey +genVk VerificationKeyOrHashOrFile GenesisDelegateKey +genDelegVk VerificationKeyOrHashOrFile VrfKey +vrfVk OutputFile +out) = VerificationKeyOrHashOrFile GenesisKey -> VerificationKeyOrHashOrFile GenesisDelegateKey -> VerificationKeyOrHashOrFile VrfKey -> OutputFile -> ExceptT ShelleyGovernanceCmdError IO () runGovernanceGenesisKeyDelegationCertificate VerificationKeyOrHashOrFile GenesisKey -genVk VerificationKeyOrHashOrFile GenesisDelegateKey -genDelegVk VerificationKeyOrHashOrFile VrfKey -vrfVk OutputFile -out -runGovernanceCmd (GovernanceUpdateProposal OutputFile -out EpochNo -eNo [VerificationKeyFile] -genVKeys ProtocolParametersUpdate -ppUp) = +genVk VerificationKeyOrHashOrFile GenesisDelegateKey +genDelegVk VerificationKeyOrHashOrFile VrfKey +vrfVk OutputFile +out +runGovernanceCmd (GovernanceUpdateProposal OutputFile +out EpochNo +eNo [VerificationKeyFile] +genVKeys ProtocolParametersUpdate +ppUp) = OutputFile -> EpochNo -> [VerificationKeyFile] -> ProtocolParametersUpdate -> ExceptT ShelleyGovernanceCmdError IO () runGovernanceUpdateProposal OutputFile -out EpochNo -eNo [VerificationKeyFile] -genVKeys ProtocolParametersUpdate -ppUp +out EpochNo +eNo [VerificationKeyFile] +genVKeys ProtocolParametersUpdate +ppUp runGovernanceMIRCertificatePayStakeAddrs :: Shelley.MIRPot @@ -192,11 +192,11 @@ -> [Lovelace] -> OutputFile -> ExceptT ShelleyGovernanceCmdError IO () -runGovernanceMIRCertificatePayStakeAddrs MIRPot -mirPot [StakeAddress] -sAddrs [Lovelace] -rwdAmts (OutputFile String -oFp) = do +runGovernanceMIRCertificatePayStakeAddrs MIRPot +mirPot [StakeAddress] +sAddrs [Lovelace] +rwdAmts (OutputFile String +oFp) = do Bool -> ExceptT ShelleyGovernanceCmdError IO () @@ -205,12 +205,12 @@ unless ([StakeAddress] -> Int forall a. HasLength a => a -> Int length [StakeAddress] -sAddrs Int -> Int -> Bool +sAddrs Int -> Int -> Bool forall a. Eq a => a -> a -> Bool == [Lovelace] -> Int forall a. HasLength a => a -> Int length [Lovelace] -rwdAmts) (ExceptT ShelleyGovernanceCmdError IO () +rwdAmts) (ExceptT ShelleyGovernanceCmdError IO () -> ExceptT ShelleyGovernanceCmdError IO ()) -> ExceptT ShelleyGovernanceCmdError IO () -> ExceptT ShelleyGovernanceCmdError IO () @@ -227,33 +227,33 @@ $ String -> Int -> Int -> ShelleyGovernanceCmdError ShelleyGovernanceCmdMIRCertificateKeyRewardMistmach String -oFp ([StakeAddress] -> Int +oFp ([StakeAddress] -> Int forall a. HasLength a => a -> Int length [StakeAddress] -sAddrs) ([Lovelace] -> Int +sAddrs) ([Lovelace] -> Int forall a. HasLength a => a -> Int length [Lovelace] -rwdAmts) +rwdAmts) - let sCreds :: [StakeCredential] -sCreds = (StakeAddress -> StakeCredential) + let sCreds :: [StakeCredential] +sCreds = (StakeAddress -> StakeCredential) -> [StakeAddress] -> [StakeCredential] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map StakeAddress -> StakeCredential -stakeAddrToStakeCredential [StakeAddress] -sAddrs - mirCert :: Certificate -mirCert = MIRPot -> MIRTarget -> Certificate +stakeAddrToStakeCredential [StakeAddress] +sAddrs + mirCert :: Certificate +mirCert = MIRPot -> MIRTarget -> Certificate makeMIRCertificate MIRPot -mirPot ([(StakeCredential, Lovelace)] -> MIRTarget +mirPot ([(StakeCredential, Lovelace)] -> MIRTarget StakeAddressesMIR ([(StakeCredential, Lovelace)] -> MIRTarget) -> [(StakeCredential, Lovelace)] -> MIRTarget forall a b. (a -> b) -> a -> b $ [StakeCredential] -> [Lovelace] -> [(StakeCredential, Lovelace)] forall a b. [a] -> [b] -> [(a, b)] zip [StakeCredential] -sCreds [Lovelace] -rwdAmts) +sCreds [Lovelace] +rwdAmts) (FileError () -> ShelleyGovernanceCmdError) -> ExceptT (FileError ()) IO () @@ -288,26 +288,26 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -oFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +oFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -mirCertDesc) Certificate -mirCert +mirCertDesc) Certificate +mirCert where - mirCertDesc :: TextEnvelopeDescr - mirCertDesc :: TextEnvelopeDescr -mirCertDesc = TextEnvelopeDescr + mirCertDesc :: TextEnvelopeDescr + mirCertDesc :: TextEnvelopeDescr +mirCertDesc = TextEnvelopeDescr "Move Instantaneous Rewards Certificate" --TODO: expose a pattern for StakeAddress that give us the StakeCredential - stakeAddrToStakeCredential :: StakeAddress -> StakeCredential - stakeAddrToStakeCredential :: StakeAddress -> StakeCredential -stakeAddrToStakeCredential (StakeAddress Network -_ StakeCredential StandardCrypto -scred) = + stakeAddrToStakeCredential :: StakeAddress -> StakeCredential + stakeAddrToStakeCredential :: StakeAddress -> StakeCredential +stakeAddrToStakeCredential (StakeAddress Network +_ StakeCredential StandardCrypto +scred) = StakeCredential StandardCrypto -> StakeCredential fromShelleyStakeCredential StakeCredential StandardCrypto -scred +scred runGovernanceMIRCertificateTransfer :: Lovelace @@ -318,13 +318,13 @@ -> OutputFile -> TransferDirection -> ExceptT ShelleyGovernanceCmdError IO () -runGovernanceMIRCertificateTransfer Lovelace -ll (OutputFile String -oFp) TransferDirection -direction = do - Certificate -mirCert <- case TransferDirection -direction of +runGovernanceMIRCertificateTransfer Lovelace +ll (OutputFile String +oFp) TransferDirection +direction = do + Certificate +mirCert <- case TransferDirection +direction of TransferDirection TransferToReserves -> Certificate -> ExceptT ShelleyGovernanceCmdError IO Certificate @@ -343,7 +343,7 @@ forall a b. (a -> b) -> a -> b $ Lovelace -> MIRTarget SendToReservesMIR Lovelace -ll +ll TransferDirection TransferToTreasury -> Certificate -> ExceptT ShelleyGovernanceCmdError IO Certificate @@ -362,7 +362,7 @@ forall a b. (a -> b) -> a -> b $ Lovelace -> MIRTarget SendToTreasuryMIR Lovelace -ll +ll (FileError () -> ShelleyGovernanceCmdError) -> ExceptT (FileError ()) IO () @@ -397,22 +397,22 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -oFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +oFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just (TextEnvelopeDescr -> Maybe TextEnvelopeDescr) -> TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a b. (a -> b) -> a -> b $ TransferDirection -> TextEnvelopeDescr -mirCertDesc TransferDirection -direction) Certificate -mirCert +mirCertDesc TransferDirection +direction) Certificate +mirCert where - mirCertDesc :: TransferDirection -> TextEnvelopeDescr - mirCertDesc :: TransferDirection -> TextEnvelopeDescr -mirCertDesc TransferDirection + mirCertDesc :: TransferDirection -> TextEnvelopeDescr + mirCertDesc :: TransferDirection -> TextEnvelopeDescr +mirCertDesc TransferDirection TransferToTreasury = TextEnvelopeDescr "MIR Certificate Send To Treasury" - mirCertDesc TransferDirection + mirCertDesc TransferDirection TransferToReserves = TextEnvelopeDescr "MIR Certificate Send To Reserves" @@ -428,16 +428,16 @@ -> VerificationKeyOrHashOrFile VrfKey -> OutputFile -> ExceptT ShelleyGovernanceCmdError IO () -runGovernanceGenesisKeyDelegationCertificate VerificationKeyOrHashOrFile GenesisKey -genVkOrHashOrFp - VerificationKeyOrHashOrFile GenesisDelegateKey -genDelVkOrHashOrFp - VerificationKeyOrHashOrFile VrfKey -vrfVkOrHashOrFp - (OutputFile String -oFp) = do - Hash GenesisKey -genesisVkHash <- (FileError InputDecodeError -> ShelleyGovernanceCmdError) +runGovernanceGenesisKeyDelegationCertificate VerificationKeyOrHashOrFile GenesisKey +genVkOrHashOrFp + VerificationKeyOrHashOrFile GenesisDelegateKey +genDelVkOrHashOrFp + VerificationKeyOrHashOrFile VrfKey +vrfVkOrHashOrFp + (OutputFile String +oFp) = do + Hash GenesisKey +genesisVkHash <- (FileError InputDecodeError -> ShelleyGovernanceCmdError) -> ExceptT (FileError InputDecodeError) IO (Hash GenesisKey) -> ExceptT ShelleyGovernanceCmdError IO (Hash GenesisKey) forall (m :: * -> *) x y a. @@ -473,9 +473,9 @@ -> IO (Either (FileError InputDecodeError) (Hash keyrole)) readVerificationKeyOrHashOrTextEnvFile AsType GenesisKey AsGenesisKey VerificationKeyOrHashOrFile GenesisKey -genVkOrHashOrFp - Hash GenesisDelegateKey -genesisDelVkHash <-(FileError InputDecodeError -> ShelleyGovernanceCmdError) +genVkOrHashOrFp + Hash GenesisDelegateKey +genesisDelVkHash <-(FileError InputDecodeError -> ShelleyGovernanceCmdError) -> ExceptT (FileError InputDecodeError) IO (Hash GenesisDelegateKey) -> ExceptT ShelleyGovernanceCmdError IO (Hash GenesisDelegateKey) @@ -518,9 +518,9 @@ -> IO (Either (FileError InputDecodeError) (Hash keyrole)) readVerificationKeyOrHashOrTextEnvFile AsType GenesisDelegateKey AsGenesisDelegateKey VerificationKeyOrHashOrFile GenesisDelegateKey -genDelVkOrHashOrFp - Hash VrfKey -vrfVkHash <- (FileError InputDecodeError -> ShelleyGovernanceCmdError) +genDelVkOrHashOrFp + Hash VrfKey +vrfVkHash <- (FileError InputDecodeError -> ShelleyGovernanceCmdError) -> ExceptT (FileError InputDecodeError) IO (Hash VrfKey) -> ExceptT ShelleyGovernanceCmdError IO (Hash VrfKey) forall (m :: * -> *) x y a. @@ -556,7 +556,7 @@ -> IO (Either (FileError InputDecodeError) (Hash keyrole)) readVerificationKeyOrHashOrFile AsType VrfKey AsVrfKey VerificationKeyOrHashOrFile VrfKey -vrfVkOrHashOrFp +vrfVkOrHashOrFp (FileError () -> ShelleyGovernanceCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGovernanceCmdError IO () @@ -590,23 +590,23 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -oFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +oFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -genKeyDelegCertDesc) +genKeyDelegCertDesc) (Certificate -> IO (Either (FileError ()) ())) -> Certificate -> IO (Either (FileError ()) ()) forall a b. (a -> b) -> a -> b $ Hash GenesisKey -> Hash GenesisDelegateKey -> Hash VrfKey -> Certificate makeGenesisKeyDelegationCertificate Hash GenesisKey -genesisVkHash Hash GenesisDelegateKey -genesisDelVkHash Hash VrfKey -vrfVkHash +genesisVkHash Hash GenesisDelegateKey +genesisDelVkHash Hash VrfKey +vrfVkHash where - genKeyDelegCertDesc :: TextEnvelopeDescr - genKeyDelegCertDesc :: TextEnvelopeDescr -genKeyDelegCertDesc = TextEnvelopeDescr + genKeyDelegCertDesc :: TextEnvelopeDescr + genKeyDelegCertDesc :: TextEnvelopeDescr +genKeyDelegCertDesc = TextEnvelopeDescr "Genesis Key Delegation Certificate" runGovernanceUpdateProposal @@ -621,17 +621,17 @@ -> [VerificationKeyFile] -> ProtocolParametersUpdate -> ExceptT ShelleyGovernanceCmdError IO () -runGovernanceUpdateProposal (OutputFile String -upFile) EpochNo -eNo [VerificationKeyFile] -genVerKeyFiles ProtocolParametersUpdate -upPprams = do +runGovernanceUpdateProposal (OutputFile String +upFile) EpochNo +eNo [VerificationKeyFile] +genVerKeyFiles ProtocolParametersUpdate +upPprams = do Bool -> ExceptT ShelleyGovernanceCmdError IO () -> ExceptT ShelleyGovernanceCmdError IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (ProtocolParametersUpdate -upPprams ProtocolParametersUpdate -> ProtocolParametersUpdate -> Bool +upPprams ProtocolParametersUpdate -> ProtocolParametersUpdate -> Bool forall a. Eq a => a -> a -> Bool == ProtocolParametersUpdate forall a. Monoid a => a @@ -645,8 +645,8 @@ forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left ShelleyGovernanceCmdError ShelleyGovernanceCmdEmptyUpdateProposalError - [VerificationKey GenesisKey] -genVKeys <- [ExceptT ShelleyGovernanceCmdError IO (VerificationKey GenesisKey)] + [VerificationKey GenesisKey] +genVKeys <- [ExceptT ShelleyGovernanceCmdError IO (VerificationKey GenesisKey)] -> ExceptT ShelleyGovernanceCmdError IO [VerificationKey GenesisKey] forall (t :: * -> *) (m :: * -> *) a. @@ -705,12 +705,12 @@ AsVerificationKey AsType GenesisKey AsGenesisKey) String -vkeyFile - | VerificationKeyFile String -vkeyFile <- [VerificationKeyFile] -genVerKeyFiles ] - let genKeyHashes :: [Hash GenesisKey] -genKeyHashes = (VerificationKey GenesisKey -> Hash GenesisKey) +vkeyFile + | VerificationKeyFile String +vkeyFile <- [VerificationKeyFile] +genVerKeyFiles ] + let genKeyHashes :: [Hash GenesisKey] +genKeyHashes = (VerificationKey GenesisKey -> Hash GenesisKey) -> [VerificationKey GenesisKey] -> [Hash GenesisKey] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map VerificationKey GenesisKey -> Hash GenesisKey @@ -718,14 +718,14 @@ Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash [VerificationKey GenesisKey] -genVKeys - upProp :: UpdateProposal -upProp = ProtocolParametersUpdate +genVKeys + upProp :: UpdateProposal +upProp = ProtocolParametersUpdate -> [Hash GenesisKey] -> EpochNo -> UpdateProposal makeShelleyUpdateProposal ProtocolParametersUpdate -upPprams [Hash GenesisKey] -genKeyHashes EpochNo -eNo +upPprams [Hash GenesisKey] +genKeyHashes EpochNo +eNo (FileError () -> ShelleyGovernanceCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyGovernanceCmdError IO () @@ -758,8 +758,8 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -upFile Maybe TextEnvelopeDescr +upFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing UpdateProposal -upProp +upProp \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.Key.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.Key.html index ff3093065f0..b99dee4e659 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.Key.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.Key.html @@ -56,7 +56,7 @@ | ShelleyKeyCmdCardanoAddressSigningKeyFileError !(FileError CardanoAddressSigningKeyConversionError) | ShelleyKeyCmdNonLegacyKey !FilePath - deriving Int -> ShelleyKeyCmdError -> ShowS + deriving Int -> ShelleyKeyCmdError -> ShowS [ShelleyKeyCmdError] -> ShowS ShelleyKeyCmdError -> String (Int -> ShelleyKeyCmdError -> ShowS) @@ -75,58 +75,58 @@ renderShelleyKeyCmdError :: ShelleyKeyCmdError -> Text renderShelleyKeyCmdError :: ShelleyKeyCmdError -> Text -renderShelleyKeyCmdError ShelleyKeyCmdError -err = +renderShelleyKeyCmdError ShelleyKeyCmdError +err = case ShelleyKeyCmdError -err of - ShelleyKeyCmdReadFileError FileError TextEnvelopeError -fileErr -> String -> Text +err of + ShelleyKeyCmdReadFileError FileError TextEnvelopeError +fileErr -> String -> Text Text.pack (FileError TextEnvelopeError -> String forall e. Error e => e -> String displayError FileError TextEnvelopeError -fileErr) - ShelleyKeyCmdReadKeyFileError FileError InputDecodeError -fileErr -> String -> Text +fileErr) + ShelleyKeyCmdReadKeyFileError FileError InputDecodeError +fileErr -> String -> Text Text.pack (FileError InputDecodeError -> String forall e. Error e => e -> String displayError FileError InputDecodeError -fileErr) - ShelleyKeyCmdWriteFileError FileError () -fileErr -> String -> Text +fileErr) + ShelleyKeyCmdWriteFileError FileError () +fileErr -> String -> Text Text.pack (FileError () -> String forall e. Error e => e -> String displayError FileError () -fileErr) - ShelleyKeyCmdByronKeyFailure ByronKeyFailure -e -> ByronKeyFailure -> Text +fileErr) + ShelleyKeyCmdByronKeyFailure ByronKeyFailure +e -> ByronKeyFailure -> Text Byron.renderByronKeyFailure ByronKeyFailure -e - ShelleyKeyCmdByronKeyParseError Text -errTxt -> Text -errTxt - ShelleyKeyCmdItnKeyConvError ItnKeyConversionError -convErr -> ItnKeyConversionError -> Text +e + ShelleyKeyCmdByronKeyParseError Text +errTxt -> Text +errTxt + ShelleyKeyCmdItnKeyConvError ItnKeyConversionError +convErr -> ItnKeyConversionError -> Text renderConversionError ItnKeyConversionError -convErr +convErr ShelleyKeyCmdError ShelleyKeyCmdWrongKeyTypeError -> String -> Text Text.pack String "Please use a signing key file \ \when converting ITN BIP32 or Extended keys" - ShelleyKeyCmdCardanoAddressSigningKeyFileError FileError CardanoAddressSigningKeyConversionError -fileErr -> + ShelleyKeyCmdCardanoAddressSigningKeyFileError FileError CardanoAddressSigningKeyConversionError +fileErr -> String -> Text Text.pack (FileError CardanoAddressSigningKeyConversionError -> String forall e. Error e => e -> String displayError FileError CardanoAddressSigningKeyConversionError -fileErr) - ShelleyKeyCmdNonLegacyKey String -fp -> Text +fileErr) + ShelleyKeyCmdNonLegacyKey String +fp -> Text "Signing key at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " is not a legacy Byron signing key and should \ @@ -134,96 +134,96 @@ runKeyCmd :: KeyCmd -> ExceptT ShelleyKeyCmdError IO () runKeyCmd :: KeyCmd -> ExceptT ShelleyKeyCmdError IO () -runKeyCmd KeyCmd -cmd = +runKeyCmd KeyCmd +cmd = case KeyCmd -cmd of - KeyGetVerificationKey SigningKeyFile -skf VerificationKeyFile -vkf -> +cmd of + KeyGetVerificationKey SigningKeyFile +skf VerificationKeyFile +vkf -> SigningKeyFile -> VerificationKeyFile -> ExceptT ShelleyKeyCmdError IO () runGetVerificationKey SigningKeyFile -skf VerificationKeyFile -vkf +skf VerificationKeyFile +vkf - KeyNonExtendedKey VerificationKeyFile -evkf VerificationKeyFile -vkf -> + KeyNonExtendedKey VerificationKeyFile +evkf VerificationKeyFile +vkf -> VerificationKeyFile -> VerificationKeyFile -> ExceptT ShelleyKeyCmdError IO () runNonExtendedKey VerificationKeyFile -evkf VerificationKeyFile -vkf +evkf VerificationKeyFile +vkf - KeyConvertByronKey Maybe Text -mPassword ByronKeyType -keytype SomeKeyFile -skfOld OutputFile -skfNew -> + KeyConvertByronKey Maybe Text +mPassword ByronKeyType +keytype SomeKeyFile +skfOld OutputFile +skfNew -> Maybe Text -> ByronKeyType -> SomeKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () runConvertByronKey Maybe Text -mPassword ByronKeyType -keytype SomeKeyFile -skfOld OutputFile -skfNew +mPassword ByronKeyType +keytype SomeKeyFile +skfOld OutputFile +skfNew - KeyConvertByronGenesisVKey VerificationKeyBase64 -oldVk OutputFile -newVkf -> + KeyConvertByronGenesisVKey VerificationKeyBase64 +oldVk OutputFile +newVkf -> VerificationKeyBase64 -> OutputFile -> ExceptT ShelleyKeyCmdError IO () runConvertByronGenesisVerificationKey VerificationKeyBase64 -oldVk OutputFile -newVkf +oldVk OutputFile +newVkf - KeyConvertITNStakeKey SomeKeyFile -itnKeyFile OutputFile -outFile -> + KeyConvertITNStakeKey SomeKeyFile +itnKeyFile OutputFile +outFile -> SomeKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () runConvertITNStakeKey SomeKeyFile -itnKeyFile OutputFile -outFile - KeyConvertITNExtendedToStakeKey SomeKeyFile -itnPrivKeyFile OutputFile -outFile -> +itnKeyFile OutputFile +outFile + KeyConvertITNExtendedToStakeKey SomeKeyFile +itnPrivKeyFile OutputFile +outFile -> SomeKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () runConvertITNExtendedToStakeKey SomeKeyFile -itnPrivKeyFile OutputFile -outFile - KeyConvertITNBip32ToStakeKey SomeKeyFile -itnPrivKeyFile OutputFile -outFile -> +itnPrivKeyFile OutputFile +outFile + KeyConvertITNBip32ToStakeKey SomeKeyFile +itnPrivKeyFile OutputFile +outFile -> SomeKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () runConvertITNBip32ToStakeKey SomeKeyFile -itnPrivKeyFile OutputFile -outFile +itnPrivKeyFile OutputFile +outFile - KeyConvertCardanoAddressSigningKey CardanoAddressKeyType -keyType SigningKeyFile -skfOld OutputFile -skfNew -> + KeyConvertCardanoAddressSigningKey CardanoAddressKeyType +keyType SigningKeyFile +skfOld OutputFile +skfNew -> CardanoAddressKeyType -> SigningKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () runConvertCardanoAddressSigningKey CardanoAddressKeyType -keyType SigningKeyFile -skfOld OutputFile -skfNew +keyType SigningKeyFile +skfOld OutputFile +skfNew runGetVerificationKey :: SigningKeyFile -> VerificationKeyFile -> ExceptT ShelleyKeyCmdError IO () runGetVerificationKey :: SigningKeyFile -> VerificationKeyFile -> ExceptT ShelleyKeyCmdError IO () -runGetVerificationKey SigningKeyFile -skf (VerificationKeyFile String -vkf) = do - SomeSigningKey -ssk <- (FileError InputDecodeError -> ShelleyKeyCmdError) +runGetVerificationKey SigningKeyFile +skf (VerificationKeyFile String +vkf) = do + SomeSigningKey +ssk <- (FileError InputDecodeError -> ShelleyKeyCmdError) -> ExceptT (FileError InputDecodeError) IO SomeSigningKey -> ExceptT ShelleyKeyCmdError IO SomeSigningKey forall (m :: * -> *) x y a. @@ -239,7 +239,7 @@ SigningKeyFile -> ExceptT (FileError InputDecodeError) IO SomeSigningKey readSigningKeyFile SigningKeyFile -skf +skf SomeSigningKey -> (forall keyrole. Key keyrole => @@ -249,7 +249,7 @@ SomeSigningKey -> (forall keyrole. Key keyrole => SigningKey keyrole -> a) -> a withSomeSigningKey SomeSigningKey -ssk ((forall keyrole. +ssk ((forall keyrole. Key keyrole => SigningKey keyrole -> ExceptT ShelleyKeyCmdError IO ()) -> ExceptT ShelleyKeyCmdError IO ()) @@ -258,15 +258,15 @@ SigningKey keyrole -> ExceptT ShelleyKeyCmdError IO ()) -> ExceptT ShelleyKeyCmdError IO () forall a b. (a -> b) -> a -> b -$ \SigningKey keyrole -sk -> - let vk :: VerificationKey keyrole -vk = SigningKey keyrole -> VerificationKey keyrole +$ \SigningKey keyrole +sk -> + let vk :: VerificationKey keyrole +vk = SigningKey keyrole -> VerificationKey keyrole forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey keyrole -sk in +sk in (FileError () -> ShelleyKeyCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyKeyCmdError IO () forall (m :: * -> *) x y a. @@ -296,10 +296,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkf Maybe TextEnvelopeDescr +vkf Maybe TextEnvelopeDescr forall a. Maybe a Nothing VerificationKey keyrole -vk +vk data SomeSigningKey @@ -318,90 +318,90 @@ | AVrfSigningKey (SigningKey VrfKey) | AKesSigningKey (SigningKey KesKey) -withSomeSigningKey :: SomeSigningKey - -> (forall keyrole. Key keyrole => SigningKey keyrole -> a) - -> a +withSomeSigningKey :: SomeSigningKey + -> (forall keyrole. Key keyrole => SigningKey keyrole -> a) + -> a withSomeSigningKey :: SomeSigningKey -> (forall keyrole. Key keyrole => SigningKey keyrole -> a) -> a -withSomeSigningKey SomeSigningKey -ssk forall keyrole. Key keyrole => SigningKey keyrole -> a -f = +withSomeSigningKey SomeSigningKey +ssk forall keyrole. Key keyrole => SigningKey keyrole -> a +f = case SomeSigningKey -ssk of - AByronSigningKey SigningKey ByronKey -sk -> SigningKey ByronKey -> a +ssk of + AByronSigningKey SigningKey ByronKey +sk -> SigningKey ByronKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey ByronKey +f SigningKey ByronKey +sk + APaymentSigningKey SigningKey PaymentKey +sk -> SigningKey PaymentKey -> a +forall keyrole. Key keyrole => SigningKey keyrole -> a +f SigningKey PaymentKey +sk + APaymentExtendedSigningKey SigningKey PaymentExtendedKey +sk -> SigningKey PaymentExtendedKey -> a +forall keyrole. Key keyrole => SigningKey keyrole -> a +f SigningKey PaymentExtendedKey sk - APaymentSigningKey SigningKey PaymentKey -sk -> SigningKey PaymentKey -> a + AStakeSigningKey SigningKey StakeKey +sk -> SigningKey StakeKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey PaymentKey +f SigningKey StakeKey sk - APaymentExtendedSigningKey SigningKey PaymentExtendedKey -sk -> SigningKey PaymentExtendedKey -> a + AStakeExtendedSigningKey SigningKey StakeExtendedKey +sk -> SigningKey StakeExtendedKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey PaymentExtendedKey +f SigningKey StakeExtendedKey sk - AStakeSigningKey SigningKey StakeKey -sk -> SigningKey StakeKey -> a + AStakePoolSigningKey SigningKey StakePoolKey +sk -> SigningKey StakePoolKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey StakeKey +f SigningKey StakePoolKey sk - AStakeExtendedSigningKey SigningKey StakeExtendedKey -sk -> SigningKey StakeExtendedKey -> a + AGenesisSigningKey SigningKey GenesisKey +sk -> SigningKey GenesisKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey StakeExtendedKey +f SigningKey GenesisKey sk - AStakePoolSigningKey SigningKey StakePoolKey -sk -> SigningKey StakePoolKey -> a + AGenesisExtendedSigningKey SigningKey GenesisExtendedKey +sk -> SigningKey GenesisExtendedKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey StakePoolKey +f SigningKey GenesisExtendedKey sk - AGenesisSigningKey SigningKey GenesisKey -sk -> SigningKey GenesisKey -> a + AGenesisDelegateSigningKey SigningKey GenesisDelegateKey +sk -> SigningKey GenesisDelegateKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey GenesisKey +f SigningKey GenesisDelegateKey sk - AGenesisExtendedSigningKey SigningKey GenesisExtendedKey -sk -> SigningKey GenesisExtendedKey -> a + AGenesisDelegateExtendedSigningKey + SigningKey GenesisDelegateExtendedKey +sk -> SigningKey GenesisDelegateExtendedKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey GenesisExtendedKey +f SigningKey GenesisDelegateExtendedKey sk - AGenesisDelegateSigningKey SigningKey GenesisDelegateKey -sk -> SigningKey GenesisDelegateKey -> a + AGenesisUTxOSigningKey SigningKey GenesisUTxOKey +sk -> SigningKey GenesisUTxOKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey GenesisDelegateKey +f SigningKey GenesisUTxOKey sk - AGenesisDelegateExtendedSigningKey - SigningKey GenesisDelegateExtendedKey -sk -> SigningKey GenesisDelegateExtendedKey -> a + AVrfSigningKey SigningKey VrfKey +sk -> SigningKey VrfKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey GenesisDelegateExtendedKey +f SigningKey VrfKey sk - AGenesisUTxOSigningKey SigningKey GenesisUTxOKey -sk -> SigningKey GenesisUTxOKey -> a + AKesSigningKey SigningKey KesKey +sk -> SigningKey KesKey -> a forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey GenesisUTxOKey +f SigningKey KesKey sk - AVrfSigningKey SigningKey VrfKey -sk -> SigningKey VrfKey -> a -forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey VrfKey -sk - AKesSigningKey SigningKey KesKey -sk -> SigningKey KesKey -> a -forall keyrole. Key keyrole => SigningKey keyrole -> a -f SigningKey KesKey -sk readSigningKeyFile :: SigningKeyFile -> ExceptT (FileError InputDecodeError) IO SomeSigningKey readSigningKeyFile :: SigningKeyFile -> ExceptT (FileError InputDecodeError) IO SomeSigningKey -readSigningKeyFile SigningKeyFile -skFile = +readSigningKeyFile SigningKeyFile +skFile = IO (Either (FileError InputDecodeError) SomeSigningKey) -> ExceptT (FileError InputDecodeError) IO SomeSigningKey forall (m :: * -> *) x a. m (Either x a) -> ExceptT x m a @@ -421,12 +421,12 @@ -> SigningKeyFile -> IO (Either (FileError InputDecodeError) b) readSigningKeyFileAnyOf [FromSomeType SerialiseAsBech32 SomeSigningKey] -bech32FileTypes [FromSomeType HasTextEnvelope SomeSigningKey] -textEnvFileTypes SigningKeyFile -skFile +bech32FileTypes [FromSomeType HasTextEnvelope SomeSigningKey] +textEnvFileTypes SigningKeyFile +skFile where - textEnvFileTypes :: [FromSomeType HasTextEnvelope SomeSigningKey] -textEnvFileTypes = + textEnvFileTypes :: [FromSomeType HasTextEnvelope SomeSigningKey] +textEnvFileTypes = [ AsType (SigningKey ByronKey) -> (SigningKey ByronKey -> SomeSigningKey) -> FromSomeType HasTextEnvelope SomeSigningKey @@ -586,8 +586,8 @@ AKesSigningKey ] - bech32FileTypes :: [FromSomeType SerialiseAsBech32 SomeSigningKey] -bech32FileTypes = + bech32FileTypes :: [FromSomeType SerialiseAsBech32 SomeSigningKey] +bech32FileTypes = [ AsType (SigningKey PaymentKey) -> (SigningKey PaymentKey -> SomeSigningKey) -> FromSomeType SerialiseAsBech32 SomeSigningKey @@ -680,11 +680,11 @@ -> ExceptT ShelleyKeyCmdError IO () runNonExtendedKey :: VerificationKeyFile -> VerificationKeyFile -> ExceptT ShelleyKeyCmdError IO () -runNonExtendedKey VerificationKeyFile -evkf (VerificationKeyFile String -vkf) = do - SomeExtendedVerificationKey -evk <- (FileError TextEnvelopeError -> ShelleyKeyCmdError) +runNonExtendedKey VerificationKeyFile +evkf (VerificationKeyFile String +vkf) = do + SomeExtendedVerificationKey +evk <- (FileError TextEnvelopeError -> ShelleyKeyCmdError) -> ExceptT (FileError TextEnvelopeError) IO SomeExtendedVerificationKey -> ExceptT ShelleyKeyCmdError IO SomeExtendedVerificationKey @@ -704,7 +704,7 @@ -> ExceptT (FileError TextEnvelopeError) IO SomeExtendedVerificationKey readExtendedVerificationKeyFile VerificationKeyFile -evkf +evkf SomeExtendedVerificationKey -> (forall keyrole. Key keyrole => @@ -715,7 +715,7 @@ -> (forall keyrole. Key keyrole => VerificationKey keyrole -> a) -> a withNonExtendedKey SomeExtendedVerificationKey -evk ((forall keyrole. +evk ((forall keyrole. Key keyrole => VerificationKey keyrole -> ExceptT ShelleyKeyCmdError IO ()) -> ExceptT ShelleyKeyCmdError IO ()) @@ -724,8 +724,8 @@ VerificationKey keyrole -> ExceptT ShelleyKeyCmdError IO ()) -> ExceptT ShelleyKeyCmdError IO () forall a b. (a -> b) -> a -> b -$ \VerificationKey keyrole -vk -> +$ \VerificationKey keyrole +vk -> (FileError () -> ShelleyKeyCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyKeyCmdError IO () forall (m :: * -> *) x y a. @@ -755,65 +755,65 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkf Maybe TextEnvelopeDescr +vkf Maybe TextEnvelopeDescr forall a. Maybe a Nothing VerificationKey keyrole -vk +vk -withNonExtendedKey :: SomeExtendedVerificationKey - -> (forall keyrole. Key keyrole => VerificationKey keyrole -> a) - -> a +withNonExtendedKey :: SomeExtendedVerificationKey + -> (forall keyrole. Key keyrole => VerificationKey keyrole -> a) + -> a withNonExtendedKey :: SomeExtendedVerificationKey -> (forall keyrole. Key keyrole => VerificationKey keyrole -> a) -> a -withNonExtendedKey (APaymentExtendedVerificationKey VerificationKey PaymentExtendedKey -vk) forall keyrole. Key keyrole => VerificationKey keyrole -> a -f = +withNonExtendedKey (APaymentExtendedVerificationKey VerificationKey PaymentExtendedKey +vk) forall keyrole. Key keyrole => VerificationKey keyrole -> a +f = VerificationKey PaymentKey -> a forall keyrole. Key keyrole => VerificationKey keyrole -> a -f (VerificationKey PaymentExtendedKey -> VerificationKey PaymentKey +f (VerificationKey PaymentExtendedKey -> VerificationKey PaymentKey forall keyroleA keyroleB. CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey VerificationKey PaymentExtendedKey -vk :: VerificationKey PaymentKey) +vk :: VerificationKey PaymentKey) -withNonExtendedKey (AStakeExtendedVerificationKey VerificationKey StakeExtendedKey -vk) forall keyrole. Key keyrole => VerificationKey keyrole -> a -f = +withNonExtendedKey (AStakeExtendedVerificationKey VerificationKey StakeExtendedKey +vk) forall keyrole. Key keyrole => VerificationKey keyrole -> a +f = VerificationKey StakeKey -> a forall keyrole. Key keyrole => VerificationKey keyrole -> a -f (VerificationKey StakeExtendedKey -> VerificationKey StakeKey +f (VerificationKey StakeExtendedKey -> VerificationKey StakeKey forall keyroleA keyroleB. CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey VerificationKey StakeExtendedKey -vk :: VerificationKey StakeKey) +vk :: VerificationKey StakeKey) -withNonExtendedKey (AGenesisExtendedVerificationKey VerificationKey GenesisExtendedKey -vk) forall keyrole. Key keyrole => VerificationKey keyrole -> a -f = +withNonExtendedKey (AGenesisExtendedVerificationKey VerificationKey GenesisExtendedKey +vk) forall keyrole. Key keyrole => VerificationKey keyrole -> a +f = VerificationKey GenesisKey -> a forall keyrole. Key keyrole => VerificationKey keyrole -> a -f (VerificationKey GenesisExtendedKey -> VerificationKey GenesisKey +f (VerificationKey GenesisExtendedKey -> VerificationKey GenesisKey forall keyroleA keyroleB. CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey VerificationKey GenesisExtendedKey -vk :: VerificationKey GenesisKey) +vk :: VerificationKey GenesisKey) -withNonExtendedKey (AGenesisDelegateExtendedVerificationKey VerificationKey GenesisDelegateExtendedKey -vk) forall keyrole. Key keyrole => VerificationKey keyrole -> a -f = +withNonExtendedKey (AGenesisDelegateExtendedVerificationKey VerificationKey GenesisDelegateExtendedKey +vk) forall keyrole. Key keyrole => VerificationKey keyrole -> a +f = VerificationKey GenesisDelegateKey -> a forall keyrole. Key keyrole => VerificationKey keyrole -> a -f (VerificationKey GenesisDelegateExtendedKey +f (VerificationKey GenesisDelegateExtendedKey -> VerificationKey GenesisDelegateKey forall keyroleA keyroleB. CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey VerificationKey GenesisDelegateExtendedKey -vk :: VerificationKey GenesisDelegateKey) +vk :: VerificationKey GenesisDelegateKey) data SomeExtendedVerificationKey @@ -829,8 +829,8 @@ readExtendedVerificationKeyFile :: VerificationKeyFile -> ExceptT (FileError TextEnvelopeError) IO SomeExtendedVerificationKey -readExtendedVerificationKeyFile (VerificationKeyFile String -evkfile) = +readExtendedVerificationKeyFile (VerificationKeyFile String +evkfile) = IO (Either (FileError TextEnvelopeError) SomeExtendedVerificationKey) -> ExceptT @@ -853,11 +853,11 @@ [FromSomeType HasTextEnvelope b] -> String -> IO (Either (FileError TextEnvelopeError) b) readFileTextEnvelopeAnyOf [FromSomeType HasTextEnvelope SomeExtendedVerificationKey] -fileTypes String -evkfile +fileTypes String +evkfile where - fileTypes :: [FromSomeType HasTextEnvelope SomeExtendedVerificationKey] -fileTypes = + fileTypes :: [FromSomeType HasTextEnvelope SomeExtendedVerificationKey] +fileTypes = [ AsType (VerificationKey PaymentExtendedKey) -> (VerificationKey PaymentExtendedKey -> SomeExtendedVerificationKey) @@ -929,10 +929,10 @@ -> SomeKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () -runConvertByronKey Maybe Text -mPwd (ByronPaymentKey ByronKeyFormat -format) (ASigningKeyFile SigningKeyFile -skeyPathOld) = +runConvertByronKey Maybe Text +mPwd (ByronPaymentKey ByronKeyFormat +format) (ASigningKeyFile SigningKeyFile +skeyPathOld) = Maybe Text -> ByronKeyFormat -> (SigningKey -> SigningKey ByronKey) @@ -948,20 +948,20 @@ -> OutputFile -> ExceptT ShelleyKeyCmdError IO () convertByronSigningKey Maybe Text -mPwd ByronKeyFormat -format SigningKey -> SigningKey ByronKey -convert SigningKeyFile -skeyPathOld +mPwd ByronKeyFormat +format SigningKey -> SigningKey ByronKey +convert SigningKeyFile +skeyPathOld where - convert :: Byron.SigningKey -> SigningKey ByronKey - convert :: SigningKey -> SigningKey ByronKey -convert = SigningKey -> SigningKey ByronKey + convert :: Byron.SigningKey -> SigningKey ByronKey + convert :: SigningKey -> SigningKey ByronKey +convert = SigningKey -> SigningKey ByronKey ByronSigningKey -runConvertByronKey Maybe Text -mPwd (ByronGenesisKey ByronKeyFormat -format) (ASigningKeyFile SigningKeyFile -skeyPathOld) = +runConvertByronKey Maybe Text +mPwd (ByronGenesisKey ByronKeyFormat +format) (ASigningKeyFile SigningKeyFile +skeyPathOld) = Maybe Text -> ByronKeyFormat -> (SigningKey -> SigningKey GenesisExtendedKey) @@ -977,22 +977,22 @@ -> OutputFile -> ExceptT ShelleyKeyCmdError IO () convertByronSigningKey Maybe Text -mPwd ByronKeyFormat -format SigningKey -> SigningKey GenesisExtendedKey -convert SigningKeyFile -skeyPathOld +mPwd ByronKeyFormat +format SigningKey -> SigningKey GenesisExtendedKey +convert SigningKeyFile +skeyPathOld where - convert :: Byron.SigningKey -> SigningKey GenesisExtendedKey - convert :: SigningKey -> SigningKey GenesisExtendedKey -convert (Byron.SigningKey XPrv -xsk) = XPrv -> SigningKey GenesisExtendedKey + convert :: Byron.SigningKey -> SigningKey GenesisExtendedKey + convert :: SigningKey -> SigningKey GenesisExtendedKey +convert (Byron.SigningKey XPrv +xsk) = XPrv -> SigningKey GenesisExtendedKey GenesisExtendedSigningKey XPrv -xsk +xsk -runConvertByronKey Maybe Text -mPwd (ByronDelegateKey ByronKeyFormat -format) (ASigningKeyFile SigningKeyFile -skeyPathOld) = +runConvertByronKey Maybe Text +mPwd (ByronDelegateKey ByronKeyFormat +format) (ASigningKeyFile SigningKeyFile +skeyPathOld) = Maybe Text -> ByronKeyFormat -> (SigningKey -> SigningKey GenesisDelegateExtendedKey) @@ -1008,23 +1008,23 @@ -> OutputFile -> ExceptT ShelleyKeyCmdError IO () convertByronSigningKey Maybe Text -mPwd ByronKeyFormat -format SigningKey -> SigningKey GenesisDelegateExtendedKey -convert SigningKeyFile -skeyPathOld +mPwd ByronKeyFormat +format SigningKey -> SigningKey GenesisDelegateExtendedKey +convert SigningKeyFile +skeyPathOld where - convert :: Byron.SigningKey -> SigningKey GenesisDelegateExtendedKey - convert :: SigningKey -> SigningKey GenesisDelegateExtendedKey -convert (Byron.SigningKey XPrv -xsk) = XPrv -> SigningKey GenesisDelegateExtendedKey + convert :: Byron.SigningKey -> SigningKey GenesisDelegateExtendedKey + convert :: SigningKey -> SigningKey GenesisDelegateExtendedKey +convert (Byron.SigningKey XPrv +xsk) = XPrv -> SigningKey GenesisDelegateExtendedKey GenesisDelegateExtendedSigningKey XPrv -xsk +xsk runConvertByronKey Maybe Text _ (ByronPaymentKey ByronKeyFormat NonLegacyByronKeyFormat) - (AVerificationKeyFile VerificationKeyFile -vkeyPathOld) = + (AVerificationKeyFile VerificationKeyFile +vkeyPathOld) = (VerificationKey -> VerificationKey ByronKey) -> VerificationKeyFile -> OutputFile @@ -1036,19 +1036,19 @@ -> OutputFile -> ExceptT ShelleyKeyCmdError IO () convertByronVerificationKey VerificationKey -> VerificationKey ByronKey -convert VerificationKeyFile -vkeyPathOld +convert VerificationKeyFile +vkeyPathOld where - convert :: Byron.VerificationKey -> VerificationKey ByronKey - convert :: VerificationKey -> VerificationKey ByronKey -convert = VerificationKey -> VerificationKey ByronKey + convert :: Byron.VerificationKey -> VerificationKey ByronKey + convert :: VerificationKey -> VerificationKey ByronKey +convert = VerificationKey -> VerificationKey ByronKey ByronVerificationKey runConvertByronKey Maybe Text _ (ByronGenesisKey ByronKeyFormat NonLegacyByronKeyFormat) - (AVerificationKeyFile VerificationKeyFile -vkeyPathOld) = + (AVerificationKeyFile VerificationKeyFile +vkeyPathOld) = (VerificationKey -> VerificationKey GenesisExtendedKey) -> VerificationKeyFile -> OutputFile @@ -1060,21 +1060,21 @@ -> OutputFile -> ExceptT ShelleyKeyCmdError IO () convertByronVerificationKey VerificationKey -> VerificationKey GenesisExtendedKey -convert VerificationKeyFile -vkeyPathOld +convert VerificationKeyFile +vkeyPathOld where - convert :: Byron.VerificationKey -> VerificationKey GenesisExtendedKey - convert :: VerificationKey -> VerificationKey GenesisExtendedKey -convert (Byron.VerificationKey XPub -xvk) = XPub -> VerificationKey GenesisExtendedKey + convert :: Byron.VerificationKey -> VerificationKey GenesisExtendedKey + convert :: VerificationKey -> VerificationKey GenesisExtendedKey +convert (Byron.VerificationKey XPub +xvk) = XPub -> VerificationKey GenesisExtendedKey GenesisExtendedVerificationKey XPub -xvk +xvk runConvertByronKey Maybe Text _ (ByronDelegateKey ByronKeyFormat NonLegacyByronKeyFormat) - (AVerificationKeyFile VerificationKeyFile -vkeyPathOld) = + (AVerificationKeyFile VerificationKeyFile +vkeyPathOld) = (VerificationKey -> VerificationKey GenesisDelegateExtendedKey) -> VerificationKeyFile -> OutputFile @@ -1086,17 +1086,17 @@ -> OutputFile -> ExceptT ShelleyKeyCmdError IO () convertByronVerificationKey VerificationKey -> VerificationKey GenesisDelegateExtendedKey -convert VerificationKeyFile -vkeyPathOld +convert VerificationKeyFile +vkeyPathOld where - convert :: Byron.VerificationKey + convert :: Byron.VerificationKey -> VerificationKey GenesisDelegateExtendedKey - convert :: VerificationKey -> VerificationKey GenesisDelegateExtendedKey -convert (Byron.VerificationKey XPub -xvk) = + convert :: VerificationKey -> VerificationKey GenesisDelegateExtendedKey +convert (Byron.VerificationKey XPub +xvk) = XPub -> VerificationKey GenesisDelegateExtendedKey GenesisDelegateExtendedVerificationKey XPub -xvk +xvk runConvertByronKey Maybe Text _ (ByronPaymentKey ByronKeyFormat @@ -1131,7 +1131,7 @@ forall e a. ExceptT e IO a legacyVerificationKeysNotSupported -legacyVerificationKeysNotSupported :: ExceptT e IO a +legacyVerificationKeysNotSupported :: ExceptT e IO a legacyVerificationKeysNotSupported :: ExceptT e IO a legacyVerificationKeysNotSupported = IO a -> ExceptT e IO a @@ -1159,11 +1159,11 @@ convertByronSigningKey - :: forall keyrole. - Key keyrole + :: forall keyrole. + Key keyrole => Maybe Text -- ^ Password (if applicable) -> ByronKeyFormat - -> (Byron.SigningKey -> SigningKey keyrole) + -> (Byron.SigningKey -> SigningKey keyrole) -> SigningKeyFile -- ^ Input file: old format -> OutputFile -- ^ Output file: new format -> ExceptT ShelleyKeyCmdError IO () @@ -1173,18 +1173,18 @@ -> SigningKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () -convertByronSigningKey Maybe Text -mPwd ByronKeyFormat -byronFormat SigningKey -> SigningKey keyrole -convert - SigningKeyFile -skeyPathOld - (OutputFile String -skeyPathNew) = do +convertByronSigningKey Maybe Text +mPwd ByronKeyFormat +byronFormat SigningKey -> SigningKey keyrole +convert + SigningKeyFile +skeyPathOld + (OutputFile String +skeyPathNew) = do - SomeByronSigningKey -sKey <- (ByronKeyFailure -> ShelleyKeyCmdError) + SomeByronSigningKey +sKey <- (ByronKeyFailure -> ShelleyKeyCmdError) -> ExceptT ByronKeyFailure IO SomeByronSigningKey -> ExceptT ShelleyKeyCmdError IO SomeByronSigningKey forall (m :: * -> *) x y a. @@ -1200,19 +1200,19 @@ $ ByronKeyFormat -> SigningKeyFile -> ExceptT ByronKeyFailure IO SomeByronSigningKey Byron.readByronSigningKey ByronKeyFormat -byronFormat SigningKeyFile -skeyPathOld +byronFormat SigningKeyFile +skeyPathOld -- Account for password protected legacy Byron keys - SigningKey -unprotectedSk <- case SomeByronSigningKey -sKey of - ByronApi.AByronSigningKeyLegacy (ByronSigningKeyLegacy sk@(Crypto.SigningKey xprv)) -> + SigningKey +unprotectedSk <- case SomeByronSigningKey +sKey of + ByronApi.AByronSigningKeyLegacy (ByronSigningKeyLegacy sk@(Crypto.SigningKey xprv)) -> case Maybe Text -mPwd of +mPwd of -- Change password to empty string - Just Text -pwd -> SigningKey -> ExceptT ShelleyKeyCmdError IO SigningKey + Just Text +pwd -> SigningKey -> ExceptT ShelleyKeyCmdError IO SigningKey forall (m :: * -> *) a. Monad m => a -> m a return (SigningKey -> ExceptT ShelleyKeyCmdError IO SigningKey) -> (XPrv -> SigningKey) @@ -1232,26 +1232,26 @@ oldPassPhrase -> newPassPhrase -> XPrv -> XPrv Crypto.xPrvChangePass (Text -> ByteString encodeUtf8 Text -pwd) (Text -> ByteString +pwd) (Text -> ByteString encodeUtf8 Text "") XPrv -xprv +xprv Maybe Text Nothing -> SigningKey -> ExceptT ShelleyKeyCmdError IO SigningKey forall (m :: * -> *) a. Monad m => a -> m a return SigningKey -sk - ByronApi.AByronSigningKey (ByronSigningKey sk) -> SigningKey -> ExceptT ShelleyKeyCmdError IO SigningKey +sk + ByronApi.AByronSigningKey (ByronSigningKey sk) -> SigningKey -> ExceptT ShelleyKeyCmdError IO SigningKey forall (m :: * -> *) a. Monad m => a -> m a return SigningKey -sk +sk - let sk' :: SigningKey keyrole - sk' :: SigningKey keyrole -sk' = SigningKey -> SigningKey keyrole -convert SigningKey -unprotectedSk + let sk' :: SigningKey keyrole + sk' :: SigningKey keyrole +sk' = SigningKey -> SigningKey keyrole +convert SigningKey +unprotectedSk (FileError () -> ShelleyKeyCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyKeyCmdError IO () @@ -1282,15 +1282,15 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -skeyPathNew Maybe TextEnvelopeDescr +skeyPathNew Maybe TextEnvelopeDescr forall a. Maybe a Nothing SigningKey keyrole -sk' +sk' convertByronVerificationKey - :: forall keyrole. - Key keyrole - => (Byron.VerificationKey -> VerificationKey keyrole) + :: forall keyrole. + Key keyrole + => (Byron.VerificationKey -> VerificationKey keyrole) -> VerificationKeyFile -- ^ Input file: old format -> OutputFile -- ^ Output file: new format -> ExceptT ShelleyKeyCmdError IO () @@ -1298,15 +1298,15 @@ -> VerificationKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () -convertByronVerificationKey VerificationKey -> VerificationKey keyrole -convert - (VerificationKeyFile String -vkeyPathOld) - (OutputFile String -vkeyPathNew) = do +convertByronVerificationKey VerificationKey -> VerificationKey keyrole +convert + (VerificationKeyFile String +vkeyPathOld) + (OutputFile String +vkeyPathNew) = do - VerificationKey -vk <- (ByronKeyFailure -> ShelleyKeyCmdError) + VerificationKey +vk <- (ByronKeyFailure -> ShelleyKeyCmdError) -> ExceptT ByronKeyFailure IO VerificationKey -> ExceptT ShelleyKeyCmdError IO VerificationKey forall (m :: * -> *) x y a. @@ -1322,13 +1322,13 @@ VerificationKeyFile -> ExceptT ByronKeyFailure IO VerificationKey Byron.readPaymentVerificationKey (String -> VerificationKeyFile Byron.VerificationKeyFile String -vkeyPathOld) +vkeyPathOld) - let vk' :: VerificationKey keyrole - vk' :: VerificationKey keyrole -vk' = VerificationKey -> VerificationKey keyrole -convert VerificationKey -vk + let vk' :: VerificationKey keyrole + vk' :: VerificationKey keyrole +vk' = VerificationKey -> VerificationKey keyrole +convert VerificationKey +vk (FileError () -> ShelleyKeyCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyKeyCmdError IO () @@ -1359,10 +1359,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPathNew Maybe TextEnvelopeDescr +vkeyPathNew Maybe TextEnvelopeDescr forall a. Maybe a Nothing VerificationKey keyrole -vk' +vk' runConvertByronGenesisVerificationKey @@ -1371,13 +1371,13 @@ -> ExceptT ShelleyKeyCmdError IO () runConvertByronGenesisVerificationKey :: VerificationKeyBase64 -> OutputFile -> ExceptT ShelleyKeyCmdError IO () -runConvertByronGenesisVerificationKey (VerificationKeyBase64 String -b64ByronVKey) - (OutputFile String -vkeyPathNew) = do +runConvertByronGenesisVerificationKey (VerificationKeyBase64 String +b64ByronVKey) + (OutputFile String +vkeyPathNew) = do - VerificationKey -vk <- (VerificationKeyParseError -> ShelleyKeyCmdError) + VerificationKey +vk <- (VerificationKeyParseError -> ShelleyKeyCmdError) -> ExceptT VerificationKeyParseError IO VerificationKey -> ExceptT ShelleyKeyCmdError IO VerificationKey forall (m :: * -> *) x y a. @@ -1429,13 +1429,13 @@ -> String -> ExceptT ShelleyKeyCmdError IO VerificationKey forall a b. (a -> b) -> a -> b $ String -b64ByronVKey +b64ByronVKey - let vk' :: VerificationKey GenesisKey - vk' :: VerificationKey GenesisKey -vk' = VerificationKey -> VerificationKey GenesisKey -convert VerificationKey -vk + let vk' :: VerificationKey GenesisKey + vk' :: VerificationKey GenesisKey +vk' = VerificationKey -> VerificationKey GenesisKey +convert VerificationKey +vk (FileError () -> ShelleyKeyCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyKeyCmdError IO () @@ -1466,22 +1466,22 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPathNew Maybe TextEnvelopeDescr +vkeyPathNew Maybe TextEnvelopeDescr forall a. Maybe a Nothing VerificationKey GenesisKey -vk' +vk' where - convert :: Byron.VerificationKey -> VerificationKey GenesisKey - convert :: VerificationKey -> VerificationKey GenesisKey -convert (Byron.VerificationKey XPub -xvk) = + convert :: Byron.VerificationKey -> VerificationKey GenesisKey + convert :: VerificationKey -> VerificationKey GenesisKey +convert (Byron.VerificationKey XPub +xvk) = VerificationKey GenesisExtendedKey -> VerificationKey GenesisKey forall keyroleA keyroleB. CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey (XPub -> VerificationKey GenesisExtendedKey GenesisExtendedVerificationKey XPub -xvk) +xvk) -------------------------------------------------------------------------------- @@ -1493,11 +1493,11 @@ -> OutputFile -> ExceptT ShelleyKeyCmdError IO () runConvertITNStakeKey :: SomeKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () -runConvertITNStakeKey (AVerificationKeyFile (VerificationKeyFile String -vk)) (OutputFile String -outFile) = do - Text -bech32publicKey <- (ItnKeyConversionError -> ShelleyKeyCmdError) +runConvertITNStakeKey (AVerificationKeyFile (VerificationKeyFile String +vk)) (OutputFile String +outFile) = do + Text +bech32publicKey <- (ItnKeyConversionError -> ShelleyKeyCmdError) -> ExceptT ItnKeyConversionError IO Text -> ExceptT ShelleyKeyCmdError IO Text forall (m :: * -> *) x y a. @@ -1524,9 +1524,9 @@ $ String -> IO (Either ItnKeyConversionError Text) readFileITNKey String -vk - VerificationKey StakeKey -vkey <- Either ShelleyKeyCmdError (VerificationKey StakeKey) +vk + VerificationKey StakeKey +vkey <- Either ShelleyKeyCmdError (VerificationKey StakeKey) -> ExceptT ShelleyKeyCmdError IO (VerificationKey StakeKey) forall (m :: * -> *) x a. Monad m => Either x a -> ExceptT x m a hoistEither @@ -1554,7 +1554,7 @@ forall a b. (a -> b) -> a -> b $ Text -> Either ItnKeyConversionError (VerificationKey StakeKey) convertITNVerificationKey Text -bech32publicKey +bech32publicKey (FileError () -> ShelleyKeyCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyKeyCmdError IO () forall (m :: * -> *) x y a. @@ -1584,16 +1584,16 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -outFile Maybe TextEnvelopeDescr +outFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing VerificationKey StakeKey -vkey +vkey -runConvertITNStakeKey (ASigningKeyFile (SigningKeyFile String -sk)) (OutputFile String -outFile) = do - Text -bech32privateKey <- (ItnKeyConversionError -> ShelleyKeyCmdError) +runConvertITNStakeKey (ASigningKeyFile (SigningKeyFile String +sk)) (OutputFile String +outFile) = do + Text +bech32privateKey <- (ItnKeyConversionError -> ShelleyKeyCmdError) -> ExceptT ItnKeyConversionError IO Text -> ExceptT ShelleyKeyCmdError IO Text forall (m :: * -> *) x y a. @@ -1620,9 +1620,9 @@ $ String -> IO (Either ItnKeyConversionError Text) readFileITNKey String -sk - SigningKey StakeKey -skey <- Either ShelleyKeyCmdError (SigningKey StakeKey) +sk + SigningKey StakeKey +skey <- Either ShelleyKeyCmdError (SigningKey StakeKey) -> ExceptT ShelleyKeyCmdError IO (SigningKey StakeKey) forall (m :: * -> *) x a. Monad m => Either x a -> ExceptT x m a hoistEither @@ -1650,7 +1650,7 @@ forall a b. (a -> b) -> a -> b $ Text -> Either ItnKeyConversionError (SigningKey StakeKey) convertITNSigningKey Text -bech32privateKey +bech32privateKey (FileError () -> ShelleyKeyCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyKeyCmdError IO () forall (m :: * -> *) x y a. @@ -1680,10 +1680,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -outFile Maybe TextEnvelopeDescr +outFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing SigningKey StakeKey -skey +skey runConvertITNExtendedToStakeKey :: SomeKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () runConvertITNExtendedToStakeKey :: SomeKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () @@ -1693,11 +1693,11 @@ forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left ShelleyKeyCmdError ShelleyKeyCmdWrongKeyTypeError -runConvertITNExtendedToStakeKey (ASigningKeyFile (SigningKeyFile String -sk)) (OutputFile String -outFile) = do - Text -bech32privateKey <- (ItnKeyConversionError -> ShelleyKeyCmdError) +runConvertITNExtendedToStakeKey (ASigningKeyFile (SigningKeyFile String +sk)) (OutputFile String +outFile) = do + Text +bech32privateKey <- (ItnKeyConversionError -> ShelleyKeyCmdError) -> ExceptT ItnKeyConversionError IO Text -> ExceptT ShelleyKeyCmdError IO Text forall (m :: * -> *) x y a. @@ -1723,9 +1723,9 @@ forall a b. (a -> b) -> a -> b $ String -> IO (Either ItnKeyConversionError Text) readFileITNKey String -sk - SigningKey StakeExtendedKey -skey <- Either ShelleyKeyCmdError (SigningKey StakeExtendedKey) +sk + SigningKey StakeExtendedKey +skey <- Either ShelleyKeyCmdError (SigningKey StakeExtendedKey) -> ExceptT ShelleyKeyCmdError IO (SigningKey StakeExtendedKey) forall (m :: * -> *) x a. Monad m => Either x a -> ExceptT x m a hoistEither (Either ShelleyKeyCmdError (SigningKey StakeExtendedKey) @@ -1752,7 +1752,7 @@ forall a b. (a -> b) -> a -> b $ Text -> Either ItnKeyConversionError (SigningKey StakeExtendedKey) convertITNExtendedSigningKey Text -bech32privateKey +bech32privateKey (FileError () -> ShelleyKeyCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyKeyCmdError IO () forall (m :: * -> *) x y a. @@ -1782,10 +1782,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -outFile Maybe TextEnvelopeDescr +outFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing SigningKey StakeExtendedKey -skey +skey runConvertITNBip32ToStakeKey :: SomeKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () runConvertITNBip32ToStakeKey :: SomeKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () @@ -1795,11 +1795,11 @@ forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left ShelleyKeyCmdError ShelleyKeyCmdWrongKeyTypeError -runConvertITNBip32ToStakeKey (ASigningKeyFile (SigningKeyFile String -sk)) (OutputFile String -outFile) = do - Text -bech32privateKey <- (ItnKeyConversionError -> ShelleyKeyCmdError) +runConvertITNBip32ToStakeKey (ASigningKeyFile (SigningKeyFile String +sk)) (OutputFile String +outFile) = do + Text +bech32privateKey <- (ItnKeyConversionError -> ShelleyKeyCmdError) -> ExceptT ItnKeyConversionError IO Text -> ExceptT ShelleyKeyCmdError IO Text forall (m :: * -> *) x y a. @@ -1825,9 +1825,9 @@ forall a b. (a -> b) -> a -> b $ String -> IO (Either ItnKeyConversionError Text) readFileITNKey String -sk - SigningKey StakeExtendedKey -skey <- Either ShelleyKeyCmdError (SigningKey StakeExtendedKey) +sk + SigningKey StakeExtendedKey +skey <- Either ShelleyKeyCmdError (SigningKey StakeExtendedKey) -> ExceptT ShelleyKeyCmdError IO (SigningKey StakeExtendedKey) forall (m :: * -> *) x a. Monad m => Either x a -> ExceptT x m a hoistEither (Either ShelleyKeyCmdError (SigningKey StakeExtendedKey) @@ -1854,7 +1854,7 @@ forall a b. (a -> b) -> a -> b $ Text -> Either ItnKeyConversionError (SigningKey StakeExtendedKey) convertITNBIP32SigningKey Text -bech32privateKey +bech32privateKey (FileError () -> ShelleyKeyCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyKeyCmdError IO () forall (m :: * -> *) x y a. @@ -1884,10 +1884,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -outFile Maybe TextEnvelopeDescr +outFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing SigningKey StakeExtendedKey -skey +skey -- | An error that can occur while converting an Incentivized Testnet (ITN) -- key. @@ -1896,7 +1896,7 @@ | ItnReadBech32FileError !FilePath !IOException | ItnSigningKeyDeserialisationError !ByteString | ItnVerificationKeyDeserialisationError !ByteString - deriving Int -> ItnKeyConversionError -> ShowS + deriving Int -> ItnKeyConversionError -> ShowS [ItnKeyConversionError] -> ShowS ItnKeyConversionError -> String (Int -> ItnKeyConversionError -> ShowS) @@ -1916,12 +1916,12 @@ -- | Render an error message for an 'ItnKeyConversionError'. renderConversionError :: ItnKeyConversionError -> Text renderConversionError :: ItnKeyConversionError -> Text -renderConversionError ItnKeyConversionError -err = +renderConversionError ItnKeyConversionError +err = case ItnKeyConversionError -err of - ItnKeyBech32DecodeError Bech32DecodeError -decErr -> +err of + ItnKeyBech32DecodeError Bech32DecodeError +decErr -> Text "Error decoding Bech32 key: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -1929,17 +1929,17 @@ Text.pack (Bech32DecodeError -> String forall e. Error e => e -> String displayError Bech32DecodeError -decErr) - ItnReadBech32FileError String -fp IOException -readErr -> +decErr) + ItnReadBech32FileError String +fp IOException +readErr -> Text "Error reading Bech32 key at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a. Show a => a -> Text textShow String -fp +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -1949,15 +1949,15 @@ Text.pack (IOException -> String forall e. Exception e => e -> String displayException IOException -readErr) - ItnSigningKeyDeserialisationError ByteString -_sKey -> +readErr) + ItnSigningKeyDeserialisationError ByteString +_sKey -> -- Sensitive data, such as the signing key, is purposely not included in -- the error message. Text "Error deserialising signing key." - ItnVerificationKeyDeserialisationError ByteString -vKey -> + ItnVerificationKeyDeserialisationError ByteString +vKey -> Text "Error deserialising verification key: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -1965,17 +1965,17 @@ forall a. Show a => a -> Text textShow (ByteString -> String BSC.unpack ByteString -vKey) +vKey) -- | Convert public ed25519 key to a Shelley stake verification key convertITNVerificationKey :: Text -> Either ItnKeyConversionError (VerificationKey StakeKey) convertITNVerificationKey :: Text -> Either ItnKeyConversionError (VerificationKey StakeKey) -convertITNVerificationKey Text -pubKey = do +convertITNVerificationKey Text +pubKey = do (HumanReadablePart _, DataPart -_, ByteString -keyBS) <- (Bech32DecodeError -> ItnKeyConversionError) +_, ByteString +keyBS) <- (Bech32DecodeError -> ItnKeyConversionError) -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) -> Either @@ -1988,13 +1988,13 @@ -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) decodeBech32 Text -pubKey) +pubKey) case ByteString -> Maybe (VerKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (VerKeyDSIGN v) DSIGN.rawDeserialiseVerKeyDSIGN ByteString -keyBS of - Just VerKeyDSIGN Ed25519DSIGN -verKey -> VerificationKey StakeKey +keyBS of + Just VerKeyDSIGN Ed25519DSIGN +verKey -> VerificationKey StakeKey -> Either ItnKeyConversionError (VerificationKey StakeKey) forall a b. b -> Either a b Right (VerificationKey StakeKey @@ -2016,7 +2016,7 @@ VerKeyDSIGN (DSIGN crypto) -> VKey kd crypto Shelley.VKey VerKeyDSIGN (DSIGN StandardCrypto) VerKeyDSIGN Ed25519DSIGN -verKey +verKey Maybe (VerKeyDSIGN Ed25519DSIGN) Nothing -> ItnKeyConversionError -> Either ItnKeyConversionError (VerificationKey StakeKey) @@ -2028,17 +2028,17 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ItnKeyConversionError ItnVerificationKeyDeserialisationError ByteString -keyBS +keyBS -- | Convert private ed22519 key to a Shelley signing key. convertITNSigningKey :: Text -> Either ItnKeyConversionError (SigningKey StakeKey) convertITNSigningKey :: Text -> Either ItnKeyConversionError (SigningKey StakeKey) -convertITNSigningKey Text -privKey = do +convertITNSigningKey Text +privKey = do (HumanReadablePart _, DataPart -_, ByteString -keyBS) <- (Bech32DecodeError -> ItnKeyConversionError) +_, ByteString +keyBS) <- (Bech32DecodeError -> ItnKeyConversionError) -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) -> Either @@ -2051,13 +2051,13 @@ -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) decodeBech32 Text -privKey) +privKey) case ByteString -> Maybe (SignKeyDSIGN Ed25519DSIGN) forall v. DSIGNAlgorithm v => ByteString -> Maybe (SignKeyDSIGN v) DSIGN.rawDeserialiseSignKeyDSIGN ByteString -keyBS of - Just SignKeyDSIGN Ed25519DSIGN -signKey -> SigningKey StakeKey +keyBS of + Just SignKeyDSIGN Ed25519DSIGN +signKey -> SigningKey StakeKey -> Either ItnKeyConversionError (SigningKey StakeKey) forall a b. b -> Either a b Right (SigningKey StakeKey @@ -2068,7 +2068,7 @@ $ SignKeyDSIGN StandardCrypto -> SigningKey StakeKey StakeSigningKey SignKeyDSIGN StandardCrypto SignKeyDSIGN Ed25519DSIGN -signKey +signKey Maybe (SignKeyDSIGN Ed25519DSIGN) Nothing -> ItnKeyConversionError -> Either ItnKeyConversionError (SigningKey StakeKey) @@ -2080,19 +2080,19 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ItnKeyConversionError ItnSigningKeyDeserialisationError ByteString -keyBS +keyBS -- | Convert extended private ed22519 key to a Shelley signing key -- Extended private key = 64 bytes, -- Public key = 32 bytes. convertITNExtendedSigningKey :: Text -> Either ItnKeyConversionError (SigningKey StakeExtendedKey) convertITNExtendedSigningKey :: Text -> Either ItnKeyConversionError (SigningKey StakeExtendedKey) -convertITNExtendedSigningKey Text -privKey = do +convertITNExtendedSigningKey Text +privKey = do (HumanReadablePart _, DataPart -_, ByteString -privkeyBS) <- (Bech32DecodeError -> ItnKeyConversionError) +_, ByteString +privkeyBS) <- (Bech32DecodeError -> ItnKeyConversionError) -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) -> Either @@ -2105,9 +2105,9 @@ -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) decodeBech32 Text -privKey) - let dummyChainCode :: ByteString -dummyChainCode = Int -> Word8 -> ByteString +privKey) + let dummyChainCode :: ByteString +dummyChainCode = Int -> Word8 -> ByteString BS.replicate Int 32 Word8 0 @@ -2116,10 +2116,10 @@ forall a b. (a -> b) -> a -> b $ [ByteString] -> ByteString BS.concat [ByteString -privkeyBS, ByteString -dummyChainCode] of - Just XPrv -xprv -> SigningKey StakeExtendedKey +privkeyBS, ByteString +dummyChainCode] of + Just XPrv +xprv -> SigningKey StakeExtendedKey -> Either ItnKeyConversionError (SigningKey StakeExtendedKey) forall a b. b -> Either a b Right (SigningKey StakeExtendedKey @@ -2129,7 +2129,7 @@ forall a b. (a -> b) -> a -> b $ XPrv -> SigningKey StakeExtendedKey StakeExtendedSigningKey XPrv -xprv +xprv Maybe XPrv Nothing -> ItnKeyConversionError -> Either ItnKeyConversionError (SigningKey StakeExtendedKey) @@ -2141,18 +2141,18 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ItnKeyConversionError ItnSigningKeyDeserialisationError ByteString -privkeyBS +privkeyBS -- BIP32 Private key = 96 bytes (64 bytes extended private key + 32 bytes chaincode) -- BIP32 Public Key = 64 Bytes convertITNBIP32SigningKey :: Text -> Either ItnKeyConversionError (SigningKey StakeExtendedKey) convertITNBIP32SigningKey :: Text -> Either ItnKeyConversionError (SigningKey StakeExtendedKey) -convertITNBIP32SigningKey Text -privKey = do +convertITNBIP32SigningKey Text +privKey = do (HumanReadablePart _, DataPart -_, ByteString -privkeyBS) <- (Bech32DecodeError -> ItnKeyConversionError) +_, ByteString +privkeyBS) <- (Bech32DecodeError -> ItnKeyConversionError) -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) -> Either @@ -2165,12 +2165,12 @@ -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) decodeBech32 Text -privKey) +privKey) case ByteString -> Maybe XPrv xPrvFromBytes ByteString -privkeyBS of - Just XPrv -xprv -> SigningKey StakeExtendedKey +privkeyBS of + Just XPrv +xprv -> SigningKey StakeExtendedKey -> Either ItnKeyConversionError (SigningKey StakeExtendedKey) forall a b. b -> Either a b Right (SigningKey StakeExtendedKey @@ -2180,7 +2180,7 @@ forall a b. (a -> b) -> a -> b $ XPrv -> SigningKey StakeExtendedKey StakeExtendedSigningKey XPrv -xprv +xprv Maybe XPrv Nothing -> ItnKeyConversionError -> Either ItnKeyConversionError (SigningKey StakeExtendedKey) @@ -2192,25 +2192,25 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ItnKeyConversionError ItnSigningKeyDeserialisationError ByteString -privkeyBS +privkeyBS readFileITNKey :: FilePath -> IO (Either ItnKeyConversionError Text) readFileITNKey :: String -> IO (Either ItnKeyConversionError Text) -readFileITNKey String -fp = do - Either IOException Text -eStr <- IO Text -> IO (Either IOException Text) +readFileITNKey String +fp = do + Either IOException Text +eStr <- IO Text -> IO (Either IOException Text) forall e a. Exception e => IO a -> IO (Either e a) Exception.try (IO Text -> IO (Either IOException Text)) -> IO Text -> IO (Either IOException Text) forall a b. (a -> b) -> a -> b $ String -> IO Text readFile String -fp +fp case Either IOException Text -eStr of - Left IOException -e -> Either ItnKeyConversionError Text +eStr of + Left IOException +e -> Either ItnKeyConversionError Text -> IO (Either ItnKeyConversionError Text) forall (m :: * -> *) a. Monad m => a -> m a return (Either ItnKeyConversionError Text @@ -2228,10 +2228,10 @@ forall a b. (a -> b) -> a -> b $ String -> IOException -> ItnKeyConversionError ItnReadBech32FileError String -fp IOException -e - Right Text -str -> Either ItnKeyConversionError Text +fp IOException +e + Right Text +str -> Either ItnKeyConversionError Text -> IO (Either ItnKeyConversionError Text) forall (m :: * -> *) a. Monad m => a -> m a return (Either ItnKeyConversionError Text @@ -2255,7 +2255,7 @@ forall a b. (a -> b) -> a -> b $ Text -> [Text] Text.words Text -str +str -------------------------------------------------------------------------------- -- `cardano-address` extended signing key conversions @@ -2268,12 +2268,12 @@ -> ExceptT ShelleyKeyCmdError IO () runConvertCardanoAddressSigningKey :: CardanoAddressKeyType -> SigningKeyFile -> OutputFile -> ExceptT ShelleyKeyCmdError IO () -runConvertCardanoAddressSigningKey CardanoAddressKeyType -keyType SigningKeyFile -skFile (OutputFile String -outFile) = do - SomeCardanoAddressSigningKey -sKey <- (FileError CardanoAddressSigningKeyConversionError +runConvertCardanoAddressSigningKey CardanoAddressKeyType +keyType SigningKeyFile +skFile (OutputFile String +outFile) = do + SomeCardanoAddressSigningKey +sKey <- (FileError CardanoAddressSigningKeyConversionError -> ShelleyKeyCmdError) -> ExceptT (FileError CardanoAddressSigningKeyConversionError) @@ -2335,8 +2335,8 @@ (FileError CardanoAddressSigningKeyConversionError) SomeCardanoAddressSigningKey) readSomeCardanoAddressSigningKeyFile CardanoAddressKeyType -keyType SigningKeyFile -skFile +keyType SigningKeyFile +skFile (FileError () -> ShelleyKeyCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyKeyCmdError IO () forall (m :: * -> *) x y a. @@ -2360,8 +2360,8 @@ $ String -> SomeCardanoAddressSigningKey -> IO (Either (FileError ()) ()) writeSomeCardanoAddressSigningKeyFile String -outFile SomeCardanoAddressSigningKey -sKey +outFile SomeCardanoAddressSigningKey +sKey -- | Some kind of signing key that was converted from a @cardano-address@ -- signing key. @@ -2378,7 +2378,7 @@ | CardanoAddressSigningKeyDeserialisationError !ByteString -- ^ There was an error in converting the @cardano-address@ extended signing -- key. - deriving (Int -> CardanoAddressSigningKeyConversionError -> ShowS + deriving (Int -> CardanoAddressSigningKeyConversionError -> ShowS [CardanoAddressSigningKeyConversionError] -> ShowS CardanoAddressSigningKeyConversionError -> String (Int -> CardanoAddressSigningKeyConversionError -> ShowS) @@ -2393,7 +2393,7 @@ $cshow :: CardanoAddressSigningKeyConversionError -> String showsPrec :: Int -> CardanoAddressSigningKeyConversionError -> ShowS $cshowsPrec :: Int -> CardanoAddressSigningKeyConversionError -> ShowS -Show, CardanoAddressSigningKeyConversionError +Show, CardanoAddressSigningKeyConversionError -> CardanoAddressSigningKeyConversionError -> Bool (CardanoAddressSigningKeyConversionError -> CardanoAddressSigningKeyConversionError -> Bool) @@ -2412,8 +2412,8 @@ Eq) instance Error CardanoAddressSigningKeyConversionError where - displayError :: CardanoAddressSigningKeyConversionError -> String -displayError = Text -> String + displayError :: CardanoAddressSigningKeyConversionError -> String +displayError = Text -> String Text.unpack (Text -> String) -> (CardanoAddressSigningKeyConversionError -> Text) -> CardanoAddressSigningKeyConversionError @@ -2429,19 +2429,19 @@ :: CardanoAddressSigningKeyConversionError -> Text renderCardanoAddressSigningKeyConversionError :: CardanoAddressSigningKeyConversionError -> Text -renderCardanoAddressSigningKeyConversionError CardanoAddressSigningKeyConversionError -err = +renderCardanoAddressSigningKeyConversionError CardanoAddressSigningKeyConversionError +err = case CardanoAddressSigningKeyConversionError -err of - CardanoAddressSigningKeyBech32DecodeError Bech32DecodeError -decErr -> +err of + CardanoAddressSigningKeyBech32DecodeError Bech32DecodeError +decErr -> String -> Text Text.pack (Bech32DecodeError -> String forall e. Error e => e -> String displayError Bech32DecodeError -decErr) - CardanoAddressSigningKeyDeserialisationError ByteString -_bs -> +decErr) + CardanoAddressSigningKeyDeserialisationError ByteString +_bs -> -- Sensitive data, such as the signing key, is purposely not included in -- the error message. Text @@ -2454,25 +2454,25 @@ decodeBech32 :: Text -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) -decodeBech32 Text -bech32Str = +decodeBech32 Text +bech32Str = case Text -> Either DecodingError (HumanReadablePart, DataPart) Bech32.decodeLenient Text -bech32Str of - Left DecodingError -err -> Bech32DecodeError +bech32Str of + Left DecodingError +err -> Bech32DecodeError -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) forall a b. a -> Either a b Left (DecodingError -> Bech32DecodeError Bech32DecodingError DecodingError -err) - Right (HumanReadablePart -hrPart, DataPart -dataPart) -> +err) + Right (HumanReadablePart +hrPart, DataPart +dataPart) -> case DataPart -> Maybe ByteString Bech32.dataPartToBytes DataPart -dataPart of +dataPart of Maybe ByteString Nothing -> Bech32DecodeError @@ -2489,16 +2489,16 @@ $ Text -> Bech32DecodeError Bech32DataPartToBytesError (DataPart -> Text Bech32.dataPartToText DataPart -dataPart) - Just ByteString -bs -> (HumanReadablePart, DataPart, ByteString) +dataPart) + Just ByteString +bs -> (HumanReadablePart, DataPart, ByteString) -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) forall a b. b -> Either a b Right (HumanReadablePart -hrPart, DataPart -dataPart, ByteString -bs) +hrPart, DataPart +dataPart, ByteString +bs) -- | Convert a Ed25519 BIP32 extended signing key (96 bytes) to a @cardano-crypto@ -- style extended signing key. @@ -2508,16 +2508,16 @@ :: ByteString -> Either CardanoAddressSigningKeyConversionError Crypto.XPrv convertBip32SigningKey :: ByteString -> Either CardanoAddressSigningKeyConversionError XPrv -convertBip32SigningKey ByteString -signingKeyBs = +convertBip32SigningKey ByteString +signingKeyBs = case ByteString -> Maybe XPrv xPrvFromBytes ByteString -signingKeyBs of - Just XPrv -xPrv -> XPrv -> Either CardanoAddressSigningKeyConversionError XPrv +signingKeyBs of + Just XPrv +xPrv -> XPrv -> Either CardanoAddressSigningKeyConversionError XPrv forall a b. b -> Either a b Right XPrv -xPrv +xPrv Maybe XPrv Nothing -> CardanoAddressSigningKeyConversionError @@ -2530,7 +2530,7 @@ forall a b. (a -> b) -> a -> b $ ByteString -> CardanoAddressSigningKeyConversionError CardanoAddressSigningKeyDeserialisationError ByteString -signingKeyBs +signingKeyBs -- | Read a file containing a Bech32-encoded Ed25519 BIP32 extended signing -- key. @@ -2540,21 +2540,21 @@ readBech32Bip32SigningKeyFile :: SigningKeyFile -> IO (Either (FileError CardanoAddressSigningKeyConversionError) XPrv) -readBech32Bip32SigningKeyFile (SigningKeyFile String -fp) = do - Either IOException Text -eStr <- IO Text -> IO (Either IOException Text) +readBech32Bip32SigningKeyFile (SigningKeyFile String +fp) = do + Either IOException Text +eStr <- IO Text -> IO (Either IOException Text) forall e a. Exception e => IO a -> IO (Either e a) Exception.try (IO Text -> IO (Either IOException Text)) -> IO Text -> IO (Either IOException Text) forall a b. (a -> b) -> a -> b $ String -> IO Text readFile String -fp +fp case Either IOException Text -eStr of - Left IOException -e -> Either (FileError CardanoAddressSigningKeyConversionError) XPrv +eStr of + Left IOException +e -> Either (FileError CardanoAddressSigningKeyConversionError) XPrv -> IO (Either (FileError CardanoAddressSigningKeyConversionError) XPrv) forall (f :: * -> *) a. Applicative f => a -> f a @@ -2583,10 +2583,10 @@ -> IOException -> FileError CardanoAddressSigningKeyConversionError forall e. String -> IOException -> FileError e FileIOError String -fp IOException -e - Right Text -str -> +fp IOException +e + Right Text +str -> case Text -> Either Bech32DecodeError (HumanReadablePart, DataPart, ByteString) @@ -2595,9 +2595,9 @@ forall a b. (a -> b) -> a -> b $ Text -> [Text] Text.words Text -str) of - Left Bech32DecodeError -err -> +str) of + Left Bech32DecodeError +err -> Either (FileError CardanoAddressSigningKeyConversionError) XPrv -> IO (Either (FileError CardanoAddressSigningKeyConversionError) XPrv) @@ -2623,13 +2623,13 @@ -> FileError CardanoAddressSigningKeyConversionError forall e. String -> e -> FileError e FileError String -fp (Bech32DecodeError -> CardanoAddressSigningKeyConversionError +fp (Bech32DecodeError -> CardanoAddressSigningKeyConversionError CardanoAddressSigningKeyBech32DecodeError Bech32DecodeError -err) - Right (HumanReadablePart -_hrPart, DataPart -_dataPart, ByteString -bs) -> +err) + Right (HumanReadablePart +_hrPart, DataPart +_dataPart, ByteString +bs) -> Either (FileError CardanoAddressSigningKeyConversionError) XPrv -> IO (Either (FileError CardanoAddressSigningKeyConversionError) XPrv) @@ -2653,9 +2653,9 @@ -> FileError CardanoAddressSigningKeyConversionError forall e. String -> e -> FileError e FileError String -fp) (ByteString -> Either CardanoAddressSigningKeyConversionError XPrv +fp) (ByteString -> Either CardanoAddressSigningKeyConversionError XPrv convertBip32SigningKey ByteString -bs) +bs) -- | Read a file containing a Bech32-encoded @cardano-address@ extended -- signing key. @@ -2669,15 +2669,15 @@ (Either (FileError CardanoAddressSigningKeyConversionError) SomeCardanoAddressSigningKey) -readSomeCardanoAddressSigningKeyFile CardanoAddressKeyType -keyType SigningKeyFile -skFile = do - Either (FileError CardanoAddressSigningKeyConversionError) XPrv -xPrv <- SigningKeyFile +readSomeCardanoAddressSigningKeyFile CardanoAddressKeyType +keyType SigningKeyFile +skFile = do + Either (FileError CardanoAddressSigningKeyConversionError) XPrv +xPrv <- SigningKeyFile -> IO (Either (FileError CardanoAddressSigningKeyConversionError) XPrv) readBech32Bip32SigningKeyFile SigningKeyFile -skFile +skFile Either (FileError CardanoAddressSigningKeyConversionError) SomeCardanoAddressSigningKey @@ -2687,34 +2687,34 @@ SomeCardanoAddressSigningKey) forall (f :: * -> *) a. Applicative f => a -> f a pure (XPrv -> SomeCardanoAddressSigningKey -toSomeCardanoAddressSigningKey (XPrv -> SomeCardanoAddressSigningKey) +toSomeCardanoAddressSigningKey (XPrv -> SomeCardanoAddressSigningKey) -> Either (FileError CardanoAddressSigningKeyConversionError) XPrv -> Either (FileError CardanoAddressSigningKeyConversionError) SomeCardanoAddressSigningKey forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Either (FileError CardanoAddressSigningKeyConversionError) XPrv -xPrv) +xPrv) where - toSomeCardanoAddressSigningKey :: Crypto.XPrv -> SomeCardanoAddressSigningKey - toSomeCardanoAddressSigningKey :: XPrv -> SomeCardanoAddressSigningKey -toSomeCardanoAddressSigningKey XPrv -xPrv = + toSomeCardanoAddressSigningKey :: Crypto.XPrv -> SomeCardanoAddressSigningKey + toSomeCardanoAddressSigningKey :: XPrv -> SomeCardanoAddressSigningKey +toSomeCardanoAddressSigningKey XPrv +xPrv = case CardanoAddressKeyType -keyType of +keyType of CardanoAddressKeyType CardanoAddressShelleyPaymentKey -> SigningKey PaymentExtendedKey -> SomeCardanoAddressSigningKey ACardanoAddrShelleyPaymentSigningKey (XPrv -> SigningKey PaymentExtendedKey PaymentExtendedSigningKey XPrv -xPrv) +xPrv) CardanoAddressKeyType CardanoAddressShelleyStakeKey -> SigningKey StakeExtendedKey -> SomeCardanoAddressSigningKey ACardanoAddrShelleyStakeSigningKey (XPrv -> SigningKey StakeExtendedKey StakeExtendedSigningKey XPrv -xPrv) +xPrv) CardanoAddressKeyType CardanoAddressIcarusPaymentKey -> SigningKey ByronKey -> SomeCardanoAddressSigningKey @@ -2725,7 +2725,7 @@ SigningKey -> SigningKey ByronKey ByronSigningKey (XPrv -> SigningKey Byron.SigningKey XPrv -xPrv) +xPrv) CardanoAddressKeyType CardanoAddressByronPaymentKey -> SigningKey ByronKey -> SomeCardanoAddressSigningKey @@ -2736,7 +2736,7 @@ SigningKey -> SigningKey ByronKey ByronSigningKey (XPrv -> SigningKey Byron.SigningKey XPrv -xPrv) +xPrv) -- | Write a text envelope formatted file containing a @cardano-address@ -- extended signing key, but converted to a format supported by @cardano-cli@. @@ -2746,13 +2746,13 @@ -> IO (Either (FileError ()) ()) writeSomeCardanoAddressSigningKeyFile :: String -> SomeCardanoAddressSigningKey -> IO (Either (FileError ()) ()) -writeSomeCardanoAddressSigningKeyFile String -outFile SomeCardanoAddressSigningKey -skey = +writeSomeCardanoAddressSigningKeyFile String +outFile SomeCardanoAddressSigningKey +skey = case SomeCardanoAddressSigningKey -skey of - ACardanoAddrShelleyPaymentSigningKey SigningKey PaymentExtendedKey -sk -> +skey of + ACardanoAddrShelleyPaymentSigningKey SigningKey PaymentExtendedKey +sk -> String -> Maybe TextEnvelopeDescr -> SigningKey PaymentExtendedKey @@ -2762,12 +2762,12 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -outFile Maybe TextEnvelopeDescr +outFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing SigningKey PaymentExtendedKey -sk - ACardanoAddrShelleyStakeSigningKey SigningKey StakeExtendedKey -sk -> +sk + ACardanoAddrShelleyStakeSigningKey SigningKey StakeExtendedKey +sk -> String -> Maybe TextEnvelopeDescr -> SigningKey StakeExtendedKey @@ -2777,12 +2777,12 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -outFile Maybe TextEnvelopeDescr +outFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing SigningKey StakeExtendedKey -sk - ACardanoAddrByronSigningKey SigningKey ByronKey -sk -> +sk + ACardanoAddrByronSigningKey SigningKey ByronKey +sk -> String -> Maybe TextEnvelopeDescr -> SigningKey ByronKey @@ -2792,8 +2792,8 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -outFile Maybe TextEnvelopeDescr +outFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing SigningKey ByronKey -sk +sk \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.Node.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.Node.html index c6ed15c2f43..0a7fe410a1a 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.Node.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.Node.html @@ -37,7 +37,7 @@ -- ^ Target path FilePath -- ^ Temp path - deriving Int -> ShelleyNodeCmdError -> ShowS + deriving Int -> ShelleyNodeCmdError -> ShowS [ShelleyNodeCmdError] -> ShowS ShelleyNodeCmdError -> String (Int -> ShelleyNodeCmdError -> ShowS) @@ -56,13 +56,13 @@ renderShelleyNodeCmdError :: ShelleyNodeCmdError -> Text renderShelleyNodeCmdError :: ShelleyNodeCmdError -> Text -renderShelleyNodeCmdError ShelleyNodeCmdError -err = +renderShelleyNodeCmdError ShelleyNodeCmdError +err = case ShelleyNodeCmdError -err of - ShelleyNodeCmdVrfSigningKeyCreationError String -targetPath String -tempPath -> +err of + ShelleyNodeCmdVrfSigningKeyCreationError String +targetPath String +tempPath -> String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b @@ -70,94 +70,94 @@ "Error creating VRF signing key file. Target path: " String -> ShowS forall a. Semigroup a => a -> a -> a <> String -targetPath +targetPath String -> ShowS forall a. Semigroup a => a -> a -> a <> String " Temporary path: " String -> ShowS forall a. Semigroup a => a -> a -> a <> String -tempPath +tempPath - ShelleyNodeCmdReadFileError FileError TextEnvelopeError -fileErr -> String -> Text + ShelleyNodeCmdReadFileError FileError TextEnvelopeError +fileErr -> String -> Text Text.pack (FileError TextEnvelopeError -> String forall e. Error e => e -> String displayError FileError TextEnvelopeError -fileErr) +fileErr) - ShelleyNodeCmdReadKeyFileError FileError InputDecodeError -fileErr -> String -> Text + ShelleyNodeCmdReadKeyFileError FileError InputDecodeError +fileErr -> String -> Text Text.pack (FileError InputDecodeError -> String forall e. Error e => e -> String displayError FileError InputDecodeError -fileErr) +fileErr) - ShelleyNodeCmdWriteFileError FileError () -fileErr -> String -> Text + ShelleyNodeCmdWriteFileError FileError () +fileErr -> String -> Text Text.pack (FileError () -> String forall e. Error e => e -> String displayError FileError () -fileErr) +fileErr) - ShelleyNodeCmdOperationalCertificateIssueError OperationalCertIssueError -issueErr -> + ShelleyNodeCmdOperationalCertificateIssueError OperationalCertIssueError +issueErr -> String -> Text Text.pack (OperationalCertIssueError -> String forall e. Error e => e -> String displayError OperationalCertIssueError -issueErr) +issueErr) runNodeCmd :: NodeCmd -> ExceptT ShelleyNodeCmdError IO () runNodeCmd :: NodeCmd -> ExceptT ShelleyNodeCmdError IO () -runNodeCmd (NodeKeyGenCold VerificationKeyFile -vk SigningKeyFile -sk OpCertCounterFile -ctr) = VerificationKeyFile +runNodeCmd (NodeKeyGenCold VerificationKeyFile +vk SigningKeyFile +sk OpCertCounterFile +ctr) = VerificationKeyFile -> SigningKeyFile -> OpCertCounterFile -> ExceptT ShelleyNodeCmdError IO () runNodeKeyGenCold VerificationKeyFile -vk SigningKeyFile -sk OpCertCounterFile -ctr -runNodeCmd (NodeKeyGenKES VerificationKeyFile -vk SigningKeyFile -sk) = VerificationKeyFile +vk SigningKeyFile +sk OpCertCounterFile +ctr +runNodeCmd (NodeKeyGenKES VerificationKeyFile +vk SigningKeyFile +sk) = VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyNodeCmdError IO () runNodeKeyGenKES VerificationKeyFile -vk SigningKeyFile -sk -runNodeCmd (NodeKeyGenVRF VerificationKeyFile -vk SigningKeyFile -sk) = VerificationKeyFile +vk SigningKeyFile +sk +runNodeCmd (NodeKeyGenVRF VerificationKeyFile +vk SigningKeyFile +sk) = VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyNodeCmdError IO () runNodeKeyGenVRF VerificationKeyFile -vk SigningKeyFile -sk -runNodeCmd (NodeKeyHashVRF VerificationKeyOrFile VrfKey -vk Maybe OutputFile -mOutFp) = VerificationKeyOrFile VrfKey +vk SigningKeyFile +sk +runNodeCmd (NodeKeyHashVRF VerificationKeyOrFile VrfKey +vk Maybe OutputFile +mOutFp) = VerificationKeyOrFile VrfKey -> Maybe OutputFile -> ExceptT ShelleyNodeCmdError IO () runNodeKeyHashVRF VerificationKeyOrFile VrfKey -vk Maybe OutputFile -mOutFp -runNodeCmd (NodeNewCounter ColdVerificationKeyOrFile -vk Word -ctr OpCertCounterFile -out) = ColdVerificationKeyOrFile +vk Maybe OutputFile +mOutFp +runNodeCmd (NodeNewCounter ColdVerificationKeyOrFile +vk Word +ctr OpCertCounterFile +out) = ColdVerificationKeyOrFile -> Word -> OpCertCounterFile -> ExceptT ShelleyNodeCmdError IO () runNodeNewCounter ColdVerificationKeyOrFile -vk Word -ctr OpCertCounterFile -out -runNodeCmd (NodeIssueOpCert VerificationKeyOrFile KesKey -vk SigningKeyFile -sk OpCertCounterFile -ctr KESPeriod -p OutputFile -out) = +vk Word +ctr OpCertCounterFile +out +runNodeCmd (NodeIssueOpCert VerificationKeyOrFile KesKey +vk SigningKeyFile +sk OpCertCounterFile +ctr KESPeriod +p OutputFile +out) = VerificationKeyOrFile KesKey -> SigningKeyFile -> OpCertCounterFile @@ -165,11 +165,11 @@ -> OutputFile -> ExceptT ShelleyNodeCmdError IO () runNodeIssueOpCert VerificationKeyOrFile KesKey -vk SigningKeyFile -sk OpCertCounterFile -ctr KESPeriod -p OutputFile -out +vk SigningKeyFile +sk OpCertCounterFile +ctr KESPeriod +p OutputFile +out @@ -185,13 +185,13 @@ -> SigningKeyFile -> OpCertCounterFile -> ExceptT ShelleyNodeCmdError IO () -runNodeKeyGenCold (VerificationKeyFile String -vkeyPath) (SigningKeyFile String -skeyPath) - (OpCertCounterFile String -ocertCtrPath) = do - SigningKey StakePoolKey -skey <- IO (SigningKey StakePoolKey) +runNodeKeyGenCold (VerificationKeyFile String +vkeyPath) (SigningKeyFile String +skeyPath) + (OpCertCounterFile String +ocertCtrPath) = do + SigningKey StakePoolKey +skey <- IO (SigningKey StakePoolKey) -> ExceptT ShelleyNodeCmdError IO (SigningKey StakePoolKey) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (SigningKey StakePoolKey) @@ -205,13 +205,13 @@ AsType keyrole -> IO (SigningKey keyrole) generateSigningKey AsType StakePoolKey AsStakePoolKey - let vkey :: VerificationKey StakePoolKey -vkey = SigningKey StakePoolKey -> VerificationKey StakePoolKey + let vkey :: VerificationKey StakePoolKey +vkey = SigningKey StakePoolKey -> VerificationKey StakePoolKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey StakePoolKey -skey +skey (FileError () -> ShelleyNodeCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyNodeCmdError IO () @@ -244,11 +244,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -skeyDesc) SigningKey StakePoolKey -skey +skeyDesc) SigningKey StakePoolKey +skey (FileError () -> ShelleyNodeCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyNodeCmdError IO () @@ -281,11 +281,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -vkeyDesc) VerificationKey StakePoolKey -vkey +vkeyDesc) VerificationKey StakePoolKey +vkey (FileError () -> ShelleyNodeCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyNodeCmdError IO () @@ -318,10 +318,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -ocertCtrPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +ocertCtrPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -ocertCtrDesc) +ocertCtrDesc) (OperationalCertificateIssueCounter -> IO (Either (FileError ()) ())) -> OperationalCertificateIssueCounter @@ -331,18 +331,18 @@ -> VerificationKey StakePoolKey -> OperationalCertificateIssueCounter OperationalCertificateIssueCounter Word64 -initialCounter VerificationKey StakePoolKey -vkey +initialCounter VerificationKey StakePoolKey +vkey where - skeyDesc, vkeyDesc, ocertCtrDesc :: TextEnvelopeDescr - skeyDesc :: TextEnvelopeDescr -skeyDesc = TextEnvelopeDescr + skeyDesc, vkeyDesc, ocertCtrDesc :: TextEnvelopeDescr + skeyDesc :: TextEnvelopeDescr +skeyDesc = TextEnvelopeDescr "Stake Pool Operator Signing Key" - vkeyDesc :: TextEnvelopeDescr -vkeyDesc = TextEnvelopeDescr + vkeyDesc :: TextEnvelopeDescr +vkeyDesc = TextEnvelopeDescr "Stake Pool Operator Verification Key" - ocertCtrDesc :: TextEnvelopeDescr -ocertCtrDesc = TextEnvelopeDescr + ocertCtrDesc :: TextEnvelopeDescr +ocertCtrDesc = TextEnvelopeDescr "Next certificate issue number: " TextEnvelopeDescr -> TextEnvelopeDescr -> TextEnvelopeDescr forall a. Semigroup a => a -> a -> a @@ -351,11 +351,11 @@ fromString (Word64 -> String forall a b. (Show a, ConvertText String b) => a -> b show Word64 -initialCounter) +initialCounter) - initialCounter :: Word64 - initialCounter :: Word64 -initialCounter = Word64 + initialCounter :: Word64 + initialCounter :: Word64 +initialCounter = Word64 0 @@ -364,11 +364,11 @@ -> ExceptT ShelleyNodeCmdError IO () runNodeKeyGenKES :: VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyNodeCmdError IO () -runNodeKeyGenKES (VerificationKeyFile String -vkeyPath) (SigningKeyFile String -skeyPath) = do - SigningKey KesKey -skey <- IO (SigningKey KesKey) +runNodeKeyGenKES (VerificationKeyFile String +vkeyPath) (SigningKeyFile String +skeyPath) = do + SigningKey KesKey +skey <- IO (SigningKey KesKey) -> ExceptT ShelleyNodeCmdError IO (SigningKey KesKey) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (SigningKey KesKey) @@ -382,13 +382,13 @@ AsType keyrole -> IO (SigningKey keyrole) generateSigningKey AsType KesKey AsKesKey - let vkey :: VerificationKey KesKey -vkey = SigningKey KesKey -> VerificationKey KesKey + let vkey :: VerificationKey KesKey +vkey = SigningKey KesKey -> VerificationKey KesKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey KesKey -skey +skey (FileError () -> ShelleyNodeCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyNodeCmdError IO () @@ -421,11 +421,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -skeyDesc) SigningKey KesKey -skey +skeyDesc) SigningKey KesKey +skey (FileError () -> ShelleyNodeCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyNodeCmdError IO () @@ -458,29 +458,29 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -vkeyDesc) VerificationKey KesKey -vkey +vkeyDesc) VerificationKey KesKey +vkey where - skeyDesc, vkeyDesc :: TextEnvelopeDescr - skeyDesc :: TextEnvelopeDescr -skeyDesc = TextEnvelopeDescr + skeyDesc, vkeyDesc :: TextEnvelopeDescr + skeyDesc :: TextEnvelopeDescr +skeyDesc = TextEnvelopeDescr "KES Signing Key" - vkeyDesc :: TextEnvelopeDescr -vkeyDesc = TextEnvelopeDescr + vkeyDesc :: TextEnvelopeDescr +vkeyDesc = TextEnvelopeDescr "KES Verification Key" runNodeKeyGenVRF :: VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyNodeCmdError IO () runNodeKeyGenVRF :: VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyNodeCmdError IO () -runNodeKeyGenVRF (VerificationKeyFile String -vkeyPath) (SigningKeyFile String -skeyPath) = do - SigningKey VrfKey -skey <- IO (SigningKey VrfKey) +runNodeKeyGenVRF (VerificationKeyFile String +vkeyPath) (SigningKeyFile String +skeyPath) = do + SigningKey VrfKey +skey <- IO (SigningKey VrfKey) -> ExceptT ShelleyNodeCmdError IO (SigningKey VrfKey) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (SigningKey VrfKey) @@ -494,13 +494,13 @@ AsType keyrole -> IO (SigningKey keyrole) generateSigningKey AsType VrfKey AsVrfKey - let vkey :: VerificationKey VrfKey -vkey = SigningKey VrfKey -> VerificationKey VrfKey + let vkey :: VerificationKey VrfKey +vkey = SigningKey VrfKey -> VerificationKey VrfKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey VrfKey -skey +skey (FileError () -> ShelleyNodeCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyNodeCmdError IO () @@ -533,11 +533,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelopeWithOwnerPermissions String -skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +skeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -skeyDesc) SigningKey VrfKey -skey +skeyDesc) SigningKey VrfKey +skey (FileError () -> ShelleyNodeCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyNodeCmdError IO () @@ -570,18 +570,18 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +vkeyPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -vkeyDesc) VerificationKey VrfKey -vkey +vkeyDesc) VerificationKey VrfKey +vkey where - skeyDesc, vkeyDesc :: TextEnvelopeDescr - skeyDesc :: TextEnvelopeDescr -skeyDesc = TextEnvelopeDescr + skeyDesc, vkeyDesc :: TextEnvelopeDescr + skeyDesc :: TextEnvelopeDescr +skeyDesc = TextEnvelopeDescr "VRF Signing Key" - vkeyDesc :: TextEnvelopeDescr -vkeyDesc = TextEnvelopeDescr + vkeyDesc :: TextEnvelopeDescr +vkeyDesc = TextEnvelopeDescr "VRF Verification Key" runNodeKeyHashVRF :: VerificationKeyOrFile VrfKey @@ -589,11 +589,11 @@ -> ExceptT ShelleyNodeCmdError IO () runNodeKeyHashVRF :: VerificationKeyOrFile VrfKey -> Maybe OutputFile -> ExceptT ShelleyNodeCmdError IO () -runNodeKeyHashVRF VerificationKeyOrFile VrfKey -verKeyOrFile Maybe OutputFile -mOutputFp = do - VerificationKey VrfKey -vkey <- (FileError InputDecodeError -> ShelleyNodeCmdError) +runNodeKeyHashVRF VerificationKeyOrFile VrfKey +verKeyOrFile Maybe OutputFile +mOutputFp = do + VerificationKey VrfKey +vkey <- (FileError InputDecodeError -> ShelleyNodeCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey VrfKey) -> ExceptT ShelleyNodeCmdError IO (VerificationKey VrfKey) forall (m :: * -> *) x y a. @@ -636,30 +636,30 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType VrfKey AsVrfKey VerificationKeyOrFile VrfKey -verKeyOrFile +verKeyOrFile - let hexKeyHash :: ByteString -hexKeyHash = Hash VrfKey -> ByteString + let hexKeyHash :: ByteString +hexKeyHash = Hash VrfKey -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytesHex (VerificationKey VrfKey -> Hash VrfKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey VrfKey -vkey) +vkey) case Maybe OutputFile -mOutputFp of - Just (OutputFile String -fpath) -> IO () -> ExceptT ShelleyNodeCmdError IO () +mOutputFp of + Just (OutputFile String +fpath) -> IO () -> ExceptT ShelleyNodeCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyNodeCmdError IO ()) -> IO () -> ExceptT ShelleyNodeCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () BS.writeFile String -fpath ByteString -hexKeyHash +fpath ByteString +hexKeyHash Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyNodeCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -668,7 +668,7 @@ forall a b. (a -> b) -> a -> b $ ByteString -> IO () BS.putStrLn ByteString -hexKeyHash +hexKeyHash runNodeNewCounter :: ColdVerificationKeyOrFile @@ -677,14 +677,14 @@ -> ExceptT ShelleyNodeCmdError IO () runNodeNewCounter :: ColdVerificationKeyOrFile -> Word -> OpCertCounterFile -> ExceptT ShelleyNodeCmdError IO () -runNodeNewCounter ColdVerificationKeyOrFile -coldVerKeyOrFile Word -counter - (OpCertCounterFile String -ocertCtrPath) = do +runNodeNewCounter ColdVerificationKeyOrFile +coldVerKeyOrFile Word +counter + (OpCertCounterFile String +ocertCtrPath) = do - VerificationKey StakePoolKey -vkey <- (FileError TextEnvelopeError -> ShelleyNodeCmdError) + VerificationKey StakePoolKey +vkey <- (FileError TextEnvelopeError -> ShelleyNodeCmdError) -> ExceptT (FileError TextEnvelopeError) IO (VerificationKey StakePoolKey) -> ExceptT ShelleyNodeCmdError IO (VerificationKey StakePoolKey) @@ -728,18 +728,18 @@ (Either (FileError TextEnvelopeError) (VerificationKey StakePoolKey)) readColdVerificationKeyOrFile ColdVerificationKeyOrFile -coldVerKeyOrFile +coldVerKeyOrFile - let ocertIssueCounter :: OperationalCertificateIssueCounter -ocertIssueCounter = + let ocertIssueCounter :: OperationalCertificateIssueCounter +ocertIssueCounter = Word64 -> VerificationKey StakePoolKey -> OperationalCertificateIssueCounter OperationalCertificateIssueCounter (Word -> Word64 forall a b. (Integral a, Num b) => a -> b fromIntegral Word -counter) VerificationKey StakePoolKey -vkey +counter) VerificationKey StakePoolKey +vkey (FileError () -> ShelleyNodeCmdError) -> ExceptT (FileError ()) IO () @@ -772,10 +772,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -ocertCtrPath Maybe TextEnvelopeDescr +ocertCtrPath Maybe TextEnvelopeDescr forall a. Maybe a Nothing OperationalCertificateIssueCounter -ocertIssueCounter +ocertIssueCounter runNodeIssueOpCert :: VerificationKeyOrFile KesKey @@ -795,19 +795,19 @@ -> KESPeriod -> OutputFile -> ExceptT ShelleyNodeCmdError IO () -runNodeIssueOpCert VerificationKeyOrFile KesKey -kesVerKeyOrFile - SigningKeyFile -stakePoolSKeyFile - (OpCertCounterFile String -ocertCtrPath) - KESPeriod -kesPeriod - (OutputFile String -certFile) = do +runNodeIssueOpCert VerificationKeyOrFile KesKey +kesVerKeyOrFile + SigningKeyFile +stakePoolSKeyFile + (OpCertCounterFile String +ocertCtrPath) + KESPeriod +kesPeriod + (OutputFile String +certFile) = do - OperationalCertificateIssueCounter -ocertIssueCounter <- (FileError TextEnvelopeError -> ShelleyNodeCmdError) + OperationalCertificateIssueCounter +ocertIssueCounter <- (FileError TextEnvelopeError -> ShelleyNodeCmdError) -> ExceptT (FileError TextEnvelopeError) IO OperationalCertificateIssueCounter -> ExceptT @@ -864,10 +864,10 @@ AsType a -> String -> IO (Either (FileError TextEnvelopeError) a) readFileTextEnvelope AsType OperationalCertificateIssueCounter AsOperationalCertificateIssueCounter String -ocertCtrPath +ocertCtrPath - VerificationKey KesKey -verKeyKes <- (FileError InputDecodeError -> ShelleyNodeCmdError) + VerificationKey KesKey +verKeyKes <- (FileError InputDecodeError -> ShelleyNodeCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey KesKey) -> ExceptT ShelleyNodeCmdError IO (VerificationKey KesKey) forall (m :: * -> *) x y a. @@ -910,11 +910,11 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType KesKey AsKesKey VerificationKeyOrFile KesKey -kesVerKeyOrFile +kesVerKeyOrFile - Either + Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) -signKey <- (FileError InputDecodeError -> ShelleyNodeCmdError) +signKey <- (FileError InputDecodeError -> ShelleyNodeCmdError) -> ExceptT (FileError InputDecodeError) IO @@ -1020,18 +1020,18 @@ SerialiseAsBech32 (Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey))] -bech32PossibleBlockIssuers +bech32PossibleBlockIssuers [FromSomeType HasTextEnvelope (Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey))] -textEnvPossibleBlockIssuers +textEnvPossibleBlockIssuers SigningKeyFile -stakePoolSKeyFile +stakePoolSKeyFile - (OperationalCertificate -ocert, OperationalCertificateIssueCounter -nextOcertCtr) <- + (OperationalCertificate +ocert, OperationalCertificateIssueCounter +nextOcertCtr) <- (OperationalCertIssueError -> ShelleyNodeCmdError) -> ExceptT OperationalCertIssueError @@ -1105,14 +1105,14 @@ (OperationalCertificate, OperationalCertificateIssueCounter) issueOperationalCertificate VerificationKey KesKey -verKeyKes +verKeyKes Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey) -signKey +signKey KESPeriod -kesPeriod +kesPeriod OperationalCertificateIssueCounter -ocertIssueCounter +ocertIssueCounter -- Write the counter first, to reduce the chance of ending up with -- a new cert but without updating the counter. @@ -1149,20 +1149,20 @@ -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -ocertCtrPath +ocertCtrPath (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just (TextEnvelopeDescr -> Maybe TextEnvelopeDescr) -> TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a b. (a -> b) -> a -> b $ Word64 -> TextEnvelopeDescr -ocertCtrDesc (Word64 -> TextEnvelopeDescr) -> Word64 -> TextEnvelopeDescr +ocertCtrDesc (Word64 -> TextEnvelopeDescr) -> Word64 -> TextEnvelopeDescr forall a b. (a -> b) -> a -> b $ OperationalCertificateIssueCounter -> Word64 -getCounter OperationalCertificateIssueCounter -nextOcertCtr) +getCounter OperationalCertificateIssueCounter +nextOcertCtr) OperationalCertificateIssueCounter -nextOcertCtr +nextOcertCtr (FileError () -> ShelleyNodeCmdError) -> ExceptT (FileError ()) IO () @@ -1196,22 +1196,22 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -certFile Maybe TextEnvelopeDescr +certFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing OperationalCertificate -ocert +ocert where - getCounter :: OperationalCertificateIssueCounter -> Word64 - getCounter :: OperationalCertificateIssueCounter -> Word64 -getCounter (OperationalCertificateIssueCounter Word64 -n VerificationKey StakePoolKey + getCounter :: OperationalCertificateIssueCounter -> Word64 + getCounter :: OperationalCertificateIssueCounter -> Word64 +getCounter (OperationalCertificateIssueCounter Word64 +n VerificationKey StakePoolKey _) = Word64 -n +n - ocertCtrDesc :: Word64 -> TextEnvelopeDescr - ocertCtrDesc :: Word64 -> TextEnvelopeDescr -ocertCtrDesc Word64 -n = TextEnvelopeDescr + ocertCtrDesc :: Word64 -> TextEnvelopeDescr + ocertCtrDesc :: Word64 -> TextEnvelopeDescr +ocertCtrDesc Word64 +n = TextEnvelopeDescr "Next certificate issue number: " TextEnvelopeDescr -> TextEnvelopeDescr -> TextEnvelopeDescr forall a. Semigroup a => a -> a -> a <> String -> TextEnvelopeDescr @@ -1219,17 +1219,17 @@ fromString (Word64 -> String forall a b. (Show a, ConvertText String b) => a -> b show Word64 -n) +n) - textEnvPossibleBlockIssuers + textEnvPossibleBlockIssuers :: [FromSomeType HasTextEnvelope (Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey))] - textEnvPossibleBlockIssuers :: [FromSomeType + textEnvPossibleBlockIssuers :: [FromSomeType HasTextEnvelope (Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey))] -textEnvPossibleBlockIssuers = +textEnvPossibleBlockIssuers = [ AsType (SigningKey StakePoolKey) -> (SigningKey StakePoolKey -> Either @@ -1304,15 +1304,15 @@ Right ] - bech32PossibleBlockIssuers + bech32PossibleBlockIssuers :: [FromSomeType SerialiseAsBech32 (Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey))] - bech32PossibleBlockIssuers :: [FromSomeType + bech32PossibleBlockIssuers :: [FromSomeType SerialiseAsBech32 (Either (SigningKey StakePoolKey) (SigningKey GenesisDelegateExtendedKey))] -bech32PossibleBlockIssuers = +bech32PossibleBlockIssuers = [AsType (SigningKey StakePoolKey) -> (SigningKey StakePoolKey -> Either @@ -1344,12 +1344,12 @@ -> IO (Either (FileError TextEnvelopeError) (VerificationKey StakePoolKey)) -readColdVerificationKeyOrFile ColdVerificationKeyOrFile -coldVerKeyOrFile = +readColdVerificationKeyOrFile ColdVerificationKeyOrFile +coldVerKeyOrFile = case ColdVerificationKeyOrFile -coldVerKeyOrFile of - ColdStakePoolVerificationKey VerificationKey StakePoolKey -vk -> Either (FileError TextEnvelopeError) (VerificationKey StakePoolKey) +coldVerKeyOrFile of + ColdStakePoolVerificationKey VerificationKey StakePoolKey +vk -> Either (FileError TextEnvelopeError) (VerificationKey StakePoolKey) -> IO (Either (FileError TextEnvelopeError) (VerificationKey StakePoolKey)) @@ -1359,9 +1359,9 @@ (FileError TextEnvelopeError) (VerificationKey StakePoolKey) forall a b. b -> Either a b Right VerificationKey StakePoolKey -vk) - ColdGenesisDelegateVerificationKey VerificationKey GenesisDelegateKey -vk -> +vk) + ColdGenesisDelegateVerificationKey VerificationKey GenesisDelegateKey +vk -> Either (FileError TextEnvelopeError) (VerificationKey StakePoolKey) -> IO (Either @@ -1387,9 +1387,9 @@ CastVerificationKeyRole keyroleA keyroleB => VerificationKey keyroleA -> VerificationKey keyroleB castVerificationKey VerificationKey GenesisDelegateKey -vk) - ColdVerificationKeyFile (VerificationKeyFile String -fp) -> +vk) + ColdVerificationKeyFile (VerificationKeyFile String +fp) -> [FromSomeType HasTextEnvelope (VerificationKey StakePoolKey)] -> String -> IO @@ -1429,6 +1429,6 @@ castVerificationKey ] String -fp +fp \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.Pool.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.Pool.html index 577d1eded24..1777461c055 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.Pool.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.Pool.html @@ -30,7 +30,7 @@ | ShelleyPoolCmdReadKeyFileError !(FileError InputDecodeError) | ShelleyPoolCmdWriteFileError !(FileError ()) | ShelleyPoolCmdMetadataValidationError !StakePoolMetadataValidationError - deriving Int -> ShelleyPoolCmdError -> ShowS + deriving Int -> ShelleyPoolCmdError -> ShowS [ShelleyPoolCmdError] -> ShowS ShelleyPoolCmdError -> String (Int -> ShelleyPoolCmdError -> ShowS) @@ -49,30 +49,30 @@ renderShelleyPoolCmdError :: ShelleyPoolCmdError -> Text renderShelleyPoolCmdError :: ShelleyPoolCmdError -> Text -renderShelleyPoolCmdError ShelleyPoolCmdError -err = +renderShelleyPoolCmdError ShelleyPoolCmdError +err = case ShelleyPoolCmdError -err of - ShelleyPoolCmdReadFileError FileError TextEnvelopeError -fileErr -> String -> Text +err of + ShelleyPoolCmdReadFileError FileError TextEnvelopeError +fileErr -> String -> Text Text.pack (FileError TextEnvelopeError -> String forall e. Error e => e -> String displayError FileError TextEnvelopeError -fileErr) - ShelleyPoolCmdReadKeyFileError FileError InputDecodeError -fileErr -> String -> Text +fileErr) + ShelleyPoolCmdReadKeyFileError FileError InputDecodeError +fileErr -> String -> Text Text.pack (FileError InputDecodeError -> String forall e. Error e => e -> String displayError FileError InputDecodeError -fileErr) - ShelleyPoolCmdWriteFileError FileError () -fileErr -> String -> Text +fileErr) + ShelleyPoolCmdWriteFileError FileError () +fileErr -> String -> Text Text.pack (FileError () -> String forall e. Error e => e -> String displayError FileError () -fileErr) - ShelleyPoolCmdMetadataValidationError StakePoolMetadataValidationError -validationErr -> +fileErr) + ShelleyPoolCmdMetadataValidationError StakePoolMetadataValidationError +validationErr -> Text "Error validating stake pool metadata: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -80,24 +80,24 @@ Text.pack (StakePoolMetadataValidationError -> String forall e. Error e => e -> String displayError StakePoolMetadataValidationError -validationErr) +validationErr) runPoolCmd :: PoolCmd -> ExceptT ShelleyPoolCmdError IO () runPoolCmd :: PoolCmd -> ExceptT ShelleyPoolCmdError IO () -runPoolCmd (PoolRegistrationCert VerificationKeyOrFile StakePoolKey -sPvkey VerificationKeyOrFile VrfKey -vrfVkey Lovelace -pldg Lovelace -pCost Rational -pMrgn VerificationKeyOrFile StakeKey -rwdVerFp [VerificationKeyOrFile StakeKey] -ownerVerFps [StakePoolRelay] -relays Maybe StakePoolMetadataReference -mbMetadata NetworkId -network OutputFile -outfp) = +runPoolCmd (PoolRegistrationCert VerificationKeyOrFile StakePoolKey +sPvkey VerificationKeyOrFile VrfKey +vrfVkey Lovelace +pldg Lovelace +pCost Rational +pMrgn VerificationKeyOrFile StakeKey +rwdVerFp [VerificationKeyOrFile StakeKey] +ownerVerFps [StakePoolRelay] +relays Maybe StakePoolMetadataReference +mbMetadata NetworkId +network OutputFile +outfp) = VerificationKeyOrFile StakePoolKey -> VerificationKeyOrFile VrfKey -> Lovelace @@ -111,41 +111,41 @@ -> OutputFile -> ExceptT ShelleyPoolCmdError IO () runStakePoolRegistrationCert VerificationKeyOrFile StakePoolKey -sPvkey VerificationKeyOrFile VrfKey -vrfVkey Lovelace -pldg Lovelace -pCost Rational -pMrgn VerificationKeyOrFile StakeKey -rwdVerFp [VerificationKeyOrFile StakeKey] -ownerVerFps [StakePoolRelay] -relays Maybe StakePoolMetadataReference -mbMetadata NetworkId -network OutputFile -outfp -runPoolCmd (PoolRetirementCert VerificationKeyOrFile StakePoolKey -sPvkeyFp EpochNo -retireEpoch OutputFile -outfp) = +sPvkey VerificationKeyOrFile VrfKey +vrfVkey Lovelace +pldg Lovelace +pCost Rational +pMrgn VerificationKeyOrFile StakeKey +rwdVerFp [VerificationKeyOrFile StakeKey] +ownerVerFps [StakePoolRelay] +relays Maybe StakePoolMetadataReference +mbMetadata NetworkId +network OutputFile +outfp +runPoolCmd (PoolRetirementCert VerificationKeyOrFile StakePoolKey +sPvkeyFp EpochNo +retireEpoch OutputFile +outfp) = VerificationKeyOrFile StakePoolKey -> EpochNo -> OutputFile -> ExceptT ShelleyPoolCmdError IO () runStakePoolRetirementCert VerificationKeyOrFile StakePoolKey -sPvkeyFp EpochNo -retireEpoch OutputFile -outfp -runPoolCmd (PoolGetId VerificationKeyOrFile StakePoolKey -sPvkey OutputFormat -outputFormat) = VerificationKeyOrFile StakePoolKey +sPvkeyFp EpochNo +retireEpoch OutputFile +outfp +runPoolCmd (PoolGetId VerificationKeyOrFile StakePoolKey +sPvkey OutputFormat +outputFormat) = VerificationKeyOrFile StakePoolKey -> OutputFormat -> ExceptT ShelleyPoolCmdError IO () runPoolId VerificationKeyOrFile StakePoolKey -sPvkey OutputFormat -outputFormat -runPoolCmd (PoolMetadataHash PoolMetadataFile -poolMdFile Maybe OutputFile -mOutFile) = PoolMetadataFile +sPvkey OutputFormat +outputFormat +runPoolCmd (PoolMetadataHash PoolMetadataFile +poolMdFile Maybe OutputFile +mOutFile) = PoolMetadataFile -> Maybe OutputFile -> ExceptT ShelleyPoolCmdError IO () runPoolMetadataHash PoolMetadataFile -poolMdFile Maybe OutputFile -mOutFile +poolMdFile Maybe OutputFile +mOutFile -- @@ -190,31 +190,31 @@ -> OutputFile -> ExceptT ShelleyPoolCmdError IO () runStakePoolRegistrationCert - VerificationKeyOrFile StakePoolKey -stakePoolVerKeyOrFile - VerificationKeyOrFile VrfKey -vrfVerKeyOrFile - Lovelace -pldg - Lovelace -pCost - Rational -pMrgn - VerificationKeyOrFile StakeKey -rwdStakeVerKeyOrFile - [VerificationKeyOrFile StakeKey] -ownerStakeVerKeyOrFiles - [StakePoolRelay] -relays - Maybe StakePoolMetadataReference -mbMetadata - NetworkId -network - (OutputFile String -outfp) = do + VerificationKeyOrFile StakePoolKey +stakePoolVerKeyOrFile + VerificationKeyOrFile VrfKey +vrfVerKeyOrFile + Lovelace +pldg + Lovelace +pCost + Rational +pMrgn + VerificationKeyOrFile StakeKey +rwdStakeVerKeyOrFile + [VerificationKeyOrFile StakeKey] +ownerStakeVerKeyOrFiles + [StakePoolRelay] +relays + Maybe StakePoolMetadataReference +mbMetadata + NetworkId +network + (OutputFile String +outfp) = do -- Pool verification key - VerificationKey StakePoolKey -stakePoolVerKey <- (FileError InputDecodeError -> ShelleyPoolCmdError) + VerificationKey StakePoolKey +stakePoolVerKey <- (FileError InputDecodeError -> ShelleyPoolCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey StakePoolKey) -> ExceptT ShelleyPoolCmdError IO (VerificationKey StakePoolKey) @@ -268,18 +268,18 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType StakePoolKey AsStakePoolKey VerificationKeyOrFile StakePoolKey -stakePoolVerKeyOrFile - let stakePoolId' :: Hash StakePoolKey -stakePoolId' = VerificationKey StakePoolKey -> Hash StakePoolKey +stakePoolVerKeyOrFile + let stakePoolId' :: Hash StakePoolKey +stakePoolId' = VerificationKey StakePoolKey -> Hash StakePoolKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakePoolKey -stakePoolVerKey +stakePoolVerKey -- VRF verification key - VerificationKey VrfKey -vrfVerKey <- (FileError InputDecodeError -> ShelleyPoolCmdError) + VerificationKey VrfKey +vrfVerKey <- (FileError InputDecodeError -> ShelleyPoolCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey VrfKey) -> ExceptT ShelleyPoolCmdError IO (VerificationKey VrfKey) forall (m :: * -> *) x y a. @@ -322,18 +322,18 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType VrfKey AsVrfKey VerificationKeyOrFile VrfKey -vrfVerKeyOrFile - let vrfKeyHash' :: Hash VrfKey -vrfKeyHash' = VerificationKey VrfKey -> Hash VrfKey +vrfVerKeyOrFile + let vrfKeyHash' :: Hash VrfKey +vrfKeyHash' = VerificationKey VrfKey -> Hash VrfKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey VrfKey -vrfVerKey +vrfVerKey -- Pool reward account - VerificationKey StakeKey -rwdStakeVerKey <- (FileError InputDecodeError -> ShelleyPoolCmdError) + VerificationKey StakeKey +rwdStakeVerKey <- (FileError InputDecodeError -> ShelleyPoolCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey StakeKey) -> ExceptT ShelleyPoolCmdError IO (VerificationKey StakeKey) @@ -379,24 +379,24 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType StakeKey AsStakeKey VerificationKeyOrFile StakeKey -rwdStakeVerKeyOrFile - let stakeCred :: StakeCredential -stakeCred = Hash StakeKey -> StakeCredential +rwdStakeVerKeyOrFile + let stakeCred :: StakeCredential +stakeCred = Hash StakeKey -> StakeCredential StakeCredentialByKey (VerificationKey StakeKey -> Hash StakeKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakeKey -rwdStakeVerKey) - rewardAccountAddr :: StakeAddress -rewardAccountAddr = NetworkId -> StakeCredential -> StakeAddress +rwdStakeVerKey) + rewardAccountAddr :: StakeAddress +rewardAccountAddr = NetworkId -> StakeCredential -> StakeAddress makeStakeAddress NetworkId -network StakeCredential -stakeCred +network StakeCredential +stakeCred -- Pool owner(s) - [VerificationKey StakeKey] -sPoolOwnerVkeys <- + [VerificationKey StakeKey] +sPoolOwnerVkeys <- (VerificationKeyOrFile StakeKey -> ExceptT ShelleyPoolCmdError IO (VerificationKey StakeKey)) -> [VerificationKeyOrFile StakeKey] @@ -457,9 +457,9 @@ AsStakeKey ) [VerificationKeyOrFile StakeKey] -ownerStakeVerKeyOrFiles - let stakePoolOwners' :: [Hash StakeKey] -stakePoolOwners' = (VerificationKey StakeKey -> Hash StakeKey) +ownerStakeVerKeyOrFiles + let stakePoolOwners' :: [Hash StakeKey] +stakePoolOwners' = (VerificationKey StakeKey -> Hash StakeKey) -> [VerificationKey StakeKey] -> [Hash StakeKey] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map VerificationKey StakeKey -> Hash StakeKey @@ -467,10 +467,10 @@ Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash [VerificationKey StakeKey] -sPoolOwnerVkeys +sPoolOwnerVkeys - let stakePoolParams :: StakePoolParameters -stakePoolParams = + let stakePoolParams :: StakePoolParameters +stakePoolParams = StakePoolParameters :: Hash StakePoolKey -> Hash VrfKey -> Lovelace @@ -484,37 +484,37 @@ StakePoolParameters { stakePoolId :: Hash StakePoolKey stakePoolId = Hash StakePoolKey -stakePoolId' +stakePoolId' , stakePoolVRF :: Hash VrfKey stakePoolVRF = Hash VrfKey -vrfKeyHash' +vrfKeyHash' , stakePoolCost :: Lovelace stakePoolCost = Lovelace -pCost +pCost , stakePoolMargin :: Rational stakePoolMargin = Rational -pMrgn +pMrgn , stakePoolRewardAccount :: StakeAddress stakePoolRewardAccount = StakeAddress -rewardAccountAddr +rewardAccountAddr , stakePoolPledge :: Lovelace stakePoolPledge = Lovelace -pldg +pldg , stakePoolOwners :: [Hash StakeKey] stakePoolOwners = [Hash StakeKey] -stakePoolOwners' +stakePoolOwners' , stakePoolRelays :: [StakePoolRelay] stakePoolRelays = [StakePoolRelay] -relays +relays , stakePoolMetadata :: Maybe StakePoolMetadataReference stakePoolMetadata = Maybe StakePoolMetadataReference -mbMetadata +mbMetadata } - let registrationCert :: Certificate -registrationCert = StakePoolParameters -> Certificate + let registrationCert :: Certificate +registrationCert = StakePoolParameters -> Certificate makeStakePoolRegistrationCertificate StakePoolParameters -stakePoolParams +stakePoolParams (FileError () -> ShelleyPoolCmdError) -> ExceptT (FileError ()) IO () @@ -548,15 +548,15 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -outfp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +outfp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -registrationCertDesc) Certificate -registrationCert +registrationCertDesc) Certificate +registrationCert where - registrationCertDesc :: TextEnvelopeDescr - registrationCertDesc :: TextEnvelopeDescr -registrationCertDesc = TextEnvelopeDescr + registrationCertDesc :: TextEnvelopeDescr + registrationCertDesc :: TextEnvelopeDescr +registrationCertDesc = TextEnvelopeDescr "Stake Pool Registration Certificate" runStakePoolRetirementCert @@ -566,13 +566,13 @@ -> ExceptT ShelleyPoolCmdError IO () runStakePoolRetirementCert :: VerificationKeyOrFile StakePoolKey -> EpochNo -> OutputFile -> ExceptT ShelleyPoolCmdError IO () -runStakePoolRetirementCert VerificationKeyOrFile StakePoolKey -stakePoolVerKeyOrFile EpochNo -retireEpoch (OutputFile String -outfp) = do +runStakePoolRetirementCert VerificationKeyOrFile StakePoolKey +stakePoolVerKeyOrFile EpochNo +retireEpoch (OutputFile String +outfp) = do -- Pool verification key - VerificationKey StakePoolKey -stakePoolVerKey <- (FileError InputDecodeError -> ShelleyPoolCmdError) + VerificationKey StakePoolKey +stakePoolVerKey <- (FileError InputDecodeError -> ShelleyPoolCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey StakePoolKey) -> ExceptT ShelleyPoolCmdError IO (VerificationKey StakePoolKey) @@ -626,20 +626,20 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType StakePoolKey AsStakePoolKey VerificationKeyOrFile StakePoolKey -stakePoolVerKeyOrFile +stakePoolVerKeyOrFile - let stakePoolId' :: Hash StakePoolKey -stakePoolId' = VerificationKey StakePoolKey -> Hash StakePoolKey + let stakePoolId' :: Hash StakePoolKey +stakePoolId' = VerificationKey StakePoolKey -> Hash StakePoolKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakePoolKey -stakePoolVerKey - retireCert :: Certificate -retireCert = Hash StakePoolKey -> EpochNo -> Certificate +stakePoolVerKey + retireCert :: Certificate +retireCert = Hash StakePoolKey -> EpochNo -> Certificate makeStakePoolRetirementCertificate Hash StakePoolKey -stakePoolId' EpochNo -retireEpoch +stakePoolId' EpochNo +retireEpoch (FileError () -> ShelleyPoolCmdError) -> ExceptT (FileError ()) IO () @@ -673,15 +673,15 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -outfp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +outfp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -retireCertDesc) Certificate -retireCert +retireCertDesc) Certificate +retireCert where - retireCertDesc :: TextEnvelopeDescr - retireCertDesc :: TextEnvelopeDescr -retireCertDesc = TextEnvelopeDescr + retireCertDesc :: TextEnvelopeDescr + retireCertDesc :: TextEnvelopeDescr +retireCertDesc = TextEnvelopeDescr "Stake Pool Retirement Certificate" runPoolId @@ -690,11 +690,11 @@ -> ExceptT ShelleyPoolCmdError IO () runPoolId :: VerificationKeyOrFile StakePoolKey -> OutputFormat -> ExceptT ShelleyPoolCmdError IO () -runPoolId VerificationKeyOrFile StakePoolKey -verKeyOrFile OutputFormat -outputFormat = do - VerificationKey StakePoolKey -stakePoolVerKey <- (FileError InputDecodeError -> ShelleyPoolCmdError) +runPoolId VerificationKeyOrFile StakePoolKey +verKeyOrFile OutputFormat +outputFormat = do + VerificationKey StakePoolKey +stakePoolVerKey <- (FileError InputDecodeError -> ShelleyPoolCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey StakePoolKey) -> ExceptT ShelleyPoolCmdError IO (VerificationKey StakePoolKey) @@ -748,7 +748,7 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType StakePoolKey AsStakePoolKey VerificationKeyOrFile StakePoolKey -verKeyOrFile +verKeyOrFile IO () -> ExceptT ShelleyPoolCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyPoolCmdError IO ()) @@ -756,7 +756,7 @@ forall a b. (a -> b) -> a -> b $ case OutputFormat -outputFormat of +outputFormat of OutputFormat OutputFormatHex -> ByteString -> IO () @@ -769,7 +769,7 @@ Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakePoolKey -stakePoolVerKey) +stakePoolVerKey) OutputFormat OutputFormatBech32 -> Text -> IO () @@ -782,16 +782,16 @@ Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakePoolKey -stakePoolVerKey) +stakePoolVerKey) runPoolMetadataHash :: PoolMetadataFile -> Maybe OutputFile -> ExceptT ShelleyPoolCmdError IO () runPoolMetadataHash :: PoolMetadataFile -> Maybe OutputFile -> ExceptT ShelleyPoolCmdError IO () -runPoolMetadataHash (PoolMetadataFile String -poolMDPath) Maybe OutputFile -mOutFile = do - ByteString -metadataBytes <- (IOException -> ShelleyPoolCmdError) +runPoolMetadataHash (PoolMetadataFile String +poolMDPath) Maybe OutputFile +mOutFile = do + ByteString +metadataBytes <- (IOException -> ShelleyPoolCmdError) -> IO ByteString -> ExceptT ShelleyPoolCmdError IO ByteString forall (m :: * -> *) x a. MonadIO m => @@ -807,16 +807,16 @@ . String -> IOException -> FileError TextEnvelopeError forall e. String -> IOException -> FileError e FileIOError String -poolMDPath) (IO ByteString -> ExceptT ShelleyPoolCmdError IO ByteString) +poolMDPath) (IO ByteString -> ExceptT ShelleyPoolCmdError IO ByteString) -> IO ByteString -> ExceptT ShelleyPoolCmdError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -poolMDPath - (StakePoolMetadata -_metadata, Hash StakePoolMetadata -metadataHash) <- +poolMDPath + (StakePoolMetadata +_metadata, Hash StakePoolMetadata +metadataHash) <- (StakePoolMetadataValidationError -> ShelleyPoolCmdError) -> ExceptT StakePoolMetadataValidationError @@ -875,9 +875,9 @@ StakePoolMetadataValidationError (StakePoolMetadata, Hash StakePoolMetadata) validateAndHashStakePoolMetadata ByteString -metadataBytes +metadataBytes case Maybe OutputFile -mOutFile of +mOutFile of Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyPoolCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -888,9 +888,9 @@ BS.putStrLn (Hash StakePoolMetadata -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytesHex Hash StakePoolMetadata -metadataHash) - Just (OutputFile String -fpath) -> +metadataHash) + Just (OutputFile String +fpath) -> (IOException -> ShelleyPoolCmdError) -> IO () -> ExceptT ShelleyPoolCmdError IO () forall (m :: * -> *) x a. @@ -907,14 +907,14 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) +fpath) (IO () -> ExceptT ShelleyPoolCmdError IO ()) -> IO () -> ExceptT ShelleyPoolCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () BS.writeFile String -fpath (Hash StakePoolMetadata -> ByteString +fpath (Hash StakePoolMetadata -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytesHex Hash StakePoolMetadata -metadataHash) +metadataHash) \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.Query.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.Query.html index 35041769999..65ae19b75ce 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.Query.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.Query.html @@ -82,7 +82,7 @@ | ShelleyQueryCmdEraMismatch !EraMismatch | ShelleyQueryCmdUnsupportedMode !AnyConsensusMode | ShelleyQueryCmdPastHorizon !Qry.PastHorizonException - deriving Int -> ShelleyQueryCmdError -> ShowS + deriving Int -> ShelleyQueryCmdError -> ShowS [ShelleyQueryCmdError] -> ShowS ShelleyQueryCmdError -> String (Int -> ShelleyQueryCmdError -> ShowS) @@ -101,57 +101,57 @@ renderShelleyQueryCmdError :: ShelleyQueryCmdError -> Text renderShelleyQueryCmdError :: ShelleyQueryCmdError -> Text -renderShelleyQueryCmdError ShelleyQueryCmdError -err = +renderShelleyQueryCmdError ShelleyQueryCmdError +err = case ShelleyQueryCmdError -err of - ShelleyQueryCmdEnvVarSocketErr EnvSocketError -envSockErr -> EnvSocketError -> Text +err of + ShelleyQueryCmdEnvVarSocketErr EnvSocketError +envSockErr -> EnvSocketError -> Text renderEnvSocketError EnvSocketError -envSockErr - ShelleyQueryCmdLocalStateQueryError ShelleyQueryCmdLocalStateQueryError -lsqErr -> ShelleyQueryCmdLocalStateQueryError -> Text +envSockErr + ShelleyQueryCmdLocalStateQueryError ShelleyQueryCmdLocalStateQueryError +lsqErr -> ShelleyQueryCmdLocalStateQueryError -> Text renderLocalStateQueryError ShelleyQueryCmdLocalStateQueryError -lsqErr - ShelleyQueryCmdWriteFileError FileError () -fileErr -> String -> Text +lsqErr + ShelleyQueryCmdWriteFileError FileError () +fileErr -> String -> Text Text.pack (FileError () -> String forall e. Error e => e -> String displayError FileError () -fileErr) - ShelleyQueryCmdHelpersError HelpersError -helpersErr -> HelpersError -> Text +fileErr) + ShelleyQueryCmdHelpersError HelpersError +helpersErr -> HelpersError -> Text renderHelpersError HelpersError -helpersErr - ShelleyQueryCmdAcquireFailure AcquireFailure -aqFail -> String -> Text +helpersErr + ShelleyQueryCmdAcquireFailure AcquireFailure +aqFail -> String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b $ AcquireFailure -> String forall a b. (Show a, ConvertText String b) => a -> b show AcquireFailure -aqFail +aqFail ShelleyQueryCmdError ShelleyQueryCmdByronEra -> Text "This query cannot be used for the Byron era" - ShelleyQueryCmdPoolIdError Hash StakePoolKey -poolId -> Text + ShelleyQueryCmdPoolIdError Hash StakePoolKey +poolId -> Text "The pool id does not exist: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Hash StakePoolKey -> Text forall a b. (Show a, ConvertText String b) => a -> b show Hash StakePoolKey -poolId - ShelleyQueryCmdEraConsensusModeMismatch (AnyConsensusMode ConsensusMode mode -cMode) (AnyCardanoEra CardanoEra era -era) -> +poolId + ShelleyQueryCmdEraConsensusModeMismatch (AnyConsensusMode ConsensusMode mode +cMode) (AnyCardanoEra CardanoEra era +era) -> Text "Consensus mode and era mismatch. Consensus mode: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> ConsensusMode mode -> Text forall a b. (Show a, ConvertText String b) => a -> b show ConsensusMode mode -cMode Text -> Text -> Text +cMode Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -160,10 +160,10 @@ <> CardanoEra era -> Text forall a b. (Show a, ConvertText String b) => a -> b show CardanoEra era -era - ShelleyQueryCmdEraMismatch (EraMismatch Text -ledgerEra Text -queryEra) -> +era + ShelleyQueryCmdEraMismatch (EraMismatch Text +ledgerEra Text +queryEra) -> Text "\nAn error mismatch occured." Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -171,150 +171,150 @@ "\nSpecified query era: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -queryEra Text -> Text -> Text +queryEra Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text "\nCurrent ledger era: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -ledgerEra - ShelleyQueryCmdUnsupportedMode AnyConsensusMode -mode -> Text +ledgerEra + ShelleyQueryCmdUnsupportedMode AnyConsensusMode +mode -> Text "Unsupported mode: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> AnyConsensusMode -> Text renderMode AnyConsensusMode -mode - ShelleyQueryCmdPastHorizon PastHorizonException -e -> Text +mode + ShelleyQueryCmdPastHorizon PastHorizonException +e -> Text "Past horizon: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> PastHorizonException -> Text forall a b. (Show a, ConvertText String b) => a -> b show PastHorizonException -e +e runQueryCmd :: QueryCmd -> ExceptT ShelleyQueryCmdError IO () runQueryCmd :: QueryCmd -> ExceptT ShelleyQueryCmdError IO () -runQueryCmd QueryCmd -cmd = +runQueryCmd QueryCmd +cmd = case QueryCmd -cmd of - QueryProtocolParameters' AnyConsensusModeParams -consensusModeParams NetworkId -network Maybe OutputFile -mOutFile -> +cmd of + QueryProtocolParameters' AnyConsensusModeParams +consensusModeParams NetworkId +network Maybe OutputFile +mOutFile -> AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () runQueryProtocolParameters AnyConsensusModeParams -consensusModeParams NetworkId -network Maybe OutputFile -mOutFile - QueryTip AnyConsensusModeParams -consensusModeParams NetworkId -network Maybe OutputFile -mOutFile -> +consensusModeParams NetworkId +network Maybe OutputFile +mOutFile + QueryTip AnyConsensusModeParams +consensusModeParams NetworkId +network Maybe OutputFile +mOutFile -> AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () runQueryTip AnyConsensusModeParams -consensusModeParams NetworkId -network Maybe OutputFile -mOutFile - QueryStakeDistribution' AnyConsensusModeParams -consensusModeParams NetworkId -network Maybe OutputFile -mOutFile -> +consensusModeParams NetworkId +network Maybe OutputFile +mOutFile + QueryStakeDistribution' AnyConsensusModeParams +consensusModeParams NetworkId +network Maybe OutputFile +mOutFile -> AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () runQueryStakeDistribution AnyConsensusModeParams -consensusModeParams NetworkId -network Maybe OutputFile -mOutFile - QueryStakeAddressInfo AnyConsensusModeParams -consensusModeParams StakeAddress -addr NetworkId -network Maybe OutputFile -mOutFile -> +consensusModeParams NetworkId +network Maybe OutputFile +mOutFile + QueryStakeAddressInfo AnyConsensusModeParams +consensusModeParams StakeAddress +addr NetworkId +network Maybe OutputFile +mOutFile -> AnyConsensusModeParams -> StakeAddress -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () runQueryStakeAddressInfo AnyConsensusModeParams -consensusModeParams StakeAddress -addr NetworkId -network Maybe OutputFile -mOutFile - QueryDebugLedgerState' AnyConsensusModeParams -consensusModeParams NetworkId -network Maybe OutputFile -mOutFile -> +consensusModeParams StakeAddress +addr NetworkId +network Maybe OutputFile +mOutFile + QueryDebugLedgerState' AnyConsensusModeParams +consensusModeParams NetworkId +network Maybe OutputFile +mOutFile -> AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () runQueryLedgerState AnyConsensusModeParams -consensusModeParams NetworkId -network Maybe OutputFile -mOutFile - QueryStakeSnapshot' AnyConsensusModeParams -consensusModeParams NetworkId -network Hash StakePoolKey -poolid -> +consensusModeParams NetworkId +network Maybe OutputFile +mOutFile + QueryStakeSnapshot' AnyConsensusModeParams +consensusModeParams NetworkId +network Hash StakePoolKey +poolid -> AnyConsensusModeParams -> NetworkId -> Hash StakePoolKey -> ExceptT ShelleyQueryCmdError IO () runQueryStakeSnapshot AnyConsensusModeParams -consensusModeParams NetworkId -network Hash StakePoolKey -poolid - QueryPoolParams' AnyConsensusModeParams -consensusModeParams NetworkId -network Hash StakePoolKey -poolid -> +consensusModeParams NetworkId +network Hash StakePoolKey +poolid + QueryPoolParams' AnyConsensusModeParams +consensusModeParams NetworkId +network Hash StakePoolKey +poolid -> AnyConsensusModeParams -> NetworkId -> Hash StakePoolKey -> ExceptT ShelleyQueryCmdError IO () runQueryPoolParams AnyConsensusModeParams -consensusModeParams NetworkId -network Hash StakePoolKey -poolid - QueryProtocolState' AnyConsensusModeParams -consensusModeParams NetworkId -network Maybe OutputFile -mOutFile -> +consensusModeParams NetworkId +network Hash StakePoolKey +poolid + QueryProtocolState' AnyConsensusModeParams +consensusModeParams NetworkId +network Maybe OutputFile +mOutFile -> AnyConsensusModeParams -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () runQueryProtocolState AnyConsensusModeParams -consensusModeParams NetworkId -network Maybe OutputFile -mOutFile - QueryUTxO' AnyConsensusModeParams -consensusModeParams QueryFilter -qFilter NetworkId -networkId Maybe OutputFile -mOutFile -> +consensusModeParams NetworkId +network Maybe OutputFile +mOutFile + QueryUTxO' AnyConsensusModeParams +consensusModeParams QueryFilter +qFilter NetworkId +networkId Maybe OutputFile +mOutFile -> AnyConsensusModeParams -> QueryFilter -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () runQueryUTxO AnyConsensusModeParams -consensusModeParams QueryFilter -qFilter NetworkId -networkId Maybe OutputFile -mOutFile +consensusModeParams QueryFilter +qFilter NetworkId +networkId Maybe OutputFile +mOutFile runQueryProtocolParameters :: AnyConsensusModeParams @@ -325,12 +325,12 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () -runQueryProtocolParameters (AnyConsensusModeParams ConsensusModeParams mode -cModeParams) NetworkId -network Maybe OutputFile -mOutFile = do - SocketPath String -sockPath <- (EnvSocketError -> ShelleyQueryCmdError) +runQueryProtocolParameters (AnyConsensusModeParams ConsensusModeParams mode +cModeParams) NetworkId +network Maybe OutputFile +mOutFile = do + SocketPath String +sockPath <- (EnvSocketError -> ShelleyQueryCmdError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ShelleyQueryCmdError IO SocketPath forall (m :: * -> *) x y a. @@ -340,20 +340,20 @@ ShelleyQueryCmdEnvVarSocketErr ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let localNodeConnInfo :: LocalNodeConnectInfo mode -localNodeConnInfo = ConsensusModeParams mode + let localNodeConnInfo :: LocalNodeConnectInfo mode +localNodeConnInfo = ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo ConsensusModeParams mode -cModeParams NetworkId -network String -sockPath +cModeParams NetworkId +network String +sockPath - anyE :: AnyCardanoEra -anyE@(AnyCardanoEra CardanoEra era -era) <- ConsensusModeParams mode + anyE :: AnyCardanoEra +anyE@(AnyCardanoEra CardanoEra era +era) <- ConsensusModeParams mode -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall mode. @@ -361,15 +361,15 @@ -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra determineEra ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo - let cMode :: ConsensusMode mode -cMode = ConsensusModeParams mode -> ConsensusMode mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo + let cMode :: ConsensusMode mode +cMode = ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams - ShelleyBasedEra era -sbe <- CardanoEraStyle era +cModeParams + ShelleyBasedEra era +sbe <- CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) forall era. CardanoEraStyle era @@ -382,18 +382,18 @@ $ CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era +era case CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) forall era mode. CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era -era ConsensusMode mode -cMode of - Just EraInMode era mode -eInMode -> do - let query :: QueryInMode mode (Either EraMismatch ProtocolParameters) -query = EraInMode era mode +era ConsensusMode mode +cMode of + Just EraInMode era mode +eInMode -> do + let query :: QueryInMode mode (Either EraMismatch ProtocolParameters) +query = EraInMode era mode -> QueryInEra era ProtocolParameters -> QueryInMode mode (Either EraMismatch ProtocolParameters) forall era mode result1. @@ -401,7 +401,7 @@ -> QueryInEra era result1 -> QueryInMode mode (Either EraMismatch result1) QueryInEra EraInMode era mode -eInMode +eInMode (QueryInEra era ProtocolParameters -> QueryInMode mode (Either EraMismatch ProtocolParameters)) -> QueryInEra era ProtocolParameters @@ -414,11 +414,11 @@ ShelleyBasedEra era -> QueryInShelleyBasedEra era result -> QueryInEra era result QueryInShelleyBasedEra ShelleyBasedEra era -sbe QueryInShelleyBasedEra era ProtocolParameters +sbe QueryInShelleyBasedEra era ProtocolParameters forall era. QueryInShelleyBasedEra era ProtocolParameters QueryProtocolParameters - ProtocolParameters -result <- CardanoEra era + ProtocolParameters +result <- CardanoEra era -> ConsensusModeParams mode -> LocalNodeConnectInfo mode -> QueryInMode mode (Either EraMismatch ProtocolParameters) @@ -431,18 +431,18 @@ -> ExceptT ShelleyQueryCmdError IO result executeQuery CardanoEra era -era +era ConsensusModeParams mode -cModeParams +cModeParams LocalNodeConnectInfo mode -localNodeConnInfo +localNodeConnInfo QueryInMode mode (Either EraMismatch ProtocolParameters) -query +query Maybe OutputFile -> ProtocolParameters -> ExceptT ShelleyQueryCmdError IO () -writeProtocolParameters Maybe OutputFile -mOutFile ProtocolParameters -result +writeProtocolParameters Maybe OutputFile +mOutFile ProtocolParameters +result Maybe (EraInMode era mode) Nothing -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -453,20 +453,20 @@ ShelleyQueryCmdEraConsensusModeMismatch (ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode ConsensusMode mode -cMode) AnyCardanoEra -anyE +cMode) AnyCardanoEra +anyE where - writeProtocolParameters + writeProtocolParameters :: Maybe OutputFile -> ProtocolParameters -> ExceptT ShelleyQueryCmdError IO () - writeProtocolParameters :: Maybe OutputFile + writeProtocolParameters :: Maybe OutputFile -> ProtocolParameters -> ExceptT ShelleyQueryCmdError IO () -writeProtocolParameters Maybe OutputFile -mOutFile' ProtocolParameters -pparams = +writeProtocolParameters Maybe OutputFile +mOutFile' ProtocolParameters +pparams = case Maybe OutputFile -mOutFile' of +mOutFile' of Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -477,9 +477,9 @@ LBS.putStrLn (ProtocolParameters -> ByteString forall a. ToJSON a => a -> ByteString encodePretty ProtocolParameters -pparams) - Just (OutputFile String -fpath) -> +pparams) + Just (OutputFile String +fpath) -> (IOException -> ShelleyQueryCmdError) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. @@ -496,24 +496,24 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) (IO () -> ExceptT ShelleyQueryCmdError IO ()) +fpath) (IO () -> ExceptT ShelleyQueryCmdError IO ()) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -fpath (ProtocolParameters -> ByteString +fpath (ProtocolParameters -> ByteString forall a. ToJSON a => a -> ByteString encodePretty ProtocolParameters -pparams) +pparams) -logExceptContinue :: MonadIO m => (e -> Text) -> ExceptT e m a -> ExceptT e m (Maybe a) +logExceptContinue :: MonadIO m => (e -> Text) -> ExceptT e m a -> ExceptT e m (Maybe a) logExceptContinue :: (e -> Text) -> ExceptT e m a -> ExceptT e m (Maybe a) -logExceptContinue e -> Text -renderError ExceptT e m a -f = do - Either e a -r <- m (Either e a) -> ExceptT e m (Either e a) +logExceptContinue e -> Text +renderError ExceptT e m a +f = do + Either e a +r <- m (Either e a) -> ExceptT e m (Either e a) forall (t :: (* -> *) -> * -> *) (m :: * -> *) a. (MonadTrans t, Monad m) => m a -> t m a @@ -523,11 +523,11 @@ $ ExceptT e m a -> m (Either e a) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) runExceptT ExceptT e m a -f +f case Either e a -r of - Left e -e -> do +r of + Left e +e -> do IO () -> ExceptT e m () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT e m ()) -> IO () -> ExceptT e m () @@ -535,20 +535,20 @@ $ Handle -> Text -> IO () T.hPutStrLn Handle IO.stderr (e -> Text -renderError e -e) +renderError e +e) Maybe a -> ExceptT e m (Maybe a) forall (m :: * -> *) a. Monad m => a -> m a return Maybe a forall a. Maybe a Nothing - Right a -a -> Maybe a -> ExceptT e m (Maybe a) + Right a +a -> Maybe a -> ExceptT e m (Maybe a) forall (m :: * -> *) a. Monad m => a -> m a return (a -> Maybe a forall a. a -> Maybe a Just a -a) +a) runQueryTip :: AnyConsensusModeParams @@ -559,12 +559,12 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () -runQueryTip (AnyConsensusModeParams ConsensusModeParams mode -cModeParams) NetworkId -network Maybe OutputFile -mOutFile = do - SocketPath String -sockPath <- (EnvSocketError -> ShelleyQueryCmdError) +runQueryTip (AnyConsensusModeParams ConsensusModeParams mode +cModeParams) NetworkId +network Maybe OutputFile +mOutFile = do + SocketPath String +sockPath <- (EnvSocketError -> ShelleyQueryCmdError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ShelleyQueryCmdError IO SocketPath forall (m :: * -> *) x y a. @@ -573,24 +573,24 @@ firstExceptT EnvSocketError -> ShelleyQueryCmdError ShelleyQueryCmdEnvVarSocketErr ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let localNodeConnInfo :: LocalNodeConnectInfo mode -localNodeConnInfo = ConsensusModeParams mode + let localNodeConnInfo :: LocalNodeConnectInfo mode +localNodeConnInfo = ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo ConsensusModeParams mode -cModeParams NetworkId -network String -sockPath - consensusMode :: ConsensusMode mode -consensusMode = ConsensusModeParams mode -> ConsensusMode mode +cModeParams NetworkId +network String +sockPath + consensusMode :: ConsensusMode mode +consensusMode = ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams +cModeParams - AnyCardanoEra -anyEra <- ConsensusModeParams mode + AnyCardanoEra +anyEra <- ConsensusModeParams mode -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall mode. @@ -598,10 +598,10 @@ -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra determineEra ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo - ChainTip -tip <- IO ChainTip -> ExceptT ShelleyQueryCmdError IO ChainTip +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo + ChainTip +tip <- IO ChainTip -> ExceptT ShelleyQueryCmdError IO ChainTip forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO ChainTip -> ExceptT ShelleyQueryCmdError IO ChainTip) -> IO ChainTip -> ExceptT ShelleyQueryCmdError IO ChainTip @@ -609,22 +609,22 @@ $ LocalNodeConnectInfo mode -> IO ChainTip forall mode. LocalNodeConnectInfo mode -> IO ChainTip getLocalChainTip LocalNodeConnectInfo mode -localNodeConnInfo +localNodeConnInfo - let tipSlotNo :: SlotNo -tipSlotNo = case ChainTip -tip of + let tipSlotNo :: SlotNo +tipSlotNo = case ChainTip +tip of ChainTip ChainTipAtGenesis -> SlotNo 0 - ChainTip SlotNo -slotNo Hash BlockHeader + ChainTip SlotNo +slotNo Hash BlockHeader _ BlockNo _ -> SlotNo -slotNo +slotNo - Maybe EpochNo -mEpoch <- ConsensusMode mode + Maybe EpochNo +mEpoch <- ConsensusMode mode -> LocalNodeConnectInfo mode -> SlotNo -> ExceptT @@ -635,10 +635,10 @@ -> SlotNo -> ExceptT ShelleyQueryCmdError IO (EpochNo, SlotsInEpoch, SlotsToEpochEnd) -mSlotToEpoch ConsensusMode mode -consensusMode LocalNodeConnectInfo mode -localNodeConnInfo SlotNo -tipSlotNo +mSlotToEpoch ConsensusMode mode +consensusMode LocalNodeConnectInfo mode +localNodeConnInfo SlotNo +tipSlotNo ExceptT ShelleyQueryCmdError IO (EpochNo, SlotsInEpoch, SlotsToEpochEnd) -> (ExceptT @@ -653,7 +653,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap (EpochNo, SlotsInEpoch, SlotsToEpochEnd) -> EpochNo forall a b c. (a, b, c) -> a -tuple3Fst +tuple3Fst ExceptT ShelleyQueryCmdError IO EpochNo -> (ExceptT ShelleyQueryCmdError IO EpochNo -> ExceptT ShelleyQueryCmdError IO (Maybe EpochNo)) @@ -668,8 +668,8 @@ logExceptContinue ShelleyQueryCmdError -> Text renderShelleyQueryCmdError - let output :: ByteString -output = Value -> ByteString + let output :: ByteString +output = Value -> ByteString forall a. ToJSON a => a -> ByteString encodePretty (Value -> ByteString) -> (Value -> Value) -> Value -> ByteString @@ -678,42 +678,42 @@ cat b c -> cat a b -> cat a c . Text -> Maybe Value -> Value -> Value forall a. ToJSON a => Text -> Maybe a -> Value -> Value -toObject Text +toObject Text "era" (Value -> Maybe Value forall a. a -> Maybe a Just (AnyCardanoEra -> Value forall a. ToJSON a => a -> Value toJSON AnyCardanoEra -anyEra)) +anyEra)) (Value -> Value) -> (Value -> Value) -> Value -> Value forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c . Text -> Maybe (Maybe EpochNo) -> Value -> Value forall a. ToJSON a => Text -> Maybe a -> Value -> Value -toObject Text +toObject Text "epoch" (Maybe EpochNo -> Maybe (Maybe EpochNo) forall a. a -> Maybe a Just Maybe EpochNo -mEpoch) +mEpoch) (Value -> ByteString) -> Value -> ByteString forall a b. (a -> b) -> a -> b $ ChainTip -> Value forall a. ToJSON a => a -> Value toJSON ChainTip -tip +tip case Maybe OutputFile -mOutFile of - Just (OutputFile String -fpath) -> IO () -> ExceptT ShelleyQueryCmdError IO () +mOutFile of + Just (OutputFile String +fpath) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyQueryCmdError IO ()) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -fpath ByteString -output +fpath ByteString +output Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -722,43 +722,43 @@ forall a b. (a -> b) -> a -> b $ ByteString -> IO () LBS.putStrLn ByteString -output +output where - tuple3Fst :: (a, b, c) -> a - tuple3Fst :: (a, b, c) -> a -tuple3Fst (a -a, b + tuple3Fst :: (a, b, c) -> a + tuple3Fst :: (a, b, c) -> a +tuple3Fst (a +a, b _, c _) = a -a +a - mSlotToEpoch - :: ConsensusMode mode - -> LocalNodeConnectInfo mode + mSlotToEpoch + :: ConsensusMode mode + -> LocalNodeConnectInfo mode -> SlotNo -> ExceptT ShelleyQueryCmdError IO (EpochNo, SlotsInEpoch, SlotsToEpochEnd) - mSlotToEpoch :: ConsensusMode mode + mSlotToEpoch :: ConsensusMode mode -> LocalNodeConnectInfo mode -> SlotNo -> ExceptT ShelleyQueryCmdError IO (EpochNo, SlotsInEpoch, SlotsToEpochEnd) -mSlotToEpoch ConsensusMode mode -cMode LocalNodeConnectInfo mode -lNodeConnInfo SlotNo -slotNo = case ConsensusMode mode -cMode of +mSlotToEpoch ConsensusMode mode +cMode LocalNodeConnectInfo mode +lNodeConnInfo SlotNo +slotNo = case ConsensusMode mode +cMode of ConsensusMode mode CardanoMode -> do - let epochQuery :: QueryInMode CardanoMode (EraHistory CardanoMode) -epochQuery = ConsensusModeIsMultiEra CardanoMode + let epochQuery :: QueryInMode CardanoMode (EraHistory CardanoMode) +epochQuery = ConsensusModeIsMultiEra CardanoMode -> QueryInMode CardanoMode (EraHistory CardanoMode) forall mode. ConsensusModeIsMultiEra mode -> QueryInMode mode (EraHistory mode) QueryEraHistory ConsensusModeIsMultiEra CardanoMode CardanoModeIsMultiEra - Either AcquireFailure (EraHistory CardanoMode) -eResult <- IO (Either AcquireFailure (EraHistory CardanoMode)) + Either AcquireFailure (EraHistory CardanoMode) +eResult <- IO (Either AcquireFailure (EraHistory CardanoMode)) -> ExceptT ShelleyQueryCmdError IO @@ -785,23 +785,23 @@ -> QueryInMode mode result -> IO (Either AcquireFailure result) queryNodeLocalState LocalNodeConnectInfo mode -lNodeConnInfo Maybe ChainPoint +lNodeConnInfo Maybe ChainPoint forall a. Maybe a Nothing QueryInMode mode (EraHistory CardanoMode) QueryInMode CardanoMode (EraHistory CardanoMode) -epochQuery +epochQuery case Either AcquireFailure (EraHistory CardanoMode) -eResult of - Left AcquireFailure -acqFail -> ShelleyQueryCmdError +eResult of + Left AcquireFailure +acqFail -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO (EpochNo, SlotsInEpoch, SlotsToEpochEnd) forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (AcquireFailure -> ShelleyQueryCmdError ShelleyQueryCmdAcquireFailure AcquireFailure -acqFail) - Right EraHistory CardanoMode -eraHistory -> case SlotNo +acqFail) + Right EraHistory CardanoMode +eraHistory -> case SlotNo -> EraHistory CardanoMode -> Either PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd) @@ -811,26 +811,26 @@ -> Either PastHorizonException (EpochNo, SlotsInEpoch, SlotsToEpochEnd) slotToEpoch SlotNo -slotNo EraHistory CardanoMode -eraHistory of - Left PastHorizonException -e -> ShelleyQueryCmdError +slotNo EraHistory CardanoMode +eraHistory of + Left PastHorizonException +e -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO (EpochNo, SlotsInEpoch, SlotsToEpochEnd) forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a throwE (PastHorizonException -> ShelleyQueryCmdError ShelleyQueryCmdPastHorizon PastHorizonException -e) - Right (EpochNo, SlotsInEpoch, SlotsToEpochEnd) -a -> (EpochNo, SlotsInEpoch, SlotsToEpochEnd) +e) + Right (EpochNo, SlotsInEpoch, SlotsToEpochEnd) +a -> (EpochNo, SlotsInEpoch, SlotsToEpochEnd) -> ExceptT ShelleyQueryCmdError IO (EpochNo, SlotsInEpoch, SlotsToEpochEnd) forall (m :: * -> *) a. Monad m => a -> m a return (EpochNo, SlotsInEpoch, SlotsToEpochEnd) -a +a - ConsensusMode mode -mode -> ShelleyQueryCmdError + ConsensusMode mode +mode -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO (EpochNo, SlotsInEpoch, SlotsToEpochEnd) forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -838,47 +838,47 @@ ShelleyQueryCmdUnsupportedMode (ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode ConsensusMode mode -mode)) +mode)) - toObject :: ToJSON a => Text -> Maybe a -> Aeson.Value -> Aeson.Value - toObject :: Text -> Maybe a -> Value -> Value -toObject Text -name (Just a -a) (Aeson.Object Object -obj) = + toObject :: ToJSON a => Text -> Maybe a -> Aeson.Value -> Aeson.Value + toObject :: Text -> Maybe a -> Value -> Value +toObject Text +name (Just a +a) (Aeson.Object Object +obj) = Object -> Value Aeson.Object (Object -> Value) -> Object -> Value forall a b. (a -> b) -> a -> b $ Object -obj Object -> Object -> Object +obj Object -> Object -> Object forall a. Semigroup a => a -> a -> a <> [(Text, Value)] -> Object forall k v. (Eq k, Hashable k) => [(k, v)] -> HashMap k v HMS.fromList [Text -name Text -> Value -> (Text, Value) +name Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= a -> Value forall a. ToJSON a => a -> Value toJSON a -a] - toObject Text -name Maybe a -Nothing (Aeson.Object Object -obj) = +a] + toObject Text +name Maybe a +Nothing (Aeson.Object Object +obj) = Object -> Value Aeson.Object (Object -> Value) -> Object -> Value forall a b. (a -> b) -> a -> b $ Object -obj Object -> Object -> Object +obj Object -> Object -> Object forall a. Semigroup a => a -> a -> a <> [(Text, Value)] -> Object forall k v. (Eq k, Hashable k) => [(k, v)] -> HashMap k v HMS.fromList [Text -name Text -> Value -> (Text, Value) +name Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value Aeson.Null] - toObject Text + toObject Text _ Maybe a _ Value _ = Value @@ -899,14 +899,14 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () -runQueryUTxO (AnyConsensusModeParams ConsensusModeParams mode -cModeParams) - QueryFilter -qfilter NetworkId -network Maybe OutputFile -mOutFile = do - SocketPath String -sockPath <- (EnvSocketError -> ShelleyQueryCmdError) +runQueryUTxO (AnyConsensusModeParams ConsensusModeParams mode +cModeParams) + QueryFilter +qfilter NetworkId +network Maybe OutputFile +mOutFile = do + SocketPath String +sockPath <- (EnvSocketError -> ShelleyQueryCmdError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ShelleyQueryCmdError IO SocketPath forall (m :: * -> *) x y a. @@ -915,20 +915,20 @@ firstExceptT EnvSocketError -> ShelleyQueryCmdError ShelleyQueryCmdEnvVarSocketErr ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let localNodeConnInfo :: LocalNodeConnectInfo mode -localNodeConnInfo = ConsensusModeParams mode + let localNodeConnInfo :: LocalNodeConnectInfo mode +localNodeConnInfo = ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo ConsensusModeParams mode -cModeParams NetworkId -network String -sockPath +cModeParams NetworkId +network String +sockPath - anyE :: AnyCardanoEra -anyE@(AnyCardanoEra CardanoEra era -era) <- ConsensusModeParams mode + anyE :: AnyCardanoEra +anyE@(AnyCardanoEra CardanoEra era +era) <- ConsensusModeParams mode -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall mode. @@ -936,15 +936,15 @@ -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra determineEra ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo - let cMode :: ConsensusMode mode -cMode = ConsensusModeParams mode -> ConsensusMode mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo + let cMode :: ConsensusMode mode +cMode = ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams - ShelleyBasedEra era -sbe <- CardanoEraStyle era +cModeParams + ShelleyBasedEra era +sbe <- CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) forall era. CardanoEraStyle era @@ -957,18 +957,18 @@ $ CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era +era case CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) forall era mode. CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era -era ConsensusMode mode -cMode of - Just EraInMode era mode -eInMode -> do - QueryInMode mode (Either EraMismatch (UTxO era)) -qInMode <- ShelleyBasedEra era +era ConsensusMode mode +cMode of + Just EraInMode era mode +eInMode -> do + QueryInMode mode (Either EraMismatch (UTxO era)) +qInMode <- ShelleyBasedEra era -> EraInMode era mode -> ExceptT ShelleyQueryCmdError @@ -981,11 +981,11 @@ ShelleyQueryCmdError IO (QueryInMode mode (Either EraMismatch (UTxO era))) -createQuery ShelleyBasedEra era -sbe EraInMode era mode -eInMode - UTxO era -result <- CardanoEra era +createQuery ShelleyBasedEra era +sbe EraInMode era mode +eInMode + UTxO era +result <- CardanoEra era -> ConsensusModeParams mode -> LocalNodeConnectInfo mode -> QueryInMode mode (Either EraMismatch (UTxO era)) @@ -998,13 +998,13 @@ -> ExceptT ShelleyQueryCmdError IO result executeQuery CardanoEra era -era +era ConsensusModeParams mode -cModeParams +cModeParams LocalNodeConnectInfo mode -localNodeConnInfo +localNodeConnInfo QueryInMode mode (Either EraMismatch (UTxO era)) -qInMode +qInMode ShelleyBasedEra era -> Maybe OutputFile -> UTxO era @@ -1015,9 +1015,9 @@ -> UTxO era -> ExceptT ShelleyQueryCmdError IO () writeFilteredUTxOs ShelleyBasedEra era -sbe Maybe OutputFile -mOutFile UTxO era -result +sbe Maybe OutputFile +mOutFile UTxO era +result Maybe (EraInMode era mode) Nothing -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -1028,35 +1028,35 @@ ShelleyQueryCmdEraConsensusModeMismatch (ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode ConsensusMode mode -cMode) AnyCardanoEra -anyE +cMode) AnyCardanoEra +anyE where - createQuery - :: ShelleyBasedEra era - -> EraInMode era mode - -> ExceptT ShelleyQueryCmdError IO (QueryInMode mode (Either EraMismatch (UTxO era))) - createQuery :: ShelleyBasedEra era + createQuery + :: ShelleyBasedEra era + -> EraInMode era mode + -> ExceptT ShelleyQueryCmdError IO (QueryInMode mode (Either EraMismatch (UTxO era))) + createQuery :: ShelleyBasedEra era -> EraInMode era mode -> ExceptT ShelleyQueryCmdError IO (QueryInMode mode (Either EraMismatch (UTxO era))) -createQuery ShelleyBasedEra era -sbe EraInMode era mode -e = do - let mFilter :: Maybe (Set AddressAny) -mFilter = QueryFilter -> Maybe (Set AddressAny) -maybeFiltered QueryFilter -qfilter - query :: QueryInEra era (UTxO era) -query = ShelleyBasedEra era +createQuery ShelleyBasedEra era +sbe EraInMode era mode +e = do + let mFilter :: Maybe (Set AddressAny) +mFilter = QueryFilter -> Maybe (Set AddressAny) +maybeFiltered QueryFilter +qfilter + query :: QueryInEra era (UTxO era) +query = ShelleyBasedEra era -> QueryInShelleyBasedEra era (UTxO era) -> QueryInEra era (UTxO era) forall era result. ShelleyBasedEra era -> QueryInShelleyBasedEra era result -> QueryInEra era result QueryInShelleyBasedEra ShelleyBasedEra era -sbe (QueryInShelleyBasedEra era (UTxO era) +sbe (QueryInShelleyBasedEra era (UTxO era) -> QueryInEra era (UTxO era)) -> QueryInShelleyBasedEra era (UTxO era) -> QueryInEra era (UTxO era) @@ -1065,7 +1065,7 @@ forall era. Maybe (Set AddressAny) -> QueryInShelleyBasedEra era (UTxO era) QueryUTxO Maybe (Set AddressAny) -mFilter +mFilter QueryInMode mode (Either EraMismatch (UTxO era)) -> ExceptT ShelleyQueryCmdError @@ -1091,17 +1091,17 @@ -> QueryInEra era result1 -> QueryInMode mode (Either EraMismatch result1) QueryInEra EraInMode era mode -e QueryInEra era (UTxO era) -query +e QueryInEra era (UTxO era) +query - maybeFiltered :: QueryFilter -> Maybe (Set AddressAny) - maybeFiltered :: QueryFilter -> Maybe (Set AddressAny) -maybeFiltered (FilterByAddress Set AddressAny -as) = Set AddressAny -> Maybe (Set AddressAny) + maybeFiltered :: QueryFilter -> Maybe (Set AddressAny) + maybeFiltered :: QueryFilter -> Maybe (Set AddressAny) +maybeFiltered (FilterByAddress Set AddressAny +as) = Set AddressAny -> Maybe (Set AddressAny) forall a. a -> Maybe a Just Set AddressAny -as - maybeFiltered QueryFilter +as + maybeFiltered QueryFilter NoFilter = Maybe (Set AddressAny) forall a. Maybe a Nothing @@ -1120,12 +1120,12 @@ -> NetworkId -> Hash StakePoolKey -> ExceptT ShelleyQueryCmdError IO () -runQueryPoolParams (AnyConsensusModeParams ConsensusModeParams mode -cModeParams) NetworkId -network Hash StakePoolKey -poolid = do - SocketPath String -sockPath <- (EnvSocketError -> ShelleyQueryCmdError) +runQueryPoolParams (AnyConsensusModeParams ConsensusModeParams mode +cModeParams) NetworkId +network Hash StakePoolKey +poolid = do + SocketPath String +sockPath <- (EnvSocketError -> ShelleyQueryCmdError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ShelleyQueryCmdError IO SocketPath forall (m :: * -> *) x y a. @@ -1134,20 +1134,20 @@ firstExceptT EnvSocketError -> ShelleyQueryCmdError ShelleyQueryCmdEnvVarSocketErr ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let localNodeConnInfo :: LocalNodeConnectInfo mode -localNodeConnInfo = ConsensusModeParams mode + let localNodeConnInfo :: LocalNodeConnectInfo mode +localNodeConnInfo = ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo ConsensusModeParams mode -cModeParams NetworkId -network String -sockPath +cModeParams NetworkId +network String +sockPath - anyE :: AnyCardanoEra -anyE@(AnyCardanoEra CardanoEra era -era) <- ConsensusModeParams mode + anyE :: AnyCardanoEra +anyE@(AnyCardanoEra CardanoEra era +era) <- ConsensusModeParams mode -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall mode. @@ -1155,15 +1155,15 @@ -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra determineEra ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo - let cMode :: ConsensusMode mode -cMode = ConsensusModeParams mode -> ConsensusMode mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo + let cMode :: ConsensusMode mode +cMode = ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams - ShelleyBasedEra era -sbe <- CardanoEraStyle era +cModeParams + ShelleyBasedEra era +sbe <- CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) forall era. CardanoEraStyle era @@ -1176,15 +1176,15 @@ $ CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era +era - EraInMode era mode -eInMode <- CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) + EraInMode era mode +eInMode <- CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) forall era mode. CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era -era ConsensusMode mode -cMode +era ConsensusMode mode +cMode Maybe (EraInMode era mode) -> (Maybe (EraInMode era mode) -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode)) @@ -1198,12 +1198,12 @@ ShelleyQueryCmdEraConsensusModeMismatch (ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode ConsensusMode mode -cMode) AnyCardanoEra -anyE) +cMode) AnyCardanoEra +anyE) - let qInMode :: QueryInMode + let qInMode :: QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era)) -qInMode = EraInMode era mode +qInMode = EraInMode era mode -> QueryInEra era (SerialisedDebugLedgerState era) -> QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era)) @@ -1212,7 +1212,7 @@ -> QueryInEra era result1 -> QueryInMode mode (Either EraMismatch result1) QueryInEra EraInMode era mode -eInMode (QueryInEra era (SerialisedDebugLedgerState era) +eInMode (QueryInEra era (SerialisedDebugLedgerState era) -> QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era))) -> (QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) @@ -1230,7 +1230,7 @@ ShelleyBasedEra era -> QueryInShelleyBasedEra era result -> QueryInEra era result QueryInShelleyBasedEra ShelleyBasedEra era -sbe (QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) +sbe (QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) -> QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era))) -> QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) @@ -1241,8 +1241,8 @@ forall era. QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) QueryDebugLedgerState - SerialisedDebugLedgerState era -result <- CardanoEra era + SerialisedDebugLedgerState era +result <- CardanoEra era -> ConsensusModeParams mode -> LocalNodeConnectInfo mode -> QueryInMode @@ -1255,11 +1255,11 @@ -> QueryInMode mode (Either EraMismatch result) -> ExceptT ShelleyQueryCmdError IO result executeQuery CardanoEra era -era ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo QueryInMode +era ConsensusModeParams mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era)) -qInMode +qInMode ShelleyBasedEra era -> ((ShelleyBased (ShelleyLedgerEra era), ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), @@ -1277,7 +1277,7 @@ a) -> a obtainLedgerEraClassConstraints ShelleyBasedEra era -sbe (Hash StakePoolKey +sbe (Hash StakePoolKey -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () forall era ledgerera. @@ -1287,8 +1287,8 @@ -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () writePoolParams Hash StakePoolKey -poolid) SerialisedDebugLedgerState era -result +poolid) SerialisedDebugLedgerState era +result -- | Obtain stake snapshot information for a pool, plus information about the total active stake. @@ -1303,12 +1303,12 @@ -> NetworkId -> Hash StakePoolKey -> ExceptT ShelleyQueryCmdError IO () -runQueryStakeSnapshot (AnyConsensusModeParams ConsensusModeParams mode -cModeParams) NetworkId -network Hash StakePoolKey -poolid = do - SocketPath String -sockPath <- (EnvSocketError -> ShelleyQueryCmdError) +runQueryStakeSnapshot (AnyConsensusModeParams ConsensusModeParams mode +cModeParams) NetworkId +network Hash StakePoolKey +poolid = do + SocketPath String +sockPath <- (EnvSocketError -> ShelleyQueryCmdError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ShelleyQueryCmdError IO SocketPath forall (m :: * -> *) x y a. @@ -1317,20 +1317,20 @@ firstExceptT EnvSocketError -> ShelleyQueryCmdError ShelleyQueryCmdEnvVarSocketErr ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let localNodeConnInfo :: LocalNodeConnectInfo mode -localNodeConnInfo = ConsensusModeParams mode + let localNodeConnInfo :: LocalNodeConnectInfo mode +localNodeConnInfo = ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo ConsensusModeParams mode -cModeParams NetworkId -network String -sockPath +cModeParams NetworkId +network String +sockPath - anyE :: AnyCardanoEra -anyE@(AnyCardanoEra CardanoEra era -era) <- ConsensusModeParams mode + anyE :: AnyCardanoEra +anyE@(AnyCardanoEra CardanoEra era +era) <- ConsensusModeParams mode -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall mode. @@ -1338,15 +1338,15 @@ -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra determineEra ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo - let cMode :: ConsensusMode mode -cMode = ConsensusModeParams mode -> ConsensusMode mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo + let cMode :: ConsensusMode mode +cMode = ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams - ShelleyBasedEra era -sbe <- CardanoEraStyle era +cModeParams + ShelleyBasedEra era +sbe <- CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) forall era. CardanoEraStyle era @@ -1359,15 +1359,15 @@ $ CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era +era - EraInMode era mode -eInMode <- CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) + EraInMode era mode +eInMode <- CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) forall era mode. CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era -era ConsensusMode mode -cMode +era ConsensusMode mode +cMode Maybe (EraInMode era mode) -> (Maybe (EraInMode era mode) -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode)) @@ -1381,12 +1381,12 @@ ShelleyQueryCmdEraConsensusModeMismatch (ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode ConsensusMode mode -cMode) AnyCardanoEra -anyE) +cMode) AnyCardanoEra +anyE) - let qInMode :: QueryInMode + let qInMode :: QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era)) -qInMode = EraInMode era mode +qInMode = EraInMode era mode -> QueryInEra era (SerialisedDebugLedgerState era) -> QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era)) @@ -1395,7 +1395,7 @@ -> QueryInEra era result1 -> QueryInMode mode (Either EraMismatch result1) QueryInEra EraInMode era mode -eInMode (QueryInEra era (SerialisedDebugLedgerState era) +eInMode (QueryInEra era (SerialisedDebugLedgerState era) -> QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era))) -> (QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) @@ -1413,7 +1413,7 @@ ShelleyBasedEra era -> QueryInShelleyBasedEra era result -> QueryInEra era result QueryInShelleyBasedEra ShelleyBasedEra era -sbe (QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) +sbe (QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) -> QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era))) -> QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) @@ -1424,8 +1424,8 @@ forall era. QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) QueryDebugLedgerState - SerialisedDebugLedgerState era -result <- CardanoEra era + SerialisedDebugLedgerState era +result <- CardanoEra era -> ConsensusModeParams mode -> LocalNodeConnectInfo mode -> QueryInMode @@ -1438,11 +1438,11 @@ -> QueryInMode mode (Either EraMismatch result) -> ExceptT ShelleyQueryCmdError IO result executeQuery CardanoEra era -era ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo QueryInMode +era ConsensusModeParams mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era)) -qInMode +qInMode ShelleyBasedEra era -> ((ShelleyBased (ShelleyLedgerEra era), ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), @@ -1460,7 +1460,7 @@ a) -> a obtainLedgerEraClassConstraints ShelleyBasedEra era -sbe (Hash StakePoolKey +sbe (Hash StakePoolKey -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () forall era ledgerera. @@ -1471,8 +1471,8 @@ -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () writeStakeSnapshot Hash StakePoolKey -poolid) SerialisedDebugLedgerState era -result +poolid) SerialisedDebugLedgerState era +result runQueryLedgerState @@ -1484,13 +1484,13 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () -runQueryLedgerState (AnyConsensusModeParams ConsensusModeParams mode -cModeParams) - NetworkId -network Maybe OutputFile -mOutFile = do - SocketPath String -sockPath <- (EnvSocketError -> ShelleyQueryCmdError) +runQueryLedgerState (AnyConsensusModeParams ConsensusModeParams mode +cModeParams) + NetworkId +network Maybe OutputFile +mOutFile = do + SocketPath String +sockPath <- (EnvSocketError -> ShelleyQueryCmdError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ShelleyQueryCmdError IO SocketPath forall (m :: * -> *) x y a. @@ -1499,20 +1499,20 @@ firstExceptT EnvSocketError -> ShelleyQueryCmdError ShelleyQueryCmdEnvVarSocketErr ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let localNodeConnInfo :: LocalNodeConnectInfo mode -localNodeConnInfo = ConsensusModeParams mode + let localNodeConnInfo :: LocalNodeConnectInfo mode +localNodeConnInfo = ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo ConsensusModeParams mode -cModeParams NetworkId -network String -sockPath +cModeParams NetworkId +network String +sockPath - anyE :: AnyCardanoEra -anyE@(AnyCardanoEra CardanoEra era -era) <- ConsensusModeParams mode + anyE :: AnyCardanoEra +anyE@(AnyCardanoEra CardanoEra era +era) <- ConsensusModeParams mode -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall mode. @@ -1520,15 +1520,15 @@ -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra determineEra ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo - let cMode :: ConsensusMode mode -cMode = ConsensusModeParams mode -> ConsensusMode mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo + let cMode :: ConsensusMode mode +cMode = ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams - ShelleyBasedEra era -sbe <- CardanoEraStyle era +cModeParams + ShelleyBasedEra era +sbe <- CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) forall era. CardanoEraStyle era @@ -1541,19 +1541,19 @@ $ CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era +era case CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) forall era mode. CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era -era ConsensusMode mode -cMode of - Just EraInMode era mode -eInMode -> do - let qInMode :: QueryInMode +era ConsensusMode mode +cMode of + Just EraInMode era mode +eInMode -> do + let qInMode :: QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era)) -qInMode = EraInMode era mode +qInMode = EraInMode era mode -> QueryInEra era (SerialisedDebugLedgerState era) -> QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era)) @@ -1562,7 +1562,7 @@ -> QueryInEra era result1 -> QueryInMode mode (Either EraMismatch result1) QueryInEra EraInMode era mode -eInMode +eInMode (QueryInEra era (SerialisedDebugLedgerState era) -> QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era))) @@ -1581,7 +1581,7 @@ ShelleyBasedEra era -> QueryInShelleyBasedEra era result -> QueryInEra era result QueryInShelleyBasedEra ShelleyBasedEra era -sbe +sbe (QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) -> QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era))) @@ -1593,8 +1593,8 @@ forall era. QueryInShelleyBasedEra era (SerialisedDebugLedgerState era) QueryDebugLedgerState - SerialisedDebugLedgerState era -result <- CardanoEra era + SerialisedDebugLedgerState era +result <- CardanoEra era -> ConsensusModeParams mode -> LocalNodeConnectInfo mode -> QueryInMode @@ -1608,14 +1608,14 @@ -> ExceptT ShelleyQueryCmdError IO result executeQuery CardanoEra era -era +era ConsensusModeParams mode -cModeParams +cModeParams LocalNodeConnectInfo mode -localNodeConnInfo +localNodeConnInfo QueryInMode mode (Either EraMismatch (SerialisedDebugLedgerState era)) -qInMode +qInMode ShelleyBasedEra era -> ((ShelleyBased (ShelleyLedgerEra era), ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), @@ -1633,7 +1633,7 @@ a) -> a obtainLedgerEraClassConstraints ShelleyBasedEra era -sbe (Maybe OutputFile +sbe (Maybe OutputFile -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () forall era ledgerera. @@ -1643,8 +1643,8 @@ -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () writeLedgerState Maybe OutputFile -mOutFile) SerialisedDebugLedgerState era -result +mOutFile) SerialisedDebugLedgerState era +result Maybe (EraInMode era mode) Nothing -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -1655,8 +1655,8 @@ ShelleyQueryCmdEraConsensusModeMismatch (ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode ConsensusMode mode -cMode) AnyCardanoEra -anyE +cMode) AnyCardanoEra +anyE runQueryProtocolState @@ -1668,13 +1668,13 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () -runQueryProtocolState (AnyConsensusModeParams ConsensusModeParams mode -cModeParams) - NetworkId -network Maybe OutputFile -mOutFile = do - SocketPath String -sockPath <- (EnvSocketError -> ShelleyQueryCmdError) +runQueryProtocolState (AnyConsensusModeParams ConsensusModeParams mode +cModeParams) + NetworkId +network Maybe OutputFile +mOutFile = do + SocketPath String +sockPath <- (EnvSocketError -> ShelleyQueryCmdError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ShelleyQueryCmdError IO SocketPath forall (m :: * -> *) x y a. @@ -1683,20 +1683,20 @@ firstExceptT EnvSocketError -> ShelleyQueryCmdError ShelleyQueryCmdEnvVarSocketErr ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let localNodeConnInfo :: LocalNodeConnectInfo mode -localNodeConnInfo = ConsensusModeParams mode + let localNodeConnInfo :: LocalNodeConnectInfo mode +localNodeConnInfo = ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo ConsensusModeParams mode -cModeParams NetworkId -network String -sockPath +cModeParams NetworkId +network String +sockPath - anyE :: AnyCardanoEra -anyE@(AnyCardanoEra CardanoEra era -era) <- ConsensusModeParams mode + anyE :: AnyCardanoEra +anyE@(AnyCardanoEra CardanoEra era +era) <- ConsensusModeParams mode -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall mode. @@ -1704,15 +1704,15 @@ -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra determineEra ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo - let cMode :: ConsensusMode mode -cMode = ConsensusModeParams mode -> ConsensusMode mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo + let cMode :: ConsensusMode mode +cMode = ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams - ShelleyBasedEra era -sbe <- CardanoEraStyle era +cModeParams + ShelleyBasedEra era +sbe <- CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) forall era. CardanoEraStyle era @@ -1725,18 +1725,18 @@ $ CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era +era case CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) forall era mode. CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era -era ConsensusMode mode -cMode of - Just EraInMode era mode -eInMode -> do - let qInMode :: QueryInMode mode (Either EraMismatch (ProtocolState era)) -qInMode = EraInMode era mode +era ConsensusMode mode +cMode of + Just EraInMode era mode +eInMode -> do + let qInMode :: QueryInMode mode (Either EraMismatch (ProtocolState era)) +qInMode = EraInMode era mode -> QueryInEra era (ProtocolState era) -> QueryInMode mode (Either EraMismatch (ProtocolState era)) forall era mode result1. @@ -1744,7 +1744,7 @@ -> QueryInEra era result1 -> QueryInMode mode (Either EraMismatch result1) QueryInEra EraInMode era mode -eInMode +eInMode (QueryInEra era (ProtocolState era) -> QueryInMode mode (Either EraMismatch (ProtocolState era))) -> (QueryInShelleyBasedEra era (ProtocolState era) @@ -1761,7 +1761,7 @@ ShelleyBasedEra era -> QueryInShelleyBasedEra era result -> QueryInEra era result QueryInShelleyBasedEra ShelleyBasedEra era -sbe +sbe (QueryInShelleyBasedEra era (ProtocolState era) -> QueryInMode mode (Either EraMismatch (ProtocolState era))) -> QueryInShelleyBasedEra era (ProtocolState era) @@ -1770,8 +1770,8 @@ $ QueryInShelleyBasedEra era (ProtocolState era) forall era. QueryInShelleyBasedEra era (ProtocolState era) QueryProtocolState - ProtocolState era -result <- CardanoEra era + ProtocolState era +result <- CardanoEra era -> ConsensusModeParams mode -> LocalNodeConnectInfo mode -> QueryInMode mode (Either EraMismatch (ProtocolState era)) @@ -1784,13 +1784,13 @@ -> ExceptT ShelleyQueryCmdError IO result executeQuery CardanoEra era -era +era ConsensusModeParams mode -cModeParams +cModeParams LocalNodeConnectInfo mode -localNodeConnInfo +localNodeConnInfo QueryInMode mode (Either EraMismatch (ProtocolState era)) -qInMode +qInMode Maybe OutputFile -> ProtocolState era -> ExceptT ShelleyQueryCmdError IO () forall era. @@ -1798,8 +1798,8 @@ Maybe OutputFile -> ProtocolState era -> ExceptT ShelleyQueryCmdError IO () writeProtocolState Maybe OutputFile -mOutFile ProtocolState era -result +mOutFile ProtocolState era +result Maybe (EraInMode era mode) Nothing -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -1810,8 +1810,8 @@ ShelleyQueryCmdEraConsensusModeMismatch (ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode ConsensusMode mode -cMode) AnyCardanoEra -anyE +cMode) AnyCardanoEra +anyE -- | Query the current delegations and reward accounts, filtered by a given -- set of addresses, from a Shelley node via the local state query protocol. @@ -1827,15 +1827,15 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () -runQueryStakeAddressInfo (AnyConsensusModeParams ConsensusModeParams mode -cModeParams) +runQueryStakeAddressInfo (AnyConsensusModeParams ConsensusModeParams mode +cModeParams) (StakeAddress Network -_ StakeCredential StandardCrypto -addr) NetworkId -network Maybe OutputFile -mOutFile = do - SocketPath String -sockPath <- (EnvSocketError -> ShelleyQueryCmdError) +_ StakeCredential StandardCrypto +addr) NetworkId +network Maybe OutputFile +mOutFile = do + SocketPath String +sockPath <- (EnvSocketError -> ShelleyQueryCmdError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ShelleyQueryCmdError IO SocketPath forall (m :: * -> *) x y a. @@ -1844,20 +1844,20 @@ firstExceptT EnvSocketError -> ShelleyQueryCmdError ShelleyQueryCmdEnvVarSocketErr ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let localNodeConnInfo :: LocalNodeConnectInfo mode -localNodeConnInfo = ConsensusModeParams mode + let localNodeConnInfo :: LocalNodeConnectInfo mode +localNodeConnInfo = ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo ConsensusModeParams mode -cModeParams NetworkId -network String -sockPath +cModeParams NetworkId +network String +sockPath - anyE :: AnyCardanoEra -anyE@(AnyCardanoEra CardanoEra era -era) <- ConsensusModeParams mode + anyE :: AnyCardanoEra +anyE@(AnyCardanoEra CardanoEra era +era) <- ConsensusModeParams mode -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall mode. @@ -1865,15 +1865,15 @@ -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra determineEra ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo - let cMode :: ConsensusMode mode -cMode = ConsensusModeParams mode -> ConsensusMode mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo + let cMode :: ConsensusMode mode +cMode = ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams - ShelleyBasedEra era -sbe <- CardanoEraStyle era +cModeParams + ShelleyBasedEra era +sbe <- CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) forall era. CardanoEraStyle era @@ -1886,31 +1886,31 @@ $ CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era +era case CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) forall era mode. CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era -era ConsensusMode mode -cMode of - Just EraInMode era mode -eInMode -> do - let stakeAddr :: Set StakeCredential -stakeAddr = StakeCredential -> Set StakeCredential +era ConsensusMode mode +cMode of + Just EraInMode era mode +eInMode -> do + let stakeAddr :: Set StakeCredential +stakeAddr = StakeCredential -> Set StakeCredential forall a. a -> Set a Set.singleton (StakeCredential -> Set StakeCredential) -> StakeCredential -> Set StakeCredential forall a b. (a -> b) -> a -> b $ StakeCredential StandardCrypto -> StakeCredential fromShelleyStakeCredential StakeCredential StandardCrypto -addr - query :: QueryInMode +addr + query :: QueryInMode mode (Either EraMismatch (Map StakeAddress Lovelace, Map StakeAddress (Hash StakePoolKey))) -query = EraInMode era mode +query = EraInMode era mode -> QueryInEra era (Map StakeAddress Lovelace, Map StakeAddress (Hash StakePoolKey)) @@ -1924,7 +1924,7 @@ -> QueryInEra era result1 -> QueryInMode mode (Either EraMismatch result1) QueryInEra EraInMode era mode -eInMode +eInMode (QueryInEra era (Map StakeAddress Lovelace, Map StakeAddress (Hash StakePoolKey)) @@ -1961,7 +1961,7 @@ ShelleyBasedEra era -> QueryInShelleyBasedEra era result -> QueryInEra era result QueryInShelleyBasedEra ShelleyBasedEra era -sbe +sbe (QueryInShelleyBasedEra era (Map StakeAddress Lovelace, Map StakeAddress (Hash StakePoolKey)) @@ -1991,11 +1991,11 @@ era (Map StakeAddress Lovelace, Map StakeAddress (Hash StakePoolKey)) QueryStakeAddresses Set StakeCredential -stakeAddr NetworkId -network +stakeAddr NetworkId +network - (Map StakeAddress Lovelace, Map StakeAddress (Hash StakePoolKey)) -result <- CardanoEra era + (Map StakeAddress Lovelace, Map StakeAddress (Hash StakePoolKey)) +result <- CardanoEra era -> ConsensusModeParams mode -> LocalNodeConnectInfo mode -> QueryInMode @@ -2015,27 +2015,27 @@ -> ExceptT ShelleyQueryCmdError IO result executeQuery CardanoEra era -era +era ConsensusModeParams mode -cModeParams +cModeParams LocalNodeConnectInfo mode -localNodeConnInfo +localNodeConnInfo QueryInMode mode (Either EraMismatch (Map StakeAddress Lovelace, Map StakeAddress (Hash StakePoolKey))) -query +query Maybe OutputFile -> DelegationsAndRewards -> ExceptT ShelleyQueryCmdError IO () writeStakeAddressInfo Maybe OutputFile -mOutFile (DelegationsAndRewards -> ExceptT ShelleyQueryCmdError IO ()) +mOutFile (DelegationsAndRewards -> ExceptT ShelleyQueryCmdError IO ()) -> DelegationsAndRewards -> ExceptT ShelleyQueryCmdError IO () forall a b. (a -> b) -> a -> b $ (Map StakeAddress Lovelace, Map StakeAddress (Hash StakePoolKey)) -> DelegationsAndRewards DelegationsAndRewards (Map StakeAddress Lovelace, Map StakeAddress (Hash StakePoolKey)) -result +result Maybe (EraInMode era mode) Nothing -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -2046,8 +2046,8 @@ ShelleyQueryCmdEraConsensusModeMismatch (ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode ConsensusMode mode -cMode) AnyCardanoEra -anyE +cMode) AnyCardanoEra +anyE -- ------------------------------------------------------------------------------------------------- @@ -2061,7 +2061,7 @@ -- ^ The query does not support the Byron protocol. | ShelleyProtocolEraMismatch -- ^ The Shelley protocol only supports the Shelley era. - deriving (ShelleyQueryCmdLocalStateQueryError + deriving (ShelleyQueryCmdLocalStateQueryError -> ShelleyQueryCmdLocalStateQueryError -> Bool (ShelleyQueryCmdLocalStateQueryError -> ShelleyQueryCmdLocalStateQueryError -> Bool) @@ -2077,7 +2077,7 @@ -> ShelleyQueryCmdLocalStateQueryError -> Bool $c== :: ShelleyQueryCmdLocalStateQueryError -> ShelleyQueryCmdLocalStateQueryError -> Bool -Eq, Int -> ShelleyQueryCmdLocalStateQueryError -> ShowS +Eq, Int -> ShelleyQueryCmdLocalStateQueryError -> ShowS [ShelleyQueryCmdLocalStateQueryError] -> ShowS ShelleyQueryCmdLocalStateQueryError -> String (Int -> ShelleyQueryCmdLocalStateQueryError -> ShowS) @@ -2096,27 +2096,27 @@ renderLocalStateQueryError :: ShelleyQueryCmdLocalStateQueryError -> Text renderLocalStateQueryError :: ShelleyQueryCmdLocalStateQueryError -> Text -renderLocalStateQueryError ShelleyQueryCmdLocalStateQueryError -lsqErr = +renderLocalStateQueryError ShelleyQueryCmdLocalStateQueryError +lsqErr = case ShelleyQueryCmdLocalStateQueryError -lsqErr of - AcquireFailureError AcquireFailure -err -> Text +lsqErr of + AcquireFailureError AcquireFailure +err -> Text "Local state query acquire failure: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> AcquireFailure -> Text forall a b. (Show a, ConvertText String b) => a -> b show AcquireFailure -err - EraMismatchError EraMismatch -err -> +err + EraMismatchError EraMismatch +err -> Text "A query from a certain era was applied to a ledger from a different era: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> EraMismatch -> Text forall a b. (Show a, ConvertText String b) => a -> b show EraMismatch -err +err ShelleyQueryCmdLocalStateQueryError ByronProtocolNotSupportedError -> Text @@ -2136,11 +2136,11 @@ -> ExceptT ShelleyQueryCmdError IO () writeStakeAddressInfo :: Maybe OutputFile -> DelegationsAndRewards -> ExceptT ShelleyQueryCmdError IO () -writeStakeAddressInfo Maybe OutputFile -mOutFile DelegationsAndRewards -delegsAndRewards = +writeStakeAddressInfo Maybe OutputFile +mOutFile DelegationsAndRewards +delegsAndRewards = case Maybe OutputFile -mOutFile of +mOutFile of Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -2151,9 +2151,9 @@ LBS.putStrLn (DelegationsAndRewards -> ByteString forall a. ToJSON a => a -> ByteString encodePretty DelegationsAndRewards -delegsAndRewards) - Just (OutputFile String -fpath) -> +delegsAndRewards) + Just (OutputFile String +fpath) -> (IOException -> ShelleyQueryCmdError) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. @@ -2170,33 +2170,33 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) +fpath) (IO () -> ExceptT ShelleyQueryCmdError IO ()) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -fpath (DelegationsAndRewards -> ByteString +fpath (DelegationsAndRewards -> ByteString forall a. ToJSON a => a -> ByteString encodePretty DelegationsAndRewards -delegsAndRewards) +delegsAndRewards) -writeLedgerState :: forall era ledgerera. - ShelleyLedgerEra era ~ ledgerera - => ToJSON (DebugLedgerState era) - => FromCBOR (DebugLedgerState era) +writeLedgerState :: forall era ledgerera. + ShelleyLedgerEra era ~ ledgerera + => ToJSON (DebugLedgerState era) + => FromCBOR (DebugLedgerState era) => Maybe OutputFile - -> SerialisedDebugLedgerState era + -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () writeLedgerState :: Maybe OutputFile -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () -writeLedgerState Maybe OutputFile -mOutFile qState :: SerialisedDebugLedgerState era -qState@(SerialisedDebugLedgerState Serialised (NewEpochState (ShelleyLedgerEra era)) -serLedgerState) = +writeLedgerState Maybe OutputFile +mOutFile qState :: SerialisedDebugLedgerState era +qState@(SerialisedDebugLedgerState Serialised (NewEpochState (ShelleyLedgerEra era)) +serLedgerState) = case Maybe OutputFile -mOutFile of +mOutFile of Maybe OutputFile Nothing -> case SerialisedDebugLedgerState era -> Either ByteString (DebugLedgerState era) @@ -2205,9 +2205,9 @@ SerialisedDebugLedgerState era -> Either ByteString (DebugLedgerState era) decodeLedgerState SerialisedDebugLedgerState era -qState of - Left ByteString -bs -> (HelpersError -> ShelleyQueryCmdError) +qState of + Left ByteString +bs -> (HelpersError -> ShelleyQueryCmdError) -> ExceptT HelpersError IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x y a. Functor m => @@ -2218,9 +2218,9 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ExceptT HelpersError IO () pPrintCBOR ByteString -bs - Right DebugLedgerState era -ledgerState -> IO () -> ExceptT ShelleyQueryCmdError IO () +bs + Right DebugLedgerState era +ledgerState -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyQueryCmdError IO ()) -> (ByteString -> IO ()) @@ -2236,9 +2236,9 @@ $ DebugLedgerState era -> ByteString forall a. ToJSON a => a -> ByteString encodePretty DebugLedgerState era -ledgerState - Just (OutputFile String -fpath) -> +ledgerState + Just (OutputFile String +fpath) -> (IOException -> ShelleyQueryCmdError) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. @@ -2255,32 +2255,32 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) +fpath) (IO () -> ExceptT ShelleyQueryCmdError IO ()) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -fpath (ByteString -> IO ()) -> ByteString -> IO () +fpath (ByteString -> IO ()) -> ByteString -> IO () forall a b. (a -> b) -> a -> b $ Serialised (NewEpochState ledgerera) -> ByteString forall a. Serialised a -> ByteString unSerialised Serialised (NewEpochState ledgerera) Serialised (NewEpochState (ShelleyLedgerEra era)) -serLedgerState +serLedgerState -writeStakeSnapshot :: forall era ledgerera. () - => ShelleyLedgerEra era ~ ledgerera - => Era.Crypto ledgerera ~ StandardCrypto - => FromCBOR (DebugLedgerState era) +writeStakeSnapshot :: forall era ledgerera. () + => ShelleyLedgerEra era ~ ledgerera + => Era.Crypto ledgerera ~ StandardCrypto + => FromCBOR (DebugLedgerState era) => PoolId - -> SerialisedDebugLedgerState era + -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () writeStakeSnapshot :: Hash StakePoolKey -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () -writeStakeSnapshot (StakePoolKeyHash hk) SerialisedDebugLedgerState era -qState = +writeStakeSnapshot (StakePoolKeyHash hk) SerialisedDebugLedgerState era +qState = case SerialisedDebugLedgerState era -> Either ByteString (DebugLedgerState era) forall era. @@ -2288,10 +2288,10 @@ SerialisedDebugLedgerState era -> Either ByteString (DebugLedgerState era) decodeLedgerState SerialisedDebugLedgerState era -qState of +qState of -- In the event of decode failure print the CBOR instead - Left ByteString -bs -> (HelpersError -> ShelleyQueryCmdError) + Left ByteString +bs -> (HelpersError -> ShelleyQueryCmdError) -> ExceptT HelpersError IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x y a. Functor m => @@ -2302,20 +2302,20 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ExceptT HelpersError IO () pPrintCBOR ByteString -bs +bs - Right DebugLedgerState era -ledgerState -> do + Right DebugLedgerState era +ledgerState -> do -- Ledger State - let (DebugLedgerState NewEpochState ledgerera -snapshot) = DebugLedgerState era -ledgerState + let (DebugLedgerState NewEpochState ledgerera +snapshot) = DebugLedgerState era +ledgerState -- The three stake snapshots, obtained from the ledger state - let (SnapShots SnapShot StandardCrypto -markS SnapShot StandardCrypto -setS SnapShot StandardCrypto -goS Coin + let (SnapShots SnapShot StandardCrypto +markS SnapShot StandardCrypto +setS SnapShot StandardCrypto +goS Coin _) = EpochState ledgerera -> SnapShots (Crypto ledgerera) forall era. EpochState era -> SnapShots (Crypto era) esSnapshots (EpochState ledgerera -> SnapShots (Crypto ledgerera)) @@ -2324,7 +2324,7 @@ $ NewEpochState ledgerera -> EpochState ledgerera forall era. NewEpochState era -> EpochState era nesEs NewEpochState ledgerera -snapshot +snapshot -- Calculate the three pool and active stake values for the given pool IO () -> ExceptT ShelleyQueryCmdError IO () @@ -2353,56 +2353,56 @@ forall crypto. KeyHash 'StakePool crypto -> SnapShot crypto -> Integer getPoolStake KeyHash 'StakePool StandardCrypto -hk SnapShot StandardCrypto -markS +hk SnapShot StandardCrypto +markS , setPool :: Integer setPool = KeyHash 'StakePool StandardCrypto -> SnapShot StandardCrypto -> Integer forall crypto. KeyHash 'StakePool crypto -> SnapShot crypto -> Integer getPoolStake KeyHash 'StakePool StandardCrypto -hk SnapShot StandardCrypto -setS +hk SnapShot StandardCrypto +setS , goPool :: Integer goPool = KeyHash 'StakePool StandardCrypto -> SnapShot StandardCrypto -> Integer forall crypto. KeyHash 'StakePool crypto -> SnapShot crypto -> Integer getPoolStake KeyHash 'StakePool StandardCrypto -hk SnapShot StandardCrypto -goS +hk SnapShot StandardCrypto +goS , markTotal :: Integer markTotal = SnapShot StandardCrypto -> Integer forall crypto. SnapShot crypto -> Integer getAllStake SnapShot StandardCrypto -markS +markS , setTotal :: Integer setTotal = SnapShot StandardCrypto -> Integer forall crypto. SnapShot crypto -> Integer getAllStake SnapShot StandardCrypto -setS +setS , goTotal :: Integer goTotal = SnapShot StandardCrypto -> Integer forall crypto. SnapShot crypto -> Integer getAllStake SnapShot StandardCrypto -goS +goS } -- | Sum all the stake that is held by the pool -getPoolStake :: KeyHash Cardano.Ledger.Keys.StakePool crypto -> SnapShot crypto -> Integer +getPoolStake :: KeyHash Cardano.Ledger.Keys.StakePool crypto -> SnapShot crypto -> Integer getPoolStake :: KeyHash 'StakePool crypto -> SnapShot crypto -> Integer -getPoolStake KeyHash 'StakePool crypto -hash SnapShot crypto -ss = Integer -pStake +getPoolStake KeyHash 'StakePool crypto +hash SnapShot crypto +ss = Integer +pStake where - Coin Integer -pStake = Map (Credential 'Staking crypto) Coin -> Coin + Coin Integer +pStake = Map (Credential 'Staking crypto) Coin -> Coin forall (t :: * -> *) m. (Foldable t, Monoid m) => t m -> m fold Map (Credential 'Staking crypto) Coin -s - (Stake Map (Credential 'Staking crypto) Coin -s) = KeyHash 'StakePool crypto +s + (Stake Map (Credential 'Staking crypto) Coin +s) = KeyHash 'StakePool crypto -> Map (Credential 'Staking crypto) (KeyHash 'StakePool crypto) -> Stake crypto -> Stake crypto @@ -2412,28 +2412,28 @@ -> Stake crypto -> Stake crypto poolStake KeyHash 'StakePool crypto -hash (SnapShot crypto +hash (SnapShot crypto -> Map (Credential 'Staking crypto) (KeyHash 'StakePool crypto) forall crypto. SnapShot crypto -> Map (Credential 'Staking crypto) (KeyHash 'StakePool crypto) _delegations SnapShot crypto -ss) (SnapShot crypto -> Stake crypto +ss) (SnapShot crypto -> Stake crypto forall crypto. SnapShot crypto -> Stake crypto _stake SnapShot crypto -ss) +ss) -- | Sum the active stake from a snapshot -getAllStake :: SnapShot crypto -> Integer +getAllStake :: SnapShot crypto -> Integer getAllStake :: SnapShot crypto -> Integer -getAllStake (SnapShot Stake crypto -stake Map (Credential 'Staking crypto) (KeyHash 'StakePool crypto) +getAllStake (SnapShot Stake crypto +stake Map (Credential 'Staking crypto) (KeyHash 'StakePool crypto) _ Map (KeyHash 'StakePool crypto) (PoolParams crypto) _) = Integer -activeStake +activeStake where - Coin Integer -activeStake = Map (Credential 'Staking crypto) Coin -> Coin + Coin Integer +activeStake = Map (Credential 'Staking crypto) Coin -> Coin forall (t :: * -> *) m. (Foldable t, Monoid m) => t m -> m fold (Map (Credential 'Staking crypto) Coin -> Coin) -> (Stake crypto -> Map (Credential 'Staking crypto) Coin) @@ -2448,23 +2448,23 @@ unStake (Stake crypto -> Coin) -> Stake crypto -> Coin forall a b. (a -> b) -> a -> b $ Stake crypto -stake +stake -- | This function obtains the pool parameters, equivalent to the following jq query on the output of query ledger-state -- .nesEs.esLState._delegationState._pstate._pParams.<pool_id> -writePoolParams :: forall era ledgerera. () - => ShelleyLedgerEra era ~ ledgerera - => FromCBOR (DebugLedgerState era) - => Crypto.Crypto (Era.Crypto ledgerera) - => Era.Crypto ledgerera ~ StandardCrypto +writePoolParams :: forall era ledgerera. () + => ShelleyLedgerEra era ~ ledgerera + => FromCBOR (DebugLedgerState era) + => Crypto.Crypto (Era.Crypto ledgerera) + => Era.Crypto ledgerera ~ StandardCrypto => PoolId - -> SerialisedDebugLedgerState era + -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () writePoolParams :: Hash StakePoolKey -> SerialisedDebugLedgerState era -> ExceptT ShelleyQueryCmdError IO () -writePoolParams (StakePoolKeyHash hk) SerialisedDebugLedgerState era -qState = +writePoolParams (StakePoolKeyHash hk) SerialisedDebugLedgerState era +qState = case SerialisedDebugLedgerState era -> Either ByteString (DebugLedgerState era) forall era. @@ -2472,10 +2472,10 @@ SerialisedDebugLedgerState era -> Either ByteString (DebugLedgerState era) decodeLedgerState SerialisedDebugLedgerState era -qState of +qState of -- In the event of decode failure print the CBOR instead - Left ByteString -bs -> (HelpersError -> ShelleyQueryCmdError) + Left ByteString +bs -> (HelpersError -> ShelleyQueryCmdError) -> ExceptT HelpersError IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x y a. Functor m => @@ -2486,15 +2486,15 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ExceptT HelpersError IO () pPrintCBOR ByteString -bs +bs - Right DebugLedgerState era -ledgerState -> do - let DebugLedgerState NewEpochState ledgerera -snapshot = DebugLedgerState era -ledgerState - let poolState :: PState StandardCrypto -poolState = DPState StandardCrypto -> PState StandardCrypto + Right DebugLedgerState era +ledgerState -> do + let DebugLedgerState NewEpochState ledgerera +snapshot = DebugLedgerState era +ledgerState + let poolState :: PState StandardCrypto +poolState = DPState StandardCrypto -> PState StandardCrypto forall crypto. DPState crypto -> PState crypto _pstate (DPState StandardCrypto -> PState StandardCrypto) -> DPState StandardCrypto -> PState StandardCrypto @@ -2512,17 +2512,17 @@ $ NewEpochState ledgerera -> EpochState ledgerera forall era. NewEpochState era -> EpochState era nesEs NewEpochState ledgerera -snapshot +snapshot -- Pool parameters - let poolParams :: Maybe (PoolParams StandardCrypto) -poolParams = KeyHash 'StakePool StandardCrypto + let poolParams :: Maybe (PoolParams StandardCrypto) +poolParams = KeyHash 'StakePool StandardCrypto -> Map (KeyHash 'StakePool StandardCrypto) (PoolParams StandardCrypto) -> Maybe (PoolParams StandardCrypto) forall k a. Ord k => k -> Map k a -> Maybe a Map.lookup KeyHash 'StakePool StandardCrypto -hk (Map +hk (Map (KeyHash 'StakePool StandardCrypto) (PoolParams StandardCrypto) -> Maybe (PoolParams StandardCrypto)) -> Map @@ -2536,15 +2536,15 @@ PState crypto -> Map (KeyHash 'StakePool crypto) (PoolParams crypto) _pParams PState StandardCrypto -poolState - let fPoolParams :: Maybe (PoolParams StandardCrypto) -fPoolParams = KeyHash 'StakePool StandardCrypto +poolState + let fPoolParams :: Maybe (PoolParams StandardCrypto) +fPoolParams = KeyHash 'StakePool StandardCrypto -> Map (KeyHash 'StakePool StandardCrypto) (PoolParams StandardCrypto) -> Maybe (PoolParams StandardCrypto) forall k a. Ord k => k -> Map k a -> Maybe a Map.lookup KeyHash 'StakePool StandardCrypto -hk (Map +hk (Map (KeyHash 'StakePool StandardCrypto) (PoolParams StandardCrypto) -> Maybe (PoolParams StandardCrypto)) -> Map @@ -2558,13 +2558,13 @@ PState crypto -> Map (KeyHash 'StakePool crypto) (PoolParams crypto) _fPParams PState StandardCrypto -poolState - let retiring :: Maybe EpochNo -retiring = KeyHash 'StakePool StandardCrypto +poolState + let retiring :: Maybe EpochNo +retiring = KeyHash 'StakePool StandardCrypto -> Map (KeyHash 'StakePool StandardCrypto) EpochNo -> Maybe EpochNo forall k a. Ord k => k -> Map k a -> Maybe a Map.lookup KeyHash 'StakePool StandardCrypto -hk (Map (KeyHash 'StakePool StandardCrypto) EpochNo -> Maybe EpochNo) +hk (Map (KeyHash 'StakePool StandardCrypto) EpochNo -> Maybe EpochNo) -> Map (KeyHash 'StakePool StandardCrypto) EpochNo -> Maybe EpochNo forall a b. (a -> b) -> a -> b $ PState StandardCrypto @@ -2572,7 +2572,7 @@ forall crypto. PState crypto -> Map (KeyHash 'StakePool crypto) EpochNo _retiring PState StandardCrypto -poolState +poolState IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -2600,18 +2600,18 @@ Maybe (PoolParams crypto) -> Maybe (PoolParams crypto) -> Maybe EpochNo -> Params crypto Params Maybe (PoolParams StandardCrypto) -poolParams Maybe (PoolParams StandardCrypto) -fPoolParams Maybe EpochNo -retiring +poolParams Maybe (PoolParams StandardCrypto) +fPoolParams Maybe EpochNo +retiring -decodeLedgerState :: forall era. () - => FromCBOR (DebugLedgerState era) - => SerialisedDebugLedgerState era - -> Either LBS.ByteString (DebugLedgerState era) +decodeLedgerState :: forall era. () + => FromCBOR (DebugLedgerState era) + => SerialisedDebugLedgerState era + -> Either LBS.ByteString (DebugLedgerState era) decodeLedgerState :: SerialisedDebugLedgerState era -> Either ByteString (DebugLedgerState era) -decodeLedgerState (SerialisedDebugLedgerState (Serialised ByteString -ls)) = (DecoderError -> ByteString) +decodeLedgerState (SerialisedDebugLedgerState (Serialised ByteString +ls)) = (DecoderError -> ByteString) -> Either DecoderError (DebugLedgerState era) -> Either ByteString (DebugLedgerState era) forall (p :: * -> * -> *) a b c. @@ -2620,33 +2620,33 @@ first (ByteString -> DecoderError -> ByteString forall a b. a -> b -> a const ByteString -ls) (ByteString -> Either DecoderError (DebugLedgerState era) +ls) (ByteString -> Either DecoderError (DebugLedgerState era) forall a. FromCBOR a => ByteString -> Either DecoderError a decodeFull ByteString -ls) +ls) -writeProtocolState :: Crypto.Crypto StandardCrypto +writeProtocolState :: Crypto.Crypto StandardCrypto => Maybe OutputFile - -> ProtocolState era + -> ProtocolState era -> ExceptT ShelleyQueryCmdError IO () writeProtocolState :: Maybe OutputFile -> ProtocolState era -> ExceptT ShelleyQueryCmdError IO () -writeProtocolState Maybe OutputFile -mOutFile ps :: ProtocolState era -ps@(ProtocolState Serialised (ChainDepState (Crypto (ShelleyLedgerEra era))) -pstate) = +writeProtocolState Maybe OutputFile +mOutFile ps :: ProtocolState era +ps@(ProtocolState Serialised (ChainDepState (Crypto (ShelleyLedgerEra era))) +pstate) = case Maybe OutputFile -mOutFile of +mOutFile of Maybe OutputFile Nothing -> case ProtocolState era -> Either ByteString (ChainDepState StandardCrypto) forall era. ProtocolState era -> Either ByteString (ChainDepState StandardCrypto) -decodeProtocolState ProtocolState era -ps of - Left ByteString -bs -> (HelpersError -> ShelleyQueryCmdError) +decodeProtocolState ProtocolState era +ps of + Left ByteString +bs -> (HelpersError -> ShelleyQueryCmdError) -> ExceptT HelpersError IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x y a. Functor m => @@ -2657,9 +2657,9 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ExceptT HelpersError IO () pPrintCBOR ByteString -bs - Right ChainDepState StandardCrypto -chainDepstate -> IO () -> ExceptT ShelleyQueryCmdError IO () +bs + Right ChainDepState StandardCrypto +chainDepstate -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyQueryCmdError IO ()) -> (ByteString -> IO ()) @@ -2675,9 +2675,9 @@ $ ChainDepState StandardCrypto -> ByteString forall a. ToJSON a => a -> ByteString encodePretty ChainDepState StandardCrypto -chainDepstate - Just (OutputFile String -fpath) -> +chainDepstate + Just (OutputFile String +fpath) -> (IOException -> ShelleyQueryCmdError) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. @@ -2694,7 +2694,7 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) +fpath) (IO () -> ExceptT ShelleyQueryCmdError IO ()) -> (ByteString -> IO ()) -> ByteString @@ -2704,22 +2704,22 @@ cat b c -> cat a b -> cat a c . String -> ByteString -> IO () LBS.writeFile String -fpath (ByteString -> ExceptT ShelleyQueryCmdError IO ()) +fpath (ByteString -> ExceptT ShelleyQueryCmdError IO ()) -> ByteString -> ExceptT ShelleyQueryCmdError IO () forall a b. (a -> b) -> a -> b $ Serialised (ChainDepState (Crypto (ShelleyLedgerEra era))) -> ByteString forall a. Serialised a -> ByteString unSerialised Serialised (ChainDepState (Crypto (ShelleyLedgerEra era))) -pstate +pstate where - decodeProtocolState - :: ProtocolState era + decodeProtocolState + :: ProtocolState era -> Either LBS.ByteString (Ledger.ChainDepState StandardCrypto) - decodeProtocolState :: ProtocolState era + decodeProtocolState :: ProtocolState era -> Either ByteString (ChainDepState StandardCrypto) -decodeProtocolState (ProtocolState (Serialised ByteString -pbs)) = +decodeProtocolState (ProtocolState (Serialised ByteString +pbs)) = (DecoderError -> ByteString) -> Either DecoderError (ChainDepState StandardCrypto) -> Either ByteString (ChainDepState StandardCrypto) @@ -2729,25 +2729,25 @@ first (ByteString -> DecoderError -> ByteString forall a b. a -> b -> a const ByteString -pbs) (ByteString -> Either DecoderError (ChainDepState StandardCrypto) +pbs) (ByteString -> Either DecoderError (ChainDepState StandardCrypto) forall a. FromCBOR a => ByteString -> Either DecoderError a decodeFull ByteString -pbs) +pbs) -writeFilteredUTxOs :: ShelleyBasedEra era +writeFilteredUTxOs :: ShelleyBasedEra era -> Maybe OutputFile - -> UTxO era + -> UTxO era -> ExceptT ShelleyQueryCmdError IO () writeFilteredUTxOs :: ShelleyBasedEra era -> Maybe OutputFile -> UTxO era -> ExceptT ShelleyQueryCmdError IO () -writeFilteredUTxOs ShelleyBasedEra era -shelleyBasedEra' Maybe OutputFile -mOutFile UTxO era -utxo = +writeFilteredUTxOs ShelleyBasedEra era +shelleyBasedEra' Maybe OutputFile +mOutFile UTxO era +utxo = case Maybe OutputFile -mOutFile of +mOutFile of Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -2757,49 +2757,49 @@ $ ShelleyBasedEra era -> UTxO era -> IO () forall era. ShelleyBasedEra era -> UTxO era -> IO () printFilteredUTxOs ShelleyBasedEra era -shelleyBasedEra' UTxO era -utxo - Just (OutputFile String -fpath) -> +shelleyBasedEra' UTxO era +utxo + Just (OutputFile String +fpath) -> case ShelleyBasedEra era -shelleyBasedEra' of +shelleyBasedEra' of ShelleyBasedEra era ShelleyBasedEraShelley -> String -> UTxO era -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. (MonadIO m, ToJSON a) => String -> a -> ExceptT ShelleyQueryCmdError m () -writeUTxo String -fpath UTxO era -utxo +writeUTxo String +fpath UTxO era +utxo ShelleyBasedEra era ShelleyBasedEraAllegra -> String -> UTxO era -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. (MonadIO m, ToJSON a) => String -> a -> ExceptT ShelleyQueryCmdError m () -writeUTxo String -fpath UTxO era -utxo +writeUTxo String +fpath UTxO era +utxo ShelleyBasedEra era ShelleyBasedEraMary -> String -> UTxO era -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. (MonadIO m, ToJSON a) => String -> a -> ExceptT ShelleyQueryCmdError m () -writeUTxo String -fpath UTxO era -utxo +writeUTxo String +fpath UTxO era +utxo ShelleyBasedEra era ShelleyBasedEraAlonzo -> String -> UTxO era -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. (MonadIO m, ToJSON a) => String -> a -> ExceptT ShelleyQueryCmdError m () -writeUTxo String -fpath UTxO era -utxo +writeUTxo String +fpath UTxO era +utxo where - writeUTxo :: String -> a -> ExceptT ShelleyQueryCmdError m () -writeUTxo String -fpath a -utxo' = + writeUTxo :: String -> a -> ExceptT ShelleyQueryCmdError m () +writeUTxo String +fpath a +utxo' = (IOException -> ShelleyQueryCmdError) -> IO () -> ExceptT ShelleyQueryCmdError m () forall (m :: * -> *) x a. @@ -2816,25 +2816,25 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) +fpath) (IO () -> ExceptT ShelleyQueryCmdError m ()) -> IO () -> ExceptT ShelleyQueryCmdError m () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -fpath (a -> ByteString +fpath (a -> ByteString forall a. ToJSON a => a -> ByteString encodePretty a -utxo') +utxo') -printFilteredUTxOs :: ShelleyBasedEra era -> UTxO era -> IO () +printFilteredUTxOs :: ShelleyBasedEra era -> UTxO era -> IO () printFilteredUTxOs :: ShelleyBasedEra era -> UTxO era -> IO () -printFilteredUTxOs ShelleyBasedEra era -shelleyBasedEra' (UTxO Map TxIn (TxOut era) -utxo) = do +printFilteredUTxOs ShelleyBasedEra era +shelleyBasedEra' (UTxO Map TxIn (TxOut era) +utxo) = do Text -> IO () Text.putStrLn Text -title +title String -> IO () forall a (m :: * -> *). (Print a, MonadIO m) => a -> m () putStrLn (String -> IO ()) -> String -> IO () @@ -2843,13 +2843,13 @@ forall a. Int -> a -> [a] replicate (Text -> Int Text.length Text -title Int -> Int -> Int +title Int -> Int -> Int forall a. Num a => a -> a -> a + Int 2) Char '-' case ShelleyBasedEra era -shelleyBasedEra' of +shelleyBasedEra' of ShelleyBasedEra era ShelleyBasedEraShelley -> ((TxIn, TxOut era) -> IO ()) -> [(TxIn, TxOut era)] -> IO () @@ -2859,12 +2859,12 @@ mapM_ (ShelleyBasedEra era -> (TxIn, TxOut era) -> IO () forall era. ShelleyBasedEra era -> (TxIn, TxOut era) -> IO () printUtxo ShelleyBasedEra era -shelleyBasedEra') ([(TxIn, TxOut era)] -> IO ()) -> [(TxIn, TxOut era)] -> IO () +shelleyBasedEra') ([(TxIn, TxOut era)] -> IO ()) -> [(TxIn, TxOut era)] -> IO () forall a b. (a -> b) -> a -> b $ Map TxIn (TxOut era) -> [(TxIn, TxOut era)] forall k a. Map k a -> [(k, a)] Map.toList Map TxIn (TxOut era) -utxo +utxo ShelleyBasedEra era ShelleyBasedEraAllegra -> ((TxIn, TxOut era) -> IO ()) -> [(TxIn, TxOut era)] -> IO () @@ -2874,12 +2874,12 @@ mapM_ (ShelleyBasedEra era -> (TxIn, TxOut era) -> IO () forall era. ShelleyBasedEra era -> (TxIn, TxOut era) -> IO () printUtxo ShelleyBasedEra era -shelleyBasedEra') ([(TxIn, TxOut era)] -> IO ()) -> [(TxIn, TxOut era)] -> IO () +shelleyBasedEra') ([(TxIn, TxOut era)] -> IO ()) -> [(TxIn, TxOut era)] -> IO () forall a b. (a -> b) -> a -> b $ Map TxIn (TxOut era) -> [(TxIn, TxOut era)] forall k a. Map k a -> [(k, a)] Map.toList Map TxIn (TxOut era) -utxo +utxo ShelleyBasedEra era ShelleyBasedEraMary -> ((TxIn, TxOut era) -> IO ()) -> [(TxIn, TxOut era)] -> IO () @@ -2889,12 +2889,12 @@ mapM_ (ShelleyBasedEra era -> (TxIn, TxOut era) -> IO () forall era. ShelleyBasedEra era -> (TxIn, TxOut era) -> IO () printUtxo ShelleyBasedEra era -shelleyBasedEra') ([(TxIn, TxOut era)] -> IO ()) -> [(TxIn, TxOut era)] -> IO () +shelleyBasedEra') ([(TxIn, TxOut era)] -> IO ()) -> [(TxIn, TxOut era)] -> IO () forall a b. (a -> b) -> a -> b $ Map TxIn (TxOut era) -> [(TxIn, TxOut era)] forall k a. Map k a -> [(k, a)] Map.toList Map TxIn (TxOut era) -utxo +utxo ShelleyBasedEra era ShelleyBasedEraAlonzo -> ((TxIn, TxOut era) -> IO ()) -> [(TxIn, TxOut era)] -> IO () @@ -2904,38 +2904,38 @@ mapM_ (ShelleyBasedEra era -> (TxIn, TxOut era) -> IO () forall era. ShelleyBasedEra era -> (TxIn, TxOut era) -> IO () printUtxo ShelleyBasedEra era -shelleyBasedEra') ([(TxIn, TxOut era)] -> IO ()) -> [(TxIn, TxOut era)] -> IO () +shelleyBasedEra') ([(TxIn, TxOut era)] -> IO ()) -> [(TxIn, TxOut era)] -> IO () forall a b. (a -> b) -> a -> b $ Map TxIn (TxOut era) -> [(TxIn, TxOut era)] forall k a. Map k a -> [(k, a)] Map.toList Map TxIn (TxOut era) -utxo +utxo where - title :: Text - title :: Text -title = + title :: Text + title :: Text +title = Text " TxHash TxIx Amount" -printUtxo - :: ShelleyBasedEra era - -> (TxIn, TxOut era) +printUtxo + :: ShelleyBasedEra era + -> (TxIn, TxOut era) -> IO () printUtxo :: ShelleyBasedEra era -> (TxIn, TxOut era) -> IO () -printUtxo ShelleyBasedEra era -shelleyBasedEra' (TxIn, TxOut era) -txInOutTuple = +printUtxo ShelleyBasedEra era +shelleyBasedEra' (TxIn, TxOut era) +txInOutTuple = case ShelleyBasedEra era -shelleyBasedEra' of +shelleyBasedEra' of ShelleyBasedEra era ShelleyBasedEraShelley -> - let (TxIn (TxId Hash StandardCrypto EraIndependentTxBody -txhash) (TxIx Word -index), TxOut AddressInEra era -_ TxOutValue era -value TxOutDatumHash era + let (TxIn (TxId Hash StandardCrypto EraIndependentTxBody +txhash) (TxIx Word +index), TxOut AddressInEra era +_ TxOutValue era +value TxOutDatumHash era _) = (TxIn, TxOut era) -txInOutTuple +txInOutTuple in Text -> IO () Text.putStrLn (Text -> IO ()) -> Text -> IO () forall a b. (a -> b) -> a -> b @@ -2948,30 +2948,30 @@ forall h a. Hash h a -> ByteString hashToBytesAsHex Hash StandardCrypto EraIndependentTxBody Hash Blake2b_256 EraIndependentTxBody -txhash) +txhash) , Int -> Word -> Text forall a. Show a => Int -> a -> Text -textShowN Int +textShowN Int 6 Word -index +index , Text " " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> TxOutValue era -> Text forall era. TxOutValue era -> Text -printableValue TxOutValue era -value +printableValue TxOutValue era +value ] ShelleyBasedEra era ShelleyBasedEraAllegra -> - let (TxIn (TxId Hash StandardCrypto EraIndependentTxBody -txhash) (TxIx Word -index), TxOut AddressInEra era -_ TxOutValue era -value TxOutDatumHash era + let (TxIn (TxId Hash StandardCrypto EraIndependentTxBody +txhash) (TxIx Word +index), TxOut AddressInEra era +_ TxOutValue era +value TxOutDatumHash era _) = (TxIn, TxOut era) -txInOutTuple +txInOutTuple in Text -> IO () Text.putStrLn (Text -> IO ()) -> Text -> IO () forall a b. (a -> b) -> a -> b @@ -2984,29 +2984,29 @@ forall h a. Hash h a -> ByteString hashToBytesAsHex Hash StandardCrypto EraIndependentTxBody Hash Blake2b_256 EraIndependentTxBody -txhash) +txhash) , Int -> Word -> Text forall a. Show a => Int -> a -> Text -textShowN Int +textShowN Int 6 Word -index +index , Text " " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> TxOutValue era -> Text forall era. TxOutValue era -> Text -printableValue TxOutValue era -value +printableValue TxOutValue era +value ] ShelleyBasedEra era ShelleyBasedEraMary -> - let (TxIn (TxId Hash StandardCrypto EraIndependentTxBody -txhash) (TxIx Word -index), TxOut AddressInEra era -_ TxOutValue era -value TxOutDatumHash era + let (TxIn (TxId Hash StandardCrypto EraIndependentTxBody +txhash) (TxIx Word +index), TxOut AddressInEra era +_ TxOutValue era +value TxOutDatumHash era _) = (TxIn, TxOut era) -txInOutTuple +txInOutTuple in Text -> IO () Text.putStrLn (Text -> IO ()) -> Text -> IO () forall a b. (a -> b) -> a -> b @@ -3019,29 +3019,29 @@ forall h a. Hash h a -> ByteString hashToBytesAsHex Hash StandardCrypto EraIndependentTxBody Hash Blake2b_256 EraIndependentTxBody -txhash) +txhash) , Int -> Word -> Text forall a. Show a => Int -> a -> Text -textShowN Int +textShowN Int 6 Word -index +index , Text " " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> TxOutValue era -> Text forall era. TxOutValue era -> Text -printableValue TxOutValue era -value +printableValue TxOutValue era +value ] ShelleyBasedEra era ShelleyBasedEraAlonzo -> - let (TxIn (TxId Hash StandardCrypto EraIndependentTxBody -txhash) (TxIx Word -index), TxOut AddressInEra era -_ TxOutValue era -value TxOutDatumHash era + let (TxIn (TxId Hash StandardCrypto EraIndependentTxBody +txhash) (TxIx Word +index), TxOut AddressInEra era +_ TxOutValue era +value TxOutDatumHash era _) = (TxIn, TxOut era) -txInOutTuple +txInOutTuple in Text -> IO () Text.putStrLn (Text -> IO ()) -> Text -> IO () forall a b. (a -> b) -> a -> b @@ -3054,36 +3054,36 @@ forall h a. Hash h a -> ByteString hashToBytesAsHex Hash StandardCrypto EraIndependentTxBody Hash Blake2b_256 EraIndependentTxBody -txhash) +txhash) , Int -> Word -> Text forall a. Show a => Int -> a -> Text -textShowN Int +textShowN Int 6 Word -index +index , Text " " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> TxOutValue era -> Text forall era. TxOutValue era -> Text -printableValue TxOutValue era -value +printableValue TxOutValue era +value ] where - textShowN :: Show a => Int -> a -> Text - textShowN :: Int -> a -> Text -textShowN Int -len a -x = - let str :: String -str = a -> String + textShowN :: Show a => Int -> a -> Text + textShowN :: Int -> a -> Text +textShowN Int +len a +x = + let str :: String +str = a -> String forall a b. (Show a, ConvertText String b) => a -> b show a -x - slen :: Int -slen = String -> Int +x + slen :: Int +slen = String -> Int forall a. HasLength a => a -> Int length String -str +str in String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b @@ -3093,32 +3093,32 @@ forall a. Ord a => a -> a -> a max Int 1 (Int -len Int -> Int -> Int +len Int -> Int -> Int forall a. Num a => a -> a -> a - Int -slen)) Char +slen)) Char ' ' String -> ShowS forall a. [a] -> [a] -> [a] ++ String -str +str - printableValue :: TxOutValue era -> Text - printableValue :: TxOutValue era -> Text -printableValue (TxOutValue MultiAssetSupportedInEra era -_ Value -val) = RenderValueOptions -> Value -> Text + printableValue :: TxOutValue era -> Text + printableValue :: TxOutValue era -> Text +printableValue (TxOutValue MultiAssetSupportedInEra era +_ Value +val) = RenderValueOptions -> Value -> Text renderValue RenderValueOptions defaultRenderValueOptions Value -val - printableValue (TxOutAdaOnly OnlyAdaSupportedInEra era -_ (Lovelace Integer -i)) = String -> Text +val + printableValue (TxOutAdaOnly OnlyAdaSupportedInEra era +_ (Lovelace Integer +i)) = String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b $ Integer -> String forall a b. (Show a, ConvertText String b) => a -> b show Integer -i +i runQueryStakeDistribution @@ -3130,13 +3130,13 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyQueryCmdError IO () -runQueryStakeDistribution (AnyConsensusModeParams ConsensusModeParams mode -cModeParams) - NetworkId -network Maybe OutputFile -mOutFile = do - SocketPath String -sockPath <- (EnvSocketError -> ShelleyQueryCmdError) +runQueryStakeDistribution (AnyConsensusModeParams ConsensusModeParams mode +cModeParams) + NetworkId +network Maybe OutputFile +mOutFile = do + SocketPath String +sockPath <- (EnvSocketError -> ShelleyQueryCmdError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ShelleyQueryCmdError IO SocketPath forall (m :: * -> *) x y a. @@ -3145,20 +3145,20 @@ firstExceptT EnvSocketError -> ShelleyQueryCmdError ShelleyQueryCmdEnvVarSocketErr ExceptT EnvSocketError IO SocketPath readEnvSocketPath - let localNodeConnInfo :: LocalNodeConnectInfo mode -localNodeConnInfo = ConsensusModeParams mode + let localNodeConnInfo :: LocalNodeConnectInfo mode +localNodeConnInfo = ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo ConsensusModeParams mode -cModeParams NetworkId -network String -sockPath +cModeParams NetworkId +network String +sockPath - anyE :: AnyCardanoEra -anyE@(AnyCardanoEra CardanoEra era -era) <- ConsensusModeParams mode + anyE :: AnyCardanoEra +anyE@(AnyCardanoEra CardanoEra era +era) <- ConsensusModeParams mode -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall mode. @@ -3166,15 +3166,15 @@ -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra determineEra ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo - let cMode :: ConsensusMode mode -cMode = ConsensusModeParams mode -> ConsensusMode mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo + let cMode :: ConsensusMode mode +cMode = ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams - ShelleyBasedEra era -sbe <- CardanoEraStyle era +cModeParams + ShelleyBasedEra era +sbe <- CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) forall era. CardanoEraStyle era @@ -3187,19 +3187,19 @@ $ CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era +era case CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) forall era mode. CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era -era ConsensusMode mode -cMode of - Just EraInMode era mode -eInMode -> do - let query :: QueryInMode +era ConsensusMode mode +cMode of + Just EraInMode era mode +eInMode -> do + let query :: QueryInMode mode (Either EraMismatch (Map (Hash StakePoolKey) Rational)) -query = EraInMode era mode +query = EraInMode era mode -> QueryInEra era (Map (Hash StakePoolKey) Rational) -> QueryInMode mode (Either EraMismatch (Map (Hash StakePoolKey) Rational)) @@ -3208,7 +3208,7 @@ -> QueryInEra era result1 -> QueryInMode mode (Either EraMismatch result1) QueryInEra EraInMode era mode -eInMode +eInMode (QueryInEra era (Map (Hash StakePoolKey) Rational) -> QueryInMode mode (Either EraMismatch (Map (Hash StakePoolKey) Rational))) @@ -3227,7 +3227,7 @@ ShelleyBasedEra era -> QueryInShelleyBasedEra era result -> QueryInEra era result QueryInShelleyBasedEra ShelleyBasedEra era -sbe +sbe (QueryInShelleyBasedEra era (Map (Hash StakePoolKey) Rational) -> QueryInMode mode (Either EraMismatch (Map (Hash StakePoolKey) Rational))) @@ -3239,8 +3239,8 @@ forall era. QueryInShelleyBasedEra era (Map (Hash StakePoolKey) Rational) QueryStakeDistribution - Map (Hash StakePoolKey) Rational -result <- CardanoEra era + Map (Hash StakePoolKey) Rational +result <- CardanoEra era -> ConsensusModeParams mode -> LocalNodeConnectInfo mode -> QueryInMode @@ -3255,20 +3255,20 @@ -> ExceptT ShelleyQueryCmdError IO result executeQuery CardanoEra era -era +era ConsensusModeParams mode -cModeParams +cModeParams LocalNodeConnectInfo mode -localNodeConnInfo +localNodeConnInfo QueryInMode mode (Either EraMismatch (Map (Hash StakePoolKey) Rational)) -query +query Maybe OutputFile -> Map (Hash StakePoolKey) Rational -> ExceptT ShelleyQueryCmdError IO () writeStakeDistribution Maybe OutputFile -mOutFile Map (Hash StakePoolKey) Rational -result +mOutFile Map (Hash StakePoolKey) Rational +result Maybe (EraInMode era mode) Nothing -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -3279,8 +3279,8 @@ ShelleyQueryCmdEraConsensusModeMismatch (ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode ConsensusMode mode -cMode) AnyCardanoEra -anyE +cMode) AnyCardanoEra +anyE writeStakeDistribution @@ -3290,9 +3290,9 @@ writeStakeDistribution :: Maybe OutputFile -> Map (Hash StakePoolKey) Rational -> ExceptT ShelleyQueryCmdError IO () -writeStakeDistribution (Just (OutputFile String -outFile)) Map (Hash StakePoolKey) Rational -stakeDistrib = +writeStakeDistribution (Just (OutputFile String +outFile)) Map (Hash StakePoolKey) Rational +stakeDistrib = (IOException -> ShelleyQueryCmdError) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) x a. @@ -3309,20 +3309,20 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -outFile) (IO () -> ExceptT ShelleyQueryCmdError IO ()) +outFile) (IO () -> ExceptT ShelleyQueryCmdError IO ()) -> IO () -> ExceptT ShelleyQueryCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -outFile (Map (Hash StakePoolKey) Rational -> ByteString +outFile (Map (Hash StakePoolKey) Rational -> ByteString forall a. ToJSON a => a -> ByteString encodePretty Map (Hash StakePoolKey) Rational -stakeDistrib) +stakeDistrib) writeStakeDistribution Maybe OutputFile -Nothing Map (Hash StakePoolKey) Rational -stakeDistrib = +Nothing Map (Hash StakePoolKey) Rational +stakeDistrib = IO () -> ExceptT ShelleyQueryCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyQueryCmdError IO ()) @@ -3330,16 +3330,16 @@ forall a b. (a -> b) -> a -> b $ Map (Hash StakePoolKey) Rational -> IO () printStakeDistribution Map (Hash StakePoolKey) Rational -stakeDistrib +stakeDistrib printStakeDistribution :: Map PoolId Rational -> IO () printStakeDistribution :: Map (Hash StakePoolKey) Rational -> IO () -printStakeDistribution Map (Hash StakePoolKey) Rational -stakeDistrib = do +printStakeDistribution Map (Hash StakePoolKey) Rational +stakeDistrib = do Text -> IO () Text.putStrLn Text -title +title String -> IO () forall a (m :: * -> *). (Print a, MonadIO m) => a -> m () putStrLn (String -> IO ()) -> String -> IO () @@ -3348,7 +3348,7 @@ forall a. Int -> a -> [a] replicate (Text -> Int Text.length Text -title Int -> Int -> Int +title Int -> Int -> Int forall a. Num a => a -> a -> a + Int 2) Char @@ -3363,30 +3363,30 @@ putStrLn (String -> IO ()) -> String -> IO () forall a b. (a -> b) -> a -> b $ Hash StakePoolKey -> Rational -> String -showStakeDistr Hash StakePoolKey -poolId Rational -stakeFraction - | (Hash StakePoolKey -poolId, Rational -stakeFraction) <- Map (Hash StakePoolKey) Rational -> [(Hash StakePoolKey, Rational)] +showStakeDistr Hash StakePoolKey +poolId Rational +stakeFraction + | (Hash StakePoolKey +poolId, Rational +stakeFraction) <- Map (Hash StakePoolKey) Rational -> [(Hash StakePoolKey, Rational)] forall k a. Map k a -> [(k, a)] Map.toList Map (Hash StakePoolKey) Rational -stakeDistrib ] +stakeDistrib ] where - title :: Text - title :: Text -title = + title :: Text + title :: Text +title = Text " PoolId Stake frac" - showStakeDistr :: PoolId + showStakeDistr :: PoolId -> Rational -- ^ Stake fraction -> String - showStakeDistr :: Hash StakePoolKey -> Rational -> String -showStakeDistr Hash StakePoolKey -poolId Rational -stakeFraction = + showStakeDistr :: Hash StakePoolKey -> Rational -> String +showStakeDistr Hash StakePoolKey +poolId Rational +stakeFraction = [String] -> String forall (t :: * -> *) a. Foldable t => t [a] -> [a] concat @@ -3394,7 +3394,7 @@ Text.unpack (Hash StakePoolKey -> Text forall a. SerialiseAsBech32 a => a -> Text serialiseToBech32 Hash StakePoolKey -poolId) +poolId) , String " " , Maybe Int -> Double -> ShowS @@ -3405,7 +3405,7 @@ 3) (Rational -> Double forall a. Fractional a => Rational -> a fromRational Rational -stakeFraction :: Double) String +stakeFraction :: Double) String "" ] @@ -3418,23 +3418,23 @@ mergeDelegsAndRewards :: DelegationsAndRewards -> [(StakeAddress, Maybe Lovelace, Maybe PoolId)] mergeDelegsAndRewards :: DelegationsAndRewards -> [(StakeAddress, Maybe Lovelace, Maybe (Hash StakePoolKey))] -mergeDelegsAndRewards (DelegationsAndRewards (Map StakeAddress Lovelace -rewardsMap, Map StakeAddress (Hash StakePoolKey) -delegMap)) = +mergeDelegsAndRewards (DelegationsAndRewards (Map StakeAddress Lovelace +rewardsMap, Map StakeAddress (Hash StakePoolKey) +delegMap)) = [ (StakeAddress -stakeAddr, StakeAddress -> Map StakeAddress Lovelace -> Maybe Lovelace +stakeAddr, StakeAddress -> Map StakeAddress Lovelace -> Maybe Lovelace forall k a. Ord k => k -> Map k a -> Maybe a Map.lookup StakeAddress -stakeAddr Map StakeAddress Lovelace -rewardsMap, StakeAddress +stakeAddr Map StakeAddress Lovelace +rewardsMap, StakeAddress -> Map StakeAddress (Hash StakePoolKey) -> Maybe (Hash StakePoolKey) forall k a. Ord k => k -> Map k a -> Maybe a Map.lookup StakeAddress -stakeAddr Map StakeAddress (Hash StakePoolKey) -delegMap) - | StakeAddress -stakeAddr <- [StakeAddress] -> [StakeAddress] +stakeAddr Map StakeAddress (Hash StakePoolKey) +delegMap) + | StakeAddress +stakeAddr <- [StakeAddress] -> [StakeAddress] forall a. Eq a => [a] -> [a] nub ([StakeAddress] -> [StakeAddress]) -> [StakeAddress] -> [StakeAddress] @@ -3442,19 +3442,19 @@ $ Map StakeAddress Lovelace -> [StakeAddress] forall k a. Map k a -> [k] Map.keys Map StakeAddress Lovelace -rewardsMap [StakeAddress] -> [StakeAddress] -> [StakeAddress] +rewardsMap [StakeAddress] -> [StakeAddress] -> [StakeAddress] forall a. [a] -> [a] -> [a] ++ Map StakeAddress (Hash StakePoolKey) -> [StakeAddress] forall k a. Map k a -> [k] Map.keys Map StakeAddress (Hash StakePoolKey) -delegMap +delegMap ] -instance ToJSON DelegationsAndRewards where - toJSON :: DelegationsAndRewards -> Value -toJSON DelegationsAndRewards -delegsAndRwds = +instance ToJSON DelegationsAndRewards where + toJSON :: DelegationsAndRewards -> Value +toJSON DelegationsAndRewards +delegsAndRwds = Array -> Value Aeson.Array (Array -> Value) -> ([(StakeAddress, Maybe Lovelace, Maybe (Hash StakePoolKey))] @@ -3481,7 +3481,7 @@ -> [Value] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map (StakeAddress, Maybe Lovelace, Maybe (Hash StakePoolKey)) -> Value -delegAndRwdToJson ([(StakeAddress, Maybe Lovelace, Maybe (Hash StakePoolKey))] +delegAndRwdToJson ([(StakeAddress, Maybe Lovelace, Maybe (Hash StakePoolKey))] -> Value) -> [(StakeAddress, Maybe Lovelace, Maybe (Hash StakePoolKey))] -> Value @@ -3489,14 +3489,14 @@ $ DelegationsAndRewards -> [(StakeAddress, Maybe Lovelace, Maybe (Hash StakePoolKey))] mergeDelegsAndRewards DelegationsAndRewards -delegsAndRwds +delegsAndRwds where - delegAndRwdToJson :: (StakeAddress, Maybe Lovelace, Maybe PoolId) -> Aeson.Value - delegAndRwdToJson :: (StakeAddress, Maybe Lovelace, Maybe (Hash StakePoolKey)) -> Value -delegAndRwdToJson (StakeAddress -addr, Maybe Lovelace -mRewards, Maybe (Hash StakePoolKey) -mPoolId) = + delegAndRwdToJson :: (StakeAddress, Maybe Lovelace, Maybe PoolId) -> Aeson.Value + delegAndRwdToJson :: (StakeAddress, Maybe Lovelace, Maybe (Hash StakePoolKey)) -> Value +delegAndRwdToJson (StakeAddress +addr, Maybe Lovelace +mRewards, Maybe (Hash StakePoolKey) +mPoolId) = [(Text, Value)] -> Value Aeson.object [ Text @@ -3505,31 +3505,31 @@ .= StakeAddress -> Text forall addr. SerialiseAddress addr => addr -> Text serialiseAddress StakeAddress -addr +addr , Text "delegation" Text -> Maybe (Hash StakePoolKey) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe (Hash StakePoolKey) -mPoolId +mPoolId , Text "rewardAccountBalance" Text -> Maybe Lovelace -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe Lovelace -mRewards +mRewards ] -- Helpers -calcEraInMode - :: CardanoEra era - -> ConsensusMode mode - -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode) +calcEraInMode + :: CardanoEra era + -> ConsensusMode mode + -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode) calcEraInMode :: CardanoEra era -> ConsensusMode mode -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode) -calcEraInMode CardanoEra era -era ConsensusMode mode -mode= +calcEraInMode CardanoEra era +era ConsensusMode mode +mode= ShelleyQueryCmdError -> Maybe (EraInMode era mode) -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode) @@ -3538,10 +3538,10 @@ ShelleyQueryCmdEraConsensusModeMismatch (ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode ConsensusMode mode -mode) (CardanoEra era -> AnyCardanoEra +mode) (CardanoEra era -> AnyCardanoEra forall era. CardanoEra era -> AnyCardanoEra anyCardanoEra CardanoEra era -era)) +era)) (Maybe (EraInMode era mode) -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode)) -> Maybe (EraInMode era mode) @@ -3551,23 +3551,23 @@ forall era mode. CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era -era ConsensusMode mode -mode +era ConsensusMode mode +mode -determineEra - :: ConsensusModeParams mode - -> LocalNodeConnectInfo mode +determineEra + :: ConsensusModeParams mode + -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra determineEra :: ConsensusModeParams mode -> LocalNodeConnectInfo mode -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra -determineEra ConsensusModeParams mode -cModeParams LocalNodeConnectInfo mode -localNodeConnInfo = +determineEra ConsensusModeParams mode +cModeParams LocalNodeConnectInfo mode +localNodeConnInfo = case ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams of +cModeParams of ConsensusMode mode ByronMode -> AnyCardanoEra -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall (m :: * -> *) a. Monad m => a -> m a @@ -3590,8 +3590,8 @@ ShelleyEra ConsensusMode mode CardanoMode -> do - Either AcquireFailure AnyCardanoEra -eraQ <- IO (Either AcquireFailure AnyCardanoEra) + Either AcquireFailure AnyCardanoEra +eraQ <- IO (Either AcquireFailure AnyCardanoEra) -> ExceptT ShelleyQueryCmdError IO (Either AcquireFailure AnyCardanoEra) forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -3616,7 +3616,7 @@ -> QueryInMode mode result -> IO (Either AcquireFailure result) queryNodeLocalState LocalNodeConnectInfo mode -localNodeConnInfo Maybe ChainPoint +localNodeConnInfo Maybe ChainPoint forall a. Maybe a Nothing (QueryInMode CardanoMode AnyCardanoEra @@ -3633,9 +3633,9 @@ QueryCurrentEra ConsensusModeIsMultiEra CardanoMode CardanoModeIsMultiEra case Either AcquireFailure AnyCardanoEra -eraQ of - Left AcquireFailure -acqFail -> ShelleyQueryCmdError +eraQ of + Left AcquireFailure +acqFail -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (ShelleyQueryCmdError @@ -3645,31 +3645,31 @@ forall a b. (a -> b) -> a -> b $ AcquireFailure -> ShelleyQueryCmdError ShelleyQueryCmdAcquireFailure AcquireFailure -acqFail - Right AnyCardanoEra -anyCarEra -> AnyCardanoEra -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra +acqFail + Right AnyCardanoEra +anyCarEra -> AnyCardanoEra -> ExceptT ShelleyQueryCmdError IO AnyCardanoEra forall (m :: * -> *) a. Monad m => a -> m a return AnyCardanoEra -anyCarEra +anyCarEra executeQuery - :: forall result era mode. CardanoEra era - -> ConsensusModeParams mode - -> LocalNodeConnectInfo mode - -> QueryInMode mode (Either EraMismatch result) - -> ExceptT ShelleyQueryCmdError IO result + :: forall result era mode. CardanoEra era + -> ConsensusModeParams mode + -> LocalNodeConnectInfo mode + -> QueryInMode mode (Either EraMismatch result) + -> ExceptT ShelleyQueryCmdError IO result executeQuery :: CardanoEra era -> ConsensusModeParams mode -> LocalNodeConnectInfo mode -> QueryInMode mode (Either EraMismatch result) -> ExceptT ShelleyQueryCmdError IO result -executeQuery CardanoEra era -era ConsensusModeParams mode -cModeP LocalNodeConnectInfo mode -localNodeConnInfo QueryInMode mode (Either EraMismatch result) -q = do - EraInMode era mode -eraInMode <- CardanoEra era +executeQuery CardanoEra era +era ConsensusModeParams mode +cModeP LocalNodeConnectInfo mode +localNodeConnInfo QueryInMode mode (Either EraMismatch result) +q = do + EraInMode era mode +eraInMode <- CardanoEra era -> ConsensusMode mode -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode) forall era mode. @@ -3677,7 +3677,7 @@ -> ConsensusMode mode -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode) calcEraInMode CardanoEra era -era (ConsensusMode mode +era (ConsensusMode mode -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode)) -> ConsensusMode mode -> ExceptT ShelleyQueryCmdError IO (EraInMode era mode) @@ -3685,9 +3685,9 @@ $ ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeP +cModeP case EraInMode era mode -eraInMode of +eraInMode of EraInMode era mode ByronEraInByronMode -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO result forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -3701,7 +3701,7 @@ (Either AcquireFailure (Either EraMismatch result)) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO IO (Either AcquireFailure (Either EraMismatch result)) -execQuery ExceptT +execQuery ExceptT ShelleyQueryCmdError IO (Either AcquireFailure (Either EraMismatch result)) @@ -3716,9 +3716,9 @@ -> ExceptT ShelleyQueryCmdError IO a queryResult where - execQuery :: IO (Either AcquireFailure (Either EraMismatch result)) - execQuery :: IO (Either AcquireFailure (Either EraMismatch result)) -execQuery = LocalNodeConnectInfo mode + execQuery :: IO (Either AcquireFailure (Either EraMismatch result)) + execQuery :: IO (Either AcquireFailure (Either EraMismatch result)) +execQuery = LocalNodeConnectInfo mode -> Maybe ChainPoint -> QueryInMode mode (Either EraMismatch result) -> IO (Either AcquireFailure (Either EraMismatch result)) @@ -3728,12 +3728,12 @@ -> QueryInMode mode result -> IO (Either AcquireFailure result) queryNodeLocalState LocalNodeConnectInfo mode -localNodeConnInfo Maybe ChainPoint +localNodeConnInfo Maybe ChainPoint forall a. Maybe a Nothing QueryInMode mode (Either EraMismatch result) -q +q -getSbe :: CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) +getSbe :: CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) getSbe :: CardanoEraStyle era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) getSbe CardanoEraStyle era @@ -3742,37 +3742,37 @@ forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left ShelleyQueryCmdError ShelleyQueryCmdByronEra -getSbe (ShelleyBasedEra ShelleyBasedEra era -sbe) = ShelleyBasedEra era +getSbe (ShelleyBasedEra ShelleyBasedEra era +sbe) = ShelleyBasedEra era -> ExceptT ShelleyQueryCmdError IO (ShelleyBasedEra era) forall (m :: * -> *) a. Monad m => a -> m a return ShelleyBasedEra era -sbe +sbe -queryResult - :: Either AcquireFailure (Either EraMismatch a) - -> ExceptT ShelleyQueryCmdError IO a +queryResult + :: Either AcquireFailure (Either EraMismatch a) + -> ExceptT ShelleyQueryCmdError IO a queryResult :: Either AcquireFailure (Either EraMismatch a) -> ExceptT ShelleyQueryCmdError IO a -queryResult Either AcquireFailure (Either EraMismatch a) -eAcq = +queryResult Either AcquireFailure (Either EraMismatch a) +eAcq = case Either AcquireFailure (Either EraMismatch a) -eAcq of - Left AcquireFailure -acqFailure -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO a +eAcq of + Left AcquireFailure +acqFailure -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO a forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO a) -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO a forall a b. (a -> b) -> a -> b $ AcquireFailure -> ShelleyQueryCmdError ShelleyQueryCmdAcquireFailure AcquireFailure -acqFailure - Right Either EraMismatch a -eResult -> +acqFailure + Right Either EraMismatch a +eResult -> case Either EraMismatch a -eResult of - Left EraMismatch -err -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO a +eResult of + Left EraMismatch +err -> ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO a forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (ShelleyQueryCmdError -> ExceptT ShelleyQueryCmdError IO a) -> (ShelleyQueryCmdLocalStateQueryError -> ShelleyQueryCmdError) @@ -3789,21 +3789,21 @@ forall a b. (a -> b) -> a -> b $ EraMismatch -> ShelleyQueryCmdLocalStateQueryError EraMismatchError EraMismatch -err - Right a -result -> a -> ExceptT ShelleyQueryCmdError IO a +err + Right a +result -> a -> ExceptT ShelleyQueryCmdError IO a forall (m :: * -> *) a. Monad m => a -> m a return a -result +result -obtainLedgerEraClassConstraints - :: ShelleyLedgerEra era ~ ledgerera - => ShelleyBasedEra era - -> ((Ledger.ShelleyBased ledgerera - , ToJSON (DebugLedgerState era) - , FromCBOR (DebugLedgerState era) - , Era.Crypto ledgerera ~ StandardCrypto - ) => a) -> a +obtainLedgerEraClassConstraints + :: ShelleyLedgerEra era ~ ledgerera + => ShelleyBasedEra era + -> ((Ledger.ShelleyBased ledgerera + , ToJSON (DebugLedgerState era) + , FromCBOR (DebugLedgerState era) + , Era.Crypto ledgerera ~ StandardCrypto + ) => a) -> a obtainLedgerEraClassConstraints :: ShelleyBasedEra era -> ((ShelleyBased ledgerera, ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), @@ -3811,47 +3811,47 @@ a) -> a obtainLedgerEraClassConstraints ShelleyBasedEra era -ShelleyBasedEraShelley (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), +ShelleyBasedEraShelley (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), Crypto ledgerera ~ StandardCrypto) => a -f = a +f = a (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), Crypto ledgerera ~ StandardCrypto) => a -f +f obtainLedgerEraClassConstraints ShelleyBasedEra era -ShelleyBasedEraAllegra (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), +ShelleyBasedEraAllegra (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), Crypto ledgerera ~ StandardCrypto) => a -f = a +f = a (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), Crypto ledgerera ~ StandardCrypto) => a -f +f obtainLedgerEraClassConstraints ShelleyBasedEra era -ShelleyBasedEraMary (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), +ShelleyBasedEraMary (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), Crypto ledgerera ~ StandardCrypto) => a -f = a +f = a (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), Crypto ledgerera ~ StandardCrypto) => a -f +f obtainLedgerEraClassConstraints ShelleyBasedEra era -ShelleyBasedEraAlonzo (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), +ShelleyBasedEraAlonzo (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), Crypto ledgerera ~ StandardCrypto) => a -f = a +f = a (ShelleyBased ledgerera, ToJSON (DebugLedgerState era), FromCBOR (DebugLedgerState era), Crypto ledgerera ~ StandardCrypto) => a -f +f \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.StakeAddress.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.StakeAddress.html index 4454dabb04c..b806f35fbd4 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.StakeAddress.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.StakeAddress.html @@ -25,7 +25,7 @@ data ShelleyStakeAddressCmdError = ShelleyStakeAddressCmdReadKeyFileError !(FileError InputDecodeError) | ShelleyStakeAddressCmdWriteFileError !(FileError ()) - deriving Int -> ShelleyStakeAddressCmdError -> ShowS + deriving Int -> ShelleyStakeAddressCmdError -> ShowS [ShelleyStakeAddressCmdError] -> ShowS ShelleyStakeAddressCmdError -> String (Int -> ShelleyStakeAddressCmdError -> ShowS) @@ -44,79 +44,79 @@ renderShelleyStakeAddressCmdError :: ShelleyStakeAddressCmdError -> Text renderShelleyStakeAddressCmdError :: ShelleyStakeAddressCmdError -> Text -renderShelleyStakeAddressCmdError ShelleyStakeAddressCmdError -err = +renderShelleyStakeAddressCmdError ShelleyStakeAddressCmdError +err = case ShelleyStakeAddressCmdError -err of - ShelleyStakeAddressCmdReadKeyFileError FileError InputDecodeError -fileErr -> String -> Text +err of + ShelleyStakeAddressCmdReadKeyFileError FileError InputDecodeError +fileErr -> String -> Text Text.pack (FileError InputDecodeError -> String forall e. Error e => e -> String displayError FileError InputDecodeError -fileErr) - ShelleyStakeAddressCmdWriteFileError FileError () -fileErr -> String -> Text +fileErr) + ShelleyStakeAddressCmdWriteFileError FileError () +fileErr -> String -> Text Text.pack (FileError () -> String forall e. Error e => e -> String displayError FileError () -fileErr) +fileErr) runStakeAddressCmd :: StakeAddressCmd -> ExceptT ShelleyStakeAddressCmdError IO () runStakeAddressCmd :: StakeAddressCmd -> ExceptT ShelleyStakeAddressCmdError IO () -runStakeAddressCmd (StakeAddressKeyGen VerificationKeyFile -vk SigningKeyFile -sk) = VerificationKeyFile +runStakeAddressCmd (StakeAddressKeyGen VerificationKeyFile +vk SigningKeyFile +sk) = VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyStakeAddressCmdError IO () runStakeAddressKeyGen VerificationKeyFile -vk SigningKeyFile -sk -runStakeAddressCmd (StakeAddressKeyHash VerificationKeyOrFile StakeKey -vk Maybe OutputFile -mOutputFp) = VerificationKeyOrFile StakeKey +vk SigningKeyFile +sk +runStakeAddressCmd (StakeAddressKeyHash VerificationKeyOrFile StakeKey +vk Maybe OutputFile +mOutputFp) = VerificationKeyOrFile StakeKey -> Maybe OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () runStakeAddressKeyHash VerificationKeyOrFile StakeKey -vk Maybe OutputFile -mOutputFp -runStakeAddressCmd (StakeAddressBuild VerificationKeyOrFile StakeKey -vk NetworkId -nw Maybe OutputFile -mOutputFp) = VerificationKeyOrFile StakeKey +vk Maybe OutputFile +mOutputFp +runStakeAddressCmd (StakeAddressBuild VerificationKeyOrFile StakeKey +vk NetworkId +nw Maybe OutputFile +mOutputFp) = VerificationKeyOrFile StakeKey -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () runStakeAddressBuild VerificationKeyOrFile StakeKey -vk NetworkId -nw Maybe OutputFile -mOutputFp -runStakeAddressCmd (StakeKeyRegistrationCert VerificationKeyOrFile StakeKey -stkKeyVerKeyOrFp OutputFile -outputFp) = +vk NetworkId +nw Maybe OutputFile +mOutputFp +runStakeAddressCmd (StakeKeyRegistrationCert VerificationKeyOrFile StakeKey +stkKeyVerKeyOrFp OutputFile +outputFp) = VerificationKeyOrFile StakeKey -> OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () runStakeKeyRegistrationCert VerificationKeyOrFile StakeKey -stkKeyVerKeyOrFp OutputFile -outputFp -runStakeAddressCmd (StakeKeyDelegationCert VerificationKeyOrFile StakeKey -stkKeyVerKeyOrFp VerificationKeyOrHashOrFile StakePoolKey -stkPoolVerKeyHashOrFp OutputFile -outputFp) = +stkKeyVerKeyOrFp OutputFile +outputFp +runStakeAddressCmd (StakeKeyDelegationCert VerificationKeyOrFile StakeKey +stkKeyVerKeyOrFp VerificationKeyOrHashOrFile StakePoolKey +stkPoolVerKeyHashOrFp OutputFile +outputFp) = VerificationKeyOrFile StakeKey -> VerificationKeyOrHashOrFile StakePoolKey -> OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () runStakeKeyDelegationCert VerificationKeyOrFile StakeKey -stkKeyVerKeyOrFp VerificationKeyOrHashOrFile StakePoolKey -stkPoolVerKeyHashOrFp OutputFile -outputFp -runStakeAddressCmd (StakeKeyDeRegistrationCert VerificationKeyOrFile StakeKey -stkKeyVerKeyOrFp OutputFile -outputFp) = +stkKeyVerKeyOrFp VerificationKeyOrHashOrFile StakePoolKey +stkPoolVerKeyHashOrFp OutputFile +outputFp +runStakeAddressCmd (StakeKeyDeRegistrationCert VerificationKeyOrFile StakeKey +stkKeyVerKeyOrFp OutputFile +outputFp) = VerificationKeyOrFile StakeKey -> OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () runStakeKeyDeRegistrationCert VerificationKeyOrFile StakeKey -stkKeyVerKeyOrFp OutputFile -outputFp +stkKeyVerKeyOrFp OutputFile +outputFp -- @@ -126,11 +126,11 @@ runStakeAddressKeyGen :: VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyStakeAddressCmdError IO () runStakeAddressKeyGen :: VerificationKeyFile -> SigningKeyFile -> ExceptT ShelleyStakeAddressCmdError IO () -runStakeAddressKeyGen (VerificationKeyFile String -vkFp) (SigningKeyFile String -skFp) = do - SigningKey StakeKey -skey <- IO (SigningKey StakeKey) +runStakeAddressKeyGen (VerificationKeyFile String +vkFp) (SigningKeyFile String +skFp) = do + SigningKey StakeKey +skey <- IO (SigningKey StakeKey) -> ExceptT ShelleyStakeAddressCmdError IO (SigningKey StakeKey) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (SigningKey StakeKey) @@ -144,13 +144,13 @@ AsType keyrole -> IO (SigningKey keyrole) generateSigningKey AsType StakeKey AsStakeKey - let vkey :: VerificationKey StakeKey -vkey = SigningKey StakeKey -> VerificationKey StakeKey + let vkey :: VerificationKey StakeKey +vkey = SigningKey StakeKey -> VerificationKey StakeKey forall keyrole. Key keyrole => SigningKey keyrole -> VerificationKey keyrole getVerificationKey SigningKey StakeKey -skey +skey (FileError () -> ShelleyStakeAddressCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyStakeAddressCmdError IO () @@ -184,11 +184,11 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -skFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +skFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -skeyDesc) SigningKey StakeKey -skey +skeyDesc) SigningKey StakeKey +skey (FileError () -> ShelleyStakeAddressCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyStakeAddressCmdError IO () @@ -222,18 +222,18 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -vkFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +vkFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -vkeyDesc) VerificationKey StakeKey -vkey +vkeyDesc) VerificationKey StakeKey +vkey where - skeyDesc, vkeyDesc :: TextEnvelopeDescr - skeyDesc :: TextEnvelopeDescr -skeyDesc = TextEnvelopeDescr + skeyDesc, vkeyDesc :: TextEnvelopeDescr + skeyDesc :: TextEnvelopeDescr +skeyDesc = TextEnvelopeDescr "Stake Signing Key" - vkeyDesc :: TextEnvelopeDescr -vkeyDesc = TextEnvelopeDescr + vkeyDesc :: TextEnvelopeDescr +vkeyDesc = TextEnvelopeDescr "Stake Verification Key" runStakeAddressKeyHash @@ -242,11 +242,11 @@ -> ExceptT ShelleyStakeAddressCmdError IO () runStakeAddressKeyHash :: VerificationKeyOrFile StakeKey -> Maybe OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () -runStakeAddressKeyHash VerificationKeyOrFile StakeKey -stakeVerKeyOrFile Maybe OutputFile -mOutputFp = do - VerificationKey StakeKey -vkey <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) +runStakeAddressKeyHash VerificationKeyOrFile StakeKey +stakeVerKeyOrFile Maybe OutputFile +mOutputFp = do + VerificationKey StakeKey +vkey <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey StakeKey) -> ExceptT @@ -297,30 +297,30 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType StakeKey AsStakeKey VerificationKeyOrFile StakeKey -stakeVerKeyOrFile +stakeVerKeyOrFile - let hexKeyHash :: ByteString -hexKeyHash = Hash StakeKey -> ByteString + let hexKeyHash :: ByteString +hexKeyHash = Hash StakeKey -> ByteString forall a. SerialiseAsRawBytes a => a -> ByteString serialiseToRawBytesHex (VerificationKey StakeKey -> Hash StakeKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakeKey -vkey) +vkey) case Maybe OutputFile -mOutputFp of - Just (OutputFile String -fpath) -> IO () -> ExceptT ShelleyStakeAddressCmdError IO () +mOutputFp of + Just (OutputFile String +fpath) -> IO () -> ExceptT ShelleyStakeAddressCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyStakeAddressCmdError IO ()) -> IO () -> ExceptT ShelleyStakeAddressCmdError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () BS.writeFile String -fpath ByteString -hexKeyHash +fpath ByteString +hexKeyHash Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyStakeAddressCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -329,7 +329,7 @@ forall a b. (a -> b) -> a -> b $ ByteString -> IO () BS.putStrLn ByteString -hexKeyHash +hexKeyHash runStakeAddressBuild :: VerificationKeyOrFile StakeKey -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () @@ -337,12 +337,12 @@ -> NetworkId -> Maybe OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () -runStakeAddressBuild VerificationKeyOrFile StakeKey -stakeVerKeyOrFile NetworkId -network Maybe OutputFile -mOutputFp = do - VerificationKey StakeKey -stakeVerKey <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) +runStakeAddressBuild VerificationKeyOrFile StakeKey +stakeVerKeyOrFile NetworkId +network Maybe OutputFile +mOutputFp = do + VerificationKey StakeKey +stakeVerKey <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey StakeKey) -> ExceptT @@ -393,39 +393,39 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType StakeKey AsStakeKey VerificationKeyOrFile StakeKey -stakeVerKeyOrFile +stakeVerKeyOrFile - let stakeCred :: StakeCredential -stakeCred = Hash StakeKey -> StakeCredential + let stakeCred :: StakeCredential +stakeCred = Hash StakeKey -> StakeCredential StakeCredentialByKey (VerificationKey StakeKey -> Hash StakeKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakeKey -stakeVerKey) - stakeAddr :: StakeAddress -stakeAddr = NetworkId -> StakeCredential -> StakeAddress +stakeVerKey) + stakeAddr :: StakeAddress +stakeAddr = NetworkId -> StakeCredential -> StakeAddress makeStakeAddress NetworkId -network StakeCredential -stakeCred - stakeAddrText :: Text -stakeAddrText = StakeAddress -> Text +network StakeCredential +stakeCred + stakeAddrText :: Text +stakeAddrText = StakeAddress -> Text forall addr. SerialiseAddress addr => addr -> Text serialiseAddress StakeAddress -stakeAddr +stakeAddr case Maybe OutputFile -mOutputFp of - Just (OutputFile String -fpath) -> IO () -> ExceptT ShelleyStakeAddressCmdError IO () +mOutputFp of + Just (OutputFile String +fpath) -> IO () -> ExceptT ShelleyStakeAddressCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyStakeAddressCmdError IO ()) -> IO () -> ExceptT ShelleyStakeAddressCmdError IO () forall a b. (a -> b) -> a -> b $ String -> Text -> IO () Text.writeFile String -fpath Text -stakeAddrText +fpath Text +stakeAddrText Maybe OutputFile Nothing -> IO () -> ExceptT ShelleyStakeAddressCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -434,7 +434,7 @@ forall a b. (a -> b) -> a -> b $ Text -> IO () Text.putStrLn Text -stakeAddrText +stakeAddrText runStakeKeyRegistrationCert @@ -443,11 +443,11 @@ -> ExceptT ShelleyStakeAddressCmdError IO () runStakeKeyRegistrationCert :: VerificationKeyOrFile StakeKey -> OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () -runStakeKeyRegistrationCert VerificationKeyOrFile StakeKey -stakeVerKeyOrFile (OutputFile String -oFp) = do - VerificationKey StakeKey -stakeVerKey <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) +runStakeKeyRegistrationCert VerificationKeyOrFile StakeKey +stakeVerKeyOrFile (OutputFile String +oFp) = do + VerificationKey StakeKey +stakeVerKey <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey StakeKey) -> ExceptT @@ -498,19 +498,19 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType StakeKey AsStakeKey VerificationKeyOrFile StakeKey -stakeVerKeyOrFile - let stakeCred :: StakeCredential -stakeCred = Hash StakeKey -> StakeCredential +stakeVerKeyOrFile + let stakeCred :: StakeCredential +stakeCred = Hash StakeKey -> StakeCredential StakeCredentialByKey (VerificationKey StakeKey -> Hash StakeKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakeKey -stakeVerKey) - regCert :: Certificate -regCert = StakeCredential -> Certificate +stakeVerKey) + regCert :: Certificate +regCert = StakeCredential -> Certificate makeStakeAddressRegistrationCertificate StakeCredential -stakeCred +stakeCred (FileError () -> ShelleyStakeAddressCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyStakeAddressCmdError IO () @@ -544,15 +544,15 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -oFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +oFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -regCertDesc) Certificate -regCert +regCertDesc) Certificate +regCert where - regCertDesc :: TextEnvelopeDescr - regCertDesc :: TextEnvelopeDescr -regCertDesc = TextEnvelopeDescr + regCertDesc :: TextEnvelopeDescr + regCertDesc :: TextEnvelopeDescr +regCertDesc = TextEnvelopeDescr "Stake Address Registration Certificate" @@ -568,12 +568,12 @@ -> VerificationKeyOrHashOrFile StakePoolKey -> OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () -runStakeKeyDelegationCert VerificationKeyOrFile StakeKey -stakeVerKeyOrFile VerificationKeyOrHashOrFile StakePoolKey -poolVKeyOrHashOrFile (OutputFile String -outFp) = do - VerificationKey StakeKey -stakeVkey <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) +runStakeKeyDelegationCert VerificationKeyOrFile StakeKey +stakeVerKeyOrFile VerificationKeyOrHashOrFile StakePoolKey +poolVKeyOrHashOrFile (OutputFile String +outFp) = do + VerificationKey StakeKey +stakeVkey <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey StakeKey) -> ExceptT @@ -624,10 +624,10 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType StakeKey AsStakeKey VerificationKeyOrFile StakeKey -stakeVerKeyOrFile +stakeVerKeyOrFile - Hash StakePoolKey -poolStakeVKeyHash <- + Hash StakePoolKey +poolStakeVKeyHash <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) -> ExceptT (FileError InputDecodeError) IO (Hash StakePoolKey) -> ExceptT ShelleyStakeAddressCmdError IO (Hash StakePoolKey) @@ -655,23 +655,23 @@ -> IO (Either (FileError InputDecodeError) (Hash keyrole)) readVerificationKeyOrHashOrFile AsType StakePoolKey AsStakePoolKey VerificationKeyOrHashOrFile StakePoolKey -poolVKeyOrHashOrFile) +poolVKeyOrHashOrFile) - let stakeCred :: StakeCredential -stakeCred = Hash StakeKey -> StakeCredential + let stakeCred :: StakeCredential +stakeCred = Hash StakeKey -> StakeCredential StakeCredentialByKey (VerificationKey StakeKey -> Hash StakeKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakeKey -stakeVkey) - delegCert :: Certificate -delegCert = StakeCredential -> Hash StakePoolKey -> Certificate +stakeVkey) + delegCert :: Certificate +delegCert = StakeCredential -> Hash StakePoolKey -> Certificate makeStakeAddressDelegationCertificate StakeCredential -stakeCred +stakeCred Hash StakePoolKey -poolStakeVKeyHash +poolStakeVKeyHash (FileError () -> ShelleyStakeAddressCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyStakeAddressCmdError IO () @@ -705,15 +705,15 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -outFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +outFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -delegCertDesc) Certificate -delegCert +delegCertDesc) Certificate +delegCert where - delegCertDesc :: TextEnvelopeDescr - delegCertDesc :: TextEnvelopeDescr -delegCertDesc = TextEnvelopeDescr + delegCertDesc :: TextEnvelopeDescr + delegCertDesc :: TextEnvelopeDescr +delegCertDesc = TextEnvelopeDescr "Stake Address Delegation Certificate" @@ -723,11 +723,11 @@ -> ExceptT ShelleyStakeAddressCmdError IO () runStakeKeyDeRegistrationCert :: VerificationKeyOrFile StakeKey -> OutputFile -> ExceptT ShelleyStakeAddressCmdError IO () -runStakeKeyDeRegistrationCert VerificationKeyOrFile StakeKey -stakeVerKeyOrFile (OutputFile String -oFp) = do - VerificationKey StakeKey -stakeVkey <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) +runStakeKeyDeRegistrationCert VerificationKeyOrFile StakeKey +stakeVerKeyOrFile (OutputFile String +oFp) = do + VerificationKey StakeKey +stakeVkey <- (FileError InputDecodeError -> ShelleyStakeAddressCmdError) -> ExceptT (FileError InputDecodeError) IO (VerificationKey StakeKey) -> ExceptT @@ -778,19 +778,19 @@ (Either (FileError InputDecodeError) (VerificationKey keyrole)) readVerificationKeyOrFile AsType StakeKey AsStakeKey VerificationKeyOrFile StakeKey -stakeVerKeyOrFile - let stakeCred :: StakeCredential -stakeCred = Hash StakeKey -> StakeCredential +stakeVerKeyOrFile + let stakeCred :: StakeCredential +stakeCred = Hash StakeKey -> StakeCredential StakeCredentialByKey (VerificationKey StakeKey -> Hash StakeKey forall keyrole. Key keyrole => VerificationKey keyrole -> Hash keyrole verificationKeyHash VerificationKey StakeKey -stakeVkey) - deRegCert :: Certificate -deRegCert = StakeCredential -> Certificate +stakeVkey) + deRegCert :: Certificate +deRegCert = StakeCredential -> Certificate makeStakeAddressDeregistrationCertificate StakeCredential -stakeCred +stakeCred (FileError () -> ShelleyStakeAddressCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyStakeAddressCmdError IO () @@ -824,14 +824,14 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -oFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr +oFp (TextEnvelopeDescr -> Maybe TextEnvelopeDescr forall a. a -> Maybe a Just TextEnvelopeDescr -deregCertDesc) Certificate -deRegCert +deregCertDesc) Certificate +deRegCert where - deregCertDesc :: TextEnvelopeDescr - deregCertDesc :: TextEnvelopeDescr -deregCertDesc = TextEnvelopeDescr + deregCertDesc :: TextEnvelopeDescr + deregCertDesc :: TextEnvelopeDescr +deregCertDesc = TextEnvelopeDescr "Stake Address Deregistration Certificate" \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.TextView.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.TextView.html index c56df36bf2e..c6447ee7ee0 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.TextView.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.TextView.html @@ -20,7 +20,7 @@ data ShelleyTextViewFileError = TextViewReadFileError (FileError TextEnvelopeError) | TextViewCBORPrettyPrintError !HelpersError - deriving Int -> ShelleyTextViewFileError -> ShowS + deriving Int -> ShelleyTextViewFileError -> ShowS [ShelleyTextViewFileError] -> ShowS ShelleyTextViewFileError -> String (Int -> ShelleyTextViewFileError -> ShowS) @@ -39,48 +39,48 @@ renderShelleyTextViewFileError :: ShelleyTextViewFileError -> Text renderShelleyTextViewFileError :: ShelleyTextViewFileError -> Text -renderShelleyTextViewFileError ShelleyTextViewFileError -err = +renderShelleyTextViewFileError ShelleyTextViewFileError +err = case ShelleyTextViewFileError -err of - TextViewReadFileError FileError TextEnvelopeError -fileErr -> String -> Text +err of + TextViewReadFileError FileError TextEnvelopeError +fileErr -> String -> Text Text.pack (FileError TextEnvelopeError -> String forall e. Error e => e -> String displayError FileError TextEnvelopeError -fileErr) - TextViewCBORPrettyPrintError HelpersError -hlprsErr -> +fileErr) + TextViewCBORPrettyPrintError HelpersError +hlprsErr -> Text "Error pretty printing CBOR: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> HelpersError -> Text renderHelpersError HelpersError -hlprsErr +hlprsErr runTextViewCmd :: TextViewCmd -> ExceptT ShelleyTextViewFileError IO () runTextViewCmd :: TextViewCmd -> ExceptT ShelleyTextViewFileError IO () -runTextViewCmd TextViewCmd -cmd = +runTextViewCmd TextViewCmd +cmd = case TextViewCmd -cmd of - TextViewInfo String -fpath Maybe OutputFile -mOutfile -> String +cmd of + TextViewInfo String +fpath Maybe OutputFile +mOutfile -> String -> Maybe OutputFile -> ExceptT ShelleyTextViewFileError IO () runTextViewInfo String -fpath Maybe OutputFile -mOutfile +fpath Maybe OutputFile +mOutfile runTextViewInfo :: FilePath -> Maybe OutputFile -> ExceptT ShelleyTextViewFileError IO () runTextViewInfo :: String -> Maybe OutputFile -> ExceptT ShelleyTextViewFileError IO () -runTextViewInfo String -fpath Maybe OutputFile -mOutFile = do - TextEnvelope -tv <- (FileError TextEnvelopeError -> ShelleyTextViewFileError) +runTextViewInfo String +fpath Maybe OutputFile +mOutFile = do + TextEnvelope +tv <- (FileError TextEnvelopeError -> ShelleyTextViewFileError) -> ExceptT (FileError TextEnvelopeError) IO TextEnvelope -> ExceptT ShelleyTextViewFileError IO TextEnvelope forall (m :: * -> *) x y a. @@ -97,24 +97,24 @@ forall (m :: * -> *) x a. m (Either x a) -> ExceptT x m a newExceptT (String -> IO (Either (FileError TextEnvelopeError) TextEnvelope) readTextEnvelopeFromFile String -fpath) - let lbCBOR :: ByteString -lbCBOR = ByteString -> ByteString +fpath) + let lbCBOR :: ByteString +lbCBOR = ByteString -> ByteString LBS.fromStrict (TextEnvelope -> ByteString textEnvelopeRawCBOR TextEnvelope -tv) +tv) case Maybe OutputFile -mOutFile of - Just (OutputFile String -oFpath) -> IO () -> ExceptT ShelleyTextViewFileError IO () +mOutFile of + Just (OutputFile String +oFpath) -> IO () -> ExceptT ShelleyTextViewFileError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyTextViewFileError IO ()) -> IO () -> ExceptT ShelleyTextViewFileError IO () forall a b. (a -> b) -> a -> b $ String -> ByteString -> IO () LBS.writeFile String -oFpath ByteString -lbCBOR +oFpath ByteString +lbCBOR Maybe OutputFile Nothing -> (HelpersError -> ShelleyTextViewFileError) -> ExceptT HelpersError IO () @@ -130,5 +130,5 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ExceptT HelpersError IO () pPrintCBOR ByteString -lbCBOR +lbCBOR \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.Transaction.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.Transaction.html index 112e904d87d..80303e82fe5 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.Transaction.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.Transaction.html @@ -92,7 +92,7 @@ | ShelleyTxCmdGenesisCmdError !ShelleyGenesisCmdError | ShelleyTxCmdPolicyIdsMissing [PolicyId] | ShelleyTxCmdPolicyIdsExcess [PolicyId] - deriving Int -> ShelleyTxCmdError -> ShowS + deriving Int -> ShelleyTxCmdError -> ShowS [ShelleyTxCmdError] -> ShowS ShelleyTxCmdError -> String (Int -> ShelleyTxCmdError -> ShowS) @@ -110,55 +110,55 @@ Show data SomeTxBodyError where - SomeTxBodyError :: TxBodyError era -> SomeTxBodyError + SomeTxBodyError :: TxBodyError era -> SomeTxBodyError -deriving instance Show SomeTxBodyError +deriving instance Show SomeTxBodyError renderShelleyTxCmdError :: ShelleyTxCmdError -> Text renderShelleyTxCmdError :: ShelleyTxCmdError -> Text -renderShelleyTxCmdError ShelleyTxCmdError -err = +renderShelleyTxCmdError ShelleyTxCmdError +err = case ShelleyTxCmdError -err of - ShelleyTxCmdReadFileError FileError () -fileErr -> String -> Text +err of + ShelleyTxCmdReadFileError FileError () +fileErr -> String -> Text Text.pack (FileError () -> String forall e. Error e => e -> String displayError FileError () -fileErr) - ShelleyTxCmdReadTextViewFileError FileError TextEnvelopeError -fileErr -> String -> Text +fileErr) + ShelleyTxCmdReadTextViewFileError FileError TextEnvelopeError +fileErr -> String -> Text Text.pack (FileError TextEnvelopeError -> String forall e. Error e => e -> String displayError FileError TextEnvelopeError -fileErr) - ShelleyTxCmdScriptFileError FileError ScriptDecodeError -fileErr -> String -> Text +fileErr) + ShelleyTxCmdScriptFileError FileError ScriptDecodeError +fileErr -> String -> Text Text.pack (FileError ScriptDecodeError -> String forall e. Error e => e -> String displayError FileError ScriptDecodeError -fileErr) - ShelleyTxCmdReadWitnessSigningDataError ReadWitnessSigningDataError -witSignDataErr -> +fileErr) + ShelleyTxCmdReadWitnessSigningDataError ReadWitnessSigningDataError +witSignDataErr -> ReadWitnessSigningDataError -> Text renderReadWitnessSigningDataError ReadWitnessSigningDataError -witSignDataErr - ShelleyTxCmdWriteFileError FileError () -fileErr -> String -> Text +witSignDataErr + ShelleyTxCmdWriteFileError FileError () +fileErr -> String -> Text Text.pack (FileError () -> String forall e. Error e => e -> String displayError FileError () -fileErr) - ShelleyTxCmdMetadataJsonParseError String -fp String -jsonErr -> +fileErr) + ShelleyTxCmdMetadataJsonParseError String +fp String +jsonErr -> Text "Invalid JSON format in file: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a b. (Show a, ConvertText String b) => a -> b show String -fp +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -166,17 +166,17 @@ forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -jsonErr - ShelleyTxCmdMetadataConversionError String -fp TxMetadataJsonError -metadataErr -> +jsonErr + ShelleyTxCmdMetadataConversionError String +fp TxMetadataJsonError +metadataErr -> Text "Error reading metadata at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a b. (Show a, ConvertText String b) => a -> b show String -fp +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -186,17 +186,17 @@ Text.pack (TxMetadataJsonError -> String forall e. Error e => e -> String displayError TxMetadataJsonError -metadataErr) - ShelleyTxCmdMetaDecodeError String -fp DecoderError -metadataErr -> +metadataErr) + ShelleyTxCmdMetaDecodeError String +fp DecoderError +metadataErr -> Text "Error decoding CBOR metadata at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a b. (Show a, ConvertText String b) => a -> b show String -fp +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -205,17 +205,17 @@ <> DecoderError -> Text forall a b. (Show a, ConvertText String b) => a -> b show DecoderError -metadataErr - ShelleyTxCmdMetaValidationError String -fp [(Word64, TxMetadataRangeError)] -errs -> +metadataErr + ShelleyTxCmdMetaValidationError String +fp [(Word64, TxMetadataRangeError)] +errs -> Text "Error validating transaction metadata at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a b. (Show a, ConvertText String b) => a -> b show String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text "\n" Text -> Text -> Text @@ -230,7 +230,7 @@ <> Word64 -> Text forall a b. (Show a, ConvertText String b) => a -> b show Word64 -k Text -> Text -> Text +k Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text ":" Text -> Text -> Text @@ -239,22 +239,22 @@ Text.pack (TxMetadataRangeError -> String forall e. Error e => e -> String displayError TxMetadataRangeError -valErr) - | (Word64 -k, TxMetadataRangeError -valErr) <- [(Word64, TxMetadataRangeError)] -errs ] +valErr) + | (Word64 +k, TxMetadataRangeError +valErr) <- [(Word64, TxMetadataRangeError)] +errs ] - ShelleyTxCmdScriptDataJsonParseError String -fp String -jsonErr -> + ShelleyTxCmdScriptDataJsonParseError String +fp String +jsonErr -> Text "Invalid JSON format in file: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a b. (Show a, ConvertText String b) => a -> b show String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -262,17 +262,17 @@ forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -jsonErr - ShelleyTxCmdScriptDataConversionError String -fp ScriptDataJsonError -cerr -> +jsonErr + ShelleyTxCmdScriptDataConversionError String +fp ScriptDataJsonError +cerr -> Text "Error reading metadata at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a b. (Show a, ConvertText String b) => a -> b show String -fp +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -282,17 +282,17 @@ Text.pack (ScriptDataJsonError -> String forall e. Error e => e -> String displayError ScriptDataJsonError -cerr) - ShelleyTxCmdScriptDataValidationError String -fp ScriptDataRangeError -verr -> +cerr) + ShelleyTxCmdScriptDataValidationError String +fp ScriptDataRangeError +verr -> Text "Error validating script data at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a b. (Show a, ConvertText String b) => a -> b show String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text ":\n" Text -> Text -> Text @@ -302,22 +302,22 @@ Text.pack (ScriptDataRangeError -> String forall e. Error e => e -> String displayError ScriptDataRangeError -verr) +verr) - ShelleyTxCmdSocketEnvError EnvSocketError -envSockErr -> EnvSocketError -> Text + ShelleyTxCmdSocketEnvError EnvSocketError +envSockErr -> EnvSocketError -> Text renderEnvSocketError EnvSocketError -envSockErr - ShelleyTxCmdAesonDecodeProtocolParamsError String -fp Text -decErr -> +envSockErr + ShelleyTxCmdAesonDecodeProtocolParamsError String +fp Text +decErr -> Text "Error while decoding the protocol parameters at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text forall a b. (Show a, ConvertText String b) => a -> b show String -fp +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -326,15 +326,15 @@ <> Text -> Text forall a b. (Show a, ConvertText String b) => a -> b show Text -decErr - ShelleyTxCmdTxSubmitError Text -res -> Text +decErr + ShelleyTxCmdTxSubmitError Text +res -> Text "Error while submitting tx: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -res - ShelleyTxCmdTxSubmitErrorByron ApplyTxErr ByronBlock -res -> +res + ShelleyTxCmdTxSubmitErrorByron ApplyTxErr ByronBlock +res -> Text "Error while submitting tx: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -343,9 +343,9 @@ forall a b. (Show a, ConvertText String b) => a -> b show ApplyMempoolPayloadErr ApplyTxErr ByronBlock -res) - ShelleyTxCmdTxSubmitErrorShelley ApplyTxErr (ShelleyBlock StandardShelley) -res -> +res) + ShelleyTxCmdTxSubmitErrorShelley ApplyTxErr (ShelleyBlock StandardShelley) +res -> Text "Error while submitting tx: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -354,9 +354,9 @@ forall a b. (Show a, ConvertText String b) => a -> b show ApplyTxErr (ShelleyBlock StandardShelley) ApplyTxError StandardShelley -res) - ShelleyTxCmdTxSubmitErrorAllegra ApplyTxErr (ShelleyBlock StandardAllegra) -res -> +res) + ShelleyTxCmdTxSubmitErrorAllegra ApplyTxErr (ShelleyBlock StandardAllegra) +res -> Text "Error while submitting tx: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -365,9 +365,9 @@ forall a b. (Show a, ConvertText String b) => a -> b show ApplyTxErr (ShelleyBlock StandardAllegra) ApplyTxError StandardAllegra -res) - ShelleyTxCmdTxSubmitErrorMary ApplyTxErr (ShelleyBlock StandardMary) -res -> +res) + ShelleyTxCmdTxSubmitErrorMary ApplyTxErr (ShelleyBlock StandardMary) +res -> Text "Error while submitting tx: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -376,11 +376,11 @@ forall a b. (Show a, ConvertText String b) => a -> b show ApplyTxErr (ShelleyBlock StandardMary) ApplyTxError StandardMary -res) - ShelleyTxCmdTxSubmitErrorEraMismatch EraMismatch{Text +res) + ShelleyTxCmdTxSubmitErrorEraMismatch EraMismatch{Text ledgerEraName :: EraMismatch -> Text ledgerEraName :: Text -ledgerEraName, Text +ledgerEraName, Text otherEraName :: EraMismatch -> Text otherEraName :: Text otherEraName} -> @@ -392,25 +392,25 @@ "The node is running in the " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -ledgerEraName Text -> Text -> Text +ledgerEraName Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " era, but the transaction is for the " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -otherEraName Text -> Text -> Text +otherEraName Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " era." - ShelleyTxCmdBootstrapWitnessError ShelleyBootstrapWitnessError -sbwErr -> + ShelleyTxCmdBootstrapWitnessError ShelleyBootstrapWitnessError +sbwErr -> ShelleyBootstrapWitnessError -> Text renderShelleyBootstrapWitnessError ShelleyBootstrapWitnessError -sbwErr +sbwErr - ShelleyTxCmdTxFeatureMismatch AnyCardanoEra -era TxFeature + ShelleyTxCmdTxFeatureMismatch AnyCardanoEra +era TxFeature TxFeatureImplicitFees -> Text "An explicit transaction fee must be specified for " Text -> Text -> Text @@ -418,7 +418,7 @@ <> AnyCardanoEra -> Text renderEra AnyCardanoEra -era Text -> Text -> Text +era Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " era transactions." @@ -430,26 +430,26 @@ Text "A TTL must be specified for Shelley era transactions." - ShelleyTxCmdTxFeatureMismatch AnyCardanoEra -era TxFeature -feature -> + ShelleyTxCmdTxFeatureMismatch AnyCardanoEra +era TxFeature +feature -> TxFeature -> Text renderFeature TxFeature -feature Text -> Text -> Text +feature Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " cannot be used for " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> AnyCardanoEra -> Text renderEra AnyCardanoEra -era Text -> Text -> Text +era Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " era transactions." - ShelleyTxCmdTxBodyError (SomeTxBodyError TxBodyError era -err') -> + ShelleyTxCmdTxBodyError (SomeTxBodyError TxBodyError era +err') -> Text "Transaction validaton error: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -457,20 +457,20 @@ Text.pack (TxBodyError era -> String forall e. Error e => e -> String displayError TxBodyError era -err') +err') - ShelleyTxCmdNotImplemented Text -msg -> + ShelleyTxCmdNotImplemented Text +msg -> Text "Feature not yet implemented: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -msg +msg - ShelleyTxCmdWitnessEraMismatch AnyCardanoEra -era AnyCardanoEra -era' (WitnessFile String -file) -> + ShelleyTxCmdWitnessEraMismatch AnyCardanoEra +era AnyCardanoEra +era' (WitnessFile String +file) -> Text "The era of a witness does not match the era of the transaction. " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -480,7 +480,7 @@ forall a. Semigroup a => a -> a -> a <> AnyCardanoEra -> Text renderEra AnyCardanoEra -era Text -> Text -> Text +era Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " era, but the " Text -> Text -> Text @@ -492,28 +492,28 @@ <> String -> Text forall a b. (Show a, ConvertText String b) => a -> b show String -file Text -> Text -> Text +file Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " is for the " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> AnyCardanoEra -> Text renderEra AnyCardanoEra -era' Text -> Text -> Text +era' Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " era." - ShelleyTxCmdScriptLanguageNotSupportedInEra (AnyScriptLanguage ScriptLanguage lang -lang) AnyCardanoEra -era -> + ShelleyTxCmdScriptLanguageNotSupportedInEra (AnyScriptLanguage ScriptLanguage lang +lang) AnyCardanoEra +era -> Text "The script language " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> ScriptLanguage lang -> Text forall a b. (Show a, ConvertText String b) => a -> b show ScriptLanguage lang -lang Text -> Text -> Text +lang Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " is not supported in the " Text -> Text -> Text @@ -521,17 +521,17 @@ <> AnyCardanoEra -> Text renderEra AnyCardanoEra -era Text -> Text -> Text +era Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " era." - ShelleyTxCmdScriptExpectedSimple String -file (AnyScriptLanguage ScriptLanguage lang -lang) -> + ShelleyTxCmdScriptExpectedSimple String +file (AnyScriptLanguage ScriptLanguage lang +lang) -> String -> Text Text.pack String -file Text -> Text -> Text +file Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text ": expected a script in the simple script language, " Text -> Text -> Text @@ -543,7 +543,7 @@ <> ScriptLanguage lang -> Text forall a b. (Show a, ConvertText String b) => a -> b show ScriptLanguage lang -lang Text -> Text -> Text +lang Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text ". Alternatively, to use " Text -> Text -> Text @@ -556,12 +556,12 @@ Text "(datum if appropriate) and script execution units." - ShelleyTxCmdScriptExpectedPlutus String -file (AnyScriptLanguage ScriptLanguage lang -lang) -> + ShelleyTxCmdScriptExpectedPlutus String +file (AnyScriptLanguage ScriptLanguage lang +lang) -> String -> Text Text.pack String -file Text -> Text -> Text +file Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text ": expected a script in the Plutus script language, " Text -> Text -> Text @@ -573,21 +573,21 @@ <> ScriptLanguage lang -> Text forall a b. (Show a, ConvertText String b) => a -> b show ScriptLanguage lang -lang Text -> Text -> Text +lang Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text "." - ShelleyTxCmdEraConsensusModeMismatch Maybe String -fp AnyConsensusMode -mode AnyCardanoEra -era -> + ShelleyTxCmdEraConsensusModeMismatch Maybe String +fp AnyConsensusMode +mode AnyCardanoEra +era -> Text "Submitting " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> AnyCardanoEra -> Text renderEra AnyCardanoEra -era Text -> Text -> Text +era Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " era transaction (" Text -> Text -> Text @@ -595,7 +595,7 @@ <> Maybe String -> Text forall a b. (Show a, ConvertText String b) => a -> b show Maybe String -fp Text -> Text -> Text +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -603,16 +603,16 @@ forall a. Semigroup a => a -> a -> a <> AnyConsensusMode -> Text renderMode AnyConsensusMode -mode Text -> Text -> Text +mode Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " consensus mode." - ShelleyTxCmdGenesisCmdError ShelleyGenesisCmdError -e -> ShelleyGenesisCmdError -> Text + ShelleyTxCmdGenesisCmdError ShelleyGenesisCmdError +e -> ShelleyGenesisCmdError -> Text renderShelleyGenesisCmdError ShelleyGenesisCmdError -e - ShelleyTxCmdPolicyIdsMissing [PolicyId] -policyids -> +e + ShelleyTxCmdPolicyIdsMissing [PolicyId] +policyids -> Text "The \"--mint\" flag specifies an asset with a policy Id, but no \ \corresponding monetary policy script has been provided as a witness \ @@ -626,10 +626,10 @@ map PolicyId -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText [PolicyId] -policyids) +policyids) - ShelleyTxCmdPolicyIdsExcess [PolicyId] -policyids -> + ShelleyTxCmdPolicyIdsExcess [PolicyId] +policyids -> Text "A script provided to witness minting does not correspond to the policy \ \id of any asset specified in the \"--mint\" field. The script hash is: " @@ -642,7 +642,7 @@ map PolicyId -> Text forall a. SerialiseAsRawBytes a => a -> Text serialiseToRawBytesHexText [PolicyId] -policyids) +policyids) renderEra :: AnyCardanoEra -> Text renderEra :: AnyCardanoEra -> Text @@ -715,29 +715,29 @@ runTransactionCmd :: TransactionCmd -> ExceptT ShelleyTxCmdError IO () runTransactionCmd :: TransactionCmd -> ExceptT ShelleyTxCmdError IO () -runTransactionCmd TransactionCmd -cmd = +runTransactionCmd TransactionCmd +cmd = case TransactionCmd -cmd of - TxBuildRaw AnyCardanoEra -era [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] -txins [TxIn] -txinsc [TxOutAnyEra] -txouts Maybe (Value, [ScriptWitnessFiles WitCtxMint]) -mValue Maybe SlotNo -mLowBound Maybe SlotNo -mUpperBound - Maybe Lovelace -fee [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -certs [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] -wdrls TxMetadataJsonSchema -metadataSchema [ScriptFile] -scriptFiles - [MetadataFile] -metadataFiles Maybe ProtocolParamsSourceSpec -mpparams Maybe UpdateProposalFile -mUpProp TxBodyFile -out -> +cmd of + TxBuildRaw AnyCardanoEra +era [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] +txins [TxIn] +txinsc [TxOutAnyEra] +txouts Maybe (Value, [ScriptWitnessFiles WitCtxMint]) +mValue Maybe SlotNo +mLowBound Maybe SlotNo +mUpperBound + Maybe Lovelace +fee [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] +certs [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] +wdrls TxMetadataJsonSchema +metadataSchema [ScriptFile] +scriptFiles + [MetadataFile] +metadataFiles Maybe ProtocolParamsSourceSpec +mpparams Maybe UpdateProposalFile +mUpProp TxBodyFile +out -> AnyCardanoEra -> [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] -> [TxIn] @@ -757,58 +757,58 @@ -> TxBodyFile -> ExceptT ShelleyTxCmdError IO () runTxBuildRaw AnyCardanoEra -era [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] -txins [TxIn] -txinsc [TxOutAnyEra] -txouts Maybe SlotNo -mLowBound Maybe SlotNo -mUpperBound +era [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] +txins [TxIn] +txinsc [TxOutAnyEra] +txouts Maybe SlotNo +mLowBound Maybe SlotNo +mUpperBound Maybe Lovelace -fee Maybe (Value, [ScriptWitnessFiles WitCtxMint]) -mValue [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -certs [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] -wdrls TxMetadataJsonSchema -metadataSchema +fee Maybe (Value, [ScriptWitnessFiles WitCtxMint]) +mValue [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] +certs [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] +wdrls TxMetadataJsonSchema +metadataSchema [ScriptFile] -scriptFiles [MetadataFile] -metadataFiles Maybe ProtocolParamsSourceSpec -mpparams Maybe UpdateProposalFile -mUpProp TxBodyFile -out - TxSign TxBodyFile -txinfile [WitnessSigningData] -skfiles Maybe NetworkId -network TxFile -txoutfile -> +scriptFiles [MetadataFile] +metadataFiles Maybe ProtocolParamsSourceSpec +mpparams Maybe UpdateProposalFile +mUpProp TxBodyFile +out + TxSign TxBodyFile +txinfile [WitnessSigningData] +skfiles Maybe NetworkId +network TxFile +txoutfile -> TxBodyFile -> [WitnessSigningData] -> Maybe NetworkId -> TxFile -> ExceptT ShelleyTxCmdError IO () runTxSign TxBodyFile -txinfile [WitnessSigningData] -skfiles Maybe NetworkId -network TxFile -txoutfile - TxSubmit AnyConsensusModeParams -anyConensusModeParams NetworkId -network String -txFp -> +txinfile [WitnessSigningData] +skfiles Maybe NetworkId +network TxFile +txoutfile + TxSubmit AnyConsensusModeParams +anyConensusModeParams NetworkId +network String +txFp -> AnyConsensusModeParams -> NetworkId -> String -> ExceptT ShelleyTxCmdError IO () runTxSubmit AnyConsensusModeParams -anyConensusModeParams NetworkId -network String -txFp - TxCalculateMinFee TxBodyFile -txbody Maybe NetworkId -mnw ProtocolParamsSourceSpec -pGenesisOrParamsFile TxInCount -nInputs TxOutCount -nOutputs - TxShelleyWitnessCount -nShelleyKeyWitnesses TxByronWitnessCount -nByronKeyWitnesses -> +anyConensusModeParams NetworkId +network String +txFp + TxCalculateMinFee TxBodyFile +txbody Maybe NetworkId +mnw ProtocolParamsSourceSpec +pGenesisOrParamsFile TxInCount +nInputs TxOutCount +nOutputs + TxShelleyWitnessCount +nShelleyKeyWitnesses TxByronWitnessCount +nByronKeyWitnesses -> TxBodyFile -> Maybe NetworkId -> ProtocolParamsSourceSpec @@ -818,58 +818,58 @@ -> TxByronWitnessCount -> ExceptT ShelleyTxCmdError IO () runTxCalculateMinFee TxBodyFile -txbody Maybe NetworkId -mnw ProtocolParamsSourceSpec -pGenesisOrParamsFile TxInCount -nInputs TxOutCount -nOutputs +txbody Maybe NetworkId +mnw ProtocolParamsSourceSpec +pGenesisOrParamsFile TxInCount +nInputs TxOutCount +nOutputs TxShelleyWitnessCount -nShelleyKeyWitnesses TxByronWitnessCount -nByronKeyWitnesses - TxCalculateMinValue ProtocolParamsSourceSpec -pParamSpec Value -txOuts -> ProtocolParamsSourceSpec +nShelleyKeyWitnesses TxByronWitnessCount +nByronKeyWitnesses + TxCalculateMinValue ProtocolParamsSourceSpec +pParamSpec Value +txOuts -> ProtocolParamsSourceSpec -> Value -> ExceptT ShelleyTxCmdError IO () runTxCalculateMinValue ProtocolParamsSourceSpec -pParamSpec Value -txOuts - TxGetTxId InputTxFile -txinfile -> InputTxFile -> ExceptT ShelleyTxCmdError IO () +pParamSpec Value +txOuts + TxGetTxId InputTxFile +txinfile -> InputTxFile -> ExceptT ShelleyTxCmdError IO () runTxGetTxId InputTxFile -txinfile - TxView InputTxFile -txinfile -> InputTxFile -> ExceptT ShelleyTxCmdError IO () +txinfile + TxView InputTxFile +txinfile -> InputTxFile -> ExceptT ShelleyTxCmdError IO () runTxView InputTxFile -txinfile - TxMintedPolicyId ScriptFile -sFile -> ScriptFile -> ExceptT ShelleyTxCmdError IO () +txinfile + TxMintedPolicyId ScriptFile +sFile -> ScriptFile -> ExceptT ShelleyTxCmdError IO () runTxCreatePolicyId ScriptFile -sFile - TxCreateWitness TxBodyFile -txBodyfile WitnessSigningData -witSignData Maybe NetworkId -mbNw OutputFile -outFile -> +sFile + TxCreateWitness TxBodyFile +txBodyfile WitnessSigningData +witSignData Maybe NetworkId +mbNw OutputFile +outFile -> TxBodyFile -> WitnessSigningData -> Maybe NetworkId -> OutputFile -> ExceptT ShelleyTxCmdError IO () runTxCreateWitness TxBodyFile -txBodyfile WitnessSigningData -witSignData Maybe NetworkId -mbNw OutputFile -outFile - TxAssembleTxBodyWitness TxBodyFile -txBodyFile [WitnessFile] -witnessFile OutputFile -outFile -> +txBodyfile WitnessSigningData +witSignData Maybe NetworkId +mbNw OutputFile +outFile + TxAssembleTxBodyWitness TxBodyFile +txBodyFile [WitnessFile] +witnessFile OutputFile +outFile -> TxBodyFile -> [WitnessFile] -> OutputFile -> ExceptT ShelleyTxCmdError IO () runTxSignWitness TxBodyFile -txBodyFile [WitnessFile] -witnessFile OutputFile -outFile +txBodyFile [WitnessFile] +witnessFile OutputFile +outFile -- ---------------------------------------------------------------------------- -- Building transactions @@ -918,32 +918,32 @@ -> Maybe UpdateProposalFile -> TxBodyFile -> ExceptT ShelleyTxCmdError IO () -runTxBuildRaw (AnyCardanoEra CardanoEra era -era) - [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] -inputsAndScripts [TxIn] -inputsCollateral [TxOutAnyEra] -txouts - Maybe SlotNo -mLowerBound Maybe SlotNo -mUpperBound - Maybe Lovelace -mFee Maybe (Value, [ScriptWitnessFiles WitCtxMint]) -mValue - [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -certFiles [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] -withdrawals - TxMetadataJsonSchema -metadataSchema [ScriptFile] -scriptFiles - [MetadataFile] -metadataFiles Maybe ProtocolParamsSourceSpec -mpparams Maybe UpdateProposalFile -mUpdatePropFile - (TxBodyFile String -fpath) = do - TxBodyContent BuildTx era -txBodyContent <- +runTxBuildRaw (AnyCardanoEra CardanoEra era +era) + [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] +inputsAndScripts [TxIn] +inputsCollateral [TxOutAnyEra] +txouts + Maybe SlotNo +mLowerBound Maybe SlotNo +mUpperBound + Maybe Lovelace +mFee Maybe (Value, [ScriptWitnessFiles WitCtxMint]) +mValue + [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] +certFiles [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] +withdrawals + TxMetadataJsonSchema +metadataSchema [ScriptFile] +scriptFiles + [MetadataFile] +metadataFiles Maybe ProtocolParamsSourceSpec +mpparams Maybe UpdateProposalFile +mUpdatePropFile + (TxBodyFile String +fpath) = do + TxBodyContent BuildTx era +txBodyContent <- TxIns BuildTx era -> TxInsCollateral era -> [TxOut era] @@ -1021,8 +1021,8 @@ IO [(TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era))] validateTxIns CardanoEra era -era [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] -inputsAndScripts +era [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] +inputsAndScripts ExceptT ShelleyTxCmdError IO @@ -1065,8 +1065,8 @@ -> [TxIn] -> ExceptT ShelleyTxCmdError IO (TxInsCollateral era) validateTxInsCollateral CardanoEra era -era [TxIn] -inputsCollateral +era [TxIn] +inputsCollateral ExceptT ShelleyTxCmdError IO @@ -1106,8 +1106,8 @@ CardanoEra era -> [TxOutAnyEra] -> ExceptT ShelleyTxCmdError IO [TxOut era] validateTxOuts CardanoEra era -era [TxOutAnyEra] -txouts +era [TxOutAnyEra] +txouts ExceptT ShelleyTxCmdError IO @@ -1145,8 +1145,8 @@ CardanoEra era -> Maybe Lovelace -> ExceptT ShelleyTxCmdError IO (TxFee era) validateTxFee CardanoEra era -era Maybe Lovelace -mFee +era Maybe Lovelace +mFee ExceptT ShelleyTxCmdError IO @@ -1197,8 +1197,8 @@ -> Maybe SlotNo -> ExceptT ShelleyTxCmdError IO (TxValidityLowerBound era) validateTxValidityLowerBound CardanoEra era -era Maybe SlotNo -mLowerBound +era Maybe SlotNo +mLowerBound ExceptT ShelleyTxCmdError IO @@ -1218,8 +1218,8 @@ -> Maybe SlotNo -> ExceptT ShelleyTxCmdError IO (TxValidityUpperBound era) validateTxValidityUpperBound CardanoEra era -era Maybe SlotNo -mUpperBound) +era Maybe SlotNo +mUpperBound) ExceptT ShelleyTxCmdError IO @@ -1257,9 +1257,9 @@ -> [MetadataFile] -> ExceptT ShelleyTxCmdError IO (TxMetadataInEra era) validateTxMetadataInEra CardanoEra era -era TxMetadataJsonSchema -metadataSchema [MetadataFile] -metadataFiles +era TxMetadataJsonSchema +metadataSchema [MetadataFile] +metadataFiles ExceptT ShelleyTxCmdError IO @@ -1291,8 +1291,8 @@ CardanoEra era -> [ScriptFile] -> ExceptT ShelleyTxCmdError IO (TxAuxScripts era) validateTxAuxScripts CardanoEra era -era [ScriptFile] -scriptFiles +era [ScriptFile] +scriptFiles ExceptT ShelleyTxCmdError IO @@ -1385,8 +1385,8 @@ IO (BuildTxWith BuildTx (Maybe ProtocolParameters)) validateProtocolParameters CardanoEra era -era Maybe ProtocolParamsSourceSpec -mpparams +era Maybe ProtocolParamsSourceSpec +mpparams ExceptT ShelleyTxCmdError IO @@ -1414,8 +1414,8 @@ Maybe (ScriptWitnessFiles WitCtxStake))] -> ExceptT ShelleyTxCmdError IO (TxWithdrawals BuildTx era) validateTxWithdrawals CardanoEra era -era [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] -withdrawals +era [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] +withdrawals ExceptT ShelleyTxCmdError IO @@ -1438,8 +1438,8 @@ -> [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -> ExceptT ShelleyTxCmdError IO (TxCertificates BuildTx era) validateTxCertificates CardanoEra era -era [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -certFiles +era [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] +certFiles ExceptT ShelleyTxCmdError IO @@ -1459,8 +1459,8 @@ -> Maybe UpdateProposalFile -> ExceptT ShelleyTxCmdError IO (TxUpdateProposal era) validateTxUpdateProposal CardanoEra era -era Maybe UpdateProposalFile -mUpdatePropFile +era Maybe UpdateProposalFile +mUpdatePropFile ExceptT ShelleyTxCmdError IO @@ -1476,11 +1476,11 @@ -> Maybe (Value, [ScriptWitnessFiles WitCtxMint]) -> ExceptT ShelleyTxCmdError IO (TxMintValue BuildTx era) validateTxMintValue CardanoEra era -era Maybe (Value, [ScriptWitnessFiles WitCtxMint]) -mValue +era Maybe (Value, [ScriptWitnessFiles WitCtxMint]) +mValue - TxBody era -txBody <- + TxBody era +txBody <- (TxBodyError era -> ShelleyTxCmdError) -> ExceptT (TxBodyError era) IO (TxBody era) -> ExceptT ShelleyTxCmdError IO (TxBody era) @@ -1520,7 +1520,7 @@ IsCardanoEra era => TxBodyContent BuildTx era -> Either (TxBodyError era) (TxBody era) makeTransactionBody TxBodyContent BuildTx era -txBodyContent +txBodyContent (FileError () -> ShelleyTxCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyTxCmdError IO () @@ -1550,10 +1550,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -fpath Maybe TextEnvelopeDescr +fpath Maybe TextEnvelopeDescr forall a. Maybe a Nothing TxBody era -txBody +txBody -- ---------------------------------------------------------------------------- -- Transaction body validation and conversion @@ -1578,7 +1578,7 @@ | TxFeatureShelleyKeys | TxFeatureCollateral | TxFeatureProtocolParameters - deriving Int -> TxFeature -> ShowS + deriving Int -> TxFeature -> ShowS [TxFeature] -> ShowS TxFeature -> String (Int -> TxFeature -> ShowS) @@ -1595,36 +1595,36 @@ $cshowsPrec :: Int -> TxFeature -> ShowS Show -txFeatureMismatch :: CardanoEra era +txFeatureMismatch :: CardanoEra era -> TxFeature - -> ExceptT ShelleyTxCmdError IO a + -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch :: CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a -txFeatureMismatch CardanoEra era -era TxFeature -feature = +txFeatureMismatch CardanoEra era +era TxFeature +feature = ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO a forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (AnyCardanoEra -> TxFeature -> ShelleyTxCmdError ShelleyTxCmdTxFeatureMismatch (CardanoEra era -> AnyCardanoEra forall era. CardanoEra era -> AnyCardanoEra anyCardanoEra CardanoEra era -era) TxFeature -feature) +era) TxFeature +feature) validateTxIns - :: forall era. - CardanoEra era + :: forall era. + CardanoEra era -> [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] -> ExceptT ShelleyTxCmdError IO - [(TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era))] + [(TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era))] validateTxIns :: CardanoEra era -> [(TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn))] -> ExceptT ShelleyTxCmdError IO [(TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era))] -validateTxIns CardanoEra era -era = ((TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn)) +validateTxIns CardanoEra era +era = ((TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn)) -> ExceptT ShelleyTxCmdError IO @@ -1642,26 +1642,26 @@ ShelleyTxCmdError IO (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) -convert +convert where - convert + convert :: (TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn)) -> ExceptT ShelleyTxCmdError IO - (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) - convert :: (TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn)) + (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) + convert :: (TxIn, Maybe (ScriptWitnessFiles WitCtxTxIn)) -> ExceptT ShelleyTxCmdError IO (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) -convert (TxIn -txin, Maybe (ScriptWitnessFiles WitCtxTxIn) -mScriptWitnessFiles) = +convert (TxIn +txin, Maybe (ScriptWitnessFiles WitCtxTxIn) +mScriptWitnessFiles) = case Maybe (ScriptWitnessFiles WitCtxTxIn) -mScriptWitnessFiles of - Just ScriptWitnessFiles WitCtxTxIn -scriptWitnessFiles -> do - ScriptWitness WitCtxTxIn era -sWit <- CardanoEra era +mScriptWitnessFiles of + Just ScriptWitnessFiles WitCtxTxIn +scriptWitnessFiles -> do + ScriptWitness WitCtxTxIn era +sWit <- CardanoEra era -> ScriptWitnessFiles WitCtxTxIn -> ExceptT ShelleyTxCmdError IO (ScriptWitness WitCtxTxIn era) forall era witctx. @@ -1669,8 +1669,8 @@ -> ScriptWitnessFiles witctx -> ExceptT ShelleyTxCmdError IO (ScriptWitness witctx era) createScriptWitness CardanoEra era -era ScriptWitnessFiles WitCtxTxIn -scriptWitnessFiles +era ScriptWitnessFiles WitCtxTxIn +scriptWitnessFiles (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) -> ExceptT ShelleyTxCmdError @@ -1678,7 +1678,7 @@ (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) forall (m :: * -> *) a. Monad m => a -> m a return ( TxIn -txin +txin , Witness WitCtxTxIn era -> BuildTxWith BuildTx (Witness WitCtxTxIn era) forall a. a -> BuildTxWith BuildTx a @@ -1694,7 +1694,7 @@ -> ScriptWitness witctx era -> Witness witctx era ScriptWitness ScriptWitnessInCtx WitCtxTxIn ScriptWitnessForSpending ScriptWitness WitCtxTxIn era -sWit +sWit ) Maybe (ScriptWitnessFiles WitCtxTxIn) Nothing -> (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) @@ -1704,7 +1704,7 @@ (TxIn, BuildTxWith BuildTx (Witness WitCtxTxIn era)) forall (m :: * -> *) a. Monad m => a -> m a return (TxIn -txin, Witness WitCtxTxIn era +txin, Witness WitCtxTxIn era -> BuildTxWith BuildTx (Witness WitCtxTxIn era) forall a. a -> BuildTxWith BuildTx a BuildTxWith (Witness WitCtxTxIn era @@ -1718,9 +1718,9 @@ KeyWitnessForSpending) -validateTxInsCollateral :: CardanoEra era +validateTxInsCollateral :: CardanoEra era -> [TxIn] - -> ExceptT ShelleyTxCmdError IO (TxInsCollateral era) + -> ExceptT ShelleyTxCmdError IO (TxInsCollateral era) validateTxInsCollateral :: CardanoEra era -> [TxIn] -> ExceptT ShelleyTxCmdError IO (TxInsCollateral era) validateTxInsCollateral CardanoEra era @@ -1730,54 +1730,54 @@ return TxInsCollateral era forall era. TxInsCollateral era TxInsCollateralNone -validateTxInsCollateral CardanoEra era -era [TxIn] -txins = +validateTxInsCollateral CardanoEra era +era [TxIn] +txins = case CardanoEra era -> Maybe (CollateralSupportedInEra era) forall era. CardanoEra era -> Maybe (CollateralSupportedInEra era) collateralSupportedInEra CardanoEra era -era of +era of Maybe (CollateralSupportedInEra era) Nothing -> CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO (TxInsCollateral era) forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureCollateral - Just CollateralSupportedInEra era -supported -> TxInsCollateral era + Just CollateralSupportedInEra era +supported -> TxInsCollateral era -> ExceptT ShelleyTxCmdError IO (TxInsCollateral era) forall (m :: * -> *) a. Monad m => a -> m a return (CollateralSupportedInEra era -> [TxIn] -> TxInsCollateral era forall era. CollateralSupportedInEra era -> [TxIn] -> TxInsCollateral era TxInsCollateral CollateralSupportedInEra era -supported [TxIn] -txins) +supported [TxIn] +txins) -validateTxOuts :: forall era. - CardanoEra era +validateTxOuts :: forall era. + CardanoEra era -> [TxOutAnyEra] - -> ExceptT ShelleyTxCmdError IO [TxOut era] + -> ExceptT ShelleyTxCmdError IO [TxOut era] validateTxOuts :: CardanoEra era -> [TxOutAnyEra] -> ExceptT ShelleyTxCmdError IO [TxOut era] -validateTxOuts CardanoEra era -era = (TxOutAnyEra -> ExceptT ShelleyTxCmdError IO (TxOut era)) +validateTxOuts CardanoEra era +era = (TxOutAnyEra -> ExceptT ShelleyTxCmdError IO (TxOut era)) -> [TxOutAnyEra] -> ExceptT ShelleyTxCmdError IO [TxOut era] forall (t :: * -> *) (m :: * -> *) a b. (Traversable t, Monad m) => (a -> m b) -> t a -> m (t b) mapM TxOutAnyEra -> ExceptT ShelleyTxCmdError IO (TxOut era) -toTxOutInAnyEra +toTxOutInAnyEra where - toTxOutInAnyEra :: TxOutAnyEra - -> ExceptT ShelleyTxCmdError IO (TxOut era) - toTxOutInAnyEra :: TxOutAnyEra -> ExceptT ShelleyTxCmdError IO (TxOut era) -toTxOutInAnyEra (TxOutAnyEra AddressAny -addr Value -val) = AddressInEra era + toTxOutInAnyEra :: TxOutAnyEra + -> ExceptT ShelleyTxCmdError IO (TxOut era) + toTxOutInAnyEra :: TxOutAnyEra -> ExceptT ShelleyTxCmdError IO (TxOut era) +toTxOutInAnyEra (TxOutAnyEra AddressAny +addr Value +val) = AddressInEra era -> TxOutValue era -> TxOutDatumHash era -> TxOut era forall era. AddressInEra era @@ -1791,8 +1791,8 @@ (TxOutValue era -> TxOutDatumHash era -> TxOut era) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> AddressAny -> ExceptT ShelleyTxCmdError IO (AddressInEra era) -toAddressInAnyEra AddressAny -addr +toAddressInAnyEra AddressAny +addr ExceptT ShelleyTxCmdError IO @@ -1801,8 +1801,8 @@ -> ExceptT ShelleyTxCmdError IO (TxOutDatumHash era -> TxOut era) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Value -> ExceptT ShelleyTxCmdError IO (TxOutValue era) -toTxOutValueInAnyEra Value -val +toTxOutValueInAnyEra Value +val ExceptT ShelleyTxCmdError IO (TxOutDatumHash era -> TxOut era) -> ExceptT ShelleyTxCmdError IO (TxOutDatumHash era) -> ExceptT ShelleyTxCmdError IO (TxOut era) @@ -1815,14 +1815,14 @@ TxOutDatumHashNone -- TODO alonzo ^^ allow tx out data - toAddressInAnyEra :: AddressAny -> ExceptT ShelleyTxCmdError IO (AddressInEra era) - toAddressInAnyEra :: AddressAny -> ExceptT ShelleyTxCmdError IO (AddressInEra era) -toAddressInAnyEra AddressAny -addrAny = + toAddressInAnyEra :: AddressAny -> ExceptT ShelleyTxCmdError IO (AddressInEra era) + toAddressInAnyEra :: AddressAny -> ExceptT ShelleyTxCmdError IO (AddressInEra era) +toAddressInAnyEra AddressAny +addrAny = case AddressAny -addrAny of - AddressByron Address ByronAddr -bAddr -> AddressInEra era -> ExceptT ShelleyTxCmdError IO (AddressInEra era) +addrAny of + AddressByron Address ByronAddr +bAddr -> AddressInEra era -> ExceptT ShelleyTxCmdError IO (AddressInEra era) forall (m :: * -> *) a. Monad m => a -> m a return (AddressTypeInEra ByronAddr era -> Address ByronAddr -> AddressInEra era @@ -1832,24 +1832,24 @@ AddressInEra AddressTypeInEra ByronAddr era forall era. AddressTypeInEra ByronAddr era ByronAddressInAnyEra Address ByronAddr -bAddr) - AddressShelley Address ShelleyAddr -sAddr -> +bAddr) + AddressShelley Address ShelleyAddr +sAddr -> case CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era of +era of CardanoEraStyle era LegacyByronEra -> CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO (AddressInEra era) forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureShelleyAddresses - ShelleyBasedEra ShelleyBasedEra era -era' -> + ShelleyBasedEra ShelleyBasedEra era +era' -> AddressInEra era -> ExceptT ShelleyTxCmdError IO (AddressInEra era) forall (m :: * -> *) a. Monad m => a -> m a return (AddressTypeInEra ShelleyAddr era @@ -1860,13 +1860,13 @@ AddressInEra (ShelleyBasedEra era -> AddressTypeInEra ShelleyAddr era forall era. ShelleyBasedEra era -> AddressTypeInEra ShelleyAddr era ShelleyAddressInEra ShelleyBasedEra era -era') Address ShelleyAddr -sAddr) +era') Address ShelleyAddr +sAddr) - toTxOutValueInAnyEra :: Value -> ExceptT ShelleyTxCmdError IO (TxOutValue era) - toTxOutValueInAnyEra :: Value -> ExceptT ShelleyTxCmdError IO (TxOutValue era) -toTxOutValueInAnyEra Value -val = + toTxOutValueInAnyEra :: Value -> ExceptT ShelleyTxCmdError IO (TxOutValue era) + toTxOutValueInAnyEra :: Value -> ExceptT ShelleyTxCmdError IO (TxOutValue era) +toTxOutValueInAnyEra Value +val = case CardanoEra era -> Either (OnlyAdaSupportedInEra era) (MultiAssetSupportedInEra era) @@ -1875,71 +1875,71 @@ -> Either (OnlyAdaSupportedInEra era) (MultiAssetSupportedInEra era) multiAssetSupportedInEra CardanoEra era -era of - Left OnlyAdaSupportedInEra era -adaOnlyInEra -> +era of + Left OnlyAdaSupportedInEra era +adaOnlyInEra -> case Value -> Maybe Lovelace valueToLovelace Value -val of - Just Lovelace -l -> TxOutValue era -> ExceptT ShelleyTxCmdError IO (TxOutValue era) +val of + Just Lovelace +l -> TxOutValue era -> ExceptT ShelleyTxCmdError IO (TxOutValue era) forall (m :: * -> *) a. Monad m => a -> m a return (OnlyAdaSupportedInEra era -> Lovelace -> TxOutValue era forall era. OnlyAdaSupportedInEra era -> Lovelace -> TxOutValue era TxOutAdaOnly OnlyAdaSupportedInEra era -adaOnlyInEra Lovelace -l) +adaOnlyInEra Lovelace +l) Maybe Lovelace Nothing -> CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO (TxOutValue era) forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureMultiAssetOutputs - Right MultiAssetSupportedInEra era -multiAssetInEra -> TxOutValue era -> ExceptT ShelleyTxCmdError IO (TxOutValue era) + Right MultiAssetSupportedInEra era +multiAssetInEra -> TxOutValue era -> ExceptT ShelleyTxCmdError IO (TxOutValue era) forall (m :: * -> *) a. Monad m => a -> m a return (MultiAssetSupportedInEra era -> Value -> TxOutValue era forall era. MultiAssetSupportedInEra era -> Value -> TxOutValue era TxOutValue MultiAssetSupportedInEra era -multiAssetInEra Value -val) +multiAssetInEra Value +val) -validateTxFee :: CardanoEra era +validateTxFee :: CardanoEra era -> Maybe Lovelace - -> ExceptT ShelleyTxCmdError IO (TxFee era) + -> ExceptT ShelleyTxCmdError IO (TxFee era) validateTxFee :: CardanoEra era -> Maybe Lovelace -> ExceptT ShelleyTxCmdError IO (TxFee era) -validateTxFee CardanoEra era -era Maybe Lovelace -mfee = +validateTxFee CardanoEra era +era Maybe Lovelace +mfee = case (CardanoEra era -> Either (TxFeesImplicitInEra era) (TxFeesExplicitInEra era) forall era. CardanoEra era -> Either (TxFeesImplicitInEra era) (TxFeesExplicitInEra era) txFeesExplicitInEra CardanoEra era -era, Maybe Lovelace -mfee) of - (Left TxFeesImplicitInEra era -implicit, Maybe Lovelace +era, Maybe Lovelace +mfee) of + (Left TxFeesImplicitInEra era +implicit, Maybe Lovelace Nothing) -> TxFee era -> ExceptT ShelleyTxCmdError IO (TxFee era) forall (m :: * -> *) a. Monad m => a -> m a return (TxFeesImplicitInEra era -> TxFee era forall era. TxFeesImplicitInEra era -> TxFee era TxFeeImplicit TxFeesImplicitInEra era -implicit) - (Right TxFeesExplicitInEra era -explicit, Just Lovelace -fee) -> TxFee era -> ExceptT ShelleyTxCmdError IO (TxFee era) +implicit) + (Right TxFeesExplicitInEra era +explicit, Just Lovelace +fee) -> TxFee era -> ExceptT ShelleyTxCmdError IO (TxFee era) forall (m :: * -> *) a. Monad m => a -> m a return (TxFeesExplicitInEra era -> Lovelace -> TxFee era forall era. TxFeesExplicitInEra era -> Lovelace -> TxFee era TxFeeExplicit TxFeesExplicitInEra era -explicit Lovelace -fee) +explicit Lovelace +fee) (Right TxFeesExplicitInEra era _, Maybe Lovelace @@ -1948,7 +1948,7 @@ forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureImplicitFees (Left TxFeesImplicitInEra era _, Just Lovelace @@ -1957,14 +1957,14 @@ forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureExplicitFees -validateTxValidityLowerBound :: CardanoEra era +validateTxValidityLowerBound :: CardanoEra era -> Maybe SlotNo -> ExceptT ShelleyTxCmdError IO - (TxValidityLowerBound era) + (TxValidityLowerBound era) validateTxValidityLowerBound :: CardanoEra era -> Maybe SlotNo -> ExceptT ShelleyTxCmdError IO (TxValidityLowerBound era) @@ -1976,14 +1976,14 @@ return TxValidityLowerBound era forall era. TxValidityLowerBound era TxValidityNoLowerBound -validateTxValidityLowerBound CardanoEra era -era (Just SlotNo -slot) = +validateTxValidityLowerBound CardanoEra era +era (Just SlotNo +slot) = case CardanoEra era -> Maybe (ValidityLowerBoundSupportedInEra era) forall era. CardanoEra era -> Maybe (ValidityLowerBoundSupportedInEra era) validityLowerBoundSupportedInEra CardanoEra era -era of +era of Maybe (ValidityLowerBoundSupportedInEra era) Nothing -> CardanoEra era -> TxFeature @@ -1991,10 +1991,10 @@ forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureValidityLowerBound - Just ValidityLowerBoundSupportedInEra era -supported -> TxValidityLowerBound era + Just ValidityLowerBoundSupportedInEra era +supported -> TxValidityLowerBound era -> ExceptT ShelleyTxCmdError IO (TxValidityLowerBound era) forall (m :: * -> *) a. Monad m => a -> m a return (ValidityLowerBoundSupportedInEra era @@ -2003,25 +2003,25 @@ ValidityLowerBoundSupportedInEra era -> SlotNo -> TxValidityLowerBound era TxValidityLowerBound ValidityLowerBoundSupportedInEra era -supported SlotNo -slot) +supported SlotNo +slot) -validateTxValidityUpperBound :: CardanoEra era +validateTxValidityUpperBound :: CardanoEra era -> Maybe SlotNo -> ExceptT ShelleyTxCmdError IO - (TxValidityUpperBound era) + (TxValidityUpperBound era) validateTxValidityUpperBound :: CardanoEra era -> Maybe SlotNo -> ExceptT ShelleyTxCmdError IO (TxValidityUpperBound era) -validateTxValidityUpperBound CardanoEra era -era Maybe SlotNo +validateTxValidityUpperBound CardanoEra era +era Maybe SlotNo Nothing = case CardanoEra era -> Maybe (ValidityNoUpperBoundSupportedInEra era) forall era. CardanoEra era -> Maybe (ValidityNoUpperBoundSupportedInEra era) validityNoUpperBoundSupportedInEra CardanoEra era -era of +era of Maybe (ValidityNoUpperBoundSupportedInEra era) Nothing -> CardanoEra era -> TxFeature @@ -2029,25 +2029,25 @@ forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureValidityNoUpperBound - Just ValidityNoUpperBoundSupportedInEra era -supported -> TxValidityUpperBound era + Just ValidityNoUpperBoundSupportedInEra era +supported -> TxValidityUpperBound era -> ExceptT ShelleyTxCmdError IO (TxValidityUpperBound era) forall (m :: * -> *) a. Monad m => a -> m a return (ValidityNoUpperBoundSupportedInEra era -> TxValidityUpperBound era forall era. ValidityNoUpperBoundSupportedInEra era -> TxValidityUpperBound era TxValidityNoUpperBound ValidityNoUpperBoundSupportedInEra era -supported) -validateTxValidityUpperBound CardanoEra era -era (Just SlotNo -slot) = +supported) +validateTxValidityUpperBound CardanoEra era +era (Just SlotNo +slot) = case CardanoEra era -> Maybe (ValidityUpperBoundSupportedInEra era) forall era. CardanoEra era -> Maybe (ValidityUpperBoundSupportedInEra era) validityUpperBoundSupportedInEra CardanoEra era -era of +era of Maybe (ValidityUpperBoundSupportedInEra era) Nothing -> CardanoEra era -> TxFeature @@ -2055,10 +2055,10 @@ forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureValidityUpperBound - Just ValidityUpperBoundSupportedInEra era -supported -> TxValidityUpperBound era + Just ValidityUpperBoundSupportedInEra era +supported -> TxValidityUpperBound era -> ExceptT ShelleyTxCmdError IO (TxValidityUpperBound era) forall (m :: * -> *) a. Monad m => a -> m a return (ValidityUpperBoundSupportedInEra era @@ -2067,14 +2067,14 @@ ValidityUpperBoundSupportedInEra era -> SlotNo -> TxValidityUpperBound era TxValidityUpperBound ValidityUpperBoundSupportedInEra era -supported SlotNo -slot) +supported SlotNo +slot) -validateTxMetadataInEra :: CardanoEra era +validateTxMetadataInEra :: CardanoEra era -> TxMetadataJsonSchema -> [MetadataFile] - -> ExceptT ShelleyTxCmdError IO (TxMetadataInEra era) + -> ExceptT ShelleyTxCmdError IO (TxMetadataInEra era) validateTxMetadataInEra :: CardanoEra era -> TxMetadataJsonSchema -> [MetadataFile] @@ -2087,26 +2087,26 @@ return TxMetadataInEra era forall era. TxMetadataInEra era TxMetadataNone -validateTxMetadataInEra CardanoEra era -era TxMetadataJsonSchema -schema [MetadataFile] -files = +validateTxMetadataInEra CardanoEra era +era TxMetadataJsonSchema +schema [MetadataFile] +files = case CardanoEra era -> Maybe (TxMetadataSupportedInEra era) forall era. CardanoEra era -> Maybe (TxMetadataSupportedInEra era) txMetadataSupportedInEra CardanoEra era -era of +era of Maybe (TxMetadataSupportedInEra era) Nothing -> CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO (TxMetadataInEra era) forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureTxMetadata - Just TxMetadataSupportedInEra era -supported -> do - TxMetadata -metadata <- [TxMetadata] -> TxMetadata + Just TxMetadataSupportedInEra era +supported -> do + TxMetadata +metadata <- [TxMetadata] -> TxMetadata forall a. Monoid a => [a] -> a mconcat ([TxMetadata] -> TxMetadata) -> ExceptT ShelleyTxCmdError IO [TxMetadata] @@ -2120,8 +2120,8 @@ mapM (TxMetadataJsonSchema -> MetadataFile -> ExceptT ShelleyTxCmdError IO TxMetadata readFileTxMetadata TxMetadataJsonSchema -schema) [MetadataFile] -files +schema) [MetadataFile] +files TxMetadataInEra era -> ExceptT ShelleyTxCmdError IO (TxMetadataInEra era) forall (m :: * -> *) a. Monad m => a -> m a @@ -2129,13 +2129,13 @@ forall era. TxMetadataSupportedInEra era -> TxMetadata -> TxMetadataInEra era TxMetadataInEra TxMetadataSupportedInEra era -supported TxMetadata -metadata) +supported TxMetadata +metadata) -validateTxAuxScripts :: CardanoEra era +validateTxAuxScripts :: CardanoEra era -> [ScriptFile] - -> ExceptT ShelleyTxCmdError IO (TxAuxScripts era) + -> ExceptT ShelleyTxCmdError IO (TxAuxScripts era) validateTxAuxScripts :: CardanoEra era -> [ScriptFile] -> ExceptT ShelleyTxCmdError IO (TxAuxScripts era) validateTxAuxScripts CardanoEra era @@ -2144,32 +2144,32 @@ return TxAuxScripts era forall era. TxAuxScripts era TxAuxScriptsNone -validateTxAuxScripts CardanoEra era -era [ScriptFile] -files = +validateTxAuxScripts CardanoEra era +era [ScriptFile] +files = case CardanoEra era -> Maybe (AuxScriptsSupportedInEra era) forall era. CardanoEra era -> Maybe (AuxScriptsSupportedInEra era) auxScriptsSupportedInEra CardanoEra era -era of +era of Maybe (AuxScriptsSupportedInEra era) Nothing -> CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO (TxAuxScripts era) forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureAuxScripts Just AuxScriptsSupportedInEra era AuxScriptsInAllegraEra -> do - [ScriptInEra era] -scripts <- [ExceptT ShelleyTxCmdError IO (ScriptInEra era)] + [ScriptInEra era] +scripts <- [ExceptT ShelleyTxCmdError IO (ScriptInEra era)] -> ExceptT ShelleyTxCmdError IO [ScriptInEra era] forall (t :: * -> *) (m :: * -> *) a. (Traversable t, Monad m) => t (m a) -> m (t a) sequence - [ do ScriptInAnyLang -script <- (FileError ScriptDecodeError -> ShelleyTxCmdError) + [ do ScriptInAnyLang +script <- (FileError ScriptDecodeError -> ShelleyTxCmdError) -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO ScriptInAnyLang forall (m :: * -> *) x y a. @@ -2184,7 +2184,7 @@ $ String -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang readFileScriptInAnyLang String -file +file CardanoEra era -> ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) @@ -2193,11 +2193,11 @@ -> ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) validateScriptSupportedInEra CardanoEra era -era ScriptInAnyLang -script - | ScriptFile String -file <- [ScriptFile] -files ] +era ScriptInAnyLang +script + | ScriptFile String +file <- [ScriptFile] +files ] TxAuxScripts AllegraEra -> ExceptT ShelleyTxCmdError IO (TxAuxScripts AllegraEra) forall (m :: * -> *) a. Monad m => a -> m a @@ -2214,18 +2214,18 @@ TxAuxScripts AuxScriptsSupportedInEra AllegraEra AuxScriptsInAllegraEra [ScriptInEra era] [ScriptInEra AllegraEra] -scripts +scripts Just AuxScriptsSupportedInEra era AuxScriptsInMaryEra -> do - [ScriptInEra era] -scripts <- [ExceptT ShelleyTxCmdError IO (ScriptInEra era)] + [ScriptInEra era] +scripts <- [ExceptT ShelleyTxCmdError IO (ScriptInEra era)] -> ExceptT ShelleyTxCmdError IO [ScriptInEra era] forall (t :: * -> *) (m :: * -> *) a. (Traversable t, Monad m) => t (m a) -> m (t a) sequence - [ do ScriptInAnyLang -script <- (FileError ScriptDecodeError -> ShelleyTxCmdError) + [ do ScriptInAnyLang +script <- (FileError ScriptDecodeError -> ShelleyTxCmdError) -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO ScriptInAnyLang forall (m :: * -> *) x y a. @@ -2240,7 +2240,7 @@ $ String -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang readFileScriptInAnyLang String -file +file CardanoEra era -> ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) @@ -2249,11 +2249,11 @@ -> ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) validateScriptSupportedInEra CardanoEra era -era ScriptInAnyLang -script - | ScriptFile String -file <- [ScriptFile] -files ] +era ScriptInAnyLang +script + | ScriptFile String +file <- [ScriptFile] +files ] TxAuxScripts MaryEra -> ExceptT ShelleyTxCmdError IO (TxAuxScripts MaryEra) forall (m :: * -> *) a. Monad m => a -> m a @@ -2265,7 +2265,7 @@ TxAuxScripts AuxScriptsSupportedInEra MaryEra AuxScriptsInMaryEra [ScriptInEra era] [ScriptInEra MaryEra] -scripts) +scripts) Just AuxScriptsSupportedInEra era AuxScriptsInAlonzoEra -> Text -> ExceptT ShelleyTxCmdError IO (TxAuxScripts era) @@ -2274,10 +2274,10 @@ "TODO alonzo: validateTxAuxScripts AuxScriptsInAlonzoEra" validateTxWithdrawals - :: forall era. - CardanoEra era + :: forall era. + CardanoEra era -> [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] - -> ExceptT ShelleyTxCmdError IO (TxWithdrawals BuildTx era) + -> ExceptT ShelleyTxCmdError IO (TxWithdrawals BuildTx era) validateTxWithdrawals :: CardanoEra era -> [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] @@ -2289,13 +2289,13 @@ return TxWithdrawals BuildTx era forall build era. TxWithdrawals build era TxWithdrawalsNone -validateTxWithdrawals CardanoEra era -era [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] -withdrawals = +validateTxWithdrawals CardanoEra era +era [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] +withdrawals = case CardanoEra era -> Maybe (WithdrawalsSupportedInEra era) forall era. CardanoEra era -> Maybe (WithdrawalsSupportedInEra era) withdrawalsSupportedInEra CardanoEra era -era of +era of Maybe (WithdrawalsSupportedInEra era) Nothing -> CardanoEra era -> TxFeature @@ -2303,13 +2303,13 @@ forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureWithdrawals - Just WithdrawalsSupportedInEra era -supported -> do - [(StakeAddress, Lovelace, + Just WithdrawalsSupportedInEra era +supported -> do + [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -convWithdrawals <- ((StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake)) +convWithdrawals <- ((StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake)) -> ExceptT ShelleyTxCmdError IO @@ -2331,8 +2331,8 @@ IO (StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era)) -convert [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] -withdrawals +convert [(StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake))] +withdrawals TxWithdrawals BuildTx era -> ExceptT ShelleyTxCmdError IO (TxWithdrawals BuildTx era) forall (m :: * -> *) a. Monad m => a -> m a @@ -2346,32 +2346,32 @@ BuildTxWith build (Witness WitCtxStake era))] -> TxWithdrawals build era TxWithdrawals WithdrawalsSupportedInEra era -supported [(StakeAddress, Lovelace, +supported [(StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era))] -convWithdrawals) +convWithdrawals) where - convert + convert :: (StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake)) -> ExceptT ShelleyTxCmdError IO (StakeAddress, Lovelace, - BuildTxWith BuildTx (Witness WitCtxStake era)) - convert :: (StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake)) + BuildTxWith BuildTx (Witness WitCtxStake era)) + convert :: (StakeAddress, Lovelace, Maybe (ScriptWitnessFiles WitCtxStake)) -> ExceptT ShelleyTxCmdError IO (StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era)) -convert (StakeAddress -sAddr, Lovelace -ll, Maybe (ScriptWitnessFiles WitCtxStake) -mScriptWitnessFiles) = +convert (StakeAddress +sAddr, Lovelace +ll, Maybe (ScriptWitnessFiles WitCtxStake) +mScriptWitnessFiles) = case Maybe (ScriptWitnessFiles WitCtxStake) -mScriptWitnessFiles of - Just ScriptWitnessFiles WitCtxStake -scriptWitnessFiles -> do - ScriptWitness WitCtxStake era -sWit <- CardanoEra era +mScriptWitnessFiles of + Just ScriptWitnessFiles WitCtxStake +scriptWitnessFiles -> do + ScriptWitness WitCtxStake era +sWit <- CardanoEra era -> ScriptWitnessFiles WitCtxStake -> ExceptT ShelleyTxCmdError IO (ScriptWitness WitCtxStake era) forall era witctx. @@ -2379,8 +2379,8 @@ -> ScriptWitnessFiles witctx -> ExceptT ShelleyTxCmdError IO (ScriptWitness witctx era) createScriptWitness CardanoEra era -era ScriptWitnessFiles WitCtxStake -scriptWitnessFiles +era ScriptWitnessFiles WitCtxStake +scriptWitnessFiles (StakeAddress, Lovelace, BuildTxWith BuildTx (Witness WitCtxStake era)) -> ExceptT @@ -2390,9 +2390,9 @@ BuildTxWith BuildTx (Witness WitCtxStake era)) forall (m :: * -> *) a. Monad m => a -> m a return ( StakeAddress -sAddr +sAddr , Lovelace -ll +ll , Witness WitCtxStake era -> BuildTxWith BuildTx (Witness WitCtxStake era) forall a. a -> BuildTxWith BuildTx a @@ -2408,7 +2408,7 @@ -> ScriptWitness witctx era -> Witness witctx era ScriptWitness ScriptWitnessInCtx WitCtxStake ScriptWitnessForStakeAddr ScriptWitness WitCtxStake era -sWit +sWit ) Maybe (ScriptWitnessFiles WitCtxStake) Nothing -> (StakeAddress, Lovelace, @@ -2420,8 +2420,8 @@ BuildTxWith BuildTx (Witness WitCtxStake era)) forall (m :: * -> *) a. Monad m => a -> m a return (StakeAddress -sAddr,Lovelace -ll, Witness WitCtxStake era +sAddr,Lovelace +ll, Witness WitCtxStake era -> BuildTxWith BuildTx (Witness WitCtxStake era) forall a. a -> BuildTxWith BuildTx a BuildTxWith (Witness WitCtxStake era @@ -2435,27 +2435,27 @@ KeyWitnessForStakeAddr) validateTxCertificates - :: forall era. - CardanoEra era + :: forall era. + CardanoEra era -> [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] - -> ExceptT ShelleyTxCmdError IO (TxCertificates BuildTx era) + -> ExceptT ShelleyTxCmdError IO (TxCertificates BuildTx era) validateTxCertificates :: CardanoEra era -> [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -> ExceptT ShelleyTxCmdError IO (TxCertificates BuildTx era) -validateTxCertificates CardanoEra era -era [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -certFiles = +validateTxCertificates CardanoEra era +era [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] +certFiles = case CardanoEra era -> Maybe (CertificatesSupportedInEra era) forall era. CardanoEra era -> Maybe (CertificatesSupportedInEra era) certificatesSupportedInEra CardanoEra era -era of +era of Maybe (CertificatesSupportedInEra era) Nothing | [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -certFiles -> TxCertificates BuildTx era +certFiles -> TxCertificates BuildTx era -> ExceptT ShelleyTxCmdError IO (TxCertificates BuildTx era) forall (m :: * -> *) a. Monad m => a -> m a return TxCertificates BuildTx era @@ -2468,12 +2468,12 @@ forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureCertificates - Just CertificatesSupportedInEra era -supported -> do - [Certificate] -certs <- [ExceptT ShelleyTxCmdError IO Certificate] + Just CertificatesSupportedInEra era +supported -> do + [Certificate] +certs <- [ExceptT ShelleyTxCmdError IO Certificate] -> ExceptT ShelleyTxCmdError IO [Certificate] forall (t :: * -> *) (m :: * -> *) a. (Traversable t, Monad m) => @@ -2511,9 +2511,9 @@ AsType a -> String -> IO (Either (FileError TextEnvelopeError) a) readFileTextEnvelope AsType Certificate AsCertificate String -certFile - | CertificateFile String -certFile <- ((CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake)) +certFile + | CertificateFile String +certFile <- ((CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake)) -> CertificateFile) -> [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -> [CertificateFile] @@ -2522,9 +2522,9 @@ -> CertificateFile forall a b. (a, b) -> a fst [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -certFiles ] - Map StakeCredential (Witness WitCtxStake era) -reqWits <- [(StakeCredential, Witness WitCtxStake era)] +certFiles ] + Map StakeCredential (Witness WitCtxStake era) +reqWits <- [(StakeCredential, Witness WitCtxStake era)] -> Map StakeCredential (Witness WitCtxStake era) forall k a. Ord k => [(k, a)] -> Map k a Map.fromList ([(StakeCredential, Witness WitCtxStake era)] @@ -2568,8 +2568,8 @@ ShelleyTxCmdError IO (Maybe (StakeCredential, Witness WitCtxStake era)) -convert [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] -certFiles +convert [(CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake))] +certFiles TxCertificates BuildTx era -> ExceptT ShelleyTxCmdError IO (TxCertificates BuildTx era) forall (m :: * -> *) a. Monad m => a -> m a @@ -2590,8 +2590,8 @@ build (Map StakeCredential (Witness WitCtxStake era)) -> TxCertificates build era TxCertificates CertificatesSupportedInEra era -supported [Certificate] -certs (BuildTxWith +supported [Certificate] +certs (BuildTxWith BuildTx (Map StakeCredential (Witness WitCtxStake era)) -> TxCertificates BuildTx era) -> BuildTxWith @@ -2603,20 +2603,20 @@ BuildTx (Map StakeCredential (Witness WitCtxStake era)) forall a. a -> BuildTxWith BuildTx a BuildTxWith Map StakeCredential (Witness WitCtxStake era) -reqWits +reqWits where -- We get the stake credential witness for a certificate that requires it. -- NB: Only stake address deregistration and delegation requires -- witnessing (witness can be script or key) - deriveStakeCredentialWitness + deriveStakeCredentialWitness :: CertificateFile -> ExceptT ShelleyTxCmdError IO (Maybe StakeCredential) - deriveStakeCredentialWitness :: CertificateFile + deriveStakeCredentialWitness :: CertificateFile -> ExceptT ShelleyTxCmdError IO (Maybe StakeCredential) -deriveStakeCredentialWitness (CertificateFile String -certFile) = do - Certificate -cert <- (FileError TextEnvelopeError -> ShelleyTxCmdError) +deriveStakeCredentialWitness (CertificateFile String +certFile) = do + Certificate +cert <- (FileError TextEnvelopeError -> ShelleyTxCmdError) -> ExceptT (FileError TextEnvelopeError) IO Certificate -> ExceptT ShelleyTxCmdError IO Certificate forall (m :: * -> *) x y a. @@ -2648,11 +2648,11 @@ AsType a -> String -> IO (Either (FileError TextEnvelopeError) a) readFileTextEnvelope AsType Certificate AsCertificate String -certFile +certFile case Certificate -cert of - StakeAddressDeregistrationCertificate StakeCredential -sCred -> Maybe StakeCredential +cert of + StakeAddressDeregistrationCertificate StakeCredential +sCred -> Maybe StakeCredential -> ExceptT ShelleyTxCmdError IO (Maybe StakeCredential) forall (m :: * -> *) a. Monad m => a -> m a return (Maybe StakeCredential @@ -2663,9 +2663,9 @@ $ StakeCredential -> Maybe StakeCredential forall a. a -> Maybe a Just StakeCredential -sCred - StakeAddressDelegationCertificate StakeCredential -sCred PoolId +sCred + StakeAddressDelegationCertificate StakeCredential +sCred PoolId _ -> Maybe StakeCredential -> ExceptT ShelleyTxCmdError IO (Maybe StakeCredential) forall (m :: * -> *) a. Monad m => a -> m a @@ -2677,7 +2677,7 @@ $ StakeCredential -> Maybe StakeCredential forall a. a -> Maybe a Just StakeCredential -sCred +sCred Certificate _ -> Maybe StakeCredential -> ExceptT ShelleyTxCmdError IO (Maybe StakeCredential) @@ -2686,25 +2686,25 @@ forall a. Maybe a Nothing - convert + convert :: (CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake)) -> ExceptT ShelleyTxCmdError IO - (Maybe (StakeCredential, Witness WitCtxStake era)) - convert :: (CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake)) + (Maybe (StakeCredential, Witness WitCtxStake era)) + convert :: (CertificateFile, Maybe (ScriptWitnessFiles WitCtxStake)) -> ExceptT ShelleyTxCmdError IO (Maybe (StakeCredential, Witness WitCtxStake era)) -convert (CertificateFile -cert, Maybe (ScriptWitnessFiles WitCtxStake) -mScriptWitnessFiles) = do - Maybe StakeCredential -mStakeCred <- CertificateFile +convert (CertificateFile +cert, Maybe (ScriptWitnessFiles WitCtxStake) +mScriptWitnessFiles) = do + Maybe StakeCredential +mStakeCred <- CertificateFile -> ExceptT ShelleyTxCmdError IO (Maybe StakeCredential) -deriveStakeCredentialWitness CertificateFile -cert +deriveStakeCredentialWitness CertificateFile +cert case Maybe StakeCredential -mStakeCred of +mStakeCred of Maybe StakeCredential Nothing -> Maybe (StakeCredential, Witness WitCtxStake era) -> ExceptT @@ -2715,14 +2715,14 @@ return Maybe (StakeCredential, Witness WitCtxStake era) forall a. Maybe a Nothing - Just StakeCredential -sCred -> + Just StakeCredential +sCred -> case Maybe (ScriptWitnessFiles WitCtxStake) -mScriptWitnessFiles of - Just ScriptWitnessFiles WitCtxStake -scriptWitnessFiles -> do - ScriptWitness WitCtxStake era -sWit <- CardanoEra era +mScriptWitnessFiles of + Just ScriptWitnessFiles WitCtxStake +scriptWitnessFiles -> do + ScriptWitness WitCtxStake era +sWit <- CardanoEra era -> ScriptWitnessFiles WitCtxStake -> ExceptT ShelleyTxCmdError IO (ScriptWitness WitCtxStake era) forall era witctx. @@ -2730,8 +2730,8 @@ -> ScriptWitnessFiles witctx -> ExceptT ShelleyTxCmdError IO (ScriptWitness witctx era) createScriptWitness CardanoEra era -era ScriptWitnessFiles WitCtxStake -scriptWitnessFiles +era ScriptWitnessFiles WitCtxStake +scriptWitnessFiles Maybe (StakeCredential, Witness WitCtxStake era) -> ExceptT ShelleyTxCmdError @@ -2753,7 +2753,7 @@ -> Maybe (StakeCredential, Witness WitCtxStake era) forall a. a -> Maybe a Just ( StakeCredential -sCred +sCred , ScriptWitnessInCtx WitCtxStake -> ScriptWitness WitCtxStake era -> Witness WitCtxStake era forall witctx era. @@ -2761,7 +2761,7 @@ -> ScriptWitness witctx era -> Witness witctx era ScriptWitness ScriptWitnessInCtx WitCtxStake ScriptWitnessForStakeAddr ScriptWitness WitCtxStake era -sWit +sWit ) Maybe (ScriptWitnessFiles WitCtxStake) @@ -2786,13 +2786,13 @@ -> Maybe (StakeCredential, Witness WitCtxStake era) forall a. a -> Maybe a Just (StakeCredential -sCred, KeyWitnessInCtx WitCtxStake -> Witness WitCtxStake era +sCred, KeyWitnessInCtx WitCtxStake -> Witness WitCtxStake era forall witctx era. KeyWitnessInCtx witctx -> Witness witctx era KeyWitness KeyWitnessInCtx WitCtxStake KeyWitnessForStakeAddr) -validateProtocolParameters - :: CardanoEra era +validateProtocolParameters + :: CardanoEra era -> Maybe ProtocolParamsSourceSpec -> ExceptT ShelleyTxCmdError IO (BuildTxWith BuildTx (Maybe ProtocolParameters)) @@ -2816,13 +2816,13 @@ BuildTxWith Maybe ProtocolParameters forall a. Maybe a Nothing) -validateProtocolParameters CardanoEra era -era (Just ProtocolParamsSourceSpec -pparamsspec) = +validateProtocolParameters CardanoEra era +era (Just ProtocolParamsSourceSpec +pparamsspec) = case CardanoEra era -> Maybe (ScriptDataSupportedInEra era) forall era. CardanoEra era -> Maybe (ScriptDataSupportedInEra era) scriptDataSupportedInEra CardanoEra era -era of +era of Maybe (ScriptDataSupportedInEra era) Nothing -> CardanoEra era -> TxFeature @@ -2833,7 +2833,7 @@ forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureProtocolParameters Just ScriptDataSupportedInEra era _ -> Maybe ProtocolParameters @@ -2861,11 +2861,11 @@ ProtocolParamsSourceSpec -> ExceptT ShelleyTxCmdError IO ProtocolParameters readProtocolParametersSourceSpec ProtocolParamsSourceSpec -pparamsspec +pparamsspec -validateTxUpdateProposal :: CardanoEra era +validateTxUpdateProposal :: CardanoEra era -> Maybe UpdateProposalFile - -> ExceptT ShelleyTxCmdError IO (TxUpdateProposal era) + -> ExceptT ShelleyTxCmdError IO (TxUpdateProposal era) validateTxUpdateProposal :: CardanoEra era -> Maybe UpdateProposalFile -> ExceptT ShelleyTxCmdError IO (TxUpdateProposal era) @@ -2877,26 +2877,26 @@ return TxUpdateProposal era forall era. TxUpdateProposal era TxUpdateProposalNone -validateTxUpdateProposal CardanoEra era -era (Just (UpdateProposalFile String -file)) = +validateTxUpdateProposal CardanoEra era +era (Just (UpdateProposalFile String +file)) = case CardanoEra era -> Maybe (UpdateProposalSupportedInEra era) forall era. CardanoEra era -> Maybe (UpdateProposalSupportedInEra era) updateProposalSupportedInEra CardanoEra era -era of +era of Maybe (UpdateProposalSupportedInEra era) Nothing -> CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO (TxUpdateProposal era) forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureCertificates - Just UpdateProposalSupportedInEra era -supported -> do - UpdateProposal -prop <- (FileError TextEnvelopeError -> ShelleyTxCmdError) + Just UpdateProposalSupportedInEra era +supported -> do + UpdateProposal +prop <- (FileError TextEnvelopeError -> ShelleyTxCmdError) -> ExceptT (FileError TextEnvelopeError) IO UpdateProposal -> ExceptT ShelleyTxCmdError IO UpdateProposal forall (m :: * -> *) x y a. @@ -2925,7 +2925,7 @@ AsType a -> String -> IO (Either (FileError TextEnvelopeError) a) readFileTextEnvelope AsType UpdateProposal AsUpdateProposal String -file +file TxUpdateProposal era -> ExceptT ShelleyTxCmdError IO (TxUpdateProposal era) forall (m :: * -> *) a. Monad m => a -> m a @@ -2935,14 +2935,14 @@ UpdateProposalSupportedInEra era -> UpdateProposal -> TxUpdateProposal era TxUpdateProposal UpdateProposalSupportedInEra era -supported UpdateProposal -prop) +supported UpdateProposal +prop) -validateTxMintValue :: forall era. - CardanoEra era +validateTxMintValue :: forall era. + CardanoEra era -> Maybe (Value, [ScriptWitnessFiles WitCtxMint]) - -> ExceptT ShelleyTxCmdError IO (TxMintValue BuildTx era) + -> ExceptT ShelleyTxCmdError IO (TxMintValue BuildTx era) validateTxMintValue :: CardanoEra era -> Maybe (Value, [ScriptWitnessFiles WitCtxMint]) -> ExceptT ShelleyTxCmdError IO (TxMintValue BuildTx era) @@ -2954,10 +2954,10 @@ return TxMintValue BuildTx era forall build era. TxMintValue build era TxMintNone -validateTxMintValue CardanoEra era -era (Just (Value -val, [ScriptWitnessFiles WitCtxMint] -scriptWitnessFiles)) = +validateTxMintValue CardanoEra era +era (Just (Value +val, [ScriptWitnessFiles WitCtxMint] +scriptWitnessFiles)) = case CardanoEra era -> Either (OnlyAdaSupportedInEra era) (MultiAssetSupportedInEra era) @@ -2966,7 +2966,7 @@ -> Either (OnlyAdaSupportedInEra era) (MultiAssetSupportedInEra era) multiAssetSupportedInEra CardanoEra era -era of +era of Left OnlyAdaSupportedInEra era _ -> CardanoEra era -> TxFeature @@ -2974,27 +2974,27 @@ forall era a. CardanoEra era -> TxFeature -> ExceptT ShelleyTxCmdError IO a txFeatureMismatch CardanoEra era -era TxFeature +era TxFeature TxFeatureMintValue - Right MultiAssetSupportedInEra era -supported -> do + Right MultiAssetSupportedInEra era +supported -> do -- The set of policy ids for which we need witnesses: - let witnessesNeededSet :: Set PolicyId - witnessesNeededSet :: Set PolicyId -witnessesNeededSet = + let witnessesNeededSet :: Set PolicyId + witnessesNeededSet :: Set PolicyId +witnessesNeededSet = [PolicyId] -> Set PolicyId forall a. Ord a => [a] -> Set a Set.fromList [ PolicyId -pid | (AssetId PolicyId -pid AssetName +pid | (AssetId PolicyId +pid AssetName _, Quantity _) <- Value -> [(AssetId, Quantity)] valueToList Value -val ] +val ] -- The set (and map) of policy ids for which we have witnesses: - [ScriptWitness WitCtxMint era] -witnesses <- (ScriptWitnessFiles WitCtxMint + [ScriptWitness WitCtxMint era] +witnesses <- (ScriptWitnessFiles WitCtxMint -> ExceptT ShelleyTxCmdError IO (ScriptWitness WitCtxMint era)) -> [ScriptWitnessFiles WitCtxMint] -> ExceptT ShelleyTxCmdError IO [ScriptWitness WitCtxMint era] @@ -3009,43 +3009,43 @@ -> ScriptWitnessFiles witctx -> ExceptT ShelleyTxCmdError IO (ScriptWitness witctx era) createScriptWitness CardanoEra era -era) [ScriptWitnessFiles WitCtxMint] -scriptWitnessFiles - let witnessesProvidedMap :: Map PolicyId (ScriptWitness WitCtxMint era) - witnessesProvidedMap :: Map PolicyId (ScriptWitness WitCtxMint era) -witnessesProvidedMap = [(PolicyId, ScriptWitness WitCtxMint era)] +era) [ScriptWitnessFiles WitCtxMint] +scriptWitnessFiles + let witnessesProvidedMap :: Map PolicyId (ScriptWitness WitCtxMint era) + witnessesProvidedMap :: Map PolicyId (ScriptWitness WitCtxMint era) +witnessesProvidedMap = [(PolicyId, ScriptWitness WitCtxMint era)] -> Map PolicyId (ScriptWitness WitCtxMint era) forall k a. Ord k => [(k, a)] -> Map k a Map.fromList [ (ScriptWitness WitCtxMint era -> PolicyId forall witctx era. ScriptWitness witctx era -> PolicyId scriptWitnessPolicyId ScriptWitness WitCtxMint era -witness, ScriptWitness WitCtxMint era -witness) - | ScriptWitness WitCtxMint era -witness <- [ScriptWitness WitCtxMint era] -witnesses ] - witnessesProvidedSet :: Set PolicyId -witnessesProvidedSet = Map PolicyId (ScriptWitness WitCtxMint era) -> Set PolicyId +witness, ScriptWitness WitCtxMint era +witness) + | ScriptWitness WitCtxMint era +witness <- [ScriptWitness WitCtxMint era] +witnesses ] + witnessesProvidedSet :: Set PolicyId +witnessesProvidedSet = Map PolicyId (ScriptWitness WitCtxMint era) -> Set PolicyId forall k a. Map k a -> Set k Map.keysSet Map PolicyId (ScriptWitness WitCtxMint era) -witnessesProvidedMap +witnessesProvidedMap -- Check not too many, nor too few: Set PolicyId -> Set PolicyId -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *). Monad m => Set PolicyId -> Set PolicyId -> ExceptT ShelleyTxCmdError m () -validateAllWitnessesProvided Set PolicyId -witnessesNeededSet Set PolicyId -witnessesProvidedSet +validateAllWitnessesProvided Set PolicyId +witnessesNeededSet Set PolicyId +witnessesProvidedSet Set PolicyId -> Set PolicyId -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *). Monad m => Set PolicyId -> Set PolicyId -> ExceptT ShelleyTxCmdError m () -validateNoUnnecessaryWitnesses Set PolicyId -witnessesNeededSet Set PolicyId -witnessesProvidedSet +validateNoUnnecessaryWitnesses Set PolicyId +witnessesNeededSet Set PolicyId +witnessesProvidedSet TxMintValue BuildTx era -> ExceptT ShelleyTxCmdError IO (TxMintValue BuildTx era) @@ -3061,22 +3061,22 @@ -> BuildTxWith build (Map PolicyId (ScriptWitness WitCtxMint era)) -> TxMintValue build era TxMintValue MultiAssetSupportedInEra era -supported Value -val (Map PolicyId (ScriptWitness WitCtxMint era) +supported Value +val (Map PolicyId (ScriptWitness WitCtxMint era) -> BuildTxWith BuildTx (Map PolicyId (ScriptWitness WitCtxMint era)) forall a. a -> BuildTxWith BuildTx a BuildTxWith Map PolicyId (ScriptWitness WitCtxMint era) -witnessesProvidedMap)) +witnessesProvidedMap)) where - validateAllWitnessesProvided :: Set PolicyId -> Set PolicyId -> ExceptT ShelleyTxCmdError m () -validateAllWitnessesProvided Set PolicyId -witnessesNeeded Set PolicyId -witnessesProvided + validateAllWitnessesProvided :: Set PolicyId -> Set PolicyId -> ExceptT ShelleyTxCmdError m () +validateAllWitnessesProvided Set PolicyId +witnessesNeeded Set PolicyId +witnessesProvided | [PolicyId] -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null [PolicyId] -witnessesMissing = () -> ExceptT ShelleyTxCmdError m () +witnessesMissing = () -> ExceptT ShelleyTxCmdError m () forall (m :: * -> *) a. Monad m => a -> m a return () | Bool @@ -3084,25 +3084,25 @@ forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left ([PolicyId] -> ShelleyTxCmdError ShelleyTxCmdPolicyIdsMissing [PolicyId] -witnessesMissing) +witnessesMissing) where - witnessesMissing :: [PolicyId] -witnessesMissing = Set PolicyId -> [PolicyId] + witnessesMissing :: [PolicyId] +witnessesMissing = Set PolicyId -> [PolicyId] forall a. Set a -> [a] Set.elems (Set PolicyId -witnessesNeeded Set PolicyId -> Set PolicyId -> Set PolicyId +witnessesNeeded Set PolicyId -> Set PolicyId -> Set PolicyId forall a. Ord a => Set a -> Set a -> Set a Set.\\ Set PolicyId -witnessesProvided) +witnessesProvided) - validateNoUnnecessaryWitnesses :: Set PolicyId -> Set PolicyId -> ExceptT ShelleyTxCmdError m () -validateNoUnnecessaryWitnesses Set PolicyId -witnessesNeeded Set PolicyId -witnessesProvided + validateNoUnnecessaryWitnesses :: Set PolicyId -> Set PolicyId -> ExceptT ShelleyTxCmdError m () +validateNoUnnecessaryWitnesses Set PolicyId +witnessesNeeded Set PolicyId +witnessesProvided | [PolicyId] -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null [PolicyId] -witnessesExtra = () -> ExceptT ShelleyTxCmdError m () +witnessesExtra = () -> ExceptT ShelleyTxCmdError m () forall (m :: * -> *) a. Monad m => a -> m a return () | Bool @@ -3110,46 +3110,46 @@ forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left ([PolicyId] -> ShelleyTxCmdError ShelleyTxCmdPolicyIdsExcess [PolicyId] -witnessesExtra) +witnessesExtra) where - witnessesExtra :: [PolicyId] -witnessesExtra = Set PolicyId -> [PolicyId] + witnessesExtra :: [PolicyId] +witnessesExtra = Set PolicyId -> [PolicyId] forall a. Set a -> [a] Set.elems (Set PolicyId -witnessesProvided Set PolicyId -> Set PolicyId -> Set PolicyId +witnessesProvided Set PolicyId -> Set PolicyId -> Set PolicyId forall a. Ord a => Set a -> Set a -> Set a Set.\\ Set PolicyId -witnessesNeeded) +witnessesNeeded) -scriptWitnessPolicyId :: ScriptWitness witctx era -> PolicyId +scriptWitnessPolicyId :: ScriptWitness witctx era -> PolicyId scriptWitnessPolicyId :: ScriptWitness witctx era -> PolicyId -scriptWitnessPolicyId ScriptWitness witctx era -witness = +scriptWitnessPolicyId ScriptWitness witctx era +witness = case ScriptWitness witctx era -> ScriptInEra era forall witctx era. ScriptWitness witctx era -> ScriptInEra era scriptWitnessScript ScriptWitness witctx era -witness of +witness of ScriptInEra ScriptLanguageInEra lang era -_ Script lang -script -> Script lang -> PolicyId +_ Script lang +script -> Script lang -> PolicyId forall lang. Script lang -> PolicyId scriptPolicyId Script lang -script +script -createScriptWitness - :: CardanoEra era - -> ScriptWitnessFiles witctx - -> ExceptT ShelleyTxCmdError IO (ScriptWitness witctx era) +createScriptWitness + :: CardanoEra era + -> ScriptWitnessFiles witctx + -> ExceptT ShelleyTxCmdError IO (ScriptWitness witctx era) createScriptWitness :: CardanoEra era -> ScriptWitnessFiles witctx -> ExceptT ShelleyTxCmdError IO (ScriptWitness witctx era) -createScriptWitness CardanoEra era -era (SimpleScriptWitnessFile (ScriptFile String -scriptFile)) = do - script :: ScriptInAnyLang -script@(ScriptInAnyLang ScriptLanguage lang -lang Script lang +createScriptWitness CardanoEra era +era (SimpleScriptWitnessFile (ScriptFile String +scriptFile)) = do + script :: ScriptInAnyLang +script@(ScriptInAnyLang ScriptLanguage lang +lang Script lang _) <- (FileError ScriptDecodeError -> ShelleyTxCmdError) -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO ScriptInAnyLang @@ -3165,10 +3165,10 @@ $ String -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang readFileScriptInAnyLang String -scriptFile - ScriptInEra ScriptLanguageInEra lang era -langInEra Script lang -script' <- CardanoEra era +scriptFile + ScriptInEra ScriptLanguageInEra lang era +langInEra Script lang +script' <- CardanoEra era -> ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) forall era. @@ -3176,13 +3176,13 @@ -> ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) validateScriptSupportedInEra CardanoEra era -era ScriptInAnyLang -script +era ScriptInAnyLang +script case Script lang -script' of - SimpleScript SimpleScriptVersion lang -version SimpleScript lang -sscript -> +script' of + SimpleScript SimpleScriptVersion lang +version SimpleScript lang +sscript -> ScriptWitness witctx era -> ExceptT ShelleyTxCmdError IO (ScriptWitness witctx era) forall (m :: * -> *) a. Monad m => a -> m a @@ -3202,9 +3202,9 @@ -> ScriptWitness witctx era SimpleScriptWitness ScriptLanguageInEra lang era -langInEra SimpleScriptVersion lang -version SimpleScript lang -sscript +langInEra SimpleScriptVersion lang +version SimpleScript lang +sscript -- If the supplied cli flags were for a simple script (i.e. the user did -- not supply the datum, redeemer or ex units), but the script file turns @@ -3221,25 +3221,25 @@ $ String -> AnyScriptLanguage -> ShelleyTxCmdError ShelleyTxCmdScriptExpectedSimple String -scriptFile +scriptFile (ScriptLanguage lang -> AnyScriptLanguage forall lang. ScriptLanguage lang -> AnyScriptLanguage AnyScriptLanguage ScriptLanguage lang -lang) +lang) -createScriptWitness CardanoEra era -era (PlutusScriptWitnessFiles - (ScriptFile String -scriptFile) - ScriptDatumOrFile witctx -datumOrFile - ScriptRedeemerOrFile -redeemerOrFile - ExecutionUnits -execUnits) = do - script :: ScriptInAnyLang -script@(ScriptInAnyLang ScriptLanguage lang -lang Script lang +createScriptWitness CardanoEra era +era (PlutusScriptWitnessFiles + (ScriptFile String +scriptFile) + ScriptDatumOrFile witctx +datumOrFile + ScriptRedeemerOrFile +redeemerOrFile + ExecutionUnits +execUnits) = do + script :: ScriptInAnyLang +script@(ScriptInAnyLang ScriptLanguage lang +lang Script lang _) <- (FileError ScriptDecodeError -> ShelleyTxCmdError) -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO ScriptInAnyLang @@ -3255,10 +3255,10 @@ $ String -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang readFileScriptInAnyLang String -scriptFile - ScriptInEra ScriptLanguageInEra lang era -langInEra Script lang -script' <- CardanoEra era +scriptFile + ScriptInEra ScriptLanguageInEra lang era +langInEra Script lang +script' <- CardanoEra era -> ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) forall era. @@ -3266,25 +3266,25 @@ -> ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) validateScriptSupportedInEra CardanoEra era -era ScriptInAnyLang -script +era ScriptInAnyLang +script case Script lang -script' of - PlutusScript PlutusScriptVersion lang -version PlutusScript lang -pscript -> do - ScriptDatum witctx -datum <- ScriptDatumOrFile witctx +script' of + PlutusScript PlutusScriptVersion lang +version PlutusScript lang +pscript -> do + ScriptDatum witctx +datum <- ScriptDatumOrFile witctx -> ExceptT ShelleyTxCmdError IO (ScriptDatum witctx) forall witctx. ScriptDatumOrFile witctx -> ExceptT ShelleyTxCmdError IO (ScriptDatum witctx) readScriptDatumOrFile ScriptDatumOrFile witctx -datumOrFile - ScriptRedeemer -redeemer <- ScriptRedeemerOrFile -> ExceptT ShelleyTxCmdError IO ScriptRedeemer +datumOrFile + ScriptRedeemer +redeemer <- ScriptRedeemerOrFile -> ExceptT ShelleyTxCmdError IO ScriptRedeemer readScriptRedeemerOrFile ScriptRedeemerOrFile -redeemerOrFile +redeemerOrFile ScriptWitness witctx era -> ExceptT ShelleyTxCmdError IO (ScriptWitness witctx era) forall (m :: * -> *) a. Monad m => a -> m a @@ -3310,15 +3310,15 @@ -> ScriptWitness witctx era PlutusScriptWitness ScriptLanguageInEra lang era -langInEra PlutusScriptVersion lang -version PlutusScript lang -pscript +langInEra PlutusScriptVersion lang +version PlutusScript lang +pscript ScriptDatum witctx -datum +datum ScriptRedeemer -redeemer +redeemer ExecutionUnits -execUnits +execUnits -- If the supplied cli flags were for a plutus script (i.e. the user did -- supply the datum, redeemer and ex units), but the script file turns @@ -3335,19 +3335,19 @@ $ String -> AnyScriptLanguage -> ShelleyTxCmdError ShelleyTxCmdScriptExpectedPlutus String -scriptFile +scriptFile (ScriptLanguage lang -> AnyScriptLanguage forall lang. ScriptLanguage lang -> AnyScriptLanguage AnyScriptLanguage ScriptLanguage lang -lang) +lang) -readScriptDatumOrFile :: ScriptDatumOrFile witctx - -> ExceptT ShelleyTxCmdError IO (ScriptDatum witctx) +readScriptDatumOrFile :: ScriptDatumOrFile witctx + -> ExceptT ShelleyTxCmdError IO (ScriptDatum witctx) readScriptDatumOrFile :: ScriptDatumOrFile witctx -> ExceptT ShelleyTxCmdError IO (ScriptDatum witctx) -readScriptDatumOrFile (ScriptDatumOrFileForTxIn ScriptRedeemerOrFile -df) = ScriptRedeemer -> ScriptDatum WitCtxTxIn +readScriptDatumOrFile (ScriptDatumOrFileForTxIn ScriptRedeemerOrFile +df) = ScriptRedeemer -> ScriptDatum WitCtxTxIn ScriptDatumForTxIn (ScriptRedeemer -> ScriptDatum WitCtxTxIn) -> ExceptT ShelleyTxCmdError IO ScriptRedeemer -> ExceptT ShelleyTxCmdError IO (ScriptDatum WitCtxTxIn) @@ -3355,7 +3355,7 @@ <$> ScriptRedeemerOrFile -> ExceptT ShelleyTxCmdError IO ScriptRedeemer readScriptDataOrFile ScriptRedeemerOrFile -df +df readScriptDatumOrFile ScriptDatumOrFile witctx NoScriptDatumOrFileForMint = ScriptDatum WitCtxMint -> ExceptT ShelleyTxCmdError IO (ScriptDatum WitCtxMint) @@ -3378,15 +3378,15 @@ readScriptDataOrFile :: ScriptDataOrFile -> ExceptT ShelleyTxCmdError IO ScriptData readScriptDataOrFile :: ScriptRedeemerOrFile -> ExceptT ShelleyTxCmdError IO ScriptRedeemer -readScriptDataOrFile (ScriptDataValue ScriptRedeemer -d) = ScriptRedeemer -> ExceptT ShelleyTxCmdError IO ScriptRedeemer +readScriptDataOrFile (ScriptDataValue ScriptRedeemer +d) = ScriptRedeemer -> ExceptT ShelleyTxCmdError IO ScriptRedeemer forall (m :: * -> *) a. Monad m => a -> m a return ScriptRedeemer -d -readScriptDataOrFile (ScriptDataFile String -fp) = do - ByteString -bs <- (IOException -> ShelleyTxCmdError) +d +readScriptDataOrFile (ScriptDataFile String +fp) = do + ByteString +bs <- (IOException -> ShelleyTxCmdError) -> IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString forall (m :: * -> *) x a. MonadIO m => @@ -3402,22 +3402,22 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fp) (IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString) +fp) (IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString) -> IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString LBS.readFile String -fp - Value -v <- (String -> ShelleyTxCmdError) +fp + Value +v <- (String -> ShelleyTxCmdError) -> ExceptT String IO Value -> ExceptT ShelleyTxCmdError IO Value forall (m :: * -> *) x y a. Functor m => (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> String -> ShelleyTxCmdError ShelleyTxCmdScriptDataJsonParseError String -fp) (ExceptT String IO Value -> ExceptT ShelleyTxCmdError IO Value) +fp) (ExceptT String IO Value -> ExceptT ShelleyTxCmdError IO Value) -> ExceptT String IO Value -> ExceptT ShelleyTxCmdError IO Value forall a b. (a -> b) -> a -> b $ @@ -3430,9 +3430,9 @@ ByteString -> Either String Value forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecode' ByteString -bs - ScriptRedeemer -sd <- (ScriptDataJsonError -> ShelleyTxCmdError) +bs + ScriptRedeemer +sd <- (ScriptDataJsonError -> ShelleyTxCmdError) -> ExceptT ScriptDataJsonError IO ScriptRedeemer -> ExceptT ShelleyTxCmdError IO ScriptRedeemer forall (m :: * -> *) x y a. @@ -3440,7 +3440,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> ScriptDataJsonError -> ShelleyTxCmdError ShelleyTxCmdScriptDataConversionError String -fp) (ExceptT ScriptDataJsonError IO ScriptRedeemer +fp) (ExceptT ScriptDataJsonError IO ScriptRedeemer -> ExceptT ShelleyTxCmdError IO ScriptRedeemer) -> ExceptT ScriptDataJsonError IO ScriptRedeemer -> ExceptT ShelleyTxCmdError IO ScriptRedeemer @@ -3459,7 +3459,7 @@ -> Value -> Either ScriptDataJsonError ScriptRedeemer scriptDataFromJson ScriptDataJsonSchema ScriptDataJsonDetailedSchema Value -v +v (ScriptDataRangeError -> ShelleyTxCmdError) -> ExceptT ScriptDataRangeError IO () -> ExceptT ShelleyTxCmdError IO () @@ -3468,7 +3468,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> ScriptDataRangeError -> ShelleyTxCmdError ShelleyTxCmdScriptDataValidationError String -fp) (ExceptT ScriptDataRangeError IO () +fp) (ExceptT ScriptDataRangeError IO () -> ExceptT ShelleyTxCmdError IO ()) -> ExceptT ScriptDataRangeError IO () -> ExceptT ShelleyTxCmdError IO () @@ -3485,11 +3485,11 @@ $ ScriptRedeemer -> Either ScriptDataRangeError () validateScriptData ScriptRedeemer -sd +sd ScriptRedeemer -> ExceptT ShelleyTxCmdError IO ScriptRedeemer forall (m :: * -> *) a. Monad m => a -> m a return ScriptRedeemer -sd +sd -- ---------------------------------------------------------------------------- @@ -3506,15 +3506,15 @@ -> Maybe NetworkId -> TxFile -> ExceptT ShelleyTxCmdError IO () -runTxSign (TxBodyFile String -txbodyFile) [WitnessSigningData] -witSigningData Maybe NetworkId -mnw (TxFile String -txFile) = do +runTxSign (TxBodyFile String +txbodyFile) [WitnessSigningData] +witSigningData Maybe NetworkId +mnw (TxFile String +txFile) = do - InAnyShelleyBasedEra ShelleyBasedEra era -_era TxBody era -txbody <- + InAnyShelleyBasedEra ShelleyBasedEra era +_era TxBody era +txbody <- --TODO: in principle we should be able to support Byron era txs too Text -> InAnyCardanoEra TxBody @@ -3532,10 +3532,10 @@ forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) readFileTxBody String -txbodyFile +txbodyFile - [SomeWitness] -sks <- (ReadWitnessSigningDataError -> ShelleyTxCmdError) + [SomeWitness] +sks <- (ReadWitnessSigningDataError -> ShelleyTxCmdError) -> ExceptT ReadWitnessSigningDataError IO [SomeWitness] -> ExceptT ShelleyTxCmdError IO [SomeWitness] forall (m :: * -> *) x y a. @@ -3558,11 +3558,11 @@ mapM WitnessSigningData -> ExceptT ReadWitnessSigningDataError IO SomeWitness readWitnessSigningData [WitnessSigningData] -witSigningData +witSigningData - let ([ShelleyBootstrapWitnessSigningKeyData] -sksByron, [ShelleyWitnessSigningKey] -sksShelley) = [ByronOrShelleyWitness] + let ([ShelleyBootstrapWitnessSigningKeyData] +sksByron, [ShelleyWitnessSigningKey] +sksShelley) = [ByronOrShelleyWitness] -> ([ShelleyBootstrapWitnessSigningKeyData], [ShelleyWitnessSigningKey]) partitionSomeWitnesses ([ByronOrShelleyWitness] @@ -3577,12 +3577,12 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map SomeWitness -> ByronOrShelleyWitness categoriseSomeWitness [SomeWitness] -sks +sks -- Byron witnesses require the network ID. This can either be provided -- directly or derived from a provided Byron address. - [KeyWitness era] -byronWitnesses <- (ShelleyBootstrapWitnessError -> ShelleyTxCmdError) + [KeyWitness era] +byronWitnesses <- (ShelleyBootstrapWitnessError -> ShelleyTxCmdError) -> ExceptT ShelleyBootstrapWitnessError IO [KeyWitness era] -> ExceptT ShelleyTxCmdError IO [KeyWitness era] forall (m :: * -> *) x y a. @@ -3619,12 +3619,12 @@ -> [ShelleyBootstrapWitnessSigningKeyData] -> Either ShelleyBootstrapWitnessError [KeyWitness era] mkShelleyBootstrapWitnesses Maybe NetworkId -mnw TxBody era -txbody [ShelleyBootstrapWitnessSigningKeyData] -sksByron +mnw TxBody era +txbody [ShelleyBootstrapWitnessSigningKeyData] +sksByron - let shelleyKeyWitnesses :: [KeyWitness era] -shelleyKeyWitnesses = (ShelleyWitnessSigningKey -> KeyWitness era) + let shelleyKeyWitnesses :: [KeyWitness era] +shelleyKeyWitnesses = (ShelleyWitnessSigningKey -> KeyWitness era) -> [ShelleyWitnessSigningKey] -> [KeyWitness era] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map (TxBody era -> ShelleyWitnessSigningKey -> KeyWitness era @@ -3632,17 +3632,17 @@ IsShelleyBasedEra era => TxBody era -> ShelleyWitnessSigningKey -> KeyWitness era makeShelleyKeyWitness TxBody era -txbody) [ShelleyWitnessSigningKey] -sksShelley - tx :: Tx era -tx = [KeyWitness era] -> TxBody era -> Tx era +txbody) [ShelleyWitnessSigningKey] +sksShelley + tx :: Tx era +tx = [KeyWitness era] -> TxBody era -> Tx era forall era. [KeyWitness era] -> TxBody era -> Tx era makeSignedTransaction ([KeyWitness era] -byronWitnesses [KeyWitness era] -> [KeyWitness era] -> [KeyWitness era] +byronWitnesses [KeyWitness era] -> [KeyWitness era] -> [KeyWitness era] forall a. [a] -> [a] -> [a] ++ [KeyWitness era] -shelleyKeyWitnesses) TxBody era -txbody +shelleyKeyWitnesses) TxBody era +txbody (FileError () -> ShelleyTxCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyTxCmdError IO () @@ -3672,10 +3672,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -txFile Maybe TextEnvelopeDescr +txFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing Tx era -tx +tx -- ---------------------------------------------------------------------------- @@ -3690,12 +3690,12 @@ -> ExceptT ShelleyTxCmdError IO () runTxSubmit :: AnyConsensusModeParams -> NetworkId -> String -> ExceptT ShelleyTxCmdError IO () -runTxSubmit (AnyConsensusModeParams ConsensusModeParams mode -cModeParams) NetworkId -network String -txFile = do - SocketPath String -sockPath <- (EnvSocketError -> ShelleyTxCmdError) +runTxSubmit (AnyConsensusModeParams ConsensusModeParams mode +cModeParams) NetworkId +network String +txFile = do + SocketPath String +sockPath <- (EnvSocketError -> ShelleyTxCmdError) -> ExceptT EnvSocketError IO SocketPath -> ExceptT ShelleyTxCmdError IO SocketPath forall (m :: * -> *) x y a. @@ -3705,13 +3705,13 @@ ShelleyTxCmdSocketEnvError ExceptT EnvSocketError IO SocketPath readEnvSocketPath - InAnyCardanoEra CardanoEra era -era Tx era -tx <- String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra Tx) + InAnyCardanoEra CardanoEra era +era Tx era +tx <- String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra Tx) readFileTx String -txFile - let cMode :: AnyConsensusMode -cMode = ConsensusMode mode -> AnyConsensusMode +txFile + let cMode :: AnyConsensusMode +cMode = ConsensusMode mode -> AnyConsensusMode forall mode. ConsensusMode mode -> AnyConsensusMode AnyConsensusMode (ConsensusMode mode -> AnyConsensusMode) -> ConsensusMode mode -> AnyConsensusMode @@ -3719,9 +3719,9 @@ $ ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams - EraInMode era mode -eraInMode <- ShelleyTxCmdError +cModeParams + EraInMode era mode +eraInMode <- ShelleyTxCmdError -> Maybe (EraInMode era mode) -> ExceptT ShelleyTxCmdError IO (EraInMode era mode) forall (m :: * -> *) x a. Monad m => x -> Maybe a -> ExceptT x m a @@ -3731,46 +3731,46 @@ ShelleyTxCmdEraConsensusModeMismatch (String -> Maybe String forall a. a -> Maybe a Just String -txFile) AnyConsensusMode -cMode (CardanoEra era -> AnyCardanoEra +txFile) AnyConsensusMode +cMode (CardanoEra era -> AnyCardanoEra forall era. IsCardanoEra era => CardanoEra era -> AnyCardanoEra AnyCardanoEra CardanoEra era -era)) +era)) (CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) forall era mode. CardanoEra era -> ConsensusMode mode -> Maybe (EraInMode era mode) toEraInMode CardanoEra era -era (ConsensusMode mode -> Maybe (EraInMode era mode)) +era (ConsensusMode mode -> Maybe (EraInMode era mode)) -> ConsensusMode mode -> Maybe (EraInMode era mode) forall a b. (a -> b) -> a -> b $ ConsensusModeParams mode -> ConsensusMode mode forall mode. ConsensusModeParams mode -> ConsensusMode mode consensusModeOnly ConsensusModeParams mode -cModeParams) - let txInMode :: TxInMode mode -txInMode = Tx era -> EraInMode era mode -> TxInMode mode +cModeParams) + let txInMode :: TxInMode mode +txInMode = Tx era -> EraInMode era mode -> TxInMode mode forall era mode. Tx era -> EraInMode era mode -> TxInMode mode TxInMode Tx era -tx EraInMode era mode -eraInMode - localNodeConnInfo :: LocalNodeConnectInfo mode -localNodeConnInfo = LocalNodeConnectInfo :: forall mode. +tx EraInMode era mode +eraInMode + localNodeConnInfo :: LocalNodeConnectInfo mode +localNodeConnInfo = LocalNodeConnectInfo :: forall mode. ConsensusModeParams mode -> NetworkId -> String -> LocalNodeConnectInfo mode LocalNodeConnectInfo { localConsensusModeParams :: ConsensusModeParams mode localConsensusModeParams = ConsensusModeParams mode -cModeParams +cModeParams , localNodeNetworkId :: NetworkId localNodeNetworkId = NetworkId -network +network , localNodeSocketPath :: String localNodeSocketPath = String -sockPath +sockPath } - SubmitResult (TxValidationErrorInMode mode) -res <- IO (SubmitResult (TxValidationErrorInMode mode)) + SubmitResult (TxValidationErrorInMode mode) +res <- IO (SubmitResult (TxValidationErrorInMode mode)) -> ExceptT ShelleyTxCmdError IO (SubmitResult (TxValidationErrorInMode mode)) forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -3789,10 +3789,10 @@ -> TxInMode mode -> IO (SubmitResult (TxValidationErrorInMode mode)) submitTxToNodeLocal LocalNodeConnectInfo mode -localNodeConnInfo TxInMode mode -txInMode +localNodeConnInfo TxInMode mode +txInMode case SubmitResult (TxValidationErrorInMode mode) -res of +res of SubmitResult (TxValidationErrorInMode mode) Net.Tx.SubmitSuccess -> IO () -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -3802,13 +3802,13 @@ $ Text -> IO () putTextLn Text "Transaction successfully submitted." - Net.Tx.SubmitFail TxValidationErrorInMode mode -reason -> + Net.Tx.SubmitFail TxValidationErrorInMode mode +reason -> case TxValidationErrorInMode mode -reason of - TxValidationErrorInMode TxValidationError era -err EraInMode era mode -_eraInMode -> ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO () +reason of + TxValidationErrorInMode TxValidationError era +err EraInMode era mode +_eraInMode -> ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO ()) -> (String -> ShelleyTxCmdError) @@ -3830,16 +3830,16 @@ $ TxValidationError era -> String forall a b. (Show a, ConvertText String b) => a -> b show TxValidationError era -err - TxValidationEraMismatch EraMismatch -mismatchErr -> ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO () +err + TxValidationEraMismatch EraMismatch +mismatchErr -> ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO ()) -> ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO () forall a b. (a -> b) -> a -> b $ EraMismatch -> ShelleyTxCmdError ShelleyTxCmdTxSubmitErrorEraMismatch EraMismatch -mismatchErr +mismatchErr -- ---------------------------------------------------------------------------- -- Transaction fee calculation @@ -3862,21 +3862,21 @@ -> TxShelleyWitnessCount -> TxByronWitnessCount -> ExceptT ShelleyTxCmdError IO () -runTxCalculateMinFee (TxBodyFile String -txbodyFile) Maybe NetworkId -nw ProtocolParamsSourceSpec -protocolParamsSourceSpec - (TxInCount Int -nInputs) (TxOutCount Int -nOutputs) - (TxShelleyWitnessCount Int -nShelleyKeyWitnesses) - (TxByronWitnessCount Int -nByronKeyWitnesses) = do +runTxCalculateMinFee (TxBodyFile String +txbodyFile) Maybe NetworkId +nw ProtocolParamsSourceSpec +protocolParamsSourceSpec + (TxInCount Int +nInputs) (TxOutCount Int +nOutputs) + (TxShelleyWitnessCount Int +nShelleyKeyWitnesses) + (TxByronWitnessCount Int +nByronKeyWitnesses) = do - InAnyShelleyBasedEra ShelleyBasedEra era -_era TxBody era -txbody <- + InAnyShelleyBasedEra ShelleyBasedEra era +_era TxBody era +txbody <- --TODO: in principle we should be able to support Byron era txs too Text -> InAnyCardanoEra TxBody @@ -3894,21 +3894,21 @@ forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) readFileTxBody String -txbodyFile +txbodyFile - ProtocolParameters -pparams <- ProtocolParamsSourceSpec + ProtocolParameters +pparams <- ProtocolParamsSourceSpec -> ExceptT ShelleyTxCmdError IO ProtocolParameters readProtocolParametersSourceSpec ProtocolParamsSourceSpec -protocolParamsSourceSpec +protocolParamsSourceSpec - let tx :: Tx era -tx = [KeyWitness era] -> TxBody era -> Tx era + let tx :: Tx era +tx = [KeyWitness era] -> TxBody era -> Tx era forall era. [KeyWitness era] -> TxBody era -> Tx era makeSignedTransaction [] TxBody era -txbody - Lovelace Integer -fee = NetworkId +txbody + Lovelace Integer +fee = NetworkId -> Natural -> Natural -> Tx era @@ -3933,21 +3933,21 @@ forall a. a -> Maybe a -> a fromMaybe NetworkId Mainnet Maybe NetworkId -nw) +nw) (ProtocolParameters -> Natural protocolParamTxFeeFixed ProtocolParameters -pparams) +pparams) (ProtocolParameters -> Natural protocolParamTxFeePerByte ProtocolParameters -pparams) +pparams) Tx era -tx +tx Int -nInputs Int -nOutputs +nInputs Int +nOutputs Int -nByronKeyWitnesses Int -nShelleyKeyWitnesses +nByronKeyWitnesses Int +nShelleyKeyWitnesses IO () -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -3961,7 +3961,7 @@ $ (Integer -> String forall a b. (Show a, ConvertText String b) => a -> b show Integer -fee :: String) String -> ShowS +fee :: String) String -> ShowS forall a. Semigroup a => a -> a -> a <> String " Lovelace" @@ -3976,20 +3976,20 @@ -> ExceptT ShelleyTxCmdError IO () runTxCalculateMinValue :: ProtocolParamsSourceSpec -> Value -> ExceptT ShelleyTxCmdError IO () -runTxCalculateMinValue ProtocolParamsSourceSpec -protocolParamsSourceSpec Value -value = do - ProtocolParameters -pp <- ProtocolParamsSourceSpec +runTxCalculateMinValue ProtocolParamsSourceSpec +protocolParamsSourceSpec Value +value = do + ProtocolParameters +pp <- ProtocolParamsSourceSpec -> ExceptT ShelleyTxCmdError IO ProtocolParameters readProtocolParametersSourceSpec ProtocolParamsSourceSpec -protocolParamsSourceSpec +protocolParamsSourceSpec - let minValues :: Lovelace -minValues = + let minValues :: Lovelace +minValues = case ProtocolParameters -> Maybe Lovelace protocolParamMinUTxOValue ProtocolParameters -pp of +pp of Maybe Lovelace Nothing -> Text -> Lovelace forall a. HasCallStack => Text -> a @@ -3997,11 +3997,11 @@ "TODO alonzo: runTxCalculateMinValue using new protocol params" --TODO alonzo: there is a new formula for the min amount of ada in -- a tx output, which uses a new param protocolParamUTxOCostPerWord - Just Lovelace -minUTxOValue -> Value -> Lovelace -> Lovelace + Just Lovelace +minUTxOValue -> Value -> Lovelace -> Lovelace calcMinimumDeposit Value -value Lovelace -minUTxOValue +value Lovelace +minUTxOValue IO () -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -4011,15 +4011,15 @@ $ Lovelace -> IO () forall a. Show a => a -> IO () IO.print Lovelace -minValues +minValues runTxCreatePolicyId :: ScriptFile -> ExceptT ShelleyTxCmdError IO () runTxCreatePolicyId :: ScriptFile -> ExceptT ShelleyTxCmdError IO () -runTxCreatePolicyId (ScriptFile String -sFile) = do +runTxCreatePolicyId (ScriptFile String +sFile) = do ScriptInAnyLang ScriptLanguage lang -_ Script lang -script <- (FileError ScriptDecodeError -> ShelleyTxCmdError) +_ Script lang +script <- (FileError ScriptDecodeError -> ShelleyTxCmdError) -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO ScriptInAnyLang forall (m :: * -> *) x y a. @@ -4034,7 +4034,7 @@ $ String -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang readFileScriptInAnyLang String -sFile +sFile IO () -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyTxCmdError IO ()) @@ -4057,15 +4057,15 @@ $ Script lang -> ScriptHash forall lang. Script lang -> ScriptHash hashScript Script lang -script +script readProtocolParametersSourceSpec :: ProtocolParamsSourceSpec -> ExceptT ShelleyTxCmdError IO ProtocolParameters readProtocolParametersSourceSpec :: ProtocolParamsSourceSpec -> ExceptT ShelleyTxCmdError IO ProtocolParameters -readProtocolParametersSourceSpec (ParamsFromGenesis (GenesisFile String -f)) = +readProtocolParametersSourceSpec (ParamsFromGenesis (GenesisFile String +f)) = PParams StandardShelley -> ProtocolParameters forall ledgerera. PParams ledgerera -> ProtocolParameters fromShelleyPParams (PParams StandardShelley -> ProtocolParameters) @@ -4097,15 +4097,15 @@ -> ExceptT ShelleyGenesisCmdError IO (ShelleyGenesis StandardShelley) readShelleyGenesis String -f ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley +f ShelleyGenesis StandardShelley -> ShelleyGenesis StandardShelley forall (cat :: * -> * -> *) a. Category cat => cat a a identity) -readProtocolParametersSourceSpec (ParamsFromFile ProtocolParamsFile -f) = +readProtocolParametersSourceSpec (ParamsFromFile ProtocolParamsFile +f) = ProtocolParamsFile -> ExceptT ShelleyTxCmdError IO ProtocolParameters readProtocolParameters ProtocolParamsFile -f +f --TODO: eliminate this and get only the necessary params, and get them in a more -- helpful way rather than requiring them as a local file. @@ -4113,10 +4113,10 @@ -> ExceptT ShelleyTxCmdError IO ProtocolParameters readProtocolParameters :: ProtocolParamsFile -> ExceptT ShelleyTxCmdError IO ProtocolParameters -readProtocolParameters (ProtocolParamsFile String -fpath) = do - ByteString -pparams <- (IOException -> ShelleyTxCmdError) +readProtocolParameters (ProtocolParamsFile String +fpath) = do + ByteString +pparams <- (IOException -> ShelleyTxCmdError) -> IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString forall (m :: * -> *) x a. MonadIO m => @@ -4132,12 +4132,12 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fpath) (IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString) +fpath) (IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString) -> IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString LBS.readFile String -fpath +fpath (String -> ShelleyTxCmdError) -> ExceptT String IO ProtocolParameters -> ExceptT ShelleyTxCmdError IO ProtocolParameters @@ -4146,7 +4146,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> Text -> ShelleyTxCmdError ShelleyTxCmdAesonDecodeProtocolParamsError String -fpath (Text -> ShelleyTxCmdError) +fpath (Text -> ShelleyTxCmdError) -> (String -> Text) -> String -> ShelleyTxCmdError forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -4173,7 +4173,7 @@ ByteString -> Either String ProtocolParameters forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecode' ByteString -pparams +pparams data SomeWitness = AByronSigningKey (SigningKey ByronKey) (Maybe (Address ByronAddr)) @@ -4196,7 +4196,7 @@ | ReadWitnessSigningDataScriptError !(FileError JsonDecodeError) | ReadWitnessSigningDataSigningKeyAndAddressMismatch -- ^ A Byron address was specified alongside a non-Byron signing key. - deriving Int -> ReadWitnessSigningDataError -> ShowS + deriving Int -> ReadWitnessSigningDataError -> ShowS [ReadWitnessSigningDataError] -> ShowS ReadWitnessSigningDataError -> String (Int -> ReadWitnessSigningDataError -> ShowS) @@ -4216,12 +4216,12 @@ -- | Render an error message for a 'ReadWitnessSigningDataError'. renderReadWitnessSigningDataError :: ReadWitnessSigningDataError -> Text renderReadWitnessSigningDataError :: ReadWitnessSigningDataError -> Text -renderReadWitnessSigningDataError ReadWitnessSigningDataError -err = +renderReadWitnessSigningDataError ReadWitnessSigningDataError +err = case ReadWitnessSigningDataError -err of - ReadWitnessSigningDataSigningKeyDecodeError FileError InputDecodeError -fileErr -> +err of + ReadWitnessSigningDataSigningKeyDecodeError FileError InputDecodeError +fileErr -> Text "Error reading signing key: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -4229,9 +4229,9 @@ Text.pack (FileError InputDecodeError -> String forall e. Error e => e -> String displayError FileError InputDecodeError -fileErr) - ReadWitnessSigningDataScriptError FileError JsonDecodeError -fileErr -> +fileErr) + ReadWitnessSigningDataScriptError FileError JsonDecodeError +fileErr -> Text "Error reading script: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -4239,7 +4239,7 @@ Text.pack (FileError JsonDecodeError -> String forall e. Error e => e -> String displayError FileError JsonDecodeError -fileErr) +fileErr) ReadWitnessSigningDataError ReadWitnessSigningDataSigningKeyAndAddressMismatch -> Text @@ -4250,11 +4250,11 @@ -> ExceptT ReadWitnessSigningDataError IO SomeWitness readWitnessSigningData :: WitnessSigningData -> ExceptT ReadWitnessSigningDataError IO SomeWitness -readWitnessSigningData (KeyWitnessSigningData SigningKeyFile -skFile Maybe (Address ByronAddr) -mbByronAddr) = do - SomeWitness -res <- (FileError InputDecodeError -> ReadWitnessSigningDataError) +readWitnessSigningData (KeyWitnessSigningData SigningKeyFile +skFile Maybe (Address ByronAddr) +mbByronAddr) = do + SomeWitness +res <- (FileError InputDecodeError -> ReadWitnessSigningDataError) -> ExceptT (FileError InputDecodeError) IO SomeWitness -> ExceptT ReadWitnessSigningDataError IO SomeWitness forall (m :: * -> *) x y a. @@ -4290,32 +4290,32 @@ -> SigningKeyFile -> IO (Either (FileError InputDecodeError) b) readSigningKeyFileAnyOf [FromSomeType SerialiseAsBech32 SomeWitness] -bech32FileTypes [FromSomeType HasTextEnvelope SomeWitness] -textEnvFileTypes SigningKeyFile -skFile +bech32FileTypes [FromSomeType HasTextEnvelope SomeWitness] +textEnvFileTypes SigningKeyFile +skFile case (SomeWitness -res, Maybe (Address ByronAddr) -mbByronAddr) of +res, Maybe (Address ByronAddr) +mbByronAddr) of (AByronSigningKey SigningKey ByronKey _ Maybe (Address ByronAddr) _, Just Address ByronAddr _) -> SomeWitness -> ExceptT ReadWitnessSigningDataError IO SomeWitness forall (f :: * -> *) a. Applicative f => a -> f a pure SomeWitness -res +res (AByronSigningKey SigningKey ByronKey _ Maybe (Address ByronAddr) _, Maybe (Address ByronAddr) Nothing) -> SomeWitness -> ExceptT ReadWitnessSigningDataError IO SomeWitness forall (f :: * -> *) a. Applicative f => a -> f a pure SomeWitness -res +res (SomeWitness _, Maybe (Address ByronAddr) Nothing) -> SomeWitness -> ExceptT ReadWitnessSigningDataError IO SomeWitness forall (f :: * -> *) a. Applicative f => a -> f a pure SomeWitness -res +res (SomeWitness _, Just Address ByronAddr _) -> @@ -4326,8 +4326,8 @@ left ReadWitnessSigningDataError ReadWitnessSigningDataSigningKeyAndAddressMismatch where - textEnvFileTypes :: [FromSomeType HasTextEnvelope SomeWitness] -textEnvFileTypes = + textEnvFileTypes :: [FromSomeType HasTextEnvelope SomeWitness] +textEnvFileTypes = [ AsType (SigningKey ByronKey) -> (SigningKey ByronKey -> SomeWitness) -> FromSomeType HasTextEnvelope SomeWitness @@ -4340,7 +4340,7 @@ AsByronKey) (SigningKey ByronKey -> Maybe (Address ByronAddr) -> SomeWitness `AByronSigningKey` Maybe (Address ByronAddr) -mbByronAddr) +mbByronAddr) , AsType (SigningKey PaymentKey) -> (SigningKey PaymentKey -> SomeWitness) -> FromSomeType HasTextEnvelope SomeWitness @@ -4464,8 +4464,8 @@ AGenesisUTxOSigningKey ] - bech32FileTypes :: [FromSomeType SerialiseAsBech32 SomeWitness] -bech32FileTypes = + bech32FileTypes :: [FromSomeType SerialiseAsBech32 SomeWitness] +bech32FileTypes = [ AsType (SigningKey PaymentKey) -> (SigningKey PaymentKey -> SomeWitness) -> FromSomeType SerialiseAsBech32 SomeWitness @@ -4541,7 +4541,7 @@ -> ([ShelleyBootstrapWitnessSigningKeyData], [ShelleyWitnessSigningKey]) forall a a. ([a], [a]) -> ([a], [a]) -reversePartitionedWits (([ShelleyBootstrapWitnessSigningKeyData], +reversePartitionedWits (([ShelleyBootstrapWitnessSigningKeyData], [ShelleyWitnessSigningKey]) -> ([ShelleyBootstrapWitnessSigningKeyData], [ShelleyWitnessSigningKey])) @@ -4572,53 +4572,53 @@ -> ByronOrShelleyWitness -> ([ShelleyBootstrapWitnessSigningKeyData], [ShelleyWitnessSigningKey]) -go ([ShelleyBootstrapWitnessSigningKeyData], +go ([ShelleyBootstrapWitnessSigningKeyData], [ShelleyWitnessSigningKey]) forall a. Monoid a => a mempty where - reversePartitionedWits :: ([a], [a]) -> ([a], [a]) -reversePartitionedWits ([a] -bw, [a] -skw) = + reversePartitionedWits :: ([a], [a]) -> ([a], [a]) +reversePartitionedWits ([a] +bw, [a] +skw) = ([a] -> [a] forall a. [a] -> [a] reverse [a] -bw, [a] -> [a] +bw, [a] -> [a] forall a. [a] -> [a] reverse [a] -skw) +skw) - go :: ([ShelleyBootstrapWitnessSigningKeyData], + go :: ([ShelleyBootstrapWitnessSigningKeyData], [ShelleyWitnessSigningKey]) -> ByronOrShelleyWitness -> ([ShelleyBootstrapWitnessSigningKeyData], [ShelleyWitnessSigningKey]) -go ([ShelleyBootstrapWitnessSigningKeyData] -byronAcc, [ShelleyWitnessSigningKey] -shelleyKeyAcc) ByronOrShelleyWitness -byronOrShelleyWit = +go ([ShelleyBootstrapWitnessSigningKeyData] +byronAcc, [ShelleyWitnessSigningKey] +shelleyKeyAcc) ByronOrShelleyWitness +byronOrShelleyWit = case ByronOrShelleyWitness -byronOrShelleyWit of - AByronWitness ShelleyBootstrapWitnessSigningKeyData -byronWit -> +byronOrShelleyWit of + AByronWitness ShelleyBootstrapWitnessSigningKeyData +byronWit -> (ShelleyBootstrapWitnessSigningKeyData -byronWitShelleyBootstrapWitnessSigningKeyData +byronWitShelleyBootstrapWitnessSigningKeyData -> [ShelleyBootstrapWitnessSigningKeyData] -> [ShelleyBootstrapWitnessSigningKeyData] forall a. a -> [a] -> [a] :[ShelleyBootstrapWitnessSigningKeyData] -byronAcc, [ShelleyWitnessSigningKey] -shelleyKeyAcc) - AShelleyKeyWitness ShelleyWitnessSigningKey -shelleyKeyWit -> +byronAcc, [ShelleyWitnessSigningKey] +shelleyKeyAcc) + AShelleyKeyWitness ShelleyWitnessSigningKey +shelleyKeyWit -> ([ShelleyBootstrapWitnessSigningKeyData] -byronAcc, ShelleyWitnessSigningKey -shelleyKeyWitShelleyWitnessSigningKey +byronAcc, ShelleyWitnessSigningKey +shelleyKeyWitShelleyWitnessSigningKey -> [ShelleyWitnessSigningKey] -> [ShelleyWitnessSigningKey] forall a. a -> [a] -> [a] :[ShelleyWitnessSigningKey] -shelleyKeyAcc) +shelleyKeyAcc) -- | Some kind of Byron or Shelley witness. @@ -4628,70 +4628,70 @@ categoriseSomeWitness :: SomeWitness -> ByronOrShelleyWitness categoriseSomeWitness :: SomeWitness -> ByronOrShelleyWitness -categoriseSomeWitness SomeWitness -swsk = +categoriseSomeWitness SomeWitness +swsk = case SomeWitness -swsk of - AByronSigningKey SigningKey ByronKey -sk Maybe (Address ByronAddr) -addr -> ShelleyBootstrapWitnessSigningKeyData -> ByronOrShelleyWitness +swsk of + AByronSigningKey SigningKey ByronKey +sk Maybe (Address ByronAddr) +addr -> ShelleyBootstrapWitnessSigningKeyData -> ByronOrShelleyWitness AByronWitness (SigningKey ByronKey -> Maybe (Address ByronAddr) -> ShelleyBootstrapWitnessSigningKeyData ShelleyBootstrapWitnessSigningKeyData SigningKey ByronKey -sk Maybe (Address ByronAddr) -addr) - APaymentSigningKey SigningKey PaymentKey -sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness +sk Maybe (Address ByronAddr) +addr) + APaymentSigningKey SigningKey PaymentKey +sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness AShelleyKeyWitness (SigningKey PaymentKey -> ShelleyWitnessSigningKey WitnessPaymentKey SigningKey PaymentKey -sk) - APaymentExtendedSigningKey SigningKey PaymentExtendedKey -sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness +sk) + APaymentExtendedSigningKey SigningKey PaymentExtendedKey +sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness AShelleyKeyWitness (SigningKey PaymentExtendedKey -> ShelleyWitnessSigningKey WitnessPaymentExtendedKey SigningKey PaymentExtendedKey -sk) - AStakeSigningKey SigningKey StakeKey -sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness +sk) + AStakeSigningKey SigningKey StakeKey +sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness AShelleyKeyWitness (SigningKey StakeKey -> ShelleyWitnessSigningKey WitnessStakeKey SigningKey StakeKey -sk) - AStakeExtendedSigningKey SigningKey StakeExtendedKey -sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness +sk) + AStakeExtendedSigningKey SigningKey StakeExtendedKey +sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness AShelleyKeyWitness (SigningKey StakeExtendedKey -> ShelleyWitnessSigningKey WitnessStakeExtendedKey SigningKey StakeExtendedKey -sk) - AStakePoolSigningKey SigningKey StakePoolKey -sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness +sk) + AStakePoolSigningKey SigningKey StakePoolKey +sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness AShelleyKeyWitness (SigningKey StakePoolKey -> ShelleyWitnessSigningKey WitnessStakePoolKey SigningKey StakePoolKey -sk) - AGenesisSigningKey SigningKey GenesisKey -sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness +sk) + AGenesisSigningKey SigningKey GenesisKey +sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness AShelleyKeyWitness (SigningKey GenesisKey -> ShelleyWitnessSigningKey WitnessGenesisKey SigningKey GenesisKey -sk) - AGenesisExtendedSigningKey SigningKey GenesisExtendedKey -sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness +sk) + AGenesisExtendedSigningKey SigningKey GenesisExtendedKey +sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness AShelleyKeyWitness (SigningKey GenesisExtendedKey -> ShelleyWitnessSigningKey WitnessGenesisExtendedKey SigningKey GenesisExtendedKey -sk) - AGenesisDelegateSigningKey SigningKey GenesisDelegateKey -sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness +sk) + AGenesisDelegateSigningKey SigningKey GenesisDelegateKey +sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness AShelleyKeyWitness (SigningKey GenesisDelegateKey -> ShelleyWitnessSigningKey WitnessGenesisDelegateKey SigningKey GenesisDelegateKey -sk) - AGenesisDelegateExtendedSigningKey SigningKey GenesisDelegateExtendedKey -sk +sk) + AGenesisDelegateExtendedSigningKey SigningKey GenesisDelegateExtendedKey +sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness AShelleyKeyWitness (SigningKey GenesisDelegateExtendedKey -> ShelleyWitnessSigningKey WitnessGenesisDelegateExtendedKey SigningKey GenesisDelegateExtendedKey -sk) - AGenesisUTxOSigningKey SigningKey GenesisUTxOKey -sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness +sk) + AGenesisUTxOSigningKey SigningKey GenesisUTxOKey +sk -> ShelleyWitnessSigningKey -> ByronOrShelleyWitness AShelleyKeyWitness (SigningKey GenesisUTxOKey -> ShelleyWitnessSigningKey WitnessGenesisUTxOKey SigningKey GenesisUTxOKey -sk) +sk) -- | Data required for constructing a Shelley bootstrap witness. data ShelleyBootstrapWitnessSigningKeyData @@ -4710,7 +4710,7 @@ = MissingNetworkIdOrByronAddressError -- ^ Neither a network ID nor a Byron address were provided to construct the -- Shelley bootstrap witness. One or the other is required. - deriving Int -> ShelleyBootstrapWitnessError -> ShowS + deriving Int -> ShelleyBootstrapWitnessError -> ShowS [ShelleyBootstrapWitnessError] -> ShowS ShelleyBootstrapWitnessError -> String (Int -> ShelleyBootstrapWitnessError -> ShowS) @@ -4749,12 +4749,12 @@ -- | Construct a Shelley bootstrap witness (i.e. a Byron key witness in the -- Shelley era). -mkShelleyBootstrapWitness - :: IsShelleyBasedEra era +mkShelleyBootstrapWitness + :: IsShelleyBasedEra era => Maybe NetworkId - -> TxBody era + -> TxBody era -> ShelleyBootstrapWitnessSigningKeyData - -> Either ShelleyBootstrapWitnessError (KeyWitness era) + -> Either ShelleyBootstrapWitnessError (KeyWitness era) mkShelleyBootstrapWitness :: Maybe NetworkId -> TxBody era -> ShelleyBootstrapWitnessSigningKeyData @@ -4769,10 +4769,10 @@ forall a b. a -> Either a b Left ShelleyBootstrapWitnessError MissingNetworkIdOrByronAddressError -mkShelleyBootstrapWitness (Just NetworkId -nw) TxBody era -txBody (ShelleyBootstrapWitnessSigningKeyData SigningKey ByronKey -skey Maybe (Address ByronAddr) +mkShelleyBootstrapWitness (Just NetworkId +nw) TxBody era +txBody (ShelleyBootstrapWitnessSigningKeyData SigningKey ByronKey +skey Maybe (Address ByronAddr) Nothing) = KeyWitness era -> Either ShelleyBootstrapWitnessError (KeyWitness era) @@ -4790,14 +4790,14 @@ -> TxBody era -> SigningKey ByronKey -> KeyWitness era makeShelleyBootstrapWitness (NetworkId -> WitnessNetworkIdOrByronAddress WitnessNetworkId NetworkId -nw) TxBody era -txBody SigningKey ByronKey -skey +nw) TxBody era +txBody SigningKey ByronKey +skey mkShelleyBootstrapWitness Maybe NetworkId -_ TxBody era -txBody (ShelleyBootstrapWitnessSigningKeyData SigningKey ByronKey -skey (Just Address ByronAddr -addr)) = +_ TxBody era +txBody (ShelleyBootstrapWitnessSigningKeyData SigningKey ByronKey +skey (Just Address ByronAddr +addr)) = KeyWitness era -> Either ShelleyBootstrapWitnessError (KeyWitness era) forall a b. b -> Either a b @@ -4814,25 +4814,25 @@ -> TxBody era -> SigningKey ByronKey -> KeyWitness era makeShelleyBootstrapWitness (Address ByronAddr -> WitnessNetworkIdOrByronAddress WitnessByronAddress Address ByronAddr -addr) TxBody era -txBody SigningKey ByronKey -skey +addr) TxBody era +txBody SigningKey ByronKey +skey -- | Attempt to construct Shelley bootstrap witnesses until an error is -- encountered. -mkShelleyBootstrapWitnesses - :: IsShelleyBasedEra era +mkShelleyBootstrapWitnesses + :: IsShelleyBasedEra era => Maybe NetworkId - -> TxBody era + -> TxBody era -> [ShelleyBootstrapWitnessSigningKeyData] - -> Either ShelleyBootstrapWitnessError [KeyWitness era] + -> Either ShelleyBootstrapWitnessError [KeyWitness era] mkShelleyBootstrapWitnesses :: Maybe NetworkId -> TxBody era -> [ShelleyBootstrapWitnessSigningKeyData] -> Either ShelleyBootstrapWitnessError [KeyWitness era] -mkShelleyBootstrapWitnesses Maybe NetworkId -mnw TxBody era -txBody = +mkShelleyBootstrapWitnesses Maybe NetworkId +mnw TxBody era +txBody = (ShelleyBootstrapWitnessSigningKeyData -> Either ShelleyBootstrapWitnessError (KeyWitness era)) -> [ShelleyBootstrapWitnessSigningKeyData] @@ -4851,30 +4851,30 @@ -> ShelleyBootstrapWitnessSigningKeyData -> Either ShelleyBootstrapWitnessError (KeyWitness era) mkShelleyBootstrapWitness Maybe NetworkId -mnw TxBody era -txBody) +mnw TxBody era +txBody) runTxGetTxId :: InputTxFile -> ExceptT ShelleyTxCmdError IO () runTxGetTxId :: InputTxFile -> ExceptT ShelleyTxCmdError IO () -runTxGetTxId InputTxFile -txfile = do - InAnyCardanoEra CardanoEra era -_era TxBody era -txbody <- +runTxGetTxId InputTxFile +txfile = do + InAnyCardanoEra CardanoEra era +_era TxBody era +txbody <- case InputTxFile -txfile of - InputTxBodyFile (TxBodyFile String -txbodyFile) -> String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) +txfile of + InputTxBodyFile (TxBodyFile String +txbodyFile) -> String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) readFileTxBody String -txbodyFile - InputTxFile (TxFile String -txFile) -> do - InAnyCardanoEra CardanoEra era -era Tx era -tx <- String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra Tx) +txbodyFile + InputTxFile (TxFile String +txFile) -> do + InAnyCardanoEra CardanoEra era +era Tx era +tx <- String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra Tx) readFileTx String -txFile +txFile InAnyCardanoEra TxBody -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) forall (m :: * -> *) a. Monad m => a -> m a @@ -4891,7 +4891,7 @@ IsCardanoEra era => CardanoEra era -> thing era -> InAnyCardanoEra thing InAnyCardanoEra CardanoEra era -era (TxBody era +era (TxBody era -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody)) -> TxBody era -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) @@ -4899,7 +4899,7 @@ $ Tx era -> TxBody era forall era. Tx era -> TxBody era getTxBody Tx era -tx +tx IO () -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -4914,28 +4914,28 @@ serialiseToRawBytesHex (TxBody era -> TxId forall era. TxBody era -> TxId getTxId TxBody era -txbody) +txbody) runTxView :: InputTxFile -> ExceptT ShelleyTxCmdError IO () runTxView :: InputTxFile -> ExceptT ShelleyTxCmdError IO () -runTxView InputTxFile -txfile = do - InAnyCardanoEra CardanoEra era -era TxBody era -txbody <- +runTxView InputTxFile +txfile = do + InAnyCardanoEra CardanoEra era +era TxBody era +txbody <- case InputTxFile -txfile of - InputTxBodyFile (TxBodyFile String -txbodyFile) -> String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) +txfile of + InputTxBodyFile (TxBodyFile String +txbodyFile) -> String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) readFileTxBody String -txbodyFile - InputTxFile (TxFile String -txFile) -> do - InAnyCardanoEra CardanoEra era -era Tx era -tx <- String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra Tx) +txbodyFile + InputTxFile (TxFile String +txFile) -> do + InAnyCardanoEra CardanoEra era +era Tx era +tx <- String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra Tx) readFileTx String -txFile +txFile InAnyCardanoEra TxBody -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) forall (m :: * -> *) a. Monad m => a -> m a @@ -4952,7 +4952,7 @@ IsCardanoEra era => CardanoEra era -> thing era -> InAnyCardanoEra thing InAnyCardanoEra CardanoEra era -era (TxBody era +era (TxBody era -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody)) -> TxBody era -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) @@ -4960,7 +4960,7 @@ $ Tx era -> TxBody era forall era. Tx era -> TxBody era getTxBody Tx era -tx +tx IO () -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> ExceptT ShelleyTxCmdError IO ()) @@ -4972,8 +4972,8 @@ $ CardanoEra era -> TxBody era -> ByteString forall era. CardanoEra era -> TxBody era -> ByteString friendlyTxBodyBS CardanoEra era -era TxBody era -txbody +era TxBody era +txbody runTxCreateWitness :: TxBodyFile @@ -4986,15 +4986,15 @@ -> Maybe NetworkId -> OutputFile -> ExceptT ShelleyTxCmdError IO () -runTxCreateWitness (TxBodyFile String -txbodyFile) WitnessSigningData -witSignData Maybe NetworkId -mbNw (OutputFile String -oFile) = do +runTxCreateWitness (TxBodyFile String +txbodyFile) WitnessSigningData +witSignData Maybe NetworkId +mbNw (OutputFile String +oFile) = do - InAnyShelleyBasedEra ShelleyBasedEra era -_era TxBody era -txbody <- + InAnyShelleyBasedEra ShelleyBasedEra era +_era TxBody era +txbody <- --TODO: in principle we should be able to support Byron era txs too Text -> InAnyCardanoEra TxBody @@ -5012,11 +5012,11 @@ forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) readFileTxBody String -txbodyFile +txbodyFile -- We use the era of the tx we read to determine the era we use for the rest: - SomeWitness -someWit <- (ReadWitnessSigningDataError -> ShelleyTxCmdError) + SomeWitness +someWit <- (ReadWitnessSigningDataError -> ShelleyTxCmdError) -> ExceptT ReadWitnessSigningDataError IO SomeWitness -> ExceptT ShelleyTxCmdError IO SomeWitness forall (m :: * -> *) x y a. @@ -5032,17 +5032,17 @@ $ WitnessSigningData -> ExceptT ReadWitnessSigningDataError IO SomeWitness readWitnessSigningData WitnessSigningData -witSignData +witSignData - KeyWitness era -witness <- + KeyWitness era +witness <- case SomeWitness -> ByronOrShelleyWitness categoriseSomeWitness SomeWitness -someWit of +someWit of -- Byron witnesses require the network ID. This can either be provided -- directly or derived from a provided Byron address. - AByronWitness ShelleyBootstrapWitnessSigningKeyData -bootstrapWitData -> + AByronWitness ShelleyBootstrapWitnessSigningKeyData +bootstrapWitData -> (ShelleyBootstrapWitnessError -> ShelleyTxCmdError) -> ExceptT ShelleyBootstrapWitnessError IO (KeyWitness era) -> ExceptT ShelleyTxCmdError IO (KeyWitness era) @@ -5080,11 +5080,11 @@ -> ShelleyBootstrapWitnessSigningKeyData -> Either ShelleyBootstrapWitnessError (KeyWitness era) mkShelleyBootstrapWitness Maybe NetworkId -mbNw TxBody era -txbody ShelleyBootstrapWitnessSigningKeyData -bootstrapWitData - AShelleyKeyWitness ShelleyWitnessSigningKey -skShelley -> +mbNw TxBody era +txbody ShelleyBootstrapWitnessSigningKeyData +bootstrapWitData + AShelleyKeyWitness ShelleyWitnessSigningKey +skShelley -> KeyWitness era -> ExceptT ShelleyTxCmdError IO (KeyWitness era) forall (f :: * -> *) a. Applicative f => a -> f a pure (KeyWitness era -> ExceptT ShelleyTxCmdError IO (KeyWitness era)) @@ -5095,8 +5095,8 @@ IsShelleyBasedEra era => TxBody era -> ShelleyWitnessSigningKey -> KeyWitness era makeShelleyKeyWitness TxBody era -txbody ShelleyWitnessSigningKey -skShelley +txbody ShelleyWitnessSigningKey +skShelley (FileError () -> ShelleyTxCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyTxCmdError IO () @@ -5127,10 +5127,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -oFile Maybe TextEnvelopeDescr +oFile Maybe TextEnvelopeDescr forall a. Maybe a Nothing KeyWitness era -witness +witness runTxSignWitness @@ -5140,16 +5140,16 @@ -> ExceptT ShelleyTxCmdError IO () runTxSignWitness :: TxBodyFile -> [WitnessFile] -> OutputFile -> ExceptT ShelleyTxCmdError IO () -runTxSignWitness (TxBodyFile String -txbodyFile) [WitnessFile] -witnessFiles (OutputFile String -oFp) = do +runTxSignWitness (TxBodyFile String +txbodyFile) [WitnessFile] +witnessFiles (OutputFile String +oFp) = do - InAnyCardanoEra CardanoEra era -era TxBody era -txbody <- String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) + InAnyCardanoEra CardanoEra era +era TxBody era +txbody <- String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra TxBody) readFileTxBody String -txbodyFile +txbodyFile InAnyShelleyBasedEra ShelleyBasedEra era _ TxBody era _ <- @@ -5168,29 +5168,29 @@ IsCardanoEra era => CardanoEra era -> thing era -> InAnyCardanoEra thing InAnyCardanoEra CardanoEra era -era TxBody era -txbody) +era TxBody era +txbody) - [KeyWitness era] -witnesses <- + [KeyWitness era] +witnesses <- [ExceptT ShelleyTxCmdError IO (KeyWitness era)] -> ExceptT ShelleyTxCmdError IO [KeyWitness era] forall (t :: * -> *) (m :: * -> *) a. (Traversable t, Monad m) => t (m a) -> m (t a) sequence - [ do InAnyCardanoEra CardanoEra era -era' KeyWitness era -witness <- String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra KeyWitness) + [ do InAnyCardanoEra CardanoEra era +era' KeyWitness era +witness <- String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra KeyWitness) readFileWitness String -file +file case CardanoEra era -> CardanoEra era -> Maybe (era :~: era) forall k (f :: k -> *) (a :: k) (b :: k). TestEquality f => f a -> f b -> Maybe (a :~: b) testEquality CardanoEra era -era CardanoEra era -era' of +era CardanoEra era +era' of Maybe (era :~: era) Nothing -> ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO (KeyWitness era) forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -5204,29 +5204,29 @@ (CardanoEra era -> AnyCardanoEra forall era. IsCardanoEra era => CardanoEra era -> AnyCardanoEra AnyCardanoEra CardanoEra era -era) +era) (CardanoEra era -> AnyCardanoEra forall era. IsCardanoEra era => CardanoEra era -> AnyCardanoEra AnyCardanoEra CardanoEra era -era') +era') WitnessFile -witnessFile +witnessFile Just era :~: era Refl -> KeyWitness era -> ExceptT ShelleyTxCmdError IO (KeyWitness era) forall (m :: * -> *) a. Monad m => a -> m a return KeyWitness era -witness - | witnessFile :: WitnessFile -witnessFile@(WitnessFile String -file) <- [WitnessFile] -witnessFiles ] +witness + | witnessFile :: WitnessFile +witnessFile@(WitnessFile String +file) <- [WitnessFile] +witnessFiles ] - let tx :: Tx era -tx = [KeyWitness era] -> TxBody era -> Tx era + let tx :: Tx era +tx = [KeyWitness era] -> TxBody era -> Tx era forall era. [KeyWitness era] -> TxBody era -> Tx era makeSignedTransaction [KeyWitness era] -witnesses TxBody era -txbody +witnesses TxBody era +txbody (FileError () -> ShelleyTxCmdError) -> ExceptT (FileError ()) IO () -> ExceptT ShelleyTxCmdError IO () forall (m :: * -> *) x y a. @@ -5256,10 +5256,10 @@ String -> Maybe TextEnvelopeDescr -> a -> IO (Either (FileError ()) ()) writeFileTextEnvelope String -oFp Maybe TextEnvelopeDescr +oFp Maybe TextEnvelopeDescr forall a. Maybe a Nothing Tx era -tx +tx -- ---------------------------------------------------------------------------- @@ -5317,22 +5317,22 @@ AsTx -readFileInAnyCardanoEra - :: ( HasTextEnvelope (thing ByronEra) - , HasTextEnvelope (thing ShelleyEra) - , HasTextEnvelope (thing AllegraEra) - , HasTextEnvelope (thing MaryEra) - , HasTextEnvelope (thing AlonzoEra) +readFileInAnyCardanoEra + :: ( HasTextEnvelope (thing ByronEra) + , HasTextEnvelope (thing ShelleyEra) + , HasTextEnvelope (thing AllegraEra) + , HasTextEnvelope (thing MaryEra) + , HasTextEnvelope (thing AlonzoEra) ) - => (forall era. AsType era -> AsType (thing era)) + => (forall era. AsType era -> AsType (thing era)) -> FilePath -> ExceptT ShelleyTxCmdError IO - (InAnyCardanoEra thing) + (InAnyCardanoEra thing) readFileInAnyCardanoEra :: (forall era. AsType era -> AsType (thing era)) -> String -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra thing) -readFileInAnyCardanoEra forall era. AsType era -> AsType (thing era) -asThing String -file = +readFileInAnyCardanoEra forall era. AsType era -> AsType (thing era) +asThing String +file = (FileError TextEnvelopeError -> ShelleyTxCmdError) -> ExceptT (FileError TextEnvelopeError) IO (InAnyCardanoEra thing) -> ExceptT ShelleyTxCmdError IO (InAnyCardanoEra thing) @@ -5379,7 +5379,7 @@ AsType a -> (a -> b) -> FromSomeType c b FromSomeType (AsType ByronEra -> AsType (thing ByronEra) forall era. AsType era -> AsType (thing era) -asThing AsType ByronEra +asThing AsType ByronEra AsByronEra) (CardanoEra ByronEra -> thing ByronEra -> InAnyCardanoEra thing forall era (thing :: * -> *). IsCardanoEra era => @@ -5394,7 +5394,7 @@ AsType a -> (a -> b) -> FromSomeType c b FromSomeType (AsType ShelleyEra -> AsType (thing ShelleyEra) forall era. AsType era -> AsType (thing era) -asThing AsType ShelleyEra +asThing AsType ShelleyEra AsShelleyEra) (CardanoEra ShelleyEra -> thing ShelleyEra -> InAnyCardanoEra thing forall era (thing :: * -> *). IsCardanoEra era => @@ -5409,7 +5409,7 @@ AsType a -> (a -> b) -> FromSomeType c b FromSomeType (AsType AllegraEra -> AsType (thing AllegraEra) forall era. AsType era -> AsType (thing era) -asThing AsType AllegraEra +asThing AsType AllegraEra AsAllegraEra) (CardanoEra AllegraEra -> thing AllegraEra -> InAnyCardanoEra thing forall era (thing :: * -> *). IsCardanoEra era => @@ -5424,7 +5424,7 @@ AsType a -> (a -> b) -> FromSomeType c b FromSomeType (AsType MaryEra -> AsType (thing MaryEra) forall era. AsType era -> AsType (thing era) -asThing AsType MaryEra +asThing AsType MaryEra AsMaryEra) (CardanoEra MaryEra -> thing MaryEra -> InAnyCardanoEra thing forall era (thing :: * -> *). IsCardanoEra era => @@ -5439,7 +5439,7 @@ AsType a -> (a -> b) -> FromSomeType c b FromSomeType (AsType AlonzoEra -> AsType (thing AlonzoEra) forall era. AsType era -> AsType (thing era) -asThing AsType AlonzoEra +asThing AsType AlonzoEra AsAlonzoEra) (CardanoEra AlonzoEra -> thing AlonzoEra -> InAnyCardanoEra thing forall era (thing :: * -> *). IsCardanoEra era => @@ -5448,34 +5448,34 @@ AlonzoEra) ] String -file +file -- | Constrain the era to be Shelley based. Fail for the Byron era. -- -onlyInShelleyBasedEras :: Text - -> InAnyCardanoEra a +onlyInShelleyBasedEras :: Text + -> InAnyCardanoEra a -> ExceptT ShelleyTxCmdError IO - (InAnyShelleyBasedEra a) + (InAnyShelleyBasedEra a) onlyInShelleyBasedEras :: Text -> InAnyCardanoEra a -> ExceptT ShelleyTxCmdError IO (InAnyShelleyBasedEra a) -onlyInShelleyBasedEras Text -notImplMsg (InAnyCardanoEra CardanoEra era -era a era -x) = +onlyInShelleyBasedEras Text +notImplMsg (InAnyCardanoEra CardanoEra era +era a era +x) = case CardanoEra era -> CardanoEraStyle era forall era. CardanoEra era -> CardanoEraStyle era cardanoEraStyle CardanoEra era -era of +era of CardanoEraStyle era LegacyByronEra -> ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO (InAnyShelleyBasedEra a) forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left (Text -> ShelleyTxCmdError ShelleyTxCmdNotImplemented Text -notImplMsg) - ShelleyBasedEra ShelleyBasedEra era -era' -> InAnyShelleyBasedEra a +notImplMsg) + ShelleyBasedEra ShelleyBasedEra era +era' -> InAnyShelleyBasedEra a -> ExceptT ShelleyTxCmdError IO (InAnyShelleyBasedEra a) forall (m :: * -> *) a. Monad m => a -> m a return (ShelleyBasedEra era -> a era -> InAnyShelleyBasedEra a @@ -5483,31 +5483,31 @@ IsShelleyBasedEra era => ShelleyBasedEra era -> thing era -> InAnyShelleyBasedEra thing InAnyShelleyBasedEra ShelleyBasedEra era -era' a era -x) +era' a era +x) -- ---------------------------------------------------------------------------- -- Reading other files -- -validateScriptSupportedInEra :: CardanoEra era +validateScriptSupportedInEra :: CardanoEra era -> ScriptInAnyLang - -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) + -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) validateScriptSupportedInEra :: CardanoEra era -> ScriptInAnyLang -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) -validateScriptSupportedInEra CardanoEra era -era script :: ScriptInAnyLang -script@(ScriptInAnyLang ScriptLanguage lang -lang Script lang +validateScriptSupportedInEra CardanoEra era +era script :: ScriptInAnyLang +script@(ScriptInAnyLang ScriptLanguage lang +lang Script lang _) = case CardanoEra era -> ScriptInAnyLang -> Maybe (ScriptInEra era) forall era. CardanoEra era -> ScriptInAnyLang -> Maybe (ScriptInEra era) toScriptInEra CardanoEra era -era ScriptInAnyLang -script of +era ScriptInAnyLang +script of Maybe (ScriptInEra era) Nothing -> ShelleyTxCmdError -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -5521,15 +5521,15 @@ (ScriptLanguage lang -> AnyScriptLanguage forall lang. ScriptLanguage lang -> AnyScriptLanguage AnyScriptLanguage ScriptLanguage lang -lang) (CardanoEra era -> AnyCardanoEra +lang) (CardanoEra era -> AnyCardanoEra forall era. CardanoEra era -> AnyCardanoEra anyCardanoEra CardanoEra era -era) - Just ScriptInEra era -script' -> ScriptInEra era -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) +era) + Just ScriptInEra era +script' -> ScriptInEra era -> ExceptT ShelleyTxCmdError IO (ScriptInEra era) forall (f :: * -> *) a. Applicative f => a -> f a pure ScriptInEra era -script' +script' -- ---------------------------------------------------------------------------- @@ -5540,11 +5540,11 @@ -> ExceptT ShelleyTxCmdError IO TxMetadata readFileTxMetadata :: TxMetadataJsonSchema -> MetadataFile -> ExceptT ShelleyTxCmdError IO TxMetadata -readFileTxMetadata TxMetadataJsonSchema -mapping (MetadataFileJSON String -fp) = do - ByteString -bs <- (IOException -> ShelleyTxCmdError) +readFileTxMetadata TxMetadataJsonSchema +mapping (MetadataFileJSON String +fp) = do + ByteString +bs <- (IOException -> ShelleyTxCmdError) -> IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString forall (m :: * -> *) x a. MonadIO m => @@ -5560,22 +5560,22 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fp) (IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString) +fp) (IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString) -> IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString LBS.readFile String -fp - Value -v <- (String -> ShelleyTxCmdError) +fp + Value +v <- (String -> ShelleyTxCmdError) -> ExceptT String IO Value -> ExceptT ShelleyTxCmdError IO Value forall (m :: * -> *) x y a. Functor m => (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> String -> ShelleyTxCmdError ShelleyTxCmdMetadataJsonParseError String -fp) (ExceptT String IO Value -> ExceptT ShelleyTxCmdError IO Value) +fp) (ExceptT String IO Value -> ExceptT ShelleyTxCmdError IO Value) -> ExceptT String IO Value -> ExceptT ShelleyTxCmdError IO Value forall a b. (a -> b) -> a -> b $ @@ -5588,9 +5588,9 @@ ByteString -> Either String Value forall a. FromJSON a => ByteString -> Either String a Aeson.eitherDecode' ByteString -bs - TxMetadata -txMetadata <- (TxMetadataJsonError -> ShelleyTxCmdError) +bs + TxMetadata +txMetadata <- (TxMetadataJsonError -> ShelleyTxCmdError) -> ExceptT TxMetadataJsonError IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata forall (m :: * -> *) x y a. @@ -5598,7 +5598,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> TxMetadataJsonError -> ShelleyTxCmdError ShelleyTxCmdMetadataConversionError String -fp) (ExceptT TxMetadataJsonError IO TxMetadata +fp) (ExceptT TxMetadataJsonError IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata) -> ExceptT TxMetadataJsonError IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata @@ -5615,8 +5615,8 @@ TxMetadataJsonSchema -> Value -> Either TxMetadataJsonError TxMetadata metadataFromJson TxMetadataJsonSchema -mapping Value -v +mapping Value +v ([(Word64, TxMetadataRangeError)] -> ShelleyTxCmdError) -> ExceptT [(Word64, TxMetadataRangeError)] IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata @@ -5625,7 +5625,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> [(Word64, TxMetadataRangeError)] -> ShelleyTxCmdError ShelleyTxCmdMetaValidationError String -fp) (ExceptT [(Word64, TxMetadataRangeError)] IO TxMetadata +fp) (ExceptT [(Word64, TxMetadataRangeError)] IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata) -> ExceptT [(Word64, TxMetadataRangeError)] IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata @@ -5641,17 +5641,17 @@ $ do TxMetadata -> Either [(Word64, TxMetadataRangeError)] () validateTxMetadata TxMetadata -txMetadata +txMetadata TxMetadata -> Either [(Word64, TxMetadataRangeError)] TxMetadata forall (m :: * -> *) a. Monad m => a -> m a return TxMetadata -txMetadata +txMetadata readFileTxMetadata TxMetadataJsonSchema -_ (MetadataFileCBOR String -fp) = do - ByteString -bs <- (IOException -> ShelleyTxCmdError) +_ (MetadataFileCBOR String +fp) = do + ByteString +bs <- (IOException -> ShelleyTxCmdError) -> IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString forall (m :: * -> *) x a. MonadIO m => @@ -5667,15 +5667,15 @@ . String -> IOException -> FileError () forall e. String -> IOException -> FileError e FileIOError String -fp) (IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString) +fp) (IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString) -> IO ByteString -> ExceptT ShelleyTxCmdError IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -fp - TxMetadata -txMetadata <- (DecoderError -> ShelleyTxCmdError) +fp + TxMetadata +txMetadata <- (DecoderError -> ShelleyTxCmdError) -> ExceptT DecoderError IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata forall (m :: * -> *) x y a. @@ -5683,7 +5683,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> DecoderError -> ShelleyTxCmdError ShelleyTxCmdMetaDecodeError String -fp) (ExceptT DecoderError IO TxMetadata +fp) (ExceptT DecoderError IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata) -> ExceptT DecoderError IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata @@ -5703,7 +5703,7 @@ AsType a -> ByteString -> Either DecoderError a deserialiseFromCBOR AsType TxMetadata AsTxMetadata ByteString -bs +bs ([(Word64, TxMetadataRangeError)] -> ShelleyTxCmdError) -> ExceptT [(Word64, TxMetadataRangeError)] IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata @@ -5712,7 +5712,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (String -> [(Word64, TxMetadataRangeError)] -> ShelleyTxCmdError ShelleyTxCmdMetaValidationError String -fp) (ExceptT [(Word64, TxMetadataRangeError)] IO TxMetadata +fp) (ExceptT [(Word64, TxMetadataRangeError)] IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata) -> ExceptT [(Word64, TxMetadataRangeError)] IO TxMetadata -> ExceptT ShelleyTxCmdError IO TxMetadata @@ -5728,9 +5728,9 @@ $ do TxMetadata -> Either [(Word64, TxMetadataRangeError)] () validateTxMetadata TxMetadata -txMetadata +txMetadata TxMetadata -> Either [(Word64, TxMetadataRangeError)] TxMetadata forall (m :: * -> *) a. Monad m => a -> m a return TxMetadata -txMetadata +txMetadata \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Run.html b/cardano-cli/src/Cardano.CLI.Shelley.Run.html index fa71a3caee7..64b79f1879b 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Run.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Run.html @@ -33,7 +33,7 @@ | ShelleyCmdTransactionError !ShelleyTxCmdError | ShelleyCmdQueryError !ShelleyQueryCmdError | ShelleyCmdKeyError !ShelleyKeyCmdError - deriving Int -> ShelleyClientCmdError -> ShowS + deriving Int -> ShelleyClientCmdError -> ShowS [ShelleyClientCmdError] -> ShowS ShelleyClientCmdError -> String (Int -> ShelleyClientCmdError -> ShowS) @@ -52,130 +52,130 @@ renderShelleyClientCmdError :: ShelleyCommand -> ShelleyClientCmdError -> Text renderShelleyClientCmdError :: ShelleyCommand -> ShelleyClientCmdError -> Text -renderShelleyClientCmdError ShelleyCommand -cmd ShelleyClientCmdError -err = +renderShelleyClientCmdError ShelleyCommand +cmd ShelleyClientCmdError +err = case ShelleyClientCmdError -err of - ShelleyCmdAddressError ShelleyAddressCmdError -addrCmdErr -> +err of + ShelleyCmdAddressError ShelleyAddressCmdError +addrCmdErr -> ShelleyCommand -> (ShelleyAddressCmdError -> Text) -> ShelleyAddressCmdError -> Text forall a. ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -cmd ShelleyAddressCmdError -> Text +renderError ShelleyCommand +cmd ShelleyAddressCmdError -> Text renderShelleyAddressCmdError ShelleyAddressCmdError -addrCmdErr - ShelleyCmdGenesisError ShelleyGenesisCmdError -genesisCmdErr -> +addrCmdErr + ShelleyCmdGenesisError ShelleyGenesisCmdError +genesisCmdErr -> ShelleyCommand -> (ShelleyGenesisCmdError -> Text) -> ShelleyGenesisCmdError -> Text forall a. ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -cmd ShelleyGenesisCmdError -> Text +renderError ShelleyCommand +cmd ShelleyGenesisCmdError -> Text renderShelleyGenesisCmdError ShelleyGenesisCmdError -genesisCmdErr - ShelleyCmdGovernanceError ShelleyGovernanceCmdError -govCmdErr -> +genesisCmdErr + ShelleyCmdGovernanceError ShelleyGovernanceCmdError +govCmdErr -> ShelleyCommand -> (ShelleyGovernanceCmdError -> Text) -> ShelleyGovernanceCmdError -> Text forall a. ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -cmd ShelleyGovernanceCmdError -> Text +renderError ShelleyCommand +cmd ShelleyGovernanceCmdError -> Text renderShelleyGovernanceError ShelleyGovernanceCmdError -govCmdErr - ShelleyCmdNodeError ShelleyNodeCmdError -nodeCmdErr -> +govCmdErr + ShelleyCmdNodeError ShelleyNodeCmdError +nodeCmdErr -> ShelleyCommand -> (ShelleyNodeCmdError -> Text) -> ShelleyNodeCmdError -> Text forall a. ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -cmd ShelleyNodeCmdError -> Text +renderError ShelleyCommand +cmd ShelleyNodeCmdError -> Text renderShelleyNodeCmdError ShelleyNodeCmdError -nodeCmdErr - ShelleyCmdPoolError ShelleyPoolCmdError -poolCmdErr -> +nodeCmdErr + ShelleyCmdPoolError ShelleyPoolCmdError +poolCmdErr -> ShelleyCommand -> (ShelleyPoolCmdError -> Text) -> ShelleyPoolCmdError -> Text forall a. ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -cmd ShelleyPoolCmdError -> Text +renderError ShelleyCommand +cmd ShelleyPoolCmdError -> Text renderShelleyPoolCmdError ShelleyPoolCmdError -poolCmdErr - ShelleyCmdStakeAddressError ShelleyStakeAddressCmdError -stakeAddrCmdErr -> +poolCmdErr + ShelleyCmdStakeAddressError ShelleyStakeAddressCmdError +stakeAddrCmdErr -> ShelleyCommand -> (ShelleyStakeAddressCmdError -> Text) -> ShelleyStakeAddressCmdError -> Text forall a. ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -cmd ShelleyStakeAddressCmdError -> Text +renderError ShelleyCommand +cmd ShelleyStakeAddressCmdError -> Text renderShelleyStakeAddressCmdError ShelleyStakeAddressCmdError -stakeAddrCmdErr - ShelleyCmdTextViewError ShelleyTextViewFileError -txtViewErr -> +stakeAddrCmdErr + ShelleyCmdTextViewError ShelleyTextViewFileError +txtViewErr -> ShelleyCommand -> (ShelleyTextViewFileError -> Text) -> ShelleyTextViewFileError -> Text forall a. ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -cmd ShelleyTextViewFileError -> Text +renderError ShelleyCommand +cmd ShelleyTextViewFileError -> Text renderShelleyTextViewFileError ShelleyTextViewFileError -txtViewErr - ShelleyCmdTransactionError ShelleyTxCmdError -txErr -> +txtViewErr + ShelleyCmdTransactionError ShelleyTxCmdError +txErr -> ShelleyCommand -> (ShelleyTxCmdError -> Text) -> ShelleyTxCmdError -> Text forall a. ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -cmd ShelleyTxCmdError -> Text +renderError ShelleyCommand +cmd ShelleyTxCmdError -> Text renderShelleyTxCmdError ShelleyTxCmdError -txErr - ShelleyCmdQueryError ShelleyQueryCmdError -queryErr -> +txErr + ShelleyCmdQueryError ShelleyQueryCmdError +queryErr -> ShelleyCommand -> (ShelleyQueryCmdError -> Text) -> ShelleyQueryCmdError -> Text forall a. ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -cmd ShelleyQueryCmdError -> Text +renderError ShelleyCommand +cmd ShelleyQueryCmdError -> Text renderShelleyQueryCmdError ShelleyQueryCmdError -queryErr - ShelleyCmdKeyError ShelleyKeyCmdError -keyErr -> +queryErr + ShelleyCmdKeyError ShelleyKeyCmdError +keyErr -> ShelleyCommand -> (ShelleyKeyCmdError -> Text) -> ShelleyKeyCmdError -> Text forall a. ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -cmd ShelleyKeyCmdError -> Text +renderError ShelleyCommand +cmd ShelleyKeyCmdError -> Text renderShelleyKeyCmdError ShelleyKeyCmdError -keyErr +keyErr where - renderError :: ShelleyCommand -> (a -> Text) -> a -> Text - renderError :: ShelleyCommand -> (a -> Text) -> a -> Text -renderError ShelleyCommand -shelleyCmd a -> Text -renderer a -shelCliCmdErr = + renderError :: ShelleyCommand -> (a -> Text) -> a -> Text + renderError :: ShelleyCommand -> (a -> Text) -> a -> Text +renderError ShelleyCommand +shelleyCmd a -> Text +renderer a +shelCliCmdErr = [Text] -> Text forall a. Monoid a => [a] -> a mconcat [ Text "Command failed: " , ShelleyCommand -> Text renderShelleyCommand ShelleyCommand -shelleyCmd +shelleyCmd , Text " Error: " , a -> Text -renderer a -shelCliCmdErr +renderer a +shelCliCmdErr ] @@ -185,8 +185,8 @@ runShelleyClientCommand :: ShelleyCommand -> ExceptT ShelleyClientCmdError IO () runShelleyClientCommand :: ShelleyCommand -> ExceptT ShelleyClientCmdError IO () -runShelleyClientCommand (AddressCmd AddressCmd -cmd) = (ShelleyAddressCmdError -> ShelleyClientCmdError) +runShelleyClientCommand (AddressCmd AddressCmd +cmd) = (ShelleyAddressCmdError -> ShelleyClientCmdError) -> ExceptT ShelleyAddressCmdError IO () -> ExceptT ShelleyClientCmdError IO () forall (m :: * -> *) x y a. @@ -200,9 +200,9 @@ forall a b. (a -> b) -> a -> b $ AddressCmd -> ExceptT ShelleyAddressCmdError IO () runAddressCmd AddressCmd -cmd -runShelleyClientCommand (StakeAddressCmd StakeAddressCmd -cmd) = (ShelleyStakeAddressCmdError -> ShelleyClientCmdError) +cmd +runShelleyClientCommand (StakeAddressCmd StakeAddressCmd +cmd) = (ShelleyStakeAddressCmdError -> ShelleyClientCmdError) -> ExceptT ShelleyStakeAddressCmdError IO () -> ExceptT ShelleyClientCmdError IO () forall (m :: * -> *) x y a. @@ -216,9 +216,9 @@ forall a b. (a -> b) -> a -> b $ StakeAddressCmd -> ExceptT ShelleyStakeAddressCmdError IO () runStakeAddressCmd StakeAddressCmd -cmd -runShelleyClientCommand (KeyCmd KeyCmd -cmd) = (ShelleyKeyCmdError -> ShelleyClientCmdError) +cmd +runShelleyClientCommand (KeyCmd KeyCmd +cmd) = (ShelleyKeyCmdError -> ShelleyClientCmdError) -> ExceptT ShelleyKeyCmdError IO () -> ExceptT ShelleyClientCmdError IO () forall (m :: * -> *) x y a. @@ -232,9 +232,9 @@ forall a b. (a -> b) -> a -> b $ KeyCmd -> ExceptT ShelleyKeyCmdError IO () runKeyCmd KeyCmd -cmd -runShelleyClientCommand (TransactionCmd TransactionCmd -cmd) = (ShelleyTxCmdError -> ShelleyClientCmdError) +cmd +runShelleyClientCommand (TransactionCmd TransactionCmd +cmd) = (ShelleyTxCmdError -> ShelleyClientCmdError) -> ExceptT ShelleyTxCmdError IO () -> ExceptT ShelleyClientCmdError IO () forall (m :: * -> *) x y a. @@ -248,9 +248,9 @@ forall a b. (a -> b) -> a -> b $ TransactionCmd -> ExceptT ShelleyTxCmdError IO () runTransactionCmd TransactionCmd -cmd -runShelleyClientCommand (NodeCmd NodeCmd -cmd) = (ShelleyNodeCmdError -> ShelleyClientCmdError) +cmd +runShelleyClientCommand (NodeCmd NodeCmd +cmd) = (ShelleyNodeCmdError -> ShelleyClientCmdError) -> ExceptT ShelleyNodeCmdError IO () -> ExceptT ShelleyClientCmdError IO () forall (m :: * -> *) x y a. @@ -264,9 +264,9 @@ forall a b. (a -> b) -> a -> b $ NodeCmd -> ExceptT ShelleyNodeCmdError IO () runNodeCmd NodeCmd -cmd -runShelleyClientCommand (PoolCmd PoolCmd -cmd) = (ShelleyPoolCmdError -> ShelleyClientCmdError) +cmd +runShelleyClientCommand (PoolCmd PoolCmd +cmd) = (ShelleyPoolCmdError -> ShelleyClientCmdError) -> ExceptT ShelleyPoolCmdError IO () -> ExceptT ShelleyClientCmdError IO () forall (m :: * -> *) x y a. @@ -280,9 +280,9 @@ forall a b. (a -> b) -> a -> b $ PoolCmd -> ExceptT ShelleyPoolCmdError IO () runPoolCmd PoolCmd -cmd -runShelleyClientCommand (QueryCmd QueryCmd -cmd) = (ShelleyQueryCmdError -> ShelleyClientCmdError) +cmd +runShelleyClientCommand (QueryCmd QueryCmd +cmd) = (ShelleyQueryCmdError -> ShelleyClientCmdError) -> ExceptT ShelleyQueryCmdError IO () -> ExceptT ShelleyClientCmdError IO () forall (m :: * -> *) x y a. @@ -296,9 +296,9 @@ forall a b. (a -> b) -> a -> b $ QueryCmd -> ExceptT ShelleyQueryCmdError IO () runQueryCmd QueryCmd -cmd -runShelleyClientCommand (GovernanceCmd GovernanceCmd -cmd) = (ShelleyGovernanceCmdError -> ShelleyClientCmdError) +cmd +runShelleyClientCommand (GovernanceCmd GovernanceCmd +cmd) = (ShelleyGovernanceCmdError -> ShelleyClientCmdError) -> ExceptT ShelleyGovernanceCmdError IO () -> ExceptT ShelleyClientCmdError IO () forall (m :: * -> *) x y a. @@ -312,9 +312,9 @@ forall a b. (a -> b) -> a -> b $ GovernanceCmd -> ExceptT ShelleyGovernanceCmdError IO () runGovernanceCmd GovernanceCmd -cmd -runShelleyClientCommand (GenesisCmd GenesisCmd -cmd) = (ShelleyGenesisCmdError -> ShelleyClientCmdError) +cmd +runShelleyClientCommand (GenesisCmd GenesisCmd +cmd) = (ShelleyGenesisCmdError -> ShelleyClientCmdError) -> ExceptT ShelleyGenesisCmdError IO () -> ExceptT ShelleyClientCmdError IO () forall (m :: * -> *) x y a. @@ -328,9 +328,9 @@ forall a b. (a -> b) -> a -> b $ GenesisCmd -> ExceptT ShelleyGenesisCmdError IO () runGenesisCmd GenesisCmd -cmd -runShelleyClientCommand (TextViewCmd TextViewCmd -cmd) = (ShelleyTextViewFileError -> ShelleyClientCmdError) +cmd +runShelleyClientCommand (TextViewCmd TextViewCmd +cmd) = (ShelleyTextViewFileError -> ShelleyClientCmdError) -> ExceptT ShelleyTextViewFileError IO () -> ExceptT ShelleyClientCmdError IO () forall (m :: * -> *) x y a. @@ -344,5 +344,5 @@ forall a b. (a -> b) -> a -> b $ TextViewCmd -> ExceptT ShelleyTextViewFileError IO () runTextViewCmd TextViewCmd -cmd +cmd \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Shelley.Script.html b/cardano-cli/src/Cardano.CLI.Shelley.Script.html index eae06b683c2..ed30a4d95b6 100644 --- a/cardano-cli/src/Cardano.CLI.Shelley.Script.html +++ b/cardano-cli/src/Cardano.CLI.Shelley.Script.html @@ -24,7 +24,7 @@ data ScriptDecodeError = ScriptDecodeTextEnvelopeError TextEnvelopeError | ScriptDecodeSimpleScriptError JsonDecodeError - deriving Int -> ScriptDecodeError -> ShowS + deriving Int -> ScriptDecodeError -> ShowS [ScriptDecodeError] -> ShowS ScriptDecodeError -> String (Int -> ScriptDecodeError -> ShowS) @@ -42,25 +42,25 @@ Show instance Error ScriptDecodeError where - displayError :: ScriptDecodeError -> String -displayError (ScriptDecodeTextEnvelopeError TextEnvelopeError -err) = + displayError :: ScriptDecodeError -> String +displayError (ScriptDecodeTextEnvelopeError TextEnvelopeError +err) = String "Error decoding script: " String -> ShowS forall a. [a] -> [a] -> [a] ++ TextEnvelopeError -> String forall e. Error e => e -> String displayError TextEnvelopeError -err - displayError (ScriptDecodeSimpleScriptError JsonDecodeError -err) = +err + displayError (ScriptDecodeSimpleScriptError JsonDecodeError +err) = String "Syntax error in script: " String -> ShowS forall a. [a] -> [a] -> [a] ++ JsonDecodeError -> String forall e. Error e => e -> String displayError JsonDecodeError -err +err -- | Read a script file. The file can either be in the text envelope format @@ -72,10 +72,10 @@ -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang readFileScriptInAnyLang :: String -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang -readFileScriptInAnyLang String -file = do - ByteString -scriptBytes <- (IOException -> FileError ScriptDecodeError) +readFileScriptInAnyLang String +file = do + ByteString +scriptBytes <- (IOException -> FileError ScriptDecodeError) -> IO ByteString -> ExceptT (FileError ScriptDecodeError) IO ByteString forall (m :: * -> *) x a. @@ -84,14 +84,14 @@ handleIOExceptT (String -> IOException -> FileError ScriptDecodeError forall e. String -> IOException -> FileError e FileIOError String -file) (IO ByteString +file) (IO ByteString -> ExceptT (FileError ScriptDecodeError) IO ByteString) -> IO ByteString -> ExceptT (FileError ScriptDecodeError) IO ByteString forall a b. (a -> b) -> a -> b $ String -> IO ByteString BS.readFile String -file +file (ScriptDecodeError -> FileError ScriptDecodeError) -> ExceptT ScriptDecodeError IO ScriptInAnyLang -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang @@ -101,7 +101,7 @@ firstExceptT (String -> ScriptDecodeError -> FileError ScriptDecodeError forall e. String -> e -> FileError e FileError String -file) (ExceptT ScriptDecodeError IO ScriptInAnyLang +file) (ExceptT ScriptDecodeError IO ScriptInAnyLang -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang) -> ExceptT ScriptDecodeError IO ScriptInAnyLang -> ExceptT (FileError ScriptDecodeError) IO ScriptInAnyLang @@ -117,14 +117,14 @@ $ ByteString -> Either ScriptDecodeError ScriptInAnyLang deserialiseScriptInAnyLang ByteString -scriptBytes +scriptBytes deserialiseScriptInAnyLang :: ByteString -> Either ScriptDecodeError ScriptInAnyLang deserialiseScriptInAnyLang :: ByteString -> Either ScriptDecodeError ScriptInAnyLang -deserialiseScriptInAnyLang ByteString -bs = +deserialiseScriptInAnyLang ByteString +bs = -- Accept either the text envelope format wrapping the binary serialisation, -- or accept the simple script language in its JSON format. -- @@ -135,7 +135,7 @@ AsType a -> ByteString -> Either JsonDecodeError a deserialiseFromJSON AsType TextEnvelope AsTextEnvelope ByteString -bs of +bs of Left JsonDecodeError _ -> -- The SimpleScript language has the property that it is backwards @@ -151,46 +151,46 @@ forall lang. AsType lang -> AsType (SimpleScript lang) AsSimpleScript AsType SimpleScriptV2 AsSimpleScriptV2) ByteString -bs of - Left JsonDecodeError -err -> ScriptDecodeError -> Either ScriptDecodeError ScriptInAnyLang +bs of + Left JsonDecodeError +err -> ScriptDecodeError -> Either ScriptDecodeError ScriptInAnyLang forall a b. a -> Either a b Left (JsonDecodeError -> ScriptDecodeError ScriptDecodeSimpleScriptError JsonDecodeError -err) - Right SimpleScript SimpleScriptV2 -script -> ScriptInAnyLang -> Either ScriptDecodeError ScriptInAnyLang +err) + Right SimpleScript SimpleScriptV2 +script -> ScriptInAnyLang -> Either ScriptDecodeError ScriptInAnyLang forall a b. b -> Either a b Right (SimpleScript SimpleScriptV2 -> ScriptInAnyLang -toMinimumSimpleScriptVersion SimpleScript SimpleScriptV2 -script) +toMinimumSimpleScriptVersion SimpleScript SimpleScriptV2 +script) - Right TextEnvelope -te -> + Right TextEnvelope +te -> case [FromSomeType HasTextEnvelope ScriptInAnyLang] -> TextEnvelope -> Either TextEnvelopeError ScriptInAnyLang forall b. [FromSomeType HasTextEnvelope b] -> TextEnvelope -> Either TextEnvelopeError b deserialiseFromTextEnvelopeAnyOf [FromSomeType HasTextEnvelope ScriptInAnyLang] -textEnvTypes TextEnvelope -te of - Left TextEnvelopeError -err -> ScriptDecodeError -> Either ScriptDecodeError ScriptInAnyLang +textEnvTypes TextEnvelope +te of + Left TextEnvelopeError +err -> ScriptDecodeError -> Either ScriptDecodeError ScriptInAnyLang forall a b. a -> Either a b Left (TextEnvelopeError -> ScriptDecodeError ScriptDecodeTextEnvelopeError TextEnvelopeError -err) - Right ScriptInAnyLang -script -> ScriptInAnyLang -> Either ScriptDecodeError ScriptInAnyLang +err) + Right ScriptInAnyLang +script -> ScriptInAnyLang -> Either ScriptDecodeError ScriptInAnyLang forall a b. b -> Either a b Right ScriptInAnyLang -script +script where - textEnvTypes :: [FromSomeType HasTextEnvelope ScriptInAnyLang] - textEnvTypes :: [FromSomeType HasTextEnvelope ScriptInAnyLang] -textEnvTypes = + textEnvTypes :: [FromSomeType HasTextEnvelope ScriptInAnyLang] + textEnvTypes :: [FromSomeType HasTextEnvelope ScriptInAnyLang] +textEnvTypes = [ AsType (Script SimpleScriptV1) -> (Script SimpleScriptV1 -> ScriptInAnyLang) -> FromSomeType HasTextEnvelope ScriptInAnyLang @@ -246,11 +246,11 @@ PlutusScriptV1)) ] - toMinimumSimpleScriptVersion :: SimpleScript SimpleScriptV2 + toMinimumSimpleScriptVersion :: SimpleScript SimpleScriptV2 -> ScriptInAnyLang - toMinimumSimpleScriptVersion :: SimpleScript SimpleScriptV2 -> ScriptInAnyLang -toMinimumSimpleScriptVersion SimpleScript SimpleScriptV2 -s = + toMinimumSimpleScriptVersion :: SimpleScript SimpleScriptV2 -> ScriptInAnyLang +toMinimumSimpleScriptVersion SimpleScript SimpleScriptV2 +s = -- TODO alonzo: this will need to be adjusted when more versions are added -- with appropriate helper functions it can probably be done in an -- era-generic style @@ -262,7 +262,7 @@ -> SimpleScript lang -> Maybe (SimpleScript lang') adjustSimpleScriptVersion SimpleScriptVersion SimpleScriptV1 SimpleScriptV1 SimpleScript SimpleScriptV2 -s of +s of Maybe (SimpleScript SimpleScriptV1) Nothing -> ScriptLanguage SimpleScriptV2 -> Script SimpleScriptV2 -> ScriptInAnyLang @@ -277,9 +277,9 @@ SimpleScriptVersion lang -> SimpleScript lang -> Script lang SimpleScript SimpleScriptVersion SimpleScriptV2 SimpleScriptV2 SimpleScript SimpleScriptV2 -s) - Just SimpleScript SimpleScriptV1 -s' -> ScriptLanguage SimpleScriptV1 +s) + Just SimpleScript SimpleScriptV1 +s' -> ScriptLanguage SimpleScriptV1 -> Script SimpleScriptV1 -> ScriptInAnyLang forall lang. ScriptLanguage lang -> Script lang -> ScriptInAnyLang ScriptInAnyLang (SimpleScriptVersion SimpleScriptV1 -> ScriptLanguage SimpleScriptV1 @@ -292,5 +292,5 @@ SimpleScriptVersion lang -> SimpleScript lang -> Script lang SimpleScript SimpleScriptVersion SimpleScriptV1 SimpleScriptV1 SimpleScript SimpleScriptV1 -s') +s') \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.TopHandler.html b/cardano-cli/src/Cardano.CLI.TopHandler.html index c5b520af4f6..8df0c16e30a 100644 --- a/cardano-cli/src/Cardano.CLI.TopHandler.html +++ b/cardano-cli/src/Cardano.CLI.TopHandler.html @@ -62,10 +62,10 @@ -- > main = toplevelExceptionHandler $ do -- > ... -- -toplevelExceptionHandler :: IO a -> IO a +toplevelExceptionHandler :: IO a -> IO a toplevelExceptionHandler :: IO a -> IO a -toplevelExceptionHandler IO a -prog = do +toplevelExceptionHandler IO a +prog = do -- Use line buffering in case we have to print big error messages, because -- by default stderr to a terminal device is NoBuffering which is slow. Handle -> BufferMode -> IO () @@ -75,57 +75,57 @@ IO a -> [Handler a] -> IO a forall a. IO a -> [Handler a] -> IO a catches IO a -prog [ +prog [ (SomeAsyncException -> IO a) -> Handler a forall a e. Exception e => (e -> IO a) -> Handler a Handler SomeAsyncException -> IO a forall a. SomeAsyncException -> IO a -rethrowAsyncExceptions +rethrowAsyncExceptions , (ExitCode -> IO a) -> Handler a forall a e. Exception e => (e -> IO a) -> Handler a Handler ExitCode -> IO a forall a. ExitCode -> IO a -rethrowExitCode +rethrowExitCode , (SomeException -> IO a) -> Handler a forall a e. Exception e => (e -> IO a) -> Handler a Handler SomeException -> IO a forall a. SomeException -> IO a -handleSomeException +handleSomeException ] where -- Let async exceptions rise to the top for the default GHC top-handler. -- This includes things like CTRL-C. - rethrowAsyncExceptions :: SomeAsyncException -> IO a - rethrowAsyncExceptions :: SomeAsyncException -> IO a -rethrowAsyncExceptions = SomeAsyncException -> IO a + rethrowAsyncExceptions :: SomeAsyncException -> IO a + rethrowAsyncExceptions :: SomeAsyncException -> IO a +rethrowAsyncExceptions = SomeAsyncException -> IO a forall e a. Exception e => e -> IO a throwIO -- We don't want to print ExitCode, and it should be handled by the default -- top handler because that sets the actual OS process exit code. - rethrowExitCode :: ExitCode -> IO a - rethrowExitCode :: ExitCode -> IO a -rethrowExitCode = ExitCode -> IO a + rethrowExitCode :: ExitCode -> IO a + rethrowExitCode :: ExitCode -> IO a +rethrowExitCode = ExitCode -> IO a forall e a. Exception e => e -> IO a throwIO -- Print all other exceptions - handleSomeException :: SomeException -> IO a - handleSomeException :: SomeException -> IO a -handleSomeException SomeException -e = do + handleSomeException :: SomeException -> IO a + handleSomeException :: SomeException -> IO a +handleSomeException SomeException +e = do Handle -> IO () hFlush Handle stdout - String -progname <- IO String + String +progname <- IO String getProgName Handle -> String -> IO () hPutStr Handle stderr (String -> SomeException -> String -renderSomeException String -progname SomeException -e) +renderSomeException String +progname SomeException +e) ExitCode -> IO a forall e a. Exception e => e -> IO a throwIO (Int -> ExitCode @@ -135,30 +135,30 @@ -- Print the human-readable output of 'displayException' if it differs -- from the default output (of 'show'), so that the user/sysadmin -- sees something readable in the log. - renderSomeException :: String -> SomeException -> String - renderSomeException :: String -> SomeException -> String -renderSomeException String -progname SomeException -e + renderSomeException :: String -> SomeException -> String + renderSomeException :: String -> SomeException -> String +renderSomeException String +progname SomeException +e | String -showOutput String -> String -> Bool +showOutput String -> String -> Bool forall a. Eq a => a -> a -> Bool /= String -displayOutput +displayOutput = String -showOutput String -> String -> String +showOutput String -> String -> String forall a. [a] -> [a] -> [a] ++ String "\n\n" String -> String -> String forall a. [a] -> [a] -> [a] ++ String -progname String -> String -> String +progname String -> String -> String forall a. [a] -> [a] -> [a] ++ String ": " String -> String -> String forall a. [a] -> [a] -> [a] ++ String -displayOutput +displayOutput | Bool otherwise @@ -166,22 +166,22 @@ "\n" String -> String -> String forall a. [a] -> [a] -> [a] ++ String -progname String -> String -> String +progname String -> String -> String forall a. [a] -> [a] -> [a] ++ String ": " String -> String -> String forall a. [a] -> [a] -> [a] ++ String -showOutput +showOutput where - showOutput :: String -showOutput = SomeException -> String + showOutput :: String +showOutput = SomeException -> String forall a. Show a => a -> String show SomeException -e - displayOutput :: String -displayOutput = SomeException -> String +e + displayOutput :: String +displayOutput = SomeException -> String forall e. Exception e => e -> String displayException SomeException -e +e \ No newline at end of file diff --git a/cardano-cli/src/Cardano.CLI.Types.html b/cardano-cli/src/Cardano.CLI.Types.html index 86fa03518cb..865894dd8d7 100644 --- a/cardano-cli/src/Cardano.CLI.Types.html +++ b/cardano-cli/src/Cardano.CLI.Types.html @@ -46,7 +46,7 @@ | CBORTxByron | CBORUpdateProposalByron | CBORVoteByron - deriving Int -> CBORObject -> ShowS + deriving Int -> CBORObject -> ShowS [CBORObject] -> ShowS CBORObject -> String (Int -> CBORObject -> ShowS) @@ -67,7 +67,7 @@ -- genesis delegate certificates and MIR certificates. newtype CertificateFile = CertificateFile { CertificateFile -> String unCertificateFile :: FilePath } - deriving newtype (CertificateFile -> CertificateFile -> Bool + deriving newtype (CertificateFile -> CertificateFile -> Bool (CertificateFile -> CertificateFile -> Bool) -> (CertificateFile -> CertificateFile -> Bool) -> Eq CertificateFile @@ -76,7 +76,7 @@ $c/= :: CertificateFile -> CertificateFile -> Bool == :: CertificateFile -> CertificateFile -> Bool $c== :: CertificateFile -> CertificateFile -> Bool -Eq, Int -> CertificateFile -> ShowS +Eq, Int -> CertificateFile -> ShowS [CertificateFile] -> ShowS CertificateFile -> String (Int -> CertificateFile -> ShowS) @@ -96,7 +96,7 @@ newtype GenesisFile = GenesisFile { GenesisFile -> String unGenesisFile :: FilePath } - deriving stock (GenesisFile -> GenesisFile -> Bool + deriving stock (GenesisFile -> GenesisFile -> Bool (GenesisFile -> GenesisFile -> Bool) -> (GenesisFile -> GenesisFile -> Bool) -> Eq GenesisFile forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -104,7 +104,7 @@ $c/= :: GenesisFile -> GenesisFile -> Bool == :: GenesisFile -> GenesisFile -> Bool $c== :: GenesisFile -> GenesisFile -> Bool -Eq, Eq GenesisFile +Eq, Eq GenesisFile Eq GenesisFile -> (GenesisFile -> GenesisFile -> Ordering) -> (GenesisFile -> GenesisFile -> Bool) @@ -143,12 +143,12 @@ $ccompare :: GenesisFile -> GenesisFile -> Ordering $cp1Ord :: Eq GenesisFile Ord) - deriving newtype (String -> GenesisFile + deriving newtype (String -> GenesisFile (String -> GenesisFile) -> IsString GenesisFile forall a. (String -> a) -> IsString a fromString :: String -> GenesisFile $cfromString :: String -> GenesisFile -IsString, Int -> GenesisFile -> ShowS +IsString, Int -> GenesisFile -> ShowS [GenesisFile] -> ShowS GenesisFile -> String (Int -> GenesisFile -> ShowS) @@ -165,10 +165,10 @@ $cshowsPrec :: Int -> GenesisFile -> ShowS Show) -instance FromJSON GenesisFile where - parseJSON :: Value -> Parser GenesisFile -parseJSON (Aeson.String Text -genFp) = GenesisFile -> Parser GenesisFile +instance FromJSON GenesisFile where + parseJSON :: Value -> Parser GenesisFile +parseJSON (Aeson.String Text +genFp) = GenesisFile -> Parser GenesisFile forall (f :: * -> *) a. Applicative f => a -> f a pure (GenesisFile -> Parser GenesisFile) -> (String -> GenesisFile) -> String -> Parser GenesisFile @@ -180,9 +180,9 @@ forall a b. (a -> b) -> a -> b $ Text -> String Text.unpack Text -genFp - parseJSON Value -invalid = Text -> Parser GenesisFile +genFp + parseJSON Value +invalid = Text -> Parser GenesisFile forall a. HasCallStack => Text -> a panic (Text -> Parser GenesisFile) -> Text -> Parser GenesisFile forall a b. (a -> b) -> a -> b @@ -197,13 +197,13 @@ Text.pack (Value -> String forall a b. (Show a, ConvertText String b) => a -> b show Value -invalid) +invalid) -- | The desired output format. data OutputFormat = OutputFormatHex | OutputFormatBech32 - deriving (OutputFormat -> OutputFormat -> Bool + deriving (OutputFormat -> OutputFormat -> Bool (OutputFormat -> OutputFormat -> Bool) -> (OutputFormat -> OutputFormat -> Bool) -> Eq OutputFormat forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -211,7 +211,7 @@ $c/= :: OutputFormat -> OutputFormat -> Bool == :: OutputFormat -> OutputFormat -> Bool $c== :: OutputFormat -> OutputFormat -> Bool -Eq, Int -> OutputFormat -> ShowS +Eq, Int -> OutputFormat -> ShowS [OutputFormat] -> ShowS OutputFormat -> String (Int -> OutputFormat -> ShowS) @@ -232,7 +232,7 @@ data QueryFilter = FilterByAddress !(Set AddressAny) | NoFilter - deriving (QueryFilter -> QueryFilter -> Bool + deriving (QueryFilter -> QueryFilter -> Bool (QueryFilter -> QueryFilter -> Bool) -> (QueryFilter -> QueryFilter -> Bool) -> Eq QueryFilter forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -240,7 +240,7 @@ $c/= :: QueryFilter -> QueryFilter -> Bool == :: QueryFilter -> QueryFilter -> Bool $c== :: QueryFilter -> QueryFilter -> Bool -Eq, Int -> QueryFilter -> ShowS +Eq, Int -> QueryFilter -> ShowS [QueryFilter] -> ShowS QueryFilter -> String (Int -> QueryFilter -> ShowS) @@ -277,7 +277,7 @@ setTotal :: Integer , Stakes -> Integer goTotal :: Integer - } deriving Int -> Stakes -> ShowS + } deriving Int -> Stakes -> ShowS [Stakes] -> ShowS Stakes -> String (Int -> Stakes -> ShowS) @@ -293,56 +293,56 @@ Show -- | Pretty printing for stake information -instance ToJSON Stakes where - toJSON :: Stakes -> Value -toJSON (Stakes Integer -m Integer -s Integer -g Integer -mt Integer -st Integer -gt) = [Pair] -> Value +instance ToJSON Stakes where + toJSON :: Stakes -> Value +toJSON (Stakes Integer +m Integer +s Integer +g Integer +mt Integer +st Integer +gt) = [Pair] -> Value object [ Text "poolStakeMark" Text -> Integer -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -m +m , Text "poolStakeSet" Text -> Integer -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -s +s , Text "poolStakeGo" Text -> Integer -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -g +g , Text "activeStakeMark" Text -> Integer -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -mt +mt , Text "activeStakeSet" Text -> Integer -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -st +st , Text "activeStakeGo" Text -> Integer -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -gt +gt ] - toEncoding :: Stakes -> Encoding -toEncoding (Stakes Integer -m Integer -s Integer -g Integer -mt Integer -st Integer -gt) = Series -> Encoding + toEncoding :: Stakes -> Encoding +toEncoding (Stakes Integer +m Integer +s Integer +g Integer +mt Integer +st Integer +gt) = Series -> Encoding pairs (Series -> Encoding) -> Series -> Encoding forall a b. (a -> b) -> a -> b $ [Series] -> Series @@ -352,45 +352,45 @@ "poolStakeMark" Text -> Integer -> Series forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -m +m , Text "poolStakeSet" Text -> Integer -> Series forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -s +s , Text "poolStakeGo" Text -> Integer -> Series forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -g +g , Text "activeStakeMark" Text -> Integer -> Series forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -mt +mt , Text "activeStakeSet" Text -> Integer -> Series forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -st +st , Text "activeStakeGo" Text -> Integer -> Series forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -gt +gt ] -- | This data structure is used to allow nicely formatted output in the query pool-params command. -- params are the current pool parameter settings, futureparams are new parameters, retiringEpoch is the -- epoch that has been set for pool retirement. Any of these may be Nothing. -data Params crypto = Params +data Params crypto = Params { Params crypto -> Maybe (PoolParams crypto) -poolParameters :: Maybe (PoolParams crypto) +poolParameters :: Maybe (PoolParams crypto) , Params crypto -> Maybe (PoolParams crypto) -futurePoolParameters :: Maybe (PoolParams crypto) +futurePoolParameters :: Maybe (PoolParams crypto) , Params crypto -> Maybe EpochNo retiringEpoch :: Maybe EpochNo - } deriving Int -> Params crypto -> ShowS + } deriving Int -> Params crypto -> ShowS [Params crypto] -> ShowS Params crypto -> String (Int -> Params crypto -> ShowS) @@ -411,35 +411,35 @@ Show -- | Pretty printing for pool parameters -instance Crypto.Crypto crypto => ToJSON (Params crypto) where - toJSON :: Params crypto -> Value -toJSON (Params Maybe (PoolParams crypto) -p Maybe (PoolParams crypto) -fp Maybe EpochNo -r) = [Pair] -> Value +instance Crypto.Crypto crypto => ToJSON (Params crypto) where + toJSON :: Params crypto -> Value +toJSON (Params Maybe (PoolParams crypto) +p Maybe (PoolParams crypto) +fp Maybe EpochNo +r) = [Pair] -> Value object [ Text "poolParams" Text -> Maybe (PoolParams crypto) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe (PoolParams crypto) -p +p , Text "futurePoolParams" Text -> Maybe (PoolParams crypto) -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe (PoolParams crypto) -fp +fp , Text "retiring" Text -> Maybe EpochNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe EpochNo -r +r ] - toEncoding :: Params crypto -> Encoding -toEncoding (Params Maybe (PoolParams crypto) -p Maybe (PoolParams crypto) -fp Maybe EpochNo -r) = Series -> Encoding + toEncoding :: Params crypto -> Encoding +toEncoding (Params Maybe (PoolParams crypto) +p Maybe (PoolParams crypto) +fp Maybe EpochNo +r) = Series -> Encoding pairs (Series -> Encoding) -> Series -> Encoding forall a b. (a -> b) -> a -> b $ [Series] -> Series @@ -449,23 +449,23 @@ "poolParams" Text -> Maybe (PoolParams crypto) -> Series forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe (PoolParams crypto) -p +p , Text "futurePoolParams" Text -> Maybe (PoolParams crypto) -> Series forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe (PoolParams crypto) -fp +fp , Text "retiring" Text -> Maybe EpochNo -> Series forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe EpochNo -r +r ] newtype SigningKeyFile = SigningKeyFile { SigningKeyFile -> String unSigningKeyFile :: FilePath } - deriving stock (SigningKeyFile -> SigningKeyFile -> Bool + deriving stock (SigningKeyFile -> SigningKeyFile -> Bool (SigningKeyFile -> SigningKeyFile -> Bool) -> (SigningKeyFile -> SigningKeyFile -> Bool) -> Eq SigningKeyFile forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -473,7 +473,7 @@ $c/= :: SigningKeyFile -> SigningKeyFile -> Bool == :: SigningKeyFile -> SigningKeyFile -> Bool $c== :: SigningKeyFile -> SigningKeyFile -> Bool -Eq, Eq SigningKeyFile +Eq, Eq SigningKeyFile Eq SigningKeyFile -> (SigningKeyFile -> SigningKeyFile -> Ordering) -> (SigningKeyFile -> SigningKeyFile -> Bool) @@ -512,12 +512,12 @@ $ccompare :: SigningKeyFile -> SigningKeyFile -> Ordering $cp1Ord :: Eq SigningKeyFile Ord) - deriving newtype (String -> SigningKeyFile + deriving newtype (String -> SigningKeyFile (String -> SigningKeyFile) -> IsString SigningKeyFile forall a. (String -> a) -> IsString a fromString :: String -> SigningKeyFile $cfromString :: String -> SigningKeyFile -IsString, Int -> SigningKeyFile -> ShowS +IsString, Int -> SigningKeyFile -> ShowS [SigningKeyFile] -> ShowS SigningKeyFile -> String (Int -> SigningKeyFile -> ShowS) @@ -539,7 +539,7 @@ newtype UpdateProposalFile = UpdateProposalFile { UpdateProposalFile -> String unUpdateProposalFile :: FilePath } - deriving newtype (UpdateProposalFile -> UpdateProposalFile -> Bool + deriving newtype (UpdateProposalFile -> UpdateProposalFile -> Bool (UpdateProposalFile -> UpdateProposalFile -> Bool) -> (UpdateProposalFile -> UpdateProposalFile -> Bool) -> Eq UpdateProposalFile @@ -548,7 +548,7 @@ $c/= :: UpdateProposalFile -> UpdateProposalFile -> Bool == :: UpdateProposalFile -> UpdateProposalFile -> Bool $c== :: UpdateProposalFile -> UpdateProposalFile -> Bool -Eq, Int -> UpdateProposalFile -> ShowS +Eq, Int -> UpdateProposalFile -> ShowS [UpdateProposalFile] -> ShowS UpdateProposalFile -> String (Int -> UpdateProposalFile -> ShowS) @@ -568,7 +568,7 @@ newtype VerificationKeyFile = VerificationKeyFile { VerificationKeyFile -> String unVerificationKeyFile :: FilePath } - deriving (VerificationKeyFile -> VerificationKeyFile -> Bool + deriving (VerificationKeyFile -> VerificationKeyFile -> Bool (VerificationKeyFile -> VerificationKeyFile -> Bool) -> (VerificationKeyFile -> VerificationKeyFile -> Bool) -> Eq VerificationKeyFile @@ -577,7 +577,7 @@ $c/= :: VerificationKeyFile -> VerificationKeyFile -> Bool == :: VerificationKeyFile -> VerificationKeyFile -> Bool $c== :: VerificationKeyFile -> VerificationKeyFile -> Bool -Eq, Int -> VerificationKeyFile -> ShowS +Eq, Int -> VerificationKeyFile -> ShowS [VerificationKeyFile] -> ShowS VerificationKeyFile -> String (Int -> VerificationKeyFile -> ShowS) @@ -596,7 +596,7 @@ newtype ScriptFile = ScriptFile { ScriptFile -> String unScriptFile :: FilePath } - deriving (ScriptFile -> ScriptFile -> Bool + deriving (ScriptFile -> ScriptFile -> Bool (ScriptFile -> ScriptFile -> Bool) -> (ScriptFile -> ScriptFile -> Bool) -> Eq ScriptFile forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -604,7 +604,7 @@ $c/= :: ScriptFile -> ScriptFile -> Bool == :: ScriptFile -> ScriptFile -> Bool $c== :: ScriptFile -> ScriptFile -> Bool -Eq, Int -> ScriptFile -> ShowS +Eq, Int -> ScriptFile -> ShowS [ScriptFile] -> ShowS ScriptFile -> String (Int -> ScriptFile -> ShowS) @@ -623,7 +623,7 @@ data ScriptDataOrFile = ScriptDataFile FilePath -- ^ By reference to a file | ScriptDataValue ScriptData -- ^ By value - deriving (ScriptDataOrFile -> ScriptDataOrFile -> Bool + deriving (ScriptDataOrFile -> ScriptDataOrFile -> Bool (ScriptDataOrFile -> ScriptDataOrFile -> Bool) -> (ScriptDataOrFile -> ScriptDataOrFile -> Bool) -> Eq ScriptDataOrFile @@ -632,7 +632,7 @@ $c/= :: ScriptDataOrFile -> ScriptDataOrFile -> Bool == :: ScriptDataOrFile -> ScriptDataOrFile -> Bool $c== :: ScriptDataOrFile -> ScriptDataOrFile -> Bool -Eq, Int -> ScriptDataOrFile -> ShowS +Eq, Int -> ScriptDataOrFile -> ShowS [ScriptDataOrFile] -> ShowS ScriptDataOrFile -> String (Int -> ScriptDataOrFile -> ShowS) @@ -656,31 +656,31 @@ -- -- It is era-independent, but witness context-dependent. -- -data ScriptWitnessFiles witctx where - SimpleScriptWitnessFile :: ScriptFile - -> ScriptWitnessFiles witctx +data ScriptWitnessFiles witctx where + SimpleScriptWitnessFile :: ScriptFile + -> ScriptWitnessFiles witctx - PlutusScriptWitnessFiles :: ScriptFile - -> ScriptDatumOrFile witctx + PlutusScriptWitnessFiles :: ScriptFile + -> ScriptDatumOrFile witctx -> ScriptRedeemerOrFile -> ExecutionUnits - -> ScriptWitnessFiles witctx + -> ScriptWitnessFiles witctx -deriving instance Show (ScriptWitnessFiles witctx) +deriving instance Show (ScriptWitnessFiles witctx) -data ScriptDatumOrFile witctx where +data ScriptDatumOrFile witctx where ScriptDatumOrFileForTxIn :: ScriptDataOrFile -> ScriptDatumOrFile WitCtxTxIn NoScriptDatumOrFileForMint :: ScriptDatumOrFile WitCtxMint NoScriptDatumOrFileForStake :: ScriptDatumOrFile WitCtxStake -deriving instance Show (ScriptDatumOrFile witctx) +deriving instance Show (ScriptDatumOrFile witctx) -- | Determines the direction in which the MIR certificate will transfer ADA. data TransferDirection = TransferToReserves | TransferToTreasury - deriving Int -> TransferDirection -> ShowS + deriving Int -> TransferDirection -> ShowS [TransferDirection] -> ShowS TransferDirection -> String (Int -> TransferDirection -> ShowS) @@ -704,7 +704,7 @@ -- data TxOutAnyEra = TxOutAnyEra AddressAny Value -- TODO alonzo: ^^ add support for tx out data - deriving (TxOutAnyEra -> TxOutAnyEra -> Bool + deriving (TxOutAnyEra -> TxOutAnyEra -> Bool (TxOutAnyEra -> TxOutAnyEra -> Bool) -> (TxOutAnyEra -> TxOutAnyEra -> Bool) -> Eq TxOutAnyEra forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -712,7 +712,7 @@ $c/= :: TxOutAnyEra -> TxOutAnyEra -> Bool == :: TxOutAnyEra -> TxOutAnyEra -> Bool $c== :: TxOutAnyEra -> TxOutAnyEra -> Bool -Eq, Int -> TxOutAnyEra -> ShowS +Eq, Int -> TxOutAnyEra -> ShowS [TxOutAnyEra] -> ShowS TxOutAnyEra -> String (Int -> TxOutAnyEra -> ShowS) diff --git a/cardano-cli/src/Paths_cardano_cli.html b/cardano-cli/src/Paths_cardano_cli.html index 8d1282ddabc..bd62211aa21 100644 --- a/cardano-cli/src/Paths_cardano_cli.html +++ b/cardano-cli/src/Paths_cardano_cli.html @@ -16,7 +16,7 @@ #if defined(VERSION_base) #if MIN_VERSION_base(4,0,0) -catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a +catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a #else catchIO :: IO a -> (Exception.Exception -> IO a) -> IO a #endif @@ -121,19 +121,19 @@ getDataFileName :: FilePath -> IO FilePath getDataFileName :: String -> IO String -getDataFileName String -name = do - String -dir <- IO String +getDataFileName String +name = do + String +dir <- IO String getDataDir String -> IO String forall (m :: * -> *) a. Monad m => a -> m a return (String -dir String -> String -> String +dir String -> String -> String forall a. [a] -> [a] -> [a] ++ String "/" String -> String -> String forall a. [a] -> [a] -> [a] ++ String -name) +name) \ No newline at end of file diff --git a/cardano-node-chairman/src/Cardano.Chairman.Commands.Run.html b/cardano-node-chairman/src/Cardano.Chairman.Commands.Run.html index f801f762f0d..afa7953a995 100644 --- a/cardano-node-chairman/src/Cardano.Chairman.Commands.Run.html +++ b/cardano-node-chairman/src/Cardano.Chairman.Commands.Run.html @@ -28,10 +28,10 @@ --TODO: replace this with the new stuff from Cardano.Api.Protocol mkNodeClientProtocol :: Protocol -> SomeNodeClientProtocol mkNodeClientProtocol :: Protocol -> SomeNodeClientProtocol -mkNodeClientProtocol Protocol -protocol = +mkNodeClientProtocol Protocol +protocol = case Protocol -protocol of +protocol of Protocol ByronProtocol -> EpochSlots -> SomeNodeClientProtocol @@ -109,8 +109,8 @@ parseSocketPath :: Text -> Parser SocketPath parseSocketPath :: Text -> Parser SocketPath -parseSocketPath Text -helpMessage = +parseSocketPath Text +helpMessage = FilePath -> SocketPath SocketPath (FilePath -> SocketPath) -> Parser FilePath -> Parser SocketPath forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -129,7 +129,7 @@ help (Text -> FilePath forall a b. ConvertText a b => a -> b toS Text -helpMessage) +helpMessage) Mod OptionFields FilePath -> Mod OptionFields FilePath -> Mod OptionFields FilePath forall a. Semigroup a => a -> a -> a @@ -370,34 +370,34 @@ run :: RunOpts -> IO () run :: RunOpts -> IO () run RunOpts - { DiffTime + { DiffTime caRunningTime :: DiffTime caRunningTime :: RunOpts -> DiffTime -caRunningTime - , BlockNo +caRunningTime + , BlockNo caMinProgress :: BlockNo caMinProgress :: RunOpts -> BlockNo -caMinProgress - , [SocketPath] +caMinProgress + , [SocketPath] caSocketPaths :: [SocketPath] caSocketPaths :: RunOpts -> [SocketPath] -caSocketPaths - , ConfigYamlFilePath +caSocketPaths + , ConfigYamlFilePath caConfigYaml :: ConfigYamlFilePath caConfigYaml :: RunOpts -> ConfigYamlFilePath -caConfigYaml - , SecurityParam +caConfigYaml + , SecurityParam caSecurityParam :: SecurityParam caSecurityParam :: RunOpts -> SecurityParam -caSecurityParam - , NetworkMagic +caSecurityParam + , NetworkMagic caNetworkMagic :: NetworkMagic caNetworkMagic :: RunOpts -> NetworkMagic -caNetworkMagic +caNetworkMagic } = do - PartialNodeConfiguration -partialNc <- IO PartialNodeConfiguration -> IO PartialNodeConfiguration + PartialNodeConfiguration +partialNc <- IO PartialNodeConfiguration -> IO PartialNodeConfiguration forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO PartialNodeConfiguration -> IO PartialNodeConfiguration) -> (Maybe ConfigYamlFilePath -> IO PartialNodeConfiguration) @@ -413,14 +413,14 @@ $ ConfigYamlFilePath -> Maybe ConfigYamlFilePath forall a. a -> Maybe a Just ConfigYamlFilePath -caConfigYaml +caConfigYaml - Protocol -ptcl <- case PartialNodeConfiguration -> Either Text Protocol + Protocol +ptcl <- case PartialNodeConfiguration -> Either Text Protocol pncProtocol PartialNodeConfiguration -partialNc of - Left Text -err -> Text -> IO Protocol +partialNc of + Left Text +err -> Text -> IO Protocol forall a. HasCallStack => Text -> a panic (Text -> IO Protocol) -> Text -> IO Protocol forall a b. (a -> b) -> a -> b @@ -428,17 +428,17 @@ "Chairman error: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -err - Right Protocol -protocol -> Protocol -> IO Protocol +err + Right Protocol +protocol -> Protocol -> IO Protocol forall (m :: * -> *) a. Monad m => a -> m a return Protocol -protocol +protocol - let someNodeClientProtocol :: SomeNodeClientProtocol -someNodeClientProtocol = Protocol -> SomeNodeClientProtocol + let someNodeClientProtocol :: SomeNodeClientProtocol +someNodeClientProtocol = Protocol -> SomeNodeClientProtocol mkNodeClientProtocol Protocol -ptcl +ptcl Tracer IO FilePath -> SomeNodeClientProtocol @@ -455,33 +455,33 @@ forall (m :: * -> *). MonadIO m => Tracer m FilePath stdoutTracer) SomeNodeClientProtocol -someNodeClientProtocol +someNodeClientProtocol NetworkMagic -caNetworkMagic +caNetworkMagic SecurityParam -caSecurityParam +caSecurityParam DiffTime -caRunningTime +caRunningTime BlockNo -caMinProgress +caMinProgress [SocketPath] -caSocketPaths +caSocketPaths () -> IO () forall (m :: * -> *) a. Monad m => a -> m a return () -timed :: Tracer IO a -> Tracer IO a +timed :: Tracer IO a -> Tracer IO a timed :: Tracer IO a -> Tracer IO a -timed (Tracer a -> IO () -runTracer) = (a -> IO ()) -> Tracer IO a +timed (Tracer a -> IO () +runTracer) = (a -> IO ()) -> Tracer IO a forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((a -> IO ()) -> Tracer IO a) -> (a -> IO ()) -> Tracer IO a forall a b. (a -> b) -> a -> b -$ \a -a -> do - UTCTime -ts <- IO UTCTime +$ \a +a -> do + UTCTime +ts <- IO UTCTime DTC.getCurrentTime FilePath -> IO () IO.putStr (FilePath @@ -490,13 +490,13 @@ <> UTCTime -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show UTCTime -ts FilePath -> FilePath -> FilePath +ts FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> FilePath "] ") a -> IO () -runTracer a -a +runTracer a +a cmdRun :: Mod CommandFields (IO ()) cmdRun :: Mod CommandFields (IO ()) diff --git a/cardano-node-chairman/src/Cardano.Chairman.Commands.Version.html b/cardano-node-chairman/src/Cardano.Chairman.Commands.Version.html index d90d278ec23..62a9f60bb27 100644 --- a/cardano-node-chairman/src/Cardano.Chairman.Commands.Version.html +++ b/cardano-node-chairman/src/Cardano.Chairman.Commands.Version.html @@ -18,7 +18,7 @@ import qualified Data.Text as T import qualified System.IO as IO -data VersionOptions = VersionOptions deriving (VersionOptions -> VersionOptions -> Bool +data VersionOptions = VersionOptions deriving (VersionOptions -> VersionOptions -> Bool (VersionOptions -> VersionOptions -> Bool) -> (VersionOptions -> VersionOptions -> Bool) -> Eq VersionOptions forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -26,7 +26,7 @@ $c/= :: VersionOptions -> VersionOptions -> Bool == :: VersionOptions -> VersionOptions -> Bool $c== :: VersionOptions -> VersionOptions -> Bool -Eq, Int -> VersionOptions -> ShowS +Eq, Int -> VersionOptions -> ShowS [VersionOptions] -> ShowS VersionOptions -> String (Int -> VersionOptions -> ShowS) diff --git a/cardano-node-chairman/src/Cardano.Chairman.html b/cardano-node-chairman/src/Cardano.Chairman.html index e46b7e65c49..26389fd7815 100644 --- a/cardano-node-chairman/src/Cardano.Chairman.html +++ b/cardano-node-chairman/src/Cardano.Chairman.html @@ -76,44 +76,44 @@ -> BlockNo -> [SocketPath] -> IO () -chairmanTest Tracer IO String -tracer SomeNodeClientProtocol -protocol NetworkMagic -nw SecurityParam -securityParam DiffTime -runningTime BlockNo -progressThreshold [SocketPath] -socketPaths = do +chairmanTest Tracer IO String +tracer SomeNodeClientProtocol +protocol NetworkMagic +nw SecurityParam +securityParam DiffTime +runningTime BlockNo +progressThreshold [SocketPath] +socketPaths = do Tracer IO String -> String -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO String -tracer (String +tracer (String "Will observe nodes for " String -> String -> String forall a. [a] -> [a] -> [a] ++ DiffTime -> String forall a. Show a => a -> String show DiffTime -runningTime) +runningTime) Tracer IO String -> String -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO String -tracer (String +tracer (String "Will require chain growth of " String -> String -> String forall a. [a] -> [a] -> [a] ++ BlockNo -> String forall a. Show a => a -> String show BlockNo -progressThreshold) +progressThreshold) - SomeNodeClientProtocol (ProtocolClientInfoArgs blk -ptcl :: ProtocolClientInfoArgs blk) <- SomeNodeClientProtocol -> IO SomeNodeClientProtocol + SomeNodeClientProtocol (ProtocolClientInfoArgs blk +ptcl :: ProtocolClientInfoArgs blk) <- SomeNodeClientProtocol -> IO SomeNodeClientProtocol forall (m :: * -> *) a. Monad m => a -> m a return SomeNodeClientProtocol -protocol +protocol -- Run the chairman and get the final snapshot of the chain from each node. - ChainsSnapshot blk -chainsSnapshot <- Tracer IO String + ChainsSnapshot blk +chainsSnapshot <- Tracer IO String -> CodecConfig blk -> NetworkMagic -> SecurityParam @@ -131,7 +131,7 @@ -> IO (ChainsSnapshot blk) runChairman Tracer IO String -tracer +tracer (ProtocolClientInfo blk -> CodecConfig blk forall b. ProtocolClientInfo b -> CodecConfig b pClientInfoCodecConfig (ProtocolClientInfoArgs blk -> ProtocolClientInfo blk @@ -139,25 +139,25 @@ ProtocolClient blk => ProtocolClientInfoArgs blk -> ProtocolClientInfo blk protocolClientInfo ProtocolClientInfoArgs blk -ptcl)) +ptcl)) NetworkMagic -nw +nw SecurityParam -securityParam +securityParam DiffTime -runningTime +runningTime [SocketPath] -socketPaths +socketPaths Tracer IO String -> String -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO String -tracer String +tracer String "================== chairman results ==================" -- Test if we achieved consensus - ConsensusSuccess blk -consensusSuccess <- (ConsensusFailure blk -> IO (ConsensusSuccess blk)) + ConsensusSuccess blk +consensusSuccess <- (ConsensusFailure blk -> IO (ConsensusSuccess blk)) -> (ConsensusSuccess blk -> IO (ConsensusSuccess blk)) -> Either (ConsensusFailure blk) (ConsensusSuccess blk) -> IO (ConsensusSuccess blk) @@ -181,20 +181,20 @@ -> ChainsSnapshot blk -> Either (ConsensusFailure blk) (ConsensusSuccess blk) consensusCondition SecurityParam -securityParam ChainsSnapshot blk -chainsSnapshot +securityParam ChainsSnapshot blk +chainsSnapshot Tracer IO String -> String -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO String -tracer (ConsensusSuccess blk -> String +tracer (ConsensusSuccess blk -> String forall a. Show a => a -> String show ConsensusSuccess blk -consensusSuccess) +consensusSuccess) -- Test if we made adequate progress - ProgressSuccess -progressSuccess <- (ProgressFailure blk -> IO ProgressSuccess) + ProgressSuccess +progressSuccess <- (ProgressFailure blk -> IO ProgressSuccess) -> (ProgressSuccess -> IO ProgressSuccess) -> Either (ProgressFailure blk) ProgressSuccess -> IO ProgressSuccess @@ -217,32 +217,32 @@ -> ConsensusSuccess blk -> Either (ProgressFailure blk) ProgressSuccess progressCondition BlockNo -progressThreshold ConsensusSuccess blk -consensusSuccess +progressThreshold ConsensusSuccess blk +consensusSuccess Tracer IO String -> String -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO String -tracer (ProgressSuccess -> String +tracer (ProgressSuccess -> String forall a. Show a => a -> String show ProgressSuccess -progressSuccess) +progressSuccess) Tracer IO String -> String -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO String -tracer String +tracer String "================== chairman results ==================" -type ChainsSnapshot blk = Map PeerId (AnchoredFragment (Header blk)) +type ChainsSnapshot blk = Map PeerId (AnchoredFragment (Header blk)) type PeerId = SocketPath -data ConsensusSuccess blk = ConsensusSuccess +data ConsensusSuccess blk = ConsensusSuccess -- Minimum of the maximum intersection points - (Anchor (Header blk)) + (Anchor (Header blk)) -- Chain tip for each chain - [(PeerId, Tip (Header blk))] - deriving Int -> ConsensusSuccess blk -> String -> String + [(PeerId, Tip (Header blk))] + deriving Int -> ConsensusSuccess blk -> String -> String [ConsensusSuccess blk] -> String -> String ConsensusSuccess blk -> String (Int -> ConsensusSuccess blk -> String -> String) @@ -271,14 +271,14 @@ Int -> ConsensusSuccess blk -> String -> String Show -data ConsensusFailure blk = ConsensusFailure +data ConsensusFailure blk = ConsensusFailure -- Tip of two peer's chains that do not intersect within K blocks - (PeerId, Tip (Header blk)) - (PeerId, Tip (Header blk)) + (PeerId, Tip (Header blk)) + (PeerId, Tip (Header blk)) -- The intersection point of two chains - (Anchor (Header blk)) + (Anchor (Header blk)) SecurityParam - deriving Int -> ConsensusFailure blk -> String -> String + deriving Int -> ConsensusFailure blk -> String -> String [ConsensusFailure blk] -> String -> String ConsensusFailure blk -> String (Int -> ConsensusFailure blk -> String -> String) @@ -307,18 +307,18 @@ Int -> ConsensusFailure blk -> String -> String Show -instance HasHeader blk => Exception (ConsensusFailure blk) where - displayException :: ConsensusFailure blk -> String -displayException (ConsensusFailure (SocketPath -peerid1, Tip (Header blk) -tip1) - (SocketPath -peerid2, Tip (Header blk) -tip2) - Anchor (Header blk) -intersection - (SecurityParam Word64 -securityParam)) = +instance HasHeader blk => Exception (ConsensusFailure blk) where + displayException :: ConsensusFailure blk -> String +displayException (ConsensusFailure (SocketPath +peerid1, Tip (Header blk) +tip1) + (SocketPath +peerid2, Tip (Header blk) +tip2) + Anchor (Header blk) +intersection + (SecurityParam Word64 +securityParam)) = [String] -> String forall (t :: * -> *) a. Foldable t => t [a] -> [a] concat @@ -328,56 +328,56 @@ "node at ", SocketPath -> String forall a. Show a => a -> String show SocketPath -peerid1, String +peerid1, String " has chain tip ", Tip (Header blk) -> String forall a. Show a => a -> String show Tip (Header blk) -tip1, String +tip1, String "\n" , String "node at ", SocketPath -> String forall a. Show a => a -> String show SocketPath -peerid2, String +peerid2, String " has chain tip ", Tip (Header blk) -> String forall a. Show a => a -> String show Tip (Header blk) -tip2, String +tip2, String "\n" , String "but their chain intersection is at ", Anchor (Header blk) -> String forall a. Show a => a -> String show Anchor (Header blk) -intersection, String +intersection, String "\n" , String "which is further back than the security param K ", Word64 -> String forall a. Show a => a -> String show Word64 -securityParam +securityParam ] -- | For this test we define consensus as follows: for all pairs of chains, -- the intersection of each pair is within K blocks of each tip. -consensusCondition - :: HasHeader (Header blk) +consensusCondition + :: HasHeader (Header blk) => SecurityParam - -> ChainsSnapshot blk - -> Either (ConsensusFailure blk) (ConsensusSuccess blk) + -> ChainsSnapshot blk + -> Either (ConsensusFailure blk) (ConsensusSuccess blk) consensusCondition :: SecurityParam -> ChainsSnapshot blk -> Either (ConsensusFailure blk) (ConsensusSuccess blk) -consensusCondition (SecurityParam Word64 -securityParam) ChainsSnapshot blk -chains = +consensusCondition (SecurityParam Word64 +securityParam) ChainsSnapshot blk +chains = -- The (forkTooLong . chainForkPoints) predicate is not transitive. -- As a consequence, we need to check it between all the pairs of chains: - let forks :: [((SocketPath, SocketPath), + let forks :: [((SocketPath, SocketPath), (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)))] -forks = +forks = [ ((SocketPath -peerid1, SocketPath -peerid2), AnchoredFragment (Header blk) +peerid1, SocketPath +peerid2), AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)) forall blk. @@ -385,21 +385,21 @@ AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)) -chainForkPoints AnchoredFragment (Header blk) -chain1 AnchoredFragment (Header blk) -chain2) - | (SocketPath -peerid1, AnchoredFragment (Header blk) -chain1) <- ChainsSnapshot blk -> [(SocketPath, AnchoredFragment (Header blk))] +chainForkPoints AnchoredFragment (Header blk) +chain1 AnchoredFragment (Header blk) +chain2) + | (SocketPath +peerid1, AnchoredFragment (Header blk) +chain1) <- ChainsSnapshot blk -> [(SocketPath, AnchoredFragment (Header blk))] forall k a. Map k a -> [(k, a)] Map.toList ChainsSnapshot blk -chains - , (SocketPath -peerid2, AnchoredFragment (Header blk) -chain2) <- ChainsSnapshot blk -> [(SocketPath, AnchoredFragment (Header blk))] +chains + , (SocketPath +peerid2, AnchoredFragment (Header blk) +chain2) <- ChainsSnapshot blk -> [(SocketPath, AnchoredFragment (Header blk))] forall k a. Map k a -> [(k, a)] Map.toList ChainsSnapshot blk -chains +chains ] in case (((SocketPath, SocketPath), (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk))) @@ -415,7 +415,7 @@ forall blk. (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)) -> Bool -forkTooLong ((Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)) +forkTooLong ((Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)) -> Bool) -> (((SocketPath, SocketPath), (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk))) @@ -432,13 +432,13 @@ forall a b. (a, b) -> b snd) [((SocketPath, SocketPath), (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)))] -forks of - Just ((SocketPath -peerid1, SocketPath -peerid2), (Anchor (Header blk) -intersection, Anchor (Header blk) -tip1, Anchor (Header blk) -tip2)) -> +forks of + Just ((SocketPath +peerid1, SocketPath +peerid2), (Anchor (Header blk) +intersection, Anchor (Header blk) +tip1, Anchor (Header blk) +tip2)) -> ConsensusFailure blk -> Either (ConsensusFailure blk) (ConsensusSuccess blk) forall a b. a -> Either a b @@ -461,20 +461,20 @@ -> ConsensusFailure blk ConsensusFailure (SocketPath -peerid1, Anchor (Header blk) -> Tip (Header blk) +peerid1, Anchor (Header blk) -> Tip (Header blk) forall a b. (HeaderHash a ~ HeaderHash b) => Anchor a -> Tip b AF.anchorToTip Anchor (Header blk) -tip1) +tip1) (SocketPath -peerid2, Anchor (Header blk) -> Tip (Header blk) +peerid2, Anchor (Header blk) -> Tip (Header blk) forall a b. (HeaderHash a ~ HeaderHash b) => Anchor a -> Tip b AF.anchorToTip Anchor (Header blk) -tip2) +tip2) Anchor (Header blk) -intersection +intersection (Word64 -> SecurityParam SecurityParam Word64 -securityParam) +securityParam) Maybe ((SocketPath, SocketPath), (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk))) @@ -507,42 +507,42 @@ forall block. Anchor block -> WithOrigin BlockNo AF.anchorToBlockNo) [ Anchor (Header blk) -intersection | ((SocketPath, SocketPath) -_,(Anchor (Header blk) -intersection,Anchor (Header blk) +intersection | ((SocketPath, SocketPath) +_,(Anchor (Header blk) +intersection,Anchor (Header blk) _,Anchor (Header blk) _)) <- [((SocketPath, SocketPath), (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)))] -forks ]) +forks ]) -- all the chain tips: [ (SocketPath -peerid, Anchor (Header blk) -> Tip (Header blk) +peerid, Anchor (Header blk) -> Tip (Header blk) forall a b. (HeaderHash a ~ HeaderHash b) => Anchor a -> Tip b AF.anchorToTip (AnchoredFragment (Header blk) -> Anchor (Header blk) forall v a b. Anchorable v a b => AnchoredSeq v a b -> a AF.headAnchor AnchoredFragment (Header blk) -chain)) - | (SocketPath -peerid, AnchoredFragment (Header blk) -chain) <- ChainsSnapshot blk -> [(SocketPath, AnchoredFragment (Header blk))] +chain)) + | (SocketPath +peerid, AnchoredFragment (Header blk) +chain) <- ChainsSnapshot blk -> [(SocketPath, AnchoredFragment (Header blk))] forall k a. Map k a -> [(k, a)] Map.toList ChainsSnapshot blk -chains ] +chains ] where - chainForkPoints - :: HasHeader (Header blk) - => AnchoredFragment (Header blk) - -> AnchoredFragment (Header blk) - -> ( Anchor (Header blk) -- intersection - , Anchor (Header blk) -- tip of c1 - , Anchor (Header blk) -- tip of c2 + chainForkPoints + :: HasHeader (Header blk) + => AnchoredFragment (Header blk) + -> AnchoredFragment (Header blk) + -> ( Anchor (Header blk) -- intersection + , Anchor (Header blk) -- tip of c1 + , Anchor (Header blk) -- tip of c2 ) - chainForkPoints :: AnchoredFragment (Header blk) + chainForkPoints :: AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)) -chainForkPoints AnchoredFragment (Header blk) -chain1 AnchoredFragment (Header blk) -chain2 = +chainForkPoints AnchoredFragment (Header blk) +chain1 AnchoredFragment (Header blk) +chain2 = case AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> Maybe @@ -557,8 +557,8 @@ (AnchoredFragment block1, AnchoredFragment block2, AnchoredFragment block1, AnchoredFragment block2) AF.intersect AnchoredFragment (Header blk) -chain1 AnchoredFragment (Header blk) -chain2 of +chain1 AnchoredFragment (Header blk) +chain2 of -- chains are anochored at the genesis, so their intersection is never -- empty Maybe @@ -572,58 +572,58 @@ Just (AnchoredFragment (Header blk) _, AnchoredFragment (Header blk) -_, AnchoredFragment (Header blk) -extension1, AnchoredFragment (Header blk) -extension2) -> +_, AnchoredFragment (Header blk) +extension1, AnchoredFragment (Header blk) +extension2) -> ( AnchoredFragment (Header blk) -> Anchor (Header blk) forall v a b. AnchoredSeq v a b -> a AF.anchor AnchoredFragment (Header blk) -extension1 +extension1 , AnchoredFragment (Header blk) -> Anchor (Header blk) forall v a b. Anchorable v a b => AnchoredSeq v a b -> a AF.headAnchor AnchoredFragment (Header blk) -extension1 +extension1 , AnchoredFragment (Header blk) -> Anchor (Header blk) forall v a b. Anchorable v a b => AnchoredSeq v a b -> a AF.headAnchor AnchoredFragment (Header blk) -extension2 +extension2 ) - forkTooLong - :: ( Anchor (Header blk) -- intersection - , Anchor (Header blk) -- tip of chain1 - , Anchor (Header blk) -- tip of chain2 + forkTooLong + :: ( Anchor (Header blk) -- intersection + , Anchor (Header blk) -- tip of chain1 + , Anchor (Header blk) -- tip of chain2 ) -> Bool - forkTooLong :: (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)) + forkTooLong :: (Anchor (Header blk), Anchor (Header blk), Anchor (Header blk)) -> Bool -forkTooLong (Anchor (Header blk) -intersection, Anchor (Header blk) -tip1, Anchor (Header blk) -tip2) = +forkTooLong (Anchor (Header blk) +intersection, Anchor (Header blk) +tip1, Anchor (Header blk) +tip2) = -- If only one of len1, len2 is longer than the securityParam then it is -- still OK. That node can still recover by receiving a valid rollback -- instruction, but if both are longer, then we have a failure. Anchor (Header blk) -> Word64 forall blk. Anchor (Header blk) -> Word64 -forkLen Anchor (Header blk) -tip1 Word64 -> Word64 -> Bool +forkLen Anchor (Header blk) +tip1 Word64 -> Word64 -> Bool forall a. Ord a => a -> a -> Bool > Word64 -securityParam Bool -> Bool -> Bool +securityParam Bool -> Bool -> Bool && Anchor (Header blk) -> Word64 forall blk. Anchor (Header blk) -> Word64 -forkLen Anchor (Header blk) -tip2 Word64 -> Word64 -> Bool +forkLen Anchor (Header blk) +tip2 Word64 -> Word64 -> Bool forall a. Ord a => a -> a -> Bool > Word64 -securityParam +securityParam where - forkLen :: Anchor (Header blk) -> Word64 - forkLen :: Anchor (Header blk) -> Word64 -forkLen Anchor (Header blk) -tip = + forkLen :: Anchor (Header blk) -> Word64 + forkLen :: Anchor (Header blk) -> Word64 +forkLen Anchor (Header blk) +tip = BlockNo -> Word64 Block.unBlockNo (BlockNo -> Word64) -> BlockNo -> Word64 forall a b. (a -> b) -> a -> b @@ -634,7 +634,7 @@ 0 (Anchor (Header blk) -> WithOrigin BlockNo forall block. Anchor block -> WithOrigin BlockNo AF.anchorToBlockNo Anchor (Header blk) -tip) +tip) BlockNo -> BlockNo -> BlockNo forall a. Num a => a -> a -> a - BlockNo -> WithOrigin BlockNo -> BlockNo @@ -643,10 +643,10 @@ 0 (Anchor (Header blk) -> WithOrigin BlockNo forall block. Anchor block -> WithOrigin BlockNo AF.anchorToBlockNo Anchor (Header blk) -intersection) +intersection) newtype ProgressSuccess = ProgressSuccess BlockNo - deriving Int -> ProgressSuccess -> String -> String + deriving Int -> ProgressSuccess -> String -> String [ProgressSuccess] -> String -> String ProgressSuccess -> String (Int -> ProgressSuccess -> String -> String) @@ -664,12 +664,12 @@ $cshowsPrec :: Int -> ProgressSuccess -> String -> String Show -data ProgressFailure blk = +data ProgressFailure blk = ProgressFailure BlockNo -- minimum expected PeerId - (Tip (Header blk)) - deriving Int -> ProgressFailure blk -> String -> String + (Tip (Header blk)) + deriving Int -> ProgressFailure blk -> String -> String [ProgressFailure blk] -> String -> String ProgressFailure blk -> String (Int -> ProgressFailure blk -> String -> String) @@ -698,12 +698,12 @@ Int -> ProgressFailure blk -> String -> String Show -instance HasHeader blk => Exception (ProgressFailure blk) where - displayException :: ProgressFailure blk -> String -displayException (ProgressFailure BlockNo -minBlockNo SocketPath -peerid Tip (Header blk) -tip) = +instance HasHeader blk => Exception (ProgressFailure blk) where + displayException :: ProgressFailure blk -> String +displayException (ProgressFailure BlockNo +minBlockNo SocketPath +peerid Tip (Header blk) +tip) = [String] -> String forall (t :: * -> *) a. Foldable t => t [a] -> [a] concat @@ -713,70 +713,70 @@ "the node at ", SocketPath -> String forall a. Show a => a -> String show SocketPath -peerid, String +peerid, String " has chain tip ", Tip (Header blk) -> String forall a. Show a => a -> String show Tip (Header blk) -tip, String +tip, String "\n" , String "while the mininum expected block number is ", BlockNo -> String forall a. Show a => a -> String show BlockNo -minBlockNo +minBlockNo ] -- | Progress is defined as each chain being at least of a certain length. -- -progressCondition :: BlockNo - -> ConsensusSuccess blk - -> Either (ProgressFailure blk) ProgressSuccess +progressCondition :: BlockNo + -> ConsensusSuccess blk + -> Either (ProgressFailure blk) ProgressSuccess progressCondition :: BlockNo -> ConsensusSuccess blk -> Either (ProgressFailure blk) ProgressSuccess -progressCondition BlockNo -minBlockNo (ConsensusSuccess Anchor (Header blk) -_ [(SocketPath, Tip (Header blk))] -tips) = +progressCondition BlockNo +minBlockNo (ConsensusSuccess Anchor (Header blk) +_ [(SocketPath, Tip (Header blk))] +tips) = case ((SocketPath, Tip (Header blk)) -> Bool) -> [(SocketPath, Tip (Header blk))] -> Maybe (SocketPath, Tip (Header blk)) forall (t :: * -> *) a. Foldable t => (a -> Bool) -> t a -> Maybe a find (\(SocketPath -_, Tip (Header blk) -tip) -> Tip (Header blk) -> WithOrigin BlockNo +_, Tip (Header blk) +tip) -> Tip (Header blk) -> WithOrigin BlockNo forall b. Tip b -> WithOrigin BlockNo Block.getTipBlockNo Tip (Header blk) -tip WithOrigin BlockNo -> WithOrigin BlockNo -> Bool +tip WithOrigin BlockNo -> WithOrigin BlockNo -> Bool forall a. Ord a => a -> a -> Bool < BlockNo -> WithOrigin BlockNo forall t. t -> WithOrigin t At BlockNo -minBlockNo) [(SocketPath, Tip (Header blk))] -tips of - Just (SocketPath -peerid, Tip (Header blk) -tip) -> ProgressFailure blk -> Either (ProgressFailure blk) ProgressSuccess +minBlockNo) [(SocketPath, Tip (Header blk))] +tips of + Just (SocketPath +peerid, Tip (Header blk) +tip) -> ProgressFailure blk -> Either (ProgressFailure blk) ProgressSuccess forall a b. a -> Either a b Left (BlockNo -> SocketPath -> Tip (Header blk) -> ProgressFailure blk forall blk. BlockNo -> SocketPath -> Tip (Header blk) -> ProgressFailure blk ProgressFailure BlockNo -minBlockNo SocketPath -peerid Tip (Header blk) -tip) +minBlockNo SocketPath +peerid Tip (Header blk) +tip) Maybe (SocketPath, Tip (Header blk)) Nothing -> ProgressSuccess -> Either (ProgressFailure blk) ProgressSuccess forall a b. b -> Either a b Right (BlockNo -> ProgressSuccess ProgressSuccess BlockNo -minBlockNo) +minBlockNo) -runChairman - :: RunNode blk +runChairman + :: RunNode blk => Tracer IO String - -> CodecConfig blk + -> CodecConfig blk -> NetworkMagic -> SecurityParam -- ^ Security parameter, if a fork is deeper than it 'runChairman' @@ -785,7 +785,7 @@ -- ^ Run for this much time. -> [SocketPath] -- ^ Local socket directory - -> IO (ChainsSnapshot blk) + -> IO (ChainsSnapshot blk) runChairman :: Tracer IO String -> CodecConfig blk -> NetworkMagic @@ -793,36 +793,36 @@ -> DiffTime -> [SocketPath] -> IO (ChainsSnapshot blk) -runChairman Tracer IO String -tracer CodecConfig blk -cfg NetworkMagic -networkMagic SecurityParam -securityParam DiffTime -runningTime [SocketPath] -socketPaths = do - let initialChains :: ChainsSnapshot blk -initialChains = [(SocketPath, +runChairman Tracer IO String +tracer CodecConfig blk +cfg NetworkMagic +networkMagic SecurityParam +securityParam DiffTime +runningTime [SocketPath] +socketPaths = do + let initialChains :: ChainsSnapshot blk +initialChains = [(SocketPath, AnchoredSeq (WithOrigin SlotNo) (Anchor (Header blk)) (Header blk))] -> ChainsSnapshot blk forall k a. Ord k => [(k, a)] -> Map k a Map.fromList [ (SocketPath -socketPath, Anchor (Header blk) +socketPath, Anchor (Header blk) -> AnchoredSeq (WithOrigin SlotNo) (Anchor (Header blk)) (Header blk) forall v a b. Anchorable v a b => a -> AnchoredSeq v a b AF.Empty Anchor (Header blk) forall block. Anchor block AF.AnchorGenesis) - | SocketPath -socketPath <- [SocketPath] -socketPaths] - StrictTVar IO (ChainsSnapshot blk) -chainsVar <- ChainsSnapshot blk -> IO (StrictTVar IO (ChainsSnapshot blk)) + | SocketPath +socketPath <- [SocketPath] +socketPaths] + StrictTVar IO (ChainsSnapshot blk) +chainsVar <- ChainsSnapshot blk -> IO (StrictTVar IO (ChainsSnapshot blk)) forall (m :: * -> *) a. MonadSTM m => a -> m (StrictTVar m a) newTVarIO ChainsSnapshot blk -initialChains +initialChains IO (Maybe ()) -> IO () forall (f :: * -> *) a. Functor f => f a -> f () @@ -833,24 +833,24 @@ MonadTimer m => DiffTime -> m a -> m (Maybe a) timeout DiffTime -runningTime (IO () -> IO (Maybe ())) -> IO () -> IO (Maybe ()) +runningTime (IO () -> IO (Maybe ())) -> IO () -> IO (Maybe ()) forall a b. (a -> b) -> a -> b $ (IOManager -> IO ()) -> IO () WithIOManager withIOManager ((IOManager -> IO ()) -> IO ()) -> (IOManager -> IO ()) -> IO () forall a b. (a -> b) -> a -> b -$ \IOManager -iomgr -> +$ \IOManager +iomgr -> [SocketPath] -> (SocketPath -> IO ()) -> IO () forall (f :: * -> *) (m :: * -> *) a b. (Foldable f, MonadAsync m) => f a -> (a -> m b) -> m () forConcurrently_ [SocketPath] -socketPaths ((SocketPath -> IO ()) -> IO ()) -> (SocketPath -> IO ()) -> IO () +socketPaths ((SocketPath -> IO ()) -> IO ()) -> (SocketPath -> IO ()) -> IO () forall a b. (a -> b) -> a -> b -$ \SocketPath -sockPath -> +$ \SocketPath +sockPath -> Tracer IO String -> IOManager -> CodecConfig blk @@ -871,19 +871,19 @@ -> IO () createConnection Tracer IO String -tracer +tracer IOManager -iomgr +iomgr CodecConfig blk -cfg +cfg NetworkMagic -networkMagic +networkMagic SocketPath -sockPath +sockPath StrictTVar IO (ChainsSnapshot blk) -chainsVar +chainsVar SecurityParam -securityParam +securityParam STM IO (ChainsSnapshot blk) -> IO (ChainsSnapshot blk) forall (m :: * -> *) a. @@ -892,30 +892,30 @@ atomically (StrictTVar IO (ChainsSnapshot blk) -> STM IO (ChainsSnapshot blk) forall (m :: * -> *) a. MonadSTM m => StrictTVar m a -> STM m a readTVar StrictTVar IO (ChainsSnapshot blk) -chainsVar) +chainsVar) -- catch 'MuxError'; it will be thrown if a node shuts down closing the -- connection. -handleMuxError +handleMuxError :: Tracer IO String - -> ChainsVar IO blk + -> ChainsVar IO blk -> SocketPath -> MuxError -> IO () handleMuxError :: Tracer IO String -> ChainsVar IO blk -> SocketPath -> MuxError -> IO () -handleMuxError Tracer IO String -tracer ChainsVar IO blk -chainsVar SocketPath -socketPath MuxError -err = do +handleMuxError Tracer IO String +tracer ChainsVar IO blk +chainsVar SocketPath +socketPath MuxError +err = do Tracer IO String -> String -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO String -tracer (MuxError -> String +tracer (MuxError -> String forall a. Show a => a -> String show MuxError -err) +err) STM IO () -> IO () forall (m :: * -> *) a. (MonadSTM m, HasCallStack) => @@ -930,22 +930,22 @@ MonadSTM m => StrictTVar m a -> (a -> a) -> STM m () modifyTVar ChainsVar IO blk -chainsVar (SocketPath +chainsVar (SocketPath -> Map SocketPath (AnchoredFragment (Header blk)) -> Map SocketPath (AnchoredFragment (Header blk)) forall k a. Ord k => k -> Map k a -> Map k a Map.delete SocketPath -socketPath) +socketPath) createConnection - :: forall blk. - RunNode blk + :: forall blk. + RunNode blk => Tracer IO String -> IOManager - -> CodecConfig blk + -> CodecConfig blk -> NetworkMagic -> SocketPath - -> ChainsVar IO blk + -> ChainsVar IO blk -> SecurityParam -> IO () createConnection :: Tracer IO String @@ -957,21 +957,21 @@ -> SecurityParam -> IO () createConnection - Tracer IO String -tracer - IOManager -iomgr - CodecConfig blk -cfg - NetworkMagic -networkMagic - socketPath :: SocketPath -socketPath@(SocketPath String -path) - ChainsVar IO blk -chainsVar - SecurityParam -securityParam = + Tracer IO String +tracer + IOManager +iomgr + CodecConfig blk +cfg + NetworkMagic +networkMagic + socketPath :: SocketPath +socketPath@(SocketPath String +path) + ChainsVar IO blk +chainsVar + SecurityParam +securityParam = LocalSnocket -> NetworkConnectTracers LocalAddress NodeToClientVersion -> Versions @@ -994,8 +994,8 @@ connectTo (IOManager -> String -> LocalSnocket localSnocket IOManager -iomgr String -path) +iomgr String +path) NetworkConnectTracers :: forall addr vNumber. Tracer IO (WithMuxBearer (ConnectionId addr) MuxTrace) -> Tracer @@ -1056,7 +1056,7 @@ (Tracer IO String -> Tracer IO (ChairmanTrace blk) forall a (m :: * -> *). Show a => Tracer m String -> Tracer m a showTracing Tracer IO String -tracer) +tracer) Tracer IO (TraceSendRecv (ChainSync blk (Point blk) (Tip blk))) forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer @@ -1065,17 +1065,17 @@ forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer CodecConfig blk -cfg +cfg NetworkMagic -networkMagic +networkMagic SocketPath -socketPath +socketPath ChainsVar IO blk -chainsVar +chainsVar SecurityParam -securityParam) +securityParam) String -path +path IO () -> (MuxError -> IO ()) -> IO () forall (m :: * -> *) e a. (MonadCatch m, Exception e) => @@ -1086,31 +1086,31 @@ Tracer IO String -> ChainsVar IO blk -> SocketPath -> MuxError -> IO () handleMuxError Tracer IO String -tracer ChainsVar IO blk -chainsVar SocketPath -socketPath +tracer ChainsVar IO blk +chainsVar SocketPath +socketPath -- Shared State, and its API. -- | Shared state between chain-sync clients. Each chain-sync client will write to the -- corresponding entry. -type ChainsVar m blk = StrictTVar m (Map SocketPath (AnchoredFragment (Header blk))) +type ChainsVar m blk = StrictTVar m (Map SocketPath (AnchoredFragment (Header blk))) -- | Add a single block to the chain. addBlock - :: forall blk m. - ( MonadSTM m - , GetHeader blk + :: forall blk m. + ( MonadSTM m + , GetHeader blk ) => SocketPath - -> ChainsVar m blk - -> blk - -> STM m () + -> ChainsVar m blk + -> blk + -> STM m () addBlock :: SocketPath -> ChainsVar m blk -> blk -> STM m () -addBlock SocketPath -sockPath ChainsVar m blk -chainsVar blk -blk = +addBlock SocketPath +sockPath ChainsVar m blk +chainsVar blk +blk = ChainsVar m blk -> (Map SocketPath (AnchoredFragment (Header blk)) -> Map SocketPath (AnchoredFragment (Header blk))) @@ -1119,7 +1119,7 @@ MonadSTM m => StrictTVar m a -> (a -> a) -> STM m () modifyTVar ChainsVar m blk -chainsVar ((AnchoredFragment (Header blk) -> AnchoredFragment (Header blk)) +chainsVar ((AnchoredFragment (Header blk) -> AnchoredFragment (Header blk)) -> SocketPath -> Map SocketPath (AnchoredFragment (Header blk)) -> Map SocketPath (AnchoredFragment (Header blk)) @@ -1132,22 +1132,22 @@ AF.addBlock (blk -> Header blk forall blk. GetHeader blk => blk -> Header blk getHeader blk -blk)) SocketPath -sockPath) +blk)) SocketPath +sockPath) -- | Rollback a single block. If the rollback point is not found, we simply -- error. It should never happen if the security parameter is set up correctly. rollback - :: forall blk m. (MonadSTM m, HasHeader (Header blk)) + :: forall blk m. (MonadSTM m, HasHeader (Header blk)) => SocketPath - -> ChainsVar m blk - -> Point blk - -> STM m () + -> ChainsVar m blk + -> Point blk + -> STM m () rollback :: SocketPath -> ChainsVar m blk -> Point blk -> STM m () -rollback SocketPath -sockPath ChainsVar m blk -chainsVar Point blk -p = ChainsVar m blk +rollback SocketPath +sockPath ChainsVar m blk +chainsVar Point blk +p = ChainsVar m blk -> (Map SocketPath (AnchoredFragment (Header blk)) -> Map SocketPath (AnchoredFragment (Header blk))) -> STM m () @@ -1155,25 +1155,25 @@ MonadSTM m => StrictTVar m a -> (a -> a) -> STM m () modifyTVar ChainsVar m blk -chainsVar ((AnchoredFragment (Header blk) -> AnchoredFragment (Header blk)) +chainsVar ((AnchoredFragment (Header blk) -> AnchoredFragment (Header blk)) -> SocketPath -> Map SocketPath (AnchoredFragment (Header blk)) -> Map SocketPath (AnchoredFragment (Header blk)) forall k a. Ord k => (a -> a) -> k -> Map k a -> Map k a Map.adjust AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -fn SocketPath -sockPath) +fn SocketPath +sockPath) where - p' :: Point (Header blk) - p' :: Point (Header blk) -p' = Point blk -> Point (Header blk) + p' :: Point (Header blk) + p' :: Point (Header blk) +p' = Point blk -> Point (Header blk) coerce Point blk -p +p - fn :: AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) - fn :: AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -fn AnchoredFragment (Header blk) -cf = case Point (Header blk) + fn :: AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) + fn :: AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) +fn AnchoredFragment (Header blk) +cf = case Point (Header blk) -> AnchoredFragment (Header blk) -> Maybe (AnchoredFragment (Header blk)) forall block. @@ -1181,45 +1181,45 @@ Point block -> AnchoredFragment block -> Maybe (AnchoredFragment block) AF.rollback Point (Header blk) -p' AnchoredFragment (Header blk) -cf of +p' AnchoredFragment (Header blk) +cf of Maybe (AnchoredFragment (Header blk)) Nothing -> String -> AnchoredFragment (Header blk) forall a. HasCallStack => String -> a error String "rollback error: rollback beyond chain fragment" - Just AnchoredFragment (Header blk) -cf' -> AnchoredFragment (Header blk) -cf' + Just AnchoredFragment (Header blk) +cf' -> AnchoredFragment (Header blk) +cf' -- Chain-Sync client -type ChairmanTrace blk = ConsensusSuccess blk +type ChairmanTrace blk = ConsensusSuccess blk -- | 'ChainSyncClient' which build chain fragment; on every roll forward it will -- check if there is consensus on immutable chain. chainSyncClient - :: forall blk m. - ( MonadSTM m - , MonadThrow (STM m) - , MonadAsync m - , GetHeader blk - , HasHeader blk + :: forall blk m. + ( MonadSTM m + , MonadThrow (STM m) + , MonadAsync m + , GetHeader blk + , HasHeader blk ) - => Tracer m (ChairmanTrace blk) + => Tracer m (ChairmanTrace blk) -> SocketPath - -> ChainsVar m blk + -> ChainsVar m blk -> SecurityParam - -> ChainSyncClient blk (Point blk) (Tip blk) m () + -> ChainSyncClient blk (Point blk) (Tip blk) m () chainSyncClient :: Tracer m (ChairmanTrace blk) -> SocketPath -> ChainsVar m blk -> SecurityParam -> ChainSyncClient blk (Point blk) (Tip blk) m () -chainSyncClient Tracer m (ChairmanTrace blk) -tracer SocketPath -sockPath ChainsVar m blk -chainsVar SecurityParam -securityParam = m (ClientStIdle blk (Point blk) (Tip blk) m ()) +chainSyncClient Tracer m (ChairmanTrace blk) +tracer SocketPath +sockPath ChainsVar m blk +chainsVar SecurityParam +securityParam = m (ClientStIdle blk (Point blk) (Tip blk) m ()) -> ChainSyncClient blk (Point blk) (Tip blk) m () forall header point tip (m :: * -> *) a. m (ClientStIdle header point tip m a) @@ -1260,7 +1260,7 @@ ClientStIntersect { recvMsgIntersectFound :: Point blk -> Tip blk -> ChainSyncClient blk (Point blk) (Tip blk) m () -recvMsgIntersectFound = \Point blk +recvMsgIntersectFound = \Point blk _ Tip blk _ -> m (ClientStIdle blk (Point blk) (Tip blk) m ()) -> ChainSyncClient blk (Point blk) (Tip blk) m () @@ -1271,9 +1271,9 @@ -> m (ClientStIdle blk (Point blk) (Tip blk) m ()) forall (f :: * -> *) a. Applicative f => a -> f a pure ClientStIdle blk (Point blk) (Tip blk) m () -clientStIdle) +clientStIdle) , recvMsgIntersectNotFound :: Tip blk -> ChainSyncClient blk (Point blk) (Tip blk) m () -recvMsgIntersectNotFound = \ Tip blk +recvMsgIntersectNotFound = \ Tip blk _ -> m (ClientStIdle blk (Point blk) (Tip blk) m ()) -> ChainSyncClient blk (Point blk) (Tip blk) m () forall header point tip (m :: * -> *) a. @@ -1283,12 +1283,12 @@ -> m (ClientStIdle blk (Point blk) (Tip blk) m ()) forall (f :: * -> *) a. Applicative f => a -> f a pure ClientStIdle blk (Point blk) (Tip blk) m () -clientStIdle) +clientStIdle) } where - clientStIdle :: ClientStIdle blk (Point blk) (Tip blk) m () - clientStIdle :: ClientStIdle blk (Point blk) (Tip blk) m () -clientStIdle = ClientStNext blk (Point blk) (Tip blk) m () + clientStIdle :: ClientStIdle blk (Point blk) (Tip blk) m () + clientStIdle :: ClientStIdle blk (Point blk) (Tip blk) m () +clientStIdle = ClientStNext blk (Point blk) (Tip blk) m () -> m (ClientStNext blk (Point blk) (Tip blk) m ()) -> ClientStIdle blk (Point blk) (Tip blk) m () forall header point tip (m :: * -> *) a. @@ -1296,23 +1296,23 @@ -> m (ClientStNext header point tip m a) -> ClientStIdle header point tip m a SendMsgRequestNext ClientStNext blk (Point blk) (Tip blk) m () -clientStNext (ClientStNext blk (Point blk) (Tip blk) m () +clientStNext (ClientStNext blk (Point blk) (Tip blk) m () -> m (ClientStNext blk (Point blk) (Tip blk) m ()) forall (f :: * -> *) a. Applicative f => a -> f a pure ClientStNext blk (Point blk) (Tip blk) m () -clientStNext) +clientStNext) - clientStNext :: ClientStNext blk (Point blk) (Tip blk) m () - clientStNext :: ClientStNext blk (Point blk) (Tip blk) m () -clientStNext = ClientStNext :: forall header point tip (m :: * -> *) a. + clientStNext :: ClientStNext blk (Point blk) (Tip blk) m () + clientStNext :: ClientStNext blk (Point blk) (Tip blk) m () +clientStNext = ClientStNext :: forall header point tip (m :: * -> *) a. (header -> tip -> ChainSyncClient header point tip m a) -> (point -> tip -> ChainSyncClient header point tip m a) -> ClientStNext header point tip m a ClientStNext { recvMsgRollForward :: blk -> Tip blk -> ChainSyncClient blk (Point blk) (Tip blk) m () -recvMsgRollForward = \blk -blk Tip blk -_tip -> m (ClientStIdle blk (Point blk) (Tip blk) m ()) +recvMsgRollForward = \blk +blk Tip blk +_tip -> m (ClientStIdle blk (Point blk) (Tip blk) m ()) -> ChainSyncClient blk (Point blk) (Tip blk) m () forall header point tip (m :: * -> *) a. m (ClientStIdle header point tip m a) @@ -1325,8 +1325,8 @@ $ do -- add block & check if there is consensus on immutable chain -- trace the decision or error - ChairmanTrace blk -res <- STM m (ChairmanTrace blk) -> m (ChairmanTrace blk) + ChairmanTrace blk +res <- STM m (ChairmanTrace blk) -> m (ChairmanTrace blk) forall (m :: * -> *) a. (MonadSTM m, HasCallStack) => STM m a -> m a @@ -1339,32 +1339,32 @@ (MonadSTM m, GetHeader blk) => SocketPath -> ChainsVar m blk -> blk -> STM m () addBlock SocketPath -sockPath ChainsVar m blk -chainsVar blk -blk +sockPath ChainsVar m blk +chainsVar blk +blk ChainsVar m blk -> SecurityParam -> STM m (ChairmanTrace blk) forall blk (m :: * -> *). (MonadSTM m, MonadThrow (STM m), HasHeader blk, HasHeader (Header blk)) => ChainsVar m blk -> SecurityParam -> STM m (ConsensusSuccess blk) checkConsensus ChainsVar m blk -chainsVar SecurityParam -securityParam +chainsVar SecurityParam +securityParam Tracer m (ChairmanTrace blk) -> ChairmanTrace blk -> m () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer m (ChairmanTrace blk) -tracer ChairmanTrace blk -res +tracer ChairmanTrace blk +res ClientStIdle blk (Point blk) (Tip blk) m () -> m (ClientStIdle blk (Point blk) (Tip blk) m ()) forall (f :: * -> *) a. Applicative f => a -> f a pure ClientStIdle blk (Point blk) (Tip blk) m () -clientStIdle +clientStIdle , recvMsgRollBackward :: Point blk -> Tip blk -> ChainSyncClient blk (Point blk) (Tip blk) m () -recvMsgRollBackward = \Point blk -point Tip blk -_tip -> m (ClientStIdle blk (Point blk) (Tip blk) m ()) +recvMsgRollBackward = \Point blk +point Tip blk +_tip -> m (ClientStIdle blk (Point blk) (Tip blk) m ()) -> ChainSyncClient blk (Point blk) (Tip blk) m () forall header point tip (m :: * -> *) a. m (ClientStIdle header point tip m a) @@ -1376,8 +1376,8 @@ forall a b. (a -> b) -> a -> b $ do -- rollback & check - ChairmanTrace blk -res <- STM m (ChairmanTrace blk) -> m (ChairmanTrace blk) + ChairmanTrace blk +res <- STM m (ChairmanTrace blk) -> m (ChairmanTrace blk) forall (m :: * -> *) a. (MonadSTM m, HasCallStack) => STM m a -> m a @@ -1390,49 +1390,49 @@ (MonadSTM m, HasHeader (Header blk)) => SocketPath -> ChainsVar m blk -> Point blk -> STM m () rollback SocketPath -sockPath ChainsVar m blk -chainsVar Point blk -point +sockPath ChainsVar m blk +chainsVar Point blk +point ChainsVar m blk -> SecurityParam -> STM m (ChairmanTrace blk) forall blk (m :: * -> *). (MonadSTM m, MonadThrow (STM m), HasHeader blk, HasHeader (Header blk)) => ChainsVar m blk -> SecurityParam -> STM m (ConsensusSuccess blk) checkConsensus ChainsVar m blk -chainsVar SecurityParam -securityParam +chainsVar SecurityParam +securityParam Tracer m (ChairmanTrace blk) -> ChairmanTrace blk -> m () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer m (ChairmanTrace blk) -tracer ChairmanTrace blk -res +tracer ChairmanTrace blk +res ClientStIdle blk (Point blk) (Tip blk) m () -> m (ClientStIdle blk (Point blk) (Tip blk) m ()) forall (f :: * -> *) a. Applicative f => a -> f a pure ClientStIdle blk (Point blk) (Tip blk) m () -clientStIdle +clientStIdle } -- | Check that all nodes agree with each other, within the security parameter. checkConsensus - :: forall blk m. - ( MonadSTM m - , MonadThrow (STM m) - , HasHeader blk - , HasHeader (Header blk) + :: forall blk m. + ( MonadSTM m + , MonadThrow (STM m) + , HasHeader blk + , HasHeader (Header blk) ) - => ChainsVar m blk + => ChainsVar m blk -> SecurityParam - -> STM m (ConsensusSuccess blk) + -> STM m (ConsensusSuccess blk) checkConsensus :: ChainsVar m blk -> SecurityParam -> STM m (ConsensusSuccess blk) -checkConsensus ChainsVar m blk -chainsVar SecurityParam -securityParam = do - ChainsSnapshot blk -chainsSnapshot <- ChainsVar m blk -> STM m (ChainsSnapshot blk) +checkConsensus ChainsVar m blk +chainsVar SecurityParam +securityParam = do + ChainsSnapshot blk +chainsSnapshot <- ChainsVar m blk -> STM m (ChainsSnapshot blk) forall (m :: * -> *) a. MonadSTM m => StrictTVar m a -> STM m a readTVar ChainsVar m blk -chainsVar +chainsVar (ConsensusFailure blk -> STM m (ConsensusSuccess blk)) -> (ConsensusSuccess blk -> STM m (ConsensusSuccess blk)) -> Either (ConsensusFailure blk) (ConsensusSuccess blk) @@ -1456,36 +1456,36 @@ -> ChainsSnapshot blk -> Either (ConsensusFailure blk) (ConsensusSuccess blk) consensusCondition SecurityParam -securityParam ChainsSnapshot blk -chainsSnapshot +securityParam ChainsSnapshot blk +chainsSnapshot -- | Client Application localInitiatorNetworkApplication - :: forall blk m. - ( RunNode blk - , MonadAsync m - , MonadST m - , MonadTimer m - , MonadThrow (STM m) + :: forall blk m. + ( RunNode blk + , MonadAsync m + , MonadST m + , MonadTimer m + , MonadThrow (STM m) ) - => Tracer m (ChairmanTrace blk) - -> Tracer m (TraceSendRecv (ChainSync blk (Point blk) (Tip blk))) + => Tracer m (ChairmanTrace blk) + -> Tracer m (TraceSendRecv (ChainSync blk (Point blk) (Tip blk))) -- ^ tracer which logs all chain-sync messages send and received by the client -- (see 'Ouroboros.Network.Protocol.ChainSync.Type' in 'ouroboros-network' -- package) - -> Tracer m (TraceSendRecv (LocalTxSubmission (GenTx blk) (ApplyTxErr blk))) + -> Tracer m (TraceSendRecv (LocalTxSubmission (GenTx blk) (ApplyTxErr blk))) -- ^ tracer which logs all local tx submission protocol messages send and -- received by the client (see 'Ouroboros.Network.Protocol.LocalTxSubmission.Type' -- in 'ouroboros-network' package). - -> CodecConfig blk + -> CodecConfig blk -> NetworkMagic -> SocketPath - -> ChainsVar m blk + -> ChainsVar m blk -> SecurityParam -> Versions NodeToClientVersion NodeToClientVersionData - (OuroborosApplication InitiatorMode LocalAddress ByteString m () Void) + (OuroborosApplication InitiatorMode LocalAddress ByteString m () Void) localInitiatorNetworkApplication :: Tracer m (ChairmanTrace blk) -> Tracer m (TraceSendRecv (ChainSync blk (Point blk) (Tip blk))) -> Tracer @@ -1501,19 +1501,19 @@ (OuroborosApplication 'InitiatorMode LocalAddress ByteString m () Void) localInitiatorNetworkApplication - Tracer m (ChairmanTrace blk) -chairmanTracer Tracer m (TraceSendRecv (ChainSync blk (Point blk) (Tip blk))) -chainSyncTracer - Tracer + Tracer m (ChairmanTrace blk) +chairmanTracer Tracer m (TraceSendRecv (ChainSync blk (Point blk) (Tip blk))) +chainSyncTracer + Tracer m (TraceSendRecv (LocalTxSubmission (GenTx blk) (ApplyTxErr blk))) -localTxSubmissionTracer - CodecConfig blk -cfg NetworkMagic -networkMagic - SocketPath -sockPath ChainsVar m blk -chainsVar SecurityParam -securityParam = +localTxSubmissionTracer + CodecConfig blk +cfg NetworkMagic +networkMagic + SocketPath +sockPath ChainsVar m blk +chainsVar SecurityParam +securityParam = ((NodeToClientVersion, BlockNodeToClientVersion blk) -> Versions NodeToClientVersion @@ -1530,9 +1530,9 @@ (Ord vNum, Foldable f, HasCallStack) => (x -> Versions vNum extra r) -> f x -> Versions vNum extra r foldMapVersions - (\(NodeToClientVersion -version, BlockNodeToClientVersion blk -blockVersion) -> + (\(NodeToClientVersion +version, BlockNodeToClientVersion blk +blockVersion) -> NodeToClientVersion -> NodeToClientVersionData -> (ConnectionId LocalAddress @@ -1555,17 +1555,17 @@ (OuroborosApplication appType LocalAddress bytes m a b) versionedNodeToClientProtocols NodeToClientVersion -version +version NodeToClientVersionData -versionData +versionData (\ConnectionId LocalAddress _ STM m ControlMessage _ -> BlockNodeToClientVersion blk -> NodeToClientVersion -> NodeToClientProtocols 'InitiatorMode ByteString m () Void -protocols BlockNodeToClientVersion blk -blockVersion NodeToClientVersion -version)) +protocols BlockNodeToClientVersion blk +blockVersion NodeToClientVersion +version)) (Map NodeToClientVersion (BlockNodeToClientVersion blk) -> [(NodeToClientVersion, BlockNodeToClientVersion blk)] forall k a. Map k a -> [(k, a)] @@ -1574,29 +1574,29 @@ SupportedNetworkProtocolVersion blk => Proxy blk -> Map NodeToClientVersion (BlockNodeToClientVersion blk) supportedNodeToClientVersions Proxy blk -proxy)) +proxy)) where - proxy :: Proxy blk - proxy :: Proxy blk -proxy = Proxy blk + proxy :: Proxy blk + proxy :: Proxy blk +proxy = Proxy blk forall k (t :: k). Proxy t Proxy - versionData :: NodeToClientVersionData -versionData = NetworkMagic -> NodeToClientVersionData + versionData :: NodeToClientVersionData +versionData = NetworkMagic -> NodeToClientVersionData NodeToClientVersionData NetworkMagic -networkMagic +networkMagic - protocols - :: BlockNodeToClientVersion blk + protocols + :: BlockNodeToClientVersion blk -> NodeToClientVersion - -> NodeToClientProtocols InitiatorMode ByteString m () Void - protocols :: BlockNodeToClientVersion blk + -> NodeToClientProtocols InitiatorMode ByteString m () Void + protocols :: BlockNodeToClientVersion blk -> NodeToClientVersion -> NodeToClientProtocols 'InitiatorMode ByteString m () Void -protocols BlockNodeToClientVersion blk -byronClientVersion NodeToClientVersion -version = +protocols BlockNodeToClientVersion blk +byronClientVersion NodeToClientVersion +version = NodeToClientProtocols :: forall (appType :: MuxMode) bytes (m :: * -> *) a b. RunMiniProtocol appType bytes m a b -> RunMiniProtocol appType bytes m a b @@ -1634,13 +1634,13 @@ -> MuxPeer bytes m a MuxPeer Tracer m (TraceSendRecv (ChainSync blk (Point blk) (Tip blk))) -chainSyncTracer +chainSyncTracer Codec (ChainSync blk (Point blk) (Tip blk)) DeserialiseFailure m ByteString -cChainSyncCodec +cChainSyncCodec (ChainSyncClient blk (Point blk) (Tip blk) m () -> Peer (ChainSync blk (Point blk) (Tip blk)) 'AsClient 'StIdle m () @@ -1670,10 +1670,10 @@ -> SecurityParam -> ChainSyncClient blk (Point blk) (Tip blk) m () chainSyncClient Tracer m (ChairmanTrace blk) -chairmanTracer SocketPath -sockPath ChainsVar m blk -chainsVar SecurityParam -securityParam) +chairmanTracer SocketPath +sockPath ChainsVar m blk +chainsVar SecurityParam +securityParam) , localTxSubmissionProtocol :: RunMiniProtocol 'InitiatorMode ByteString m () Void localTxSubmissionProtocol = @@ -1712,13 +1712,13 @@ MuxPeer Tracer m (TraceSendRecv (LocalTxSubmission (GenTx blk) (ApplyTxErr blk))) -localTxSubmissionTracer +localTxSubmissionTracer Codec (LocalTxSubmission (GenTx blk) (ApplyTxErr blk)) DeserialiseFailure m ByteString -cTxSubmissionCodec +cTxSubmissionCodec Peer (LocalTxSubmission (GenTx blk) (ApplyTxErr blk)) 'AsClient @@ -1773,7 +1773,7 @@ DeserialiseFailure m ByteString -cStateQueryCodec +cStateQueryCodec Peer (LocalStateQuery blk (Point blk) (Query blk)) 'AsClient @@ -1787,7 +1787,7 @@ } where Codecs - { Codec + { Codec (ChainSync blk (Point blk) (Tip blk)) DeserialiseFailure m @@ -1801,7 +1801,7 @@ m ByteString cChainSyncCodec - , Codec + , Codec (LocalTxSubmission (GenTx blk) (ApplyTxErr blk)) DeserialiseFailure m @@ -1815,7 +1815,7 @@ m ByteString cTxSubmissionCodec - , Codec + , Codec (LocalStateQuery blk (Point blk) (Query blk)) DeserialiseFailure m @@ -1843,7 +1843,7 @@ -> NodeToClientVersion -> ClientCodecs blk m clientCodecs CodecConfig blk -cfg BlockNodeToClientVersion blk -byronClientVersion NodeToClientVersion -version +cfg BlockNodeToClientVersion blk +byronClientVersion NodeToClientVersion +version \ No newline at end of file diff --git a/cardano-node-chairman/src/Paths_cardano_node_chairman.html b/cardano-node-chairman/src/Paths_cardano_node_chairman.html index 72a852e8917..5c7f20f5c84 100644 --- a/cardano-node-chairman/src/Paths_cardano_node_chairman.html +++ b/cardano-node-chairman/src/Paths_cardano_node_chairman.html @@ -16,7 +16,7 @@ #if defined(VERSION_base) #if MIN_VERSION_base(4,0,0) -catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a +catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a #else catchIO :: IO a -> (Exception.Exception -> IO a) -> IO a #endif @@ -121,19 +121,19 @@ getDataFileName :: FilePath -> IO FilePath getDataFileName :: String -> IO String -getDataFileName String -name = do - String -dir <- IO String +getDataFileName String +name = do + String +dir <- IO String getDataDir String -> IO String forall (m :: * -> *) a. Monad m => a -> m a return (String -dir String -> String -> String +dir String -> String -> String forall a. [a] -> [a] -> [a] ++ String "/" String -> String -> String forall a. [a] -> [a] -> [a] ++ String -name) +name) \ No newline at end of file diff --git a/cardano-node-chairman/src/Test.Process.html b/cardano-node-chairman/src/Test.Process.html index ee549ec0a65..e675522cde6 100644 --- a/cardano-node-chairman/src/Test.Process.html +++ b/cardano-node-chairman/src/Test.Process.html @@ -17,10 +17,10 @@ import qualified Hedgehog.Extras.Test.Process as H -- | Run cardano-cli, returning the stdout -execCli - :: (MonadTest m, MonadCatch m, MonadIO m, HasCallStack) +execCli + :: (MonadTest m, MonadCatch m, MonadIO m, HasCallStack) => [String] - -> m String + -> m String execCli :: [String] -> m String execCli = (HasCallStack => [String] -> m String) -> [String] -> m String forall a. HasCallStack => (HasCallStack => a) -> a @@ -37,11 +37,11 @@ -- | Create a 'CreateProcess' describing how to start the cardano-cli process -- and an argument list. -procCli - :: (MonadTest m, MonadCatch m, MonadIO m, HasCallStack) +procCli + :: (MonadTest m, MonadCatch m, MonadIO m, HasCallStack) => [String] -- ^ Arguments to the CLI command - -> m CreateProcess + -> m CreateProcess -- ^ Captured stdout procCli :: [String] -> m CreateProcess procCli = (HasCallStack => [String] -> m CreateProcess) @@ -63,11 +63,11 @@ -- | Create a 'CreateProcess' describing how to start the cardano-node process -- and an argument list. -procNode - :: (MonadTest m, MonadCatch m, MonadIO m, HasCallStack) +procNode + :: (MonadTest m, MonadCatch m, MonadIO m, HasCallStack) => [String] -- ^ Arguments to the CLI command - -> m CreateProcess + -> m CreateProcess -- ^ Captured stdout procNode :: [String] -> m CreateProcess procNode = (HasCallStack => [String] -> m CreateProcess) @@ -89,11 +89,11 @@ -- | Create a 'CreateProcess' describing how to start the cardano-node-chairman process -- and an argument list. -procChairman - :: (MonadTest m, MonadCatch m, MonadIO m, HasCallStack) +procChairman + :: (MonadTest m, MonadCatch m, MonadIO m, HasCallStack) => [String] -- ^ Arguments to the CLI command - -> m CreateProcess + -> m CreateProcess -- ^ Captured stdout procChairman :: [String] -> m CreateProcess procChairman = (HasCallStack => [String] -> m CreateProcess) diff --git a/cardano-node-chairman/src/Testnet.Byron.html b/cardano-node-chairman/src/Testnet.Byron.html index 700389b19ec..fdf7ab46c97 100644 --- a/cardano-node-chairman/src/Testnet.Byron.html +++ b/cardano-node-chairman/src/Testnet.Byron.html @@ -65,7 +65,7 @@ nPoorAddresses :: Int , TestnetOptions -> Int totalBalance :: Int - } deriving (TestnetOptions -> TestnetOptions -> Bool + } deriving (TestnetOptions -> TestnetOptions -> Bool (TestnetOptions -> TestnetOptions -> Bool) -> (TestnetOptions -> TestnetOptions -> Bool) -> Eq TestnetOptions forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -73,7 +73,7 @@ $c/= :: TestnetOptions -> TestnetOptions -> Bool == :: TestnetOptions -> TestnetOptions -> Bool $c== :: TestnetOptions -> TestnetOptions -> Bool -Eq, Int -> TestnetOptions -> ShowS +Eq, Int -> TestnetOptions -> ShowS [TestnetOptions] -> ShowS TestnetOptions -> String (Int -> TestnetOptions -> ShowS) @@ -113,24 +113,24 @@ replaceNodeLog :: Int -> String -> String replaceNodeLog :: Int -> ShowS -replaceNodeLog Int -n String -s = Text -> String +replaceNodeLog Int +n String +s = Text -> String T.unpack (Text -> Text -> Text -> Text T.replace Text "logs/node-0.log" Text -replacement (String -> Text +replacement (String -> Text T.pack String -s)) - where replacement :: Text -replacement = String -> Text +s)) + where replacement :: Text +replacement = String -> Text T.pack (String "logs/node-" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".log") @@ -142,25 +142,25 @@ _ String "TraceBlockchainTime: False" = String "TraceBlockchainTime: True" -rewriteConfiguration Int -n String -s | String +rewriteConfiguration Int +n String +s | String "logs/node-0.log" String -> String -> Bool forall a. Eq a => [a] -> [a] -> Bool `L.isInfixOf` String -s = Int -> ShowS +s = Int -> ShowS replaceNodeLog Int -n String -s +n String +s rewriteConfiguration Int -_ String -s = String -s +_ String +s = String +s rewriteParams :: TestnetOptions -> Value -> Value rewriteParams :: TestnetOptions -> Value -> Value -rewriteParams TestnetOptions -testnetOptions = (HashMap Text Value -> HashMap Text Value) -> Value -> Value +rewriteParams TestnetOptions +testnetOptions = (HashMap Text Value -> HashMap Text Value) -> Value -> Value rewriteObject ((HashMap Text Value -> HashMap Text Value) -> Value -> Value) -> (HashMap Text Value -> HashMap Text Value) -> Value -> Value @@ -176,12 +176,12 @@ forall a. Show a => a -> String show @Int (TestnetOptions -> Int slotDuration TestnetOptions -testnetOptions))) +testnetOptions))) testnet :: TestnetOptions -> H.Conf -> H.Integration [String] testnet :: TestnetOptions -> Conf -> Integration [String] -testnet TestnetOptions -testnetOptions H.Conf {Int +testnet TestnetOptions +testnetOptions H.Conf {Int String testnetMagic :: Conf -> Int socketDir :: Conf -> String @@ -213,8 +213,8 @@ String -> m String H.note String OS.os - String -baseConfig <- String + String +baseConfig <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -225,19 +225,19 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -base String -> ShowS +base String -> ShowS </> String "configuration/chairman/defaults/simpleview" - UTCTime -currentTime <- IO UTCTime + UTCTime +currentTime <- IO UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, MonadIO m, HasCallStack, Show a) => IO a -> m a H.noteShowIO IO UTCTime DTC.getCurrentTime - UTCTime -startTime <- UTCTime + UTCTime +startTime <- UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -250,9 +250,9 @@ $ NominalDiffTime -> UTCTime -> UTCTime DTC.addUTCTime NominalDiffTime 15 UTCTime -currentTime -- 15 seconds into the future - [Int] -allPorts <- IO [Int] +currentTime -- 15 seconds into the future + [Int] +allPorts <- IO [Int] -> PropertyT (ReaderT IntegrationState (ResourceT IO)) [Int] forall (m :: * -> *) a. (MonadTest m, MonadIO m, HasCallStack, Show a) => @@ -265,7 +265,7 @@ $ Int -> IO [Int] IO.allocateRandomPorts (TestnetOptions -> Int numBftNodes TestnetOptions -testnetOptions) +testnetOptions) String -> String @@ -276,16 +276,16 @@ String -> String -> (Value -> Value) -> m () H.copyRewriteJsonFile (String -base String -> ShowS +base String -> ShowS </> String "scripts/protocol-params.json") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "protocol-params.json") (TestnetOptions -> Value -> Value rewriteParams TestnetOptions -testnetOptions) +testnetOptions) -- Generate keys PropertyT (ReaderT IntegrationState (ResourceT IO)) String @@ -310,16 +310,16 @@ "genesis" , String "--genesis-output-dir", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "genesis" , String "--start-time", UTCTime -> String showUTCTimeSeconds UTCTime -startTime +startTime , String "--protocol-parameters-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "protocol-params.json" , String @@ -327,30 +327,30 @@ forall a. Show a => a -> String show @Int (TestnetOptions -> Int securityParam TestnetOptions -testnetOptions) +testnetOptions) , String "--protocol-magic", Int -> String forall a. Show a => a -> String show @Int Int -testnetMagic +testnetMagic , String "--n-poor-addresses", Int -> String forall a. Show a => a -> String show @Int (TestnetOptions -> Int nPoorAddresses TestnetOptions -testnetOptions) +testnetOptions) , String "--n-delegate-addresses", Int -> String forall a. Show a => a -> String show @Int (TestnetOptions -> Int numBftNodes TestnetOptions -testnetOptions) +testnetOptions) , String "--total-balance", Int -> String forall a. Show a => a -> String show @Int (TestnetOptions -> Int totalBalance TestnetOptions -testnetOptions) +testnetOptions) , String "--avvm-entry-count", String "128" @@ -371,7 +371,7 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.writeFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "genesis/GENHASH") (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> ShowS @@ -394,38 +394,38 @@ , String "--genesis-json" , String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "genesis/genesis.json" ] - let nodeIndexes :: [Int] -nodeIndexes = [Int + let nodeIndexes :: [Int] +nodeIndexes = [Int 0..TestnetOptions -> Int numBftNodes TestnetOptions -testnetOptions Int -> Int -> Int +testnetOptions Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1] - let allNodes :: [String] -allNodes = (Int -> String) -> [Int] -> [String] + let allNodes :: [String] +allNodes = (Int -> String) -> [Int] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b -fmap (\Int -i -> String +fmap (\Int +i -> String "node-" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -i) [Int] -nodeIndexes +i) [Int] +nodeIndexes String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> m () H.createDirectoryIfMissing String -logDir +logDir -- Launch cluster of three nodes [Int] @@ -435,15 +435,15 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Int] -nodeIndexes ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +nodeIndexes ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \Int -i -> do - String -si <- String +$ \Int +i -> do + String +si <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -456,9 +456,9 @@ $ Int -> String forall a. Show a => a -> String show @Int Int -i - String -dbDir <- String +i + String +dbDir <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -469,21 +469,21 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "db/node-" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si - String -nodeStdoutFile <- String +si + String +nodeStdoutFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -tempAbsPath (String +tempAbsPath (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String @@ -492,19 +492,19 @@ "cardano-node-" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si String -> ShowS +si String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stdout.log" - String -nodeStderrFile <- String + String +nodeStderrFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -tempAbsPath (String +tempAbsPath (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String @@ -513,12 +513,12 @@ "cardano-node-" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si String -> ShowS +si String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stderr.log" - Sprocket -sprocket <- Sprocket + Sprocket +sprocket <- Sprocket -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Sprocket forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -530,15 +530,15 @@ forall a b. (a -> b) -> a -> b $ String -> String -> Sprocket Sprocket String -tempBaseAbsPath (String -socketDir String -> ShowS +tempBaseAbsPath (String +socketDir String -> ShowS </> String "node-" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si) - String -portString <- String +si) + String +portString <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => @@ -551,12 +551,12 @@ $ Int -> String forall a. Show a => a -> String show @Int ([Int] -allPorts [Int] -> Int -> Int +allPorts [Int] -> Int -> Int forall a. [a] -> Int -> a L.!! Int -i) - String -topologyFile <- String +i) + String +topologyFile <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -567,17 +567,17 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "topology-node-" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si String -> ShowS +si String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".json" - String -configFile <- String + String +configFile <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -588,17 +588,17 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "config-" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si String -> ShowS +si String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".yaml" - String -signingKeyFile <- String + String +signingKeyFile <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -609,17 +609,17 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "genesis/delegate-keys.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si String -> ShowS +si String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".key" - String -delegationCertificateFile <- String + String +delegationCertificateFile <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -630,12 +630,12 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "genesis/delegation-cert.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si String -> ShowS +si String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".json" @@ -645,7 +645,7 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> m () H.createDirectoryIfMissing String -dbDir +dbDir String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => @@ -654,15 +654,15 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempBaseAbsPath String -> ShowS +tempBaseAbsPath String -> ShowS </> String "" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -socketDir +socketDir - [Int] -otherPorts <- [Int] -> PropertyT (ReaderT IntegrationState (ResourceT IO)) [Int] + [Int] +otherPorts <- [Int] -> PropertyT (ReaderT IntegrationState (ResourceT IO)) [Int] forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => a -> m a @@ -674,8 +674,8 @@ $ Int -> [Int] -> [Int] forall a. Int -> [a] -> [a] L.dropNth Int -i [Int] -allPorts +i [Int] +allPorts String -> ByteString @@ -684,12 +684,12 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> ByteString -> m () H.lbsWriteFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "topology-node-" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si String -> ShowS +si String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".json") (ByteString @@ -718,13 +718,13 @@ fmap [Int 0 .. TestnetOptions -> Int numBftNodes TestnetOptions -testnetOptions Int -> Int -> Int +testnetOptions Int -> Int -> Int forall a. Num a => a -> a -> a - Int 2] ((Int -> Value) -> [Value]) -> (Int -> Value) -> [Value] forall a b. (a -> b) -> a -> b -$ \Int -j -> [Pair] -> Value +$ \Int +j -> [Pair] -> Value J.object [ (Text "addr", Value @@ -738,10 +738,10 @@ "port", Int -> Value forall a. ToJSON a => a -> Value J.toJSON ([Int] -otherPorts [Int] -> Int -> Int +otherPorts [Int] -> Int -> Int forall a. [a] -> Int -> a L.!! Int -j)) +j)) ] ) ] @@ -752,12 +752,12 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.writeFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "config-" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si String -> ShowS +si String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".yaml") (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) @@ -772,7 +772,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap (Int -> ShowS rewriteConfiguration Int -i) ([String] -> [String]) +i) ([String] -> [String]) -> (String -> [String]) -> String -> [String] forall b c a. (b -> c) -> (a -> b) -> a -> c . String -> [String] @@ -787,29 +787,29 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> m String H.readFile (String -baseConfig String -> ShowS +baseConfig String -> ShowS </> String "config-0.yaml") - Handle -hNodeStdout <- String + Handle +hNodeStdout <- String -> IOMode -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Handle forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> IOMode -> m Handle H.openFile String -nodeStdoutFile IOMode +nodeStdoutFile IOMode IO.WriteMode - Handle -hNodeStderr <- String + Handle +hNodeStderr <- String -> IOMode -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Handle forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> IOMode -> m Handle H.openFile String -nodeStderrFile IOMode +nodeStderrFile IOMode IO.WriteMode Int @@ -823,7 +823,7 @@ forall (t :: * -> *) a. Foldable t => t a -> Int L.length (Sprocket -> String IO.sprocketArgumentName Sprocket -sprocket)) Int -> Int -> Bool +sprocket)) Int -> Int -> Bool forall a. Ord a => a -> a -> Bool (<=) Int IO.maxSprocketArgumentNameLength @@ -879,26 +879,26 @@ "run" , String "--database-path", String -dbDir +dbDir , String "--socket-path", Sprocket -> String IO.sprocketArgumentName Sprocket -sprocket +sprocket , String "--port", String -portString +portString , String "--topology", String -topologyFile +topologyFile , String "--config", String -configFile +configFile , String "--signing-key", String -signingKeyFile +signingKeyFile , String "--delegation-certificate", String -delegationCertificateFile +delegationCertificateFile , String "--shutdown-ipc", String "0" @@ -908,25 +908,25 @@ (ReaderT IntegrationState (ResourceT IO)) CreateProcess forall (f :: * -> *) a b. Functor f => f a -> (a -> b) -> f b <&> - ( \CreateProcess -cp -> CreateProcess -cp + ( \CreateProcess +cp -> CreateProcess +cp { std_in :: StdStream -IO.std_in = StdStream +IO.std_in = StdStream IO.CreatePipe , std_out :: StdStream -IO.std_out = Handle -> StdStream +IO.std_out = Handle -> StdStream IO.UseHandle Handle -hNodeStdout +hNodeStdout , std_err :: StdStream -IO.std_err = Handle -> StdStream +IO.std_err = Handle -> StdStream IO.UseHandle Handle -hNodeStderr +hNodeStderr , cwd :: Maybe String -IO.cwd = String -> Maybe String +IO.cwd = String -> Maybe String forall a. a -> Maybe a Just String -tempBaseAbsPath +tempBaseAbsPath } ) ) @@ -970,22 +970,22 @@ "-iTCP:" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -portString, String +portString, String "-sTCP:LISTEN", String "-n", String "-P"] String "" - UTCTime -now <- IO UTCTime + UTCTime +now <- IO UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, MonadIO m, HasCallStack, Show a) => IO a -> m a H.noteShowIO IO UTCTime DTC.getCurrentTime - UTCTime -deadline <- UTCTime + UTCTime +deadline <- UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -998,7 +998,7 @@ $ NominalDiffTime -> UTCTime -> UTCTime DTC.addUTCTime NominalDiffTime 90 UTCTime -now +now [Int] -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) @@ -1007,15 +1007,15 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Int] -nodeIndexes ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +nodeIndexes ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \Int -i -> do - String -si <- String +$ \Int +i -> do + String +si <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -1028,9 +1028,9 @@ $ Int -> String forall a. Show a => a -> String show @Int Int -i - Sprocket -sprocket <- Sprocket +i + Sprocket +sprocket <- Sprocket -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Sprocket forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -1042,15 +1042,15 @@ forall a b. (a -> b) -> a -> b $ String -> String -> Sprocket Sprocket String -tempBaseAbsPath (String -socketDir String -> ShowS +tempBaseAbsPath (String +socketDir String -> ShowS </> String "node-" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si) - String -_spocketSystemNameFile <- String +si) + String +_spocketSystemNameFile <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -1062,7 +1062,7 @@ forall a b. (a -> b) -> a -> b $ Sprocket -> String IO.sprocketSystemName Sprocket -sprocket +sprocket UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -1070,7 +1070,7 @@ (MonadTest m, MonadIO m, HasCallStack) => UTCTime -> m Bool -> m () H.waitByDeadlineM UTCTime -deadline (PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool +deadline (PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -1081,7 +1081,7 @@ (MonadTest m, MonadIO m, HasCallStack) => Sprocket -> m Bool H.doesSprocketExist Sprocket -sprocket +sprocket [Int] -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) @@ -1090,15 +1090,15 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Int] -nodeIndexes ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +nodeIndexes ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \Int -i -> do - String -si <- String +$ \Int +i -> do + String +si <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -1111,16 +1111,16 @@ $ Int -> String forall a. Show a => a -> String show @Int Int -i - String -nodeStdoutFile <- String +i + String +nodeStdoutFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -tempAbsPath (String +tempAbsPath (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String @@ -1129,7 +1129,7 @@ "cardano-node-" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -si String -> ShowS +si String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stdout.log" @@ -1140,14 +1140,14 @@ (MonadTest m, MonadIO m, HasCallStack) => UTCTime -> IO Bool -> m () H.assertByDeadlineIO UTCTime -deadline (IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +deadline (IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -> String -> IO Bool IO.fileContains String "until genesis start time at" String -nodeStdoutFile +nodeStdoutFile String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -1155,15 +1155,15 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.copyFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "config-1.yaml") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "configuration.yaml") [String] -> Integration [String] forall (m :: * -> *) a. Monad m => a -> m a return [String] -allNodes +allNodes \ No newline at end of file diff --git a/cardano-node-chairman/src/Testnet.ByronShelley.html b/cardano-node-chairman/src/Testnet.ByronShelley.html index 572a0827f83..49925aab05b 100644 --- a/cardano-node-chairman/src/Testnet.ByronShelley.html +++ b/cardano-node-chairman/src/Testnet.ByronShelley.html @@ -75,7 +75,7 @@ data ForkPoint = AtVersion Int | AtEpoch Int - deriving (Int -> ForkPoint -> ShowS + deriving (Int -> ForkPoint -> ShowS [ForkPoint] -> ShowS ForkPoint -> String (Int -> ForkPoint -> ShowS) @@ -90,7 +90,7 @@ $cshow :: ForkPoint -> String showsPrec :: Int -> ForkPoint -> ShowS $cshowsPrec :: Int -> ForkPoint -> ShowS -Show, ForkPoint -> ForkPoint -> Bool +Show, ForkPoint -> ForkPoint -> Bool (ForkPoint -> ForkPoint -> Bool) -> (ForkPoint -> ForkPoint -> Bool) -> Eq ForkPoint forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -98,7 +98,7 @@ $c/= :: ForkPoint -> ForkPoint -> Bool == :: ForkPoint -> ForkPoint -> Bool $c== :: ForkPoint -> ForkPoint -> Bool -Eq, ReadPrec [ForkPoint] +Eq, ReadPrec [ForkPoint] ReadPrec ForkPoint Int -> ReadS ForkPoint ReadS [ForkPoint] @@ -131,7 +131,7 @@ epochLength :: Int , TestnetOptions -> ForkPoint forkPoint :: ForkPoint - } deriving (TestnetOptions -> TestnetOptions -> Bool + } deriving (TestnetOptions -> TestnetOptions -> Bool (TestnetOptions -> TestnetOptions -> Bool) -> (TestnetOptions -> TestnetOptions -> Bool) -> Eq TestnetOptions forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -139,7 +139,7 @@ $c/= :: TestnetOptions -> TestnetOptions -> Bool == :: TestnetOptions -> TestnetOptions -> Bool $c== :: TestnetOptions -> TestnetOptions -> Bool -Eq, Int -> TestnetOptions -> ShowS +Eq, Int -> TestnetOptions -> ShowS [TestnetOptions] -> ShowS TestnetOptions -> String (Int -> TestnetOptions -> ShowS) @@ -185,8 +185,8 @@ testnet :: TestnetOptions -> H.Conf -> H.Integration [String] testnet :: TestnetOptions -> Conf -> Integration [String] -testnet TestnetOptions -testnetOptions H.Conf {Int +testnet TestnetOptions +testnetOptions H.Conf {Int String testnetMagic :: Conf -> Int socketDir :: Conf -> String @@ -254,8 +254,8 @@ String -> m String H.note String OS.os - [(String, String)] -env <- IO [(String, String)] + [(String, String)] +env <- IO [(String, String)] -> PropertyT (ReaderT IntegrationState (ResourceT IO)) [(String, String)] forall (m :: * -> *) a. @@ -263,16 +263,16 @@ IO a -> m a H.evalIO IO [(String, String)] IO.getEnvironment - UTCTime -currentTime <- IO UTCTime + UTCTime +currentTime <- IO UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, MonadIO m, HasCallStack, Show a) => IO a -> m a H.noteShowIO IO UTCTime DTC.getCurrentTime - UTCTime -startTime <- UTCTime + UTCTime +startTime <- UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -285,20 +285,20 @@ $ NominalDiffTime -> UTCTime -> UTCTime DTC.addUTCTime NominalDiffTime 15 UTCTime -currentTime -- 15 seconds into the future +currentTime -- 15 seconds into the future - let bftNodesN :: [Int] -bftNodesN = [Int + let bftNodesN :: [Int] +bftNodesN = [Int 1 .. TestnetOptions -> Int numBftNodes TestnetOptions -testnetOptions] - let poolNodesN :: [Int] -poolNodesN = [Int +testnetOptions] + let poolNodesN :: [Int] +poolNodesN = [Int 1 .. TestnetOptions -> Int numPoolNodes TestnetOptions -testnetOptions] - let bftNodes :: [String] -bftNodes = (String +testnetOptions] + let bftNodes :: [String] +bftNodes = (String "node-bft" String -> ShowS forall a. Semigroup a => a -> a -> a <>) ShowS -> (Int -> String) -> Int -> String @@ -308,9 +308,9 @@ show @Int (Int -> String) -> [Int] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [Int] -bftNodesN - let poolNodes :: [String] -poolNodes = (String +bftNodesN + let poolNodes :: [String] +poolNodes = (String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <> ) ShowS -> (Int -> String) -> Int -> String @@ -320,41 +320,41 @@ show @Int (Int -> String) -> [Int] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [Int] -poolNodesN - let allNodes :: [String] -allNodes = [String] -bftNodes [String] -> [String] -> [String] +poolNodesN + let allNodes :: [String] +allNodes = [String] +bftNodes [String] -> [String] -> [String] forall a. Semigroup a => a -> a -> a <> [String] -poolNodes - let initSupply :: Int -initSupply = Int +poolNodes + let initSupply :: Int +initSupply = Int 1000000000 - let maxSupply :: Int -maxSupply = Int + let maxSupply :: Int +maxSupply = Int 1000000000 - let fundsPerGenesisAddress :: Int -fundsPerGenesisAddress = Int -initSupply Int -> Int -> Int + let fundsPerGenesisAddress :: Int +fundsPerGenesisAddress = Int +initSupply Int -> Int -> Int forall a. Integral a => a -> a -> a `div` TestnetOptions -> Int numBftNodes TestnetOptions -testnetOptions - let fundsPerByronAddress :: Int -fundsPerByronAddress = Int -fundsPerGenesisAddress Int -> Int -> Int +testnetOptions + let fundsPerByronAddress :: Int +fundsPerByronAddress = Int +fundsPerGenesisAddress Int -> Int -> Int forall a. Num a => a -> a -> a * Int 9 Int -> Int -> Int forall a. Integral a => a -> a -> a `div` Int 10 - let userPoolN :: [Int] -userPoolN = [Int] -poolNodesN + let userPoolN :: [Int] +userPoolN = [Int] +poolNodesN - [Int] -allPorts <- IO [Int] + [Int] +allPorts <- IO [Int] -> PropertyT (ReaderT IntegrationState (ResourceT IO)) [Int] forall (m :: * -> *) a. (MonadTest m, MonadIO m, HasCallStack, Show a) => @@ -368,9 +368,9 @@ IO.allocateRandomPorts ([String] -> Int forall (t :: * -> *) a. Foldable t => t a -> Int L.length [String] -allNodes) - Map String Int -nodeToPort <- Map String Int +allNodes) + Map String Int +nodeToPort <- Map String Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) (Map String Int) forall (m :: * -> *) a. @@ -381,11 +381,11 @@ M.fromList ([String] -> [Int] -> [(String, Int)] forall a b. [a] -> [b] -> [(a, b)] L.zip [String] -allNodes [Int] -allPorts)) +allNodes [Int] +allPorts)) - let securityParam :: Int -securityParam = Int + let securityParam :: Int +securityParam = Int 10 String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -393,11 +393,11 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> m () H.createDirectoryIfMissing String -logDir +logDir -- Choose one of the following fork methods: - [String] -forkMethod <- [String] -> Integration [String] + [String] +forkMethod <- [String] -> Integration [String] forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => a -> m a @@ -406,23 +406,23 @@ forall a b. (a -> b) -> a -> b $ case TestnetOptions -> ForkPoint forkPoint TestnetOptions -testnetOptions of - AtVersion Int -n -> [String +testnetOptions of + AtVersion Int +n -> [String "TestShelleyHardForkAtVersion: " String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n] - AtEpoch Int -n -> [String +n] + AtEpoch Int +n -> [String "TestShelleyHardForkAtEpoch: " String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n] +n] String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String @@ -430,7 +430,7 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> m String H.readFile (String -base String -> ShowS +base String -> ShowS </> String "configuration/chairman/byron-shelley/configuration.yaml") PropertyT (ReaderT IntegrationState (ResourceT IO)) String @@ -443,7 +443,7 @@ . ([String] -> [String] -> [String] forall a. Semigroup a => a -> a -> a <> [String] -forkMethod) ([String] -> [String]) +forkMethod) ([String] -> [String]) -> (String -> [String]) -> String -> [String] forall b c a. (b -> c) -> (a -> b) -> a -> c . String -> [String] @@ -459,7 +459,7 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.writeFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "configuration.yaml") @@ -471,14 +471,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do +$ \String +node -> do String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => @@ -487,9 +487,9 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node +node String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => @@ -498,9 +498,9 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "byron" String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -511,9 +511,9 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley" @@ -526,24 +526,24 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do - let port :: Int -port = Maybe Int -> Int +$ \String +node -> do + let port :: Int +port = Maybe Int -> Int forall a. HasCallStack => Maybe a -> a fromJust (Maybe Int -> Int) -> Maybe Int -> Int forall a b. (a -> b) -> a -> b $ String -> Map String Int -> Maybe Int forall k a. Ord k => k -> Map k a -> Maybe a M.lookup String -node Map String Int -nodeToPort +node Map String Int +nodeToPort String -> ByteString -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -551,9 +551,9 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> ByteString -> m () H.lbsWriteFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "topology.json") (ByteString -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) @@ -588,7 +588,7 @@ .= Int -> Value forall a. ToJSON a => a -> Value J.toJSON @Int Int -peerPort +peerPort , Text "valency" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -597,12 +597,12 @@ J.toJSON @Int Int 1 ] - | Int -peerPort <- [Int] -allPorts [Int] -> [Int] -> [Int] + | Int +peerPort <- [Int] +allPorts [Int] -> [Int] -> [Int] forall a. Eq a => [a] -> [a] -> [a] \\ [Int -port] +port] ] ] String @@ -611,14 +611,14 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.writeFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "port") (Int -> String forall a. Show a => a -> String show Int -port) +port) String -> ByteString @@ -627,7 +627,7 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> ByteString -> m () H.lbsWriteFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron.genesis.spec.json") (ByteString -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) @@ -807,16 +807,16 @@ "--protocol-magic", Int -> String forall a. Show a => a -> String show @Int Int -testnetMagic +testnetMagic , String "--start-time", UTCTime -> String showUTCTimeSeconds UTCTime -startTime +startTime , String "--k", Int -> String forall a. Show a => a -> String show @Int Int -securityParam +securityParam , String "--n-poor-addresses", String "0" @@ -825,12 +825,12 @@ forall a. Show a => a -> String show @Int (TestnetOptions -> Int numBftNodes TestnetOptions -testnetOptions) +testnetOptions) , String "--total-balance", Int -> String forall a. Show a => a -> String show @Int Int -initSupply +initSupply , String "--delegate-share", String "1" @@ -842,12 +842,12 @@ "0" , String "--protocol-parameters-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron.genesis.spec.json" , String "--genesis-output-dir", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron" ] @@ -859,11 +859,11 @@ String -> String -> m () H.renameFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron.genesis.spec.json") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/genesis.spec.json") @@ -875,41 +875,41 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Int] -bftNodesN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +bftNodesN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \Int -n -> do +$ \Int +n -> do String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/delegate-keys.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1) String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".key") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-bft" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS </> String "byron/delegate.key") String @@ -918,28 +918,28 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/delegation-cert.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1) String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".json") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-bft" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS </> String "byron/delegate.cert") @@ -951,13 +951,13 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Int] -bftNodesN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +bftNodesN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \Int -n -> do +$ \Int +n -> do PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (f :: * -> *) a. Functor f => f a -> f () @@ -976,14 +976,14 @@ "keygen" , String "--secret", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/payment-keys.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1) String -> ShowS @@ -1005,14 +1005,14 @@ "42" , String "--secret", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/payment-keys.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1) String -> ShowS @@ -1030,14 +1030,14 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.writeFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/address-00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1)) @@ -1056,14 +1056,14 @@ "42" , String "--secret", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/genesis-keys.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1) String -> ShowS @@ -1081,21 +1081,21 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.writeFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/genesis-address-00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1)) do - String -richAddrFrom <- ShowS + String +richAddrFrom <- ShowS S.firstLine ShowS -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String @@ -1106,11 +1106,11 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> m String H.readFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/genesis-address-000") - String -txAddr <- ShowS + String +txAddr <- ShowS S.firstLine ShowS -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String @@ -1121,7 +1121,7 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> m String H.readFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/address-000") @@ -1145,7 +1145,7 @@ "issue-genesis-utxo-expenditure" , String "--genesis-json", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/genesis.json" , String @@ -1153,23 +1153,23 @@ "42" , String "--tx", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "tx0.tx" , String "--wallet-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/delegate-keys.000.key" , String "--rich-addr-from", String -richAddrFrom +richAddrFrom , String "--txout", (String, Int) -> String forall a. Show a => a -> String show @(String, Int) (String -txAddr, Int -fundsPerGenesisAddress) +txAddr, Int +fundsPerGenesisAddress) ] -- Update Proposal and votes @@ -1193,7 +1193,7 @@ "create-update-proposal" , String "--filepath", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "update-proposal" , String @@ -1201,7 +1201,7 @@ "42" , String "--signing-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/delegate-keys.000.key" , String @@ -1234,13 +1234,13 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Int] -bftNodesN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +bftNodesN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \Int -n -> do +$ \Int +n -> do PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (f :: * -> *) a. Functor f => f a -> f () @@ -1261,7 +1261,7 @@ "create-proposal-vote" , String "--proposal-filepath", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "update-proposal" , String @@ -1269,14 +1269,14 @@ "42" , String "--signing-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/delegate-keys.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1) String -> ShowS @@ -1287,14 +1287,14 @@ "--vote-yes" , String "--output-filepath", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "update-vote.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1) @@ -1320,7 +1320,7 @@ "create-update-proposal" , String "--filepath", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "update-proposal-1" , String @@ -1328,7 +1328,7 @@ "42" , String "--signing-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/delegate-keys.000.key" , String @@ -1361,13 +1361,13 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Int] -bftNodesN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +bftNodesN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \Int -n -> +$ \Int +n -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (f :: * -> *) a. Functor f => f a -> f () @@ -1388,7 +1388,7 @@ "create-proposal-vote" , String "--proposal-filepath", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "update-proposal-1" , String @@ -1396,14 +1396,14 @@ "42" , String "--signing-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron/delegate-keys.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1) String -> ShowS @@ -1414,14 +1414,14 @@ "--vote-yes" , String "--output-filepath", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "update-vote-1.00" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int (Int -n Int -> Int -> Int +n Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1) @@ -1447,7 +1447,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "byron" @@ -1460,7 +1460,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley" @@ -1486,13 +1486,13 @@ "42" , String "--genesis-dir", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley" , String "--start-time", UTCTime -> String formatIso8601 UTCTime -startTime +startTime ] -- Then edit the genesis.spec.json ... @@ -1507,7 +1507,7 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> (Value -> Value) -> m () H.rewriteJsonFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley/genesis.spec.json") ((Value -> Value) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) @@ -1545,7 +1545,7 @@ forall a. ToJSON a => a -> Value J.toJSON @Double (TestnetOptions -> Double activeSlotsCoeff TestnetOptions -testnetOptions)) +testnetOptions)) (HashMap Text Value -> HashMap Text Value) -> (HashMap Text Value -> HashMap Text Value) -> HashMap Text Value @@ -1574,7 +1574,7 @@ forall a. ToJSON a => a -> Value J.toJSON @Int (TestnetOptions -> Int epochLength TestnetOptions -testnetOptions)) +testnetOptions)) (HashMap Text Value -> HashMap Text Value) -> (HashMap Text Value -> HashMap Text Value) -> HashMap Text Value @@ -1602,7 +1602,7 @@ "maxLovelaceSupply" (Int -> Value forall a. ToJSON a => a -> Value J.toJSON @Int Int -maxSupply) +maxSupply) (HashMap Text Value -> HashMap Text Value) -> (HashMap Text Value -> HashMap Text Value) -> HashMap Text Value @@ -1657,7 +1657,7 @@ "42" , String "--genesis-dir", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley" , String @@ -1665,24 +1665,24 @@ forall a. Show a => a -> String show @Int (TestnetOptions -> Int numBftNodes TestnetOptions -testnetOptions) +testnetOptions) , String "--start-time", UTCTime -> String formatIso8601 UTCTime -startTime +startTime , String "--gen-utxo-keys", Int -> String forall a. Show a => a -> String show @Int (TestnetOptions -> Int numPoolNodes TestnetOptions -testnetOptions) +testnetOptions) ] #ifdef UNIX --TODO: Remove me after #1948 is merged. - let vrfPath :: ShowS -vrfPath String -n = String -tempAbsPath String -> ShowS + let vrfPath :: ShowS +vrfPath String +n = String +tempAbsPath String -> ShowS </> String "shelley" String -> ShowS </> String @@ -1691,7 +1691,7 @@ "delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vrf.skey" @@ -1709,18 +1709,18 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Int] -bftNodesN ((Int -> IO ()) +bftNodesN ((Int -> IO ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (Int -> IO ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \Int -n -> String -> FileMode -> IO () +$ \Int +n -> String -> FileMode -> IO () setFileMode (ShowS -vrfPath (Int -> String +vrfPath (Int -> String forall a. Show a => a -> String show @Int Int -n)) FileMode +n)) FileMode ownerModes #endif -- Generated genesis keys and genesis files @@ -1743,7 +1743,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley" @@ -1756,7 +1756,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley/genesis.json" @@ -1770,7 +1770,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley/genesis.alonzo.json" @@ -1784,14 +1784,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do +$ \String +node -> do PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (f :: * -> *) a. Functor f => f a -> f () @@ -1811,23 +1811,23 @@ "key-gen" , String "--cold-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/operator.vkey" , String "--cold-signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/operator.skey" , String "--operational-certificate-issue-counter-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/operator.counter" ] @@ -1851,16 +1851,16 @@ "key-gen-VRF" , String "--verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/vrf.vkey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/vrf.skey" ] @@ -1875,9 +1875,9 @@ forall a b. (a -> b) -> a -> b $ String -> FileMode -> IO () setFileMode (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/vrf.skey") FileMode ownerModes @@ -1890,38 +1890,38 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Int] -bftNodesN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +bftNodesN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \Int -n -> do +$ \Int +n -> do String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley/delegate-keys/delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".skey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-bft" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS </> String "shelley/operator.skey") String @@ -1930,25 +1930,25 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley/delegate-keys/delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vkey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-bft" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS </> String "shelley/operator.vkey") String @@ -1957,25 +1957,25 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley/delegate-keys/delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".counter") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-bft" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS </> String "shelley/operator.counter") String @@ -1984,25 +1984,25 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley/delegate-keys/delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vrf.vkey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-bft" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS </> String "shelley/vrf.vkey") String @@ -2011,25 +2011,25 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley/delegate-keys/delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vrf.skey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-bft" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS </> String "shelley/vrf.skey") @@ -2042,14 +2042,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do +$ \String +node -> do PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (f :: * -> *) a. Functor f => f a -> f () @@ -2069,16 +2069,16 @@ "key-gen-KES" , String "--verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/kes.vkey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/kes.skey" ] @@ -2105,30 +2105,30 @@ "0" , String "--kes-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/kes.vkey" , String "--cold-signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/operator.skey" , String "--operational-certificate-issue-counter-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/operator.counter" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/node.cert" ] @@ -2142,14 +2142,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> Integration [String] +$ \String +node -> Integration [String] -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *) a (f :: * -> *). (MonadTest m, HasCallStack, Show a, Traversable f) => @@ -2168,9 +2168,9 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "byron" @@ -2179,8 +2179,8 @@ -- initial utxo the -- pool-owner1..n: will be the owner of the pools and we'll use their reward -- account for pool rewards - let userAddrs :: [String] -userAddrs = (String + let userAddrs :: [String] +userAddrs = (String "user" String -> ShowS forall a. Semigroup a => a -> a -> a <>) ShowS -> (Int -> String) -> Int -> String @@ -2190,9 +2190,9 @@ show @Int (Int -> String) -> [Int] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [Int] -userPoolN - let poolAddrs :: [String] -poolAddrs = (String +userPoolN + let poolAddrs :: [String] +poolAddrs = (String "pool-owner" String -> ShowS forall a. Semigroup a => a -> a -> a <>) ShowS -> (Int -> String) -> Int -> String @@ -2202,13 +2202,13 @@ show @Int (Int -> String) -> [Int] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [Int] -poolNodesN - let addrs :: [String] -addrs = [String] -userAddrs [String] -> [String] -> [String] +poolNodesN + let addrs :: [String] +addrs = [String] +userAddrs [String] -> [String] -> [String] forall a. Semigroup a => a -> a -> a <> [String] -poolAddrs +poolAddrs String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). @@ -2218,7 +2218,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses" @@ -2230,14 +2230,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -addrs ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +addrs ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -addr -> do +$ \String +addr -> do -- Payment address keys PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -2258,23 +2258,23 @@ "key-gen" , String "--verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vkey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".skey" @@ -2300,23 +2300,23 @@ "key-gen" , String "--verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.skey" @@ -2342,23 +2342,23 @@ "build" , String "--payment-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vkey" , String "--stake-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey" @@ -2367,12 +2367,12 @@ "42" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".addr" @@ -2398,12 +2398,12 @@ "build" , String "--stake-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey" @@ -2412,12 +2412,12 @@ "42" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.addr" @@ -2443,23 +2443,23 @@ "registration-certificate" , String "--stake-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.reg.cert" @@ -2473,13 +2473,13 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Int] -userPoolN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +userPoolN ((Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \Int -n -> do +$ \Int +n -> do -- Stake address delegation certs PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -2500,39 +2500,39 @@ "delegation-certificate" , String "--stake-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey" , String "--cold-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS </> String "shelley/operator.vkey" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.deleg.cert" @@ -2544,25 +2544,25 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/pool-owner" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS </> String "owner.vkey") String @@ -2571,25 +2571,25 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/pool-owner" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.skey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <> Int -> String forall a. Show a => a -> String show @Int Int -n String -> ShowS +n String -> ShowS </> String "owner.skey") @@ -2614,7 +2614,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses" @@ -2627,15 +2627,15 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -poolNodes ((String +poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do +$ \String +node -> do [String] -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). @@ -2657,37 +2657,37 @@ "0" , String "--cold-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/operator.vkey" , String "--vrf-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/vrf.vkey" , String "--reward-account-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "owner.vkey" , String "--pool-owner-stake-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "owner.vkey" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "registration.cert" ] @@ -2701,14 +2701,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () +$ \String +node -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => IO Bool -> m () @@ -2722,9 +2722,9 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "registration.cert" @@ -2738,8 +2738,8 @@ -- 2. register the stake pool 1 -- 3. register the user1 stake address -- 4. delegate from the user1 stake address to the stake pool - String -txIn <- String + String +txIn <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -2770,7 +2770,7 @@ "42" , String "--verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley/utxo-keys/utxo1.vkey" ] @@ -2778,10 +2778,10 @@ String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> m () H.note_ String -txIn +txIn - String -user1Addr <- String + String +user1Addr <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => @@ -2792,7 +2792,7 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user1.addr" @@ -2821,10 +2821,10 @@ "0" , String "--tx-in", String -txIn +txIn , String "--tx-out", String -user1Addr String -> ShowS +user1Addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "+" String -> ShowS @@ -2832,30 +2832,30 @@ <> Int -> String forall a. Show a => a -> String show @Int Int -maxSupply +maxSupply , String "--certificate-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/pool-owner1-stake.reg.cert" , String "--certificate-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool1/registration.cert" , String "--certificate-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user1-stake.reg.cert" , String "--certificate-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user1-stake.deleg.cert" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "tx1.txbody" ] @@ -2919,22 +2919,22 @@ "sign" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "shelley/utxo-keys/utxo1.skey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user1-stake.skey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool1/owner.skey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool1/shelley/operator.skey" , String @@ -2942,12 +2942,12 @@ "42" , String "--tx-body-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "tx1.txbody" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "tx1.tx" ] @@ -2967,7 +2967,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "tx1.tx" @@ -2982,16 +2982,16 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -bftNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +bftNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do - String -dbDir <- String +$ \String +node -> do + String +dbDir <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -3002,50 +3002,50 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "db/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -node - String -nodeStdoutFile <- String +node + String +nodeStdoutFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -logDir (String +logDir (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -node String -> ShowS +node String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stdout.log" - String -nodeStderrFile <- String + String +nodeStderrFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -logDir (String +logDir (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -node String -> ShowS +node String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stderr.log" - Sprocket -sprocket <- Sprocket + Sprocket +sprocket <- Sprocket -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Sprocket forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -3057,17 +3057,17 @@ forall a b. (a -> b) -> a -> b $ String -> String -> Sprocket Sprocket String -tempBaseAbsPath (String -socketDir String -> ShowS +tempBaseAbsPath (String +socketDir String -> ShowS </> String -node) +node) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> m () H.createDirectoryIfMissing String -dbDir +dbDir String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => @@ -3076,29 +3076,29 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempBaseAbsPath String -> ShowS +tempBaseAbsPath String -> ShowS </> String -socketDir +socketDir - Handle -hNodeStdout <- String + Handle +hNodeStdout <- String -> IOMode -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Handle forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> IOMode -> m Handle H.openFile String -nodeStdoutFile IOMode +nodeStdoutFile IOMode IO.WriteMode - Handle -hNodeStderr <- String + Handle +hNodeStderr <- String -> IOMode -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Handle forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> IOMode -> m Handle H.openFile String -nodeStderrFile IOMode +nodeStderrFile IOMode IO.WriteMode Int @@ -3112,13 +3112,13 @@ forall (t :: * -> *) a. Foldable t => t a -> Int L.length (Sprocket -> String IO.sprocketArgumentName Sprocket -sprocket)) Int -> Int -> Bool +sprocket)) Int -> Int -> Bool forall a. Ord a => a -> a -> Bool (<=) Int IO.maxSprocketArgumentNameLength - String -portString <- ShowS + String +portString <- ShowS -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -3141,17 +3141,17 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "port" (Maybe Handle _, Maybe Handle _, Maybe Handle -_, ProcessHandle -hProcess, ReleaseKey +_, ProcessHandle +hProcess, ReleaseKey _) <- CreateProcess -> PropertyT (ReaderT IntegrationState (ResourceT IO)) @@ -3186,63 +3186,63 @@ "run" , String "--config", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "configuration.yaml" , String "--topology", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "topology.json" , String "--database-path", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "db" , String "--socket-path", Sprocket -> String IO.sprocketArgumentName Sprocket -sprocket +sprocket , String "--shelley-kes-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/kes.skey" , String "--shelley-vrf-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/vrf.skey" , String "--shelley-operational-certificate", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/node.cert" , String "--port", String -portString +portString , String "--delegation-certificate", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "byron/delegate.cert" , String "--signing-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "byron/delegate.key" ] PropertyT (ReaderT IntegrationState (ResourceT IO)) CreateProcess @@ -3251,25 +3251,25 @@ (ReaderT IntegrationState (ResourceT IO)) CreateProcess forall (f :: * -> *) a b. Functor f => f a -> (a -> b) -> f b <&> - ( \CreateProcess -cp -> CreateProcess -cp + ( \CreateProcess +cp -> CreateProcess +cp { std_in :: StdStream IO.std_in = StdStream IO.CreatePipe , std_out :: StdStream IO.std_out = Handle -> StdStream IO.UseHandle Handle -hNodeStdout +hNodeStdout , std_err :: StdStream IO.std_err = Handle -> StdStream IO.UseHandle Handle -hNodeStderr +hNodeStderr , cwd :: Maybe String IO.cwd = String -> Maybe String forall a. a -> Maybe a Just String -tempBaseAbsPath +tempBaseAbsPath } ) ) @@ -3290,7 +3290,7 @@ (MonadTest m, MonadIO m, HasCallStack) => ProcessHandle -> m (Maybe Pid) H.getPid ProcessHandle -hProcess +hProcess Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -3331,7 +3331,7 @@ "-iTCP:" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -portString, String +portString, String "-sTCP:LISTEN", String "-n", String "-P"] String @@ -3350,16 +3350,16 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do - String -dbDir <- String +$ \String +node -> do + String +dbDir <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -3370,50 +3370,50 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "db/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -node - String -nodeStdoutFile <- String +node + String +nodeStdoutFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -logDir (String +logDir (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -node String -> ShowS +node String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stdout.log" - String -nodeStderrFile <- String + String +nodeStderrFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -logDir (String +logDir (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -node String -> ShowS +node String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stderr.log" - Sprocket -sprocket <- Sprocket + Sprocket +sprocket <- Sprocket -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Sprocket forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -3425,17 +3425,17 @@ forall a b. (a -> b) -> a -> b $ String -> String -> Sprocket Sprocket String -tempBaseAbsPath (String -socketDir String -> ShowS +tempBaseAbsPath (String +socketDir String -> ShowS </> String -node) +node) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> m () H.createDirectoryIfMissing String -dbDir +dbDir String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => @@ -3444,29 +3444,29 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempBaseAbsPath String -> ShowS +tempBaseAbsPath String -> ShowS </> String -socketDir +socketDir - Handle -hNodeStdout <- String + Handle +hNodeStdout <- String -> IOMode -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Handle forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> IOMode -> m Handle H.openFile String -nodeStdoutFile IOMode +nodeStdoutFile IOMode IO.WriteMode - Handle -hNodeStderr <- String + Handle +hNodeStderr <- String -> IOMode -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Handle forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> IOMode -> m Handle H.openFile String -nodeStderrFile IOMode +nodeStderrFile IOMode IO.WriteMode Int @@ -3480,13 +3480,13 @@ forall (t :: * -> *) a. Foldable t => t a -> Int L.length (Sprocket -> String IO.sprocketArgumentName Sprocket -sprocket)) Int -> Int -> Bool +sprocket)) Int -> Int -> Bool forall a. Ord a => a -> a -> Bool (<=) Int IO.maxSprocketArgumentNameLength - String -portString <- ShowS + String +portString <- ShowS -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -3509,9 +3509,9 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "port" @@ -3566,46 +3566,46 @@ "run" , String "--config", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "configuration.yaml" , String "--topology", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "topology.json" , String "--database-path", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "db" , String "--socket-path", Sprocket -> String IO.sprocketArgumentName Sprocket -sprocket +sprocket , String "--shelley-kes-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/kes.skey" , String "--shelley-vrf-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/vrf.skey" , String "--shelley-operational-certificate", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "shelley/node.cert" , String @@ -3613,32 +3613,32 @@ ifaceAddress , String "--port", String -portString +portString ] PropertyT (ReaderT IntegrationState (ResourceT IO)) CreateProcess -> (CreateProcess -> CreateProcess) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) CreateProcess forall (f :: * -> *) a b. Functor f => f a -> (a -> b) -> f b <&> - ( \CreateProcess -cp -> CreateProcess -cp + ( \CreateProcess +cp -> CreateProcess +cp { std_in :: StdStream IO.std_in = StdStream IO.CreatePipe , std_out :: StdStream IO.std_out = Handle -> StdStream IO.UseHandle Handle -hNodeStdout +hNodeStdout , std_err :: StdStream IO.std_err = Handle -> StdStream IO.UseHandle Handle -hNodeStderr +hNodeStderr , cwd :: Maybe String IO.cwd = String -> Maybe String forall a. a -> Maybe a Just String -tempBaseAbsPath +tempBaseAbsPath } ) ) @@ -3682,22 +3682,22 @@ "-iTCP:" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -portString, String +portString, String "-sTCP:LISTEN", String "-n", String "-P"] String "" - UTCTime -now <- IO UTCTime + UTCTime +now <- IO UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, MonadIO m, HasCallStack, Show a) => IO a -> m a H.noteShowIO IO UTCTime DTC.getCurrentTime - UTCTime -deadline <- UTCTime + UTCTime +deadline <- UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -3710,7 +3710,7 @@ $ NominalDiffTime -> UTCTime -> UTCTime DTC.addUTCTime NominalDiffTime 90 UTCTime -now +now [String] -> (String @@ -3720,16 +3720,16 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do - Sprocket -sprocket <- Sprocket +$ \String +node -> do + Sprocket +sprocket <- Sprocket -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Sprocket forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -3741,12 +3741,12 @@ forall a b. (a -> b) -> a -> b $ String -> String -> Sprocket Sprocket String -tempBaseAbsPath (String -socketDir String -> ShowS +tempBaseAbsPath (String +socketDir String -> ShowS </> String -node) - String -_spocketSystemNameFile <- String +node) + String +_spocketSystemNameFile <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -3758,7 +3758,7 @@ forall a b. (a -> b) -> a -> b $ Sprocket -> String IO.sprocketSystemName Sprocket -sprocket +sprocket UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -3766,7 +3766,7 @@ (MonadTest m, MonadIO m, HasCallStack) => UTCTime -> m Bool -> m () H.waitByDeadlineM UTCTime -deadline (PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool +deadline (PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -3777,7 +3777,7 @@ (MonadTest m, MonadIO m, HasCallStack) => Sprocket -> m Bool H.doesSprocketExist Sprocket -sprocket +sprocket [String] -> (String @@ -3787,29 +3787,29 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do - String -nodeStdoutFile <- String +$ \String +node -> do + String +nodeStdoutFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -logDir (String +logDir (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -node String -> ShowS +node String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stdout.log" @@ -3820,14 +3820,14 @@ (MonadTest m, MonadIO m, HasCallStack) => UTCTime -> IO Bool -> m () H.assertByDeadlineIO UTCTime -deadline (IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +deadline (IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -> String -> IO Bool IO.fileContains String "until genesis start time at" String -nodeStdoutFile +nodeStdoutFile UTCTime -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -3835,14 +3835,14 @@ (MonadTest m, MonadIO m, HasCallStack) => UTCTime -> IO Bool -> m () H.assertByDeadlineIO UTCTime -deadline (IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +deadline (IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -> String -> IO Bool IO.fileContains String "Chain extended, new tip" String -nodeStdoutFile +nodeStdoutFile IO UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -3855,5 +3855,5 @@ [String] -> Integration [String] forall (m :: * -> *) a. Monad m => a -> m a return [String] -allNodes +allNodes \ No newline at end of file diff --git a/cardano-node-chairman/src/Testnet.Conf.html b/cardano-node-chairman/src/Testnet.Conf.html index b4eb5c76f7a..b48c350409c 100644 --- a/cardano-node-chairman/src/Testnet.Conf.html +++ b/cardano-node-chairman/src/Testnet.Conf.html @@ -34,14 +34,14 @@ socketDir :: FilePath , Conf -> Int testnetMagic :: Int - } deriving (Conf -> Conf -> Bool + } deriving (Conf -> Conf -> Bool (Conf -> Conf -> Bool) -> (Conf -> Conf -> Bool) -> Eq Conf forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: Conf -> Conf -> Bool $c/= :: Conf -> Conf -> Bool == :: Conf -> Conf -> Bool $c== :: Conf -> Conf -> Bool -Eq, Int -> Conf -> ShowS +Eq, Int -> Conf -> ShowS [Conf] -> ShowS Conf -> FilePath (Int -> Conf -> ShowS) @@ -58,11 +58,11 @@ mkConf :: FilePath -> Maybe Int -> H.Integration Conf mkConf :: FilePath -> Maybe Int -> Integration Conf -mkConf FilePath -tempAbsPath Maybe Int -maybeMagic = do - Int -testnetMagic <- IO Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Int +mkConf FilePath +tempAbsPath Maybe Int +maybeMagic = do + Int +testnetMagic <- IO Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Int forall (m :: * -> *) a. (MonadTest m, MonadIO m, HasCallStack, Show a) => IO a -> m a @@ -79,9 +79,9 @@ 2000)) Int -> IO Int forall (m :: * -> *) a. Monad m => a -> m a return Maybe Int -maybeMagic - FilePath -tempBaseAbsPath <- FilePath +maybeMagic + FilePath +tempBaseAbsPath <- FilePath -> PropertyT (ReaderT IntegrationState (ResourceT IO)) FilePath forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -93,9 +93,9 @@ forall a b. (a -> b) -> a -> b $ ShowS FP.takeDirectory FilePath -tempAbsPath - FilePath -tempRelPath <- FilePath +tempAbsPath + FilePath +tempRelPath <- FilePath -> PropertyT (ReaderT IntegrationState (ResourceT IO)) FilePath forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -107,10 +107,10 @@ forall a b. (a -> b) -> a -> b $ FilePath -> ShowS FP.makeRelative FilePath -tempBaseAbsPath FilePath -tempAbsPath - FilePath -base <- PropertyT (ReaderT IntegrationState (ResourceT IO)) FilePath +tempBaseAbsPath FilePath +tempAbsPath + FilePath +base <- PropertyT (ReaderT IntegrationState (ResourceT IO)) FilePath -> PropertyT (ReaderT IntegrationState (ResourceT IO)) FilePath forall (m :: * -> *) a. (MonadTest m, MonadCatch m, HasCallStack, Show a) => @@ -118,8 +118,8 @@ H.noteShowM PropertyT (ReaderT IntegrationState (ResourceT IO)) FilePath forall (m :: * -> *). (MonadTest m, MonadIO m) => m FilePath H.getProjectBase - FilePath -socketDir <- FilePath + FilePath +socketDir <- FilePath -> PropertyT (ReaderT IntegrationState (ResourceT IO)) FilePath forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -130,18 +130,18 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) FilePath forall a b. (a -> b) -> a -> b $ FilePath -tempRelPath FilePath -> ShowS +tempRelPath FilePath -> ShowS </> FilePath "socket" - FilePath -logDir <- FilePath + FilePath +logDir <- FilePath -> FilePath -> PropertyT (ReaderT IntegrationState (ResourceT IO)) FilePath forall (m :: * -> *). (MonadTest m, HasCallStack) => FilePath -> FilePath -> m FilePath H.noteTempFile FilePath -tempAbsPath FilePath +tempAbsPath FilePath "/logs" Conf -> Integration Conf @@ -172,5 +172,5 @@ tempBaseAbsPath :: FilePath tempRelPath :: FilePath tempAbsPath :: FilePath -..} +..} \ No newline at end of file diff --git a/cardano-node-chairman/src/Testnet.List.html b/cardano-node-chairman/src/Testnet.List.html index 5cafc1002a3..ad35d82a554 100644 --- a/cardano-node-chairman/src/Testnet.List.html +++ b/cardano-node-chairman/src/Testnet.List.html @@ -6,27 +6,27 @@ import GHC.Num -- | Drop the zero-based n-th element from the list. -dropNth :: Int -> [a] -> [a] +dropNth :: Int -> [a] -> [a] dropNth :: Int -> [a] -> [a] dropNth Int _ [] = [] dropNth Int 0 (a -_:[a] -as) = [a] -as -dropNth Int -i (a -a:[a] -as) = a -aa -> [a] -> [a] +_:[a] +as) = [a] +as +dropNth Int +i (a +a:[a] +as) = a +aa -> [a] -> [a] forall a. a -> [a] -> [a] :Int -> [a] -> [a] forall a. Int -> [a] -> [a] dropNth (Int -i Int -> Int -> Int +i Int -> Int -> Int forall a. Num a => a -> a -> a - Int 1) [a] -as +as \ No newline at end of file diff --git a/cardano-node-chairman/src/Testnet.Shelley.html b/cardano-node-chairman/src/Testnet.Shelley.html index 55e05d13cc8..f7d33a0501c 100644 --- a/cardano-node-chairman/src/Testnet.Shelley.html +++ b/cardano-node-chairman/src/Testnet.Shelley.html @@ -88,7 +88,7 @@ slotLength :: Double , TestnetOptions -> Integer maxLovelaceSupply :: Integer - } deriving (TestnetOptions -> TestnetOptions -> Bool + } deriving (TestnetOptions -> TestnetOptions -> Bool (TestnetOptions -> TestnetOptions -> Bool) -> (TestnetOptions -> TestnetOptions -> Bool) -> Eq TestnetOptions forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -96,7 +96,7 @@ $c/= :: TestnetOptions -> TestnetOptions -> Bool == :: TestnetOptions -> TestnetOptions -> Bool $c== :: TestnetOptions -> TestnetOptions -> Bool -Eq, Int -> TestnetOptions -> ShowS +Eq, Int -> TestnetOptions -> ShowS [TestnetOptions] -> ShowS TestnetOptions -> String (Int -> TestnetOptions -> ShowS) @@ -154,9 +154,9 @@ rewriteGenesisSpec :: TestnetOptions -> UTCTime -> Value -> Value rewriteGenesisSpec :: TestnetOptions -> UTCTime -> Value -> Value -rewriteGenesisSpec TestnetOptions -testnetOptions UTCTime -startTime = +rewriteGenesisSpec TestnetOptions +testnetOptions UTCTime +startTime = (HashMap Text Value -> HashMap Text Value) -> Value -> Value rewriteObject ((HashMap Text Value -> HashMap Text Value) -> Value -> Value) @@ -171,7 +171,7 @@ forall a. ToJSON a => a -> Value J.toJSON @Double (TestnetOptions -> Double activeSlotsCoeff TestnetOptions -testnetOptions)) +testnetOptions)) (HashMap Text Value -> HashMap Text Value) -> (HashMap Text Value -> HashMap Text Value) -> HashMap Text Value @@ -186,7 +186,7 @@ forall a. ToJSON a => a -> Value J.toJSON @Int (TestnetOptions -> Int securityParam TestnetOptions -testnetOptions)) +testnetOptions)) (HashMap Text Value -> HashMap Text Value) -> (HashMap Text Value -> HashMap Text Value) -> HashMap Text Value @@ -201,7 +201,7 @@ forall a. ToJSON a => a -> Value J.toJSON @Int (TestnetOptions -> Int epochLength TestnetOptions -testnetOptions)) +testnetOptions)) (HashMap Text Value -> HashMap Text Value) -> (HashMap Text Value -> HashMap Text Value) -> HashMap Text Value @@ -216,7 +216,7 @@ forall a. ToJSON a => a -> Value J.toJSON @Double (TestnetOptions -> Double slotLength TestnetOptions -testnetOptions)) +testnetOptions)) (HashMap Text Value -> HashMap Text Value) -> (HashMap Text Value -> HashMap Text Value) -> HashMap Text Value @@ -231,7 +231,7 @@ forall a. ToJSON a => a -> Value J.toJSON @Integer (TestnetOptions -> Integer maxLovelaceSupply TestnetOptions -testnetOptions)) +testnetOptions)) (HashMap Text Value -> HashMap Text Value) -> (HashMap Text Value -> HashMap Text Value) -> HashMap Text Value @@ -246,7 +246,7 @@ forall a. ToJSON a => a -> Value J.toJSON @String (UTCTime -> String DTC.formatIso8601 UTCTime -startTime)) +startTime)) (HashMap Text Value -> HashMap Text Value) -> (HashMap Text Value -> HashMap Text Value) -> HashMap Text Value @@ -280,8 +280,8 @@ testnet :: TestnetOptions -> H.Conf -> H.Integration [String] testnet :: TestnetOptions -> Conf -> Integration [String] -testnet TestnetOptions -testnetOptions H.Conf {Int +testnet TestnetOptions +testnetOptions H.Conf {Int String testnetMagic :: Conf -> Int socketDir :: Conf -> String @@ -314,57 +314,57 @@ H.note String OS.os - let praosNodesN :: [String] -praosNodesN = Show Int => Int -> String + let praosNodesN :: [String] +praosNodesN = Show Int => Int -> String forall a. Show a => a -> String show @Int (Int -> String) -> [Int] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [Int 1 .. TestnetOptions -> Int numPraosNodes TestnetOptions -testnetOptions] - let praosNodes :: [String] -praosNodes = (String +testnetOptions] + let praosNodes :: [String] +praosNodes = (String "node-praos" String -> ShowS forall a. Semigroup a => a -> a -> a <>) ShowS -> [String] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [String] -praosNodesN - let poolNodesN :: [String] -poolNodesN = Show Int => Int -> String +praosNodesN + let poolNodesN :: [String] +poolNodesN = Show Int => Int -> String forall a. Show a => a -> String show @Int (Int -> String) -> [Int] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [Int 1 .. TestnetOptions -> Int numPoolNodes TestnetOptions -testnetOptions] - let poolNodes :: [String] -poolNodes = (String +testnetOptions] + let poolNodes :: [String] +poolNodes = (String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <>) ShowS -> [String] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [String] -poolNodesN - let allNodes :: [String] -allNodes = [String] -praosNodes [String] -> [String] -> [String] +poolNodesN + let allNodes :: [String] +allNodes = [String] +praosNodes [String] -> [String] -> [String] forall a. Semigroup a => a -> a -> a <> [String] -poolNodes :: [String] - let numPraosNodes :: Int -numPraosNodes = [String] -> Int +poolNodes :: [String] + let numPraosNodes :: Int +numPraosNodes = [String] -> Int forall (t :: * -> *) a. Foldable t => t a -> Int L.length [String] -allNodes :: Int - let userPoolN :: [String] -userPoolN = [String] -poolNodesN -- User N will delegate to pool N +allNodes :: Int + let userPoolN :: [String] +userPoolN = [String] +poolNodesN -- User N will delegate to pool N - [Int] -allPorts <- IO [Int] + [Int] +allPorts <- IO [Int] -> PropertyT (ReaderT IntegrationState (ResourceT IO)) [Int] forall (m :: * -> *) a. (MonadTest m, MonadIO m, HasCallStack, Show a) => @@ -376,9 +376,9 @@ forall a b. (a -> b) -> a -> b $ Int -> IO [Int] IO.allocateRandomPorts Int -numPraosNodes - Map String Int -nodeToPort <- Map String Int +numPraosNodes + Map String Int +nodeToPort <- Map String Int -> PropertyT (ReaderT IntegrationState (ResourceT IO)) (Map String Int) forall (m :: * -> *) a. @@ -389,18 +389,18 @@ M.fromList ([String] -> [Int] -> [(String, Int)] forall a b. [a] -> [b] -> [(a, b)] L.zip [String] -allNodes [Int] -allPorts)) - UTCTime -currentTime <- IO UTCTime +allNodes [Int] +allPorts)) + UTCTime +currentTime <- IO UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, MonadIO m, HasCallStack, Show a) => IO a -> m a H.noteShowIO IO UTCTime DTC.getCurrentTime - UTCTime -startTime <- UTCTime + UTCTime +startTime <- UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -413,30 +413,30 @@ $ NominalDiffTime -> UTCTime -> UTCTime DTC.addUTCTime NominalDiffTime 31 UTCTime -currentTime -- 31 seconds into the future +currentTime -- 31 seconds into the future - let userAddrs :: [String] -userAddrs = (String + let userAddrs :: [String] +userAddrs = (String "user" String -> ShowS forall a. Semigroup a => a -> a -> a <>) ShowS -> [String] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [String] -userPoolN - let poolAddrs :: [String] -poolAddrs = (String +userPoolN + let poolAddrs :: [String] +poolAddrs = (String "pool-owner" String -> ShowS forall a. Semigroup a => a -> a -> a <>) ShowS -> [String] -> [String] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [String] -poolNodesN - let addrs :: [String] -addrs = [String] -userAddrs [String] -> [String] -> [String] +poolNodesN + let addrs :: [String] +addrs = [String] +userAddrs [String] -> [String] -> [String] forall a. Semigroup a => a -> a -> a <> [String] -poolAddrs +poolAddrs String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -445,11 +445,11 @@ String -> String -> m () H.copyFile (String -base String -> ShowS +base String -> ShowS </> String "configuration/chairman/shelley-only/configuration.yaml") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "configuration.yaml") @@ -475,10 +475,10 @@ "--testnet-magic", Int -> String forall a. Show a => a -> String show @Int Int -testnetMagic +testnetMagic , String "--genesis-dir", String -tempAbsPath +tempAbsPath ] -- Then edit the genesis.spec.json ... @@ -493,12 +493,12 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> (Value -> Value) -> m () H.rewriteJsonFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "genesis.spec.json") (TestnetOptions -> UTCTime -> Value -> Value rewriteGenesisSpec TestnetOptions -testnetOptions UTCTime -startTime) +testnetOptions UTCTime +startTime) String -> (Value -> Value) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -506,12 +506,12 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> (Value -> Value) -> m () H.rewriteJsonFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "genesis.json" ) (TestnetOptions -> UTCTime -> Value -> Value rewriteGenesisSpec TestnetOptions -testnetOptions UTCTime -startTime) +testnetOptions UTCTime +startTime) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). @@ -521,7 +521,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "genesis.spec.json" @@ -547,44 +547,44 @@ "--testnet-magic", Int -> String forall a. Show a => a -> String show @Int Int -testnetMagic +testnetMagic , String "--genesis-dir", String -tempAbsPath +tempAbsPath , String "--gen-genesis-keys", Int -> String forall a. Show a => a -> String show Int -numPraosNodes +numPraosNodes , String "--gen-utxo-keys", Int -> String forall a. Show a => a -> String show @Int (TestnetOptions -> Int numPoolNodes TestnetOptions -testnetOptions) +testnetOptions) ] #ifdef UNIX --TODO: Remove me after #1948 is merged. - let numNodesStr :: [String] -numNodesStr = (Int -> String) -> [Int] -> [String] + let numNodesStr :: [String] +numNodesStr = (Int -> String) -> [Int] -> [String] forall a b. (a -> b) -> [a] -> [b] map Int -> String forall a. Show a => a -> String show [Int 1..Int -numPraosNodes] - vrfPath :: ShowS -vrfPath String -n = String -tempAbsPath String -> ShowS +numPraosNodes] + vrfPath :: ShowS +vrfPath String +n = String +tempAbsPath String -> ShowS </> String "delegate-keys" String -> ShowS </> String "delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vrf.skey" @@ -599,13 +599,13 @@ forall (t :: * -> *) (m :: * -> *) a b. (Foldable t, Monad m) => (a -> m b) -> t a -> m () -mapM_ (\String -n -> String -> FileMode -> IO () +mapM_ (\String +n -> String -> FileMode -> IO () setFileMode (ShowS -vrfPath String -n) FileMode +vrfPath String +n) FileMode ownerModes) [String] -numNodesStr +numNodesStr #endif [String] @@ -616,14 +616,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -p -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () +$ \String +p -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> m () @@ -631,9 +631,9 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -p +p -- Make the pool operator cold keys -- This was done already for the BFT nodes as part of the genesis creation @@ -645,14 +645,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -n -> do +$ \String +n -> do PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (f :: * -> *) a. Functor f => f a -> f () @@ -672,23 +672,23 @@ "key-gen" , String "--cold-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -n String -> ShowS +n String -> ShowS </> String "operator.vkey" , String "--cold-signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -n String -> ShowS +n String -> ShowS </> String "operator.skey" , String "--operational-certificate-issue-counter-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -n String -> ShowS +n String -> ShowS </> String "operator.counter" ] @@ -712,16 +712,16 @@ "key-gen-VRF" , String "--verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -n String -> ShowS +n String -> ShowS </> String "vrf.vkey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -n String -> ShowS +n String -> ShowS </> String "vrf.skey" ] @@ -744,9 +744,9 @@ forall a b. (a -> b) -> a -> b $ String -> FileMode -> IO () setFileMode (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -n String -> ShowS +n String -> ShowS </> String "vrf.skey") FileMode ownerModes @@ -760,35 +760,35 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -praosNodesN ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +praosNodesN ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -n -> do +$ \String +n -> do String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "delegate-keys/delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".skey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-praos" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS </> String "operator.skey") String @@ -797,21 +797,21 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "delegate-keys/delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vkey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-praos" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS </> String "operator.vkey") String @@ -820,21 +820,21 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "delegate-keys/delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".counter") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-praos" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS </> String "operator.counter") String @@ -843,21 +843,21 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "delegate-keys/delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vrf.vkey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-praos" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS </> String "vrf.vkey") String @@ -866,21 +866,21 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "delegate-keys/delegate" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vrf.skey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-praos" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS </> String "vrf.skey") @@ -893,14 +893,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do +$ \String +node -> do PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (f :: * -> *) a. Functor f => f a -> f () @@ -920,16 +920,16 @@ "key-gen-KES" , String "--verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "kes.vkey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "kes.skey" ] @@ -956,30 +956,30 @@ "0" , String "--kes-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "kes.vkey" , String "--cold-signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "operator.skey" , String "--operational-certificate-issue-counter-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "operator.counter" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "node.cert" ] @@ -993,24 +993,24 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do - let port :: Int -port = Maybe Int -> Int +$ \String +node -> do + let port :: Int +port = Maybe Int -> Int forall a. HasCallStack => Maybe a -> a fromJust (Maybe Int -> Int) -> Maybe Int -> Int forall a b. (a -> b) -> a -> b $ String -> Map String Int -> Maybe Int forall k a. Ord k => k -> Map k a -> Maybe a M.lookup String -node Map String Int -nodeToPort +node Map String Int +nodeToPort String -> ByteString -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -1018,9 +1018,9 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> ByteString -> m () H.lbsWriteFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "topology.json") (ByteString -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) @@ -1055,7 +1055,7 @@ .= Int -> Value forall a. ToJSON a => a -> Value J.toJSON @Int Int -peerPort +peerPort , Text "valency" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1064,12 +1064,12 @@ J.toJSON @Int Int 1 ] - | Int -peerPort <- [Int] -allPorts [Int] -> [Int] -> [Int] + | Int +peerPort <- [Int] +allPorts [Int] -> [Int] -> [Int] forall a. Eq a => [a] -> [a] -> [a] \\ [Int -port] +port] ] ] String @@ -1078,14 +1078,14 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.writeFile (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "port") (Int -> String forall a. Show a => a -> String show Int -port) +port) -- Generated node operator keys (cold, hot) and operational certs [String] @@ -1096,14 +1096,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -n -> Integration [String] +$ \String +n -> Integration [String] -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *) a. (MonadTest m, MonadCatch m, HasCallStack, Show a) => @@ -1122,9 +1122,9 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -n +n -- Make some payment and stake addresses -- user1..n: will own all the funds in the system, we'll set this up from @@ -1139,7 +1139,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses" @@ -1151,14 +1151,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -addrs ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +addrs ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -addr -> do +$ \String +addr -> do -- Payment address keys PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -1179,23 +1179,23 @@ "key-gen" , String "--verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vkey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".skey" @@ -1221,23 +1221,23 @@ "key-gen" , String "--verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.skey" @@ -1263,23 +1263,23 @@ "build" , String "--payment-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vkey" , String "--stake-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey" @@ -1287,15 +1287,15 @@ "--testnet-magic", Int -> String forall a. Show a => a -> String show @Int Int -testnetMagic +testnetMagic , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".addr" @@ -1321,12 +1321,12 @@ "build" , String "--stake-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey" @@ -1334,15 +1334,15 @@ "--testnet-magic", Int -> String forall a. Show a => a -> String show @Int Int -testnetMagic +testnetMagic , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.addr" @@ -1368,23 +1368,23 @@ "registration-certificate" , String "--stake-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.reg.cert" @@ -1398,14 +1398,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -userPoolN ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +userPoolN ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -n -> do +$ \String +n -> do -- Stake address delegation certs PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -1426,33 +1426,33 @@ "delegation-certificate" , String "--stake-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey" , String "--cold-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS </> String "operator.vkey" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.deleg.cert" @@ -1464,21 +1464,21 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/pool-owner" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.vkey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS </> String "owner.vkey") String @@ -1487,21 +1487,21 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> String -> m () H.createFileLink (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/pool-owner" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.skey") (String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS </> String "owner.skey") @@ -1526,7 +1526,7 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses" @@ -1539,14 +1539,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do +$ \String +node -> do PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (f :: * -> *) a. Functor f => f a -> f () @@ -1568,7 +1568,7 @@ "--testnet-magic", Int -> String forall a. Show a => a -> String show @Int Int -testnetMagic +testnetMagic , String "--pool-pledge", String "0" @@ -1580,37 +1580,37 @@ "0" , String "--cold-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "operator.vkey" , String "--vrf-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "vrf.vkey" , String "--reward-account-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "owner.vkey" , String "--pool-owner-stake-verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "owner.vkey" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "registration.cert" ] @@ -1624,14 +1624,14 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +poolNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () +$ \String +node -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => IO Bool -> m () @@ -1645,9 +1645,9 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "registration.cert" @@ -1662,22 +1662,22 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -userPoolN ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +userPoolN ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -n -> do +$ \String +n -> do -- We'll transfer all the funds to the user n, which delegates to pool n -- We'll register certs to: -- 1. register the pool-owner n stake address -- 2. register the stake pool n -- 3. register the usern stake address -- 4. delegate from the usern stake address to the stake pool - String -genesisTxinResult <- PropertyT (ReaderT IntegrationState (ResourceT IO)) String + String +genesisTxinResult <- PropertyT (ReaderT IntegrationState (ResourceT IO)) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, MonadCatch m, HasCallStack, Show a) => @@ -1705,22 +1705,22 @@ "--testnet-magic", Int -> String forall a. Show a => a -> String show @Int Int -testnetMagic +testnetMagic , String "--verification-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "utxo-keys/utxo" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".vkey" ] - String -userNAddr <- String + String +userNAddr <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => @@ -1731,12 +1731,12 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".addr" @@ -1766,10 +1766,10 @@ "0" , String "--tx-in", String -genesisTxinResult +genesisTxinResult , String "--tx-out", String -userNAddr String -> ShowS +userNAddr String -> ShowS forall a. Semigroup a => a -> a -> a <> String "+" String -> ShowS @@ -1778,59 +1778,59 @@ forall a. Show a => a -> String show @Integer (TestnetOptions -> Integer maxLovelaceSupply TestnetOptions -testnetOptions) +testnetOptions) , String "--certificate-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/pool-owner" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.reg.cert" , String "--certificate-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "/registration.cert" , String "--certificate-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.reg.cert" , String "--certificate-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.deleg.cert" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "tx" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".txbody" @@ -1861,45 +1861,45 @@ "sign" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "utxo-keys/utxo" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".skey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "addresses/user" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "-stake.skey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "/owner.skey" , String "--signing-key-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "node-pool" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String "/operator.skey" @@ -1907,26 +1907,26 @@ "--testnet-magic", Int -> String forall a. Show a => a -> String show @Int Int -testnetMagic +testnetMagic , String "--tx-body-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "tx" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".txbody" , String "--out-file", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "tx" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".tx" @@ -1947,12 +1947,12 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "tx" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -n String -> ShowS +n String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".tx" @@ -1965,7 +1965,7 @@ (MonadTest m, MonadIO m, HasCallStack) => String -> m () H.createDirectoryIfMissing String -logDir +logDir [String] -> (String @@ -1975,16 +1975,16 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do - String -dbDir <- String +$ \String +node -> do + String +dbDir <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -1995,50 +1995,50 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "db/" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -node - String -nodeStdoutFile <- String +node + String +nodeStdoutFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -logDir (String +logDir (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -node String -> ShowS +node String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stdout.log" - String -nodeStderrFile <- String + String +nodeStderrFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -logDir (String +logDir (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -node String -> ShowS +node String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stderr.log" - Sprocket -sprocket <- Sprocket + Sprocket +sprocket <- Sprocket -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Sprocket forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -2050,17 +2050,17 @@ forall a b. (a -> b) -> a -> b $ String -> String -> Sprocket Sprocket String -tempBaseAbsPath (String -socketDir String -> ShowS +tempBaseAbsPath (String +socketDir String -> ShowS </> String -node) +node) String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> m () H.createDirectoryIfMissing String -dbDir +dbDir String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => @@ -2069,29 +2069,29 @@ -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -tempBaseAbsPath String -> ShowS +tempBaseAbsPath String -> ShowS </> String -socketDir +socketDir - Handle -hNodeStdout <- String + Handle +hNodeStdout <- String -> IOMode -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Handle forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> IOMode -> m Handle H.openFile String -nodeStdoutFile IOMode +nodeStdoutFile IOMode IO.WriteMode - Handle -hNodeStderr <- String + Handle +hNodeStderr <- String -> IOMode -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Handle forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => String -> IOMode -> m Handle H.openFile String -nodeStderrFile IOMode +nodeStderrFile IOMode IO.WriteMode Int @@ -2105,13 +2105,13 @@ forall (t :: * -> *) a. Foldable t => t a -> Int L.length (Sprocket -> String IO.sprocketArgumentName Sprocket -sprocket)) Int -> Int -> Bool +sprocket)) Int -> Int -> Bool forall a. Ord a => a -> a -> Bool (<=) Int IO.maxSprocketArgumentNameLength - String -portString <- String + String +portString <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, MonadIO m, HasCallStack) => @@ -2122,9 +2122,9 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "port" @@ -2179,42 +2179,42 @@ "run" , String "--config", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String "configuration.yaml" , String "--topology", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "topology.json" , String "--database-path", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "db" , String "--shelley-kes-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "kes.skey" , String "--shelley-vrf-key", String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "vrf.skey" , String "--shelley-operational-certificate" , String -tempAbsPath String -> ShowS +tempAbsPath String -> ShowS </> String -node String -> ShowS +node String -> ShowS </> String "node.cert" , String @@ -2222,36 +2222,36 @@ ifaceAddress , String "--port", String -portString +portString , String "--socket-path", Sprocket -> String IO.sprocketArgumentName Sprocket -sprocket +sprocket ] PropertyT (ReaderT IntegrationState (ResourceT IO)) CreateProcess -> (CreateProcess -> CreateProcess) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) CreateProcess forall (f :: * -> *) a b. Functor f => f a -> (a -> b) -> f b <&> - ( \CreateProcess -cp -> CreateProcess -cp + ( \CreateProcess +cp -> CreateProcess +cp { std_in :: StdStream IO.std_in = StdStream IO.CreatePipe , std_out :: StdStream IO.std_out = Handle -> StdStream IO.UseHandle Handle -hNodeStdout +hNodeStdout , std_err :: StdStream IO.std_err = Handle -> StdStream IO.UseHandle Handle -hNodeStderr +hNodeStderr , cwd :: Maybe String IO.cwd = String -> Maybe String forall a. a -> Maybe a Just String -tempBaseAbsPath +tempBaseAbsPath } ) ) @@ -2295,22 +2295,22 @@ "-iTCP:" String -> ShowS forall a. Semigroup a => a -> a -> a <> String -portString, String +portString, String "-sTCP:LISTEN", String "-n", String "-P"] String "" - UTCTime -now <- IO UTCTime + UTCTime +now <- IO UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, MonadIO m, HasCallStack, Show a) => IO a -> m a H.noteShowIO IO UTCTime DTC.getCurrentTime - UTCTime -deadline <- UTCTime + UTCTime +deadline <- UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) UTCTime forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -2323,7 +2323,7 @@ $ NominalDiffTime -> UTCTime -> UTCTime DTC.addUTCTime NominalDiffTime 90 UTCTime -now +now [String] -> (String @@ -2333,16 +2333,16 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do - Sprocket -sprocket <- Sprocket +$ \String +node -> do + Sprocket +sprocket <- Sprocket -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Sprocket forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -2354,12 +2354,12 @@ forall a b. (a -> b) -> a -> b $ String -> String -> Sprocket Sprocket String -tempBaseAbsPath (String -socketDir String -> ShowS +tempBaseAbsPath (String +socketDir String -> ShowS </> String -node) - String -_spocketSystemNameFile <- String +node) + String +_spocketSystemNameFile <- String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *) a. (MonadTest m, HasCallStack, Show a) => @@ -2371,7 +2371,7 @@ forall a b. (a -> b) -> a -> b $ Sprocket -> String IO.sprocketSystemName Sprocket -sprocket +sprocket UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -2379,7 +2379,7 @@ (MonadTest m, MonadIO m, HasCallStack) => UTCTime -> m Bool -> m () H.waitByDeadlineM UTCTime -deadline (PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool +deadline (PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -2390,7 +2390,7 @@ (MonadTest m, MonadIO m, HasCallStack) => Sprocket -> m Bool H.doesSprocketExist Sprocket -sprocket +sprocket [String] -> (String @@ -2400,29 +2400,29 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [String] -allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +allNodes ((String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b -$ \String -node -> do - String -nodeStdoutFile <- String +$ \String +node -> do + String +nodeStdoutFile <- String -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall (m :: * -> *). (MonadTest m, HasCallStack) => String -> String -> m String H.noteTempFile String -logDir (String +logDir (String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String) -> String -> PropertyT (ReaderT IntegrationState (ResourceT IO)) String forall a b. (a -> b) -> a -> b $ String -node String -> ShowS +node String -> ShowS forall a. Semigroup a => a -> a -> a <> String ".stdout.log" @@ -2433,14 +2433,14 @@ (MonadTest m, MonadIO m, HasCallStack) => UTCTime -> IO Bool -> m () H.assertByDeadlineIO UTCTime -deadline (IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +deadline (IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -> String -> IO Bool IO.fileContains String "until genesis start time at" String -nodeStdoutFile +nodeStdoutFile UTCTime -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -2448,14 +2448,14 @@ (MonadTest m, MonadIO m, HasCallStack) => UTCTime -> IO Bool -> m () H.assertByDeadlineIO UTCTime -deadline (IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) +deadline (IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> IO Bool -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall a b. (a -> b) -> a -> b $ String -> String -> IO Bool IO.fileContains String "Chain extended, new tip" String -nodeStdoutFile +nodeStdoutFile IO UTCTime -> PropertyT (ReaderT IntegrationState (ResourceT IO)) () @@ -2468,7 +2468,7 @@ [String] -> Integration [String] forall (m :: * -> *) a. Monad m => a -> m a return [String] -allNodes +allNodes hprop_testnet :: H.Property hprop_testnet :: Property @@ -2510,12 +2510,12 @@ -> PropertyT (ReaderT IntegrationState (ResourceT IO)) ()) -> Property forall a b. (a -> b) -> a -> b -$ \String -tempAbsPath' -> do - Conf -conf <- String -> Maybe Int -> Integration Conf +$ \String +tempAbsPath' -> do + Conf +conf <- String -> Maybe Int -> Integration Conf H.mkConf String -tempAbsPath' Maybe Int +tempAbsPath' Maybe Int forall a. Maybe a Nothing @@ -2570,7 +2570,7 @@ $ TestnetOptions -> Conf -> Integration [String] testnet TestnetOptions defaultTestnetOptions Conf -conf +conf PropertyT (ReaderT IntegrationState (ResourceT IO)) () forall (m :: * -> *) a. (MonadTest m, HasCallStack) => m a diff --git a/cardano-node/src/Cardano.Node.Configuration.Logging.html b/cardano-node/src/Cardano.Node.Configuration.Logging.html index ac3bd784a7a..3d8b8042946 100644 --- a/cardano-node/src/Cardano.Node.Configuration.Logging.html +++ b/cardano-node/src/Cardano.Node.Configuration.Logging.html @@ -96,66 +96,66 @@ -- https://github.com/input-output-hk/cardano-sl/blob/develop/util/src/Pos/Util/Log/LogSafe.hs data LoggingLayer = LoggingLayer { LoggingLayer -> forall (m :: * -> *). MonadIO m => Trace m Text -llBasicTrace :: forall m. (MonadIO m) => Trace m Text +llBasicTrace :: forall m. (MonadIO m) => Trace m Text , LoggingLayer -> forall (m :: * -> *) a. (MonadIO m, Show a) => Trace m a -> a -> m () -llLogDebug :: forall m a. (MonadIO m, Show a) => Trace m a -> a -> m () +llLogDebug :: forall m a. (MonadIO m, Show a) => Trace m a -> a -> m () , LoggingLayer -> forall (m :: * -> *) a. (MonadIO m, Show a) => Trace m a -> a -> m () -llLogInfo :: forall m a. (MonadIO m, Show a) => Trace m a -> a -> m () +llLogInfo :: forall m a. (MonadIO m, Show a) => Trace m a -> a -> m () , LoggingLayer -> forall (m :: * -> *) a. (MonadIO m, Show a) => Trace m a -> a -> m () -llLogNotice :: forall m a. (MonadIO m, Show a) => Trace m a -> a -> m () +llLogNotice :: forall m a. (MonadIO m, Show a) => Trace m a -> a -> m () , LoggingLayer -> forall (m :: * -> *) a. (MonadIO m, Show a) => Trace m a -> a -> m () -llLogWarning :: forall m a. (MonadIO m, Show a) => Trace m a -> a -> m () +llLogWarning :: forall m a. (MonadIO m, Show a) => Trace m a -> a -> m () , LoggingLayer -> forall (m :: * -> *) a. (MonadIO m, Show a) => Trace m a -> a -> m () -llLogError :: forall m a. (MonadIO m, Show a) => Trace m a -> a -> m () +llLogError :: forall m a. (MonadIO m, Show a) => Trace m a -> a -> m () , LoggingLayer -> forall (m :: * -> *) a. Show a => Text -> Trace m a -> Trace m a -llAppendName :: forall m a. (Show a) => LoggerName -> Trace m a -> Trace m a +llAppendName :: forall m a. (Show a) => LoggerName -> Trace m a -> Trace m a , LoggingLayer -> forall a t. Show a => Trace IO a -> Severity -> Text -> IO t -> IO t -llBracketMonadIO :: forall a t. (Show a) => Trace IO a -> Severity -> Text -> IO t -> IO t +llBracketMonadIO :: forall a t. (Show a) => Trace IO a -> Severity -> Text -> IO t -> IO t , LoggingLayer -> forall (m :: * -> *) a t. (MonadCatch m, MonadIO m, Show a) => Trace m a -> Severity -> Text -> m t -> m t llBracketMonadM - :: forall m a t. (MonadCatch m, MonadIO m, Show a) - => Trace m a -> Severity -> Text -> m t -> m t + :: forall m a t. (MonadCatch m, MonadIO m, Show a) + => Trace m a -> Severity -> Text -> m t -> m t , LoggingLayer -> forall (m :: * -> *) a t. (MonadIO m, Show a) => Trace m a -> Severity -> Text -> m t -> m t llBracketMonadX - :: forall m a t. (MonadIO m, Show a) => Trace m a -> Severity -> Text -> m t -> m t + :: forall m a t. (MonadIO m, Show a) => Trace m a -> Severity -> Text -> m t -> m t , LoggingLayer -> forall a t. Show a => Trace IO a -> Severity -> Text -> STM t -> IO t -llBracketStmIO :: forall a t. (Show a) => Trace IO a -> Severity -> Text -> STM t -> IO t +llBracketStmIO :: forall a t. (Show a) => Trace IO a -> Severity -> Text -> STM t -> IO t , LoggingLayer -> forall a t. Show a => Trace IO a -> Severity -> Text -> STM (t, [(LOMeta, LOContent a)]) -> IO t llBracketStmLogIO - :: forall a t. (Show a) - => Trace IO a -> Severity -> Text -> STM (t,[(LOMeta, LOContent a)]) -> IO t + :: forall a t. (Show a) + => Trace IO a -> Severity -> Text -> STM (t,[(LOMeta, LOContent a)]) -> IO t , LoggingLayer -> Configuration llConfiguration :: Configuration , LoggingLayer -> Backend Text -> BackendKind -> IO () @@ -193,13 +193,13 @@ -> ExceptT ConfigError IO Configuration forall b a. b -> (a -> b) -> Maybe a -> b maybe ExceptT ConfigError IO Configuration -emptyConfig FilePath -> ExceptT ConfigError IO Configuration -readConfig +emptyConfig FilePath -> ExceptT ConfigError IO Configuration +readConfig where - readConfig :: FilePath -> ExceptT ConfigError IO Configuration - readConfig :: FilePath -> ExceptT ConfigError IO Configuration -readConfig FilePath -fp = + readConfig :: FilePath -> ExceptT ConfigError IO Configuration + readConfig :: FilePath -> ExceptT ConfigError IO Configuration +readConfig FilePath +fp = IO Configuration -> (IOException -> ConfigError) -> ExceptT ConfigError IO Configuration @@ -208,7 +208,7 @@ IO a -> (IOException -> x) -> ExceptT x m a catchIOExceptT (FilePath -> IO Configuration Config.setup FilePath -fp) ((IOException -> ConfigError) +fp) ((IOException -> ConfigError) -> ExceptT ConfigError IO Configuration) -> (IOException -> ConfigError) -> ExceptT ConfigError IO Configuration @@ -216,27 +216,27 @@ $ \(IOException _ :: IOException) -> FilePath -> ConfigError ConfigErrorFileNotFound FilePath -fp +fp - emptyConfig :: ExceptT ConfigError IO Configuration - emptyConfig :: ExceptT ConfigError IO Configuration -emptyConfig = IO Configuration -> ExceptT ConfigError IO Configuration + emptyConfig :: ExceptT ConfigError IO Configuration + emptyConfig :: ExceptT ConfigError IO Configuration +emptyConfig = IO Configuration -> ExceptT ConfigError IO Configuration forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO Configuration -> ExceptT ConfigError IO Configuration) -> IO Configuration -> ExceptT ConfigError IO Configuration forall a b. (a -> b) -> a -> b $ do - Configuration -c <- IO Configuration + Configuration +c <- IO Configuration Config.empty Configuration -> Severity -> IO () Config.setMinSeverity Configuration -c Severity +c Severity Info Configuration -> IO Configuration forall (f :: * -> *) a. Applicative f => a -> f a pure Configuration -c +c -- | Create logging feature for `cardano-node` createLoggingLayer @@ -248,20 +248,20 @@ -> NodeConfiguration -> SomeConsensusProtocol -> ExceptT ConfigError IO LoggingLayer -createLoggingLayer Text -ver NodeConfiguration -nodeConfig' SomeConsensusProtocol -p = do +createLoggingLayer Text +ver NodeConfiguration +nodeConfig' SomeConsensusProtocol +p = do - Configuration -logConfig <- Maybe FilePath -> ExceptT ConfigError IO Configuration + Configuration +logConfig <- Maybe FilePath -> ExceptT ConfigError IO Configuration loggingCLIConfiguration (Maybe FilePath -> ExceptT ConfigError IO Configuration) -> Maybe FilePath -> ExceptT ConfigError IO Configuration forall a b. (a -> b) -> a -> b $ if NodeConfiguration -> Bool ncLoggingSwitch NodeConfiguration -nodeConfig' +nodeConfig' -- Re-interpret node config again, as logging 'Configuration': then FilePath -> Maybe FilePath forall a. a -> Maybe a @@ -278,7 +278,7 @@ forall a b. (a -> b) -> a -> b $ NodeConfiguration -> ConfigYamlFilePath ncConfigFile NodeConfiguration -nodeConfig' +nodeConfig' else Maybe FilePath forall a. Maybe a Nothing @@ -292,18 +292,18 @@ $ do Configuration -> Text -> Text -> IO () Config.setTextOption Configuration -logConfig Text +logConfig Text "appversion" Text -ver +ver Configuration -> Text -> Text -> IO () Config.setTextOption Configuration -logConfig Text +logConfig Text "appcommit" Text gitRev - (Trace IO Text -baseTrace, Switchboard Text -switchBoard) <- IO (Trace IO Text, Switchboard Text) + (Trace IO Text +baseTrace, Switchboard Text +switchBoard) <- IO (Trace IO Text, Switchboard Text) -> ExceptT ConfigError IO (Trace IO Text, Switchboard Text) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (Trace IO Text, Switchboard Text) @@ -316,20 +316,20 @@ (MonadIO m, ToJSON a, FromJSON a, ToObject a) => Configuration -> Text -> m (Trace m a, Switchboard a) setupTrace_ Configuration -logConfig Text +logConfig Text "cardano" - let loggingEnabled :: Bool - loggingEnabled :: Bool -loggingEnabled = NodeConfiguration -> Bool + let loggingEnabled :: Bool + loggingEnabled :: Bool +loggingEnabled = NodeConfiguration -> Bool ncLoggingSwitch NodeConfiguration -nodeConfig' - trace :: Trace IO Text - trace :: Trace IO Text -trace = if Bool -loggingEnabled +nodeConfig' + trace :: Trace IO Text + trace :: Trace IO Text +trace = if Bool +loggingEnabled then Trace IO Text -baseTrace +baseTrace else Trace IO Text forall (m :: * -> *) a. Applicative m => Tracer m a Trace.nullTracer @@ -337,7 +337,7 @@ Bool -> ExceptT ConfigError IO () -> ExceptT ConfigError IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when Bool -loggingEnabled (ExceptT ConfigError IO () -> ExceptT ConfigError IO ()) +loggingEnabled (ExceptT ConfigError IO () -> ExceptT ConfigError IO ()) -> ExceptT ConfigError IO () -> ExceptT ConfigError IO () forall a b. (a -> b) -> a -> b $ IO () -> ExceptT ConfigError IO () @@ -348,14 +348,14 @@ $ NodeConfiguration -> Configuration -> Switchboard Text -> Trace IO Text -> IO () -loggingPreInit NodeConfiguration -nodeConfig' Configuration -logConfig Switchboard Text -switchBoard Trace IO Text -trace +loggingPreInit NodeConfiguration +nodeConfig' Configuration +logConfig Switchboard Text +switchBoard Trace IO Text +trace - Maybe Server -mEKGServer <- IO (Maybe Server) -> ExceptT ConfigError IO (Maybe Server) + Maybe Server +mEKGServer <- IO (Maybe Server) -> ExceptT ConfigError IO (Maybe Server) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (Maybe Server) -> ExceptT ConfigError IO (Maybe Server)) -> IO (Maybe Server) -> ExceptT ConfigError IO (Maybe Server) @@ -363,21 +363,21 @@ $ Switchboard Text -> IO (Maybe Server) forall a. Switchboard a -> IO (Maybe Server) Switchboard.getSbEKGServer Switchboard Text -switchBoard +switchBoard - Maybe EKGDirect -mbEkgDirect <- case Maybe Server -mEKGServer of + Maybe EKGDirect +mbEkgDirect <- case Maybe Server +mEKGServer of Maybe Server Nothing -> Maybe EKGDirect -> ExceptT ConfigError IO (Maybe EKGDirect) forall (f :: * -> *) a. Applicative f => a -> f a pure Maybe EKGDirect forall a. Maybe a Nothing - Just Server -sv -> do - MVar (Map Text Gauge) -refGauge <- IO (MVar (Map Text Gauge)) + Just Server +sv -> do + MVar (Map Text Gauge) +refGauge <- IO (MVar (Map Text Gauge)) -> ExceptT ConfigError IO (MVar (Map Text Gauge)) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (MVar (Map Text Gauge)) @@ -390,8 +390,8 @@ newMVar Map Text Gauge forall k a. Map k a Map.empty - MVar (Map Text Label) -refLabel <- IO (MVar (Map Text Label)) + MVar (Map Text Label) +refLabel <- IO (MVar (Map Text Label)) -> ExceptT ConfigError IO (MVar (Map Text Label)) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (MVar (Map Text Label)) @@ -404,8 +404,8 @@ newMVar Map Text Label forall k a. Map k a Map.empty - MVar (Map Text Counter) -refCounter <- IO (MVar (Map Text Counter)) + MVar (Map Text Counter) +refCounter <- IO (MVar (Map Text Counter)) -> ExceptT ConfigError IO (MVar (Map Text Counter)) forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO (MVar (Map Text Counter)) @@ -433,16 +433,16 @@ EKGDirect { ekgServer :: Server ekgServer = Server -sv +sv , ekgGauges :: MVar (Map Text Gauge) ekgGauges = MVar (Map Text Gauge) -refGauge +refGauge , ekgLabels :: MVar (Map Text Label) ekgLabels = MVar (Map Text Label) -refLabel +refLabel , ekgCounters :: MVar (Map Text Counter) ekgCounters = MVar (Map Text Counter) -refCounter +refCounter } LoggingLayer -> ExceptT ConfigError IO LoggingLayer @@ -455,37 +455,37 @@ -> Maybe EKGDirect -> Trace IO Text -> LoggingLayer -mkLogLayer Configuration -logConfig Switchboard Text -switchBoard Maybe EKGDirect -mbEkgDirect Trace IO Text -trace +mkLogLayer Configuration +logConfig Switchboard Text +switchBoard Maybe EKGDirect +mbEkgDirect Trace IO Text +trace where - loggingPreInit + loggingPreInit :: NodeConfiguration -> Configuration -> Switchboard Text -> Trace IO Text -> IO () - loggingPreInit :: NodeConfiguration + loggingPreInit :: NodeConfiguration -> Configuration -> Switchboard Text -> Trace IO Text -> IO () -loggingPreInit NodeConfiguration -nodeConfig Configuration -logConfig Switchboard Text -switchBoard Trace IO Text -trace = do +loggingPreInit NodeConfiguration +nodeConfig Configuration +logConfig Switchboard Text +switchBoard Trace IO Text +trace = do Configuration -> IO (Maybe Endpoint) Config.getEKGBindAddr Configuration -logConfig IO (Maybe Endpoint) -> (Maybe Endpoint -> IO ()) -> IO () +logConfig IO (Maybe Endpoint) -> (Maybe Endpoint -> IO ()) -> IO () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b ->>= \Maybe Endpoint -mbEndpoint -> +>>= \Maybe Endpoint +mbEndpoint -> Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Maybe Endpoint -> Bool forall a. Maybe a -> Bool isJust Maybe Endpoint -mbEndpoint) (IO () -> IO ()) -> IO () -> IO () +mbEndpoint) (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ Configuration @@ -494,28 +494,28 @@ (IsEffectuator s a, ToJSON a, FromJSON a) => Configuration -> Trace IO a -> s a -> IO (Plugin a) Cardano.BM.Backend.EKGView.plugin Configuration -logConfig Trace IO Text -trace Switchboard Text -switchBoard +logConfig Trace IO Text +trace Switchboard Text +switchBoard IO (Plugin Text) -> (Plugin Text -> IO ()) -> IO () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= Switchboard Text -> Plugin Text -> IO () forall a. Switchboard a -> Plugin a -> IO () loadPlugin Switchboard Text -switchBoard +switchBoard Configuration -> IO (Maybe RemoteAddr) Config.getForwardTo Configuration -logConfig IO (Maybe RemoteAddr) -> (Maybe RemoteAddr -> IO ()) -> IO () +logConfig IO (Maybe RemoteAddr) -> (Maybe RemoteAddr -> IO ()) -> IO () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b ->>= \Maybe RemoteAddr -forwardTo -> +>>= \Maybe RemoteAddr +forwardTo -> Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Maybe RemoteAddr -> Bool forall a. Maybe a -> Bool isJust Maybe RemoteAddr -forwardTo) (IO () -> IO ()) -> IO () -> IO () +forwardTo) (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ do -- Since the configuration contains 'traceForwardTo' section, @@ -524,8 +524,8 @@ -- Activate TraceForwarder plugin (there is no need to add 'TraceForwarderBK' -- to 'setupBackends' list). - UTCTime -nodeStartTime <- IO UTCTime + UTCTime +nodeStartTime <- IO UTCTime getCurrentTime Configuration -> Trace IO Text @@ -538,33 +538,33 @@ Configuration -> Trace IO a -> s a -> Text -> IO [LogObject a] -> IO (Plugin a) Cardano.BM.Backend.TraceForwarder.plugin Configuration -logConfig +logConfig Trace IO Text -trace +trace Switchboard Text -switchBoard +switchBoard Text "forwarderMinSeverity" (NodeConfiguration -> SomeConsensusProtocol -> UTCTime -> IO [LogObject Text] nodeBasicInfo NodeConfiguration -nodeConfig SomeConsensusProtocol -p UTCTime -nodeStartTime) +nodeConfig SomeConsensusProtocol +p UTCTime +nodeStartTime) IO (Plugin Text) -> (Plugin Text -> IO ()) -> IO () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= Switchboard Text -> Plugin Text -> IO () forall a. Switchboard a -> Plugin a -> IO () loadPlugin Switchboard Text -switchBoard +switchBoard -- Forward all the metrics/peers/errors to 'TraceForwarderBK' using 'mapBackends'. -- If 'TraceForwarderBK' is already added in 'mapBackends' - ignore it. - let metricsLogger :: Text -metricsLogger = Text + let metricsLogger :: Text +metricsLogger = Text "cardano.node.metrics" -- All metrics and peers info are here. - errorsLoggers :: Text -errorsLoggers = Text + errorsLoggers :: Text +errorsLoggers = Text "cardano.node" -- All errors (messages with 'Warning+' severity) are here. [Text] -> (Text -> IO ()) -> IO () @@ -572,31 +572,31 @@ (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [Text -metricsLogger, Text -errorsLoggers] ((Text -> IO ()) -> IO ()) -> (Text -> IO ()) -> IO () +metricsLogger, Text +errorsLoggers] ((Text -> IO ()) -> IO ()) -> (Text -> IO ()) -> IO () forall a b. (a -> b) -> a -> b -$ \Text -loggerName -> +$ \Text +loggerName -> Configuration -> Text -> IO [BackendKind] Config.getBackends Configuration -logConfig Text -loggerName IO [BackendKind] -> ([BackendKind] -> IO ()) -> IO () +logConfig Text +loggerName IO [BackendKind] -> ([BackendKind] -> IO ()) -> IO () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b ->>= \[BackendKind] -backends -> +>>= \[BackendKind] +backends -> Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (BackendKind TraceForwarderBK BackendKind -> [BackendKind] -> Bool forall (t :: * -> *) a. (Foldable t, Eq a) => a -> t a -> Bool `notElem` [BackendKind] -backends) (IO () -> IO ()) -> IO () -> IO () +backends) (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ Configuration -> Text -> Maybe [BackendKind] -> IO () Config.setBackends Configuration -logConfig Text -loggerName (Maybe [BackendKind] -> IO ()) -> Maybe [BackendKind] -> IO () +logConfig Text +loggerName (Maybe [BackendKind] -> IO ()) -> Maybe [BackendKind] -> IO () forall a b. (a -> b) -> a -> b $ [BackendKind] -> Maybe [BackendKind] forall a. a -> Maybe a @@ -604,7 +604,7 @@ TraceForwarderBK BackendKind -> [BackendKind] -> [BackendKind] forall a. a -> [a] -> [a] : [BackendKind] -backends) +backends) Configuration -> Trace IO Text -> Switchboard Text -> IO (Plugin Text) @@ -612,30 +612,30 @@ (IsEffectuator s a, ToJSON a, FromJSON a) => Configuration -> Trace IO a -> s a -> IO (Plugin a) Cardano.BM.Backend.Aggregation.plugin Configuration -logConfig Trace IO Text -trace Switchboard Text -switchBoard +logConfig Trace IO Text +trace Switchboard Text +switchBoard IO (Plugin Text) -> (Plugin Text -> IO ()) -> IO () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= Switchboard Text -> Plugin Text -> IO () forall a. Switchboard a -> Plugin a -> IO () loadPlugin Switchboard Text -switchBoard +switchBoard Configuration -> Trace IO Text -> Switchboard Text -> IO (Plugin Text) forall (s :: * -> *) a. (IsEffectuator s a, ToJSON a, FromJSON a) => Configuration -> Trace IO a -> s a -> IO (Plugin a) Cardano.BM.Backend.Monitoring.plugin Configuration -logConfig Trace IO Text -trace Switchboard Text -switchBoard +logConfig Trace IO Text +trace Switchboard Text +switchBoard IO (Plugin Text) -> (Plugin Text -> IO ()) -> IO () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= Switchboard Text -> Plugin Text -> IO () forall a. Switchboard a -> Plugin a -> IO () loadPlugin Switchboard Text -switchBoard +switchBoard #if defined(SYSTEMD) Configuration @@ -644,41 +644,41 @@ (IsEffectuator s a, ToJSON a, FromJSON a) => Configuration -> Trace IO a -> s a -> Text -> IO (Plugin a) Cardano.BM.Scribe.Systemd.plugin Configuration -logConfig Trace IO Text -trace Switchboard Text -switchBoard Text +logConfig Trace IO Text +trace Switchboard Text +switchBoard Text "cardano" IO (Plugin Text) -> (Plugin Text -> IO ()) -> IO () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= Switchboard Text -> Plugin Text -> IO () forall a. Switchboard a -> Plugin a -> IO () loadPlugin Switchboard Text -switchBoard +switchBoard #endif Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (NodeConfiguration -> Bool ncLogMetrics NodeConfiguration -nodeConfig) (IO () -> IO ()) -> IO () -> IO () +nodeConfig) (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ -- Record node metrics, if configured Trace IO Text -> IO () -startCapturingMetrics Trace IO Text -trace +startCapturingMetrics Trace IO Text +trace - mkLogLayer :: Configuration -> Switchboard Text -> Maybe EKGDirect -> Trace IO Text -> LoggingLayer - mkLogLayer :: Configuration + mkLogLayer :: Configuration -> Switchboard Text -> Maybe EKGDirect -> Trace IO Text -> LoggingLayer + mkLogLayer :: Configuration -> Switchboard Text -> Maybe EKGDirect -> Trace IO Text -> LoggingLayer -mkLogLayer Configuration -logConfig Switchboard Text -switchBoard Maybe EKGDirect -mbEkgDirect Trace IO Text -trace = +mkLogLayer Configuration +logConfig Switchboard Text +switchBoard Maybe EKGDirect +mbEkgDirect Trace IO Text +trace = LoggingLayer :: (forall (m :: * -> *). MonadIO m => Trace m Text) -> (forall (m :: * -> *) a. (MonadIO m, Show a) => @@ -729,7 +729,7 @@ Trace.natTrace forall x. IO x -> m x forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO Trace IO Text -trace +trace , llLogDebug :: forall (m :: * -> *) a. (MonadIO m, Show a) => Trace m a -> a -> m () @@ -781,7 +781,7 @@ forall a t. Configuration -> Trace IO a -> Severity -> Text -> IO t -> IO t Monadic.bracketObserveIO Configuration -logConfig +logConfig , llBracketMonadM :: forall (m :: * -> *) a t. (MonadCatch m, MonadIO m, Show a) => Trace m a -> Severity -> Text -> m t -> m t @@ -790,7 +790,7 @@ (MonadCatch m, MonadIO m) => Configuration -> Trace m a -> Severity -> Text -> m t -> m t Monadic.bracketObserveM Configuration -logConfig +logConfig , llBracketMonadX :: forall (m :: * -> *) a t. (MonadIO m, Show a) => Trace m a -> Severity -> Text -> m t -> m t @@ -799,7 +799,7 @@ MonadIO m => Configuration -> Trace m a -> Severity -> Text -> m t -> m t Monadic.bracketObserveX Configuration -logConfig +logConfig , llBracketStmIO :: forall a t. Show a => Trace IO a -> Severity -> Text -> STM t -> IO t @@ -807,7 +807,7 @@ forall a t. Configuration -> Trace IO a -> Severity -> Text -> STM t -> IO t Stm.bracketObserveIO Configuration -logConfig +logConfig , llBracketStmLogIO :: forall a t. Show a => Trace IO a @@ -826,27 +826,27 @@ -> STM (t, [(LOMeta, LOContent a)]) -> IO t Stm.bracketObserveLogIO Configuration -logConfig +logConfig , llConfiguration :: Configuration llConfiguration = Configuration -logConfig +logConfig , llAddBackend :: Backend Text -> BackendKind -> IO () llAddBackend = Switchboard Text -> Backend Text -> BackendKind -> IO () forall a. Switchboard a -> Backend a -> BackendKind -> IO () Switchboard.addExternalBackend Switchboard Text -switchBoard +switchBoard , llSwitchboard :: Switchboard Text llSwitchboard = Switchboard Text -switchBoard +switchBoard , llEKGDirect :: Maybe EKGDirect llEKGDirect = Maybe EKGDirect -mbEkgDirect +mbEkgDirect } - startCapturingMetrics :: Trace IO Text -> IO () - startCapturingMetrics :: Trace IO Text -> IO () -startCapturingMetrics Trace IO Text -tr = do + startCapturingMetrics :: Trace IO Text -> IO () + startCapturingMetrics :: Trace IO Text -> IO () +startCapturingMetrics Trace IO Text +tr = do IO (Async Any) -> IO () forall (f :: * -> *) a. Functor f => f a -> f () void (IO (Async Any) -> IO ()) @@ -876,20 +876,20 @@ forall (f :: * -> *) a. Applicative f => a -> f a pure ()) (Trace IO Text -> ResourceStats -> IO () -traceResourceStats +traceResourceStats (Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "node" Trace IO Text -tr)) +tr)) Int -> IO () threadDelay Int 1000000 -- TODO: make configurable - traceResourceStats :: Trace IO Text -> ResourceStats -> IO () - traceResourceStats :: Trace IO Text -> ResourceStats -> IO () -traceResourceStats Trace IO Text -tr ResourceStats -rs = do + traceResourceStats :: Trace IO Text -> ResourceStats -> IO () + traceResourceStats :: Trace IO Text -> ResourceStats -> IO () +traceResourceStats Trace IO Text +tr ResourceStats +rs = do Tracer IO ResourceStats -> ResourceStats -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith (TracingVerbosity -> Trace IO Text -> Tracer IO ResourceStats @@ -904,12 +904,12 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "resources" Trace IO Text -tr) ResourceStats -rs +tr) ResourceStats +rs Text -> Trace IO Text -> Int -> IO () traceCounter Text "Stat.cputicks" Trace IO Text -tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () +tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c @@ -920,11 +920,11 @@ $ ResourceStats -> Word64 forall a. Resources a -> a rCentiCpu ResourceStats -rs +rs Text -> Trace IO Text -> Int -> IO () traceCounter Text "Mem.resident" Trace IO Text -tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () +tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c @@ -935,11 +935,11 @@ $ ResourceStats -> Word64 forall a. Resources a -> a rRSS ResourceStats -rs +rs Text -> Trace IO Text -> Int -> IO () traceCounter Text "RTS.gcLiveBytes" Trace IO Text -tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () +tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c @@ -950,11 +950,11 @@ $ ResourceStats -> Word64 forall a. Resources a -> a rLive ResourceStats -rs +rs Text -> Trace IO Text -> Int -> IO () traceCounter Text "RTS.gcHeapBytes" Trace IO Text -tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () +tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c @@ -965,11 +965,11 @@ $ ResourceStats -> Word64 forall a. Resources a -> a rHeap ResourceStats -rs +rs Text -> Trace IO Text -> Int -> IO () traceCounter Text "RTS.gcMajorNum" Trace IO Text -tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () +tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c @@ -980,11 +980,11 @@ $ ResourceStats -> Word64 forall a. Resources a -> a rGcsMajor ResourceStats -rs +rs Text -> Trace IO Text -> Int -> IO () traceCounter Text "RTS.gcMinorNum" Trace IO Text -tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () +tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c @@ -995,11 +995,11 @@ $ ResourceStats -> Word64 forall a. Resources a -> a rGcsMinor ResourceStats -rs +rs Text -> Trace IO Text -> Int -> IO () traceCounter Text "RTS.gcticks" Trace IO Text -tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () +tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c @@ -1010,11 +1010,11 @@ $ ResourceStats -> Word64 forall a. Resources a -> a rCentiGC ResourceStats -rs +rs Text -> Trace IO Text -> Int -> IO () traceCounter Text "RTS.mutticks" Trace IO Text -tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () +tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c @@ -1025,11 +1025,11 @@ $ ResourceStats -> Word64 forall a. Resources a -> a rCentiMut ResourceStats -rs +rs Text -> Trace IO Text -> Int -> IO () traceCounter Text "Stat.threads" Trace IO Text -tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () +tr (Int -> IO ()) -> (Word64 -> Int) -> Word64 -> IO () forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c @@ -1040,7 +1040,7 @@ $ ResourceStats -> Word64 forall a. Resources a -> a rThreads ResourceStats -rs +rs traceCounter :: Text @@ -1048,12 +1048,12 @@ -> Int -> IO () traceCounter :: Text -> Trace IO Text -> Int -> IO () -traceCounter Text -logValueName Trace IO Text -tracer Int -aCounter = do - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta +traceCounter Text +logValueName Trace IO Text +tracer Int +aCounter = do + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -1069,18 +1069,18 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "metrics" Trace IO Text -tracer) +tracer) (LOMeta -meta, Text -> Measurable -> LOContent Text +meta, Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text -logValueName (Integer -> Measurable +logValueName (Integer -> Measurable PureI (Integer -> Measurable) -> Integer -> Measurable forall a b. (a -> b) -> a -> b $ Int -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral Int -aCounter)) +aCounter)) shutdownLoggingLayer :: LoggingLayer -> IO () shutdownLoggingLayer :: LoggingLayer -> IO () @@ -1105,21 +1105,21 @@ -> IO [LogObject Text] nodeBasicInfo :: NodeConfiguration -> SomeConsensusProtocol -> UTCTime -> IO [LogObject Text] -nodeBasicInfo NodeConfiguration -nc (SomeConsensusProtocol BlockType blk -whichP ProtocolInfoArgs IO blk -pForInfo) UTCTime -nodeStartTime' = do - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta +nodeBasicInfo NodeConfiguration +nc (SomeConsensusProtocol BlockType blk +whichP ProtocolInfoArgs IO blk +pForInfo) UTCTime +nodeStartTime' = do + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta mkLOMeta Severity Notice PrivacyAnnotation Public - let cfg :: TopLevelConfig blk -cfg = ProtocolInfo IO blk -> TopLevelConfig blk + let cfg :: TopLevelConfig blk +cfg = ProtocolInfo IO blk -> TopLevelConfig blk forall (m :: * -> *) b. ProtocolInfo m b -> TopLevelConfig b pInfoConfig (ProtocolInfo IO blk -> TopLevelConfig blk) -> ProtocolInfo IO blk -> TopLevelConfig blk @@ -1129,61 +1129,61 @@ Protocol m blk => ProtocolInfoArgs m blk -> ProtocolInfo m blk protocolInfo ProtocolInfoArgs IO blk -pForInfo - protocolDependentItems :: [(Text, Text)] -protocolDependentItems = +pForInfo + protocolDependentItems :: [(Text, Text)] +protocolDependentItems = case BlockType blk -whichP of +whichP of BlockType blk ByronBlockType -> - let DegenLedgerConfig PartialLedgerConfig ByronBlock -cfgByron = TopLevelConfig blk -> LedgerConfig blk + let DegenLedgerConfig PartialLedgerConfig ByronBlock +cfgByron = TopLevelConfig blk -> LedgerConfig blk forall blk. TopLevelConfig blk -> LedgerConfig blk Consensus.configLedger TopLevelConfig blk -cfg +cfg in TopLevelConfig blk -> ByronPartialLedgerConfig -> [(Text, Text)] forall a b blk. (IsString a, ConvertText FilePath b, ConfigSupportsNode blk) => TopLevelConfig blk -> ByronPartialLedgerConfig -> [(a, b)] -getGenesisValuesByron TopLevelConfig blk -cfg PartialLedgerConfig ByronBlock +getGenesisValuesByron TopLevelConfig blk +cfg PartialLedgerConfig ByronBlock ByronPartialLedgerConfig -cfgByron +cfgByron BlockType blk ShelleyBlockType -> - let DegenLedgerConfig PartialLedgerConfig (ShelleyBlock StandardShelley) -cfgShelley = TopLevelConfig blk -> LedgerConfig blk + let DegenLedgerConfig PartialLedgerConfig (ShelleyBlock StandardShelley) +cfgShelley = TopLevelConfig blk -> LedgerConfig blk forall blk. TopLevelConfig blk -> LedgerConfig blk Consensus.configLedger TopLevelConfig blk -cfg +cfg in Text -> ShelleyPartialLedgerConfig StandardShelley -> [(Text, Text)] forall a b era. (IsString a, ConvertText FilePath b, Semigroup a) => a -> ShelleyPartialLedgerConfig era -> [(a, b)] -getGenesisValues Text +getGenesisValues Text "Shelley" PartialLedgerConfig (ShelleyBlock StandardShelley) ShelleyPartialLedgerConfig StandardShelley -cfgShelley +cfgShelley BlockType blk CardanoBlockType -> - let CardanoLedgerConfig PartialLedgerConfig ByronBlock -cfgByron PartialLedgerConfig (ShelleyBlock StandardShelley) -cfgShelley PartialLedgerConfig (ShelleyBlock (AllegraEra StandardCrypto)) -cfgAllegra PartialLedgerConfig (ShelleyBlock (MaryEra StandardCrypto)) -cfgMary PartialLedgerConfig (ShelleyBlock (AlonzoEra StandardCrypto)) -cfgAlonzo = TopLevelConfig blk -> LedgerConfig blk + let CardanoLedgerConfig PartialLedgerConfig ByronBlock +cfgByron PartialLedgerConfig (ShelleyBlock StandardShelley) +cfgShelley PartialLedgerConfig (ShelleyBlock (AllegraEra StandardCrypto)) +cfgAllegra PartialLedgerConfig (ShelleyBlock (MaryEra StandardCrypto)) +cfgMary PartialLedgerConfig (ShelleyBlock (AlonzoEra StandardCrypto)) +cfgAlonzo = TopLevelConfig blk -> LedgerConfig blk forall blk. TopLevelConfig blk -> LedgerConfig blk Consensus.configLedger TopLevelConfig blk -cfg +cfg in TopLevelConfig blk -> ByronPartialLedgerConfig -> [(Text, Text)] forall a b blk. (IsString a, ConvertText FilePath b, ConfigSupportsNode blk) => TopLevelConfig blk -> ByronPartialLedgerConfig -> [(a, b)] -getGenesisValuesByron TopLevelConfig blk -cfg PartialLedgerConfig ByronBlock +getGenesisValuesByron TopLevelConfig blk +cfg PartialLedgerConfig ByronBlock ByronPartialLedgerConfig -cfgByron +cfgByron [(Text, Text)] -> [(Text, Text)] -> [(Text, Text)] forall a. [a] -> [a] -> [a] ++ Text @@ -1191,10 +1191,10 @@ forall a b era. (IsString a, ConvertText FilePath b, Semigroup a) => a -> ShelleyPartialLedgerConfig era -> [(a, b)] -getGenesisValues Text +getGenesisValues Text "Shelley" PartialLedgerConfig (ShelleyBlock StandardShelley) ShelleyPartialLedgerConfig StandardShelley -cfgShelley +cfgShelley [(Text, Text)] -> [(Text, Text)] -> [(Text, Text)] forall a. [a] -> [a] -> [a] ++ Text @@ -1203,10 +1203,10 @@ forall a b era. (IsString a, ConvertText FilePath b, Semigroup a) => a -> ShelleyPartialLedgerConfig era -> [(a, b)] -getGenesisValues Text +getGenesisValues Text "Allegra" PartialLedgerConfig (ShelleyBlock (AllegraEra StandardCrypto)) ShelleyPartialLedgerConfig (AllegraEra StandardCrypto) -cfgAllegra +cfgAllegra [(Text, Text)] -> [(Text, Text)] -> [(Text, Text)] forall a. [a] -> [a] -> [a] ++ Text @@ -1215,10 +1215,10 @@ forall a b era. (IsString a, ConvertText FilePath b, Semigroup a) => a -> ShelleyPartialLedgerConfig era -> [(a, b)] -getGenesisValues Text +getGenesisValues Text "Mary" PartialLedgerConfig (ShelleyBlock (MaryEra StandardCrypto)) ShelleyPartialLedgerConfig (MaryEra StandardCrypto) -cfgMary +cfgMary [(Text, Text)] -> [(Text, Text)] -> [(Text, Text)] forall a. [a] -> [a] -> [a] ++ Text @@ -1227,12 +1227,12 @@ forall a b era. (IsString a, ConvertText FilePath b, Semigroup a) => a -> ShelleyPartialLedgerConfig era -> [(a, b)] -getGenesisValues Text +getGenesisValues Text "Alonzo" PartialLedgerConfig (ShelleyBlock (AlonzoEra StandardCrypto)) ShelleyPartialLedgerConfig (AlonzoEra StandardCrypto) -cfgAlonzo - items :: [(Text, Text)] -items = [(Text, Text)] -> [(Text, Text)] +cfgAlonzo + items :: [(Text, Text)] +items = [(Text, Text)] -> [(Text, Text)] forall a. Eq a => [a] -> [a] nub ([(Text, Text)] -> [(Text, Text)]) -> [(Text, Text)] -> [(Text, Text)] @@ -1249,7 +1249,7 @@ forall a b. (a -> b) -> a -> b $ NodeConfiguration -> Protocol ncProtocol NodeConfiguration -nc) +nc) , (Text "version", FilePath -> Text pack (FilePath -> Text) -> (Version -> FilePath) -> Version -> Text @@ -1268,43 +1268,43 @@ "nodeStartTime", UTCTime -> Text forall a b. (Show a, ConvertText FilePath b) => a -> b show UTCTime -nodeStartTime') +nodeStartTime') ] [(Text, Text)] -> [(Text, Text)] -> [(Text, Text)] forall a. [a] -> [a] -> [a] ++ [(Text, Text)] -protocolDependentItems - logObjects :: [LogObject Text] -logObjects = +protocolDependentItems + logObjects :: [LogObject Text] +logObjects = ((Text, Text) -> LogObject Text) -> [(Text, Text)] -> [LogObject Text] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b -map (\(Text -nm, Text -msg) -> Text -> LOMeta -> LOContent Text -> LogObject Text +map (\(Text +nm, Text +msg) -> Text -> LOMeta -> LOContent Text -> LogObject Text forall a. Text -> LOMeta -> LOContent a -> LogObject a LogObject (Text "basicInfo." Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -nm) LOMeta -meta (Text -> LOContent Text +nm) LOMeta +meta (Text -> LOContent Text forall a. a -> LOContent a LogMessage Text -msg)) [(Text, Text)] -items +msg)) [(Text, Text)] +items [LogObject Text] -> IO [LogObject Text] forall (m :: * -> *) a. Monad m => a -> m a return [LogObject Text] -logObjects +logObjects where - getGenesisValuesByron :: TopLevelConfig blk -> ByronPartialLedgerConfig -> [(a, b)] -getGenesisValuesByron TopLevelConfig blk -cfg ByronPartialLedgerConfig -config = - let genesis :: LedgerConfig ByronBlock -genesis = ByronPartialLedgerConfig -> LedgerConfig ByronBlock + getGenesisValuesByron :: TopLevelConfig blk -> ByronPartialLedgerConfig -> [(a, b)] +getGenesisValuesByron TopLevelConfig blk +cfg ByronPartialLedgerConfig +config = + let genesis :: LedgerConfig ByronBlock +genesis = ByronPartialLedgerConfig -> LedgerConfig ByronBlock byronLedgerConfig ByronPartialLedgerConfig -config +config in [ (a "systemStartTime", UTCTime -> b forall a b. (Show a, ConvertText FilePath b) => a -> b @@ -1323,7 +1323,7 @@ $ TopLevelConfig blk -> BlockConfig blk forall blk. TopLevelConfig blk -> BlockConfig blk Consensus.configBlock TopLevelConfig blk -cfg)) +cfg)) , (a "slotLengthByron", NominalDiffTime -> b forall a b. (Show a, ConvertText FilePath b) => a -> b @@ -1339,7 +1339,7 @@ $ Config -> Natural genesisSlotLength Config LedgerConfig ByronBlock -genesis)) +genesis)) , (a "epochLengthByron", Word64 -> b forall a b. (Show a, ConvertText FilePath b) => a -> b @@ -1355,14 +1355,14 @@ $ Config -> EpochSlots Gen.configEpochSlots Config LedgerConfig ByronBlock -genesis)) +genesis)) ] - getGenesisValues :: a -> ShelleyPartialLedgerConfig era -> [(a, b)] -getGenesisValues a -era ShelleyPartialLedgerConfig era -config = - let genesis :: ShelleyGenesis era -genesis = ShelleyLedgerConfig era -> ShelleyGenesis era + getGenesisValues :: a -> ShelleyPartialLedgerConfig era -> [(a, b)] +getGenesisValues a +era ShelleyPartialLedgerConfig era +config = + let genesis :: ShelleyGenesis era +genesis = ShelleyLedgerConfig era -> ShelleyGenesis era forall era. ShelleyLedgerConfig era -> ShelleyGenesis era shelleyLedgerGenesis (ShelleyLedgerConfig era -> ShelleyGenesis era) -> ShelleyLedgerConfig era -> ShelleyGenesis era @@ -1371,19 +1371,19 @@ forall era. ShelleyPartialLedgerConfig era -> ShelleyLedgerConfig era shelleyLedgerConfig ShelleyPartialLedgerConfig era -config +config in [ (a "systemStartTime", UTCTime -> b forall a b. (Show a, ConvertText FilePath b) => a -> b show (ShelleyGenesis era -> UTCTime forall era. ShelleyGenesis era -> UTCTime SL.sgSystemStart ShelleyGenesis era -genesis)) +genesis)) , (a "slotLength" a -> a -> a forall a. Semigroup a => a -> a -> a <> a -era, NominalDiffTime -> b +era, NominalDiffTime -> b forall a b. (Show a, ConvertText FilePath b) => a -> b show (SlotLength -> NominalDiffTime WCT.getSlotLength (SlotLength -> NominalDiffTime) @@ -1400,12 +1400,12 @@ $ ShelleyGenesis era -> NominalDiffTime forall era. ShelleyGenesis era -> NominalDiffTime SL.sgSlotLength ShelleyGenesis era -genesis)) +genesis)) , (a "epochLength" a -> a -> a forall a. Semigroup a => a -> a -> a <> a -era, Word64 -> b +era, Word64 -> b forall a b. (Show a, ConvertText FilePath b) => a -> b show (EpochSize -> Word64 unEpochSize (EpochSize -> Word64) @@ -1420,16 +1420,16 @@ SL.sgEpochLength (ShelleyGenesis era -> Word64) -> ShelleyGenesis era -> Word64 forall a b. (a -> b) -> a -> b $ ShelleyGenesis era -genesis)) +genesis)) , (a "slotsPerKESPeriod" a -> a -> a forall a. Semigroup a => a -> a -> a <> a -era, Word64 -> b +era, Word64 -> b forall a b. (Show a, ConvertText FilePath b) => a -> b show (ShelleyGenesis era -> Word64 forall era. ShelleyGenesis era -> Word64 SL.sgSlotsPerKESPeriod ShelleyGenesis era -genesis)) +genesis)) ] \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Configuration.POM.html b/cardano-node/src/Cardano.Node.Configuration.POM.html index 6b4f0304c18..1aae09e531f 100644 --- a/cardano-node/src/Cardano.Node.Configuration.POM.html +++ b/cardano-node/src/Cardano.Node.Configuration.POM.html @@ -103,7 +103,7 @@ ncLogMetrics :: !Bool , NodeConfiguration -> TraceOptions ncTraceConfig :: !TraceOptions - } deriving (NodeConfiguration -> NodeConfiguration -> Bool + } deriving (NodeConfiguration -> NodeConfiguration -> Bool (NodeConfiguration -> NodeConfiguration -> Bool) -> (NodeConfiguration -> NodeConfiguration -> Bool) -> Eq NodeConfiguration @@ -112,7 +112,7 @@ $c/= :: NodeConfiguration -> NodeConfiguration -> Bool == :: NodeConfiguration -> NodeConfiguration -> Bool $c== :: NodeConfiguration -> NodeConfiguration -> Bool -Eq, Int -> NodeConfiguration -> ShowS +Eq, Int -> NodeConfiguration -> ShowS [NodeConfiguration] -> ShowS NodeConfiguration -> String (Int -> NodeConfiguration -> ShowS) @@ -130,7 +130,7 @@ Show) -data PartialNodeConfiguration +data PartialNodeConfiguration = PartialNodeConfiguration { PartialNodeConfiguration -> Last NodeHostIPv4Address pncNodeIPv4Addr :: !(Last NodeHostIPv4Address) @@ -183,7 +183,7 @@ pncLogMetrics :: !(Last Bool) , PartialNodeConfiguration -> Last TraceOptions pncTraceConfig :: !(Last TraceOptions) - } deriving (PartialNodeConfiguration -> PartialNodeConfiguration -> Bool + } deriving (PartialNodeConfiguration -> PartialNodeConfiguration -> Bool (PartialNodeConfiguration -> PartialNodeConfiguration -> Bool) -> (PartialNodeConfiguration -> PartialNodeConfiguration -> Bool) -> Eq PartialNodeConfiguration @@ -207,7 +207,7 @@ Rep PartialNodeConfiguration x -> PartialNodeConfiguration $cfrom :: forall x. PartialNodeConfiguration -> Rep PartialNodeConfiguration x -Generic, Int -> PartialNodeConfiguration -> ShowS +Generic, Int -> PartialNodeConfiguration -> ShowS [PartialNodeConfiguration] -> ShowS PartialNodeConfiguration -> String (Int -> PartialNodeConfiguration -> ShowS) @@ -225,38 +225,38 @@ Show) instance AdjustFilePaths PartialNodeConfiguration where - adjustFilePaths :: ShowS -> PartialNodeConfiguration -> PartialNodeConfiguration -adjustFilePaths ShowS -f PartialNodeConfiguration -x = + adjustFilePaths :: ShowS -> PartialNodeConfiguration -> PartialNodeConfiguration +adjustFilePaths ShowS +f PartialNodeConfiguration +x = PartialNodeConfiguration -x { pncProtocolConfig :: Last NodeProtocolConfiguration +x { pncProtocolConfig :: Last NodeProtocolConfiguration pncProtocolConfig = ShowS -> Last NodeProtocolConfiguration -> Last NodeProtocolConfiguration forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f (PartialNodeConfiguration -> Last NodeProtocolConfiguration +f (PartialNodeConfiguration -> Last NodeProtocolConfiguration pncProtocolConfig PartialNodeConfiguration -x) +x) , pncSocketPath :: Last SocketPath pncSocketPath = ShowS -> Last SocketPath -> Last SocketPath forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f (PartialNodeConfiguration -> Last SocketPath +f (PartialNodeConfiguration -> Last SocketPath pncSocketPath PartialNodeConfiguration -x) +x) } -instance Semigroup PartialNodeConfiguration where - <> :: PartialNodeConfiguration +instance Semigroup PartialNodeConfiguration where + <> :: PartialNodeConfiguration -> PartialNodeConfiguration -> PartialNodeConfiguration (<>) = PartialNodeConfiguration -> PartialNodeConfiguration -> PartialNodeConfiguration forall a. (Generic a, Semigroup (Rep a ())) => a -> a -> a gmappend -instance FromJSON PartialNodeConfiguration where - parseJSON :: Value -> Parser PartialNodeConfiguration +instance FromJSON PartialNodeConfiguration where + parseJSON :: Value -> Parser PartialNodeConfiguration parseJSON = String -> (Object -> Parser PartialNodeConfiguration) @@ -270,23 +270,23 @@ -> Value -> Parser PartialNodeConfiguration forall a b. (a -> b) -> a -> b -$ \Object -v -> do +$ \Object +v -> do -- Node parameters, not protocol-specific - Last SocketPath -pncSocketPath <- Maybe SocketPath -> Last SocketPath + Last SocketPath +pncSocketPath <- Maybe SocketPath -> Last SocketPath forall a. Maybe a -> Last a Last (Maybe SocketPath -> Last SocketPath) -> Parser (Maybe SocketPath) -> Parser (Last SocketPath) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser (Maybe SocketPath) +v Object -> Text -> Parser (Maybe SocketPath) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "SocketPath" - Last DiffusionMode -pncDiffusionMode + Last DiffusionMode +pncDiffusionMode <- Maybe DiffusionMode -> Last DiffusionMode forall a. Maybe a -> Last a Last (Maybe DiffusionMode -> Last DiffusionMode) @@ -304,12 +304,12 @@ -> Parser (Maybe NodeDiffusionMode) -> Parser (Last DiffusionMode) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser (Maybe NodeDiffusionMode) +v Object -> Text -> Parser (Maybe NodeDiffusionMode) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "DiffusionMode" - Last SnapshotInterval -pncSnapshotInterval + Last SnapshotInterval +pncSnapshotInterval <- Maybe SnapshotInterval -> Last SnapshotInterval forall a. Maybe a -> Last a Last (Maybe SnapshotInterval -> Last SnapshotInterval) @@ -327,52 +327,52 @@ -> Parser (Maybe DiffTime) -> Parser (Last SnapshotInterval) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser (Maybe DiffTime) +v Object -> Text -> Parser (Maybe DiffTime) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "SnapshotInterval" - Last Bool -pncTestEnableDevelopmentNetworkProtocols + Last Bool +pncTestEnableDevelopmentNetworkProtocols <- Maybe Bool -> Last Bool forall a. Maybe a -> Last a Last (Maybe Bool -> Last Bool) -> Parser (Maybe Bool) -> Parser (Last Bool) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser (Maybe Bool) +v Object -> Text -> Parser (Maybe Bool) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TestEnableDevelopmentNetworkProtocols" -- Blockfetch parameters - Last MaxConcurrencyBulkSync -pncMaxConcurrencyBulkSync <- Maybe MaxConcurrencyBulkSync -> Last MaxConcurrencyBulkSync + Last MaxConcurrencyBulkSync +pncMaxConcurrencyBulkSync <- Maybe MaxConcurrencyBulkSync -> Last MaxConcurrencyBulkSync forall a. Maybe a -> Last a Last (Maybe MaxConcurrencyBulkSync -> Last MaxConcurrencyBulkSync) -> Parser (Maybe MaxConcurrencyBulkSync) -> Parser (Last MaxConcurrencyBulkSync) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser (Maybe MaxConcurrencyBulkSync) +v Object -> Text -> Parser (Maybe MaxConcurrencyBulkSync) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "MaxConcurrencyBulkSync" - Last MaxConcurrencyDeadline -pncMaxConcurrencyDeadline <- Maybe MaxConcurrencyDeadline -> Last MaxConcurrencyDeadline + Last MaxConcurrencyDeadline +pncMaxConcurrencyDeadline <- Maybe MaxConcurrencyDeadline -> Last MaxConcurrencyDeadline forall a. Maybe a -> Last a Last (Maybe MaxConcurrencyDeadline -> Last MaxConcurrencyDeadline) -> Parser (Maybe MaxConcurrencyDeadline) -> Parser (Last MaxConcurrencyDeadline) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser (Maybe MaxConcurrencyDeadline) +v Object -> Text -> Parser (Maybe MaxConcurrencyDeadline) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "MaxConcurrencyDeadline" -- Logging parameters - Last Bool -pncLoggingSwitch <- Maybe Bool -> Last Bool + Last Bool +pncLoggingSwitch <- Maybe Bool -> Last Bool forall a. Maybe a -> Last a Last (Maybe Bool -> Last Bool) -> (Bool -> Maybe Bool) -> Bool -> Last Bool @@ -384,26 +384,26 @@ Just (Bool -> Last Bool) -> Parser Bool -> Parser (Last Bool) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser (Maybe Bool) +v Object -> Text -> Parser (Maybe Bool) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TurnOnLogging" Parser (Maybe Bool) -> Bool -> Parser Bool forall a. Parser (Maybe a) -> a -> Parser a .!= Bool True - Last Bool -pncLogMetrics <- Maybe Bool -> Last Bool + Last Bool +pncLogMetrics <- Maybe Bool -> Last Bool forall a. Maybe a -> Last a Last (Maybe Bool -> Last Bool) -> Parser (Maybe Bool) -> Parser (Last Bool) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser (Maybe Bool) +v Object -> Text -> Parser (Maybe Bool) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TurnOnLogMetrics" - Last TraceOptions -pncTraceConfig <- Maybe TraceOptions -> Last TraceOptions + Last TraceOptions +pncTraceConfig <- Maybe TraceOptions -> Last TraceOptions forall a. Maybe a -> Last a Last (Maybe TraceOptions -> Last TraceOptions) -> (TraceOptions -> Maybe TraceOptions) @@ -419,22 +419,22 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -> Parser TraceOptions traceConfigParser Object -v +v -- Protocol parameters - Protocol -protocol <- Object -v Object -> Text -> Parser (Maybe Protocol) + Protocol +protocol <- Object +v Object -> Text -> Parser (Maybe Protocol) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "Protocol" Parser (Maybe Protocol) -> Protocol -> Parser Protocol forall a. Parser (Maybe a) -> a -> Parser a .!= Protocol ByronProtocol - Last NodeProtocolConfiguration -pncProtocolConfig <- + Last NodeProtocolConfiguration +pncProtocolConfig <- case Protocol -protocol of +protocol of Protocol ByronProtocol -> Maybe NodeProtocolConfiguration -> Last NodeProtocolConfiguration @@ -462,8 +462,8 @@ -> Parser (Last NodeProtocolConfiguration) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -> Parser NodeByronProtocolConfiguration -parseByronProtocol Object -v +parseByronProtocol Object +v Protocol ShelleyProtocol -> @@ -493,8 +493,8 @@ -> Parser (Last NodeProtocolConfiguration) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -> Parser NodeShelleyProtocolConfiguration -parseShelleyProtocol Object -v +parseShelleyProtocol Object +v Protocol CardanoProtocol -> @@ -531,8 +531,8 @@ -> NodeProtocolConfiguration) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -> Parser NodeByronProtocolConfiguration -parseByronProtocol Object -v +parseByronProtocol Object +v Parser (NodeShelleyProtocolConfiguration -> NodeAlonzoProtocolConfiguration @@ -544,8 +544,8 @@ -> NodeHardForkProtocolConfiguration -> NodeProtocolConfiguration) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -> Parser NodeShelleyProtocolConfiguration -parseShelleyProtocol Object -v +parseShelleyProtocol Object +v Parser (NodeAlonzoProtocolConfiguration -> NodeHardForkProtocolConfiguration -> NodeProtocolConfiguration) @@ -554,16 +554,16 @@ (NodeHardForkProtocolConfiguration -> NodeProtocolConfiguration) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -> Parser NodeAlonzoProtocolConfiguration -parseAlonzoProtocol Object -v +parseAlonzoProtocol Object +v Parser (NodeHardForkProtocolConfiguration -> NodeProtocolConfiguration) -> Parser NodeHardForkProtocolConfiguration -> Parser NodeProtocolConfiguration forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -> Parser NodeHardForkProtocolConfiguration -parseHardForkProtocol Object -v) +parseHardForkProtocol Object +v) PartialNodeConfiguration -> Parser PartialNodeConfiguration forall (f :: * -> *) a. Applicative f => a -> f a pure PartialNodeConfiguration :: Last NodeHostIPv4Address @@ -591,43 +591,43 @@ Last NodeProtocolConfiguration pncProtocolConfig :: Last NodeProtocolConfiguration pncProtocolConfig :: Last NodeProtocolConfiguration -pncProtocolConfig +pncProtocolConfig , Last SocketPath pncSocketPath :: Last SocketPath pncSocketPath :: Last SocketPath -pncSocketPath +pncSocketPath , Last DiffusionMode pncDiffusionMode :: Last DiffusionMode pncDiffusionMode :: Last DiffusionMode -pncDiffusionMode +pncDiffusionMode , Last SnapshotInterval pncSnapshotInterval :: Last SnapshotInterval pncSnapshotInterval :: Last SnapshotInterval -pncSnapshotInterval +pncSnapshotInterval , Last Bool pncTestEnableDevelopmentNetworkProtocols :: Last Bool pncTestEnableDevelopmentNetworkProtocols :: Last Bool -pncTestEnableDevelopmentNetworkProtocols +pncTestEnableDevelopmentNetworkProtocols , Last MaxConcurrencyBulkSync pncMaxConcurrencyBulkSync :: Last MaxConcurrencyBulkSync pncMaxConcurrencyBulkSync :: Last MaxConcurrencyBulkSync -pncMaxConcurrencyBulkSync +pncMaxConcurrencyBulkSync , Last MaxConcurrencyDeadline pncMaxConcurrencyDeadline :: Last MaxConcurrencyDeadline pncMaxConcurrencyDeadline :: Last MaxConcurrencyDeadline -pncMaxConcurrencyDeadline +pncMaxConcurrencyDeadline , Last Bool pncLoggingSwitch :: Last Bool pncLoggingSwitch :: Last Bool -pncLoggingSwitch +pncLoggingSwitch , Last Bool pncLogMetrics :: Last Bool pncLogMetrics :: Last Bool -pncLogMetrics +pncLogMetrics , Last TraceOptions pncTraceConfig :: Last TraceOptions pncTraceConfig :: Last TraceOptions -pncTraceConfig +pncTraceConfig , pncNodeIPv4Addr :: Last NodeHostIPv4Address pncNodeIPv4Addr = Last NodeHostIPv4Address forall a. Monoid a => a @@ -670,38 +670,38 @@ mempty } where - parseByronProtocol :: Object -> Parser NodeByronProtocolConfiguration -parseByronProtocol Object -v = do - Maybe GenesisFile -primary <- Object -v Object -> Text -> Parser (Maybe GenesisFile) + parseByronProtocol :: Object -> Parser NodeByronProtocolConfiguration +parseByronProtocol Object +v = do + Maybe GenesisFile +primary <- Object +v Object -> Text -> Parser (Maybe GenesisFile) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "ByronGenesisFile" - Maybe GenesisFile -secondary <- Object -v Object -> Text -> Parser (Maybe GenesisFile) + Maybe GenesisFile +secondary <- Object +v Object -> Text -> Parser (Maybe GenesisFile) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "GenesisFile" - GenesisFile -npcByronGenesisFile <- + GenesisFile +npcByronGenesisFile <- case (Maybe GenesisFile -primary, Maybe GenesisFile -secondary) of - (Just GenesisFile -g, Maybe GenesisFile +primary, Maybe GenesisFile +secondary) of + (Just GenesisFile +g, Maybe GenesisFile Nothing) -> GenesisFile -> Parser GenesisFile forall (m :: * -> *) a. Monad m => a -> m a return GenesisFile -g +g (Maybe GenesisFile -Nothing, Just GenesisFile -g) -> GenesisFile -> Parser GenesisFile +Nothing, Just GenesisFile +g) -> GenesisFile -> Parser GenesisFile forall (m :: * -> *) a. Monad m => a -> m a return GenesisFile -g +g (Maybe GenesisFile Nothing, Maybe GenesisFile Nothing) -> String -> Parser GenesisFile @@ -726,16 +726,16 @@ forall a. [a] -> [a] -> [a] ++ String "or GenesisFile, but not both" - Maybe GenesisHash -npcByronGenesisFileHash <- Object -v Object -> Text -> Parser (Maybe GenesisHash) + Maybe GenesisHash +npcByronGenesisFileHash <- Object +v Object -> Text -> Parser (Maybe GenesisHash) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "ByronGenesisHash" - RequiresNetworkMagic -npcByronReqNetworkMagic <- Object -v Object -> Text -> Parser (Maybe RequiresNetworkMagic) + RequiresNetworkMagic +npcByronReqNetworkMagic <- Object +v Object -> Text -> Parser (Maybe RequiresNetworkMagic) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "RequiresNetworkMagic" @@ -744,15 +744,15 @@ forall a. Parser (Maybe a) -> a -> Parser a .!= RequiresNetworkMagic RequiresNoMagic - Maybe Double -npcByronPbftSignatureThresh <- Object -v Object -> Text -> Parser (Maybe Double) + Maybe Double +npcByronPbftSignatureThresh <- Object +v Object -> Text -> Parser (Maybe Double) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "PBftSignatureThreshold" - ApplicationName -npcByronApplicationName <- Object -v Object -> Text -> Parser (Maybe ApplicationName) + ApplicationName +npcByronApplicationName <- Object +v Object -> Text -> Parser (Maybe ApplicationName) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "ApplicationName" @@ -762,9 +762,9 @@ .!= Text -> ApplicationName Byron.ApplicationName Text "cardano-sl" - NumSoftwareVersion -npcByronApplicationVersion <- Object -v Object -> Text -> Parser (Maybe NumSoftwareVersion) + NumSoftwareVersion +npcByronApplicationVersion <- Object +v Object -> Text -> Parser (Maybe NumSoftwareVersion) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "ApplicationVersion" Parser (Maybe NumSoftwareVersion) @@ -772,21 +772,21 @@ forall a. Parser (Maybe a) -> a -> Parser a .!= NumSoftwareVersion 1 - Word16 -protVerMajor <- Object -v Object -> Text -> Parser Word16 + Word16 +protVerMajor <- Object +v Object -> Text -> Parser Word16 forall a. FromJSON a => Object -> Text -> Parser a .: Text "LastKnownBlockVersion-Major" - Word16 -protVerMinor <- Object -v Object -> Text -> Parser Word16 + Word16 +protVerMinor <- Object +v Object -> Text -> Parser Word16 forall a. FromJSON a => Object -> Text -> Parser a .: Text "LastKnownBlockVersion-Minor" - Word8 -protVerAlt <- Object -v Object -> Text -> Parser (Maybe Word8) + Word8 +protVerAlt <- Object +v Object -> Text -> Parser (Maybe Word8) forall a. FromJSON a => Object -> Text -> Parser a .: Text "LastKnownBlockVersion-Alt" Parser (Maybe Word8) -> Word8 -> Parser Word8 @@ -811,70 +811,70 @@ GenesisFile npcByronGenesisFile :: GenesisFile npcByronGenesisFile :: GenesisFile -npcByronGenesisFile +npcByronGenesisFile , Maybe GenesisHash npcByronGenesisFileHash :: Maybe GenesisHash npcByronGenesisFileHash :: Maybe GenesisHash -npcByronGenesisFileHash +npcByronGenesisFileHash , RequiresNetworkMagic npcByronReqNetworkMagic :: RequiresNetworkMagic npcByronReqNetworkMagic :: RequiresNetworkMagic -npcByronReqNetworkMagic +npcByronReqNetworkMagic , Maybe Double npcByronPbftSignatureThresh :: Maybe Double npcByronPbftSignatureThresh :: Maybe Double -npcByronPbftSignatureThresh +npcByronPbftSignatureThresh , ApplicationName npcByronApplicationName :: ApplicationName npcByronApplicationName :: ApplicationName -npcByronApplicationName +npcByronApplicationName , NumSoftwareVersion npcByronApplicationVersion :: NumSoftwareVersion npcByronApplicationVersion :: NumSoftwareVersion -npcByronApplicationVersion +npcByronApplicationVersion , npcByronSupportedProtocolVersionMajor :: Word16 -npcByronSupportedProtocolVersionMajor = Word16 -protVerMajor +npcByronSupportedProtocolVersionMajor = Word16 +protVerMajor , npcByronSupportedProtocolVersionMinor :: Word16 -npcByronSupportedProtocolVersionMinor = Word16 -protVerMinor +npcByronSupportedProtocolVersionMinor = Word16 +protVerMinor , npcByronSupportedProtocolVersionAlt :: Word8 -npcByronSupportedProtocolVersionAlt = Word8 -protVerAlt +npcByronSupportedProtocolVersionAlt = Word8 +protVerAlt } - parseShelleyProtocol :: Object -> Parser NodeShelleyProtocolConfiguration -parseShelleyProtocol Object -v = do - Maybe GenesisFile -primary <- Object -v Object -> Text -> Parser (Maybe GenesisFile) + parseShelleyProtocol :: Object -> Parser NodeShelleyProtocolConfiguration +parseShelleyProtocol Object +v = do + Maybe GenesisFile +primary <- Object +v Object -> Text -> Parser (Maybe GenesisFile) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "ShelleyGenesisFile" - Maybe GenesisFile -secondary <- Object -v Object -> Text -> Parser (Maybe GenesisFile) + Maybe GenesisFile +secondary <- Object +v Object -> Text -> Parser (Maybe GenesisFile) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "GenesisFile" - GenesisFile -npcShelleyGenesisFile <- + GenesisFile +npcShelleyGenesisFile <- case (Maybe GenesisFile -primary, Maybe GenesisFile -secondary) of - (Just GenesisFile -g, Maybe GenesisFile +primary, Maybe GenesisFile +secondary) of + (Just GenesisFile +g, Maybe GenesisFile Nothing) -> GenesisFile -> Parser GenesisFile forall (m :: * -> *) a. Monad m => a -> m a return GenesisFile -g +g (Maybe GenesisFile -Nothing, Just GenesisFile -g) -> GenesisFile -> Parser GenesisFile +Nothing, Just GenesisFile +g) -> GenesisFile -> Parser GenesisFile forall (m :: * -> *) a. Monad m => a -> m a return GenesisFile -g +g (Maybe GenesisFile Nothing, Maybe GenesisFile Nothing) -> String -> Parser GenesisFile @@ -899,9 +899,9 @@ forall a. [a] -> [a] -> [a] ++ String "or GenesisFile, but not both" - Maybe GenesisHash -npcShelleyGenesisFileHash <- Object -v Object -> Text -> Parser (Maybe GenesisHash) + Maybe GenesisHash +npcShelleyGenesisFileHash <- Object +v Object -> Text -> Parser (Maybe GenesisHash) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "ShelleyGenesisHash" @@ -915,25 +915,25 @@ GenesisFile npcShelleyGenesisFile :: GenesisFile npcShelleyGenesisFile :: GenesisFile -npcShelleyGenesisFile +npcShelleyGenesisFile , Maybe GenesisHash npcShelleyGenesisFileHash :: Maybe GenesisHash npcShelleyGenesisFileHash :: Maybe GenesisHash -npcShelleyGenesisFileHash +npcShelleyGenesisFileHash } - parseAlonzoProtocol :: Object -> Parser NodeAlonzoProtocolConfiguration -parseAlonzoProtocol Object -v = do - GenesisFile -npcAlonzoGenesisFile <- Object -v Object -> Text -> Parser GenesisFile + parseAlonzoProtocol :: Object -> Parser NodeAlonzoProtocolConfiguration +parseAlonzoProtocol Object +v = do + GenesisFile +npcAlonzoGenesisFile <- Object +v Object -> Text -> Parser GenesisFile forall a. FromJSON a => Object -> Text -> Parser a .: Text "AlonzoGenesisFile" - Maybe GenesisHash -npcAlonzoGenesisFileHash <- Object -v Object -> Text -> Parser (Maybe GenesisHash) + Maybe GenesisHash +npcAlonzoGenesisFileHash <- Object +v Object -> Text -> Parser (Maybe GenesisHash) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "AlonzoGenesisHash" @@ -946,20 +946,20 @@ GenesisFile npcAlonzoGenesisFile :: GenesisFile npcAlonzoGenesisFile :: GenesisFile -npcAlonzoGenesisFile +npcAlonzoGenesisFile , Maybe GenesisHash npcAlonzoGenesisFileHash :: Maybe GenesisHash npcAlonzoGenesisFileHash :: Maybe GenesisHash -npcAlonzoGenesisFileHash +npcAlonzoGenesisFileHash } - parseHardForkProtocol :: Object -> Parser NodeHardForkProtocolConfiguration -parseHardForkProtocol Object -v = do - Bool -npcTestEnableDevelopmentHardForkEras + parseHardForkProtocol :: Object -> Parser NodeHardForkProtocolConfiguration +parseHardForkProtocol Object +v = do + Bool +npcTestEnableDevelopmentHardForkEras <- Object -v Object -> Text -> Parser (Maybe Bool) +v Object -> Text -> Parser (Maybe Bool) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TestEnableDevelopmentHardForkEras" @@ -968,54 +968,54 @@ .!= Bool False - Maybe EpochNo -npcTestShelleyHardForkAtEpoch <- Object -v Object -> Text -> Parser (Maybe EpochNo) + Maybe EpochNo +npcTestShelleyHardForkAtEpoch <- Object +v Object -> Text -> Parser (Maybe EpochNo) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TestShelleyHardForkAtEpoch" - Maybe Word -npcTestShelleyHardForkAtVersion <- Object -v Object -> Text -> Parser (Maybe Word) + Maybe Word +npcTestShelleyHardForkAtVersion <- Object +v Object -> Text -> Parser (Maybe Word) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TestShelleyHardForkAtVersion" - Maybe EpochNo -npcTestAllegraHardForkAtEpoch <- Object -v Object -> Text -> Parser (Maybe EpochNo) + Maybe EpochNo +npcTestAllegraHardForkAtEpoch <- Object +v Object -> Text -> Parser (Maybe EpochNo) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TestAllegraHardForkAtEpoch" - Maybe Word -npcTestAllegraHardForkAtVersion <- Object -v Object -> Text -> Parser (Maybe Word) + Maybe Word +npcTestAllegraHardForkAtVersion <- Object +v Object -> Text -> Parser (Maybe Word) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TestAllegraHardForkAtVersion" - Maybe EpochNo -npcTestMaryHardForkAtEpoch <- Object -v Object -> Text -> Parser (Maybe EpochNo) + Maybe EpochNo +npcTestMaryHardForkAtEpoch <- Object +v Object -> Text -> Parser (Maybe EpochNo) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TestMaryHardForkAtEpoch" - Maybe Word -npcTestMaryHardForkAtVersion <- Object -v Object -> Text -> Parser (Maybe Word) + Maybe Word +npcTestMaryHardForkAtVersion <- Object +v Object -> Text -> Parser (Maybe Word) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TestMaryHardForkAtVersion" - Maybe EpochNo -npcTestAlonzoHardForkAtEpoch <- Object -v Object -> Text -> Parser (Maybe EpochNo) + Maybe EpochNo +npcTestAlonzoHardForkAtEpoch <- Object +v Object -> Text -> Parser (Maybe EpochNo) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TestAlonzoHardForkAtEpoch" - Maybe Word -npcTestAlonzoHardForkAtVersion <- Object -v Object -> Text -> Parser (Maybe Word) + Maybe Word +npcTestAlonzoHardForkAtVersion <- Object +v Object -> Text -> Parser (Maybe Word) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TestAlonzoHardForkAtVersion" @@ -1037,43 +1037,43 @@ Bool npcTestEnableDevelopmentHardForkEras :: Bool npcTestEnableDevelopmentHardForkEras :: Bool -npcTestEnableDevelopmentHardForkEras, +npcTestEnableDevelopmentHardForkEras, Maybe EpochNo npcTestShelleyHardForkAtEpoch :: Maybe EpochNo npcTestShelleyHardForkAtEpoch :: Maybe EpochNo -npcTestShelleyHardForkAtEpoch, +npcTestShelleyHardForkAtEpoch, Maybe Word npcTestShelleyHardForkAtVersion :: Maybe Word npcTestShelleyHardForkAtVersion :: Maybe Word -npcTestShelleyHardForkAtVersion, +npcTestShelleyHardForkAtVersion, Maybe EpochNo npcTestAllegraHardForkAtEpoch :: Maybe EpochNo npcTestAllegraHardForkAtEpoch :: Maybe EpochNo -npcTestAllegraHardForkAtEpoch, +npcTestAllegraHardForkAtEpoch, Maybe Word npcTestAllegraHardForkAtVersion :: Maybe Word npcTestAllegraHardForkAtVersion :: Maybe Word -npcTestAllegraHardForkAtVersion, +npcTestAllegraHardForkAtVersion, Maybe EpochNo npcTestMaryHardForkAtEpoch :: Maybe EpochNo npcTestMaryHardForkAtEpoch :: Maybe EpochNo -npcTestMaryHardForkAtEpoch, +npcTestMaryHardForkAtEpoch, Maybe Word npcTestMaryHardForkAtVersion :: Maybe Word npcTestMaryHardForkAtVersion :: Maybe Word -npcTestMaryHardForkAtVersion, +npcTestMaryHardForkAtVersion, Maybe EpochNo npcTestAlonzoHardForkAtEpoch :: Maybe EpochNo npcTestAlonzoHardForkAtEpoch :: Maybe EpochNo -npcTestAlonzoHardForkAtEpoch, +npcTestAlonzoHardForkAtEpoch, Maybe Word npcTestAlonzoHardForkAtVersion :: Maybe Word npcTestAlonzoHardForkAtVersion :: Maybe Word -npcTestAlonzoHardForkAtVersion +npcTestAlonzoHardForkAtVersion } -- | Default configuration is mainnet @@ -1245,7 +1245,7 @@ mempty } -lastOption :: Parser a -> Parser (Last a) +lastOption :: Parser a -> Parser (Last a) lastOption :: Parser a -> Parser (Last a) lastOption = (Maybe a -> Last a) -> Parser (Maybe a) -> Parser (Last a) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -1260,27 +1260,27 @@ forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) optional -lastToEither :: String -> Last a -> Either String a +lastToEither :: String -> Last a -> Either String a lastToEither :: String -> Last a -> Either String a -lastToEither String -errMsg (Last Maybe a -x) = Either String a +lastToEither String +errMsg (Last Maybe a +x) = Either String a -> (a -> Either String a) -> Maybe a -> Either String a forall b a. b -> (a -> b) -> Maybe a -> b maybe (String -> Either String a forall a b. a -> Either a b Left String -errMsg) a -> Either String a +errMsg) a -> Either String a forall a b. b -> Either a b Right Maybe a -x +x makeNodeConfiguration :: PartialNodeConfiguration -> Either String NodeConfiguration makeNodeConfiguration :: PartialNodeConfiguration -> Either String NodeConfiguration -makeNodeConfiguration PartialNodeConfiguration -pnc = do - ConfigYamlFilePath -configFile <- String +makeNodeConfiguration PartialNodeConfiguration +pnc = do + ConfigYamlFilePath +configFile <- String -> Last ConfigYamlFilePath -> Either String ConfigYamlFilePath forall a. String -> Last a -> Either String a lastToEither String @@ -1289,9 +1289,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last ConfigYamlFilePath pncConfigFile PartialNodeConfiguration -pnc - TopologyFile -topologyFile <- String -> Last TopologyFile -> Either String TopologyFile +pnc + TopologyFile +topologyFile <- String -> Last TopologyFile -> Either String TopologyFile forall a. String -> Last a -> Either String a lastToEither String "Missing TopologyFile" (Last TopologyFile -> Either String TopologyFile) @@ -1299,9 +1299,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last TopologyFile pncTopologyFile PartialNodeConfiguration -pnc - DbFile -databaseFile <- String -> Last DbFile -> Either String DbFile +pnc + DbFile +databaseFile <- String -> Last DbFile -> Either String DbFile forall a. String -> Last a -> Either String a lastToEither String "Missing DatabaseFile" (Last DbFile -> Either String DbFile) @@ -1309,9 +1309,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last DbFile pncDatabaseFile PartialNodeConfiguration -pnc - ProtocolFilepaths -protocolFiles <- String -> Last ProtocolFilepaths -> Either String ProtocolFilepaths +pnc + ProtocolFilepaths +protocolFiles <- String -> Last ProtocolFilepaths -> Either String ProtocolFilepaths forall a. String -> Last a -> Either String a lastToEither String "Missing ProtocolFiles" (Last ProtocolFilepaths -> Either String ProtocolFilepaths) @@ -1319,9 +1319,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last ProtocolFilepaths pncProtocolFiles PartialNodeConfiguration -pnc - Bool -validateDB <- String -> Last Bool -> Either String Bool +pnc + Bool +validateDB <- String -> Last Bool -> Either String Bool forall a. String -> Last a -> Either String a lastToEither String "Missing ValidateDB" (Last Bool -> Either String Bool) @@ -1329,9 +1329,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last Bool pncValidateDB PartialNodeConfiguration -pnc - Maybe Fd -shutdownIPC <- String -> Last (Maybe Fd) -> Either String (Maybe Fd) +pnc + Maybe Fd +shutdownIPC <- String -> Last (Maybe Fd) -> Either String (Maybe Fd) forall a. String -> Last a -> Either String a lastToEither String "Missing ShutdownIPC" (Last (Maybe Fd) -> Either String (Maybe Fd)) @@ -1339,9 +1339,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last (Maybe Fd) pncShutdownIPC PartialNodeConfiguration -pnc - MaxSlotNo -shutdownOnSlotSynced <- String -> Last MaxSlotNo -> Either String MaxSlotNo +pnc + MaxSlotNo +shutdownOnSlotSynced <- String -> Last MaxSlotNo -> Either String MaxSlotNo forall a. String -> Last a -> Either String a lastToEither String "Missing ShutdownOnSlotSynced" (Last MaxSlotNo -> Either String MaxSlotNo) @@ -1349,9 +1349,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last MaxSlotNo pncShutdownOnSlotSynced PartialNodeConfiguration -pnc - NodeProtocolConfiguration -protocolConfig <- String +pnc + NodeProtocolConfiguration +protocolConfig <- String -> Last NodeProtocolConfiguration -> Either String NodeProtocolConfiguration forall a. String -> Last a -> Either String a @@ -1363,9 +1363,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last NodeProtocolConfiguration pncProtocolConfig PartialNodeConfiguration -pnc - Bool -loggingSwitch <- String -> Last Bool -> Either String Bool +pnc + Bool +loggingSwitch <- String -> Last Bool -> Either String Bool forall a. String -> Last a -> Either String a lastToEither String "Missing LoggingSwitch" (Last Bool -> Either String Bool) @@ -1373,9 +1373,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last Bool pncLoggingSwitch PartialNodeConfiguration -pnc - Bool -logMetrics <- String -> Last Bool -> Either String Bool +pnc + Bool +logMetrics <- String -> Last Bool -> Either String Bool forall a. String -> Last a -> Either String a lastToEither String "Missing LogMetrics" (Last Bool -> Either String Bool) @@ -1383,9 +1383,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last Bool pncLogMetrics PartialNodeConfiguration -pnc - TraceOptions -traceConfig <- String -> Last TraceOptions -> Either String TraceOptions +pnc + TraceOptions +traceConfig <- String -> Last TraceOptions -> Either String TraceOptions forall a. String -> Last a -> Either String a lastToEither String "Missing TraceConfig" (Last TraceOptions -> Either String TraceOptions) @@ -1393,9 +1393,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last TraceOptions pncTraceConfig PartialNodeConfiguration -pnc - DiffusionMode -diffusionMode <- String -> Last DiffusionMode -> Either String DiffusionMode +pnc + DiffusionMode +diffusionMode <- String -> Last DiffusionMode -> Either String DiffusionMode forall a. String -> Last a -> Either String a lastToEither String "Missing DiffusionMode" (Last DiffusionMode -> Either String DiffusionMode) @@ -1403,9 +1403,9 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last DiffusionMode pncDiffusionMode PartialNodeConfiguration -pnc - SnapshotInterval -snapshotInterval <- String -> Last SnapshotInterval -> Either String SnapshotInterval +pnc + SnapshotInterval +snapshotInterval <- String -> Last SnapshotInterval -> Either String SnapshotInterval forall a. String -> Last a -> Either String a lastToEither String "Missing SnapshotInterval" (Last SnapshotInterval -> Either String SnapshotInterval) @@ -1413,10 +1413,10 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last SnapshotInterval pncSnapshotInterval PartialNodeConfiguration -pnc +pnc - Bool -testEnableDevelopmentNetworkProtocols <- + Bool +testEnableDevelopmentNetworkProtocols <- String -> Last Bool -> Either String Bool forall a. String -> Last a -> Either String a lastToEither String @@ -1426,7 +1426,7 @@ $ PartialNodeConfiguration -> Last Bool pncTestEnableDevelopmentNetworkProtocols PartialNodeConfiguration -pnc +pnc NodeConfiguration -> Either String NodeConfiguration forall (m :: * -> *) a. Monad m => a -> m a return (NodeConfiguration -> Either String NodeConfiguration) @@ -1462,7 +1462,7 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last NodeHostIPv4Address pncNodeIPv4Addr PartialNodeConfiguration -pnc +pnc , ncNodeIPv6Addr :: Maybe NodeHostIPv6Address ncNodeIPv6Addr = Last NodeHostIPv6Address -> Maybe NodeHostIPv6Address forall a. Last a -> Maybe a @@ -1471,7 +1471,7 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last NodeHostIPv6Address pncNodeIPv6Addr PartialNodeConfiguration -pnc +pnc , ncNodePortNumber :: Maybe PortNumber ncNodePortNumber = Last PortNumber -> Maybe PortNumber forall a. Last a -> Maybe a @@ -1480,31 +1480,31 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last PortNumber pncNodePortNumber PartialNodeConfiguration -pnc +pnc , ncConfigFile :: ConfigYamlFilePath ncConfigFile = ConfigYamlFilePath -configFile +configFile , ncTopologyFile :: TopologyFile ncTopologyFile = TopologyFile -topologyFile +topologyFile , ncDatabaseFile :: DbFile ncDatabaseFile = DbFile -databaseFile +databaseFile , ncProtocolFiles :: ProtocolFilepaths ncProtocolFiles = ProtocolFilepaths -protocolFiles +protocolFiles , ncValidateDB :: Bool ncValidateDB = Bool -validateDB +validateDB , ncShutdownIPC :: Maybe Fd ncShutdownIPC = Maybe Fd -shutdownIPC +shutdownIPC , ncShutdownOnSlotSynced :: MaxSlotNo ncShutdownOnSlotSynced = MaxSlotNo -shutdownOnSlotSynced +shutdownOnSlotSynced , ncProtocolConfig :: NodeProtocolConfiguration ncProtocolConfig = NodeProtocolConfiguration -protocolConfig +protocolConfig , ncSocketPath :: Maybe SocketPath ncSocketPath = Last SocketPath -> Maybe SocketPath forall a. Last a -> Maybe a @@ -1513,16 +1513,16 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last SocketPath pncSocketPath PartialNodeConfiguration -pnc +pnc , ncDiffusionMode :: DiffusionMode ncDiffusionMode = DiffusionMode -diffusionMode +diffusionMode , ncSnapshotInterval :: SnapshotInterval ncSnapshotInterval = SnapshotInterval -snapshotInterval +snapshotInterval , ncTestEnableDevelopmentNetworkProtocols :: Bool ncTestEnableDevelopmentNetworkProtocols = Bool -testEnableDevelopmentNetworkProtocols +testEnableDevelopmentNetworkProtocols , ncMaxConcurrencyBulkSync :: Maybe MaxConcurrencyBulkSync ncMaxConcurrencyBulkSync = Last MaxConcurrencyBulkSync -> Maybe MaxConcurrencyBulkSync forall a. Last a -> Maybe a @@ -1531,7 +1531,7 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last MaxConcurrencyBulkSync pncMaxConcurrencyBulkSync PartialNodeConfiguration -pnc +pnc , ncMaxConcurrencyDeadline :: Maybe MaxConcurrencyDeadline ncMaxConcurrencyDeadline = Last MaxConcurrencyDeadline -> Maybe MaxConcurrencyDeadline forall a. Last a -> Maybe a @@ -1540,28 +1540,28 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last MaxConcurrencyDeadline pncMaxConcurrencyDeadline PartialNodeConfiguration -pnc +pnc , ncLoggingSwitch :: Bool ncLoggingSwitch = Bool -loggingSwitch +loggingSwitch , ncLogMetrics :: Bool ncLogMetrics = Bool -logMetrics +logMetrics , ncTraceConfig :: TraceOptions ncTraceConfig = if Bool -loggingSwitch then TraceOptions -traceConfig +loggingSwitch then TraceOptions +traceConfig else TraceOptions TracingOff } ncProtocol :: NodeConfiguration -> Protocol ncProtocol :: NodeConfiguration -> Protocol -ncProtocol NodeConfiguration -nc = +ncProtocol NodeConfiguration +nc = case NodeConfiguration -> NodeProtocolConfiguration ncProtocolConfig NodeConfiguration -nc of +nc of NodeProtocolConfigurationByron{} -> Protocol ByronProtocol NodeProtocolConfigurationShelley{} -> Protocol @@ -1571,11 +1571,11 @@ pncProtocol :: PartialNodeConfiguration -> Either Text Protocol pncProtocol :: PartialNodeConfiguration -> Either Text Protocol -pncProtocol PartialNodeConfiguration -pnc = +pncProtocol PartialNodeConfiguration +pnc = case PartialNodeConfiguration -> Last NodeProtocolConfiguration pncProtocolConfig PartialNodeConfiguration -pnc of +pnc of Last Maybe NodeProtocolConfiguration Nothing -> Text -> Either Text Protocol forall a b. a -> Either a b @@ -1613,13 +1613,13 @@ $ PartialNodeConfiguration -> Last ConfigYamlFilePath pncConfigFile PartialNodeConfiguration defaultPartialNodeConfiguration -parseNodeConfigurationFP (Just (ConfigYamlFilePath String -fp)) = do - PartialNodeConfiguration -nc <- String -> IO PartialNodeConfiguration +parseNodeConfigurationFP (Just (ConfigYamlFilePath String +fp)) = do + PartialNodeConfiguration +nc <- String -> IO PartialNodeConfiguration forall (m :: * -> *) a. (MonadIO m, FromJSON a) => String -> m a decodeFileThrow String -fp +fp -- Make all the files be relative to the location of the config file. PartialNodeConfiguration -> IO PartialNodeConfiguration forall (f :: * -> *) a. Applicative f => a -> f a @@ -1630,7 +1630,7 @@ forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths (ShowS takeDirectory String -fp String -> ShowS +fp String -> ShowS </>) PartialNodeConfiguration -nc +nc \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Configuration.Socket.html b/cardano-node/src/Cardano.Node.Configuration.Socket.html index 49b9893d5a3..633048bdcfa 100644 --- a/cardano-node/src/Cardano.Node.Configuration.Socket.html +++ b/cardano-node/src/Cardano.Node.Configuration.Socket.html @@ -39,10 +39,10 @@ -- given actual already-constructed sockets, or the info needed to make new -- sockets later. -- -data SocketOrSocketInfo socket info = - ActualSocket socket - | SocketInfo info - deriving Int -> SocketOrSocketInfo socket info -> ShowS +data SocketOrSocketInfo socket info = + ActualSocket socket + | SocketInfo info + deriving Int -> SocketOrSocketInfo socket info -> ShowS [SocketOrSocketInfo socket info] -> ShowS SocketOrSocketInfo socket info -> String (Int -> SocketOrSocketInfo socket info -> ShowS) @@ -79,8 +79,8 @@ -> IO (SocketOrSocketInfo Socket.SockAddr Socket.SockAddr) getSocketOrSocketInfoAddr :: SocketOrSocketInfo Socket AddrInfo -> IO (SocketOrSocketInfo SockAddr SockAddr) -getSocketOrSocketInfoAddr (ActualSocket Socket -sock) = +getSocketOrSocketInfoAddr (ActualSocket Socket +sock) = SockAddr -> SocketOrSocketInfo SockAddr SockAddr forall socket info. socket -> SocketOrSocketInfo socket info ActualSocket (SockAddr -> SocketOrSocketInfo SockAddr SockAddr) @@ -88,9 +88,9 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Socket -> IO SockAddr Socket.getSocketName Socket -sock -getSocketOrSocketInfoAddr (SocketInfo AddrInfo -info) = +sock +getSocketOrSocketInfoAddr (SocketInfo AddrInfo +info) = SocketOrSocketInfo SockAddr SockAddr -> IO (SocketOrSocketInfo SockAddr SockAddr) forall (m :: * -> *) a. Monad m => a -> m a @@ -103,7 +103,7 @@ forall socket info. info -> SocketOrSocketInfo socket info SocketInfo (AddrInfo -> SockAddr Socket.addrAddress AddrInfo -info) +info) -- | Errors for the current module. @@ -115,7 +115,7 @@ | ClashingLocalSocketGiven | LocalSocketError FilePath IOException | GetAddrInfoError (Maybe NodeHostIPAddress) (Maybe PortNumber) IOException - deriving Int -> SocketConfigError -> ShowS + deriving Int -> SocketConfigError -> ShowS [SocketConfigError] -> ShowS SocketConfigError -> String (Int -> SocketConfigError -> ShowS) @@ -132,8 +132,8 @@ $cshowsPrec :: Int -> SocketConfigError -> ShowS Show -instance Exception SocketConfigError where - displayException :: SocketConfigError -> String +instance Exception SocketConfigError where + displayException :: SocketConfigError -> String displayException = SocketConfigError -> String renderSocketConfigError @@ -192,15 +192,15 @@ <> String "via systemd socket activation. Please use one or the other but not both." -renderSocketConfigError (LocalSocketError String -fp IOException -ex) = +renderSocketConfigError (LocalSocketError String +fp IOException +ex) = String "Failure while attempting to remove the stale local socket: " String -> ShowS forall a. Semigroup a => a -> a -> a <> String -fp String -> ShowS +fp String -> ShowS forall a. Semigroup a => a -> a -> a <> String " : " String -> ShowS @@ -208,12 +208,12 @@ <> IOException -> String forall e. Exception e => e -> String displayException IOException -ex +ex -renderSocketConfigError (GetAddrInfoError Maybe NodeHostIPAddress -addr Maybe PortNumber -port IOException -ex) = +renderSocketConfigError (GetAddrInfoError Maybe NodeHostIPAddress +addr Maybe PortNumber +port IOException +ex) = String "Failure while getting address information for the public listening " String -> ShowS @@ -224,7 +224,7 @@ <> Maybe NodeHostIPAddress -> String forall a b. (Show a, ConvertText String b) => a -> b show Maybe NodeHostIPAddress -addr String -> ShowS +addr String -> ShowS forall a. Semigroup a => a -> a -> a <> String " " String -> ShowS @@ -232,7 +232,7 @@ <> Maybe PortNumber -> String forall a b. (Show a, ConvertText String b) => a -> b show Maybe PortNumber -port String -> ShowS +port String -> ShowS forall a. Semigroup a => a -> a -> a <> String " : " String -> ShowS @@ -240,7 +240,7 @@ <> IOException -> String forall e. Exception e => e -> String displayException IOException -ex +ex -- | Gather from the various sources of configuration which sockets we will use @@ -265,25 +265,25 @@ (Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket SocketPath)) -gatherConfiguredSockets NodeConfiguration { Maybe NodeHostIPv4Address +gatherConfiguredSockets NodeConfiguration { Maybe NodeHostIPv4Address ncNodeIPv4Addr :: NodeConfiguration -> Maybe NodeHostIPv4Address ncNodeIPv4Addr :: Maybe NodeHostIPv4Address ncNodeIPv4Addr, - Maybe NodeHostIPv6Address + Maybe NodeHostIPv6Address ncNodeIPv6Addr :: NodeConfiguration -> Maybe NodeHostIPv6Address ncNodeIPv6Addr :: Maybe NodeHostIPv6Address ncNodeIPv6Addr, - Maybe PortNumber + Maybe PortNumber ncNodePortNumber :: NodeConfiguration -> Maybe PortNumber ncNodePortNumber :: Maybe PortNumber ncNodePortNumber, - Maybe SocketPath + Maybe SocketPath ncSocketPath :: NodeConfiguration -> Maybe SocketPath ncSocketPath :: Maybe SocketPath ncSocketPath } = do - Maybe ([Socket], [Socket], [Socket]) -systemDSockets <- IO (Maybe ([Socket], [Socket], [Socket])) + Maybe ([Socket], [Socket], [Socket]) +systemDSockets <- IO (Maybe ([Socket], [Socket], [Socket])) -> ExceptT SocketConfigError IO (Maybe ([Socket], [Socket], [Socket])) forall (m :: * -> *) a. MonadIO m => IO a -> m a @@ -293,9 +293,9 @@ -- Select the sockets or address for public node-to-node comms -- TODO: add config file support let -- The first systemd IPv4 socket if it exists - firstIpv4Socket :: Maybe Socket - firstIpv4Socket :: Maybe Socket -firstIpv4Socket = Maybe (Maybe Socket) -> Maybe Socket + firstIpv4Socket :: Maybe Socket + firstIpv4Socket :: Maybe Socket +firstIpv4Socket = Maybe (Maybe Socket) -> Maybe Socket forall (m :: * -> *) a. Monad m => m (m a) -> m a join (Maybe (Maybe Socket) -> Maybe Socket) -> Maybe (Maybe Socket) -> Maybe Socket @@ -309,20 +309,20 @@ forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c -. (\([Socket] -a, [Socket] +. (\([Socket] +a, [Socket] _, [Socket] _) -> [Socket] -a) (([Socket], [Socket], [Socket]) -> Maybe Socket) +a) (([Socket], [Socket], [Socket]) -> Maybe Socket) -> Maybe ([Socket], [Socket], [Socket]) -> Maybe (Maybe Socket) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe ([Socket], [Socket], [Socket]) -systemDSockets +systemDSockets -- The first systemd IPv6 socket if it exists - firstIpv6Socket :: Maybe Socket - firstIpv6Socket :: Maybe Socket -firstIpv6Socket = Maybe (Maybe Socket) -> Maybe Socket + firstIpv6Socket :: Maybe Socket + firstIpv6Socket :: Maybe Socket +firstIpv6Socket = Maybe (Maybe Socket) -> Maybe Socket forall (m :: * -> *) a. Monad m => m (m a) -> m a join (Maybe (Maybe Socket) -> Maybe Socket) -> Maybe (Maybe Socket) -> Maybe Socket @@ -337,21 +337,21 @@ Category cat => cat b c -> cat a b -> cat a c . (\([Socket] -_, [Socket] -a, [Socket] +_, [Socket] +a, [Socket] _) -> [Socket] -a) (([Socket], [Socket], [Socket]) -> Maybe Socket) +a) (([Socket], [Socket], [Socket]) -> Maybe Socket) -> Maybe ([Socket], [Socket], [Socket]) -> Maybe (Maybe Socket) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe ([Socket], [Socket], [Socket]) -systemDSockets +systemDSockets -- only when 'ncNodeIPv4Addr' is specified or an ipv4 socket is passed -- through socket activation - Maybe (SocketOrSocketInfo Socket AddrInfo) -ipv4 <- case (Maybe NodeHostIPv4Address -ncNodeIPv4Addr, Maybe Socket -firstIpv4Socket) of + Maybe (SocketOrSocketInfo Socket AddrInfo) +ipv4 <- case (Maybe NodeHostIPv4Address +ncNodeIPv4Addr, Maybe Socket +firstIpv4Socket) of (Maybe NodeHostIPv4Address Nothing, Maybe Socket Nothing) -> Maybe (SocketOrSocketInfo Socket AddrInfo) @@ -362,8 +362,8 @@ forall a. Maybe a Nothing (Maybe NodeHostIPv4Address -Nothing, Just Socket -sock) -> Maybe (SocketOrSocketInfo Socket AddrInfo) +Nothing, Just Socket +sock) -> Maybe (SocketOrSocketInfo Socket AddrInfo) -> ExceptT SocketConfigError IO (Maybe (SocketOrSocketInfo Socket AddrInfo)) forall (m :: * -> *) a. Monad m => a -> m a @@ -373,7 +373,7 @@ Just (Socket -> SocketOrSocketInfo Socket AddrInfo forall socket info. socket -> SocketOrSocketInfo socket info ActualSocket Socket -sock)) +sock)) (Just NodeHostIPv4Address _, Just Socket _) -> SocketConfigError @@ -382,8 +382,8 @@ forall e (m :: * -> *) a. MonadError e m => e -> m a throwError SocketConfigError ClashingPublicIpv4SocketGiven - (Just NodeHostIPv4Address -addr, Maybe Socket + (Just NodeHostIPv4Address +addr, Maybe Socket Nothing) -> (AddrInfo -> SocketOrSocketInfo Socket AddrInfo) -> Maybe AddrInfo -> Maybe (SocketOrSocketInfo Socket AddrInfo) @@ -415,16 +415,16 @@ forall a b. (a -> b) -> a -> b $ NodeHostIPv4Address -> NodeHostIPAddress nodeHostIPv4AddressToIPAddress NodeHostIPv4Address -addr) +addr) Maybe PortNumber -ncNodePortNumber +ncNodePortNumber -- only when 'ncNodeIPv6Addr' is specified or an ipv6 socket is passed -- through socket activation - Maybe (SocketOrSocketInfo Socket AddrInfo) -ipv6 <- case (Maybe NodeHostIPv6Address -ncNodeIPv6Addr, Maybe Socket -firstIpv6Socket) of + Maybe (SocketOrSocketInfo Socket AddrInfo) +ipv6 <- case (Maybe NodeHostIPv6Address +ncNodeIPv6Addr, Maybe Socket +firstIpv6Socket) of (Maybe NodeHostIPv6Address Nothing, Maybe Socket Nothing) -> Maybe (SocketOrSocketInfo Socket AddrInfo) @@ -435,8 +435,8 @@ forall a. Maybe a Nothing (Maybe NodeHostIPv6Address -Nothing, Just Socket -sock) -> Maybe (SocketOrSocketInfo Socket AddrInfo) +Nothing, Just Socket +sock) -> Maybe (SocketOrSocketInfo Socket AddrInfo) -> ExceptT SocketConfigError IO (Maybe (SocketOrSocketInfo Socket AddrInfo)) forall (m :: * -> *) a. Monad m => a -> m a @@ -446,7 +446,7 @@ Just (Socket -> SocketOrSocketInfo Socket AddrInfo forall socket info. socket -> SocketOrSocketInfo socket info ActualSocket Socket -sock)) +sock)) (Just NodeHostIPv6Address _, Just Socket _) -> SocketConfigError @@ -455,8 +455,8 @@ forall e (m :: * -> *) a. MonadError e m => e -> m a throwError SocketConfigError ClashingPublicIpv6SocketGiven - (Just NodeHostIPv6Address -addr, Maybe Socket + (Just NodeHostIPv6Address +addr, Maybe Socket Nothing) -> (AddrInfo -> SocketOrSocketInfo Socket AddrInfo) -> Maybe AddrInfo -> Maybe (SocketOrSocketInfo Socket AddrInfo) @@ -488,31 +488,31 @@ forall a b. (a -> b) -> a -> b $ NodeHostIPv6Address -> NodeHostIPAddress nodeHostIPv6AddressToIPAddress NodeHostIPv6Address -addr) +addr) Maybe PortNumber -ncNodePortNumber +ncNodePortNumber -- When none of the addresses was given. We try resolve address passing -- only 'ncNodePortNumber'. - (Maybe (SocketOrSocketInfo Socket AddrInfo) -ipv4', Maybe (SocketOrSocketInfo Socket AddrInfo) -ipv6') + (Maybe (SocketOrSocketInfo Socket AddrInfo) +ipv4', Maybe (SocketOrSocketInfo Socket AddrInfo) +ipv6') <- case (Maybe (SocketOrSocketInfo Socket AddrInfo) -ipv4, Maybe (SocketOrSocketInfo Socket AddrInfo) -ipv6) of +ipv4, Maybe (SocketOrSocketInfo Socket AddrInfo) +ipv6) of (Maybe (SocketOrSocketInfo Socket AddrInfo) Nothing, Maybe (SocketOrSocketInfo Socket AddrInfo) Nothing) -> do - [AddrInfo] -info <- Maybe NodeHostIPAddress + [AddrInfo] +info <- Maybe NodeHostIPAddress -> Maybe PortNumber -> ExceptT SocketConfigError IO [AddrInfo] nodeAddressInfo Maybe NodeHostIPAddress forall a. Maybe a Nothing Maybe PortNumber -ncNodePortNumber - let ipv4' :: Maybe (SocketOrSocketInfo socket AddrInfo) -ipv4' = AddrInfo -> SocketOrSocketInfo socket AddrInfo +ncNodePortNumber + let ipv4' :: Maybe (SocketOrSocketInfo socket AddrInfo) +ipv4' = AddrInfo -> SocketOrSocketInfo socket AddrInfo forall socket info. info -> SocketOrSocketInfo socket info SocketInfo (AddrInfo -> SocketOrSocketInfo socket AddrInfo) -> Maybe AddrInfo -> Maybe (SocketOrSocketInfo socket AddrInfo) @@ -528,9 +528,9 @@ cat b c -> cat a b -> cat a c . AddrInfo -> Family addrFamily) [AddrInfo] -info - ipv6' :: Maybe (SocketOrSocketInfo socket AddrInfo) -ipv6' = AddrInfo -> SocketOrSocketInfo socket AddrInfo +info + ipv6' :: Maybe (SocketOrSocketInfo socket AddrInfo) +ipv6' = AddrInfo -> SocketOrSocketInfo socket AddrInfo forall socket info. info -> SocketOrSocketInfo socket info SocketInfo (AddrInfo -> SocketOrSocketInfo socket AddrInfo) -> Maybe AddrInfo -> Maybe (SocketOrSocketInfo socket AddrInfo) @@ -546,7 +546,7 @@ cat b c -> cat a b -> cat a c . AddrInfo -> Family addrFamily) [AddrInfo] -info +info Bool -> ExceptT SocketConfigError IO () -> ExceptT SocketConfigError IO () @@ -558,13 +558,13 @@ forall a b. (a -> b) -> a -> b $ Maybe (SocketOrSocketInfo Any AddrInfo) forall socket. Maybe (SocketOrSocketInfo socket AddrInfo) -ipv4' Maybe (SocketOrSocketInfo Any AddrInfo) +ipv4' Maybe (SocketOrSocketInfo Any AddrInfo) -> Maybe (SocketOrSocketInfo Any AddrInfo) -> Maybe (SocketOrSocketInfo Any AddrInfo) forall (f :: * -> *) a. Alternative f => f a -> f a -> f a <|> Maybe (SocketOrSocketInfo Any AddrInfo) forall socket. Maybe (SocketOrSocketInfo socket AddrInfo) -ipv6') (ExceptT SocketConfigError IO () +ipv6') (ExceptT SocketConfigError IO () -> ExceptT SocketConfigError IO ()) -> ExceptT SocketConfigError IO () -> ExceptT SocketConfigError IO () @@ -585,9 +585,9 @@ forall (f :: * -> *) a. Applicative f => a -> f a pure (Maybe (SocketOrSocketInfo Socket AddrInfo) forall socket. Maybe (SocketOrSocketInfo socket AddrInfo) -ipv4', Maybe (SocketOrSocketInfo Socket AddrInfo) +ipv4', Maybe (SocketOrSocketInfo Socket AddrInfo) forall socket. Maybe (SocketOrSocketInfo socket AddrInfo) -ipv6') +ipv6') (Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket AddrInfo)) @@ -600,15 +600,15 @@ Maybe (SocketOrSocketInfo Socket AddrInfo)) forall (f :: * -> *) a. Applicative f => a -> f a pure (Maybe (SocketOrSocketInfo Socket AddrInfo) -ipv4, Maybe (SocketOrSocketInfo Socket AddrInfo) -ipv6) +ipv4, Maybe (SocketOrSocketInfo Socket AddrInfo) +ipv6) -- Select the socket or path for local node-to-client comms -- - let firstUnixSocket :: Maybe Socket - firstUnixSocket :: Maybe Socket -firstUnixSocket = Maybe (Maybe Socket) -> Maybe Socket + let firstUnixSocket :: Maybe Socket + firstUnixSocket :: Maybe Socket +firstUnixSocket = Maybe (Maybe Socket) -> Maybe Socket forall (m :: * -> *) a. Monad m => m (m a) -> m a join (Maybe (Maybe Socket) -> Maybe Socket) -> Maybe (Maybe Socket) -> Maybe Socket @@ -624,20 +624,20 @@ cat b c -> cat a b -> cat a c . (\([Socket] _, [Socket] -_, [Socket] -a) -> [Socket] -a) (([Socket], [Socket], [Socket]) -> Maybe Socket) +_, [Socket] +a) -> [Socket] +a) (([Socket], [Socket], [Socket]) -> Maybe Socket) -> Maybe ([Socket], [Socket], [Socket]) -> Maybe (Maybe Socket) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe ([Socket], [Socket], [Socket]) -systemDSockets +systemDSockets -- only when 'ncSocketpath' is specified or a unix socket is passed through -- socket activation - Maybe (SocketOrSocketInfo Socket SocketPath) -local <- case (Maybe SocketPath -ncSocketPath, Maybe Socket -firstUnixSocket) of + Maybe (SocketOrSocketInfo Socket SocketPath) +local <- case (Maybe SocketPath +ncSocketPath, Maybe Socket +firstUnixSocket) of (Maybe SocketPath Nothing, Maybe Socket Nothing) -> Maybe (SocketOrSocketInfo Socket SocketPath) @@ -656,8 +656,8 @@ throwError SocketConfigError ClashingLocalSocketGiven (Maybe SocketPath -Nothing, Just Socket -sock) -> Maybe (SocketOrSocketInfo Socket SocketPath) +Nothing, Just Socket +sock) -> Maybe (SocketOrSocketInfo Socket SocketPath) -> ExceptT SocketConfigError IO (Maybe (SocketOrSocketInfo Socket SocketPath)) forall (m :: * -> *) a. Monad m => a -> m a @@ -689,12 +689,12 @@ $ Socket -> SocketOrSocketInfo Socket SocketPath forall socket info. socket -> SocketOrSocketInfo socket info ActualSocket Socket -sock - (Just SocketPath -path, Maybe Socket +sock + (Just SocketPath +path, Maybe Socket Nothing) -> SocketPath -> ExceptT SocketConfigError IO () removeStaleLocalSocket SocketPath -path ExceptT SocketConfigError IO () +path ExceptT SocketConfigError IO () -> Maybe (SocketOrSocketInfo Socket SocketPath) -> ExceptT SocketConfigError IO (Maybe (SocketOrSocketInfo Socket SocketPath)) @@ -705,7 +705,7 @@ Just (SocketPath -> SocketOrSocketInfo Socket SocketPath forall socket info. info -> SocketOrSocketInfo socket info SocketInfo SocketPath -path) +path) (Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket AddrInfo), @@ -718,9 +718,9 @@ Maybe (SocketOrSocketInfo Socket SocketPath)) forall (m :: * -> *) a. Monad m => a -> m a return (Maybe (SocketOrSocketInfo Socket AddrInfo) -ipv4', Maybe (SocketOrSocketInfo Socket AddrInfo) -ipv6', Maybe (SocketOrSocketInfo Socket SocketPath) -local) +ipv4', Maybe (SocketOrSocketInfo Socket AddrInfo) +ipv6', Maybe (SocketOrSocketInfo Socket SocketPath) +local) -- | Binding a local unix domain socket always expects to create it, and fails @@ -732,8 +732,8 @@ return () #else removeStaleLocalSocket :: SocketPath -> ExceptT SocketConfigError IO () -removeStaleLocalSocket (SocketPath String -path) = +removeStaleLocalSocket (SocketPath String +path) = (IOException -> SocketConfigError) -> IO () -> ExceptT SocketConfigError IO () forall (m :: * -> *) x a. @@ -741,25 +741,25 @@ (IOException -> x) -> IO a -> ExceptT x m a handleIOExceptT (String -> IOException -> SocketConfigError LocalSocketError String -path) (IO () -> ExceptT SocketConfigError IO ()) +path) (IO () -> ExceptT SocketConfigError IO ()) -> IO () -> ExceptT SocketConfigError IO () forall a b. (a -> b) -> a -> b $ String -> IO () removeFile String -path IO () -> (IOException -> IO ()) -> IO () +path IO () -> (IOException -> IO ()) -> IO () forall e a. Exception e => IO a -> (e -> IO a) -> IO a -`catch` \IOException -e -> +`catch` \IOException +e -> if IOException -> Bool isDoesNotExistError IOException -e then () -> IO () +e then () -> IO () forall (m :: * -> *) a. Monad m => a -> m a return () else IOException -> IO () forall (m :: * -> *) e a. (MonadIO m, Exception e) => e -> m a throwIO IOException -e +e #endif nodeAddressInfo :: Maybe NodeHostIPAddress @@ -767,9 +767,9 @@ -> ExceptT SocketConfigError IO [AddrInfo] nodeAddressInfo :: Maybe NodeHostIPAddress -> Maybe PortNumber -> ExceptT SocketConfigError IO [AddrInfo] -nodeAddressInfo Maybe NodeHostIPAddress -mbHostAddr Maybe PortNumber -mbPort = +nodeAddressInfo Maybe NodeHostIPAddress +mbHostAddr Maybe PortNumber +mbPort = (IOException -> SocketConfigError) -> IO [AddrInfo] -> ExceptT SocketConfigError IO [AddrInfo] forall (m :: * -> *) x a. @@ -778,8 +778,8 @@ handleIOExceptT (Maybe NodeHostIPAddress -> Maybe PortNumber -> IOException -> SocketConfigError GetAddrInfoError Maybe NodeHostIPAddress -mbHostAddr Maybe PortNumber -mbPort) (IO [AddrInfo] -> ExceptT SocketConfigError IO [AddrInfo]) +mbHostAddr Maybe PortNumber +mbPort) (IO [AddrInfo] -> ExceptT SocketConfigError IO [AddrInfo]) -> IO [AddrInfo] -> ExceptT SocketConfigError IO [AddrInfo] forall a b. (a -> b) -> a -> b $ @@ -788,23 +788,23 @@ (AddrInfo -> Maybe AddrInfo forall a. a -> Maybe a Just AddrInfo -hints) +hints) (NodeHostIPAddress -> String forall a. Show a => a -> String Prelude.show (NodeHostIPAddress -> String) -> Maybe NodeHostIPAddress -> Maybe String forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe NodeHostIPAddress -mbHostAddr) +mbHostAddr) (PortNumber -> String forall a. Show a => a -> String Prelude.show (PortNumber -> String) -> Maybe PortNumber -> Maybe String forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe PortNumber -mbPort) +mbPort) where - hints :: AddrInfo -hints = AddrInfo + hints :: AddrInfo +hints = AddrInfo Socket.defaultHints { addrFlags :: [AddrInfoFlag] addrFlags = [AddrInfoFlag @@ -823,11 +823,11 @@ #ifdef SYSTEMD getSystemdSockets :: IO (Maybe ([Socket], [Socket], [Socket])) getSystemdSockets = do - Maybe [Socket] -sds_m <- IO (Maybe [Socket]) + Maybe [Socket] +sds_m <- IO (Maybe [Socket]) getActivatedSockets case Maybe [Socket] -sds_m of +sds_m of Maybe [Socket] Nothing -> Maybe ([Socket], [Socket], [Socket]) -> IO (Maybe ([Socket], [Socket], [Socket])) @@ -835,8 +835,8 @@ return Maybe ([Socket], [Socket], [Socket]) forall a. Maybe a Nothing - Just [Socket] -socks -> + Just [Socket] +socks -> ([Socket], [Socket], [Socket]) -> Maybe ([Socket], [Socket], [Socket]) forall a. a -> Maybe a @@ -854,47 +854,47 @@ forall (t :: * -> *) (m :: * -> *) b a. (Foldable t, Monad m) => (b -> a -> m b) -> b -> t a -> m b -foldM (\([Socket] -ipv4s, [Socket] -ipv6s, [Socket] -unixs) Socket -sock -> do - SockAddr -addr <- Socket -> IO SockAddr +foldM (\([Socket] +ipv4s, [Socket] +ipv6s, [Socket] +unixs) Socket +sock -> do + SockAddr +addr <- Socket -> IO SockAddr Socket.getSocketName Socket -sock +sock case SockAddr -addr of +addr of Socket.SockAddrInet {} -> ([Socket], [Socket], [Socket]) -> IO ([Socket], [Socket], [Socket]) forall (m :: * -> *) a. Monad m => a -> m a return (Socket -sock Socket -> [Socket] -> [Socket] +sock Socket -> [Socket] -> [Socket] forall a. a -> [a] -> [a] : [Socket] -ipv4s, [Socket] -ipv6s, [Socket] -unixs) +ipv4s, [Socket] +ipv6s, [Socket] +unixs) Socket.SockAddrInet6 {} -> ([Socket], [Socket], [Socket]) -> IO ([Socket], [Socket], [Socket]) forall (m :: * -> *) a. Monad m => a -> m a return ( [Socket] -ipv4s, Socket -sock Socket -> [Socket] -> [Socket] +ipv4s, Socket +sock Socket -> [Socket] -> [Socket] forall a. a -> [a] -> [a] : [Socket] -ipv6s, [Socket] -unixs) +ipv6s, [Socket] +unixs) Socket.SockAddrUnix {} -> ([Socket], [Socket], [Socket]) -> IO ([Socket], [Socket], [Socket]) forall (m :: * -> *) a. Monad m => a -> m a return ( [Socket] -ipv4s, [Socket] -ipv6s, Socket -sock Socket -> [Socket] -> [Socket] +ipv4s, [Socket] +ipv6s, Socket +sock Socket -> [Socket] -> [Socket] forall a. a -> [a] -> [a] : [Socket] -unixs)) +unixs)) ([], [], []) [Socket] -socks +socks #else getSystemdSockets = return Nothing #endif diff --git a/cardano-node/src/Cardano.Node.Configuration.Topology.html b/cardano-node/src/Cardano.Node.Configuration.Topology.html index e95a16f1458..7936b0e0b32 100644 --- a/cardano-node/src/Cardano.Node.Configuration.Topology.html +++ b/cardano-node/src/Cardano.Node.Configuration.Topology.html @@ -31,7 +31,7 @@ newtype TopologyError = NodeIdNotFoundInToplogyFile FilePath - deriving Int -> TopologyError -> ShowS + deriving Int -> TopologyError -> ShowS [TopologyError] -> ShowS TopologyError -> String (Int -> TopologyError -> ShowS) @@ -64,7 +64,7 @@ -- should we maintain active (hot) connection; -- if an IP address is given valency is used as -- a Boolean value, @0@ means to ignore the address; - } deriving (RemoteAddress -> RemoteAddress -> Bool + } deriving (RemoteAddress -> RemoteAddress -> Bool (RemoteAddress -> RemoteAddress -> Bool) -> (RemoteAddress -> RemoteAddress -> Bool) -> Eq RemoteAddress forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -72,7 +72,7 @@ $c/= :: RemoteAddress -> RemoteAddress -> Bool == :: RemoteAddress -> RemoteAddress -> Bool $c== :: RemoteAddress -> RemoteAddress -> Bool -Eq, Eq RemoteAddress +Eq, Eq RemoteAddress Eq RemoteAddress -> (RemoteAddress -> RemoteAddress -> Ordering) -> (RemoteAddress -> RemoteAddress -> Bool) @@ -110,7 +110,7 @@ compare :: RemoteAddress -> RemoteAddress -> Ordering $ccompare :: RemoteAddress -> RemoteAddress -> Ordering $cp1Ord :: Eq RemoteAddress -Ord, Int -> RemoteAddress -> ShowS +Ord, Int -> RemoteAddress -> ShowS [RemoteAddress] -> ShowS RemoteAddress -> String (Int -> RemoteAddress -> ShowS) @@ -136,22 +136,22 @@ -> Maybe (Either NodeIPAddress (NodeDnsAddress, Int)) remoteAddressToNodeAddress :: RemoteAddress -> Maybe (Either NodeIPAddress (NodeDnsAddress, Int)) -remoteAddressToNodeAddress (RemoteAddress Text -_addrText PortNumber -_port Int +remoteAddressToNodeAddress (RemoteAddress Text +_addrText PortNumber +_port Int 0) = Maybe (Either NodeIPAddress (NodeDnsAddress, Int)) forall a. Maybe a Nothing -remoteAddressToNodeAddress (RemoteAddress Text -addrText PortNumber -port Int -valency) = +remoteAddressToNodeAddress (RemoteAddress Text +addrText PortNumber +port Int +valency) = case String -> Maybe IP forall a. Read a => String -> Maybe a readMaybe (Text -> String Text.unpack Text -addrText) of +addrText) of Maybe IP Nothing -> Either NodeIPAddress (NodeDnsAddress, Int) -> Maybe (Either NodeIPAddress (NodeDnsAddress, Int)) @@ -167,12 +167,12 @@ forall addr. addr -> PortNumber -> NodeAddress' addr NodeAddress (Text -> NodeHostDnsAddress NodeHostDnsAddress Text -addrText) PortNumber -port +addrText) PortNumber +port , Int -valency) - Just IP -addr -> Either NodeIPAddress (NodeDnsAddress, Int) +valency) + Just IP +addr -> Either NodeIPAddress (NodeDnsAddress, Int) -> Maybe (Either NodeIPAddress (NodeDnsAddress, Int)) forall a. a -> Maybe a Just (Either NodeIPAddress (NodeDnsAddress, Int) @@ -186,19 +186,19 @@ forall addr. addr -> PortNumber -> NodeAddress' addr NodeAddress (IP -> NodeHostIPAddress NodeHostIPAddress IP -addr) PortNumber -port) +addr) PortNumber +port) instance Condense RemoteAddress where - condense :: RemoteAddress -> String -condense (RemoteAddress Text -addr PortNumber -port Int -val) = + condense :: RemoteAddress -> String +condense (RemoteAddress Text +addr PortNumber +port Int +val) = Text -> String Text.unpack Text -addr String -> ShowS +addr String -> ShowS forall a. [a] -> [a] -> [a] ++ String ":" String -> ShowS @@ -206,7 +206,7 @@ ++ PortNumber -> String forall a b. (Show a, ConvertText String b) => a -> b show PortNumber -port String -> ShowS +port String -> ShowS forall a. [a] -> [a] -> [a] ++ String " (" String -> ShowS @@ -214,13 +214,13 @@ ++ Int -> String forall a b. (Show a, ConvertText String b) => a -> b show Int -val String -> ShowS +val String -> ShowS forall a. [a] -> [a] -> [a] ++ String ")" -instance FromJSON RemoteAddress where - parseJSON :: Value -> Parser RemoteAddress +instance FromJSON RemoteAddress where + parseJSON :: Value -> Parser RemoteAddress parseJSON = String -> (Object -> Parser RemoteAddress) -> Value @@ -232,15 +232,15 @@ -> Value -> Parser RemoteAddress forall a b. (a -> b) -> a -> b -$ \Object -v -> +$ \Object +v -> Text -> PortNumber -> Int -> RemoteAddress RemoteAddress (Text -> PortNumber -> Int -> RemoteAddress) -> Parser Text -> Parser (PortNumber -> Int -> RemoteAddress) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser Text +v Object -> Text -> Parser Text forall a. FromJSON a => Object -> Text -> Parser a .: Text "addr" @@ -252,22 +252,22 @@ fromIntegral :: Int -> PortNumber) (Int -> PortNumber) -> Parser Int -> Parser PortNumber forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser Int +v Object -> Text -> Parser Int forall a. FromJSON a => Object -> Text -> Parser a .: Text "port") Parser (Int -> RemoteAddress) -> Parser Int -> Parser RemoteAddress forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser Int +v Object -> Text -> Parser Int forall a. FromJSON a => Object -> Text -> Parser a .: Text "valency" -instance ToJSON RemoteAddress where - toJSON :: RemoteAddress -> Value -toJSON RemoteAddress -ra = +instance ToJSON RemoteAddress where + toJSON :: RemoteAddress -> Value +toJSON RemoteAddress +ra = [Pair] -> Value object [ Text @@ -275,7 +275,7 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= RemoteAddress -> Text raAddress RemoteAddress -ra +ra , Text "port" Text -> Int -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -283,13 +283,13 @@ forall a b. (Integral a, Num b) => a -> b fromIntegral (RemoteAddress -> PortNumber raPort RemoteAddress -ra) :: Int) +ra) :: Int) , Text "valency" Text -> Int -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= RemoteAddress -> Int raValency RemoteAddress -ra +ra ] data NodeSetup = NodeSetup @@ -301,7 +301,7 @@ nodeIPv6Address :: !(Maybe NodeIPv6Address) , NodeSetup -> [RemoteAddress] producers :: ![RemoteAddress] - } deriving (NodeSetup -> NodeSetup -> Bool + } deriving (NodeSetup -> NodeSetup -> Bool (NodeSetup -> NodeSetup -> Bool) -> (NodeSetup -> NodeSetup -> Bool) -> Eq NodeSetup forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -309,7 +309,7 @@ $c/= :: NodeSetup -> NodeSetup -> Bool == :: NodeSetup -> NodeSetup -> Bool $c== :: NodeSetup -> NodeSetup -> Bool -Eq, Int -> NodeSetup -> ShowS +Eq, Int -> NodeSetup -> ShowS [NodeSetup] -> ShowS NodeSetup -> String (Int -> NodeSetup -> ShowS) @@ -326,16 +326,16 @@ $cshowsPrec :: Int -> NodeSetup -> ShowS Show) -instance FromJSON NodeSetup where - parseJSON :: Value -> Parser NodeSetup -parseJSON = String -> (Object -> Parser NodeSetup) -> Value -> Parser NodeSetup +instance FromJSON NodeSetup where + parseJSON :: Value -> Parser NodeSetup +parseJSON = String -> (Object -> Parser NodeSetup) -> Value -> Parser NodeSetup forall a. String -> (Object -> Parser a) -> Value -> Parser a withObject String "NodeSetup" ((Object -> Parser NodeSetup) -> Value -> Parser NodeSetup) -> (Object -> Parser NodeSetup) -> Value -> Parser NodeSetup forall a b. (a -> b) -> a -> b -$ \Object -o -> +$ \Object +o -> Word64 -> Maybe NodeIPv4Address -> Maybe NodeIPv6Address @@ -353,7 +353,7 @@ -> Maybe NodeIPv6Address -> [RemoteAddress] -> NodeSetup) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -o Object -> Text -> Parser Word64 +o Object -> Text -> Parser Word64 forall a. FromJSON a => Object -> Text -> Parser a .: Text "nodeId" @@ -364,7 +364,7 @@ -> Parser (Maybe NodeIPv6Address -> [RemoteAddress] -> NodeSetup) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe NodeIPv4Address) +o Object -> Text -> Parser (Maybe NodeIPv4Address) forall a. FromJSON a => Object -> Text -> Parser a .: Text "nodeIPv4Address" @@ -373,7 +373,7 @@ -> Parser ([RemoteAddress] -> NodeSetup) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser (Maybe NodeIPv6Address) +o Object -> Text -> Parser (Maybe NodeIPv6Address) forall a. FromJSON a => Object -> Text -> Parser a .: Text "nodeIPv6Address" @@ -381,15 +381,15 @@ -> Parser [RemoteAddress] -> Parser NodeSetup forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -o Object -> Text -> Parser [RemoteAddress] +o Object -> Text -> Parser [RemoteAddress] forall a. FromJSON a => Object -> Text -> Parser a .: Text "producers" -instance ToJSON NodeSetup where - toJSON :: NodeSetup -> Value -toJSON NodeSetup -ns = +instance ToJSON NodeSetup where + toJSON :: NodeSetup -> Value +toJSON NodeSetup +ns = [Pair] -> Value object [ Text @@ -397,30 +397,30 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= NodeSetup -> Word64 nodeId NodeSetup -ns +ns , Text "nodeIPv4Address" Text -> Maybe NodeIPv4Address -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= NodeSetup -> Maybe NodeIPv4Address nodeIPv4Address NodeSetup -ns +ns , Text "nodeIPv6Address" Text -> Maybe NodeIPv6Address -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= NodeSetup -> Maybe NodeIPv6Address nodeIPv6Address NodeSetup -ns +ns , Text "producers" Text -> [RemoteAddress] -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= NodeSetup -> [RemoteAddress] producers NodeSetup -ns +ns ] data NetworkTopology = MockNodeTopology ![NodeSetup] | RealNodeTopology ![RemoteAddress] - deriving (NetworkTopology -> NetworkTopology -> Bool + deriving (NetworkTopology -> NetworkTopology -> Bool (NetworkTopology -> NetworkTopology -> Bool) -> (NetworkTopology -> NetworkTopology -> Bool) -> Eq NetworkTopology @@ -429,7 +429,7 @@ $c/= :: NetworkTopology -> NetworkTopology -> Bool == :: NetworkTopology -> NetworkTopology -> Bool $c== :: NetworkTopology -> NetworkTopology -> Bool -Eq, Int -> NetworkTopology -> ShowS +Eq, Int -> NetworkTopology -> ShowS [NetworkTopology] -> ShowS NetworkTopology -> String (Int -> NetworkTopology -> ShowS) @@ -446,9 +446,9 @@ $cshowsPrec :: Int -> NetworkTopology -> ShowS Show) -instance FromJSON NetworkTopology where - parseJSON :: Value -> Parser NetworkTopology -parseJSON = String +instance FromJSON NetworkTopology where + parseJSON :: Value -> Parser NetworkTopology +parseJSON = String -> (Object -> Parser NetworkTopology) -> Value -> Parser NetworkTopology @@ -460,8 +460,8 @@ -> Value -> Parser NetworkTopology forall a b. (a -> b) -> a -> b -$ \Object -o -> [Parser NetworkTopology] -> Parser NetworkTopology +$ \Object +o -> [Parser NetworkTopology] -> Parser NetworkTopology forall (t :: * -> *) (f :: * -> *) a. (Foldable t, Alternative f) => t (f a) -> f a @@ -471,7 +471,7 @@ -> Parser [NodeSetup] -> Parser NetworkTopology forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -o Object -> Text -> Parser [NodeSetup] +o Object -> Text -> Parser [NodeSetup] forall a. FromJSON a => Object -> Text -> Parser a .: Text "MockProducers" @@ -480,46 +480,46 @@ -> Parser [RemoteAddress] -> Parser NetworkTopology forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -o Object -> Text -> Parser [RemoteAddress] +o Object -> Text -> Parser [RemoteAddress] forall a. FromJSON a => Object -> Text -> Parser a .: Text "Producers" ] -instance ToJSON NetworkTopology where - toJSON :: NetworkTopology -> Value -toJSON NetworkTopology -top = +instance ToJSON NetworkTopology where + toJSON :: NetworkTopology -> Value +toJSON NetworkTopology +top = case NetworkTopology -top of - MockNodeTopology [NodeSetup] -nss -> [Pair] -> Value +top of + MockNodeTopology [NodeSetup] +nss -> [Pair] -> Value object [ Text "MockProducers" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [NodeSetup] -> Value forall a. ToJSON a => a -> Value toJSON [NodeSetup] -nss ] - RealNodeTopology [RemoteAddress] -ras -> [Pair] -> Value +nss ] + RealNodeTopology [RemoteAddress] +ras -> [Pair] -> Value object [ Text "Producers" Text -> Value -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [RemoteAddress] -> Value forall a. ToJSON a => a -> Value toJSON [RemoteAddress] -ras ] +ras ] -- | Read the `NetworkTopology` configuration from the specified file. -- While running a real protocol, this gives your node its own address and -- other remote peers it will attempt to connect to. readTopologyFile :: NodeConfiguration -> IO (Either Text NetworkTopology) readTopologyFile :: NodeConfiguration -> IO (Either Text NetworkTopology) -readTopologyFile NodeConfiguration -nc = do - Either IOException ByteString -eBs <- IO ByteString -> IO (Either IOException ByteString) +readTopologyFile NodeConfiguration +nc = do + Either IOException ByteString +eBs <- IO ByteString -> IO (Either IOException ByteString) forall e a. Exception e => IO a -> IO (Either e a) Exception.try (IO ByteString -> IO (Either IOException ByteString)) -> IO ByteString -> IO (Either IOException ByteString) @@ -530,12 +530,12 @@ forall a b. (a -> b) -> a -> b $ NodeConfiguration -> TopologyFile ncTopologyFile NodeConfiguration -nc) +nc) case Either IOException ByteString -eBs of - Left IOException -e -> Either Text NetworkTopology -> IO (Either Text NetworkTopology) +eBs of + Left IOException +e -> Either Text NetworkTopology -> IO (Either Text NetworkTopology) forall (m :: * -> *) a. Monad m => a -> m a return (Either Text NetworkTopology -> IO (Either Text NetworkTopology)) -> (Text -> Either Text NetworkTopology) @@ -550,10 +550,10 @@ -> Text -> IO (Either Text NetworkTopology) forall a b. (a -> b) -> a -> b $ IOException -> Text -handler IOException -e - Right ByteString -bs -> Either Text NetworkTopology -> IO (Either Text NetworkTopology) +handler IOException +e + Right ByteString +bs -> Either Text NetworkTopology -> IO (Either Text NetworkTopology) forall (m :: * -> *) a. Monad m => a -> m a return (Either Text NetworkTopology -> IO (Either Text NetworkTopology)) -> (ByteString -> Either Text NetworkTopology) @@ -568,7 +568,7 @@ Bifunctor p => (a -> b) -> p a c -> p b c first String -> Text -handlerJSON (Either String NetworkTopology -> Either Text NetworkTopology) +handlerJSON (Either String NetworkTopology -> Either Text NetworkTopology) -> (ByteString -> Either String NetworkTopology) -> ByteString -> Either Text NetworkTopology @@ -582,13 +582,13 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ByteString LBS.fromStrict ByteString -bs +bs where - handler :: IOException -> Text - handler :: IOException -> Text -handler IOException -e = String -> Text + handler :: IOException -> Text + handler :: IOException -> Text +handler IOException +e = String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b $ String @@ -598,15 +598,15 @@ ++ IOException -> String forall e. Exception e => e -> String displayException IOException -e - handlerJSON :: String -> Text - handlerJSON :: String -> Text -handlerJSON String -err = Text +e + handlerJSON :: String -> Text + handlerJSON :: String -> Text +handlerJSON String +err = Text "Is your topology file formatted correctly? \ \The port and valency fields should be numerical. " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -err +err \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Handlers.Shutdown.html b/cardano-node/src/Cardano.Node.Handlers.Shutdown.html index 556a1470bbd..3a9d60d4c09 100644 --- a/cardano-node/src/Cardano.Node.Handlers.Shutdown.html +++ b/cardano-node/src/Cardano.Node.Handlers.Shutdown.html @@ -76,13 +76,13 @@ -- The opposite end might be either internal or external to the node process. withShutdownHandler :: Maybe ShutdownListener -> Trace IO Text -> IO () -> IO () withShutdownHandler :: Maybe ShutdownListener -> Trace IO Text -> IO () -> IO () -withShutdownHandler Maybe ShutdownListener -listener Trace IO Text -trace IO () -action - | Just (ShutdownListener Fd -fd) <- Maybe ShutdownListener -listener = +withShutdownHandler Maybe ShutdownListener +listener Trace IO Text +trace IO () +action + | Just (ShutdownListener Fd +fd) <- Maybe ShutdownListener +listener = IO () -> IO () -> IO () forall a b. IO a -> IO b -> IO () Async.race_ (IO () -> IO () @@ -90,46 +90,46 @@ wrapUninterruptableIO (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ Fd -> IO () -waitForEOF Fd -fd) IO () -action +waitForEOF Fd +fd) IO () +action | Bool otherwise = IO () -action +action where - waitForEOF :: Fd -> IO () - waitForEOF :: Fd -> IO () -waitForEOF (Fd CInt -fd) = do - Handle -hnd <- CInt -> IO Handle + waitForEOF :: Fd -> IO () + waitForEOF :: Fd -> IO () +waitForEOF (Fd CInt +fd) = do + Handle +hnd <- CInt -> IO Handle IO.fdToHandle CInt -fd - Either IOError Char -r <- IO Char -> IO (Either IOError Char) +fd + Either IOError Char +r <- IO Char -> IO (Either IOError Char) forall e a. Exception e => IO a -> IO (Either e a) try (IO Char -> IO (Either IOError Char)) -> IO Char -> IO (Either IOError Char) forall a b. (a -> b) -> a -> b $ Handle -> IO Char IO.hGetChar Handle -hnd +hnd case Either IOError Char -r of - Left IOError -e +r of + Left IOError +e | IOError -> Bool IO.isEOFError IOError -e -> Tracer IO Text -> Text -> IO () +e -> Tracer IO Text -> Text -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO Text -tracer Text +tracer Text "received shutdown request" | Bool otherwise -> IOError -> IO () forall (m :: * -> *) e a. (MonadIO m, Exception e) => e -> m a throwIO IOError -e +e Right Char _ -> @@ -141,9 +141,9 @@ IO.userError String "--shutdown-ipc FD does not expect input" - tracer :: Tracer IO Text - tracer :: Tracer IO Text -tracer = TracingVerbosity -> Trace IO Text -> Tracer IO Text + tracer :: Tracer IO Text + tracer :: Tracer IO Text +tracer = TracingVerbosity -> Trace IO Text -> Tracer IO Text forall a (m :: * -> *) b. Transformable a m b => TracingVerbosity -> Trace m a -> Tracer m b @@ -151,22 +151,22 @@ MaximalVerbosity (Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Trace m a -> Trace m a severityNotice Trace IO Text -trace) +trace) sfdsListener :: ShutdownFDs -> Maybe ShutdownListener sfdsListener :: ShutdownFDs -> Maybe ShutdownListener sfdsListener = \case - ExternalShutdown ShutdownListener -r -> ShutdownListener -> Maybe ShutdownListener + ExternalShutdown ShutdownListener +r -> ShutdownListener -> Maybe ShutdownListener forall a. a -> Maybe a Just ShutdownListener -r - InternalShutdown ShutdownListener -r ShutdownDoorbell -_w -> ShutdownListener -> Maybe ShutdownListener +r + InternalShutdown ShutdownListener +r ShutdownDoorbell +_w -> ShutdownListener -> Maybe ShutdownListener forall a. a -> Maybe a Just ShutdownListener -r +r ShutdownFDs _ -> Maybe ShutdownListener forall a. Maybe a @@ -181,13 +181,13 @@ -- continue and remain blocked, leading to a leak of the thread. As such this -- is only reasonable to use a fixed number of times for the whole process. -- -wrapUninterruptableIO :: IO a -> IO a +wrapUninterruptableIO :: IO a -> IO a wrapUninterruptableIO :: IO a -> IO a -wrapUninterruptableIO IO a -action = IO a -> IO (Async a) +wrapUninterruptableIO IO a +action = IO a -> IO (Async a) forall a. IO a -> IO (Async a) async IO a -action IO (Async a) -> (Async a -> IO a) -> IO a +action IO (Async a) -> (Async a -> IO a) -> IO a forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= Async a -> IO a forall a. Async a -> IO a @@ -197,12 +197,12 @@ -- return its shutdown doorbell. getShutdownDoorbell :: ShutdownFDs -> Maybe ShutdownDoorbell getShutdownDoorbell :: ShutdownFDs -> Maybe ShutdownDoorbell -getShutdownDoorbell (InternalShutdown ShutdownListener -_l ShutdownDoorbell -doorbell) = ShutdownDoorbell -> Maybe ShutdownDoorbell +getShutdownDoorbell (InternalShutdown ShutdownListener +_l ShutdownDoorbell +doorbell) = ShutdownDoorbell -> Maybe ShutdownDoorbell forall a. a -> Maybe a Just ShutdownDoorbell -doorbell +doorbell getShutdownDoorbell ShutdownFDs _ = Maybe ShutdownDoorbell forall a. Maybe a @@ -212,10 +212,10 @@ -- and an explanation of the reason, request a graceful shutdown. triggerShutdown :: ShutdownDoorbell -> Trace IO Text -> Text -> IO () triggerShutdown :: ShutdownDoorbell -> Trace IO Text -> Text -> IO () -triggerShutdown (ShutdownDoorbell (Fd CInt -shutFd)) Trace IO Text -trace Text -reason = do +triggerShutdown (ShutdownDoorbell (Fd CInt +shutFd)) Trace IO Text +trace Text +reason = do Tracer IO Text -> Text -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith (TracingVerbosity -> Trace IO Text -> Tracer IO Text @@ -229,18 +229,18 @@ $ Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Trace m a -> Trace m a severityNotice Trace IO Text -trace) +trace) (Text "Ringing the node shutdown doorbell: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -reason) +reason) Handle -> IO () IO.hClose (Handle -> IO ()) -> IO Handle -> IO () forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< CInt -> IO Handle IO.fdToHandle CInt -shutFd +shutFd -- | We provide an optional cross-platform method to politely request shut down. -- @@ -254,27 +254,27 @@ -> IO () withShutdownHandling :: NodeConfiguration -> Trace IO Text -> (ShutdownFDs -> IO ()) -> IO () -withShutdownHandling NodeConfiguration -nc Trace IO Text -trace ShutdownFDs -> IO () -action = do - ShutdownFDs -sfds <- NodeConfiguration -> IO ShutdownFDs -decideShutdownFds NodeConfiguration -nc +withShutdownHandling NodeConfiguration +nc Trace IO Text +trace ShutdownFDs -> IO () +action = do + ShutdownFDs +sfds <- NodeConfiguration -> IO ShutdownFDs +decideShutdownFds NodeConfiguration +nc Maybe ShutdownListener -> Trace IO Text -> IO () -> IO () withShutdownHandler (ShutdownFDs -> Maybe ShutdownListener sfdsListener ShutdownFDs -sfds) Trace IO Text -trace (ShutdownFDs -> IO () -action ShutdownFDs -sfds) +sfds) Trace IO Text +trace (ShutdownFDs -> IO () +action ShutdownFDs +sfds) where - decideShutdownFds :: NodeConfiguration -> IO ShutdownFDs - decideShutdownFds :: NodeConfiguration -> IO ShutdownFDs -decideShutdownFds NodeConfiguration{ncShutdownIPC :: NodeConfiguration -> Maybe Fd -ncShutdownIPC = Just Fd -fd} = + decideShutdownFds :: NodeConfiguration -> IO ShutdownFDs + decideShutdownFds :: NodeConfiguration -> IO ShutdownFDs +decideShutdownFds NodeConfiguration{ncShutdownIPC :: NodeConfiguration -> Maybe Fd +ncShutdownIPC = Just Fd +fd} = ShutdownFDs -> IO ShutdownFDs forall (f :: * -> *) a. Applicative f => a -> f a pure (ShutdownFDs -> IO ShutdownFDs) -> ShutdownFDs -> IO ShutdownFDs @@ -282,23 +282,23 @@ $ ShutdownListener -> ShutdownFDs ExternalShutdown (Fd -> ShutdownListener ShutdownListener Fd -fd) - decideShutdownFds NodeConfiguration{ncShutdownOnSlotSynced :: NodeConfiguration -> MaxSlotNo +fd) + decideShutdownFds NodeConfiguration{ncShutdownOnSlotSynced :: NodeConfiguration -> MaxSlotNo ncShutdownOnSlotSynced = MaxSlotNo{}} = IO ShutdownFDs -mkInternalShutdown - decideShutdownFds NodeConfiguration +mkInternalShutdown + decideShutdownFds NodeConfiguration _ = ShutdownFDs -> IO ShutdownFDs forall (f :: * -> *) a. Applicative f => a -> f a pure ShutdownFDs NoShutdownFDs - mkInternalShutdown :: IO ShutdownFDs - mkInternalShutdown :: IO ShutdownFDs -mkInternalShutdown = do - (CInt -r, CInt -w) <- IO (CInt, CInt) + mkInternalShutdown :: IO ShutdownFDs + mkInternalShutdown :: IO ShutdownFDs +mkInternalShutdown = do + (CInt +r, CInt +w) <- IO (CInt, CInt) IO.createPipeFd ShutdownFDs -> IO ShutdownFDs forall (f :: * -> *) a. Applicative f => a -> f a @@ -310,22 +310,22 @@ forall a b. (a -> b) -> a -> b $ CInt -> Fd Fd CInt -r) (Fd -> ShutdownDoorbell +r) (Fd -> ShutdownDoorbell ShutdownDoorbell (Fd -> ShutdownDoorbell) -> Fd -> ShutdownDoorbell forall a b. (a -> b) -> a -> b $ CInt -> Fd Fd CInt -w) +w) -- | If configuration in 'NodeCLI' and 'ShutdownFDs' agree, -- spawn a thread that would cause node to shutdown upon ChainDB reaching the -- configuration-defined slot. -maybeSpawnOnSlotSyncedShutdownHandler +maybeSpawnOnSlotSyncedShutdownHandler :: NodeConfiguration -> ShutdownFDs -> Trace IO Text -> ResourceRegistry IO - -> ChainDB.ChainDB IO blk + -> ChainDB.ChainDB IO blk -> IO () maybeSpawnOnSlotSyncedShutdownHandler :: NodeConfiguration -> ShutdownFDs @@ -333,20 +333,20 @@ -> ResourceRegistry IO -> ChainDB IO blk -> IO () -maybeSpawnOnSlotSyncedShutdownHandler NodeConfiguration -nc ShutdownFDs -sfds Trace IO Text -trace ResourceRegistry IO -registry ChainDB IO blk -chaindb = +maybeSpawnOnSlotSyncedShutdownHandler NodeConfiguration +nc ShutdownFDs +sfds Trace IO Text +trace ResourceRegistry IO +registry ChainDB IO blk +chaindb = case (NodeConfiguration -> MaxSlotNo ncShutdownOnSlotSynced NodeConfiguration -nc, ShutdownFDs -sfds) of - (MaxSlotNo SlotNo -maxSlot, InternalShutdown ShutdownListener -_sl ShutdownDoorbell -sd) -> do +nc, ShutdownFDs +sfds) of + (MaxSlotNo SlotNo +maxSlot, InternalShutdown ShutdownListener +_sl ShutdownDoorbell +sd) -> do Tracer IO Text -> Text -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith (TracingVerbosity -> Trace IO Text -> Tracer IO Text @@ -360,7 +360,7 @@ $ Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Trace m a -> Trace m a severityNotice Trace IO Text -trace) +trace) (Text "will terminate upon reaching " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -368,11 +368,11 @@ pack (SlotNo -> String forall a b. (Show a, ConvertText String b) => a -> b show SlotNo -maxSlot)) +maxSlot)) SlotNo -> ShutdownDoorbell -> IO () -spawnSlotLimitTerminator SlotNo -maxSlot ShutdownDoorbell -sd +spawnSlotLimitTerminator SlotNo +maxSlot ShutdownDoorbell +sd (MaxSlotNo{}, ShutdownFDs _) -> Text -> IO () forall a. HasCallStack => Text -> a @@ -384,11 +384,11 @@ forall (f :: * -> *) a. Applicative f => a -> f a pure () where - spawnSlotLimitTerminator :: SlotNo -> ShutdownDoorbell -> IO () - spawnSlotLimitTerminator :: SlotNo -> ShutdownDoorbell -> IO () -spawnSlotLimitTerminator SlotNo -maxSlot ShutdownDoorbell -sd = + spawnSlotLimitTerminator :: SlotNo -> ShutdownDoorbell -> IO () + spawnSlotLimitTerminator :: SlotNo -> ShutdownDoorbell -> IO () +spawnSlotLimitTerminator SlotNo +maxSlot ShutdownDoorbell +sd = IO (Thread IO Void) -> IO () forall (f :: * -> *) a. Functor f => f a -> f () void (IO (Thread IO Void) -> IO ()) -> IO (Thread IO Void) -> IO () @@ -401,7 +401,7 @@ (IOLike m, Eq fp, HasCallStack) => ResourceRegistry m -> String -> Watcher m a fp -> m (Thread m Void) forkLinkedWatcher ResourceRegistry IO -registry String +registry String "slotLimitTerminator" Watcher :: forall (m :: * -> *) a fp. (a -> fp) -> Maybe fp -> (a -> m ()) -> STM m a -> Watcher m a fp Watcher { @@ -419,27 +419,27 @@ Origin -> () -> IO () forall (f :: * -> *) a. Applicative f => a -> f a pure () - At SlotNo -cur -> Bool -> IO () -> IO () + At SlotNo +cur -> Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (SlotNo -cur SlotNo -> SlotNo -> Bool +cur SlotNo -> SlotNo -> Bool forall a. Ord a => a -> a -> Bool >= SlotNo -maxSlot) (IO () -> IO ()) -> IO () -> IO () +maxSlot) (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ ShutdownDoorbell -> Trace IO Text -> Text -> IO () triggerShutdown ShutdownDoorbell -sd Trace IO Text -trace +sd Trace IO Text +trace (Text "spawnSlotLimitTerminator: reached target " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> SlotNo -> Text forall a b. (Show a, ConvertText String b) => a -> b show SlotNo -cur) +cur) , wReader :: STM IO (WithOrigin SlotNo) wReader = Point blk -> WithOrigin SlotNo forall block. Point block -> WithOrigin SlotNo @@ -449,6 +449,6 @@ <$> ChainDB IO blk -> STM IO (Point blk) forall (m :: * -> *) blk. ChainDB m blk -> STM m (Point blk) ChainDB.getTipPoint ChainDB IO blk -chaindb +chaindb } \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Handlers.TopLevel.html b/cardano-node/src/Cardano.Node.Handlers.TopLevel.html index b407516d55d..24b069148d4 100644 --- a/cardano-node/src/Cardano.Node.Handlers.TopLevel.html +++ b/cardano-node/src/Cardano.Node.Handlers.TopLevel.html @@ -62,10 +62,10 @@ -- > main = toplevelExceptionHandler $ do -- > ... -- -toplevelExceptionHandler :: IO a -> IO a +toplevelExceptionHandler :: IO a -> IO a toplevelExceptionHandler :: IO a -> IO a -toplevelExceptionHandler IO a -prog = do +toplevelExceptionHandler IO a +prog = do -- Use line buffering in case we have to print big error messages, because -- by default stderr to a terminal device is NoBuffering which is slow. Handle -> BufferMode -> IO () @@ -75,57 +75,57 @@ IO a -> [Handler a] -> IO a forall a. IO a -> [Handler a] -> IO a catches IO a -prog [ +prog [ (SomeAsyncException -> IO a) -> Handler a forall a e. Exception e => (e -> IO a) -> Handler a Handler SomeAsyncException -> IO a forall a. SomeAsyncException -> IO a -rethrowAsyncExceptions +rethrowAsyncExceptions , (ExitCode -> IO a) -> Handler a forall a e. Exception e => (e -> IO a) -> Handler a Handler ExitCode -> IO a forall a. ExitCode -> IO a -rethrowExitCode +rethrowExitCode , (SomeException -> IO a) -> Handler a forall a e. Exception e => (e -> IO a) -> Handler a Handler SomeException -> IO a forall a. SomeException -> IO a -handleSomeException +handleSomeException ] where -- Let async exceptions rise to the top for the default GHC top-handler. -- This includes things like CTRL-C. - rethrowAsyncExceptions :: SomeAsyncException -> IO a - rethrowAsyncExceptions :: SomeAsyncException -> IO a -rethrowAsyncExceptions = SomeAsyncException -> IO a + rethrowAsyncExceptions :: SomeAsyncException -> IO a + rethrowAsyncExceptions :: SomeAsyncException -> IO a +rethrowAsyncExceptions = SomeAsyncException -> IO a forall e a. Exception e => e -> IO a throwIO -- We don't want to print ExitCode, and it should be handled by the default -- top handler because that sets the actual OS process exit code. - rethrowExitCode :: ExitCode -> IO a - rethrowExitCode :: ExitCode -> IO a -rethrowExitCode = ExitCode -> IO a + rethrowExitCode :: ExitCode -> IO a + rethrowExitCode :: ExitCode -> IO a +rethrowExitCode = ExitCode -> IO a forall e a. Exception e => e -> IO a throwIO -- Print all other exceptions - handleSomeException :: SomeException -> IO a - handleSomeException :: SomeException -> IO a -handleSomeException SomeException -e = do + handleSomeException :: SomeException -> IO a + handleSomeException :: SomeException -> IO a +handleSomeException SomeException +e = do Handle -> IO () hFlush Handle stdout - String -progname <- IO String + String +progname <- IO String getProgName Handle -> String -> IO () hPutStr Handle stderr (String -> SomeException -> String -renderSomeException String -progname SomeException -e) +renderSomeException String +progname SomeException +e) ExitCode -> IO a forall e a. Exception e => e -> IO a throwIO (Int -> ExitCode @@ -135,30 +135,30 @@ -- Print the human-readable output of 'displayException' if it differs -- from the default output (of 'show'), so that the user/sysadmin -- sees something readable in the log. - renderSomeException :: String -> SomeException -> String - renderSomeException :: String -> SomeException -> String -renderSomeException String -progname SomeException -e + renderSomeException :: String -> SomeException -> String + renderSomeException :: String -> SomeException -> String +renderSomeException String +progname SomeException +e | String -showOutput String -> String -> Bool +showOutput String -> String -> Bool forall a. Eq a => a -> a -> Bool /= String -displayOutput +displayOutput = String -showOutput String -> String -> String +showOutput String -> String -> String forall a. [a] -> [a] -> [a] ++ String "\n\n" String -> String -> String forall a. [a] -> [a] -> [a] ++ String -progname String -> String -> String +progname String -> String -> String forall a. [a] -> [a] -> [a] ++ String ": " String -> String -> String forall a. [a] -> [a] -> [a] ++ String -displayOutput +displayOutput | Bool otherwise @@ -166,22 +166,22 @@ "\n" String -> String -> String forall a. [a] -> [a] -> [a] ++ String -progname String -> String -> String +progname String -> String -> String forall a. [a] -> [a] -> [a] ++ String ": " String -> String -> String forall a. [a] -> [a] -> [a] ++ String -showOutput +showOutput where - showOutput :: String -showOutput = SomeException -> String + showOutput :: String +showOutput = SomeException -> String forall a. Show a => a -> String show SomeException -e - displayOutput :: String -displayOutput = SomeException -> String +e + displayOutput :: String +displayOutput = SomeException -> String forall e. Exception e => e -> String displayException SomeException -e +e \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Orphans.html b/cardano-node/src/Cardano.Node.Orphans.html index 3c809b57652..9891fe326e1 100644 --- a/cardano-node/src/Cardano.Node.Orphans.html +++ b/cardano-node/src/Cardano.Node.Orphans.html @@ -18,11 +18,11 @@ import Cardano.Ledger.Crypto (StandardCrypto) import qualified Shelley.Spec.Ledger.CompactAddr as Shelley -instance FromJSON TracingVerbosity where - parseJSON :: Value -> Parser TracingVerbosity -parseJSON (String Text -str) = case Text -str of +instance FromJSON TracingVerbosity where + parseJSON :: Value -> Parser TracingVerbosity +parseJSON (String Text +str) = case Text +str of Text "MinimalVerbosity" -> TracingVerbosity -> Parser TracingVerbosity forall (f :: * -> *) a. Applicative f => a -> f a @@ -38,8 +38,8 @@ forall (f :: * -> *) a. Applicative f => a -> f a pure TracingVerbosity NormalVerbosity - Text -err -> String -> Parser TracingVerbosity + Text +err -> String -> Parser TracingVerbosity forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser TracingVerbosity) -> String -> Parser TracingVerbosity @@ -50,12 +50,12 @@ forall a. Semigroup a => a -> a -> a <> Text -> String Text.unpack Text -err String -> String -> String +err String -> String -> String forall a. Semigroup a => a -> a -> a <> String " is not a valid TracingVerbosity" - parseJSON Value -invalid = String -> Parser TracingVerbosity + parseJSON Value +invalid = String -> Parser TracingVerbosity forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser TracingVerbosity) -> String -> Parser TracingVerbosity @@ -70,12 +70,12 @@ <> Value -> String forall a b. (Show a, ConvertText String b) => a -> b show Value -invalid +invalid -deriving instance Show TracingVerbosity +deriving instance Show TracingVerbosity -instance ToJSON (Shelley.CompactAddr StandardCrypto) where - toJSON :: CompactAddr StandardCrypto -> Value +instance ToJSON (Shelley.CompactAddr StandardCrypto) where + toJSON :: CompactAddr StandardCrypto -> Value toJSON = Addr StandardCrypto -> Value forall a. ToJSON a => a -> Value toJSON (Addr StandardCrypto -> Value) @@ -93,19 +93,19 @@ --instance (ToJSON a, Ledger.Compactible a) => ToJSON (Ledger.CompactForm a) where -- toJSON = toJSON . Ledger.fromCompact -instance FromJSON Update.ApplicationName where - parseJSON :: Value -> Parser ApplicationName -parseJSON (String Text -x) = ApplicationName -> Parser ApplicationName +instance FromJSON Update.ApplicationName where + parseJSON :: Value -> Parser ApplicationName +parseJSON (String Text +x) = ApplicationName -> Parser ApplicationName forall (f :: * -> *) a. Applicative f => a -> f a pure (ApplicationName -> Parser ApplicationName) -> ApplicationName -> Parser ApplicationName forall a b. (a -> b) -> a -> b $ Text -> ApplicationName Update.ApplicationName Text -x - parseJSON Value -invalid = +x + parseJSON Value +invalid = String -> Parser ApplicationName forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser ApplicationName) @@ -121,5 +121,5 @@ <> Value -> String forall a b. (Show a, ConvertText String b) => a -> b show Value -invalid +invalid \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Parsers.html b/cardano-node/src/Cardano.Node.Parsers.html index 3ff5902a882..4da9e1e10ef 100644 --- a/cardano-node/src/Cardano.Node.Parsers.html +++ b/cardano-node/src/Cardano.Node.Parsers.html @@ -74,18 +74,18 @@ nodeRunParser :: Parser PartialNodeConfiguration nodeRunParser = do -- Filepaths - Last String -topFp <- Parser String -> Parser (Last String) + Last String +topFp <- Parser String -> Parser (Last String) forall a. Parser a -> Parser (Last a) lastOption Parser String parseTopologyFile - Last String -dbFp <- Parser String -> Parser (Last String) + Last String +dbFp <- Parser String -> Parser (Last String) forall a. Parser a -> Parser (Last a) lastOption Parser String parseDbPath - Last SocketPath -socketFp <- Parser SocketPath -> Parser (Last SocketPath) + Last SocketPath +socketFp <- Parser SocketPath -> Parser (Last SocketPath) forall a. Parser a -> Parser (Last a) lastOption (Parser SocketPath -> Parser (Last SocketPath)) -> Parser SocketPath -> Parser (Last SocketPath) @@ -95,79 +95,79 @@ "Path to a cardano-node socket" -- Protocol files - Maybe String -byronCertFile <- Parser String -> Parser (Maybe String) + Maybe String +byronCertFile <- Parser String -> Parser (Maybe String) forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) optional Parser String parseByronDelegationCert - Maybe String -byronKeyFile <- Parser String -> Parser (Maybe String) + Maybe String +byronKeyFile <- Parser String -> Parser (Maybe String) forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) optional Parser String parseByronSigningKey - Maybe String -shelleyKESFile <- Parser String -> Parser (Maybe String) + Maybe String +shelleyKESFile <- Parser String -> Parser (Maybe String) forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) optional Parser String parseKesKeyFilePath - Maybe String -shelleyVRFFile <- Parser String -> Parser (Maybe String) + Maybe String +shelleyVRFFile <- Parser String -> Parser (Maybe String) forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) optional Parser String parseVrfKeyFilePath - Maybe String -shelleyCertFile <- Parser String -> Parser (Maybe String) + Maybe String +shelleyCertFile <- Parser String -> Parser (Maybe String) forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) optional Parser String parseOperationalCertFilePath - Maybe String -shelleyBulkCredsFile <- Parser String -> Parser (Maybe String) + Maybe String +shelleyBulkCredsFile <- Parser String -> Parser (Maybe String) forall (f :: * -> *) a. Alternative f => f a -> f (Maybe a) optional Parser String parseBulkCredsFilePath -- Node Address - Last NodeHostIPv4Address -nIPv4Address <- Parser NodeHostIPv4Address -> Parser (Last NodeHostIPv4Address) + Last NodeHostIPv4Address +nIPv4Address <- Parser NodeHostIPv4Address -> Parser (Last NodeHostIPv4Address) forall a. Parser a -> Parser (Last a) lastOption Parser NodeHostIPv4Address parseHostIPv4Addr - Last NodeHostIPv6Address -nIPv6Address <- Parser NodeHostIPv6Address -> Parser (Last NodeHostIPv6Address) + Last NodeHostIPv6Address +nIPv6Address <- Parser NodeHostIPv6Address -> Parser (Last NodeHostIPv6Address) forall a. Parser a -> Parser (Last a) lastOption Parser NodeHostIPv6Address parseHostIPv6Addr - Last PortNumber -nPortNumber <- Parser PortNumber -> Parser (Last PortNumber) + Last PortNumber +nPortNumber <- Parser PortNumber -> Parser (Last PortNumber) forall a. Parser a -> Parser (Last a) lastOption Parser PortNumber parsePort -- NodeConfiguration filepath - Last String -nodeConfigFp <- Parser String -> Parser (Last String) + Last String +nodeConfigFp <- Parser String -> Parser (Last String) forall a. Parser a -> Parser (Last a) lastOption Parser String parseConfigFile - Last SnapshotInterval -snapshotInterval <- Parser SnapshotInterval -> Parser (Last SnapshotInterval) + Last SnapshotInterval +snapshotInterval <- Parser SnapshotInterval -> Parser (Last SnapshotInterval) forall a. Parser a -> Parser (Last a) lastOption Parser SnapshotInterval parseSnapshotInterval - Last Bool -validate <- Parser Bool -> Parser (Last Bool) + Last Bool +validate <- Parser Bool -> Parser (Last Bool) forall a. Parser a -> Parser (Last a) lastOption Parser Bool parseValidateDB - Last (Maybe Fd) -shutdownIPC <- Parser (Maybe Fd) -> Parser (Last (Maybe Fd)) + Last (Maybe Fd) +shutdownIPC <- Parser (Maybe Fd) -> Parser (Last (Maybe Fd)) forall a. Parser a -> Parser (Last a) lastOption Parser (Maybe Fd) parseShutdownIPC - Last MaxSlotNo -shutdownOnSlotSynced <- Parser MaxSlotNo -> Parser (Last MaxSlotNo) + Last MaxSlotNo +shutdownOnSlotSynced <- Parser MaxSlotNo -> Parser (Last MaxSlotNo) forall a. Parser a -> Parser (Last a) lastOption Parser MaxSlotNo parseShutdownOnSlotSynced @@ -196,42 +196,42 @@ PartialNodeConfiguration { pncNodeIPv4Addr :: Last NodeHostIPv4Address pncNodeIPv4Addr = Last NodeHostIPv4Address -nIPv4Address +nIPv4Address , pncNodeIPv6Addr :: Last NodeHostIPv6Address pncNodeIPv6Addr = Last NodeHostIPv6Address -nIPv6Address +nIPv6Address , pncNodePortNumber :: Last PortNumber pncNodePortNumber = Last PortNumber -nPortNumber +nPortNumber , pncConfigFile :: Last ConfigYamlFilePath pncConfigFile = String -> ConfigYamlFilePath ConfigYamlFilePath (String -> ConfigYamlFilePath) -> Last String -> Last ConfigYamlFilePath forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Last String -nodeConfigFp +nodeConfigFp , pncTopologyFile :: Last TopologyFile pncTopologyFile = String -> TopologyFile TopologyFile (String -> TopologyFile) -> Last String -> Last TopologyFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Last String -topFp +topFp , pncDatabaseFile :: Last DbFile pncDatabaseFile = String -> DbFile DbFile (String -> DbFile) -> Last String -> Last DbFile forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Last String -dbFp +dbFp , pncSocketPath :: Last SocketPath pncSocketPath = Last SocketPath -socketFp +socketFp , pncDiffusionMode :: Last DiffusionMode pncDiffusionMode = Last DiffusionMode forall a. Monoid a => a mempty , pncSnapshotInterval :: Last SnapshotInterval pncSnapshotInterval = Last SnapshotInterval -snapshotInterval +snapshotInterval , pncTestEnableDevelopmentNetworkProtocols :: Last Bool pncTestEnableDevelopmentNetworkProtocols = Last Bool forall a. Monoid a => a @@ -279,13 +279,13 @@ } , pncValidateDB :: Last Bool pncValidateDB = Last Bool -validate +validate , pncShutdownIPC :: Last (Maybe Fd) pncShutdownIPC = Last (Maybe Fd) -shutdownIPC +shutdownIPC , pncShutdownOnSlotSynced :: Last MaxSlotNo pncShutdownOnSlotSynced = Last MaxSlotNo -shutdownOnSlotSynced +shutdownOnSlotSynced , pncProtocolConfig :: Last NodeProtocolConfiguration pncProtocolConfig = Last NodeProtocolConfiguration forall a. Monoid a => a @@ -314,8 +314,8 @@ parseSocketPath :: Text -> Parser SocketPath parseSocketPath :: Text -> Parser SocketPath -parseSocketPath Text -helpMessage = +parseSocketPath Text +helpMessage = String -> SocketPath SocketPath (String -> SocketPath) -> Parser String -> Parser SocketPath forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b @@ -334,7 +334,7 @@ help (Text -> String forall a b. ConvertText a b => a -> b toS Text -helpMessage) +helpMessage) Mod OptionFields String -> Mod OptionFields String -> Mod OptionFields String forall a. Semigroup a => a -> a -> a @@ -422,8 +422,8 @@ parseNodeHostIPv4Address :: String -> Either String NodeHostIPv4Address parseNodeHostIPv4Address :: String -> Either String NodeHostIPv4Address -parseNodeHostIPv4Address String -str = +parseNodeHostIPv4Address String +str = Either String NodeHostIPv4Address -> (IPv4 -> Either String NodeHostIPv4Address) -> Maybe IPv4 @@ -440,7 +440,7 @@ "Failed to parse IPv4 address: " String -> String -> String forall a. [a] -> [a] -> [a] ++ String -str String -> String -> String +str String -> String -> String forall a. [a] -> [a] -> [a] ++ String @@ -459,12 +459,12 @@ (String -> Maybe IPv4 forall a. Read a => String -> Maybe a readMaybe String -str) +str) parseNodeHostIPv6Address :: String -> Either String NodeHostIPv6Address parseNodeHostIPv6Address :: String -> Either String NodeHostIPv6Address -parseNodeHostIPv6Address String -str = +parseNodeHostIPv6Address String +str = Either String NodeHostIPv6Address -> (IPv6 -> Either String NodeHostIPv6Address) -> Maybe IPv6 @@ -481,7 +481,7 @@ "Failed to parse IPv6 address: " String -> String -> String forall a. [a] -> [a] -> [a] ++ String -str String -> String -> String +str String -> String -> String forall a. [a] -> [a] -> [a] ++ String @@ -500,7 +500,7 @@ (String -> Maybe IPv6 forall a. Read a => String -> Maybe a readMaybe String -str) +str) parsePort :: Parser PortNumber parsePort :: Parser PortNumber @@ -1006,10 +1006,10 @@ cat b c -> cat a b -> cat a c . Integer -> DiffTime secondsToDiffTime) Parser Integer -parseDifftime +parseDifftime where - parseDifftime :: Parser Integer -parseDifftime = ReadM Integer -> Mod OptionFields Integer -> Parser Integer + parseDifftime :: Parser Integer +parseDifftime = ReadM Integer -> Mod OptionFields Integer -> Parser Integer forall a. ReadM a -> Mod OptionFields a -> Parser a option ReadM Integer forall a. Read a => ReadM a @@ -1036,7 +1036,7 @@ -- | Produce just the brief help header for a given CLI option parser, -- without the options. -parserHelpHeader :: String -> Opt.Parser a -> OptI.Doc +parserHelpHeader :: String -> Opt.Parser a -> OptI.Doc parserHelpHeader :: String -> Parser a -> Doc parserHelpHeader = (Parser a -> String -> Doc) -> String -> Parser a -> Doc forall a b c. (a -> b -> c) -> b -> a -> c @@ -1049,7 +1049,7 @@ -- | Produce just the options help for a given CLI option parser, -- without the header. -parserHelpOptions :: Opt.Parser a -> OptI.Doc +parserHelpOptions :: Opt.Parser a -> OptI.Doc parserHelpOptions :: Parser a -> Doc parserHelpOptions = Doc -> Maybe Doc -> Doc forall a. a -> Maybe a -> a @@ -1076,8 +1076,8 @@ -- | Render the help pretty document. renderHelpDoc :: Int -> OptI.Doc -> String renderHelpDoc :: Int -> Doc -> String -renderHelpDoc Int -cols = +renderHelpDoc Int +cols = (SimpleDoc -> String -> String `OptI.displayS` String "") (SimpleDoc -> String) -> (Doc -> SimpleDoc) -> Doc -> String @@ -1087,5 +1087,5 @@ . Float -> Int -> Doc -> SimpleDoc OptI.renderPretty Float 1.0 Int -cols +cols \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Protocol.Alonzo.html b/cardano-node/src/Cardano.Node.Protocol.Alonzo.html index 6c18270b171..85187c95278 100644 --- a/cardano-node/src/Cardano.Node.Protocol.Alonzo.html +++ b/cardano-node/src/Cardano.Node.Protocol.Alonzo.html @@ -57,7 +57,7 @@ | CostModelExtractionError !FilePath | AlonzoCostModelFileError !(FileError ()) | AlonzoCostModelDecodeError !FilePath !String - deriving Int -> AlonzoProtocolInstantiationError -> ShowS + deriving Int -> AlonzoProtocolInstantiationError -> ShowS [AlonzoProtocolInstantiationError] -> ShowS AlonzoProtocolInstantiationError -> String (Int -> AlonzoProtocolInstantiationError -> ShowS) @@ -75,46 +75,46 @@ Show instance Error AlonzoProtocolInstantiationError where - displayError :: AlonzoProtocolInstantiationError -> String -displayError (InvalidCostModelError String -fp) = + displayError :: AlonzoProtocolInstantiationError -> String +displayError (InvalidCostModelError String +fp) = String "Invalid cost model: " String -> ShowS forall a. Semigroup a => a -> a -> a <> ShowS forall a b. (Show a, ConvertText String b) => a -> b show String -fp - displayError (CostModelExtractionError String -fp) = +fp + displayError (CostModelExtractionError String +fp) = String "Error extracting the cost model at: " String -> ShowS forall a. Semigroup a => a -> a -> a <> ShowS forall a b. (Show a, ConvertText String b) => a -> b show String -fp - displayError (AlonzoCostModelFileError FileError () -err) = +fp + displayError (AlonzoCostModelFileError FileError () +err) = FileError () -> String forall e. Error e => e -> String displayError FileError () -err - displayError (AlonzoCostModelDecodeError String -fp String -err) = +err + displayError (AlonzoCostModelDecodeError String +fp String +err) = String "Error decoding cost model at: " String -> ShowS forall a. Semigroup a => a -> a -> a <> ShowS forall a b. (Show a, ConvertText String b) => a -> b show String -fp String -> ShowS +fp String -> ShowS forall a. Semigroup a => a -> a -> a <> String " Error: " String -> ShowS forall a. Semigroup a => a -> a -> a <> String -err +err \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Protocol.Byron.html b/cardano-node/src/Cardano.Node.Protocol.Byron.html index 145904aaaa7..8d65bb20aeb 100644 --- a/cardano-node/src/Cardano.Node.Protocol.Byron.html +++ b/cardano-node/src/Cardano.Node.Protocol.Byron.html @@ -59,65 +59,65 @@ -> Maybe ProtocolFilepaths -> ExceptT ByronProtocolInstantiationError IO SomeConsensusProtocol mkSomeConsensusProtocolByron NodeByronProtocolConfiguration { - GenesisFile + GenesisFile npcByronGenesisFile :: NodeByronProtocolConfiguration -> GenesisFile npcByronGenesisFile :: GenesisFile npcByronGenesisFile, - Maybe GenesisHash + Maybe GenesisHash npcByronGenesisFileHash :: NodeByronProtocolConfiguration -> Maybe GenesisHash npcByronGenesisFileHash :: Maybe GenesisHash npcByronGenesisFileHash, - RequiresNetworkMagic + RequiresNetworkMagic npcByronReqNetworkMagic :: NodeByronProtocolConfiguration -> RequiresNetworkMagic npcByronReqNetworkMagic :: RequiresNetworkMagic npcByronReqNetworkMagic, - Maybe Double + Maybe Double npcByronPbftSignatureThresh :: NodeByronProtocolConfiguration -> Maybe Double npcByronPbftSignatureThresh :: Maybe Double npcByronPbftSignatureThresh, - ApplicationName + ApplicationName npcByronApplicationName :: NodeByronProtocolConfiguration -> ApplicationName npcByronApplicationName :: ApplicationName npcByronApplicationName, - NumSoftwareVersion + NumSoftwareVersion npcByronApplicationVersion :: NodeByronProtocolConfiguration -> NumSoftwareVersion npcByronApplicationVersion :: NumSoftwareVersion npcByronApplicationVersion, - Word16 + Word16 npcByronSupportedProtocolVersionMajor :: NodeByronProtocolConfiguration -> Word16 npcByronSupportedProtocolVersionMajor :: Word16 npcByronSupportedProtocolVersionMajor, - Word16 + Word16 npcByronSupportedProtocolVersionMinor :: NodeByronProtocolConfiguration -> Word16 npcByronSupportedProtocolVersionMinor :: Word16 npcByronSupportedProtocolVersionMinor, - Word8 + Word8 npcByronSupportedProtocolVersionAlt :: NodeByronProtocolConfiguration -> Word8 npcByronSupportedProtocolVersionAlt :: Word8 npcByronSupportedProtocolVersionAlt } - Maybe ProtocolFilepaths -files = do - Config -genesisConfig <- GenesisFile + Maybe ProtocolFilepaths +files = do + Config +genesisConfig <- GenesisFile -> Maybe GenesisHash -> RequiresNetworkMagic -> ExceptT ByronProtocolInstantiationError IO Config readGenesis GenesisFile -npcByronGenesisFile +npcByronGenesisFile Maybe GenesisHash -npcByronGenesisFileHash +npcByronGenesisFileHash RequiresNetworkMagic -npcByronReqNetworkMagic +npcByronReqNetworkMagic - Maybe ByronLeaderCredentials -optionalLeaderCredentials <- Config + Maybe ByronLeaderCredentials +optionalLeaderCredentials <- Config -> Maybe ProtocolFilepaths -> ExceptT ByronProtocolInstantiationError IO (Maybe ByronLeaderCredentials) readLeaderCredentials Config -genesisConfig Maybe ProtocolFilepaths -files +genesisConfig Maybe ProtocolFilepaths +files SomeConsensusProtocol -> ExceptT ByronProtocolInstantiationError IO SomeConsensusProtocol @@ -160,7 +160,7 @@ Consensus.ProtocolParamsByron { $sel:byronGenesis:ProtocolParamsByron :: Config byronGenesis = Config -genesisConfig, +genesisConfig, $sel:byronPbftSignatureThreshold:ProtocolParamsByron :: Maybe PBftSignatureThreshold byronPbftSignatureThreshold = Double -> PBftSignatureThreshold @@ -168,29 +168,29 @@ -> Maybe Double -> Maybe PBftSignatureThreshold forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe Double -npcByronPbftSignatureThresh, +npcByronPbftSignatureThresh, $sel:byronProtocolVersion:ProtocolParamsByron :: ProtocolVersion byronProtocolVersion = Word16 -> Word16 -> Word8 -> ProtocolVersion Update.ProtocolVersion Word16 -npcByronSupportedProtocolVersionMajor +npcByronSupportedProtocolVersionMajor Word16 -npcByronSupportedProtocolVersionMinor +npcByronSupportedProtocolVersionMinor Word8 -npcByronSupportedProtocolVersionAlt, +npcByronSupportedProtocolVersionAlt, $sel:byronSoftwareVersion:ProtocolParamsByron :: SoftwareVersion byronSoftwareVersion = ApplicationName -> NumSoftwareVersion -> SoftwareVersion Update.SoftwareVersion ApplicationName -npcByronApplicationName +npcByronApplicationName NumSoftwareVersion -npcByronApplicationVersion, +npcByronApplicationVersion, $sel:byronLeaderCredentials:ProtocolParamsByron :: Maybe ByronLeaderCredentials byronLeaderCredentials = Maybe ByronLeaderCredentials -optionalLeaderCredentials +optionalLeaderCredentials } readGenesis :: GenesisFile @@ -202,13 +202,13 @@ -> Maybe GenesisHash -> RequiresNetworkMagic -> ExceptT ByronProtocolInstantiationError IO Config -readGenesis (GenesisFile FilePath -file) Maybe GenesisHash -mbExpectedGenesisHash RequiresNetworkMagic -ncReqNetworkMagic = do - (GenesisData -genesisData, GenesisHash -genesisHash) <- (GenesisDataError -> ByronProtocolInstantiationError) +readGenesis (GenesisFile FilePath +file) Maybe GenesisHash +mbExpectedGenesisHash RequiresNetworkMagic +ncReqNetworkMagic = do + (GenesisData +genesisData, GenesisHash +genesisHash) <- (GenesisDataError -> ByronProtocolInstantiationError) -> ExceptT GenesisDataError IO (GenesisData, GenesisHash) -> ExceptT ByronProtocolInstantiationError IO (GenesisData, GenesisHash) @@ -217,7 +217,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (FilePath -> GenesisDataError -> ByronProtocolInstantiationError GenesisReadError FilePath -file) (ExceptT GenesisDataError IO (GenesisData, GenesisHash) +file) (ExceptT GenesisDataError IO (GenesisData, GenesisHash) -> ExceptT ByronProtocolInstantiationError IO (GenesisData, GenesisHash)) -> ExceptT GenesisDataError IO (GenesisData, GenesisHash) @@ -230,10 +230,10 @@ (MonadError GenesisDataError m, MonadIO m) => FilePath -> m (GenesisData, GenesisHash) Genesis.readGenesisData FilePath -file +file GenesisHash -> ExceptT ByronProtocolInstantiationError IO () -checkExpectedGenesisHash GenesisHash -genesisHash +checkExpectedGenesisHash GenesisHash +genesisHash Config -> ExceptT ByronProtocolInstantiationError IO Config forall (m :: * -> *) a. Monad m => a -> m a return Config :: GenesisData @@ -244,54 +244,54 @@ Genesis.Config { configGenesisData :: GenesisData Genesis.configGenesisData = GenesisData -genesisData, +genesisData, configGenesisHash :: GenesisHash Genesis.configGenesisHash = GenesisHash -genesisHash, +genesisHash, configReqNetMagic :: RequiresNetworkMagic Genesis.configReqNetMagic = RequiresNetworkMagic -ncReqNetworkMagic, +ncReqNetworkMagic, configUTxOConfiguration :: UTxOConfiguration Genesis.configUTxOConfiguration = UTxOConfiguration UTxO.defaultUTxOConfiguration --TODO: add config support for the UTxOConfiguration if needed } where - checkExpectedGenesisHash :: Genesis.GenesisHash + checkExpectedGenesisHash :: Genesis.GenesisHash -> ExceptT ByronProtocolInstantiationError IO () - checkExpectedGenesisHash :: GenesisHash -> ExceptT ByronProtocolInstantiationError IO () -checkExpectedGenesisHash GenesisHash -actual' = + checkExpectedGenesisHash :: GenesisHash -> ExceptT ByronProtocolInstantiationError IO () +checkExpectedGenesisHash GenesisHash +actual' = case Maybe GenesisHash -mbExpectedGenesisHash of - Just GenesisHash -expected | GenesisHash -actual GenesisHash -> GenesisHash -> Bool +mbExpectedGenesisHash of + Just GenesisHash +expected | GenesisHash +actual GenesisHash -> GenesisHash -> Bool forall a. Eq a => a -> a -> Bool /= GenesisHash -expected -> +expected -> ByronProtocolInstantiationError -> ExceptT ByronProtocolInstantiationError IO () forall e (m :: * -> *) a. MonadError e m => e -> m a throwError (GenesisHash -> GenesisHash -> ByronProtocolInstantiationError GenesisHashMismatch GenesisHash -actual GenesisHash -expected) +actual GenesisHash +expected) where - actual :: GenesisHash -actual = GenesisHash -> GenesisHash -fromByronGenesisHash GenesisHash -actual' + actual :: GenesisHash +actual = GenesisHash -> GenesisHash +fromByronGenesisHash GenesisHash +actual' Maybe GenesisHash _ -> () -> ExceptT ByronProtocolInstantiationError IO () forall (m :: * -> *) a. Monad m => a -> m a return () - fromByronGenesisHash :: Genesis.GenesisHash -> GenesisHash - fromByronGenesisHash :: GenesisHash -> GenesisHash -fromByronGenesisHash (Genesis.GenesisHash Hash Raw -h) = + fromByronGenesisHash :: Genesis.GenesisHash -> GenesisHash + fromByronGenesisHash :: GenesisHash -> GenesisHash +fromByronGenesisHash (Genesis.GenesisHash Hash Raw +h) = Hash Blake2b_256 ByteString -> GenesisHash GenesisHash (Hash Blake2b_256 ByteString -> GenesisHash) @@ -307,7 +307,7 @@ forall a. a -> Maybe a -> a fromMaybe Hash Blake2b_256 ByteString forall a. a -impossible +impossible (Maybe (Hash Blake2b_256 ByteString) -> Hash Blake2b_256 ByteString) -> (Hash Raw -> Maybe (Hash Blake2b_256 ByteString)) @@ -332,10 +332,10 @@ (Hash Raw -> GenesisHash) -> Hash Raw -> GenesisHash forall a b. (a -> b) -> a -> b $ Hash Raw -h +h where - impossible :: a -impossible = + impossible :: a +impossible = Text -> a forall a. HasCallStack => Text -> a panic Text @@ -360,21 +360,21 @@ return Maybe ByronLeaderCredentials forall a. Maybe a Nothing -readLeaderCredentials Config -genesisConfig +readLeaderCredentials Config +genesisConfig (Just ProtocolFilepaths { - Maybe FilePath + Maybe FilePath byronCertFile :: ProtocolFilepaths -> Maybe FilePath byronCertFile :: Maybe FilePath byronCertFile, - Maybe FilePath + Maybe FilePath byronKeyFile :: ProtocolFilepaths -> Maybe FilePath byronKeyFile :: Maybe FilePath byronKeyFile }) = case (Maybe FilePath -byronCertFile, Maybe FilePath -byronKeyFile) of +byronCertFile, Maybe FilePath +byronKeyFile) of (Maybe FilePath Nothing, Maybe FilePath Nothing) -> Maybe ByronLeaderCredentials @@ -400,12 +400,12 @@ forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a left ByronProtocolInstantiationError DelegationCertificateFilepathNotSpecified - (Just FilePath -delegCertFile, Just FilePath -signingKeyFile) -> do + (Just FilePath +delegCertFile, Just FilePath +signingKeyFile) -> do - ByteString -signingKeyFileBytes <- IO ByteString + ByteString +signingKeyFileBytes <- IO ByteString -> ExceptT ByronProtocolInstantiationError IO ByteString forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO ByteString @@ -415,9 +415,9 @@ forall a b. (a -> b) -> a -> b $ FilePath -> IO ByteString LB.readFile FilePath -signingKeyFile - ByteString -delegCertFileBytes <- IO ByteString +signingKeyFile + ByteString +delegCertFileBytes <- IO ByteString -> ExceptT ByronProtocolInstantiationError IO ByteString forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO ByteString @@ -427,14 +427,14 @@ forall a b. (a -> b) -> a -> b $ FilePath -> IO ByteString LB.readFile FilePath -delegCertFile - ByronSigningKey signingKey <- ByronProtocolInstantiationError +delegCertFile + ByronSigningKey signingKey <- ByronProtocolInstantiationError -> Maybe (SigningKey ByronKey) -> ExceptT ByronProtocolInstantiationError IO (SigningKey ByronKey) forall (m :: * -> *) x a. Monad m => x -> Maybe a -> ExceptT x m a hoistMaybe (FilePath -> ByronProtocolInstantiationError SigningKeyDeserialiseFailure FilePath -signingKeyFile) +signingKeyFile) (Maybe (SigningKey ByronKey) -> ExceptT ByronProtocolInstantiationError IO (SigningKey ByronKey)) @@ -454,9 +454,9 @@ forall a b. (a -> b) -> a -> b $ ByteString -> ByteString LB.toStrict ByteString -signingKeyFileBytes - Certificate -delegCert <- (Text -> ByronProtocolInstantiationError) +signingKeyFileBytes + Certificate +delegCert <- (Text -> ByronProtocolInstantiationError) -> ExceptT Text IO Certificate -> ExceptT ByronProtocolInstantiationError IO Certificate forall (m :: * -> *) x y a. @@ -464,7 +464,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (FilePath -> Text -> ByronProtocolInstantiationError CanonicalDecodeFailure FilePath -delegCertFile) +delegCertFile) (ExceptT Text IO Certificate -> ExceptT ByronProtocolInstantiationError IO Certificate) -> (Either Text Certificate -> ExceptT Text IO Certificate) @@ -486,7 +486,7 @@ FromJSON (Either SchemaError) a => ByteString -> Either Text a canonicalDecodePretty ByteString -delegCertFileBytes +delegCertFileBytes (ByronLeaderCredentialsError -> ByronProtocolInstantiationError) -> (ByronLeaderCredentials -> Maybe ByronLeaderCredentials) @@ -528,9 +528,9 @@ -> Text -> Either ByronLeaderCredentialsError ByronLeaderCredentials mkByronLeaderCredentials Config -genesisConfig SigningKey -signingKey Certificate -delegCert Text +genesisConfig SigningKey +signingKey Certificate +delegCert Text "Byron" @@ -548,7 +548,7 @@ | CredentialsError !ByronLeaderCredentialsError | SigningKeyDeserialiseFailure !FilePath | SigningKeyFilepathNotSpecified - deriving Int -> ByronProtocolInstantiationError -> ShowS + deriving Int -> ByronProtocolInstantiationError -> ShowS [ByronProtocolInstantiationError] -> ShowS ByronProtocolInstantiationError -> FilePath (Int -> ByronProtocolInstantiationError -> ShowS) @@ -566,15 +566,15 @@ Show instance Error ByronProtocolInstantiationError where - displayError :: ByronProtocolInstantiationError -> FilePath -displayError (CanonicalDecodeFailure FilePath -fp Text -failure) = + displayError :: ByronProtocolInstantiationError -> FilePath +displayError (CanonicalDecodeFailure FilePath +fp Text +failure) = FilePath "Canonical decode failure in " FilePath -> ShowS forall a. Semigroup a => a -> a -> a <> FilePath -fp +fp FilePath -> ShowS forall a. Semigroup a => a -> a -> a <> FilePath @@ -582,17 +582,17 @@ forall a. Semigroup a => a -> a -> a <> Text -> FilePath Text.unpack Text -failure - displayError (GenesisHashMismatch GenesisHash -actual GenesisHash -expected) = +failure + displayError (GenesisHashMismatch GenesisHash +actual GenesisHash +expected) = FilePath "Wrong Byron genesis file: the actual hash is " FilePath -> ShowS forall a. Semigroup a => a -> a -> a <> GenesisHash -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show GenesisHash -actual +actual FilePath -> ShowS forall a. Semigroup a => a -> a -> a <> FilePath @@ -605,22 +605,22 @@ <> GenesisHash -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show GenesisHash -expected +expected displayError ByronProtocolInstantiationError DelegationCertificateFilepathNotSpecified = FilePath "Delegation certificate filepath not specified" --TODO: Implement configuration error render function in cardano-ledger - displayError (GenesisConfigurationError FilePath -fp ConfigurationError -genesisConfigError) = + displayError (GenesisConfigurationError FilePath +fp ConfigurationError +genesisConfigError) = FilePath "Genesis configuration error in: " FilePath -> ShowS forall a. Semigroup a => a -> a -> a <> ShowS forall a b. ConvertText a b => a -> b toS FilePath -fp +fp FilePath -> ShowS forall a. Semigroup a => a -> a -> a <> FilePath @@ -629,17 +629,17 @@ <> ConfigurationError -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show ConfigurationError -genesisConfigError - displayError (GenesisReadError FilePath -fp GenesisDataError -err) = +genesisConfigError + displayError (GenesisReadError FilePath +fp GenesisDataError +err) = FilePath "There was an error parsing the genesis file: " FilePath -> ShowS forall a. Semigroup a => a -> a -> a <> ShowS forall a b. ConvertText a b => a -> b toS FilePath -fp +fp FilePath -> ShowS forall a. Semigroup a => a -> a -> a <> FilePath @@ -648,26 +648,26 @@ <> GenesisDataError -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show GenesisDataError -err +err -- TODO: Implement ByronLeaderCredentialsError render function in ouroboros-network - displayError (CredentialsError ByronLeaderCredentialsError -byronLeaderCredentialsError) = + displayError (CredentialsError ByronLeaderCredentialsError +byronLeaderCredentialsError) = FilePath "Byron leader credentials error: " FilePath -> ShowS forall a. Semigroup a => a -> a -> a <> ByronLeaderCredentialsError -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show ByronLeaderCredentialsError -byronLeaderCredentialsError - displayError (SigningKeyDeserialiseFailure FilePath -fp) = +byronLeaderCredentialsError + displayError (SigningKeyDeserialiseFailure FilePath +fp) = FilePath "Signing key deserialisation error in: " FilePath -> ShowS forall a. Semigroup a => a -> a -> a <> ShowS forall a b. ConvertText a b => a -> b toS FilePath -fp +fp displayError ByronProtocolInstantiationError SigningKeyFilepathNotSpecified = FilePath diff --git a/cardano-node/src/Cardano.Node.Protocol.Cardano.html b/cardano-node/src/Cardano.Node.Protocol.Cardano.html index 117ea492a97..e3d2a33cbda 100644 --- a/cardano-node/src/Cardano.Node.Protocol.Cardano.html +++ b/cardano-node/src/Cardano.Node.Protocol.Cardano.html @@ -72,105 +72,105 @@ -> ExceptT CardanoProtocolInstantiationError IO SomeConsensusProtocol mkSomeConsensusProtocolCardano NodeByronProtocolConfiguration { - GenesisFile + GenesisFile npcByronGenesisFile :: NodeByronProtocolConfiguration -> GenesisFile npcByronGenesisFile :: GenesisFile npcByronGenesisFile, - Maybe GenesisHash + Maybe GenesisHash npcByronGenesisFileHash :: NodeByronProtocolConfiguration -> Maybe GenesisHash npcByronGenesisFileHash :: Maybe GenesisHash npcByronGenesisFileHash, - RequiresNetworkMagic + RequiresNetworkMagic npcByronReqNetworkMagic :: NodeByronProtocolConfiguration -> RequiresNetworkMagic npcByronReqNetworkMagic :: RequiresNetworkMagic npcByronReqNetworkMagic, - Maybe Double + Maybe Double npcByronPbftSignatureThresh :: NodeByronProtocolConfiguration -> Maybe Double npcByronPbftSignatureThresh :: Maybe Double npcByronPbftSignatureThresh, - ApplicationName + ApplicationName npcByronApplicationName :: NodeByronProtocolConfiguration -> ApplicationName npcByronApplicationName :: ApplicationName npcByronApplicationName, - NumSoftwareVersion + NumSoftwareVersion npcByronApplicationVersion :: NodeByronProtocolConfiguration -> NumSoftwareVersion npcByronApplicationVersion :: NumSoftwareVersion npcByronApplicationVersion, - Word16 + Word16 npcByronSupportedProtocolVersionMajor :: NodeByronProtocolConfiguration -> Word16 npcByronSupportedProtocolVersionMajor :: Word16 npcByronSupportedProtocolVersionMajor, - Word16 + Word16 npcByronSupportedProtocolVersionMinor :: NodeByronProtocolConfiguration -> Word16 npcByronSupportedProtocolVersionMinor :: Word16 npcByronSupportedProtocolVersionMinor, - Word8 + Word8 npcByronSupportedProtocolVersionAlt :: NodeByronProtocolConfiguration -> Word8 npcByronSupportedProtocolVersionAlt :: Word8 npcByronSupportedProtocolVersionAlt } NodeShelleyProtocolConfiguration { - GenesisFile + GenesisFile npcShelleyGenesisFile :: NodeShelleyProtocolConfiguration -> GenesisFile npcShelleyGenesisFile :: GenesisFile npcShelleyGenesisFile, - Maybe GenesisHash + Maybe GenesisHash npcShelleyGenesisFileHash :: NodeShelleyProtocolConfiguration -> Maybe GenesisHash npcShelleyGenesisFileHash :: Maybe GenesisHash npcShelleyGenesisFileHash } NodeAlonzoProtocolConfiguration { - GenesisFile + GenesisFile npcAlonzoGenesisFile :: NodeAlonzoProtocolConfiguration -> GenesisFile npcAlonzoGenesisFile :: GenesisFile npcAlonzoGenesisFile, - Maybe GenesisHash + Maybe GenesisHash npcAlonzoGenesisFileHash :: NodeAlonzoProtocolConfiguration -> Maybe GenesisHash npcAlonzoGenesisFileHash :: Maybe GenesisHash npcAlonzoGenesisFileHash } NodeHardForkProtocolConfiguration { - Bool + Bool npcTestEnableDevelopmentHardForkEras :: NodeHardForkProtocolConfiguration -> Bool npcTestEnableDevelopmentHardForkEras :: Bool npcTestEnableDevelopmentHardForkEras, - Maybe EpochNo + Maybe EpochNo npcTestShelleyHardForkAtEpoch :: NodeHardForkProtocolConfiguration -> Maybe EpochNo npcTestShelleyHardForkAtEpoch :: Maybe EpochNo npcTestShelleyHardForkAtEpoch, - Maybe Word + Maybe Word npcTestShelleyHardForkAtVersion :: NodeHardForkProtocolConfiguration -> Maybe Word npcTestShelleyHardForkAtVersion :: Maybe Word npcTestShelleyHardForkAtVersion, - Maybe EpochNo + Maybe EpochNo npcTestAllegraHardForkAtEpoch :: NodeHardForkProtocolConfiguration -> Maybe EpochNo npcTestAllegraHardForkAtEpoch :: Maybe EpochNo npcTestAllegraHardForkAtEpoch, - Maybe Word + Maybe Word npcTestAllegraHardForkAtVersion :: NodeHardForkProtocolConfiguration -> Maybe Word npcTestAllegraHardForkAtVersion :: Maybe Word npcTestAllegraHardForkAtVersion, - Maybe EpochNo + Maybe EpochNo npcTestMaryHardForkAtEpoch :: NodeHardForkProtocolConfiguration -> Maybe EpochNo npcTestMaryHardForkAtEpoch :: Maybe EpochNo npcTestMaryHardForkAtEpoch, - Maybe Word + Maybe Word npcTestMaryHardForkAtVersion :: NodeHardForkProtocolConfiguration -> Maybe Word npcTestMaryHardForkAtVersion :: Maybe Word npcTestMaryHardForkAtVersion, - Maybe EpochNo + Maybe EpochNo npcTestAlonzoHardForkAtEpoch :: NodeHardForkProtocolConfiguration -> Maybe EpochNo npcTestAlonzoHardForkAtEpoch :: Maybe EpochNo npcTestAlonzoHardForkAtEpoch, - Maybe Word + Maybe Word npcTestAlonzoHardForkAtVersion :: NodeHardForkProtocolConfiguration -> Maybe Word npcTestAlonzoHardForkAtVersion :: Maybe Word npcTestAlonzoHardForkAtVersion } - Maybe ProtocolFilepaths -files = do - Config -byronGenesis <- + Maybe ProtocolFilepaths +files = do + Config +byronGenesis <- (ByronProtocolInstantiationError -> CardanoProtocolInstantiationError) -> ExceptT ByronProtocolInstantiationError IO Config @@ -191,14 +191,14 @@ -> RequiresNetworkMagic -> ExceptT ByronProtocolInstantiationError IO Config Byron.readGenesis GenesisFile -npcByronGenesisFile +npcByronGenesisFile Maybe GenesisHash -npcByronGenesisFileHash +npcByronGenesisFileHash RequiresNetworkMagic -npcByronReqNetworkMagic +npcByronReqNetworkMagic - Maybe ByronLeaderCredentials -byronLeaderCredentials <- + Maybe ByronLeaderCredentials +byronLeaderCredentials <- (ByronProtocolInstantiationError -> CardanoProtocolInstantiationError) -> ExceptT @@ -227,12 +227,12 @@ -> ExceptT ByronProtocolInstantiationError IO (Maybe ByronLeaderCredentials) Byron.readLeaderCredentials Config -byronGenesis Maybe ProtocolFilepaths -files +byronGenesis Maybe ProtocolFilepaths +files - (ShelleyGenesis StandardShelley -shelleyGenesis, GenesisHash -shelleyGenesisHash) <- + (ShelleyGenesis StandardShelley +shelleyGenesis, GenesisHash +shelleyGenesisHash) <- (GenesisReadError -> CardanoProtocolInstantiationError) -> ExceptT GenesisReadError IO (ShelleyGenesis StandardShelley, GenesisHash) @@ -263,13 +263,13 @@ -> ExceptT GenesisReadError IO (ShelleyGenesis StandardShelley, GenesisHash) Shelley.readGenesis GenesisFile -npcShelleyGenesisFile +npcShelleyGenesisFile Maybe GenesisHash -npcShelleyGenesisFileHash +npcShelleyGenesisFileHash - (AlonzoGenesis -alonzoGenesis, GenesisHash -_alonzoGenesisHash) <- + (AlonzoGenesis +alonzoGenesis, GenesisHash +_alonzoGenesisHash) <- (GenesisReadError -> CardanoProtocolInstantiationError) -> ExceptT GenesisReadError IO (AlonzoGenesis, GenesisHash) -> ExceptT @@ -290,12 +290,12 @@ -> Maybe GenesisHash -> ExceptT GenesisReadError IO (AlonzoGenesis, GenesisHash) Alonzo.readGenesis GenesisFile -npcAlonzoGenesisFile +npcAlonzoGenesisFile Maybe GenesisHash -npcAlonzoGenesisFileHash +npcAlonzoGenesisFileHash - [TPraosLeaderCredentials StandardCrypto] -shelleyLeaderCredentials <- + [TPraosLeaderCredentials StandardCrypto] +shelleyLeaderCredentials <- (PraosLeaderCredentialsError -> CardanoProtocolInstantiationError) -> ExceptT PraosLeaderCredentialsError @@ -333,7 +333,7 @@ IO [TPraosLeaderCredentials StandardCrypto] Shelley.readLeaderCredentials Maybe ProtocolFilepaths -files +files --TODO: all these protocol versions below are confusing and unnecessary. -- It could and should all be automated and these config entries eliminated. @@ -395,7 +395,7 @@ Consensus.ProtocolParamsByron { $sel:byronGenesis:ProtocolParamsByron :: Config byronGenesis = Config -byronGenesis, +byronGenesis, $sel:byronPbftSignatureThreshold:ProtocolParamsByron :: Maybe PBftSignatureThreshold byronPbftSignatureThreshold = Double -> PBftSignatureThreshold @@ -403,7 +403,7 @@ -> Maybe Double -> Maybe PBftSignatureThreshold forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe Double -npcByronPbftSignatureThresh, +npcByronPbftSignatureThresh, -- This is /not/ the Byron protocol version. It is the protocol -- version that this node will use in blocks it creates. It is used @@ -418,23 +418,23 @@ Word16 -> Word16 -> Word8 -> ProtocolVersion Byron.ProtocolVersion Word16 -npcByronSupportedProtocolVersionMajor +npcByronSupportedProtocolVersionMajor Word16 -npcByronSupportedProtocolVersionMinor +npcByronSupportedProtocolVersionMinor Word8 -npcByronSupportedProtocolVersionAlt, +npcByronSupportedProtocolVersionAlt, $sel:byronSoftwareVersion:ProtocolParamsByron :: SoftwareVersion byronSoftwareVersion = ApplicationName -> NumSoftwareVersion -> SoftwareVersion Byron.SoftwareVersion ApplicationName -npcByronApplicationName +npcByronApplicationName NumSoftwareVersion -npcByronApplicationVersion, +npcByronApplicationVersion, $sel:byronLeaderCredentials:ProtocolParamsByron :: Maybe ByronLeaderCredentials -byronLeaderCredentials = +byronLeaderCredentials = Maybe ByronLeaderCredentials -byronLeaderCredentials +byronLeaderCredentials } ProtocolParamsShelleyBased :: forall era. ShelleyGenesis era @@ -443,17 +443,17 @@ -> ProtocolParamsShelleyBased era Consensus.ProtocolParamsShelleyBased { $sel:shelleyBasedGenesis:ProtocolParamsShelleyBased :: ShelleyGenesis StandardShelley -shelleyBasedGenesis = ShelleyGenesis StandardShelley -shelleyGenesis, +shelleyBasedGenesis = ShelleyGenesis StandardShelley +shelleyGenesis, $sel:shelleyBasedInitialNonce:ProtocolParamsShelleyBased :: Nonce -shelleyBasedInitialNonce = GenesisHash -> Nonce +shelleyBasedInitialNonce = GenesisHash -> Nonce Shelley.genesisHashToPraosNonce GenesisHash -shelleyGenesisHash, +shelleyGenesisHash, $sel:shelleyBasedLeaderCredentials:ProtocolParamsShelleyBased :: [TPraosLeaderCredentials (EraCrypto StandardShelley)] -shelleyBasedLeaderCredentials = [TPraosLeaderCredentials StandardCrypto] +shelleyBasedLeaderCredentials = [TPraosLeaderCredentials StandardCrypto] [TPraosLeaderCredentials (EraCrypto StandardShelley)] -shelleyLeaderCredentials +shelleyLeaderCredentials } ProtocolParamsShelley :: ProtVer -> ProtocolParamsShelley Consensus.ProtocolParamsShelley { @@ -462,7 +462,7 @@ -- is in the Shelley era. That is, it is the version of protocol -- /after/ Shelley, i.e. Allegra. $sel:shelleyProtVer:ProtocolParamsShelley :: ProtVer -shelleyProtVer = +shelleyProtVer = Natural -> Natural -> ProtVer ProtVer Natural 3 Natural @@ -475,7 +475,7 @@ -- is in the Allegra era. That is, it is the version of protocol -- /after/ Allegra, i.e. Mary. $sel:allegraProtVer:ProtocolParamsAllegra :: ProtVer -allegraProtVer = +allegraProtVer = Natural -> Natural -> ProtVer ProtVer Natural 4 Natural @@ -494,9 +494,9 @@ -- not-yet-ready eras in released node versions without mainnet nodes -- prematurely advertising that they could hard fork into the new era. $sel:maryProtVer:ProtocolParamsMary :: ProtVer -maryProtVer = +maryProtVer = if Bool -npcTestEnableDevelopmentHardForkEras +npcTestEnableDevelopmentHardForkEras then Natural -> Natural -> ProtVer ProtVer Natural 5 Natural @@ -513,7 +513,7 @@ -- is in the Alonzo era. Since Alonzo is currently the last known -- protocol version then this is also the Alonzo protocol version. $sel:alonzoProtVer:ProtocolParamsAlonzo :: ProtVer -alonzoProtVer = Natural -> Natural -> ProtVer +alonzoProtVer = Natural -> Natural -> ProtVer ProtVer Natural 5 Natural 0 @@ -527,12 +527,12 @@ -> TriggerHardFork -> ProtocolTransitionParamsShelleyBased era Consensus.ProtocolTransitionParamsShelleyBased { transitionTranslationContext :: TranslationContext StandardShelley -transitionTranslationContext = (), +transitionTranslationContext = (), transitionTrigger :: TriggerHardFork -transitionTrigger = +transitionTrigger = -- What will trigger the Byron -> Shelley hard fork? case Maybe EpochNo -npcTestShelleyHardForkAtEpoch of +npcTestShelleyHardForkAtEpoch of -- This specifies the major protocol version number update that will -- trigger us moving to the Shelley protocol. @@ -556,14 +556,14 @@ 2 Word -> Word16 forall a b. (Integral a, Num b) => a -> b fromIntegral Maybe Word -npcTestShelleyHardForkAtVersion) +npcTestShelleyHardForkAtVersion) -- Alternatively, for testing we can transition at a specific epoch. -- - Just EpochNo -epochNo -> EpochNo -> TriggerHardFork + Just EpochNo +epochNo -> EpochNo -> TriggerHardFork Consensus.TriggerHardForkAtEpoch EpochNo -epochNo +epochNo } -- Shelley to Allegra hard fork parameters ProtocolTransitionParamsShelleyBased :: forall era. @@ -571,11 +571,11 @@ -> TriggerHardFork -> ProtocolTransitionParamsShelleyBased era Consensus.ProtocolTransitionParamsShelleyBased { transitionTranslationContext :: TranslationContext StandardAllegra -transitionTranslationContext = (), +transitionTranslationContext = (), transitionTrigger :: TriggerHardFork -transitionTrigger = +transitionTrigger = case Maybe EpochNo -npcTestAllegraHardForkAtEpoch of +npcTestAllegraHardForkAtEpoch of Maybe EpochNo Nothing -> Word16 -> TriggerHardFork Consensus.TriggerHardForkAtVersion @@ -585,11 +585,11 @@ 3 Word -> Word16 forall a b. (Integral a, Num b) => a -> b fromIntegral Maybe Word -npcTestAllegraHardForkAtVersion) - Just EpochNo -epochNo -> EpochNo -> TriggerHardFork +npcTestAllegraHardForkAtVersion) + Just EpochNo +epochNo -> EpochNo -> TriggerHardFork Consensus.TriggerHardForkAtEpoch EpochNo -epochNo +epochNo } -- Allegra to Mary hard fork parameters ProtocolTransitionParamsShelleyBased :: forall era. @@ -597,11 +597,11 @@ -> TriggerHardFork -> ProtocolTransitionParamsShelleyBased era Consensus.ProtocolTransitionParamsShelleyBased { transitionTranslationContext :: TranslationContext StandardMary -transitionTranslationContext = (), +transitionTranslationContext = (), transitionTrigger :: TriggerHardFork -transitionTrigger = +transitionTrigger = case Maybe EpochNo -npcTestMaryHardForkAtEpoch of +npcTestMaryHardForkAtEpoch of Maybe EpochNo Nothing -> Word16 -> TriggerHardFork Consensus.TriggerHardForkAtVersion @@ -611,11 +611,11 @@ 4 Word -> Word16 forall a b. (Integral a, Num b) => a -> b fromIntegral Maybe Word -npcTestMaryHardForkAtVersion) - Just EpochNo -epochNo -> EpochNo -> TriggerHardFork +npcTestMaryHardForkAtVersion) + Just EpochNo +epochNo -> EpochNo -> TriggerHardFork Consensus.TriggerHardForkAtEpoch EpochNo -epochNo +epochNo } -- Mary to Alonzo hard fork parameters ProtocolTransitionParamsShelleyBased :: forall era. @@ -623,13 +623,13 @@ -> TriggerHardFork -> ProtocolTransitionParamsShelleyBased era Consensus.ProtocolTransitionParamsShelleyBased { transitionTranslationContext :: TranslationContext StandardAlonzo -transitionTranslationContext = AlonzoGenesis +transitionTranslationContext = AlonzoGenesis TranslationContext StandardAlonzo -alonzoGenesis, +alonzoGenesis, transitionTrigger :: TriggerHardFork -transitionTrigger = +transitionTrigger = case Maybe EpochNo -npcTestAlonzoHardForkAtEpoch of +npcTestAlonzoHardForkAtEpoch of Maybe EpochNo Nothing -> Word16 -> TriggerHardFork Consensus.TriggerHardForkAtVersion @@ -639,11 +639,11 @@ 5 Word -> Word16 forall a b. (Integral a, Num b) => a -> b fromIntegral Maybe Word -npcTestAlonzoHardForkAtVersion) - Just EpochNo -epochNo -> EpochNo -> TriggerHardFork +npcTestAlonzoHardForkAtVersion) + Just EpochNo +epochNo -> EpochNo -> TriggerHardFork Consensus.TriggerHardForkAtEpoch EpochNo -epochNo +epochNo } @@ -663,7 +663,7 @@ | CardanoProtocolInstantiationErrorAlonzo Alonzo.AlonzoProtocolInstantiationError - deriving Int -> CardanoProtocolInstantiationError -> ShowS + deriving Int -> CardanoProtocolInstantiationError -> ShowS [CardanoProtocolInstantiationError] -> ShowS CardanoProtocolInstantiationError -> String (Int -> CardanoProtocolInstantiationError -> ShowS) @@ -681,29 +681,29 @@ Show instance Error CardanoProtocolInstantiationError where - displayError :: CardanoProtocolInstantiationError -> String -displayError (CardanoProtocolInstantiationErrorByron ByronProtocolInstantiationError -err) = + displayError :: CardanoProtocolInstantiationError -> String +displayError (CardanoProtocolInstantiationErrorByron ByronProtocolInstantiationError +err) = ByronProtocolInstantiationError -> String forall e. Error e => e -> String displayError ByronProtocolInstantiationError -err - displayError (CardanoProtocolInstantiationGenesisReadError GenesisReadError -err) = +err + displayError (CardanoProtocolInstantiationGenesisReadError GenesisReadError +err) = GenesisReadError -> String forall e. Error e => e -> String displayError GenesisReadError -err - displayError (CardanoProtocolInstantiationPraosLeaderCredentialsError PraosLeaderCredentialsError -err) = +err + displayError (CardanoProtocolInstantiationPraosLeaderCredentialsError PraosLeaderCredentialsError +err) = PraosLeaderCredentialsError -> String forall e. Error e => e -> String displayError PraosLeaderCredentialsError -err - displayError (CardanoProtocolInstantiationErrorAlonzo AlonzoProtocolInstantiationError -err) = +err + displayError (CardanoProtocolInstantiationErrorAlonzo AlonzoProtocolInstantiationError +err) = AlonzoProtocolInstantiationError -> String forall e. Error e => e -> String displayError AlonzoProtocolInstantiationError -err +err \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Protocol.Shelley.html b/cardano-node/src/Cardano.Node.Protocol.Shelley.html index d5732668e5d..6bbde160461 100644 --- a/cardano-node/src/Cardano.Node.Protocol.Shelley.html +++ b/cardano-node/src/Cardano.Node.Protocol.Shelley.html @@ -75,20 +75,20 @@ -> ExceptT ShelleyProtocolInstantiationError IO SomeConsensusProtocol mkSomeConsensusProtocolShelley NodeShelleyProtocolConfiguration { - GenesisFile + GenesisFile npcShelleyGenesisFile :: NodeShelleyProtocolConfiguration -> GenesisFile npcShelleyGenesisFile :: GenesisFile npcShelleyGenesisFile, - Maybe GenesisHash + Maybe GenesisHash npcShelleyGenesisFileHash :: NodeShelleyProtocolConfiguration -> Maybe GenesisHash npcShelleyGenesisFileHash :: Maybe GenesisHash npcShelleyGenesisFileHash } - Maybe ProtocolFilepaths -files = do - (ShelleyGenesis StandardShelley -genesis, GenesisHash -genesisHash) <- (GenesisReadError -> ShelleyProtocolInstantiationError) + Maybe ProtocolFilepaths +files = do + (ShelleyGenesis StandardShelley +genesis, GenesisHash +genesisHash) <- (GenesisReadError -> ShelleyProtocolInstantiationError) -> ExceptT GenesisReadError IO (ShelleyGenesis StandardShelley, GenesisHash) -> ExceptT @@ -118,9 +118,9 @@ -> ExceptT GenesisReadError IO (ShelleyGenesis StandardShelley, GenesisHash) readGenesis GenesisFile -npcShelleyGenesisFile +npcShelleyGenesisFile Maybe GenesisHash -npcShelleyGenesisFileHash +npcShelleyGenesisFileHash (GenesisValidationError -> ShelleyProtocolInstantiationError) -> ExceptT GenesisValidationError IO () -> ExceptT ShelleyProtocolInstantiationError IO () @@ -136,9 +136,9 @@ $ ShelleyGenesis StandardShelley -> ExceptT GenesisValidationError IO () validateGenesis ShelleyGenesis StandardShelley -genesis - [TPraosLeaderCredentials StandardCrypto] -leaderCredentials <- (PraosLeaderCredentialsError -> ShelleyProtocolInstantiationError) +genesis + [TPraosLeaderCredentials StandardCrypto] +leaderCredentials <- (PraosLeaderCredentialsError -> ShelleyProtocolInstantiationError) -> ExceptT PraosLeaderCredentialsError IO @@ -175,7 +175,7 @@ IO [TPraosLeaderCredentials StandardCrypto] readLeaderCredentials Maybe ProtocolFilepaths -files +files SomeConsensusProtocol -> ExceptT @@ -222,16 +222,16 @@ Consensus.ProtocolParamsShelleyBased { $sel:shelleyBasedGenesis:ProtocolParamsShelleyBased :: ShelleyGenesis StandardShelley shelleyBasedGenesis = ShelleyGenesis StandardShelley -genesis, +genesis, $sel:shelleyBasedInitialNonce:ProtocolParamsShelleyBased :: Nonce shelleyBasedInitialNonce = GenesisHash -> Nonce genesisHashToPraosNonce GenesisHash -genesisHash, +genesisHash, $sel:shelleyBasedLeaderCredentials:ProtocolParamsShelleyBased :: [TPraosLeaderCredentials (EraCrypto StandardShelley)] shelleyBasedLeaderCredentials = [TPraosLeaderCredentials StandardCrypto] [TPraosLeaderCredentials (EraCrypto StandardShelley)] -leaderCredentials +leaderCredentials } ProtocolParamsShelley :: ProtVer -> ProtocolParamsShelley Consensus.ProtocolParamsShelley { @@ -245,12 +245,12 @@ genesisHashToPraosNonce :: GenesisHash -> Nonce genesisHashToPraosNonce :: GenesisHash -> Nonce -genesisHashToPraosNonce (GenesisHash Hash Blake2b_256 ByteString -h) = Hash Blake2b_256 Nonce -> Nonce +genesisHashToPraosNonce (GenesisHash Hash Blake2b_256 ByteString +h) = Hash Blake2b_256 Nonce -> Nonce Nonce (Hash Blake2b_256 ByteString -> Hash Blake2b_256 Nonce forall h a b. Hash h a -> Hash h b Crypto.castHash Hash Blake2b_256 ByteString -h) +h) readGenesis :: GenesisFile -> Maybe GenesisHash @@ -271,45 +271,45 @@ -> ExceptT GenesisReadError IO (genesis, GenesisHash) readGenesisAny -readGenesisAny :: FromJSON genesis +readGenesisAny :: FromJSON genesis => GenesisFile -> Maybe GenesisHash - -> ExceptT GenesisReadError IO (genesis, GenesisHash) + -> ExceptT GenesisReadError IO (genesis, GenesisHash) readGenesisAny :: GenesisFile -> Maybe GenesisHash -> ExceptT GenesisReadError IO (genesis, GenesisHash) -readGenesisAny (GenesisFile FilePath -file) Maybe GenesisHash -mbExpectedGenesisHash = do - ByteString -content <- (IOException -> GenesisReadError) +readGenesisAny (GenesisFile FilePath +file) Maybe GenesisHash +mbExpectedGenesisHash = do + ByteString +content <- (IOException -> GenesisReadError) -> IO ByteString -> ExceptT GenesisReadError IO ByteString forall (m :: * -> *) x a. MonadIO m => (IOException -> x) -> IO a -> ExceptT x m a handleIOExceptT (FilePath -> IOException -> GenesisReadError GenesisReadFileError FilePath -file) (IO ByteString -> ExceptT GenesisReadError IO ByteString) +file) (IO ByteString -> ExceptT GenesisReadError IO ByteString) -> IO ByteString -> ExceptT GenesisReadError IO ByteString forall a b. (a -> b) -> a -> b $ FilePath -> IO ByteString BS.readFile FilePath -file - let genesisHash :: GenesisHash -genesisHash = Hash Blake2b_256 ByteString -> GenesisHash +file + let genesisHash :: GenesisHash +genesisHash = Hash Blake2b_256 ByteString -> GenesisHash GenesisHash ((ByteString -> ByteString) -> ByteString -> Hash Blake2b_256 ByteString forall h a. HashAlgorithm h => (a -> ByteString) -> a -> Hash h a Crypto.hashWith ByteString -> ByteString forall a. a -> a id ByteString -content) +content) GenesisHash -> ExceptT GenesisReadError IO () -checkExpectedGenesisHash GenesisHash -genesisHash - genesis -genesis <- (FilePath -> GenesisReadError) +checkExpectedGenesisHash GenesisHash +genesisHash + genesis +genesis <- (FilePath -> GenesisReadError) -> ExceptT FilePath IO genesis -> ExceptT GenesisReadError IO genesis forall (m :: * -> *) x y a. @@ -317,7 +317,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (FilePath -> FilePath -> GenesisReadError GenesisDecodeError FilePath -file) (ExceptT FilePath IO genesis +file) (ExceptT FilePath IO genesis -> ExceptT GenesisReadError IO genesis) -> ExceptT FilePath IO genesis -> ExceptT GenesisReadError IO genesis @@ -331,33 +331,33 @@ ByteString -> Either FilePath genesis forall a. FromJSON a => ByteString -> Either FilePath a Aeson.eitherDecodeStrict' ByteString -content +content (genesis, GenesisHash) -> ExceptT GenesisReadError IO (genesis, GenesisHash) forall (m :: * -> *) a. Monad m => a -> m a return (genesis -genesis, GenesisHash -genesisHash) +genesis, GenesisHash +genesisHash) where - checkExpectedGenesisHash :: GenesisHash + checkExpectedGenesisHash :: GenesisHash -> ExceptT GenesisReadError IO () - checkExpectedGenesisHash :: GenesisHash -> ExceptT GenesisReadError IO () -checkExpectedGenesisHash GenesisHash -actual = + checkExpectedGenesisHash :: GenesisHash -> ExceptT GenesisReadError IO () +checkExpectedGenesisHash GenesisHash +actual = case Maybe GenesisHash -mbExpectedGenesisHash of - Just GenesisHash -expected | GenesisHash -actual GenesisHash -> GenesisHash -> Bool +mbExpectedGenesisHash of + Just GenesisHash +expected | GenesisHash +actual GenesisHash -> GenesisHash -> Bool forall a. Eq a => a -> a -> Bool /= GenesisHash -expected +expected -> GenesisReadError -> ExceptT GenesisReadError IO () forall e (m :: * -> *) a. MonadError e m => e -> m a throwError (GenesisHash -> GenesisHash -> GenesisReadError GenesisHashMismatch GenesisHash -actual GenesisHash -expected) +actual GenesisHash +expected) Maybe GenesisHash _ -> () -> ExceptT GenesisReadError IO () forall (m :: * -> *) a. Monad m => a -> m a @@ -367,8 +367,8 @@ -> ExceptT GenesisValidationError IO () validateGenesis :: ShelleyGenesis StandardShelley -> ExceptT GenesisValidationError IO () -validateGenesis ShelleyGenesis StandardShelley -genesis = +validateGenesis ShelleyGenesis StandardShelley +genesis = ([ValidationErr] -> GenesisValidationError) -> ExceptT [ValidationErr] IO () -> ExceptT GenesisValidationError IO () @@ -396,7 +396,7 @@ Era era => ShelleyGenesis era -> Either [ValidationErr] () Shelley.validateGenesis ShelleyGenesis StandardShelley -genesis +genesis readLeaderCredentials :: Maybe ProtocolFilepaths -> ExceptT PraosLeaderCredentialsError IO @@ -414,8 +414,8 @@ [TPraosLeaderCredentials StandardCrypto] forall (m :: * -> *) a. Monad m => a -> m a return [] -readLeaderCredentials (Just ProtocolFilepaths -pfp) = +readLeaderCredentials (Just ProtocolFilepaths +pfp) = -- The set of credentials is a sum total of what comes from the CLI, -- as well as what's in the bulk credentials file. [TPraosLeaderCredentials StandardCrypto] @@ -441,7 +441,7 @@ IO [TPraosLeaderCredentials StandardCrypto] readLeaderCredentialsSingleton ProtocolFilepaths -pfp +pfp ExceptT PraosLeaderCredentialsError IO @@ -462,7 +462,7 @@ IO [TPraosLeaderCredentials StandardCrypto] readLeaderCredentialsBulk ProtocolFilepaths -pfp +pfp readLeaderCredentialsSingleton :: ProtocolFilepaths -> @@ -496,14 +496,14 @@ readLeaderCredentialsSingleton ProtocolFilepaths { shelleyCertFile :: ProtocolFilepaths -> Maybe FilePath -shelleyCertFile = Just FilePath -certFile, +shelleyCertFile = Just FilePath +certFile, shelleyVRFFile :: ProtocolFilepaths -> Maybe FilePath -shelleyVRFFile = Just FilePath -vrfFile, +shelleyVRFFile = Just FilePath +vrfFile, shelleyKESFile :: ProtocolFilepaths -> Maybe FilePath -shelleyKESFile = Just FilePath -kesFile +shelleyKESFile = Just FilePath +kesFile } = (TPraosLeaderCredentials StandardCrypto -> [TPraosLeaderCredentials StandardCrypto]) @@ -577,7 +577,7 @@ AsType a -> FilePath -> IO (Either (FileError TextEnvelopeError) a) readFileTextEnvelope AsType OperationalCertificate AsOperationalCertificate FilePath -certFile) +certFile) ExceptT PraosLeaderCredentialsError IO @@ -614,7 +614,7 @@ forall a. AsType a -> AsType (SigningKey a) AsSigningKey AsType VrfKey AsVrfKey) FilePath -vrfFile) +vrfFile) ExceptT PraosLeaderCredentialsError IO @@ -650,7 +650,7 @@ forall a. AsType a -> AsType (SigningKey a) AsSigningKey AsType KesKey AsKesKey) FilePath -kesFile) +kesFile) -- But not OK to supply some of the files without the others. readLeaderCredentialsSingleton ProtocolFilepaths {shelleyCertFile :: ProtocolFilepaths -> Maybe FilePath shelleyCertFile = Maybe FilePath @@ -706,8 +706,8 @@ IO [TPraosLeaderCredentials StandardCrypto] readLeaderCredentialsBulk ProtocolFilepaths { shelleyBulkCredsFile :: ProtocolFilepaths -> Maybe FilePath -shelleyBulkCredsFile = Maybe FilePath -mfp } = +shelleyBulkCredsFile = Maybe FilePath +mfp } = (ShelleyCredentials -> ExceptT PraosLeaderCredentialsError @@ -726,7 +726,7 @@ PraosLeaderCredentialsError IO (TPraosLeaderCredentials StandardCrypto) -parseShelleyCredentials ([ShelleyCredentials] +parseShelleyCredentials ([ShelleyCredentials] -> ExceptT PraosLeaderCredentialsError IO @@ -739,28 +739,28 @@ forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< Maybe FilePath -> ExceptT PraosLeaderCredentialsError IO [ShelleyCredentials] -readBulkFile Maybe FilePath -mfp +readBulkFile Maybe FilePath +mfp where - parseShelleyCredentials :: + parseShelleyCredentials :: ShelleyCredentials -> ExceptT PraosLeaderCredentialsError IO (TPraosLeaderCredentials StandardCrypto) - parseShelleyCredentials :: ShelleyCredentials + parseShelleyCredentials :: ShelleyCredentials -> ExceptT PraosLeaderCredentialsError IO (TPraosLeaderCredentials StandardCrypto) -parseShelleyCredentials ShelleyCredentials { (TextEnvelope, FilePath) +parseShelleyCredentials ShelleyCredentials { (TextEnvelope, FilePath) scCert :: (TextEnvelope, FilePath) scCert :: ShelleyCredentials -> (TextEnvelope, FilePath) -scCert, (TextEnvelope, FilePath) +scCert, (TextEnvelope, FilePath) scVrf :: (TextEnvelope, FilePath) scVrf :: ShelleyCredentials -> (TextEnvelope, FilePath) -scVrf, (TextEnvelope, FilePath) +scVrf, (TextEnvelope, FilePath) scKes :: (TextEnvelope, FilePath) scKes :: ShelleyCredentials -> (TextEnvelope, FilePath) -scKes } = do +scKes } = do OperationalCertificate -> SigningKey VrfKey -> SigningKey KesKey @@ -787,7 +787,7 @@ -> ExceptT PraosLeaderCredentialsError IO a parseEnvelope AsType OperationalCertificate AsOperationalCertificate (TextEnvelope, FilePath) -scCert +scCert ExceptT PraosLeaderCredentialsError IO @@ -811,7 +811,7 @@ forall a. AsType a -> AsType (SigningKey a) AsSigningKey AsType VrfKey AsVrfKey) (TextEnvelope, FilePath) -scVrf +scVrf ExceptT PraosLeaderCredentialsError IO @@ -834,22 +834,22 @@ forall a. AsType a -> AsType (SigningKey a) AsSigningKey AsType KesKey AsKesKey) (TextEnvelope, FilePath) -scKes +scKes - readBulkFile :: Maybe FilePath + readBulkFile :: Maybe FilePath -> ExceptT PraosLeaderCredentialsError IO [ShelleyCredentials] - readBulkFile :: Maybe FilePath + readBulkFile :: Maybe FilePath -> ExceptT PraosLeaderCredentialsError IO [ShelleyCredentials] -readBulkFile Maybe FilePath +readBulkFile Maybe FilePath Nothing = [ShelleyCredentials] -> ExceptT PraosLeaderCredentialsError IO [ShelleyCredentials] forall (f :: * -> *) a. Applicative f => a -> f a pure [] - readBulkFile (Just FilePath -fp) = do - ByteString -content <- (IOException -> PraosLeaderCredentialsError) + readBulkFile (Just FilePath +fp) = do + ByteString +content <- (IOException -> PraosLeaderCredentialsError) -> IO ByteString -> ExceptT PraosLeaderCredentialsError IO ByteString forall (m :: * -> *) x a. @@ -857,7 +857,7 @@ (IOException -> x) -> IO a -> ExceptT x m a handleIOExceptT (FilePath -> IOException -> PraosLeaderCredentialsError CredentialsReadError FilePath -fp) (IO ByteString +fp) (IO ByteString -> ExceptT PraosLeaderCredentialsError IO ByteString) -> IO ByteString -> ExceptT PraosLeaderCredentialsError IO ByteString @@ -865,9 +865,9 @@ $ FilePath -> IO ByteString BS.readFile FilePath -fp - [(TextEnvelope, TextEnvelope, TextEnvelope)] -envelopes <- (FilePath -> PraosLeaderCredentialsError) +fp + [(TextEnvelope, TextEnvelope, TextEnvelope)] +envelopes <- (FilePath -> PraosLeaderCredentialsError) -> ExceptT FilePath IO [(TextEnvelope, TextEnvelope, TextEnvelope)] -> ExceptT PraosLeaderCredentialsError @@ -878,7 +878,7 @@ (x -> y) -> ExceptT x m a -> ExceptT y m a firstExceptT (FilePath -> FilePath -> PraosLeaderCredentialsError EnvelopeParseError FilePath -fp) (ExceptT FilePath IO [(TextEnvelope, TextEnvelope, TextEnvelope)] +fp) (ExceptT FilePath IO [(TextEnvelope, TextEnvelope, TextEnvelope)] -> ExceptT PraosLeaderCredentialsError IO @@ -903,7 +903,7 @@ -> Either FilePath [(TextEnvelope, TextEnvelope, TextEnvelope)] forall a. FromJSON a => ByteString -> Either FilePath a Aeson.eitherDecodeStrict' ByteString -content +content [ShelleyCredentials] -> ExceptT PraosLeaderCredentialsError IO [ShelleyCredentials] forall (f :: * -> *) a. Applicative f => a -> f a @@ -920,7 +920,7 @@ forall a b c. (a -> b -> c) -> (a, b) -> c uncurry Int -> (TextEnvelope, TextEnvelope, TextEnvelope) -> ShelleyCredentials -mkCredentials ((Int, (TextEnvelope, TextEnvelope, TextEnvelope)) +mkCredentials ((Int, (TextEnvelope, TextEnvelope, TextEnvelope)) -> ShelleyCredentials) -> [(Int, (TextEnvelope, TextEnvelope, TextEnvelope))] -> [ShelleyCredentials] @@ -931,21 +931,21 @@ forall a b. [a] -> [b] -> [(a, b)] zip [Int 0..] [(TextEnvelope, TextEnvelope, TextEnvelope)] -envelopes +envelopes where - mkCredentials :: Int -> (TextEnvelope, TextEnvelope, TextEnvelope) + mkCredentials :: Int -> (TextEnvelope, TextEnvelope, TextEnvelope) -> ShelleyCredentials - mkCredentials :: Int + mkCredentials :: Int -> (TextEnvelope, TextEnvelope, TextEnvelope) -> ShelleyCredentials -mkCredentials Int -ix (TextEnvelope -teCert, TextEnvelope -teVrf, TextEnvelope -teKes) = - let loc :: FilePath -> FilePath -loc FilePath -ty = FilePath -fp FilePath -> FilePath -> FilePath +mkCredentials Int +ix (TextEnvelope +teCert, TextEnvelope +teVrf, TextEnvelope +teKes) = + let loc :: FilePath -> FilePath +loc FilePath +ty = FilePath +fp FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> FilePath "." FilePath -> FilePath -> FilePath @@ -953,25 +953,25 @@ <> Int -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show Int -ix FilePath -> FilePath -> FilePath +ix FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> FilePath -ty +ty in (TextEnvelope, FilePath) -> (TextEnvelope, FilePath) -> (TextEnvelope, FilePath) -> ShelleyCredentials ShelleyCredentials (TextEnvelope -teCert, FilePath -> FilePath -loc FilePath +teCert, FilePath -> FilePath +loc FilePath "cert") (TextEnvelope -teVrf, FilePath -> FilePath -loc FilePath +teVrf, FilePath -> FilePath +loc FilePath "vrf") (TextEnvelope -teKes, FilePath -> FilePath -loc FilePath +teKes, FilePath -> FilePath +loc FilePath "kes") mkPraosLeaderCredentials :: @@ -984,10 +984,10 @@ -> SigningKey KesKey -> TPraosLeaderCredentials StandardCrypto mkPraosLeaderCredentials - (OperationalCertificate OCert StandardCrypto -opcert (StakePoolVerificationKey vkey)) - (VrfSigningKey vrfKey) - (KesSigningKey kesKey) = + (OperationalCertificate OCert StandardCrypto +opcert (StakePoolVerificationKey vkey)) + (VrfSigningKey vrfKey) + (KesSigningKey kesKey) = TPraosLeaderCredentials :: forall c. SignKeyKES c -> TPraosCanBeLeader c -> Text -> TPraosLeaderCredentials c @@ -1000,7 +1000,7 @@ TPraosCanBeLeader { tpraosCanBeLeaderOpCert :: OCert StandardCrypto tpraosCanBeLeaderOpCert = OCert StandardCrypto -opcert, +opcert, tpraosCanBeLeaderColdVerKey :: VKey 'BlockIssuer StandardCrypto tpraosCanBeLeaderColdVerKey = VKey 'StakePool StandardCrypto -> VKey 'BlockIssuer StandardCrypto forall (a :: KeyRole -> * -> *) (r :: KeyRole) crypto @@ -1008,31 +1008,31 @@ HasKeyRole a => a r crypto -> a r' crypto coerceKeyRole VKey 'StakePool StandardCrypto -vkey, +vkey, tpraosCanBeLeaderSignKeyVRF :: SignKeyVRF StandardCrypto tpraosCanBeLeaderSignKeyVRF = SignKeyVRF StandardCrypto -vrfKey +vrfKey }, $sel:tpraosLeaderCredentialsInitSignKey:TPraosLeaderCredentials :: SignKeyKES StandardCrypto tpraosLeaderCredentialsInitSignKey = SignKeyKES StandardCrypto -kesKey, +kesKey, $sel:tpraosLeaderCredentialsLabel:TPraosLeaderCredentials :: Text tpraosLeaderCredentialsLabel = Text "Shelley" } -parseEnvelope :: - HasTextEnvelope a - => AsType a +parseEnvelope :: + HasTextEnvelope a + => AsType a -> (TextEnvelope, String) - -> ExceptT PraosLeaderCredentialsError IO a + -> ExceptT PraosLeaderCredentialsError IO a parseEnvelope :: AsType a -> (TextEnvelope, FilePath) -> ExceptT PraosLeaderCredentialsError IO a -parseEnvelope AsType a -as (TextEnvelope -te, FilePath -loc) = +parseEnvelope AsType a +as (TextEnvelope +te, FilePath +loc) = (TextEnvelopeError -> PraosLeaderCredentialsError) -> ExceptT TextEnvelopeError IO a -> ExceptT PraosLeaderCredentialsError IO a @@ -1050,7 +1050,7 @@ . FilePath -> TextEnvelopeError -> FileError TextEnvelopeError forall e. FilePath -> e -> FileError e Api.FileError FilePath -loc) (ExceptT TextEnvelopeError IO a +loc) (ExceptT TextEnvelopeError IO a -> ExceptT PraosLeaderCredentialsError IO a) -> (Either TextEnvelopeError a -> ExceptT TextEnvelopeError IO a) -> Either TextEnvelopeError a @@ -1071,8 +1071,8 @@ HasTextEnvelope a => AsType a -> TextEnvelope -> Either TextEnvelopeError a deserialiseFromTextEnvelope AsType a -as TextEnvelope -te +as TextEnvelope +te ------------------------------------------------------------------------------ @@ -1083,7 +1083,7 @@ GenesisReadError GenesisReadError | GenesisValidationError GenesisValidationError | PraosLeaderCredentialsError PraosLeaderCredentialsError - deriving Int -> ShelleyProtocolInstantiationError -> FilePath -> FilePath + deriving Int -> ShelleyProtocolInstantiationError -> FilePath -> FilePath [ShelleyProtocolInstantiationError] -> FilePath -> FilePath ShelleyProtocolInstantiationError -> FilePath (Int -> ShelleyProtocolInstantiationError -> FilePath -> FilePath) @@ -1102,29 +1102,29 @@ Show instance Error ShelleyProtocolInstantiationError where - displayError :: ShelleyProtocolInstantiationError -> FilePath -displayError (GenesisReadError GenesisReadError -err) = GenesisReadError -> FilePath + displayError :: ShelleyProtocolInstantiationError -> FilePath +displayError (GenesisReadError GenesisReadError +err) = GenesisReadError -> FilePath forall e. Error e => e -> FilePath displayError GenesisReadError -err - displayError (GenesisValidationError GenesisValidationError -err) = GenesisValidationError -> FilePath +err + displayError (GenesisValidationError GenesisValidationError +err) = GenesisValidationError -> FilePath forall e. Error e => e -> FilePath displayError GenesisValidationError -err - displayError (PraosLeaderCredentialsError PraosLeaderCredentialsError -err) = PraosLeaderCredentialsError -> FilePath +err + displayError (PraosLeaderCredentialsError PraosLeaderCredentialsError +err) = PraosLeaderCredentialsError -> FilePath forall e. Error e => e -> FilePath displayError PraosLeaderCredentialsError -err +err data GenesisReadError = GenesisReadFileError !FilePath !IOException | GenesisHashMismatch !GenesisHash !GenesisHash -- actual, expected | GenesisDecodeError !FilePath !String - deriving Int -> GenesisReadError -> FilePath -> FilePath + deriving Int -> GenesisReadError -> FilePath -> FilePath [GenesisReadError] -> FilePath -> FilePath GenesisReadError -> FilePath (Int -> GenesisReadError -> FilePath -> FilePath) @@ -1143,10 +1143,10 @@ Show instance Error GenesisReadError where - displayError :: GenesisReadError -> FilePath -displayError (GenesisReadFileError FilePath -fp IOException -err) = + displayError :: GenesisReadError -> FilePath +displayError (GenesisReadFileError FilePath +fp IOException +err) = FilePath "There was an error reading the genesis file: " FilePath -> FilePath -> FilePath @@ -1154,7 +1154,7 @@ <> FilePath -> FilePath forall a b. ConvertText a b => a -> b toS FilePath -fp FilePath -> FilePath -> FilePath +fp FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> FilePath " Error: " FilePath -> FilePath -> FilePath @@ -1162,18 +1162,18 @@ <> IOException -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show IOException -err +err - displayError (GenesisHashMismatch GenesisHash -actual GenesisHash -expected) = + displayError (GenesisHashMismatch GenesisHash +actual GenesisHash +expected) = FilePath "Wrong Shelley genesis file: the actual hash is " FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> GenesisHash -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show GenesisHash -actual +actual FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> FilePath @@ -1186,11 +1186,11 @@ <> GenesisHash -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show GenesisHash -expected +expected - displayError (GenesisDecodeError FilePath -fp FilePath -err) = + displayError (GenesisDecodeError FilePath +fp FilePath +err) = FilePath "There was an error parsing the genesis file: " FilePath -> FilePath -> FilePath @@ -1198,7 +1198,7 @@ <> FilePath -> FilePath forall a b. ConvertText a b => a -> b toS FilePath -fp FilePath -> FilePath -> FilePath +fp FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> FilePath " Error: " FilePath -> FilePath -> FilePath @@ -1206,11 +1206,11 @@ <> FilePath -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show FilePath -err +err newtype GenesisValidationError = GenesisValidationErrors [Shelley.ValidationErr] - deriving Int -> GenesisValidationError -> FilePath -> FilePath + deriving Int -> GenesisValidationError -> FilePath -> FilePath [GenesisValidationError] -> FilePath -> FilePath GenesisValidationError -> FilePath (Int -> GenesisValidationError -> FilePath -> FilePath) @@ -1229,16 +1229,16 @@ Show instance Error GenesisValidationError where - displayError :: GenesisValidationError -> FilePath -displayError (GenesisValidationErrors [ValidationErr] -vErrs) = + displayError :: GenesisValidationError -> FilePath +displayError (GenesisValidationErrors [ValidationErr] +vErrs) = Text -> FilePath T.unpack ([Text] -> Text unlines ((ValidationErr -> Text) -> [ValidationErr] -> [Text] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map ValidationErr -> Text Shelley.describeValidationErr [ValidationErr] -vErrs)) +vErrs)) data PraosLeaderCredentialsError = @@ -1250,7 +1250,7 @@ | OCertNotSpecified | VRFKeyNotSpecified | KESKeyNotSpecified - deriving Int -> PraosLeaderCredentialsError -> FilePath -> FilePath + deriving Int -> PraosLeaderCredentialsError -> FilePath -> FilePath [PraosLeaderCredentialsError] -> FilePath -> FilePath PraosLeaderCredentialsError -> FilePath (Int -> PraosLeaderCredentialsError -> FilePath -> FilePath) @@ -1269,10 +1269,10 @@ Show instance Error PraosLeaderCredentialsError where - displayError :: PraosLeaderCredentialsError -> FilePath -displayError (CredentialsReadError FilePath -fp IOException -err) = + displayError :: PraosLeaderCredentialsError -> FilePath +displayError (CredentialsReadError FilePath +fp IOException +err) = FilePath "There was an error reading a credentials file: " FilePath -> FilePath -> FilePath @@ -1280,7 +1280,7 @@ <> FilePath -> FilePath forall a b. ConvertText a b => a -> b toS FilePath -fp FilePath -> FilePath -> FilePath +fp FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> FilePath " Error: " FilePath -> FilePath -> FilePath @@ -1288,11 +1288,11 @@ <> IOException -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show IOException -err +err - displayError (EnvelopeParseError FilePath -fp FilePath -err) = + displayError (EnvelopeParseError FilePath +fp FilePath +err) = FilePath "There was an error parsing a credentials envelope: " FilePath -> FilePath -> FilePath @@ -1300,7 +1300,7 @@ <> FilePath -> FilePath forall a b. ConvertText a b => a -> b toS FilePath -fp FilePath -> FilePath -> FilePath +fp FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> FilePath " Error: " FilePath -> FilePath -> FilePath @@ -1308,13 +1308,13 @@ <> FilePath -> FilePath forall a b. (Show a, ConvertText FilePath b) => a -> b show FilePath -err +err - displayError (FileError FileError TextEnvelopeError -fileErr) = FileError TextEnvelopeError -> FilePath + displayError (FileError FileError TextEnvelopeError +fileErr) = FileError TextEnvelopeError -> FilePath forall e. Error e => e -> FilePath displayError FileError TextEnvelopeError -fileErr +fileErr displayError PraosLeaderCredentialsError OCertNotSpecified = FilePath -> FilePath @@ -1331,13 +1331,13 @@ missingFlagMessage :: String -> String missingFlagMessage :: FilePath -> FilePath -missingFlagMessage FilePath -flag = +missingFlagMessage FilePath +flag = FilePath "To create blocks, the --" FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> FilePath -flag FilePath -> FilePath -> FilePath +flag FilePath -> FilePath -> FilePath forall a. Semigroup a => a -> a -> a <> FilePath " must also be specified" diff --git a/cardano-node/src/Cardano.Node.Protocol.Types.html b/cardano-node/src/Cardano.Node.Protocol.Types.html index f17b6fbcf7e..427f7953908 100644 --- a/cardano-node/src/Cardano.Node.Protocol.Types.html +++ b/cardano-node/src/Cardano.Node.Protocol.Types.html @@ -23,10 +23,10 @@ import Cardano.Tracing.Constraints (TraceConstraints) import Cardano.Tracing.Metrics (HasKESInfo, HasKESMetricsData) -data Protocol = ByronProtocol +data Protocol = ByronProtocol | ShelleyProtocol | CardanoProtocol - deriving (Protocol -> Protocol -> Bool + deriving (Protocol -> Protocol -> Bool (Protocol -> Protocol -> Bool) -> (Protocol -> Protocol -> Bool) -> Eq Protocol forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -34,7 +34,7 @@ $c/= :: Protocol -> Protocol -> Bool == :: Protocol -> Protocol -> Bool $c== :: Protocol -> Protocol -> Bool -Eq, Int -> Protocol -> ShowS +Eq, Int -> Protocol -> ShowS [Protocol] -> ShowS Protocol -> String (Int -> Protocol -> ShowS) @@ -57,11 +57,11 @@ $cfrom :: forall x. Protocol -> Rep Protocol x Generic) -deriving instance NFData Protocol -deriving instance NoThunks Protocol +deriving instance NFData Protocol +deriving instance NoThunks Protocol -instance FromJSON Protocol where - parseJSON :: Value -> Parser Protocol +instance FromJSON Protocol where + parseJSON :: Value -> Parser Protocol parseJSON = String -> (Text -> Parser Protocol) -> Value -> Parser Protocol forall a. String -> (Text -> Parser a) -> Value -> Parser a @@ -69,9 +69,9 @@ "Protocol" ((Text -> Parser Protocol) -> Value -> Parser Protocol) -> (Text -> Parser Protocol) -> Value -> Parser Protocol forall a b. (a -> b) -> a -> b -$ \Text -str -> case Text -str of +$ \Text +str -> case Text +str of -- The new names Text @@ -114,7 +114,7 @@ <> Text -> String forall a b. (Show a, ConvertText String b) => a -> b show Text -str String -> ShowS +str String -> ShowS forall a. Semigroup a => a -> a -> a <> String " is not a valid protocol" @@ -123,12 +123,12 @@ data SomeConsensusProtocol where - SomeConsensusProtocol :: forall blk. ( Cardano.Protocol IO blk - , HasKESMetricsData blk - , HasKESInfo blk - , TraceConstraints blk + SomeConsensusProtocol :: forall blk. ( Cardano.Protocol IO blk + , HasKESMetricsData blk + , HasKESInfo blk + , TraceConstraints blk ) - => Cardano.BlockType blk - -> Cardano.ProtocolInfoArgs IO blk + => Cardano.BlockType blk + -> Cardano.ProtocolInfoArgs IO blk -> SomeConsensusProtocol \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Protocol.html b/cardano-node/src/Cardano.Node.Protocol.html index eaa7bbc424a..c4ac9645c98 100644 --- a/cardano-node/src/Cardano.Node.Protocol.html +++ b/cardano-node/src/Cardano.Node.Protocol.html @@ -31,18 +31,18 @@ -> ExceptT ProtocolInstantiationError IO SomeConsensusProtocol mkConsensusProtocol :: NodeConfiguration -> ExceptT ProtocolInstantiationError IO SomeConsensusProtocol -mkConsensusProtocol NodeConfiguration{NodeProtocolConfiguration +mkConsensusProtocol NodeConfiguration{NodeProtocolConfiguration ncProtocolConfig :: NodeConfiguration -> NodeProtocolConfiguration ncProtocolConfig :: NodeProtocolConfiguration -ncProtocolConfig, ProtocolFilepaths +ncProtocolConfig, ProtocolFilepaths ncProtocolFiles :: NodeConfiguration -> ProtocolFilepaths ncProtocolFiles :: ProtocolFilepaths ncProtocolFiles} = case NodeProtocolConfiguration -ncProtocolConfig of +ncProtocolConfig of - NodeProtocolConfigurationByron NodeByronProtocolConfiguration -config -> + NodeProtocolConfigurationByron NodeByronProtocolConfiguration +config -> (ByronProtocolInstantiationError -> ProtocolInstantiationError) -> ExceptT ByronProtocolInstantiationError IO SomeConsensusProtocol -> ExceptT ProtocolInstantiationError IO SomeConsensusProtocol @@ -60,13 +60,13 @@ -> Maybe ProtocolFilepaths -> ExceptT ByronProtocolInstantiationError IO SomeConsensusProtocol mkSomeConsensusProtocolByron NodeByronProtocolConfiguration -config (ProtocolFilepaths -> Maybe ProtocolFilepaths +config (ProtocolFilepaths -> Maybe ProtocolFilepaths forall a. a -> Maybe a Just ProtocolFilepaths -ncProtocolFiles) +ncProtocolFiles) - NodeProtocolConfigurationShelley NodeShelleyProtocolConfiguration -config -> + NodeProtocolConfigurationShelley NodeShelleyProtocolConfiguration +config -> (ShelleyProtocolInstantiationError -> ProtocolInstantiationError) -> ExceptT ShelleyProtocolInstantiationError IO SomeConsensusProtocol @@ -87,19 +87,19 @@ -> ExceptT ShelleyProtocolInstantiationError IO SomeConsensusProtocol mkSomeConsensusProtocolShelley NodeShelleyProtocolConfiguration -config (ProtocolFilepaths -> Maybe ProtocolFilepaths +config (ProtocolFilepaths -> Maybe ProtocolFilepaths forall a. a -> Maybe a Just ProtocolFilepaths -ncProtocolFiles) +ncProtocolFiles) - NodeProtocolConfigurationCardano NodeByronProtocolConfiguration -byronConfig - NodeShelleyProtocolConfiguration -shelleyConfig - NodeAlonzoProtocolConfiguration -alonzoConfig - NodeHardForkProtocolConfiguration -hardForkConfig -> + NodeProtocolConfigurationCardano NodeByronProtocolConfiguration +byronConfig + NodeShelleyProtocolConfiguration +shelleyConfig + NodeAlonzoProtocolConfiguration +alonzoConfig + NodeHardForkProtocolConfiguration +hardForkConfig -> (CardanoProtocolInstantiationError -> ProtocolInstantiationError) -> ExceptT CardanoProtocolInstantiationError IO SomeConsensusProtocol @@ -124,17 +124,17 @@ CardanoProtocolInstantiationError IO SomeConsensusProtocol mkSomeConsensusProtocolCardano NodeByronProtocolConfiguration -byronConfig +byronConfig NodeShelleyProtocolConfiguration -shelleyConfig +shelleyConfig NodeAlonzoProtocolConfiguration -alonzoConfig +alonzoConfig NodeHardForkProtocolConfiguration -hardForkConfig +hardForkConfig (ProtocolFilepaths -> Maybe ProtocolFilepaths forall a. a -> Maybe a Just ProtocolFilepaths -ncProtocolFiles) +ncProtocolFiles) ------------------------------------------------------------------------------ -- Errors @@ -144,7 +144,7 @@ ByronProtocolInstantiationError ByronProtocolInstantiationError | ShelleyProtocolInstantiationError ShelleyProtocolInstantiationError | CardanoProtocolInstantiationError CardanoProtocolInstantiationError - deriving Int -> ProtocolInstantiationError -> ShowS + deriving Int -> ProtocolInstantiationError -> ShowS [ProtocolInstantiationError] -> ShowS ProtocolInstantiationError -> String (Int -> ProtocolInstantiationError -> ShowS) @@ -163,21 +163,21 @@ instance Error ProtocolInstantiationError where - displayError :: ProtocolInstantiationError -> String -displayError (ByronProtocolInstantiationError ByronProtocolInstantiationError -err) = ByronProtocolInstantiationError -> String + displayError :: ProtocolInstantiationError -> String +displayError (ByronProtocolInstantiationError ByronProtocolInstantiationError +err) = ByronProtocolInstantiationError -> String forall e. Error e => e -> String displayError ByronProtocolInstantiationError -err - displayError (ShelleyProtocolInstantiationError ShelleyProtocolInstantiationError -err) = ShelleyProtocolInstantiationError -> String +err + displayError (ShelleyProtocolInstantiationError ShelleyProtocolInstantiationError +err) = ShelleyProtocolInstantiationError -> String forall e. Error e => e -> String displayError ShelleyProtocolInstantiationError -err - displayError (CardanoProtocolInstantiationError CardanoProtocolInstantiationError -err) = CardanoProtocolInstantiationError -> String +err + displayError (CardanoProtocolInstantiationError CardanoProtocolInstantiationError +err) = CardanoProtocolInstantiationError -> String forall e. Error e => e -> String displayError CardanoProtocolInstantiationError -err +err \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Run.html b/cardano-node/src/Cardano.Node.Run.html index 621358b09cb..5130104ff53 100644 --- a/cardano-node/src/Cardano.Node.Run.html +++ b/cardano-node/src/Cardano.Node.Run.html @@ -85,14 +85,14 @@ :: PartialNodeConfiguration -> IO () runNode :: PartialNodeConfiguration -> IO () -runNode PartialNodeConfiguration -cmdPc = do +runNode PartialNodeConfiguration +cmdPc = do -- TODO: Remove sodiumInit: https://github.com/input-output-hk/cardano-base/issues/175 IO () Crypto.sodiumInit - PartialNodeConfiguration -configYamlPc <- Maybe ConfigYamlFilePath -> IO PartialNodeConfiguration + PartialNodeConfiguration +configYamlPc <- Maybe ConfigYamlFilePath -> IO PartialNodeConfiguration parseNodeConfigurationFP (Maybe ConfigYamlFilePath -> IO PartialNodeConfiguration) -> (Last ConfigYamlFilePath -> Maybe ConfigYamlFilePath) -> Last ConfigYamlFilePath @@ -107,10 +107,10 @@ forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> Last ConfigYamlFilePath pncConfigFile PartialNodeConfiguration -cmdPc +cmdPc - NodeConfiguration -nc <- case PartialNodeConfiguration -> Either String NodeConfiguration + NodeConfiguration +nc <- case PartialNodeConfiguration -> Either String NodeConfiguration makeNodeConfiguration (PartialNodeConfiguration -> Either String NodeConfiguration) -> PartialNodeConfiguration -> Either String NodeConfiguration forall a b. (a -> b) -> a -> b @@ -119,13 +119,13 @@ -> PartialNodeConfiguration -> PartialNodeConfiguration forall a. Semigroup a => a -> a -> a <> PartialNodeConfiguration -configYamlPc PartialNodeConfiguration +configYamlPc PartialNodeConfiguration -> PartialNodeConfiguration -> PartialNodeConfiguration forall a. Semigroup a => a -> a -> a <> PartialNodeConfiguration -cmdPc of - Left String -err -> Text -> IO NodeConfiguration +cmdPc of + Left String +err -> Text -> IO NodeConfiguration forall a. HasCallStack => Text -> a panic (Text -> IO NodeConfiguration) -> Text -> IO NodeConfiguration forall a b. (a -> b) -> a -> b @@ -134,12 +134,12 @@ forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -err - Right NodeConfiguration -nc' -> NodeConfiguration -> IO NodeConfiguration +err + Right NodeConfiguration +nc' -> NodeConfiguration -> IO NodeConfiguration forall (m :: * -> *) a. Monad m => a -> m a return NodeConfiguration -nc' +nc' case ProtocolFilepaths -> Maybe String shelleyVRFFile (ProtocolFilepaths -> Maybe String) @@ -147,10 +147,10 @@ forall a b. (a -> b) -> a -> b $ NodeConfiguration -> ProtocolFilepaths ncProtocolFiles NodeConfiguration -nc of - Just String -vrfFp -> do Either VRFPrivateKeyFilePermissionError () -vrf <- ExceptT VRFPrivateKeyFilePermissionError IO () +nc of + Just String +vrfFp -> do Either VRFPrivateKeyFilePermissionError () +vrf <- ExceptT VRFPrivateKeyFilePermissionError IO () -> IO (Either VRFPrivateKeyFilePermissionError ()) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) runExceptT (ExceptT VRFPrivateKeyFilePermissionError IO () @@ -160,15 +160,15 @@ forall a b. (a -> b) -> a -> b $ String -> ExceptT VRFPrivateKeyFilePermissionError IO () checkVRFFilePermissions String -vrfFp +vrfFp case Either VRFPrivateKeyFilePermissionError () -vrf of - Left VRFPrivateKeyFilePermissionError -err -> +vrf of + Left VRFPrivateKeyFilePermissionError +err -> Text -> IO () putTextLn (VRFPrivateKeyFilePermissionError -> Text renderVRFPrivateKeyFilePermissionError VRFPrivateKeyFilePermissionError -err) IO () -> IO () -> IO () +err) IO () -> IO () -> IO () forall (m :: * -> *) a b. Monad m => m a -> m b -> m b >> IO () forall a. IO a @@ -182,8 +182,8 @@ forall (f :: * -> *) a. Applicative f => a -> f a pure () - Either ProtocolInstantiationError SomeConsensusProtocol -eitherSomeProtocol <- ExceptT ProtocolInstantiationError IO SomeConsensusProtocol + Either ProtocolInstantiationError SomeConsensusProtocol +eitherSomeProtocol <- ExceptT ProtocolInstantiationError IO SomeConsensusProtocol -> IO (Either ProtocolInstantiationError SomeConsensusProtocol) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) runExceptT (ExceptT ProtocolInstantiationError IO SomeConsensusProtocol @@ -194,31 +194,31 @@ $ NodeConfiguration -> ExceptT ProtocolInstantiationError IO SomeConsensusProtocol mkConsensusProtocol NodeConfiguration -nc +nc - SomeConsensusProtocol -p :: SomeConsensusProtocol <- + SomeConsensusProtocol +p :: SomeConsensusProtocol <- case Either ProtocolInstantiationError SomeConsensusProtocol -eitherSomeProtocol of - Left ProtocolInstantiationError -err -> String -> IO () +eitherSomeProtocol of + Left ProtocolInstantiationError +err -> String -> IO () forall a (m :: * -> *). (Print a, MonadIO m) => a -> m () putStrLn (ProtocolInstantiationError -> String forall e. Error e => e -> String displayError ProtocolInstantiationError -err) IO () -> IO SomeConsensusProtocol -> IO SomeConsensusProtocol +err) IO () -> IO SomeConsensusProtocol -> IO SomeConsensusProtocol forall (m :: * -> *) a b. Monad m => m a -> m b -> m b >> IO SomeConsensusProtocol forall a. IO a exitFailure - Right SomeConsensusProtocol -p -> SomeConsensusProtocol -> IO SomeConsensusProtocol + Right SomeConsensusProtocol +p -> SomeConsensusProtocol -> IO SomeConsensusProtocol forall (f :: * -> *) a. Applicative f => a -> f a pure SomeConsensusProtocol -p +p - Either ConfigError LoggingLayer -eLoggingLayer <- ExceptT ConfigError IO LoggingLayer + Either ConfigError LoggingLayer +eLoggingLayer <- ExceptT ConfigError IO LoggingLayer -> IO (Either ConfigError LoggingLayer) forall e (m :: * -> *) a. ExceptT e m a -> m (Either e a) runExceptT (ExceptT ConfigError IO LoggingLayer @@ -236,35 +236,35 @@ showVersion Version version)) NodeConfiguration -nc +nc SomeConsensusProtocol -p +p - LoggingLayer -loggingLayer <- case Either ConfigError LoggingLayer -eLoggingLayer of - Left ConfigError -err -> Text -> IO () + LoggingLayer +loggingLayer <- case Either ConfigError LoggingLayer +eLoggingLayer of + Left ConfigError +err -> Text -> IO () putTextLn (ConfigError -> Text forall a b. (Show a, ConvertText String b) => a -> b show ConfigError -err) IO () -> IO LoggingLayer -> IO LoggingLayer +err) IO () -> IO LoggingLayer -> IO LoggingLayer forall (m :: * -> *) a b. Monad m => m a -> m b -> m b >> IO LoggingLayer forall a. IO a exitFailure - Right LoggingLayer -res -> LoggingLayer -> IO LoggingLayer + Right LoggingLayer +res -> LoggingLayer -> IO LoggingLayer forall (m :: * -> *) a. Monad m => a -> m a return LoggingLayer -res +res - !Trace IO Text -trace <- LoggingLayer -> IO (Trace IO Text) + !Trace IO Text +trace <- LoggingLayer -> IO (Trace IO Text) setupTrace LoggingLayer -loggingLayer - let tracer :: Tracer IO String -tracer = (String -> Text) -> Tracer IO Text -> Tracer IO String +loggingLayer + let tracer :: Tracer IO String +tracer = (String -> Text) -> Tracer IO Text -> Tracer IO String forall (f :: * -> *) a b. Contravariant f => (a -> b) -> f b -> f a contramap String -> Text pack (Tracer IO Text -> Tracer IO String) @@ -275,40 +275,40 @@ (ToLogObject m, ToObject a, Transformable a m b) => Trace m a -> Tracer m b toLogObject Trace IO Text -trace +trace NodeConfiguration -> Tracer IO String -> IO () logTracingVerbosity NodeConfiguration -nc Tracer IO String -tracer +nc Tracer IO String +tracer - let handleNodeWithTracers - :: ( HasKESMetricsData blk - , HasKESInfo blk - , TraceConstraints blk - , Protocol.Protocol IO blk + let handleNodeWithTracers + :: ( HasKESMetricsData blk + , HasKESInfo blk + , TraceConstraints blk + , Protocol.Protocol IO blk ) - => Protocol.ProtocolInfoArgs IO blk + => Protocol.ProtocolInfoArgs IO blk -> IO () - handleNodeWithTracers :: ProtocolInfoArgs IO blk -> IO () -handleNodeWithTracers ProtocolInfoArgs IO blk -runP = do + handleNodeWithTracers :: ProtocolInfoArgs IO blk -> IO () +handleNodeWithTracers ProtocolInfoArgs IO blk +runP = do -- This IORef contains node kernel structure which holds node kernel. -- Used for ledger queries and peer connection status. - NodeKernelData blk -nodeKernelData <- IO (NodeKernelData blk) + NodeKernelData blk +nodeKernelData <- IO (NodeKernelData blk) forall blk. IO (NodeKernelData blk) mkNodeKernelData let ProtocolInfo { pInfoConfig :: forall (m :: * -> *) b. ProtocolInfo m b -> TopLevelConfig b -pInfoConfig = TopLevelConfig blk -cfg } = ProtocolInfoArgs IO blk -> ProtocolInfo IO blk +pInfoConfig = TopLevelConfig blk +cfg } = ProtocolInfoArgs IO blk -> ProtocolInfo IO blk forall (m :: * -> *) blk. Protocol m blk => ProtocolInfoArgs m blk -> ProtocolInfo m blk Protocol.protocolInfo ProtocolInfoArgs IO blk -runP - Tracers RemoteConnectionId LocalConnectionId blk -tracers <- BlockConfig blk +runP + Tracers RemoteConnectionId LocalConnectionId blk +tracers <- BlockConfig blk -> TraceOptions -> Trace IO Text -> NodeKernelData blk @@ -328,28 +328,28 @@ (TopLevelConfig blk -> BlockConfig blk forall blk. TopLevelConfig blk -> BlockConfig blk Consensus.configBlock TopLevelConfig blk -cfg) +cfg) (NodeConfiguration -> TraceOptions ncTraceConfig NodeConfiguration -nc) +nc) Trace IO Text -trace +trace NodeKernelData blk -nodeKernelData +nodeKernelData (LoggingLayer -> Maybe EKGDirect llEKGDirect LoggingLayer -loggingLayer) +loggingLayer) IO () -> (Async () -> IO ()) -> IO () forall a b. IO a -> (Async a -> IO b) -> IO b Async.withAsync (Trace IO Text -> NodeKernelData blk -> IO () forall blk. Trace IO Text -> NodeKernelData blk -> IO () handlePeersListSimple Trace IO Text -trace NodeKernelData blk -nodeKernelData) +trace NodeKernelData blk +nodeKernelData) ((Async () -> IO ()) -> IO ()) -> (Async () -> IO ()) -> IO () forall a b. (a -> b) -> a -> b -$ \Async () -_peerLogingThread -> +$ \Async () +_peerLogingThread -> -- We ignore peer loging thread if it dies, but it will be killed -- when 'handleSimpleNode' terminates. SomeConsensusProtocol @@ -371,70 +371,70 @@ -> IO ()) -> IO () handleSimpleNode SomeConsensusProtocol -p ProtocolInfoArgs IO blk -runP Trace IO Text -trace Tracers RemoteConnectionId LocalConnectionId blk -tracers NodeConfiguration -nc (NodeKernelData blk +p ProtocolInfoArgs IO blk +runP Trace IO Text +trace Tracers RemoteConnectionId LocalConnectionId blk +tracers NodeConfiguration +nc (NodeKernelData blk -> NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO () forall blk. NodeKernelData blk -> NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO () setNodeKernel NodeKernelData blk -nodeKernelData) +nodeKernelData) IO () -> IO () -> IO () forall a b. IO a -> IO b -> IO a `finally` LoggingLayer -> IO () shutdownLoggingLayer LoggingLayer -loggingLayer +loggingLayer case SomeConsensusProtocol -p of +p of SomeConsensusProtocol BlockType blk -_ ProtocolInfoArgs IO blk -runP -> ProtocolInfoArgs IO blk -> IO () +_ ProtocolInfoArgs IO blk +runP -> ProtocolInfoArgs IO blk -> IO () forall blk. (HasKESMetricsData blk, HasKESInfo blk, TraceConstraints blk, Protocol IO blk) => ProtocolInfoArgs IO blk -> IO () -handleNodeWithTracers ProtocolInfoArgs IO blk -runP +handleNodeWithTracers ProtocolInfoArgs IO blk +runP logTracingVerbosity :: NodeConfiguration -> Tracer IO String -> IO () logTracingVerbosity :: NodeConfiguration -> Tracer IO String -> IO () -logTracingVerbosity NodeConfiguration -nc Tracer IO String -tracer = +logTracingVerbosity NodeConfiguration +nc Tracer IO String +tracer = case NodeConfiguration -> TraceOptions ncTraceConfig NodeConfiguration -nc of +nc of TraceOptions TracingOff -> () -> IO () forall (m :: * -> *) a. Monad m => a -> m a return () - TracingOn TraceSelection -traceConf -> + TracingOn TraceSelection +traceConf -> case TraceSelection -> TracingVerbosity traceVerbosity TraceSelection -traceConf of +traceConf of TracingVerbosity NormalVerbosity -> Tracer IO String -> String -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO String -tracer String +tracer String "tracing verbosity = normal verbosity " TracingVerbosity MinimalVerbosity -> Tracer IO String -> String -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO String -tracer String +tracer String "tracing verbosity = minimal verbosity " TracingVerbosity MaximalVerbosity -> Tracer IO String -> String -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO String -tracer String +tracer String "tracing verbosity = maximal verbosity " -- | Add the application name and unqualified hostname to the logging @@ -447,13 +447,13 @@ :: LoggingLayer -> IO (Trace IO Text) setupTrace :: LoggingLayer -> IO (Trace IO Text) -setupTrace LoggingLayer -loggingLayer = do - Text -hn <- IO Text -> (String -> IO Text) -> Maybe String -> IO Text +setupTrace LoggingLayer +loggingLayer = do + Text +hn <- IO Text -> (String -> IO Text) -> Maybe String -> IO Text forall b a. b -> (a -> b) -> Maybe a -> b maybe IO Text -hostname (Text -> IO Text +hostname (Text -> IO Text forall (f :: * -> *) a. Applicative f => a -> f a pure (Text -> IO Text) -> (String -> Text) -> String -> IO Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). @@ -474,22 +474,22 @@ Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a setHostname Text -hn (Trace IO Text -> Trace IO Text) -> Trace IO Text -> Trace IO Text +hn (Trace IO Text -> Trace IO Text) -> Trace IO Text -> Trace IO Text forall a b. (a -> b) -> a -> b $ LoggingLayer -> Text -> Trace IO Text -> Trace IO Text LoggingLayer -> forall (m :: * -> *) a. Show a => Text -> Trace m a -> Trace m a llAppendName LoggingLayer -loggingLayer Text +loggingLayer Text "node" (LoggingLayer -> forall (m :: * -> *). MonadIO m => Trace m Text llBasicTrace LoggingLayer -loggingLayer) +loggingLayer) where - hostname :: IO Text -hostname = do - Text -hn0 <- String -> Text + hostname :: IO Text +hostname = do + Text +hn0 <- String -> Text pack (String -> Text) -> IO String -> IO Text forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> IO String @@ -509,16 +509,16 @@ $ Text -> Text -> (Text, Text) breakOn Text "." Text -hn0 +hn0 -handlePeersListSimple +handlePeersListSimple :: Trace IO Text - -> NodeKernelData blk + -> NodeKernelData blk -> IO () handlePeersListSimple :: Trace IO Text -> NodeKernelData blk -> IO () -handlePeersListSimple Trace IO Text -tr NodeKernelData blk -nodeKern = IO () -> IO () +handlePeersListSimple Trace IO Text +tr NodeKernelData blk +nodeKern = IO () -> IO () forall (f :: * -> *) a b. Applicative f => f a -> f b forever (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b @@ -526,12 +526,12 @@ NodeKernelData blk -> IO [Peer blk] forall blk. NodeKernelData blk -> IO [Peer blk] getCurrentPeers NodeKernelData blk -nodeKern IO [Peer blk] -> ([Peer blk] -> IO ()) -> IO () +nodeKern IO [Peer blk] -> ([Peer blk] -> IO ()) -> IO () forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b >>= Trace IO Text -> [Peer blk] -> IO () forall blk. Trace IO Text -> [Peer blk] -> IO () tracePeers Trace IO Text -tr +tr Int -> IO () threadDelay Int 2000000 -- 2 seconds. @@ -541,16 +541,16 @@ -- create a new block. handleSimpleNode - :: forall blk - . ( RunNode blk - , Protocol.Protocol IO blk + :: forall blk + . ( RunNode blk + , Protocol.Protocol IO blk ) => SomeConsensusProtocol - -> Protocol.ProtocolInfoArgs IO blk + -> Protocol.ProtocolInfoArgs IO blk -> Trace IO Text - -> Tracers RemoteConnectionId LocalConnectionId blk + -> Tracers RemoteConnectionId LocalConnectionId blk -> NodeConfiguration - -> (NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO ()) + -> (NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO ()) -- ^ Called on the 'NodeKernel' after creating it, but before the network -- layer is initialised. This implies this function must not block, -- otherwise the node won't actually start. @@ -563,15 +563,15 @@ -> (NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO ()) -> IO () -handleSimpleNode SomeConsensusProtocol -scp ProtocolInfoArgs IO blk -runP Trace IO Text -trace Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers NodeConfiguration -nc NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO () -onKernel = do - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta +handleSimpleNode SomeConsensusProtocol +scp ProtocolInfoArgs IO blk +runP Trace IO Text +trace Tracers RemoteConnectionId LocalConnectionId blk +nodeTracers NodeConfiguration +nc NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO () +onKernel = do + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -579,37 +579,37 @@ Notice PrivacyAnnotation Public - let pInfo :: ProtocolInfo IO blk -pInfo = ProtocolInfoArgs IO blk -> ProtocolInfo IO blk + let pInfo :: ProtocolInfo IO blk +pInfo = ProtocolInfoArgs IO blk -> ProtocolInfo IO blk forall (m :: * -> *) blk. Protocol m blk => ProtocolInfoArgs m blk -> ProtocolInfo m blk Protocol.protocolInfo ProtocolInfoArgs IO blk -runP - tracer :: Tracer IO Text -tracer = Trace IO Text -> Tracer IO Text +runP + tracer :: Tracer IO Text +tracer = Trace IO Text -> Tracer IO Text forall (m :: * -> *) a b. (ToLogObject m, ToObject a, Transformable a m b) => Trace m a -> Tracer m b toLogObject Trace IO Text -trace +trace NodeConfiguration -> Trace IO Text -> Tracer IO Text -> IO () -createTracers NodeConfiguration -nc Trace IO Text -trace Tracer IO Text -tracer +createTracers NodeConfiguration +nc Trace IO Text +trace Tracer IO Text +tracer - (Maybe (SocketOrSocketInfo Socket AddrInfo) -publicIPv4SocketOrAddr, Maybe (SocketOrSocketInfo Socket AddrInfo) -publicIPv6SocketOrAddr, Maybe (SocketOrSocketInfo Socket SocketPath) -localSocketOrPath) <- do - Either + (Maybe (SocketOrSocketInfo Socket AddrInfo) +publicIPv4SocketOrAddr, Maybe (SocketOrSocketInfo Socket AddrInfo) +publicIPv6SocketOrAddr, Maybe (SocketOrSocketInfo Socket SocketPath) +localSocketOrPath) <- do + Either SocketConfigError (Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket SocketPath)) -result <- ExceptT +result <- ExceptT SocketConfigError IO (Maybe (SocketOrSocketInfo Socket AddrInfo), @@ -630,17 +630,17 @@ Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket SocketPath)) gatherConfiguredSockets NodeConfiguration -nc) +nc) case Either SocketConfigError (Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket SocketPath)) -result of - Right (Maybe (SocketOrSocketInfo Socket AddrInfo), +result of + Right (Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket SocketPath)) -triplet -> (Maybe (SocketOrSocketInfo Socket AddrInfo), +triplet -> (Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket SocketPath)) -> IO @@ -651,9 +651,9 @@ return (Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket AddrInfo), Maybe (SocketOrSocketInfo Socket SocketPath)) -triplet - Left SocketConfigError -error -> do +triplet + Left SocketConfigError +error -> do Trace IO Text -> (LOMeta, LOContent Text) -> IO () forall (m :: * -> *) a. MonadIO m => @@ -663,14 +663,14 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "error" Trace IO Text -trace) +trace) (LOMeta -meta, Text -> LOContent Text +meta, Text -> LOContent Text forall a. a -> LOContent a LogMessage (String -> Text Text.pack (SocketConfigError -> String renderSocketConfigError SocketConfigError -error))) +error))) SocketConfigError -> IO (Maybe (SocketOrSocketInfo Socket AddrInfo), @@ -678,25 +678,25 @@ Maybe (SocketOrSocketInfo Socket SocketPath)) forall (m :: * -> *) e a. (MonadIO m, Exception e) => e -> m a throwIO SocketConfigError -error +error - String -dbPath <- NodeConfiguration -> IO String + String +dbPath <- NodeConfiguration -> IO String canonDbPath NodeConfiguration -nc +nc - Either Text NetworkTopology -eitherTopology <- NodeConfiguration -> IO (Either Text NetworkTopology) + Either Text NetworkTopology +eitherTopology <- NodeConfiguration -> IO (Either Text NetworkTopology) readTopologyFile NodeConfiguration -nc - NetworkTopology -nt <- (Text -> IO NetworkTopology) +nc + NetworkTopology +nt <- (Text -> IO NetworkTopology) -> (NetworkTopology -> IO NetworkTopology) -> Either Text NetworkTopology -> IO NetworkTopology forall a c b. (a -> c) -> (b -> c) -> Either a b -> c -either (\Text -err -> Text -> IO NetworkTopology +either (\Text +err -> Text -> IO NetworkTopology forall a. HasCallStack => Text -> a panic (Text -> IO NetworkTopology) -> Text -> IO NetworkTopology forall a b. (a -> b) -> a -> b @@ -704,27 +704,27 @@ "Cardano.Node.Run.handleSimpleNode.readTopologyFile: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text -err) NetworkTopology -> IO NetworkTopology +err) NetworkTopology -> IO NetworkTopology forall (f :: * -> *) a. Applicative f => a -> f a pure Either Text NetworkTopology -eitherTopology +eitherTopology - let diffusionTracers :: DiffusionTracers - diffusionTracers :: DiffusionTracers -diffusionTracers = Tracers RemoteConnectionId LocalConnectionId blk + let diffusionTracers :: DiffusionTracers + diffusionTracers :: DiffusionTracers +diffusionTracers = Tracers RemoteConnectionId LocalConnectionId blk -> DiffusionTracers -createDiffusionTracers Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers +createDiffusionTracers Tracers RemoteConnectionId LocalConnectionId blk +nodeTracers - ([NodeIPAddress] -ipProducerAddrs, [(NodeDnsAddress, Int)] -dnsProducerAddrs) = NetworkTopology -> ([NodeIPAddress], [(NodeDnsAddress, Int)]) + ([NodeIPAddress] +ipProducerAddrs, [(NodeDnsAddress, Int)] +dnsProducerAddrs) = NetworkTopology -> ([NodeIPAddress], [(NodeDnsAddress, Int)]) producerAddresses NetworkTopology -nt +nt - dnsProducers :: [DnsSubscriptionTarget] - dnsProducers :: [DnsSubscriptionTarget] -dnsProducers = (NodeDnsAddress -> Int -> DnsSubscriptionTarget) + dnsProducers :: [DnsSubscriptionTarget] + dnsProducers :: [DnsSubscriptionTarget] +dnsProducers = (NodeDnsAddress -> Int -> DnsSubscriptionTarget) -> (NodeDnsAddress, Int) -> DnsSubscriptionTarget forall a b c. (a -> b -> c) -> (a, b) -> c uncurry NodeDnsAddress -> Int -> DnsSubscriptionTarget @@ -732,17 +732,17 @@ -> [(NodeDnsAddress, Int)] -> [DnsSubscriptionTarget] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b `map` [(NodeDnsAddress, Int)] -dnsProducerAddrs +dnsProducerAddrs - ipProducers :: IPSubscriptionTarget - ipProducers :: IPSubscriptionTarget -ipProducers = [NodeIPAddress] -> IPSubscriptionTarget + ipProducers :: IPSubscriptionTarget + ipProducers :: IPSubscriptionTarget +ipProducers = [NodeIPAddress] -> IPSubscriptionTarget ipSubscriptionTargets [NodeIPAddress] -ipProducerAddrs +ipProducerAddrs - diffusionArguments :: DiffusionArguments - diffusionArguments :: DiffusionArguments -diffusionArguments = + diffusionArguments :: DiffusionArguments + diffusionArguments :: DiffusionArguments +diffusionArguments = Maybe (SocketOrSocketInfo Socket AddrInfo) -> Maybe (SocketOrSocketInfo Socket AddrInfo) -> Maybe (SocketOrSocketInfo Socket SocketPath) @@ -752,21 +752,21 @@ -> DiffusionArguments createDiffusionArguments Maybe (SocketOrSocketInfo Socket AddrInfo) -publicIPv4SocketOrAddr +publicIPv4SocketOrAddr Maybe (SocketOrSocketInfo Socket AddrInfo) -publicIPv6SocketOrAddr +publicIPv6SocketOrAddr Maybe (SocketOrSocketInfo Socket SocketPath) -localSocketOrPath +localSocketOrPath (NodeConfiguration -> DiffusionMode ncDiffusionMode NodeConfiguration -nc) +nc) IPSubscriptionTarget -ipProducers +ipProducers [DnsSubscriptionTarget] -dnsProducers +dnsProducers - Maybe (SocketOrSocketInfo SockAddr SockAddr) -ipv4 <- (SocketOrSocketInfo Socket AddrInfo + Maybe (SocketOrSocketInfo SockAddr SockAddr) +ipv4 <- (SocketOrSocketInfo Socket AddrInfo -> IO (SocketOrSocketInfo SockAddr SockAddr)) -> Maybe (SocketOrSocketInfo Socket AddrInfo) -> IO (Maybe (SocketOrSocketInfo SockAddr SockAddr)) @@ -776,9 +776,9 @@ traverse SocketOrSocketInfo Socket AddrInfo -> IO (SocketOrSocketInfo SockAddr SockAddr) getSocketOrSocketInfoAddr Maybe (SocketOrSocketInfo Socket AddrInfo) -publicIPv4SocketOrAddr - Maybe (SocketOrSocketInfo SockAddr SockAddr) -ipv6 <- (SocketOrSocketInfo Socket AddrInfo +publicIPv4SocketOrAddr + Maybe (SocketOrSocketInfo SockAddr SockAddr) +ipv6 <- (SocketOrSocketInfo Socket AddrInfo -> IO (SocketOrSocketInfo SockAddr SockAddr)) -> Maybe (SocketOrSocketInfo Socket AddrInfo) -> IO (Maybe (SocketOrSocketInfo SockAddr SockAddr)) @@ -788,7 +788,7 @@ traverse SocketOrSocketInfo Socket AddrInfo -> IO (SocketOrSocketInfo SockAddr SockAddr) getSocketOrSocketInfoAddr Maybe (SocketOrSocketInfo Socket AddrInfo) -publicIPv6SocketOrAddr +publicIPv6SocketOrAddr Trace IO Text -> (LOMeta, LOContent Text) -> IO () forall (m :: * -> *) a. @@ -799,9 +799,9 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "addresses" Trace IO Text -trace) +trace) (LOMeta -meta, Text -> LOContent Text +meta, Text -> LOContent Text forall a. a -> LOContent a LogMessage (Text -> LOContent Text) -> ([SocketOrSocketInfo SockAddr SockAddr] -> Text) @@ -827,8 +827,8 @@ -> [SocketOrSocketInfo SockAddr SockAddr] forall a. [Maybe a] -> [a] catMaybes [Maybe (SocketOrSocketInfo SockAddr SockAddr) -ipv4, Maybe (SocketOrSocketInfo SockAddr SockAddr) -ipv6]) +ipv4, Maybe (SocketOrSocketInfo SockAddr SockAddr) +ipv6]) Trace IO Text -> (LOMeta, LOContent Text) -> IO () forall (m :: * -> *) a. MonadIO m => @@ -838,9 +838,9 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "diffusion-mode" Trace IO Text -trace) +trace) (LOMeta -meta, Text -> LOContent Text +meta, Text -> LOContent Text forall a. a -> LOContent a LogMessage (Text -> LOContent Text) -> (NodeConfiguration -> Text) @@ -869,7 +869,7 @@ -> NodeConfiguration -> LOContent Text forall a b. (a -> b) -> a -> b $ NodeConfiguration -nc) +nc) Trace IO Text -> (LOMeta, LOContent Text) -> IO () forall (m :: * -> *) a. MonadIO m => @@ -879,9 +879,9 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "dns-producers" Trace IO Text -trace) +trace) (LOMeta -meta, Text -> LOContent Text +meta, Text -> LOContent Text forall a. a -> LOContent a LogMessage (Text -> LOContent Text) -> ([DnsSubscriptionTarget] -> Text) @@ -904,7 +904,7 @@ -> [DnsSubscriptionTarget] -> LOContent Text forall a b. (a -> b) -> a -> b $ [DnsSubscriptionTarget] -dnsProducers) +dnsProducers) Trace IO Text -> (LOMeta, LOContent Text) -> IO () forall (m :: * -> *) a. MonadIO m => @@ -914,9 +914,9 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "ip-producers" Trace IO Text -trace) +trace) (LOMeta -meta, Text -> LOContent Text +meta, Text -> LOContent Text forall a. a -> LOContent a LogMessage (Text -> LOContent Text) -> (IPSubscriptionTarget -> Text) @@ -937,17 +937,17 @@ -> IPSubscriptionTarget -> LOContent Text forall a b. (a -> b) -> a -> b $ IPSubscriptionTarget -ipProducers) +ipProducers) NodeConfiguration -> Trace IO Text -> (ShutdownFDs -> IO ()) -> IO () withShutdownHandling NodeConfiguration -nc Trace IO Text -trace ((ShutdownFDs -> IO ()) -> IO ()) +nc Trace IO Text +trace ((ShutdownFDs -> IO ()) -> IO ()) -> (ShutdownFDs -> IO ()) -> IO () forall a b. (a -> b) -> a -> b -$ \ShutdownFDs -sfds -> +$ \ShutdownFDs +sfds -> RunNodeArgs IO SockAddr LocalAddress blk -> StdRunNodeArgs IO blk -> IO () forall blk. @@ -971,7 +971,7 @@ forall peer localPeer blk. Tracers peer localPeer blk -> Tracers IO peer localPeer blk consensusTracers Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers +nodeTracers , rnTraceNTN :: Tracers IO RemoteConnectionId blk DeserialiseFailure rnTraceNTN = Tracers RemoteConnectionId LocalConnectionId blk -> Tracers IO RemoteConnectionId blk DeserialiseFailure @@ -979,7 +979,7 @@ Tracers peer localPeer blk -> Tracers IO peer blk DeserialiseFailure nodeToNodeTracers Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers +nodeTracers , rnTraceNTC :: Tracers IO LocalConnectionId blk DeserialiseFailure rnTraceNTC = Tracers RemoteConnectionId LocalConnectionId blk -> Tracers IO LocalConnectionId blk DeserialiseFailure @@ -987,15 +987,15 @@ Tracers peer localPeer blk -> Tracers IO localPeer blk DeserialiseFailure nodeToClientTracers Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers +nodeTracers , rnProtocolInfo :: ProtocolInfo IO blk rnProtocolInfo = ProtocolInfo IO blk -pInfo +pInfo , rnNodeKernelHook :: ResourceRegistry IO -> NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO () -rnNodeKernelHook = \ResourceRegistry IO -registry NodeKernel IO RemoteConnectionId LocalConnectionId blk -nodeKernel -> do +rnNodeKernelHook = \ResourceRegistry IO +registry NodeKernel IO RemoteConnectionId LocalConnectionId blk +nodeKernel -> do NodeConfiguration -> ShutdownFDs -> Trace IO Text @@ -1010,19 +1010,19 @@ -> ChainDB IO blk -> IO () maybeSpawnOnSlotSyncedShutdownHandler NodeConfiguration -nc ShutdownFDs -sfds Trace IO Text -trace ResourceRegistry IO -registry +nc ShutdownFDs +sfds Trace IO Text +trace ResourceRegistry IO +registry (NodeKernel IO RemoteConnectionId LocalConnectionId blk -> ChainDB IO blk forall (m :: * -> *) remotePeer localPeer blk. NodeKernel m remotePeer localPeer blk -> ChainDB m blk Node.getChainDB NodeKernel IO RemoteConnectionId LocalConnectionId blk -nodeKernel) +nodeKernel) NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO () -onKernel NodeKernel IO RemoteConnectionId LocalConnectionId blk -nodeKernel +onKernel NodeKernel IO RemoteConnectionId LocalConnectionId blk +nodeKernel } StdRunNodeArgs :: forall (m :: * -> *) blk. Maybe Word @@ -1043,7 +1043,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> NodeConfiguration -> Maybe MaxConcurrencyBulkSync ncMaxConcurrencyBulkSync NodeConfiguration -nc +nc , srnBfcMaxConcurrencyDeadline :: Maybe Word srnBfcMaxConcurrencyDeadline = MaxConcurrencyDeadline -> Word unMaxConcurrencyDeadline (MaxConcurrencyDeadline -> Word) @@ -1051,43 +1051,43 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> NodeConfiguration -> Maybe MaxConcurrencyDeadline ncMaxConcurrencyDeadline NodeConfiguration -nc +nc , srnChainDbValidateOverride :: Bool srnChainDbValidateOverride = NodeConfiguration -> Bool ncValidateDB NodeConfiguration -nc +nc , srnSnapshotInterval :: SnapshotInterval srnSnapshotInterval = NodeConfiguration -> SnapshotInterval ncSnapshotInterval NodeConfiguration -nc +nc , srnDatabasePath :: String srnDatabasePath = String -dbPath +dbPath , srnDiffusionArguments :: DiffusionArguments srnDiffusionArguments = DiffusionArguments -diffusionArguments +diffusionArguments , srnDiffusionTracers :: DiffusionTracers srnDiffusionTracers = DiffusionTracers -diffusionTracers +diffusionTracers , srnEnableInDevelopmentVersions :: Bool srnEnableInDevelopmentVersions = NodeConfiguration -> Bool ncTestEnableDevelopmentNetworkProtocols NodeConfiguration -nc +nc , srnTraceChainDB :: Tracer IO (TraceEvent blk) srnTraceChainDB = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO (TraceEvent blk) forall peer localPeer blk. Tracers peer localPeer blk -> Tracer IO (TraceEvent blk) chainDBTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers +nodeTracers } where - createDiffusionTracers :: Tracers RemoteConnectionId LocalConnectionId blk + createDiffusionTracers :: Tracers RemoteConnectionId LocalConnectionId blk -> DiffusionTracers - createDiffusionTracers :: Tracers RemoteConnectionId LocalConnectionId blk + createDiffusionTracers :: Tracers RemoteConnectionId LocalConnectionId blk -> DiffusionTracers -createDiffusionTracers Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' = DiffusionTracers :: Tracer IO (WithIPList (SubscriptionTrace SockAddr)) +createDiffusionTracers Tracers RemoteConnectionId LocalConnectionId blk +nodeTracers' = DiffusionTracers :: Tracer IO (WithIPList (SubscriptionTrace SockAddr)) -> Tracer IO (WithDomainName (SubscriptionTrace SockAddr)) -> Tracer IO (WithDomainName DnsTrace) -> Tracer IO (WithMuxBearer RemoteConnectionId MuxTrace) @@ -1108,7 +1108,7 @@ Tracers peer localPeer blk -> Tracer IO (WithIPList (SubscriptionTrace SockAddr)) ipSubscriptionTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtDnsSubscriptionTracer :: Tracer IO (WithDomainName (SubscriptionTrace SockAddr)) dtDnsSubscriptionTracer = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO (WithDomainName (SubscriptionTrace SockAddr)) @@ -1116,14 +1116,14 @@ Tracers peer localPeer blk -> Tracer IO (WithDomainName (SubscriptionTrace SockAddr)) dnsSubscriptionTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtDnsResolverTracer :: Tracer IO (WithDomainName DnsTrace) dtDnsResolverTracer = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO (WithDomainName DnsTrace) forall peer localPeer blk. Tracers peer localPeer blk -> Tracer IO (WithDomainName DnsTrace) dnsResolverTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtErrorPolicyTracer :: Tracer IO (WithAddr SockAddr ErrorPolicyTrace) dtErrorPolicyTracer = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO (WithAddr SockAddr ErrorPolicyTrace) @@ -1131,7 +1131,7 @@ Tracers peer localPeer blk -> Tracer IO (WithAddr SockAddr ErrorPolicyTrace) errorPolicyTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtLocalErrorPolicyTracer :: Tracer IO (WithAddr LocalAddress ErrorPolicyTrace) dtLocalErrorPolicyTracer = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO (WithAddr LocalAddress ErrorPolicyTrace) @@ -1139,7 +1139,7 @@ Tracers peer localPeer blk -> Tracer IO (WithAddr LocalAddress ErrorPolicyTrace) localErrorPolicyTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtAcceptPolicyTracer :: Tracer IO AcceptConnectionsPolicyTrace dtAcceptPolicyTracer = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO AcceptConnectionsPolicyTrace @@ -1147,7 +1147,7 @@ Tracers peer localPeer blk -> Tracer IO AcceptConnectionsPolicyTrace acceptPolicyTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtMuxTracer :: Tracer IO (WithMuxBearer RemoteConnectionId MuxTrace) dtMuxTracer = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO (WithMuxBearer RemoteConnectionId MuxTrace) @@ -1155,7 +1155,7 @@ Tracers peer localPeer blk -> Tracer IO (WithMuxBearer peer MuxTrace) muxTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtMuxLocalTracer :: Tracer IO (WithMuxBearer LocalConnectionId MuxTrace) dtMuxLocalTracer = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO (WithMuxBearer LocalConnectionId MuxTrace) @@ -1163,21 +1163,21 @@ Tracers peer localPeer blk -> Tracer IO (WithMuxBearer localPeer MuxTrace) muxLocalTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtHandshakeTracer :: Tracer IO HandshakeTr dtHandshakeTracer = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO HandshakeTr forall peer localPeer blk. Tracers peer localPeer blk -> Tracer IO HandshakeTr handshakeTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtHandshakeLocalTracer :: Tracer IO HandshakeTr dtHandshakeLocalTracer = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO HandshakeTr forall peer localPeer blk. Tracers peer localPeer blk -> Tracer IO HandshakeTr localHandshakeTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtDiffusionInitializationTracer :: Tracer IO DiffusionInitializationTracer dtDiffusionInitializationTracer = Tracers RemoteConnectionId LocalConnectionId blk -> Tracer IO DiffusionInitializationTracer @@ -1185,37 +1185,37 @@ Tracers peer localPeer blk -> Tracer IO DiffusionInitializationTracer diffusionInitializationTracer Tracers RemoteConnectionId LocalConnectionId blk -nodeTracers' +nodeTracers' , dtLedgerPeersTracer :: Tracer IO TraceLedgerPeers dtLedgerPeersTracer = Tracer IO TraceLedgerPeers forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer -- TODO network team } - createTracers + createTracers :: NodeConfiguration -> Trace IO Text -> Tracer IO Text -> IO () - createTracers :: NodeConfiguration -> Trace IO Text -> Tracer IO Text -> IO () -createTracers NodeConfiguration { Bool + createTracers :: NodeConfiguration -> Trace IO Text -> Tracer IO Text -> IO () +createTracers NodeConfiguration { Bool ncValidateDB :: Bool ncValidateDB :: NodeConfiguration -> Bool -ncValidateDB } - Trace IO Text -tr Tracer IO Text -tracer = do +ncValidateDB } + Trace IO Text +tr Tracer IO Text +tracer = do let ProtocolInfo{ pInfoConfig :: forall (m :: * -> *) b. ProtocolInfo m b -> TopLevelConfig b -pInfoConfig = TopLevelConfig blk -cfg } = ProtocolInfoArgs IO blk -> ProtocolInfo IO blk +pInfoConfig = TopLevelConfig blk +cfg } = ProtocolInfoArgs IO blk -> ProtocolInfo IO blk forall (m :: * -> *) blk. Protocol m blk => ProtocolInfoArgs m blk -> ProtocolInfo m blk Protocol.protocolInfo ProtocolInfoArgs IO blk -runP +runP - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -1230,9 +1230,9 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "networkMagic" Trace IO Text -tr) +tr) (LOMeta -meta, Text -> LOContent Text +meta, Text -> LOContent Text forall a. a -> LOContent a LogMessage (Text "NetworkMagic " Text -> Text -> Text @@ -1254,60 +1254,60 @@ $ TopLevelConfig blk -> BlockConfig blk forall blk. TopLevelConfig blk -> BlockConfig blk Consensus.configBlock TopLevelConfig blk -cfg))) +cfg))) - UTCTime -startTime <- IO UTCTime + UTCTime +startTime <- IO UTCTime getCurrentTime Trace IO Text -> [LogObject Text] -> IO () -traceNodeBasicInfo Trace IO Text -tr ([LogObject Text] -> IO ()) -> IO [LogObject Text] -> IO () +traceNodeBasicInfo Trace IO Text +tr ([LogObject Text] -> IO ()) -> IO [LogObject Text] -> IO () forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< NodeConfiguration -> SomeConsensusProtocol -> UTCTime -> IO [LogObject Text] nodeBasicInfo NodeConfiguration -nc SomeConsensusProtocol -scp UTCTime -startTime +nc SomeConsensusProtocol +scp UTCTime +startTime Text -> Trace IO Text -> Int -> IO () traceCounter Text "nodeStartTime" Trace IO Text -tr (POSIXTime -> Int +tr (POSIXTime -> Int forall a b. (RealFrac a, Integral b) => a -> b ceiling (POSIXTime -> Int) -> POSIXTime -> Int forall a b. (a -> b) -> a -> b $ UTCTime -> POSIXTime utcTimeToPOSIXSeconds UTCTime -startTime) +startTime) Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when Bool -ncValidateDB (IO () -> IO ()) -> IO () -> IO () +ncValidateDB (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ Tracer IO Text -> Text -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO Text -tracer Text +tracer Text "Performing DB validation" - traceNodeBasicInfo :: Trace IO Text -> [LogObject Text] -> IO () - traceNodeBasicInfo :: Trace IO Text -> [LogObject Text] -> IO () -traceNodeBasicInfo Trace IO Text -tr [LogObject Text] -basicInfoItems = + traceNodeBasicInfo :: Trace IO Text -> [LogObject Text] -> IO () + traceNodeBasicInfo :: Trace IO Text -> [LogObject Text] -> IO () +traceNodeBasicInfo Trace IO Text +tr [LogObject Text] +basicInfoItems = [LogObject Text] -> (LogObject Text -> IO ()) -> IO () forall (t :: * -> *) (m :: * -> *) a b. (Foldable t, Monad m) => t a -> (a -> m b) -> m () forM_ [LogObject Text] -basicInfoItems ((LogObject Text -> IO ()) -> IO ()) +basicInfoItems ((LogObject Text -> IO ()) -> IO ()) -> (LogObject Text -> IO ()) -> IO () forall a b. (a -> b) -> a -> b -$ \(LogObject Text -nm LOMeta -mt LOContent Text -content) -> +$ \(LogObject Text +nm LOMeta +mt LOContent Text +content) -> Trace IO Text -> (LOMeta, LOContent Text) -> IO () forall (m :: * -> *) a. MonadIO m => @@ -1315,10 +1315,10 @@ traceNamedObject (Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text -nm Trace IO Text -tr) (LOMeta -mt, LOContent Text -content) +nm Trace IO Text +tr) (LOMeta +mt, LOContent Text +content) -------------------------------------------------------------------------------- -- Helper functions @@ -1327,23 +1327,23 @@ canonDbPath :: NodeConfiguration -> IO FilePath canonDbPath :: NodeConfiguration -> IO String canonDbPath NodeConfiguration{ncDatabaseFile :: NodeConfiguration -> DbFile -ncDatabaseFile = DbFile String -dbFp} = do - String -fp <- String -> IO String +ncDatabaseFile = DbFile String +dbFp} = do + String +fp <- String -> IO String canonicalizePath (String -> IO String) -> IO String -> IO String forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< String -> IO String makeAbsolute String -dbFp +dbFp Bool -> String -> IO () createDirectoryIfMissing Bool True String -fp +fp String -> IO String forall (m :: * -> *) a. Monad m => a -> m a return String -fp +fp -- | Make sure the VRF private key file is readable only @@ -1351,10 +1351,10 @@ checkVRFFilePermissions :: FilePath -> ExceptT VRFPrivateKeyFilePermissionError IO () #ifdef UNIX checkVRFFilePermissions :: String -> ExceptT VRFPrivateKeyFilePermissionError IO () -checkVRFFilePermissions String -vrfPrivKey = do - FileStatus -fs <- IO FileStatus +checkVRFFilePermissions String +vrfPrivKey = do + FileStatus +fs <- IO FileStatus -> ExceptT VRFPrivateKeyFilePermissionError IO FileStatus forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO FileStatus @@ -1364,19 +1364,19 @@ forall a b. (a -> b) -> a -> b $ String -> IO FileStatus getFileStatus String -vrfPrivKey - let fm :: FileMode -fm = FileStatus -> FileMode +vrfPrivKey + let fm :: FileMode +fm = FileStatus -> FileMode fileMode FileStatus -fs +fs -- Check the the VRF private key file does not give read/write/exec permissions to others. Bool -> ExceptT VRFPrivateKeyFilePermissionError IO () -> ExceptT VRFPrivateKeyFilePermissionError IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (FileMode -> Bool -hasOtherPermissions FileMode -fm) +hasOtherPermissions FileMode +fm) (VRFPrivateKeyFilePermissionError -> ExceptT VRFPrivateKeyFilePermissionError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -1387,15 +1387,15 @@ forall a b. (a -> b) -> a -> b $ String -> VRFPrivateKeyFilePermissionError OtherPermissionsExist String -vrfPrivKey) +vrfPrivKey) -- Check the the VRF private key file does not give read/write/exec permissions to any group. Bool -> ExceptT VRFPrivateKeyFilePermissionError IO () -> ExceptT VRFPrivateKeyFilePermissionError IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (FileMode -> Bool -hasGroupPermissions FileMode -fm) +hasGroupPermissions FileMode +fm) (VRFPrivateKeyFilePermissionError -> ExceptT VRFPrivateKeyFilePermissionError IO () forall (m :: * -> *) x a. Monad m => x -> ExceptT x m a @@ -1406,34 +1406,34 @@ forall a b. (a -> b) -> a -> b $ String -> VRFPrivateKeyFilePermissionError GroupPermissionsExist String -vrfPrivKey) +vrfPrivKey) where - hasPermission :: FileMode -> FileMode -> Bool - hasPermission :: FileMode -> FileMode -> Bool -hasPermission FileMode -fModeA FileMode -fModeB = FileMode -fModeA FileMode -> FileMode -> FileMode + hasPermission :: FileMode -> FileMode -> Bool + hasPermission :: FileMode -> FileMode -> Bool +hasPermission FileMode +fModeA FileMode +fModeB = FileMode +fModeA FileMode -> FileMode -> FileMode `intersectFileModes` FileMode -fModeB FileMode -> FileMode -> Bool +fModeB FileMode -> FileMode -> Bool forall a. Eq a => a -> a -> Bool /= FileMode nullFileMode - hasOtherPermissions :: FileMode -> Bool - hasOtherPermissions :: FileMode -> Bool -hasOtherPermissions FileMode -fm' = FileMode -fm' FileMode -> FileMode -> Bool -`hasPermission` FileMode + hasOtherPermissions :: FileMode -> Bool + hasOtherPermissions :: FileMode -> Bool +hasOtherPermissions FileMode +fm' = FileMode +fm' FileMode -> FileMode -> Bool +`hasPermission` FileMode otherModes - hasGroupPermissions :: FileMode -> Bool - hasGroupPermissions :: FileMode -> Bool -hasGroupPermissions FileMode -fm' = FileMode -fm' FileMode -> FileMode -> Bool -`hasPermission` FileMode + hasGroupPermissions :: FileMode -> Bool + hasGroupPermissions :: FileMode -> Bool +hasGroupPermissions FileMode +fm' = FileMode +fm' FileMode -> FileMode -> Bool +`hasPermission` FileMode groupModes #else checkVRFFilePermissions vrfPrivKey = do @@ -1471,17 +1471,17 @@ -> IPSubscriptionTarget -> [DnsSubscriptionTarget] -> DiffusionArguments -createDiffusionArguments Maybe (SocketOrSocketInfo Socket AddrInfo) -publicIPv4SocketsOrAddrs - Maybe (SocketOrSocketInfo Socket AddrInfo) -publicIPv6SocketsOrAddrs - Maybe (SocketOrSocketInfo Socket SocketPath) -mLocalSocketOrPath - DiffusionMode -diffusionMode - IPSubscriptionTarget -ipProducers [DnsSubscriptionTarget] -dnsProducers +createDiffusionArguments Maybe (SocketOrSocketInfo Socket AddrInfo) +publicIPv4SocketsOrAddrs + Maybe (SocketOrSocketInfo Socket AddrInfo) +publicIPv6SocketsOrAddrs + Maybe (SocketOrSocketInfo Socket SocketPath) +mLocalSocketOrPath + DiffusionMode +diffusionMode + IPSubscriptionTarget +ipProducers [DnsSubscriptionTarget] +dnsProducers = DiffusionArguments :: Maybe (Either Socket AddrInfo) -> Maybe (Either Socket AddrInfo) @@ -1497,24 +1497,24 @@ { daIPv4Address :: Maybe (Either Socket AddrInfo) daIPv4Address = SocketOrSocketInfo Socket AddrInfo -> Either Socket AddrInfo forall a b. SocketOrSocketInfo a b -> Either a b -eitherSocketOrSocketInfo (SocketOrSocketInfo Socket AddrInfo -> Either Socket AddrInfo) +eitherSocketOrSocketInfo (SocketOrSocketInfo Socket AddrInfo -> Either Socket AddrInfo) -> Maybe (SocketOrSocketInfo Socket AddrInfo) -> Maybe (Either Socket AddrInfo) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe (SocketOrSocketInfo Socket AddrInfo) -publicIPv4SocketsOrAddrs +publicIPv4SocketsOrAddrs , daIPv6Address :: Maybe (Either Socket AddrInfo) daIPv6Address = SocketOrSocketInfo Socket AddrInfo -> Either Socket AddrInfo forall a b. SocketOrSocketInfo a b -> Either a b -eitherSocketOrSocketInfo (SocketOrSocketInfo Socket AddrInfo -> Either Socket AddrInfo) +eitherSocketOrSocketInfo (SocketOrSocketInfo Socket AddrInfo -> Either Socket AddrInfo) -> Maybe (SocketOrSocketInfo Socket AddrInfo) -> Maybe (Either Socket AddrInfo) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Maybe (SocketOrSocketInfo Socket AddrInfo) -publicIPv6SocketsOrAddrs +publicIPv6SocketsOrAddrs , daLocalAddress :: Maybe (Either Socket String) daLocalAddress = Maybe (SocketOrSocketInfo Socket SocketPath) -mLocalSocketOrPath Maybe (SocketOrSocketInfo Socket SocketPath) +mLocalSocketOrPath Maybe (SocketOrSocketInfo Socket SocketPath) -> (SocketOrSocketInfo Socket SocketPath -> Maybe (Either Socket String)) -> Maybe (Either Socket String) @@ -1543,13 +1543,13 @@ cat b c -> cat a b -> cat a c . SocketOrSocketInfo Socket SocketPath -> Either Socket SocketPath forall a b. SocketOrSocketInfo a b -> Either a b -eitherSocketOrSocketInfo +eitherSocketOrSocketInfo , daIpProducers :: IPSubscriptionTarget daIpProducers = IPSubscriptionTarget -ipProducers +ipProducers , daDnsProducers :: [DnsSubscriptionTarget] daDnsProducers = [DnsSubscriptionTarget] -dnsProducers +dnsProducers -- TODO: these limits are arbitrary at the moment; -- issue: https://github.com/input-output-hk/ouroboros-network/issues/1836 , daAcceptedConnectionsLimit :: AcceptedConnectionsLimit @@ -1567,63 +1567,63 @@ } , daDiffusionMode :: DiffusionMode daDiffusionMode = DiffusionMode -diffusionMode +diffusionMode } where - eitherSocketOrSocketInfo :: SocketOrSocketInfo a b -> Either a b - eitherSocketOrSocketInfo :: SocketOrSocketInfo a b -> Either a b -eitherSocketOrSocketInfo (ActualSocket a -a) = a -> Either a b + eitherSocketOrSocketInfo :: SocketOrSocketInfo a b -> Either a b + eitherSocketOrSocketInfo :: SocketOrSocketInfo a b -> Either a b +eitherSocketOrSocketInfo (ActualSocket a +a) = a -> Either a b forall a b. a -> Either a b Left a -a - eitherSocketOrSocketInfo (SocketInfo b -b) = b -> Either a b +a + eitherSocketOrSocketInfo (SocketInfo b +b) = b -> Either a b forall a b. b -> Either a b Right b -b +b dnsSubscriptionTarget :: NodeDnsAddress -> Int -> DnsSubscriptionTarget dnsSubscriptionTarget :: NodeDnsAddress -> Int -> DnsSubscriptionTarget -dnsSubscriptionTarget NodeDnsAddress -na Int -valency = +dnsSubscriptionTarget NodeDnsAddress +na Int +valency = DnsSubscriptionTarget :: Domain -> PortNumber -> Int -> DnsSubscriptionTarget DnsSubscriptionTarget { dstDomain :: Domain dstDomain = NodeHostDnsAddress -> Domain nodeHostDnsAddressToDomain (NodeDnsAddress -> NodeHostDnsAddress forall addr. NodeAddress' addr -> addr naHostAddress NodeDnsAddress -na) +na) , dstPort :: PortNumber dstPort = NodeDnsAddress -> PortNumber forall addr. NodeAddress' addr -> PortNumber naPort NodeDnsAddress -na +na , dstValency :: Int dstValency = Int -valency +valency } ipSubscriptionTargets :: [NodeIPAddress] -> IPSubscriptionTarget ipSubscriptionTargets :: [NodeIPAddress] -> IPSubscriptionTarget -ipSubscriptionTargets [NodeIPAddress] -ipProdAddrs = - let ips :: [SockAddr] -ips = NodeIPAddress -> SockAddr +ipSubscriptionTargets [NodeIPAddress] +ipProdAddrs = + let ips :: [SockAddr] +ips = NodeIPAddress -> SockAddr nodeAddressToSockAddr (NodeIPAddress -> SockAddr) -> [NodeIPAddress] -> [SockAddr] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> [NodeIPAddress] -ipProdAddrs +ipProdAddrs in IPSubscriptionTarget :: [SockAddr] -> Int -> IPSubscriptionTarget IPSubscriptionTarget { ispIps :: [SockAddr] ispIps = [SockAddr] -ips +ips , ispValency :: Int ispValency = [SockAddr] -> Int forall a. HasLength a => a -> Int length [SockAddr] -ips +ips } @@ -1632,12 +1632,12 @@ -> ( [NodeIPAddress] , [(NodeDnsAddress, Int)]) producerAddresses :: NetworkTopology -> ([NodeIPAddress], [(NodeDnsAddress, Int)]) -producerAddresses NetworkTopology -nt = +producerAddresses NetworkTopology +nt = case NetworkTopology -nt of - RealNodeTopology [RemoteAddress] -producers' -> +nt of + RealNodeTopology [RemoteAddress] +producers' -> [Either NodeIPAddress (NodeDnsAddress, Int)] -> ([NodeIPAddress], [(NodeDnsAddress, Int)]) forall a b. [Either a b] -> ([a], [b]) @@ -1661,9 +1661,9 @@ -> [RemoteAddress] -> ([NodeIPAddress], [(NodeDnsAddress, Int)]) forall a b. (a -> b) -> a -> b $ [RemoteAddress] -producers' - MockNodeTopology [NodeSetup] -nodeSetup -> +producers' + MockNodeTopology [NodeSetup] +nodeSetup -> [Either NodeIPAddress (NodeDnsAddress, Int)] -> ([NodeIPAddress], [(NodeDnsAddress, Int)]) forall a b. [Either a b] -> ([a], [b]) @@ -1697,5 +1697,5 @@ -> [NodeSetup] -> ([NodeIPAddress], [(NodeDnsAddress, Int)]) forall a b. (a -> b) -> a -> b $ [NodeSetup] -nodeSetup +nodeSetup \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.STM.html b/cardano-node/src/Cardano.Node.STM.html index f6060cd7fc6..3898799972b 100644 --- a/cardano-node/src/Cardano.Node.STM.html +++ b/cardano-node/src/Cardano.Node.STM.html @@ -14,82 +14,82 @@ import qualified Control.Concurrent.STM as STM -- | Mutate the contents of a TVar and return the new value of the TVar (non-strict). -modifyReadTVar :: STM.TVar a -> (a -> a) -> STM.STM a +modifyReadTVar :: STM.TVar a -> (a -> a) -> STM.STM a modifyReadTVar :: TVar a -> (a -> a) -> STM a -modifyReadTVar TVar a -tv a -> a -f = do - a -old <- TVar a -> STM a +modifyReadTVar TVar a +tv a -> a +f = do + a +old <- TVar a -> STM a forall a. TVar a -> STM a STM.readTVar TVar a -tv - let new :: a -new = a -> a -f a -old +tv + let new :: a +new = a -> a +f a +old TVar a -> a -> STM () forall a. TVar a -> a -> STM () STM.writeTVar TVar a -tv a -new +tv a +new a -> STM a forall (m :: * -> *) a. Monad m => a -> m a return a -new +new -- | Mutate the contents of a TVar and return the new value of the TVar (strict). -modifyReadTVar' :: STM.TVar a -> (a -> a) -> STM.STM a +modifyReadTVar' :: STM.TVar a -> (a -> a) -> STM.STM a modifyReadTVar' :: TVar a -> (a -> a) -> STM a -modifyReadTVar' TVar a -tv a -> a -f = do - a -old <- TVar a -> STM a +modifyReadTVar' TVar a +tv a -> a +f = do + a +old <- TVar a -> STM a forall a. TVar a -> STM a STM.readTVar TVar a -tv - let !new :: a -new = a -> a -f a -old +tv + let !new :: a +new = a -> a +f a +old TVar a -> a -> STM () forall a. TVar a -> a -> STM () STM.writeTVar TVar a -tv a -new +tv a +new a -> STM a forall (m :: * -> *) a. Monad m => a -> m a return a -new +new -- | Mutate the contents of a TVar and return the new value of the TVar (non-strict). -modifyReadTVarIO :: STM.TVar a -> (a -> a) -> IO a +modifyReadTVarIO :: STM.TVar a -> (a -> a) -> IO a modifyReadTVarIO :: TVar a -> (a -> a) -> IO a -modifyReadTVarIO TVar a -tv a -> a -f = STM a -> IO a +modifyReadTVarIO TVar a +tv a -> a +f = STM a -> IO a forall a. STM a -> IO a STM.atomically (STM a -> IO a) -> STM a -> IO a forall a b. (a -> b) -> a -> b $ TVar a -> (a -> a) -> STM a forall a. TVar a -> (a -> a) -> STM a modifyReadTVar TVar a -tv a -> a -f +tv a -> a +f -- | Mutate the contents of a TVar and return the new value of the TVar (strict). -modifyReadTVarIO' :: STM.TVar a -> (a -> a) -> IO a +modifyReadTVarIO' :: STM.TVar a -> (a -> a) -> IO a modifyReadTVarIO' :: TVar a -> (a -> a) -> IO a -modifyReadTVarIO' TVar a -tv a -> a -f = STM a -> IO a +modifyReadTVarIO' TVar a +tv a -> a +f = STM a -> IO a forall a. STM a -> IO a STM.atomically (STM a -> IO a) -> STM a -> IO a forall a b. (a -> b) -> a -> b $ TVar a -> (a -> a) -> STM a forall a. TVar a -> (a -> a) -> STM a modifyReadTVar' TVar a -tv a -> a -f +tv a -> a +f \ No newline at end of file diff --git a/cardano-node/src/Cardano.Node.Types.html b/cardano-node/src/Cardano.Node.Types.html index 1e09513993b..7843ec11509 100644 --- a/cardano-node/src/Cardano.Node.Types.html +++ b/cardano-node/src/Cardano.Node.Types.html @@ -73,7 +73,7 @@ -- | Errors for the cardano-config module. newtype ConfigError = ConfigErrorFileNotFound FilePath - deriving Int -> ConfigError -> ShowS + deriving Int -> ConfigError -> ShowS [ConfigError] -> ShowS ConfigError -> String (Int -> ConfigError -> ShowS) @@ -96,7 +96,7 @@ newtype ConfigYamlFilePath = ConfigYamlFilePath { ConfigYamlFilePath -> String unConfigPath :: FilePath } - deriving newtype (ConfigYamlFilePath -> ConfigYamlFilePath -> Bool + deriving newtype (ConfigYamlFilePath -> ConfigYamlFilePath -> Bool (ConfigYamlFilePath -> ConfigYamlFilePath -> Bool) -> (ConfigYamlFilePath -> ConfigYamlFilePath -> Bool) -> Eq ConfigYamlFilePath @@ -105,7 +105,7 @@ $c/= :: ConfigYamlFilePath -> ConfigYamlFilePath -> Bool == :: ConfigYamlFilePath -> ConfigYamlFilePath -> Bool $c== :: ConfigYamlFilePath -> ConfigYamlFilePath -> Bool -Eq, Int -> ConfigYamlFilePath -> ShowS +Eq, Int -> ConfigYamlFilePath -> ShowS [ConfigYamlFilePath] -> ShowS ConfigYamlFilePath -> String (Int -> ConfigYamlFilePath -> ShowS) @@ -125,7 +125,7 @@ newtype DbFile = DbFile { DbFile -> String unDB :: FilePath } - deriving newtype (DbFile -> DbFile -> Bool + deriving newtype (DbFile -> DbFile -> Bool (DbFile -> DbFile -> Bool) -> (DbFile -> DbFile -> Bool) -> Eq DbFile forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -133,7 +133,7 @@ $c/= :: DbFile -> DbFile -> Bool == :: DbFile -> DbFile -> Bool $c== :: DbFile -> DbFile -> Bool -Eq, Int -> DbFile -> ShowS +Eq, Int -> DbFile -> ShowS [DbFile] -> ShowS DbFile -> String (Int -> DbFile -> ShowS) @@ -151,7 +151,7 @@ newtype GenesisFile = GenesisFile { GenesisFile -> String unGenesisFile :: FilePath } - deriving stock (GenesisFile -> GenesisFile -> Bool + deriving stock (GenesisFile -> GenesisFile -> Bool (GenesisFile -> GenesisFile -> Bool) -> (GenesisFile -> GenesisFile -> Bool) -> Eq GenesisFile forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -159,7 +159,7 @@ $c/= :: GenesisFile -> GenesisFile -> Bool == :: GenesisFile -> GenesisFile -> Bool $c== :: GenesisFile -> GenesisFile -> Bool -Eq, Eq GenesisFile +Eq, Eq GenesisFile Eq GenesisFile -> (GenesisFile -> GenesisFile -> Ordering) -> (GenesisFile -> GenesisFile -> Bool) @@ -198,12 +198,12 @@ $ccompare :: GenesisFile -> GenesisFile -> Ordering $cp1Ord :: Eq GenesisFile Ord) - deriving newtype (String -> GenesisFile + deriving newtype (String -> GenesisFile (String -> GenesisFile) -> IsString GenesisFile forall a. (String -> a) -> IsString a fromString :: String -> GenesisFile $cfromString :: String -> GenesisFile -IsString, Int -> GenesisFile -> ShowS +IsString, Int -> GenesisFile -> ShowS [GenesisFile] -> ShowS GenesisFile -> String (Int -> GenesisFile -> ShowS) @@ -220,10 +220,10 @@ $cshowsPrec :: Int -> GenesisFile -> ShowS Show) -instance FromJSON GenesisFile where - parseJSON :: Value -> Parser GenesisFile -parseJSON (String Text -genFp) = GenesisFile -> Parser GenesisFile +instance FromJSON GenesisFile where + parseJSON :: Value -> Parser GenesisFile +parseJSON (String Text +genFp) = GenesisFile -> Parser GenesisFile forall (f :: * -> *) a. Applicative f => a -> f a pure (GenesisFile -> Parser GenesisFile) -> (String -> GenesisFile) -> String -> Parser GenesisFile @@ -235,9 +235,9 @@ forall a b. (a -> b) -> a -> b $ Text -> String Text.unpack Text -genFp - parseJSON Value -invalid = String -> Parser GenesisFile +genFp + parseJSON Value +invalid = String -> Parser GenesisFile forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser GenesisFile) -> String -> Parser GenesisFile forall a b. (a -> b) -> a -> b @@ -251,12 +251,12 @@ <> Value -> String forall a b. (Show a, ConvertText String b) => a -> b show Value -invalid +invalid newtype MaxConcurrencyBulkSync = MaxConcurrencyBulkSync { MaxConcurrencyBulkSync -> Word unMaxConcurrencyBulkSync :: Word } - deriving stock (MaxConcurrencyBulkSync -> MaxConcurrencyBulkSync -> Bool + deriving stock (MaxConcurrencyBulkSync -> MaxConcurrencyBulkSync -> Bool (MaxConcurrencyBulkSync -> MaxConcurrencyBulkSync -> Bool) -> (MaxConcurrencyBulkSync -> MaxConcurrencyBulkSync -> Bool) -> Eq MaxConcurrencyBulkSync @@ -265,7 +265,7 @@ $c/= :: MaxConcurrencyBulkSync -> MaxConcurrencyBulkSync -> Bool == :: MaxConcurrencyBulkSync -> MaxConcurrencyBulkSync -> Bool $c== :: MaxConcurrencyBulkSync -> MaxConcurrencyBulkSync -> Bool -Eq, Eq MaxConcurrencyBulkSync +Eq, Eq MaxConcurrencyBulkSync Eq MaxConcurrencyBulkSync -> (MaxConcurrencyBulkSync -> MaxConcurrencyBulkSync -> Ordering) -> (MaxConcurrencyBulkSync -> MaxConcurrencyBulkSync -> Bool) @@ -311,7 +311,7 @@ $ccompare :: MaxConcurrencyBulkSync -> MaxConcurrencyBulkSync -> Ordering $cp1Ord :: Eq MaxConcurrencyBulkSync Ord) - deriving newtype (Value -> Parser [MaxConcurrencyBulkSync] + deriving newtype (Value -> Parser [MaxConcurrencyBulkSync] Value -> Parser MaxConcurrencyBulkSync (Value -> Parser MaxConcurrencyBulkSync) -> (Value -> Parser [MaxConcurrencyBulkSync]) @@ -322,7 +322,7 @@ $cparseJSONList :: Value -> Parser [MaxConcurrencyBulkSync] parseJSON :: Value -> Parser MaxConcurrencyBulkSync $cparseJSON :: Value -> Parser MaxConcurrencyBulkSync -FromJSON, Int -> MaxConcurrencyBulkSync -> ShowS +FromJSON, Int -> MaxConcurrencyBulkSync -> ShowS [MaxConcurrencyBulkSync] -> ShowS MaxConcurrencyBulkSync -> String (Int -> MaxConcurrencyBulkSync -> ShowS) @@ -342,7 +342,7 @@ newtype MaxConcurrencyDeadline = MaxConcurrencyDeadline { MaxConcurrencyDeadline -> Word unMaxConcurrencyDeadline :: Word } - deriving stock (MaxConcurrencyDeadline -> MaxConcurrencyDeadline -> Bool + deriving stock (MaxConcurrencyDeadline -> MaxConcurrencyDeadline -> Bool (MaxConcurrencyDeadline -> MaxConcurrencyDeadline -> Bool) -> (MaxConcurrencyDeadline -> MaxConcurrencyDeadline -> Bool) -> Eq MaxConcurrencyDeadline @@ -351,7 +351,7 @@ $c/= :: MaxConcurrencyDeadline -> MaxConcurrencyDeadline -> Bool == :: MaxConcurrencyDeadline -> MaxConcurrencyDeadline -> Bool $c== :: MaxConcurrencyDeadline -> MaxConcurrencyDeadline -> Bool -Eq, Eq MaxConcurrencyDeadline +Eq, Eq MaxConcurrencyDeadline Eq MaxConcurrencyDeadline -> (MaxConcurrencyDeadline -> MaxConcurrencyDeadline -> Ordering) -> (MaxConcurrencyDeadline -> MaxConcurrencyDeadline -> Bool) @@ -397,7 +397,7 @@ $ccompare :: MaxConcurrencyDeadline -> MaxConcurrencyDeadline -> Ordering $cp1Ord :: Eq MaxConcurrencyDeadline Ord) - deriving newtype (Value -> Parser [MaxConcurrencyDeadline] + deriving newtype (Value -> Parser [MaxConcurrencyDeadline] Value -> Parser MaxConcurrencyDeadline (Value -> Parser MaxConcurrencyDeadline) -> (Value -> Parser [MaxConcurrencyDeadline]) @@ -408,7 +408,7 @@ $cparseJSONList :: Value -> Parser [MaxConcurrencyDeadline] parseJSON :: Value -> Parser MaxConcurrencyDeadline $cparseJSON :: Value -> Parser MaxConcurrencyDeadline -FromJSON, Int -> MaxConcurrencyDeadline -> ShowS +FromJSON, Int -> MaxConcurrencyDeadline -> ShowS [MaxConcurrencyDeadline] -> ShowS MaxConcurrencyDeadline -> String (Int -> MaxConcurrencyDeadline -> ShowS) @@ -427,12 +427,12 @@ -- | IPv4 or IPv6 address with a port number. -data NodeAddress' addr = NodeAddress +data NodeAddress' addr = NodeAddress { NodeAddress' addr -> addr -naHostAddress :: !addr +naHostAddress :: !addr , NodeAddress' addr -> PortNumber naPort :: !PortNumber - } deriving (NodeAddress' addr -> NodeAddress' addr -> Bool + } deriving (NodeAddress' addr -> NodeAddress' addr -> Bool (NodeAddress' addr -> NodeAddress' addr -> Bool) -> (NodeAddress' addr -> NodeAddress' addr -> Bool) -> Eq (NodeAddress' addr) @@ -448,7 +448,7 @@ $c== :: forall addr. Eq addr => NodeAddress' addr -> NodeAddress' addr -> Bool -Eq, Eq (NodeAddress' addr) +Eq, Eq (NodeAddress' addr) Eq (NodeAddress' addr) -> (NodeAddress' addr -> NodeAddress' addr -> Ordering) -> (NodeAddress' addr -> NodeAddress' addr -> Bool) @@ -510,7 +510,7 @@ Ord addr => NodeAddress' addr -> NodeAddress' addr -> Ordering $cp1Ord :: forall addr. Ord addr => Eq (NodeAddress' addr) -Ord, Int -> NodeAddress' addr -> ShowS +Ord, Int -> NodeAddress' addr -> ShowS [NodeAddress' addr] -> ShowS NodeAddress' addr -> String (Int -> NodeAddress' addr -> ShowS) @@ -528,7 +528,7 @@ $cshow :: forall addr. Show addr => NodeAddress' addr -> String showsPrec :: Int -> NodeAddress' addr -> ShowS $cshowsPrec :: forall addr. Show addr => Int -> NodeAddress' addr -> ShowS -Show, a -> NodeAddress' b -> NodeAddress' a +Show, a -> NodeAddress' b -> NodeAddress' a (a -> b) -> NodeAddress' a -> NodeAddress' b (forall a b. (a -> b) -> NodeAddress' a -> NodeAddress' b) -> (forall a b. a -> NodeAddress' b -> NodeAddress' a) @@ -550,9 +550,9 @@ type NodeDnsAddress = NodeAddress' NodeHostDnsAddress -instance FromJSON addr => FromJSON (NodeAddress' addr) where - parseJSON :: Value -> Parser (NodeAddress' addr) -parseJSON = String +instance FromJSON addr => FromJSON (NodeAddress' addr) where + parseJSON :: Value -> Parser (NodeAddress' addr) +parseJSON = String -> (Object -> Parser (NodeAddress' addr)) -> Value -> Parser (NodeAddress' addr) @@ -564,8 +564,8 @@ -> Value -> Parser (NodeAddress' addr) forall a b. (a -> b) -> a -> b -$ \Object -v -> do +$ \Object +v -> do addr -> PortNumber -> NodeAddress' addr forall addr. addr -> PortNumber -> NodeAddress' addr NodeAddress @@ -573,7 +573,7 @@ -> Parser addr -> Parser (PortNumber -> NodeAddress' addr) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser addr +v Object -> Text -> Parser addr forall a. FromJSON a => Object -> Text -> Parser a .: Text "addr" @@ -585,15 +585,15 @@ fromIntegral :: Int -> PortNumber) (Int -> PortNumber) -> Parser Int -> Parser PortNumber forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser Int +v Object -> Text -> Parser Int forall a. FromJSON a => Object -> Text -> Parser a .: Text "port") -instance ToJSON addr => ToJSON (NodeAddress' addr) where - toJSON :: NodeAddress' addr -> Value -toJSON NodeAddress' addr -na = +instance ToJSON addr => ToJSON (NodeAddress' addr) where + toJSON :: NodeAddress' addr -> Value +toJSON NodeAddress' addr +na = [Pair] -> Value object [ Text @@ -604,7 +604,7 @@ toJSON (NodeAddress' addr -> addr forall addr. NodeAddress' addr -> addr naHostAddress NodeAddress' addr -na) +na) , Text "port" Text -> Int -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -613,7 +613,7 @@ fromIntegral (NodeAddress' addr -> PortNumber forall addr. NodeAddress' addr -> PortNumber naPort NodeAddress' addr -na) :: Int) +na) :: Int) ] @@ -636,76 +636,76 @@ nodeDnsAddressToDomainAddress :: NodeDnsAddress -> DomainAddress nodeDnsAddressToDomainAddress :: NodeDnsAddress -> DomainAddress nodeDnsAddressToDomainAddress NodeAddress { naHostAddress :: forall addr. NodeAddress' addr -> addr -naHostAddress = NodeHostDnsAddress Text -dns, PortNumber +naHostAddress = NodeHostDnsAddress Text +dns, PortNumber naPort :: PortNumber naPort :: forall addr. NodeAddress' addr -> PortNumber -naPort } +naPort } = Domain -> PortNumber -> DomainAddress DomainAddress (Text -> Domain Text.encodeUtf8 Text -dns) PortNumber -naPort +dns) PortNumber +naPort nodeAddressToSockAddr :: NodeIPAddress -> SockAddr nodeAddressToSockAddr :: NodeIPAddress -> SockAddr -nodeAddressToSockAddr (NodeAddress NodeHostIPAddress -addr PortNumber -port) = +nodeAddressToSockAddr (NodeAddress NodeHostIPAddress +addr PortNumber +port) = case NodeHostIPAddress -> IP unNodeHostIPAddress NodeHostIPAddress -addr of - IP.IPv4 IPv4 -ipv4 -> PortNumber -> HostAddress -> SockAddr +addr of + IP.IPv4 IPv4 +ipv4 -> PortNumber -> HostAddress -> SockAddr SockAddrInet PortNumber -port (IPv4 -> HostAddress +port (IPv4 -> HostAddress IP.toHostAddress IPv4 -ipv4) - IP.IPv6 IPv6 -ipv6 -> PortNumber +ipv4) + IP.IPv6 IPv6 +ipv6 -> PortNumber -> HostAddress -> HostAddress6 -> HostAddress -> SockAddr SockAddrInet6 PortNumber -port HostAddress +port HostAddress 0 (IPv6 -> HostAddress6 IP.toHostAddress6 IPv6 -ipv6) HostAddress +ipv6) HostAddress 0 nodeHostIPAddressToSockAddr :: NodeIPAddress -> SockAddr nodeHostIPAddressToSockAddr :: NodeIPAddress -> SockAddr nodeHostIPAddressToSockAddr NodeAddress { naHostAddress :: forall addr. NodeAddress' addr -> addr -naHostAddress = NodeHostIPAddress IP -ip, PortNumber +naHostAddress = NodeHostIPAddress IP +ip, PortNumber naPort :: PortNumber naPort :: forall addr. NodeAddress' addr -> PortNumber -naPort } = +naPort } = case IP -ip of - IPv4 IPv4 -ipv4 -> PortNumber -> HostAddress -> SockAddr +ip of + IPv4 IPv4 +ipv4 -> PortNumber -> HostAddress -> SockAddr SockAddrInet (PortNumber -> PortNumber forall a b. (Integral a, Num b) => a -> b fromIntegral PortNumber -naPort) (IPv4 -> HostAddress +naPort) (IPv4 -> HostAddress IP.toHostAddress IPv4 -ipv4) - IPv6 IPv6 -ipv6 -> PortNumber +ipv4) + IPv6 IPv6 +ipv6 -> PortNumber -> HostAddress -> HostAddress6 -> HostAddress -> SockAddr SockAddrInet6 (PortNumber -> PortNumber forall a b. (Integral a, Num b) => a -> b fromIntegral PortNumber -naPort) HostAddress +naPort) HostAddress 0 (IPv6 -> HostAddress6 IP.toHostAddress6 IPv6 -ipv6) HostAddress +ipv6) HostAddress 0 newtype NodeHostIPv4Address = NodeHostIPv4Address { NodeHostIPv4Address -> IPv4 unNodeHostIPv4Address :: IPv4 } - deriving newtype Int -> NodeHostIPv4Address -> ShowS + deriving newtype Int -> NodeHostIPv4Address -> ShowS [NodeHostIPv4Address] -> ShowS NodeHostIPv4Address -> String (Int -> NodeHostIPv4Address -> ShowS) @@ -721,7 +721,7 @@ showsPrec :: Int -> NodeHostIPv4Address -> ShowS $cshowsPrec :: Int -> NodeHostIPv4Address -> ShowS Show - deriving (NodeHostIPv4Address -> NodeHostIPv4Address -> Bool + deriving (NodeHostIPv4Address -> NodeHostIPv4Address -> Bool (NodeHostIPv4Address -> NodeHostIPv4Address -> Bool) -> (NodeHostIPv4Address -> NodeHostIPv4Address -> Bool) -> Eq NodeHostIPv4Address @@ -730,7 +730,7 @@ $c/= :: NodeHostIPv4Address -> NodeHostIPv4Address -> Bool == :: NodeHostIPv4Address -> NodeHostIPv4Address -> Bool $c== :: NodeHostIPv4Address -> NodeHostIPv4Address -> Bool -Eq, Eq NodeHostIPv4Address +Eq, Eq NodeHostIPv4Address Eq NodeHostIPv4Address -> (NodeHostIPv4Address -> NodeHostIPv4Address -> Ordering) -> (NodeHostIPv4Address -> NodeHostIPv4Address -> Bool) @@ -772,26 +772,26 @@ $cp1Ord :: Eq NodeHostIPv4Address Ord) -instance FromJSON NodeHostIPv4Address where - parseJSON :: Value -> Parser NodeHostIPv4Address -parseJSON (String Text -ipStr) = +instance FromJSON NodeHostIPv4Address where + parseJSON :: Value -> Parser NodeHostIPv4Address +parseJSON (String Text +ipStr) = case String -> Maybe IPv4 forall a. Read a => String -> Maybe a readMaybe (String -> Maybe IPv4) -> String -> Maybe IPv4 forall a b. (a -> b) -> a -> b $ Text -> String Text.unpack Text -ipStr of - Just IPv4 -ip -> NodeHostIPv4Address -> Parser NodeHostIPv4Address +ipStr of + Just IPv4 +ip -> NodeHostIPv4Address -> Parser NodeHostIPv4Address forall (f :: * -> *) a. Applicative f => a -> f a pure (NodeHostIPv4Address -> Parser NodeHostIPv4Address) -> NodeHostIPv4Address -> Parser NodeHostIPv4Address forall a b. (a -> b) -> a -> b $ IPv4 -> NodeHostIPv4Address NodeHostIPv4Address IPv4 -ip +ip Maybe IPv4 Nothing -> String -> Parser NodeHostIPv4Address forall (m :: * -> *) a. MonadFail m => String -> m a @@ -803,9 +803,9 @@ forall a. Semigroup a => a -> a -> a <> Text -> String Text.unpack Text -ipStr - parseJSON Value -invalid = String -> Parser NodeHostIPv4Address +ipStr + parseJSON Value +invalid = String -> Parser NodeHostIPv4Address forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser NodeHostIPv4Address) -> String -> Parser NodeHostIPv4Address @@ -820,28 +820,28 @@ <> Value -> String forall a b. (Show a, ConvertText String b) => a -> b show Value -invalid String -> ShowS +invalid String -> ShowS forall a. Semigroup a => a -> a -> a <> String "\n" -instance ToJSON NodeHostIPv4Address where - toJSON :: NodeHostIPv4Address -> Value -toJSON (NodeHostIPv4Address IPv4 -ip) = Text -> Value +instance ToJSON NodeHostIPv4Address where + toJSON :: NodeHostIPv4Address -> Value +toJSON (NodeHostIPv4Address IPv4 +ip) = Text -> Value String (String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b $ IPv4 -> String forall a b. (Show a, ConvertText String b) => a -> b show IPv4 -ip) +ip) newtype NodeHostIPv6Address = NodeHostIPv6Address { NodeHostIPv6Address -> IPv6 unNodeHostIPv6Address :: IPv6 } - deriving newtype Int -> NodeHostIPv6Address -> ShowS + deriving newtype Int -> NodeHostIPv6Address -> ShowS [NodeHostIPv6Address] -> ShowS NodeHostIPv6Address -> String (Int -> NodeHostIPv6Address -> ShowS) @@ -857,7 +857,7 @@ showsPrec :: Int -> NodeHostIPv6Address -> ShowS $cshowsPrec :: Int -> NodeHostIPv6Address -> ShowS Show - deriving (NodeHostIPv6Address -> NodeHostIPv6Address -> Bool + deriving (NodeHostIPv6Address -> NodeHostIPv6Address -> Bool (NodeHostIPv6Address -> NodeHostIPv6Address -> Bool) -> (NodeHostIPv6Address -> NodeHostIPv6Address -> Bool) -> Eq NodeHostIPv6Address @@ -866,7 +866,7 @@ $c/= :: NodeHostIPv6Address -> NodeHostIPv6Address -> Bool == :: NodeHostIPv6Address -> NodeHostIPv6Address -> Bool $c== :: NodeHostIPv6Address -> NodeHostIPv6Address -> Bool -Eq, Eq NodeHostIPv6Address +Eq, Eq NodeHostIPv6Address Eq NodeHostIPv6Address -> (NodeHostIPv6Address -> NodeHostIPv6Address -> Ordering) -> (NodeHostIPv6Address -> NodeHostIPv6Address -> Bool) @@ -908,26 +908,26 @@ $cp1Ord :: Eq NodeHostIPv6Address Ord) -instance FromJSON NodeHostIPv6Address where - parseJSON :: Value -> Parser NodeHostIPv6Address -parseJSON (String Text -ipStr) = +instance FromJSON NodeHostIPv6Address where + parseJSON :: Value -> Parser NodeHostIPv6Address +parseJSON (String Text +ipStr) = case String -> Maybe IPv6 forall a. Read a => String -> Maybe a readMaybe (String -> Maybe IPv6) -> String -> Maybe IPv6 forall a b. (a -> b) -> a -> b $ Text -> String Text.unpack Text -ipStr of - Just IPv6 -ip -> NodeHostIPv6Address -> Parser NodeHostIPv6Address +ipStr of + Just IPv6 +ip -> NodeHostIPv6Address -> Parser NodeHostIPv6Address forall (f :: * -> *) a. Applicative f => a -> f a pure (NodeHostIPv6Address -> Parser NodeHostIPv6Address) -> NodeHostIPv6Address -> Parser NodeHostIPv6Address forall a b. (a -> b) -> a -> b $ IPv6 -> NodeHostIPv6Address NodeHostIPv6Address IPv6 -ip +ip Maybe IPv6 Nothing -> String -> Parser NodeHostIPv6Address forall (m :: * -> *) a. MonadFail m => String -> m a @@ -939,9 +939,9 @@ forall a. Semigroup a => a -> a -> a <> Text -> String Text.unpack Text -ipStr - parseJSON Value -invalid = String -> Parser NodeHostIPv6Address +ipStr + parseJSON Value +invalid = String -> Parser NodeHostIPv6Address forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser NodeHostIPv6Address) -> String -> Parser NodeHostIPv6Address @@ -956,27 +956,27 @@ <> Value -> String forall a b. (Show a, ConvertText String b) => a -> b show Value -invalid String -> ShowS +invalid String -> ShowS forall a. Semigroup a => a -> a -> a <> String "\n" -instance ToJSON NodeHostIPv6Address where - toJSON :: NodeHostIPv6Address -> Value -toJSON (NodeHostIPv6Address IPv6 -ip) = Text -> Value +instance ToJSON NodeHostIPv6Address where + toJSON :: NodeHostIPv6Address -> Value +toJSON (NodeHostIPv6Address IPv6 +ip) = Text -> Value String (String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b $ IPv6 -> String forall a b. (Show a, ConvertText String b) => a -> b show IPv6 -ip) +ip) newtype NodeHostIPAddress = NodeHostIPAddress { NodeHostIPAddress -> IP unNodeHostIPAddress :: IP } - deriving newtype Int -> NodeHostIPAddress -> ShowS + deriving newtype Int -> NodeHostIPAddress -> ShowS [NodeHostIPAddress] -> ShowS NodeHostIPAddress -> String (Int -> NodeHostIPAddress -> ShowS) @@ -992,7 +992,7 @@ showsPrec :: Int -> NodeHostIPAddress -> ShowS $cshowsPrec :: Int -> NodeHostIPAddress -> ShowS Show - deriving (NodeHostIPAddress -> NodeHostIPAddress -> Bool + deriving (NodeHostIPAddress -> NodeHostIPAddress -> Bool (NodeHostIPAddress -> NodeHostIPAddress -> Bool) -> (NodeHostIPAddress -> NodeHostIPAddress -> Bool) -> Eq NodeHostIPAddress @@ -1001,7 +1001,7 @@ $c/= :: NodeHostIPAddress -> NodeHostIPAddress -> Bool == :: NodeHostIPAddress -> NodeHostIPAddress -> Bool $c== :: NodeHostIPAddress -> NodeHostIPAddress -> Bool -Eq, Eq NodeHostIPAddress +Eq, Eq NodeHostIPAddress Eq NodeHostIPAddress -> (NodeHostIPAddress -> NodeHostIPAddress -> Ordering) -> (NodeHostIPAddress -> NodeHostIPAddress -> Bool) @@ -1041,26 +1041,26 @@ $cp1Ord :: Eq NodeHostIPAddress Ord) -instance FromJSON NodeHostIPAddress where - parseJSON :: Value -> Parser NodeHostIPAddress -parseJSON (String Text -ipStr) = +instance FromJSON NodeHostIPAddress where + parseJSON :: Value -> Parser NodeHostIPAddress +parseJSON (String Text +ipStr) = case String -> Maybe IP forall a. Read a => String -> Maybe a readMaybe (String -> Maybe IP) -> String -> Maybe IP forall a b. (a -> b) -> a -> b $ Text -> String Text.unpack Text -ipStr of - Just IP -ip -> NodeHostIPAddress -> Parser NodeHostIPAddress +ipStr of + Just IP +ip -> NodeHostIPAddress -> Parser NodeHostIPAddress forall (f :: * -> *) a. Applicative f => a -> f a pure (NodeHostIPAddress -> Parser NodeHostIPAddress) -> NodeHostIPAddress -> Parser NodeHostIPAddress forall a b. (a -> b) -> a -> b $ IP -> NodeHostIPAddress NodeHostIPAddress IP -ip +ip Maybe IP Nothing -> String -> Parser NodeHostIPAddress forall (m :: * -> *) a. MonadFail m => String -> m a @@ -1072,9 +1072,9 @@ forall a. Semigroup a => a -> a -> a <> Text -> String Text.unpack Text -ipStr - parseJSON Value -invalid = String -> Parser NodeHostIPAddress +ipStr + parseJSON Value +invalid = String -> Parser NodeHostIPAddress forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser NodeHostIPAddress) -> String -> Parser NodeHostIPAddress @@ -1089,39 +1089,39 @@ <> Value -> String forall a b. (Show a, ConvertText String b) => a -> b show Value -invalid String -> ShowS +invalid String -> ShowS forall a. Semigroup a => a -> a -> a <> String "\n" -instance ToJSON NodeHostIPAddress where - toJSON :: NodeHostIPAddress -> Value -toJSON (NodeHostIPAddress IP -ip) = Text -> Value +instance ToJSON NodeHostIPAddress where + toJSON :: NodeHostIPAddress -> Value +toJSON (NodeHostIPAddress IP +ip) = Text -> Value String (String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b $ IP -> String forall a b. (Show a, ConvertText String b) => a -> b show IP -ip) +ip) nodeHostIPv6AddressToIPAddress :: NodeHostIPv6Address -> NodeHostIPAddress nodeHostIPv6AddressToIPAddress :: NodeHostIPv6Address -> NodeHostIPAddress -nodeHostIPv6AddressToIPAddress (NodeHostIPv6Address IPv6 -ip) = IP -> NodeHostIPAddress +nodeHostIPv6AddressToIPAddress (NodeHostIPv6Address IPv6 +ip) = IP -> NodeHostIPAddress NodeHostIPAddress (IPv6 -> IP IPv6 IPv6 -ip) +ip) nodeHostIPv4AddressToIPAddress :: NodeHostIPv4Address -> NodeHostIPAddress nodeHostIPv4AddressToIPAddress :: NodeHostIPv4Address -> NodeHostIPAddress -nodeHostIPv4AddressToIPAddress (NodeHostIPv4Address IPv4 -ip) = IP -> NodeHostIPAddress +nodeHostIPv4AddressToIPAddress (NodeHostIPv4Address IPv4 +ip) = IP -> NodeHostIPAddress NodeHostIPAddress (IPv4 -> IP IPv4 IPv4 -ip) +ip) -- | Domain name. @@ -1129,7 +1129,7 @@ newtype NodeHostDnsAddress = NodeHostDnsAddress { NodeHostDnsAddress -> Text unNodeHostDnsAddress :: Text } - deriving newtype Int -> NodeHostDnsAddress -> ShowS + deriving newtype Int -> NodeHostDnsAddress -> ShowS [NodeHostDnsAddress] -> ShowS NodeHostDnsAddress -> String (Int -> NodeHostDnsAddress -> ShowS) @@ -1145,7 +1145,7 @@ showsPrec :: Int -> NodeHostDnsAddress -> ShowS $cshowsPrec :: Int -> NodeHostDnsAddress -> ShowS Show - deriving (NodeHostDnsAddress -> NodeHostDnsAddress -> Bool + deriving (NodeHostDnsAddress -> NodeHostDnsAddress -> Bool (NodeHostDnsAddress -> NodeHostDnsAddress -> Bool) -> (NodeHostDnsAddress -> NodeHostDnsAddress -> Bool) -> Eq NodeHostDnsAddress @@ -1154,7 +1154,7 @@ $c/= :: NodeHostDnsAddress -> NodeHostDnsAddress -> Bool == :: NodeHostDnsAddress -> NodeHostDnsAddress -> Bool $c== :: NodeHostDnsAddress -> NodeHostDnsAddress -> Bool -Eq, Eq NodeHostDnsAddress +Eq, Eq NodeHostDnsAddress Eq NodeHostDnsAddress -> (NodeHostDnsAddress -> NodeHostDnsAddress -> Ordering) -> (NodeHostDnsAddress -> NodeHostDnsAddress -> Bool) @@ -1211,7 +1211,7 @@ newtype NodeDiffusionMode = NodeDiffusionMode { NodeDiffusionMode -> DiffusionMode getDiffusionMode :: DiffusionMode } - deriving newtype Int -> NodeDiffusionMode -> ShowS + deriving newtype Int -> NodeDiffusionMode -> ShowS [NodeDiffusionMode] -> ShowS NodeDiffusionMode -> String (Int -> NodeDiffusionMode -> ShowS) @@ -1228,12 +1228,12 @@ $cshowsPrec :: Int -> NodeDiffusionMode -> ShowS Show -instance FromJSON NodeDiffusionMode where - parseJSON :: Value -> Parser NodeDiffusionMode -parseJSON (String Text -str) = +instance FromJSON NodeDiffusionMode where + parseJSON :: Value -> Parser NodeDiffusionMode +parseJSON (String Text +str) = case Text -str of +str of Text "InitiatorOnly" -> NodeDiffusionMode -> Parser NodeDiffusionMode @@ -1265,8 +1265,8 @@ fail String "Parsing NodeDiffusionMode failed" -class AdjustFilePaths a where - adjustFilePaths :: (FilePath -> FilePath) -> a -> a +class AdjustFilePaths a where + adjustFilePaths :: (FilePath -> FilePath) -> a -> a data ProtocolFilepaths = @@ -1283,7 +1283,7 @@ shelleyCertFile :: !(Maybe FilePath) , ProtocolFilepaths -> Maybe String shelleyBulkCredsFile :: !(Maybe FilePath) - } deriving (ProtocolFilepaths -> ProtocolFilepaths -> Bool + } deriving (ProtocolFilepaths -> ProtocolFilepaths -> Bool (ProtocolFilepaths -> ProtocolFilepaths -> Bool) -> (ProtocolFilepaths -> ProtocolFilepaths -> Bool) -> Eq ProtocolFilepaths @@ -1292,7 +1292,7 @@ $c/= :: ProtocolFilepaths -> ProtocolFilepaths -> Bool == :: ProtocolFilepaths -> ProtocolFilepaths -> Bool $c== :: ProtocolFilepaths -> ProtocolFilepaths -> Bool -Eq, Int -> ProtocolFilepaths -> ShowS +Eq, Int -> ProtocolFilepaths -> ShowS [ProtocolFilepaths] -> ShowS ProtocolFilepaths -> String (Int -> ProtocolFilepaths -> ShowS) @@ -1310,7 +1310,7 @@ Show) newtype GenesisHash = GenesisHash (Crypto.Hash Crypto.Blake2b_256 ByteString) - deriving newtype (GenesisHash -> GenesisHash -> Bool + deriving newtype (GenesisHash -> GenesisHash -> Bool (GenesisHash -> GenesisHash -> Bool) -> (GenesisHash -> GenesisHash -> Bool) -> Eq GenesisHash forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -1318,7 +1318,7 @@ $c/= :: GenesisHash -> GenesisHash -> Bool == :: GenesisHash -> GenesisHash -> Bool $c== :: GenesisHash -> GenesisHash -> Bool -Eq, Int -> GenesisHash -> ShowS +Eq, Int -> GenesisHash -> ShowS [GenesisHash] -> ShowS GenesisHash -> String (Int -> GenesisHash -> ShowS) @@ -1333,7 +1333,7 @@ $cshow :: GenesisHash -> String showsPrec :: Int -> GenesisHash -> ShowS $cshowsPrec :: Int -> GenesisHash -> ShowS -Show, [GenesisHash] -> Encoding +Show, [GenesisHash] -> Encoding [GenesisHash] -> Value GenesisHash -> Encoding GenesisHash -> Value @@ -1356,7 +1356,7 @@ $ctoEncoding :: GenesisHash -> Encoding toJSON :: GenesisHash -> Value $ctoJSON :: GenesisHash -> Value -ToJSON, Value -> Parser [GenesisHash] +ToJSON, Value -> Parser [GenesisHash] Value -> Parser GenesisHash (Value -> Parser GenesisHash) -> (Value -> Parser [GenesisHash]) -> FromJSON GenesisHash @@ -1366,7 +1366,7 @@ $cparseJSONList :: Value -> Parser [GenesisHash] parseJSON :: Value -> Parser GenesisHash $cparseJSON :: Value -> Parser GenesisHash -FromJSON) +FromJSON) data NodeProtocolConfiguration = NodeProtocolConfigurationByron NodeByronProtocolConfiguration @@ -1375,7 +1375,7 @@ NodeShelleyProtocolConfiguration NodeAlonzoProtocolConfiguration NodeHardForkProtocolConfiguration - deriving (NodeProtocolConfiguration -> NodeProtocolConfiguration -> Bool + deriving (NodeProtocolConfiguration -> NodeProtocolConfiguration -> Bool (NodeProtocolConfiguration -> NodeProtocolConfiguration -> Bool) -> (NodeProtocolConfiguration -> NodeProtocolConfiguration -> Bool) -> Eq NodeProtocolConfiguration @@ -1384,7 +1384,7 @@ $c/= :: NodeProtocolConfiguration -> NodeProtocolConfiguration -> Bool == :: NodeProtocolConfiguration -> NodeProtocolConfiguration -> Bool $c== :: NodeProtocolConfiguration -> NodeProtocolConfiguration -> Bool -Eq, Int -> NodeProtocolConfiguration -> ShowS +Eq, Int -> NodeProtocolConfiguration -> ShowS [NodeProtocolConfiguration] -> ShowS NodeProtocolConfiguration -> String (Int -> NodeProtocolConfiguration -> ShowS) @@ -1408,7 +1408,7 @@ , NodeShelleyProtocolConfiguration -> Maybe GenesisHash npcShelleyGenesisFileHash :: !(Maybe GenesisHash) } - deriving (NodeShelleyProtocolConfiguration + deriving (NodeShelleyProtocolConfiguration -> NodeShelleyProtocolConfiguration -> Bool (NodeShelleyProtocolConfiguration -> NodeShelleyProtocolConfiguration -> Bool) @@ -1424,7 +1424,7 @@ -> NodeShelleyProtocolConfiguration -> Bool $c== :: NodeShelleyProtocolConfiguration -> NodeShelleyProtocolConfiguration -> Bool -Eq, Int -> NodeShelleyProtocolConfiguration -> ShowS +Eq, Int -> NodeShelleyProtocolConfiguration -> ShowS [NodeShelleyProtocolConfiguration] -> ShowS NodeShelleyProtocolConfiguration -> String (Int -> NodeShelleyProtocolConfiguration -> ShowS) @@ -1448,7 +1448,7 @@ , NodeAlonzoProtocolConfiguration -> Maybe GenesisHash npcAlonzoGenesisFileHash :: !(Maybe GenesisHash) } - deriving (NodeAlonzoProtocolConfiguration + deriving (NodeAlonzoProtocolConfiguration -> NodeAlonzoProtocolConfiguration -> Bool (NodeAlonzoProtocolConfiguration -> NodeAlonzoProtocolConfiguration -> Bool) @@ -1464,7 +1464,7 @@ -> NodeAlonzoProtocolConfiguration -> Bool $c== :: NodeAlonzoProtocolConfiguration -> NodeAlonzoProtocolConfiguration -> Bool -Eq, Int -> NodeAlonzoProtocolConfiguration -> ShowS +Eq, Int -> NodeAlonzoProtocolConfiguration -> ShowS [NodeAlonzoProtocolConfiguration] -> ShowS NodeAlonzoProtocolConfiguration -> String (Int -> NodeAlonzoProtocolConfiguration -> ShowS) @@ -1516,7 +1516,7 @@ , NodeByronProtocolConfiguration -> Word8 npcByronSupportedProtocolVersionAlt :: !Word8 } - deriving (NodeByronProtocolConfiguration + deriving (NodeByronProtocolConfiguration -> NodeByronProtocolConfiguration -> Bool (NodeByronProtocolConfiguration -> NodeByronProtocolConfiguration -> Bool) @@ -1532,7 +1532,7 @@ -> NodeByronProtocolConfiguration -> Bool $c== :: NodeByronProtocolConfiguration -> NodeByronProtocolConfiguration -> Bool -Eq, Int -> NodeByronProtocolConfiguration -> ShowS +Eq, Int -> NodeByronProtocolConfiguration -> ShowS [NodeByronProtocolConfiguration] -> ShowS NodeByronProtocolConfiguration -> String (Int -> NodeByronProtocolConfiguration -> ShowS) @@ -1648,7 +1648,7 @@ , NodeHardForkProtocolConfiguration -> Maybe Word npcTestAlonzoHardForkAtVersion :: Maybe Word } - deriving (NodeHardForkProtocolConfiguration + deriving (NodeHardForkProtocolConfiguration -> NodeHardForkProtocolConfiguration -> Bool (NodeHardForkProtocolConfiguration -> NodeHardForkProtocolConfiguration -> Bool) @@ -1664,7 +1664,7 @@ -> NodeHardForkProtocolConfiguration -> Bool $c== :: NodeHardForkProtocolConfiguration -> NodeHardForkProtocolConfiguration -> Bool -Eq, Int -> NodeHardForkProtocolConfiguration -> ShowS +Eq, Int -> NodeHardForkProtocolConfiguration -> ShowS [NodeHardForkProtocolConfiguration] -> ShowS NodeHardForkProtocolConfiguration -> String (Int -> NodeHardForkProtocolConfiguration -> ShowS) @@ -1684,7 +1684,7 @@ newtype SocketPath = SocketPath { SocketPath -> String unSocketPath :: FilePath } - deriving stock (SocketPath -> SocketPath -> Bool + deriving stock (SocketPath -> SocketPath -> Bool (SocketPath -> SocketPath -> Bool) -> (SocketPath -> SocketPath -> Bool) -> Eq SocketPath forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -1692,7 +1692,7 @@ $c/= :: SocketPath -> SocketPath -> Bool == :: SocketPath -> SocketPath -> Bool $c== :: SocketPath -> SocketPath -> Bool -Eq, Eq SocketPath +Eq, Eq SocketPath Eq SocketPath -> (SocketPath -> SocketPath -> Ordering) -> (SocketPath -> SocketPath -> Bool) @@ -1731,7 +1731,7 @@ $ccompare :: SocketPath -> SocketPath -> Ordering $cp1Ord :: Eq SocketPath Ord) - deriving newtype (Value -> Parser [SocketPath] + deriving newtype (Value -> Parser [SocketPath] Value -> Parser SocketPath (Value -> Parser SocketPath) -> (Value -> Parser [SocketPath]) -> FromJSON SocketPath @@ -1741,12 +1741,12 @@ $cparseJSONList :: Value -> Parser [SocketPath] parseJSON :: Value -> Parser SocketPath $cparseJSON :: Value -> Parser SocketPath -FromJSON, String -> SocketPath +FromJSON, String -> SocketPath (String -> SocketPath) -> IsString SocketPath forall a. (String -> a) -> IsString a fromString :: String -> SocketPath $cfromString :: String -> SocketPath -IsString, Int -> SocketPath -> ShowS +IsString, Int -> SocketPath -> ShowS [SocketPath] -> ShowS SocketPath -> String (Int -> SocketPath -> ShowS) @@ -1766,7 +1766,7 @@ newtype TopologyFile = TopologyFile { TopologyFile -> String unTopology :: FilePath } - deriving newtype (Int -> TopologyFile -> ShowS + deriving newtype (Int -> TopologyFile -> ShowS [TopologyFile] -> ShowS TopologyFile -> String (Int -> TopologyFile -> ShowS) @@ -1781,7 +1781,7 @@ $cshow :: TopologyFile -> String showsPrec :: Int -> TopologyFile -> ShowS $cshowsPrec :: Int -> TopologyFile -> ShowS -Show, TopologyFile -> TopologyFile -> Bool +Show, TopologyFile -> TopologyFile -> Bool (TopologyFile -> TopologyFile -> Bool) -> (TopologyFile -> TopologyFile -> Bool) -> Eq TopologyFile forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -1793,36 +1793,36 @@ instance AdjustFilePaths NodeProtocolConfiguration where - adjustFilePaths :: ShowS -> NodeProtocolConfiguration -> NodeProtocolConfiguration -adjustFilePaths ShowS -f (NodeProtocolConfigurationByron NodeByronProtocolConfiguration -pc) = + adjustFilePaths :: ShowS -> NodeProtocolConfiguration -> NodeProtocolConfiguration +adjustFilePaths ShowS +f (NodeProtocolConfigurationByron NodeByronProtocolConfiguration +pc) = NodeByronProtocolConfiguration -> NodeProtocolConfiguration NodeProtocolConfigurationByron (ShowS -> NodeByronProtocolConfiguration -> NodeByronProtocolConfiguration forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f NodeByronProtocolConfiguration -pc) +f NodeByronProtocolConfiguration +pc) - adjustFilePaths ShowS -f (NodeProtocolConfigurationShelley NodeShelleyProtocolConfiguration -pc) = + adjustFilePaths ShowS +f (NodeProtocolConfigurationShelley NodeShelleyProtocolConfiguration +pc) = NodeShelleyProtocolConfiguration -> NodeProtocolConfiguration NodeProtocolConfigurationShelley (ShowS -> NodeShelleyProtocolConfiguration -> NodeShelleyProtocolConfiguration forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f NodeShelleyProtocolConfiguration -pc) +f NodeShelleyProtocolConfiguration +pc) - adjustFilePaths ShowS -f (NodeProtocolConfigurationCardano NodeByronProtocolConfiguration -pcb NodeShelleyProtocolConfiguration -pcs NodeAlonzoProtocolConfiguration -pca NodeHardForkProtocolConfiguration -pch) = + adjustFilePaths ShowS +f (NodeProtocolConfigurationCardano NodeByronProtocolConfiguration +pcb NodeShelleyProtocolConfiguration +pcs NodeAlonzoProtocolConfiguration +pca NodeHardForkProtocolConfiguration +pch) = NodeByronProtocolConfiguration -> NodeShelleyProtocolConfiguration -> NodeAlonzoProtocolConfiguration @@ -1832,120 +1832,120 @@ -> NodeByronProtocolConfiguration -> NodeByronProtocolConfiguration forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f NodeByronProtocolConfiguration -pcb) +f NodeByronProtocolConfiguration +pcb) (ShowS -> NodeShelleyProtocolConfiguration -> NodeShelleyProtocolConfiguration forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f NodeShelleyProtocolConfiguration -pcs) +f NodeShelleyProtocolConfiguration +pcs) (ShowS -> NodeAlonzoProtocolConfiguration -> NodeAlonzoProtocolConfiguration forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f NodeAlonzoProtocolConfiguration -pca) +f NodeAlonzoProtocolConfiguration +pca) NodeHardForkProtocolConfiguration -pch +pch instance AdjustFilePaths NodeByronProtocolConfiguration where - adjustFilePaths :: ShowS + adjustFilePaths :: ShowS -> NodeByronProtocolConfiguration -> NodeByronProtocolConfiguration -adjustFilePaths ShowS -f x :: NodeByronProtocolConfiguration -x@NodeByronProtocolConfiguration { - GenesisFile +adjustFilePaths ShowS +f x :: NodeByronProtocolConfiguration +x@NodeByronProtocolConfiguration { + GenesisFile npcByronGenesisFile :: GenesisFile npcByronGenesisFile :: NodeByronProtocolConfiguration -> GenesisFile -npcByronGenesisFile +npcByronGenesisFile } = NodeByronProtocolConfiguration -x { npcByronGenesisFile :: GenesisFile +x { npcByronGenesisFile :: GenesisFile npcByronGenesisFile = ShowS -> GenesisFile -> GenesisFile forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f GenesisFile -npcByronGenesisFile } +f GenesisFile +npcByronGenesisFile } instance AdjustFilePaths NodeShelleyProtocolConfiguration where - adjustFilePaths :: ShowS + adjustFilePaths :: ShowS -> NodeShelleyProtocolConfiguration -> NodeShelleyProtocolConfiguration -adjustFilePaths ShowS -f x :: NodeShelleyProtocolConfiguration -x@NodeShelleyProtocolConfiguration { - GenesisFile +adjustFilePaths ShowS +f x :: NodeShelleyProtocolConfiguration +x@NodeShelleyProtocolConfiguration { + GenesisFile npcShelleyGenesisFile :: GenesisFile npcShelleyGenesisFile :: NodeShelleyProtocolConfiguration -> GenesisFile -npcShelleyGenesisFile +npcShelleyGenesisFile } = NodeShelleyProtocolConfiguration -x { npcShelleyGenesisFile :: GenesisFile +x { npcShelleyGenesisFile :: GenesisFile npcShelleyGenesisFile = ShowS -> GenesisFile -> GenesisFile forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f GenesisFile -npcShelleyGenesisFile } +f GenesisFile +npcShelleyGenesisFile } instance AdjustFilePaths NodeAlonzoProtocolConfiguration where - adjustFilePaths :: ShowS + adjustFilePaths :: ShowS -> NodeAlonzoProtocolConfiguration -> NodeAlonzoProtocolConfiguration -adjustFilePaths ShowS -f x :: NodeAlonzoProtocolConfiguration -x@NodeAlonzoProtocolConfiguration { - GenesisFile +adjustFilePaths ShowS +f x :: NodeAlonzoProtocolConfiguration +x@NodeAlonzoProtocolConfiguration { + GenesisFile npcAlonzoGenesisFile :: GenesisFile npcAlonzoGenesisFile :: NodeAlonzoProtocolConfiguration -> GenesisFile -npcAlonzoGenesisFile +npcAlonzoGenesisFile } = NodeAlonzoProtocolConfiguration -x { npcAlonzoGenesisFile :: GenesisFile +x { npcAlonzoGenesisFile :: GenesisFile npcAlonzoGenesisFile = ShowS -> GenesisFile -> GenesisFile forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f GenesisFile -npcAlonzoGenesisFile } +f GenesisFile +npcAlonzoGenesisFile } instance AdjustFilePaths SocketPath where - adjustFilePaths :: ShowS -> SocketPath -> SocketPath -adjustFilePaths ShowS -f (SocketPath String -p) = String -> SocketPath + adjustFilePaths :: ShowS -> SocketPath -> SocketPath +adjustFilePaths ShowS +f (SocketPath String +p) = String -> SocketPath SocketPath (ShowS -f String -p) +f String +p) instance AdjustFilePaths GenesisFile where - adjustFilePaths :: ShowS -> GenesisFile -> GenesisFile -adjustFilePaths ShowS -f (GenesisFile String -p) = String -> GenesisFile + adjustFilePaths :: ShowS -> GenesisFile -> GenesisFile +adjustFilePaths ShowS +f (GenesisFile String +p) = String -> GenesisFile GenesisFile (ShowS -f String -p) +f String +p) -instance AdjustFilePaths a => AdjustFilePaths (Maybe a) where - adjustFilePaths :: ShowS -> Maybe a -> Maybe a -adjustFilePaths ShowS -f = (a -> a) -> Maybe a -> Maybe a +instance AdjustFilePaths a => AdjustFilePaths (Maybe a) where + adjustFilePaths :: ShowS -> Maybe a -> Maybe a +adjustFilePaths ShowS +f = (a -> a) -> Maybe a -> Maybe a forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap (ShowS -> a -> a forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f) +f) instance AdjustFilePaths (Last NodeProtocolConfiguration) where - adjustFilePaths :: ShowS + adjustFilePaths :: ShowS -> Last NodeProtocolConfiguration -> Last NodeProtocolConfiguration -adjustFilePaths ShowS -f (Last (Just NodeProtocolConfiguration -npc)) = +adjustFilePaths ShowS +f (Last (Just NodeProtocolConfiguration +npc)) = Maybe NodeProtocolConfiguration -> Last NodeProtocolConfiguration forall a. Maybe a -> Last a Last (Maybe NodeProtocolConfiguration -> Last NodeProtocolConfiguration) @@ -1963,8 +1963,8 @@ $ ShowS -> NodeProtocolConfiguration -> NodeProtocolConfiguration forall a. AdjustFilePaths a => ShowS -> a -> a adjustFilePaths ShowS -f NodeProtocolConfiguration -npc +f NodeProtocolConfiguration +npc adjustFilePaths ShowS _ (Last Maybe NodeProtocolConfiguration @@ -1975,10 +1975,10 @@ Nothing instance AdjustFilePaths (Last SocketPath) where - adjustFilePaths :: ShowS -> Last SocketPath -> Last SocketPath -adjustFilePaths ShowS -f (Last (Just (SocketPath String -p))) = Maybe SocketPath -> Last SocketPath + adjustFilePaths :: ShowS -> Last SocketPath -> Last SocketPath +adjustFilePaths ShowS +f (Last (Just (SocketPath String +p))) = Maybe SocketPath -> Last SocketPath forall a. Maybe a -> Last a Last (Maybe SocketPath -> Last SocketPath) -> (SocketPath -> Maybe SocketPath) @@ -1993,8 +1993,8 @@ forall a b. (a -> b) -> a -> b $ String -> SocketPath SocketPath (ShowS -f String -p) +f String +p) adjustFilePaths ShowS _ (Last Maybe SocketPath Nothing) = Maybe SocketPath -> Last SocketPath @@ -2022,7 +2022,7 @@ = OtherPermissionsExist FilePath | GroupPermissionsExist FilePath | GenericPermissionsExist FilePath - deriving Int -> VRFPrivateKeyFilePermissionError -> ShowS + deriving Int -> VRFPrivateKeyFilePermissionError -> ShowS [VRFPrivateKeyFilePermissionError] -> ShowS VRFPrivateKeyFilePermissionError -> String (Int -> VRFPrivateKeyFilePermissionError -> ShowS) @@ -2041,43 +2041,43 @@ renderVRFPrivateKeyFilePermissionError :: VRFPrivateKeyFilePermissionError -> Text renderVRFPrivateKeyFilePermissionError :: VRFPrivateKeyFilePermissionError -> Text -renderVRFPrivateKeyFilePermissionError VRFPrivateKeyFilePermissionError -err = +renderVRFPrivateKeyFilePermissionError VRFPrivateKeyFilePermissionError +err = case VRFPrivateKeyFilePermissionError -err of - OtherPermissionsExist String -fp -> +err of + OtherPermissionsExist String +fp -> Text "VRF private key file at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -fp +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " has \"other\" file permissions. Please remove all \"other\" file permissions." - GroupPermissionsExist String -fp -> + GroupPermissionsExist String +fp -> Text "VRF private key file at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -fp +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text "has \"group\" file permissions. Please remove all \"group\" file permissions." - GenericPermissionsExist String -fp -> + GenericPermissionsExist String +fp -> Text "VRF private key file at: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> String -> Text Text.pack String -fp +fp Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text diff --git a/cardano-node/src/Cardano.Tracing.Config.html b/cardano-node/src/Cardano.Tracing.Config.html index 0c916cabc17..d5866b69828 100644 --- a/cardano-node/src/Cardano.Tracing.Config.html +++ b/cardano-node/src/Cardano.Tracing.Config.html @@ -26,7 +26,7 @@ data TraceOptions = TracingOff | TracingOn TraceSelection - deriving (TraceOptions -> TraceOptions -> Bool + deriving (TraceOptions -> TraceOptions -> Bool (TraceOptions -> TraceOptions -> Bool) -> (TraceOptions -> TraceOptions -> Bool) -> Eq TraceOptions forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -34,7 +34,7 @@ $c/= :: TraceOptions -> TraceOptions -> Bool == :: TraceOptions -> TraceOptions -> Bool $c== :: TraceOptions -> TraceOptions -> Bool -Eq, Int -> TraceOptions -> ShowS +Eq, Int -> TraceOptions -> ShowS [TraceOptions] -> ShowS TraceOptions -> String (Int -> TraceOptions -> ShowS) @@ -86,8 +86,8 @@ type TraceTxSubmissionProtocol = ("TraceTxSubmissionProtocol" :: Symbol) type TraceTxSubmission2Protocol = ("TraceTxSubmission2Protocol" :: Symbol) -newtype OnOff (name :: Symbol) = OnOff { OnOff name -> Bool -isOn :: Bool } deriving (OnOff name -> OnOff name -> Bool +newtype OnOff (name :: Symbol) = OnOff { OnOff name -> Bool +isOn :: Bool } deriving (OnOff name -> OnOff name -> Bool (OnOff name -> OnOff name -> Bool) -> (OnOff name -> OnOff name -> Bool) -> Eq (OnOff name) forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -96,7 +96,7 @@ $c/= :: forall (name :: Symbol). OnOff name -> OnOff name -> Bool == :: OnOff name -> OnOff name -> Bool $c== :: forall (name :: Symbol). OnOff name -> OnOff name -> Bool -Eq, Int -> OnOff name -> ShowS +Eq, Int -> OnOff name -> ShowS [OnOff name] -> ShowS OnOff name -> String (Int -> OnOff name -> ShowS) @@ -116,23 +116,23 @@ $cshowsPrec :: forall (name :: Symbol). Int -> OnOff name -> ShowS Show) -instance FromJSON (OnOff a) where - parseJSON :: Value -> Parser (OnOff a) -parseJSON (Data.Aeson.Bool Bool -b)= OnOff a -> Parser (OnOff a) +instance FromJSON (OnOff a) where + parseJSON :: Value -> Parser (OnOff a) +parseJSON (Data.Aeson.Bool Bool +b)= OnOff a -> Parser (OnOff a) forall (m :: * -> *) a. Monad m => a -> m a return (OnOff a -> Parser (OnOff a)) -> OnOff a -> Parser (OnOff a) forall a b. (a -> b) -> a -> b $ Bool -> OnOff a forall (name :: Symbol). Bool -> OnOff name OnOff Bool -b +b parseJSON Value _ = Parser (OnOff a) forall (m :: * -> *) a. MonadPlus m => m a mzero -getName :: forall name. KnownSymbol name => OnOff name -> Text +getName :: forall name. KnownSymbol name => OnOff name -> Text getName :: OnOff name -> Text getName OnOff name _ = String -> Text @@ -142,7 +142,7 @@ proxy n -> String symbolVal (Proxy name forall k (t :: k). Proxy t -Proxy @name)) +Proxy @name)) data TraceSelection = TraceSelection @@ -218,7 +218,7 @@ traceTxSubmissionProtocol :: OnOff TraceTxSubmissionProtocol , TraceSelection -> OnOff TraceTxSubmission2Protocol traceTxSubmission2Protocol :: OnOff TraceTxSubmission2Protocol - } deriving (TraceSelection -> TraceSelection -> Bool + } deriving (TraceSelection -> TraceSelection -> Bool (TraceSelection -> TraceSelection -> Bool) -> (TraceSelection -> TraceSelection -> Bool) -> Eq TraceSelection forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a @@ -226,7 +226,7 @@ $c/= :: TraceSelection -> TraceSelection -> Bool == :: TraceSelection -> TraceSelection -> Bool $c== :: TraceSelection -> TraceSelection -> Bool -Eq, Int -> TraceSelection -> ShowS +Eq, Int -> TraceSelection -> ShowS [TraceSelection] -> ShowS TraceSelection -> String (Int -> TraceSelection -> ShowS) @@ -246,209 +246,209 @@ traceConfigParser :: Object -> Parser TraceOptions traceConfigParser :: Object -> Parser TraceOptions -traceConfigParser Object -v = - let acceptPolicy :: OnOff TraceAcceptPolicy - acceptPolicy :: OnOff TraceAcceptPolicy -acceptPolicy = Bool -> OnOff TraceAcceptPolicy +traceConfigParser Object +v = + let acceptPolicy :: OnOff TraceAcceptPolicy + acceptPolicy :: OnOff TraceAcceptPolicy +acceptPolicy = Bool -> OnOff TraceAcceptPolicy forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - blockFetchClient :: OnOff TraceBlockFetchClient - blockFetchClient :: OnOff TraceBlockFetchClient -blockFetchClient = Bool -> OnOff TraceBlockFetchClient + blockFetchClient :: OnOff TraceBlockFetchClient + blockFetchClient :: OnOff TraceBlockFetchClient +blockFetchClient = Bool -> OnOff TraceBlockFetchClient forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - blockFetchDecisions :: OnOff TraceBlockFetchDecisions - blockFetchDecisions :: OnOff TraceBlockFetchDecisions -blockFetchDecisions = Bool -> OnOff TraceBlockFetchDecisions + blockFetchDecisions :: OnOff TraceBlockFetchDecisions + blockFetchDecisions :: OnOff TraceBlockFetchDecisions +blockFetchDecisions = Bool -> OnOff TraceBlockFetchDecisions forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - blockFetchProtocol :: OnOff TraceBlockFetchProtocol - blockFetchProtocol :: OnOff TraceBlockFetchProtocol -blockFetchProtocol = Bool -> OnOff TraceBlockFetchProtocol + blockFetchProtocol :: OnOff TraceBlockFetchProtocol + blockFetchProtocol :: OnOff TraceBlockFetchProtocol +blockFetchProtocol = Bool -> OnOff TraceBlockFetchProtocol forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - blockFetchProtocolSerialised :: OnOff TraceBlockFetchProtocolSerialised - blockFetchProtocolSerialised :: OnOff TraceBlockFetchProtocolSerialised -blockFetchProtocolSerialised = Bool -> OnOff TraceBlockFetchProtocolSerialised + blockFetchProtocolSerialised :: OnOff TraceBlockFetchProtocolSerialised + blockFetchProtocolSerialised :: OnOff TraceBlockFetchProtocolSerialised +blockFetchProtocolSerialised = Bool -> OnOff TraceBlockFetchProtocolSerialised forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - blockFetchServer :: OnOff TraceBlockFetchServer - blockFetchServer :: OnOff TraceBlockFetchServer -blockFetchServer = Bool -> OnOff TraceBlockFetchServer + blockFetchServer :: OnOff TraceBlockFetchServer + blockFetchServer :: OnOff TraceBlockFetchServer +blockFetchServer = Bool -> OnOff TraceBlockFetchServer forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - blockchainTime :: OnOff TraceBlockchainTime - blockchainTime :: OnOff TraceBlockchainTime -blockchainTime = Bool -> OnOff TraceBlockchainTime + blockchainTime :: OnOff TraceBlockchainTime + blockchainTime :: OnOff TraceBlockchainTime +blockchainTime = Bool -> OnOff TraceBlockchainTime forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - chainDB :: OnOff TraceChainDB - chainDB :: OnOff TraceChainDB -chainDB = Bool -> OnOff TraceChainDB + chainDB :: OnOff TraceChainDB + chainDB :: OnOff TraceChainDB +chainDB = Bool -> OnOff TraceChainDB forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - chainSyncBlockServer :: OnOff TraceChainSyncBlockServer - chainSyncBlockServer :: OnOff TraceChainSyncBlockServer -chainSyncBlockServer = Bool -> OnOff TraceChainSyncBlockServer + chainSyncBlockServer :: OnOff TraceChainSyncBlockServer + chainSyncBlockServer :: OnOff TraceChainSyncBlockServer +chainSyncBlockServer = Bool -> OnOff TraceChainSyncBlockServer forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - chainSyncClient :: OnOff TraceChainSyncClient - chainSyncClient :: OnOff TraceChainSyncClient -chainSyncClient = Bool -> OnOff TraceChainSyncClient + chainSyncClient :: OnOff TraceChainSyncClient + chainSyncClient :: OnOff TraceChainSyncClient +chainSyncClient = Bool -> OnOff TraceChainSyncClient forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - chainSyncHeaderServer :: OnOff TraceChainSyncHeaderServer - chainSyncHeaderServer :: OnOff TraceChainSyncHeaderServer -chainSyncHeaderServer = Bool -> OnOff TraceChainSyncHeaderServer + chainSyncHeaderServer :: OnOff TraceChainSyncHeaderServer + chainSyncHeaderServer :: OnOff TraceChainSyncHeaderServer +chainSyncHeaderServer = Bool -> OnOff TraceChainSyncHeaderServer forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - chainSyncProtocol :: OnOff TraceChainSyncProtocol - chainSyncProtocol :: OnOff TraceChainSyncProtocol -chainSyncProtocol = Bool -> OnOff TraceChainSyncProtocol + chainSyncProtocol :: OnOff TraceChainSyncProtocol + chainSyncProtocol :: OnOff TraceChainSyncProtocol +chainSyncProtocol = Bool -> OnOff TraceChainSyncProtocol forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - diffusionInitialization :: OnOff TraceDiffusionInitialization - diffusionInitialization :: OnOff TraceDiffusionInitialization -diffusionInitialization = Bool -> OnOff TraceDiffusionInitialization + diffusionInitialization :: OnOff TraceDiffusionInitialization + diffusionInitialization :: OnOff TraceDiffusionInitialization +diffusionInitialization = Bool -> OnOff TraceDiffusionInitialization forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - dnsResolver :: OnOff TraceDnsResolver - dnsResolver :: OnOff TraceDnsResolver -dnsResolver = Bool -> OnOff TraceDnsResolver + dnsResolver :: OnOff TraceDnsResolver + dnsResolver :: OnOff TraceDnsResolver +dnsResolver = Bool -> OnOff TraceDnsResolver forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - dnsSubscription :: OnOff TraceDnsSubscription - dnsSubscription :: OnOff TraceDnsSubscription -dnsSubscription = Bool -> OnOff TraceDnsSubscription + dnsSubscription :: OnOff TraceDnsSubscription + dnsSubscription :: OnOff TraceDnsSubscription +dnsSubscription = Bool -> OnOff TraceDnsSubscription forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - errorPolicy :: OnOff TraceErrorPolicy - errorPolicy :: OnOff TraceErrorPolicy -errorPolicy = Bool -> OnOff TraceErrorPolicy + errorPolicy :: OnOff TraceErrorPolicy + errorPolicy :: OnOff TraceErrorPolicy +errorPolicy = Bool -> OnOff TraceErrorPolicy forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - forge :: OnOff TraceForge - forge :: OnOff TraceForge -forge = Bool -> OnOff TraceForge + forge :: OnOff TraceForge + forge :: OnOff TraceForge +forge = Bool -> OnOff TraceForge forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - forgeStateInfo :: OnOff TraceForgeStateInfo - forgeStateInfo :: OnOff TraceForgeStateInfo -forgeStateInfo = Bool -> OnOff TraceForgeStateInfo + forgeStateInfo :: OnOff TraceForgeStateInfo + forgeStateInfo :: OnOff TraceForgeStateInfo +forgeStateInfo = Bool -> OnOff TraceForgeStateInfo forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - handshake :: OnOff TraceHandshake - handshake :: OnOff TraceHandshake -handshake = Bool -> OnOff TraceHandshake + handshake :: OnOff TraceHandshake + handshake :: OnOff TraceHandshake +handshake = Bool -> OnOff TraceHandshake forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - ipSubscription :: OnOff TraceIpSubscription - ipSubscription :: OnOff TraceIpSubscription -ipSubscription = Bool -> OnOff TraceIpSubscription + ipSubscription :: OnOff TraceIpSubscription + ipSubscription :: OnOff TraceIpSubscription +ipSubscription = Bool -> OnOff TraceIpSubscription forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - keepAliveClient :: OnOff TraceKeepAliveClient - keepAliveClient :: OnOff TraceKeepAliveClient -keepAliveClient = Bool -> OnOff TraceKeepAliveClient + keepAliveClient :: OnOff TraceKeepAliveClient + keepAliveClient :: OnOff TraceKeepAliveClient +keepAliveClient = Bool -> OnOff TraceKeepAliveClient forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - localChainSyncProtocol :: OnOff TraceLocalChainSyncProtocol - localChainSyncProtocol :: OnOff TraceLocalChainSyncProtocol -localChainSyncProtocol = Bool -> OnOff TraceLocalChainSyncProtocol + localChainSyncProtocol :: OnOff TraceLocalChainSyncProtocol + localChainSyncProtocol :: OnOff TraceLocalChainSyncProtocol +localChainSyncProtocol = Bool -> OnOff TraceLocalChainSyncProtocol forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - localErrorPolicy :: OnOff TraceLocalErrorPolicy - localErrorPolicy :: OnOff TraceLocalErrorPolicy -localErrorPolicy = Bool -> OnOff TraceLocalErrorPolicy + localErrorPolicy :: OnOff TraceLocalErrorPolicy + localErrorPolicy :: OnOff TraceLocalErrorPolicy +localErrorPolicy = Bool -> OnOff TraceLocalErrorPolicy forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - localHandshake :: OnOff TraceLocalHandshake - localHandshake :: OnOff TraceLocalHandshake -localHandshake = Bool -> OnOff TraceLocalHandshake + localHandshake :: OnOff TraceLocalHandshake + localHandshake :: OnOff TraceLocalHandshake +localHandshake = Bool -> OnOff TraceLocalHandshake forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - localStateQueryProtocol :: OnOff TraceLocalStateQueryProtocol - localStateQueryProtocol :: OnOff TraceLocalStateQueryProtocol -localStateQueryProtocol = Bool -> OnOff TraceLocalStateQueryProtocol + localStateQueryProtocol :: OnOff TraceLocalStateQueryProtocol + localStateQueryProtocol :: OnOff TraceLocalStateQueryProtocol +localStateQueryProtocol = Bool -> OnOff TraceLocalStateQueryProtocol forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - localTxSubmissionProtocol :: OnOff TraceLocalTxSubmissionProtocol - localTxSubmissionProtocol :: OnOff TraceLocalTxSubmissionProtocol -localTxSubmissionProtocol = Bool -> OnOff TraceLocalTxSubmissionProtocol + localTxSubmissionProtocol :: OnOff TraceLocalTxSubmissionProtocol + localTxSubmissionProtocol :: OnOff TraceLocalTxSubmissionProtocol +localTxSubmissionProtocol = Bool -> OnOff TraceLocalTxSubmissionProtocol forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - localTxSubmissionServer :: OnOff TraceLocalTxSubmissionServer - localTxSubmissionServer :: OnOff TraceLocalTxSubmissionServer -localTxSubmissionServer = Bool -> OnOff TraceLocalTxSubmissionServer + localTxSubmissionServer :: OnOff TraceLocalTxSubmissionServer + localTxSubmissionServer :: OnOff TraceLocalTxSubmissionServer +localTxSubmissionServer = Bool -> OnOff TraceLocalTxSubmissionServer forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - mempool :: OnOff TraceMempool - mempool :: OnOff TraceMempool -mempool = Bool -> OnOff TraceMempool + mempool :: OnOff TraceMempool + mempool :: OnOff TraceMempool +mempool = Bool -> OnOff TraceMempool forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - mux :: OnOff TraceMux - mux :: OnOff TraceMux -mux = Bool -> OnOff TraceMux + mux :: OnOff TraceMux + mux :: OnOff TraceMux +mux = Bool -> OnOff TraceMux forall (name :: Symbol). Bool -> OnOff name OnOff Bool True - localMux :: OnOff TraceLocalMux - localMux :: OnOff TraceLocalMux -localMux = Bool -> OnOff TraceLocalMux + localMux :: OnOff TraceLocalMux + localMux :: OnOff TraceLocalMux +localMux = Bool -> OnOff TraceLocalMux forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - txInbound :: OnOff TraceTxInbound - txInbound :: OnOff TraceTxInbound -txInbound = Bool -> OnOff TraceTxInbound + txInbound :: OnOff TraceTxInbound + txInbound :: OnOff TraceTxInbound +txInbound = Bool -> OnOff TraceTxInbound forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - txOutbound :: OnOff TraceTxOutbound - txOutbound :: OnOff TraceTxOutbound -txOutbound = Bool -> OnOff TraceTxOutbound + txOutbound :: OnOff TraceTxOutbound + txOutbound :: OnOff TraceTxOutbound +txOutbound = Bool -> OnOff TraceTxOutbound forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - txSubmissionProtocol :: OnOff TraceTxSubmissionProtocol - txSubmissionProtocol :: OnOff TraceTxSubmissionProtocol -txSubmissionProtocol = Bool -> OnOff TraceTxSubmissionProtocol + txSubmissionProtocol :: OnOff TraceTxSubmissionProtocol + txSubmissionProtocol :: OnOff TraceTxSubmissionProtocol +txSubmissionProtocol = Bool -> OnOff TraceTxSubmissionProtocol forall (name :: Symbol). Bool -> OnOff name OnOff Bool False - txSubmission2Protocol :: OnOff TraceTxSubmission2Protocol - txSubmission2Protocol :: OnOff TraceTxSubmission2Protocol -txSubmission2Protocol = Bool -> OnOff TraceTxSubmission2Protocol + txSubmission2Protocol :: OnOff TraceTxSubmission2Protocol + txSubmission2Protocol :: OnOff TraceTxSubmission2Protocol +txSubmission2Protocol = Bool -> OnOff TraceTxSubmission2Protocol forall (name :: Symbol). Bool -> OnOff name OnOff Bool False in @@ -569,7 +569,7 @@ -> TraceSelection) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> Object -v Object -> Text -> Parser (Maybe TracingVerbosity) +v Object -> Text -> Parser (Maybe TracingVerbosity) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? Text "TracingVerbosity" Parser (Maybe TracingVerbosity) @@ -652,16 +652,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceAcceptPolicy)) +v Object -> Text -> Parser (Maybe (OnOff TraceAcceptPolicy)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceAcceptPolicy -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceAcceptPolicy -acceptPolicy Parser (Maybe (OnOff TraceAcceptPolicy)) +acceptPolicy Parser (Maybe (OnOff TraceAcceptPolicy)) -> OnOff TraceAcceptPolicy -> Parser (OnOff TraceAcceptPolicy) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceAcceptPolicy -acceptPolicy +acceptPolicy Parser (OnOff TraceBlockFetchClient -> OnOff TraceBlockFetchDecisions @@ -734,17 +734,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceBlockFetchClient)) +v Object -> Text -> Parser (Maybe (OnOff TraceBlockFetchClient)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceBlockFetchClient -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceBlockFetchClient -blockFetchClient Parser (Maybe (OnOff TraceBlockFetchClient)) +blockFetchClient Parser (Maybe (OnOff TraceBlockFetchClient)) -> OnOff TraceBlockFetchClient -> Parser (OnOff TraceBlockFetchClient) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceBlockFetchClient -blockFetchClient +blockFetchClient Parser (OnOff TraceBlockFetchDecisions -> OnOff TraceBlockFetchProtocol @@ -815,17 +815,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceBlockFetchDecisions)) +v Object -> Text -> Parser (Maybe (OnOff TraceBlockFetchDecisions)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceBlockFetchDecisions -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceBlockFetchDecisions -blockFetchDecisions Parser (Maybe (OnOff TraceBlockFetchDecisions)) +blockFetchDecisions Parser (Maybe (OnOff TraceBlockFetchDecisions)) -> OnOff TraceBlockFetchDecisions -> Parser (OnOff TraceBlockFetchDecisions) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceBlockFetchDecisions -blockFetchDecisions +blockFetchDecisions Parser (OnOff TraceBlockFetchProtocol -> OnOff TraceBlockFetchProtocolSerialised @@ -894,17 +894,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceBlockFetchProtocol)) +v Object -> Text -> Parser (Maybe (OnOff TraceBlockFetchProtocol)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceBlockFetchProtocol -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceBlockFetchProtocol -blockFetchProtocol Parser (Maybe (OnOff TraceBlockFetchProtocol)) +blockFetchProtocol Parser (Maybe (OnOff TraceBlockFetchProtocol)) -> OnOff TraceBlockFetchProtocol -> Parser (OnOff TraceBlockFetchProtocol) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceBlockFetchProtocol -blockFetchProtocol +blockFetchProtocol Parser (OnOff TraceBlockFetchProtocolSerialised -> OnOff TraceBlockFetchServer @@ -971,18 +971,18 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object +v Object -> Text -> Parser (Maybe (OnOff TraceBlockFetchProtocolSerialised)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceBlockFetchProtocolSerialised -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceBlockFetchProtocolSerialised -blockFetchProtocolSerialised Parser (Maybe (OnOff TraceBlockFetchProtocolSerialised)) +blockFetchProtocolSerialised Parser (Maybe (OnOff TraceBlockFetchProtocolSerialised)) -> OnOff TraceBlockFetchProtocolSerialised -> Parser (OnOff TraceBlockFetchProtocolSerialised) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceBlockFetchProtocolSerialised -blockFetchProtocolSerialised +blockFetchProtocolSerialised Parser (OnOff TraceBlockFetchServer -> OnOff TraceBlockchainTime @@ -1047,17 +1047,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceBlockFetchServer)) +v Object -> Text -> Parser (Maybe (OnOff TraceBlockFetchServer)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceBlockFetchServer -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceBlockFetchServer -blockFetchServer Parser (Maybe (OnOff TraceBlockFetchServer)) +blockFetchServer Parser (Maybe (OnOff TraceBlockFetchServer)) -> OnOff TraceBlockFetchServer -> Parser (OnOff TraceBlockFetchServer) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceBlockFetchServer -blockFetchServer +blockFetchServer Parser (OnOff TraceBlockchainTime -> OnOff TraceChainDB @@ -1120,16 +1120,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceBlockchainTime)) +v Object -> Text -> Parser (Maybe (OnOff TraceBlockchainTime)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceBlockchainTime -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceBlockchainTime -blockchainTime Parser (Maybe (OnOff TraceBlockchainTime)) +blockchainTime Parser (Maybe (OnOff TraceBlockchainTime)) -> OnOff TraceBlockchainTime -> Parser (OnOff TraceBlockchainTime) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceBlockchainTime -blockchainTime +blockchainTime Parser (OnOff TraceChainDB -> OnOff TraceChainSyncBlockServer @@ -1190,16 +1190,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceChainDB)) +v Object -> Text -> Parser (Maybe (OnOff TraceChainDB)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceChainDB -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceChainDB -chainDB Parser (Maybe (OnOff TraceChainDB)) +chainDB Parser (Maybe (OnOff TraceChainDB)) -> OnOff TraceChainDB -> Parser (OnOff TraceChainDB) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceChainDB -chainDB +chainDB Parser (OnOff TraceChainSyncBlockServer -> OnOff TraceChainSyncClient @@ -1258,17 +1258,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceChainSyncBlockServer)) +v Object -> Text -> Parser (Maybe (OnOff TraceChainSyncBlockServer)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceChainSyncBlockServer -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceChainSyncBlockServer -chainSyncBlockServer Parser (Maybe (OnOff TraceChainSyncBlockServer)) +chainSyncBlockServer Parser (Maybe (OnOff TraceChainSyncBlockServer)) -> OnOff TraceChainSyncBlockServer -> Parser (OnOff TraceChainSyncBlockServer) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceChainSyncBlockServer -chainSyncBlockServer +chainSyncBlockServer Parser (OnOff TraceChainSyncClient -> OnOff TraceChainSyncHeaderServer @@ -1325,17 +1325,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceChainSyncClient)) +v Object -> Text -> Parser (Maybe (OnOff TraceChainSyncClient)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceChainSyncClient -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceChainSyncClient -chainSyncClient Parser (Maybe (OnOff TraceChainSyncClient)) +chainSyncClient Parser (Maybe (OnOff TraceChainSyncClient)) -> OnOff TraceChainSyncClient -> Parser (OnOff TraceChainSyncClient) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceChainSyncClient -chainSyncClient +chainSyncClient Parser (OnOff TraceChainSyncHeaderServer -> OnOff TraceChainSyncProtocol @@ -1390,17 +1390,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceChainSyncHeaderServer)) +v Object -> Text -> Parser (Maybe (OnOff TraceChainSyncHeaderServer)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceChainSyncHeaderServer -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceChainSyncHeaderServer -chainSyncHeaderServer Parser (Maybe (OnOff TraceChainSyncHeaderServer)) +chainSyncHeaderServer Parser (Maybe (OnOff TraceChainSyncHeaderServer)) -> OnOff TraceChainSyncHeaderServer -> Parser (OnOff TraceChainSyncHeaderServer) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceChainSyncHeaderServer -chainSyncHeaderServer +chainSyncHeaderServer Parser (OnOff TraceChainSyncProtocol -> OnOff TraceDiffusionInitialization @@ -1453,17 +1453,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceChainSyncProtocol)) +v Object -> Text -> Parser (Maybe (OnOff TraceChainSyncProtocol)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceChainSyncProtocol -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceChainSyncProtocol -chainSyncProtocol Parser (Maybe (OnOff TraceChainSyncProtocol)) +chainSyncProtocol Parser (Maybe (OnOff TraceChainSyncProtocol)) -> OnOff TraceChainSyncProtocol -> Parser (OnOff TraceChainSyncProtocol) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceChainSyncProtocol -chainSyncProtocol +chainSyncProtocol Parser (OnOff TraceDiffusionInitialization -> OnOff TraceDnsResolver @@ -1514,18 +1514,18 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object +v Object -> Text -> Parser (Maybe (OnOff TraceDiffusionInitialization)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceDiffusionInitialization -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceDiffusionInitialization -diffusionInitialization Parser (Maybe (OnOff TraceDiffusionInitialization)) +diffusionInitialization Parser (Maybe (OnOff TraceDiffusionInitialization)) -> OnOff TraceDiffusionInitialization -> Parser (OnOff TraceDiffusionInitialization) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceDiffusionInitialization -diffusionInitialization +diffusionInitialization Parser (OnOff TraceDnsResolver -> OnOff TraceDnsSubscription @@ -1574,16 +1574,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceDnsResolver)) +v Object -> Text -> Parser (Maybe (OnOff TraceDnsResolver)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceDnsResolver -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceDnsResolver -dnsResolver Parser (Maybe (OnOff TraceDnsResolver)) +dnsResolver Parser (Maybe (OnOff TraceDnsResolver)) -> OnOff TraceDnsResolver -> Parser (OnOff TraceDnsResolver) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceDnsResolver -dnsResolver +dnsResolver Parser (OnOff TraceDnsSubscription -> OnOff TraceErrorPolicy @@ -1630,17 +1630,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceDnsSubscription)) +v Object -> Text -> Parser (Maybe (OnOff TraceDnsSubscription)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceDnsSubscription -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceDnsSubscription -dnsSubscription Parser (Maybe (OnOff TraceDnsSubscription)) +dnsSubscription Parser (Maybe (OnOff TraceDnsSubscription)) -> OnOff TraceDnsSubscription -> Parser (OnOff TraceDnsSubscription) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceDnsSubscription -dnsSubscription +dnsSubscription Parser (OnOff TraceErrorPolicy -> OnOff TraceForge @@ -1685,16 +1685,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceErrorPolicy)) +v Object -> Text -> Parser (Maybe (OnOff TraceErrorPolicy)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceErrorPolicy -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceErrorPolicy -errorPolicy Parser (Maybe (OnOff TraceErrorPolicy)) +errorPolicy Parser (Maybe (OnOff TraceErrorPolicy)) -> OnOff TraceErrorPolicy -> Parser (OnOff TraceErrorPolicy) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceErrorPolicy -errorPolicy +errorPolicy Parser (OnOff TraceForge -> OnOff TraceForgeStateInfo @@ -1737,16 +1737,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceForge)) +v Object -> Text -> Parser (Maybe (OnOff TraceForge)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceForge -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceForge -forge Parser (Maybe (OnOff TraceForge)) +forge Parser (Maybe (OnOff TraceForge)) -> OnOff TraceForge -> Parser (OnOff TraceForge) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceForge -forge +forge Parser (OnOff TraceForgeStateInfo -> OnOff TraceHandshake @@ -1787,16 +1787,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceForgeStateInfo)) +v Object -> Text -> Parser (Maybe (OnOff TraceForgeStateInfo)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceForgeStateInfo -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceForgeStateInfo -forgeStateInfo Parser (Maybe (OnOff TraceForgeStateInfo)) +forgeStateInfo Parser (Maybe (OnOff TraceForgeStateInfo)) -> OnOff TraceForgeStateInfo -> Parser (OnOff TraceForgeStateInfo) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceForgeStateInfo -forgeStateInfo +forgeStateInfo Parser (OnOff TraceHandshake -> OnOff TraceIpSubscription @@ -1835,16 +1835,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceHandshake)) +v Object -> Text -> Parser (Maybe (OnOff TraceHandshake)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceHandshake -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceHandshake -handshake Parser (Maybe (OnOff TraceHandshake)) +handshake Parser (Maybe (OnOff TraceHandshake)) -> OnOff TraceHandshake -> Parser (OnOff TraceHandshake) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceHandshake -handshake +handshake Parser (OnOff TraceIpSubscription -> OnOff TraceKeepAliveClient @@ -1881,16 +1881,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceIpSubscription)) +v Object -> Text -> Parser (Maybe (OnOff TraceIpSubscription)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceIpSubscription -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceIpSubscription -ipSubscription Parser (Maybe (OnOff TraceIpSubscription)) +ipSubscription Parser (Maybe (OnOff TraceIpSubscription)) -> OnOff TraceIpSubscription -> Parser (OnOff TraceIpSubscription) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceIpSubscription -ipSubscription +ipSubscription Parser (OnOff TraceKeepAliveClient -> OnOff TraceLocalChainSyncProtocol @@ -1925,17 +1925,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceKeepAliveClient)) +v Object -> Text -> Parser (Maybe (OnOff TraceKeepAliveClient)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceKeepAliveClient -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceKeepAliveClient -keepAliveClient Parser (Maybe (OnOff TraceKeepAliveClient)) +keepAliveClient Parser (Maybe (OnOff TraceKeepAliveClient)) -> OnOff TraceKeepAliveClient -> Parser (OnOff TraceKeepAliveClient) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceKeepAliveClient -keepAliveClient +keepAliveClient Parser (OnOff TraceLocalChainSyncProtocol -> OnOff TraceLocalErrorPolicy @@ -1968,18 +1968,18 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object +v Object -> Text -> Parser (Maybe (OnOff TraceLocalChainSyncProtocol)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceLocalChainSyncProtocol -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceLocalChainSyncProtocol -localChainSyncProtocol Parser (Maybe (OnOff TraceLocalChainSyncProtocol)) +localChainSyncProtocol Parser (Maybe (OnOff TraceLocalChainSyncProtocol)) -> OnOff TraceLocalChainSyncProtocol -> Parser (OnOff TraceLocalChainSyncProtocol) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceLocalChainSyncProtocol -localChainSyncProtocol +localChainSyncProtocol Parser (OnOff TraceLocalErrorPolicy -> OnOff TraceLocalHandshake @@ -2010,17 +2010,17 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceLocalErrorPolicy)) +v Object -> Text -> Parser (Maybe (OnOff TraceLocalErrorPolicy)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceLocalErrorPolicy -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceLocalErrorPolicy -localErrorPolicy Parser (Maybe (OnOff TraceLocalErrorPolicy)) +localErrorPolicy Parser (Maybe (OnOff TraceLocalErrorPolicy)) -> OnOff TraceLocalErrorPolicy -> Parser (OnOff TraceLocalErrorPolicy) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceLocalErrorPolicy -localErrorPolicy +localErrorPolicy Parser (OnOff TraceLocalHandshake -> OnOff TraceLocalStateQueryProtocol @@ -2049,16 +2049,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceLocalHandshake)) +v Object -> Text -> Parser (Maybe (OnOff TraceLocalHandshake)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceLocalHandshake -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceLocalHandshake -localHandshake Parser (Maybe (OnOff TraceLocalHandshake)) +localHandshake Parser (Maybe (OnOff TraceLocalHandshake)) -> OnOff TraceLocalHandshake -> Parser (OnOff TraceLocalHandshake) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceLocalHandshake -localHandshake +localHandshake Parser (OnOff TraceLocalStateQueryProtocol -> OnOff TraceLocalTxSubmissionProtocol @@ -2085,18 +2085,18 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object +v Object -> Text -> Parser (Maybe (OnOff TraceLocalStateQueryProtocol)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceLocalStateQueryProtocol -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceLocalStateQueryProtocol -localStateQueryProtocol Parser (Maybe (OnOff TraceLocalStateQueryProtocol)) +localStateQueryProtocol Parser (Maybe (OnOff TraceLocalStateQueryProtocol)) -> OnOff TraceLocalStateQueryProtocol -> Parser (OnOff TraceLocalStateQueryProtocol) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceLocalStateQueryProtocol -localStateQueryProtocol +localStateQueryProtocol Parser (OnOff TraceLocalTxSubmissionProtocol -> OnOff TraceLocalTxSubmissionServer @@ -2121,18 +2121,18 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object +v Object -> Text -> Parser (Maybe (OnOff TraceLocalTxSubmissionProtocol)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceLocalTxSubmissionProtocol -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceLocalTxSubmissionProtocol -localTxSubmissionProtocol Parser (Maybe (OnOff TraceLocalTxSubmissionProtocol)) +localTxSubmissionProtocol Parser (Maybe (OnOff TraceLocalTxSubmissionProtocol)) -> OnOff TraceLocalTxSubmissionProtocol -> Parser (OnOff TraceLocalTxSubmissionProtocol) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceLocalTxSubmissionProtocol -localTxSubmissionProtocol +localTxSubmissionProtocol Parser (OnOff TraceLocalTxSubmissionServer -> OnOff TraceMempool @@ -2155,18 +2155,18 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object +v Object -> Text -> Parser (Maybe (OnOff TraceLocalTxSubmissionServer)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceLocalTxSubmissionServer -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceLocalTxSubmissionServer -localTxSubmissionServer Parser (Maybe (OnOff TraceLocalTxSubmissionServer)) +localTxSubmissionServer Parser (Maybe (OnOff TraceLocalTxSubmissionServer)) -> OnOff TraceLocalTxSubmissionServer -> Parser (OnOff TraceLocalTxSubmissionServer) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceLocalTxSubmissionServer -localTxSubmissionServer +localTxSubmissionServer Parser (OnOff TraceMempool -> OnOff TraceMux @@ -2187,16 +2187,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceMempool)) +v Object -> Text -> Parser (Maybe (OnOff TraceMempool)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceMempool -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceMempool -mempool Parser (Maybe (OnOff TraceMempool)) +mempool Parser (Maybe (OnOff TraceMempool)) -> OnOff TraceMempool -> Parser (OnOff TraceMempool) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceMempool -mempool +mempool Parser (OnOff TraceMux -> OnOff TraceLocalMux @@ -2215,16 +2215,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceMux)) +v Object -> Text -> Parser (Maybe (OnOff TraceMux)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceMux -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceMux -mux Parser (Maybe (OnOff TraceMux)) +mux Parser (Maybe (OnOff TraceMux)) -> OnOff TraceMux -> Parser (OnOff TraceMux) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceMux -mux +mux Parser (OnOff TraceLocalMux -> OnOff TraceTxInbound @@ -2241,16 +2241,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceLocalMux)) +v Object -> Text -> Parser (Maybe (OnOff TraceLocalMux)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceLocalMux -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceLocalMux -localMux Parser (Maybe (OnOff TraceLocalMux)) +localMux Parser (Maybe (OnOff TraceLocalMux)) -> OnOff TraceLocalMux -> Parser (OnOff TraceLocalMux) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceLocalMux -localMux +localMux Parser (OnOff TraceTxInbound -> OnOff TraceTxOutbound @@ -2265,16 +2265,16 @@ -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceTxInbound)) +v Object -> Text -> Parser (Maybe (OnOff TraceTxInbound)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceTxInbound -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceTxInbound -txInbound Parser (Maybe (OnOff TraceTxInbound)) +txInbound Parser (Maybe (OnOff TraceTxInbound)) -> OnOff TraceTxInbound -> Parser (OnOff TraceTxInbound) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceTxInbound -txInbound +txInbound Parser (OnOff TraceTxOutbound -> OnOff TraceTxSubmissionProtocol @@ -2286,16 +2286,16 @@ -> OnOff TraceTxSubmission2Protocol -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceTxOutbound)) +v Object -> Text -> Parser (Maybe (OnOff TraceTxOutbound)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceTxOutbound -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceTxOutbound -txOutbound Parser (Maybe (OnOff TraceTxOutbound)) +txOutbound Parser (Maybe (OnOff TraceTxOutbound)) -> OnOff TraceTxOutbound -> Parser (OnOff TraceTxOutbound) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceTxOutbound -txOutbound +txOutbound Parser (OnOff TraceTxSubmissionProtocol -> OnOff TraceTxSubmission2Protocol -> TraceSelection) @@ -2303,31 +2303,31 @@ -> Parser (OnOff TraceTxSubmission2Protocol -> TraceSelection) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceTxSubmissionProtocol)) +v Object -> Text -> Parser (Maybe (OnOff TraceTxSubmissionProtocol)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceTxSubmissionProtocol -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceTxSubmissionProtocol -txSubmissionProtocol Parser (Maybe (OnOff TraceTxSubmissionProtocol)) +txSubmissionProtocol Parser (Maybe (OnOff TraceTxSubmissionProtocol)) -> OnOff TraceTxSubmissionProtocol -> Parser (OnOff TraceTxSubmissionProtocol) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceTxSubmissionProtocol -txSubmissionProtocol +txSubmissionProtocol Parser (OnOff TraceTxSubmission2Protocol -> TraceSelection) -> Parser (OnOff TraceTxSubmission2Protocol) -> Parser TraceSelection forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b <*> Object -v Object -> Text -> Parser (Maybe (OnOff TraceTxSubmission2Protocol)) +v Object -> Text -> Parser (Maybe (OnOff TraceTxSubmission2Protocol)) forall a. FromJSON a => Object -> Text -> Parser (Maybe a) .:? OnOff TraceTxSubmission2Protocol -> Text forall (name :: Symbol). KnownSymbol name => OnOff name -> Text getName OnOff TraceTxSubmission2Protocol -txSubmission2Protocol Parser (Maybe (OnOff TraceTxSubmission2Protocol)) +txSubmission2Protocol Parser (Maybe (OnOff TraceTxSubmission2Protocol)) -> OnOff TraceTxSubmission2Protocol -> Parser (OnOff TraceTxSubmission2Protocol) forall a. Parser (Maybe a) -> a -> Parser a .!= OnOff TraceTxSubmission2Protocol -txSubmission2Protocol) +txSubmission2Protocol) \ No newline at end of file diff --git a/cardano-node/src/Cardano.Tracing.Constraints.html b/cardano-node/src/Cardano.Tracing.Constraints.html index acb3ef3f757..2f1b2473058 100644 --- a/cardano-node/src/Cardano.Tracing.Constraints.html +++ b/cardano-node/src/Cardano.Tracing.Constraints.html @@ -30,27 +30,27 @@ import Ouroboros.Consensus.Shelley.Ledger.Mempool (GenTx, TxId) -- | Tracing-related constraints for monitoring purposes. -type TraceConstraints blk = - ( ConvertTxId blk - , HasTxs blk - , HasTxId (GenTx blk) - , LedgerQueries blk - , ToJSON (TxId (GenTx blk)) +type TraceConstraints blk = + ( ConvertTxId blk + , HasTxs blk + , HasTxId (GenTx blk) + , LedgerQueries blk + , ToJSON (TxId (GenTx blk)) , ToJSON (TxOut (AlonzoEra StandardCrypto)) , ToJSON (PParamsUpdate (AlonzoEra StandardCrypto)) - , ToObject (ApplyTxErr blk) - , ToObject (GenTx blk) - , ToObject (Header blk) - , ToObject (LedgerError blk) - , ToObject (LedgerEvent blk) - , ToObject (OtherHeaderEnvelopeError blk) - , ToObject (ValidationErr (BlockProtocol blk)) - , ToObject (CannotForge blk) - , ToObject (ForgeStateUpdateError blk) + , ToObject (ApplyTxErr blk) + , ToObject (GenTx blk) + , ToObject (Header blk) + , ToObject (LedgerError blk) + , ToObject (LedgerEvent blk) + , ToObject (OtherHeaderEnvelopeError blk) + , ToObject (ValidationErr (BlockProtocol blk)) + , ToObject (CannotForge blk) + , ToObject (ForgeStateUpdateError blk) , ToObject (UtxoPredicateFailure (AlonzoEra StandardCrypto)) , ToObject (AlonzoBbodyPredFail (AlonzoEra StandardCrypto)) , ToObject (AlonzoPredFail (AlonzoEra StandardCrypto)) - , Show blk - , Show (Header blk) + , Show blk + , Show (Header blk) ) \ No newline at end of file diff --git a/cardano-node/src/Cardano.Tracing.ConvertTxId.html b/cardano-node/src/Cardano.Tracing.ConvertTxId.html index 06dd5db7bf7..110cab6b153 100644 --- a/cardano-node/src/Cardano.Tracing.ConvertTxId.html +++ b/cardano-node/src/Cardano.Tracing.ConvertTxId.html @@ -24,33 +24,33 @@ import qualified Shelley.Spec.Ledger.TxBody as Shelley -- | Convert a transaction ID to raw bytes. -class ConvertTxId blk where - txIdToRawBytes :: TxId (GenTx blk) -> ByteString +class ConvertTxId blk where + txIdToRawBytes :: TxId (GenTx blk) -> ByteString instance ConvertTxId ByronBlock where - txIdToRawBytes :: TxId (GenTx ByronBlock) -> ByteString -txIdToRawBytes (ByronTxId txId) = AbstractHash Blake2b_256 Tx -> ByteString + txIdToRawBytes :: TxId (GenTx ByronBlock) -> ByteString +txIdToRawBytes (ByronTxId txId) = AbstractHash Blake2b_256 Tx -> ByteString forall algo a. AbstractHash algo a -> ByteString Byron.Crypto.abstractHashToBytes AbstractHash Blake2b_256 Tx -txId - txIdToRawBytes (ByronDlgId dlgId) = AbstractHash Blake2b_256 Certificate -> ByteString +txId + txIdToRawBytes (ByronDlgId dlgId) = AbstractHash Blake2b_256 Certificate -> ByteString forall algo a. AbstractHash algo a -> ByteString Byron.Crypto.abstractHashToBytes AbstractHash Blake2b_256 Certificate -dlgId - txIdToRawBytes (ByronUpdateProposalId upId) = +dlgId + txIdToRawBytes (ByronUpdateProposalId upId) = AbstractHash Blake2b_256 Proposal -> ByteString forall algo a. AbstractHash algo a -> ByteString Byron.Crypto.abstractHashToBytes AbstractHash Blake2b_256 Proposal -upId - txIdToRawBytes (ByronUpdateVoteId voteId) = +upId + txIdToRawBytes (ByronUpdateVoteId voteId) = AbstractHash Blake2b_256 Vote -> ByteString forall algo a. AbstractHash algo a -> ByteString Byron.Crypto.abstractHashToBytes AbstractHash Blake2b_256 Vote -voteId +voteId -instance ConvertTxId (ShelleyBlock c) where - txIdToRawBytes :: TxId (GenTx (ShelleyBlock c)) -> ByteString -txIdToRawBytes (ShelleyTxId txId) = +instance ConvertTxId (ShelleyBlock c) where + txIdToRawBytes :: TxId (GenTx (ShelleyBlock c)) -> ByteString +txIdToRawBytes (ShelleyTxId txId) = Hash (HASH (Crypto c)) EraIndependentTxBody -> ByteString forall h a. Hash h a -> ByteString Crypto.hashToBytes (Hash (HASH (Crypto c)) EraIndependentTxBody -> ByteString) @@ -76,12 +76,12 @@ Shelley._unTxId (TxId (Crypto c) -> ByteString) -> TxId (Crypto c) -> ByteString forall a b. (a -> b) -> a -> b $ TxId (Crypto c) -txId +txId -instance All ConvertTxId xs - => ConvertTxId (HardForkBlock xs) where - txIdToRawBytes :: TxId (GenTx (HardForkBlock xs)) -> ByteString -txIdToRawBytes = +instance All ConvertTxId xs + => ConvertTxId (HardForkBlock xs) where + txIdToRawBytes :: TxId (GenTx (HardForkBlock xs)) -> ByteString +txIdToRawBytes = NS (K ByteString) xs -> ByteString forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => diff --git a/cardano-node/src/Cardano.Tracing.Kernel.html b/cardano-node/src/Cardano.Tracing.Kernel.html index cfef1b5b6da..a1112292812 100644 --- a/cardano-node/src/Cardano.Tracing.Kernel.html +++ b/cardano-node/src/Cardano.Tracing.Kernel.html @@ -33,16 +33,16 @@ import Ouroboros.Network.NodeToNode (RemoteConnectionId) -newtype NodeKernelData blk = +newtype NodeKernelData blk = NodeKernelData { NodeKernelData blk -> IORef (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk)) -unNodeKernelData :: IORef (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk)) +unNodeKernelData :: IORef (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk)) } -mkNodeKernelData :: IO (NodeKernelData blk) +mkNodeKernelData :: IO (NodeKernelData blk) mkNodeKernelData :: IO (NodeKernelData blk) mkNodeKernelData = IORef (StrictMaybe @@ -75,16 +75,16 @@ forall a. StrictMaybe a SNothing -setNodeKernel :: NodeKernelData blk - -> NodeKernel IO RemoteConnectionId LocalConnectionId blk +setNodeKernel :: NodeKernelData blk + -> NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO () setNodeKernel :: NodeKernelData blk -> NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO () -setNodeKernel (NodeKernelData IORef +setNodeKernel (NodeKernelData IORef (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk)) -ref) NodeKernel IO RemoteConnectionId LocalConnectionId blk -nodeKern = +ref) NodeKernel IO RemoteConnectionId LocalConnectionId blk +nodeKern = IORef (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk)) @@ -95,7 +95,7 @@ writeIORef IORef (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk)) -ref (StrictMaybe +ref (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk) -> IO ()) -> StrictMaybe @@ -107,19 +107,19 @@ (NodeKernel IO RemoteConnectionId LocalConnectionId blk) forall a. a -> StrictMaybe a SJust NodeKernel IO RemoteConnectionId LocalConnectionId blk -nodeKern +nodeKern -mapNodeKernelDataIO :: - (NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO a) - -> NodeKernelData blk - -> IO (StrictMaybe a) +mapNodeKernelDataIO :: + (NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO a) + -> NodeKernelData blk + -> IO (StrictMaybe a) mapNodeKernelDataIO :: (NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO a) -> NodeKernelData blk -> IO (StrictMaybe a) -mapNodeKernelDataIO NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO a -f (NodeKernelData IORef +mapNodeKernelDataIO NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO a +f (NodeKernelData IORef (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk)) -ref) = +ref) = IORef (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk)) @@ -130,7 +130,7 @@ readIORef IORef (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk)) -ref IO +ref IO (StrictMaybe (NodeKernel IO RemoteConnectionId LocalConnectionId blk)) -> (StrictMaybe @@ -146,23 +146,23 @@ (Traversable t, Applicative f) => (a -> f b) -> t a -> f (t b) traverse NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO a -f +f -nkQueryLedger :: - IsLedger (LedgerState blk) - => (ExtLedgerState blk -> a) - -> NodeKernel IO RemoteConnectionId LocalConnectionId blk - -> IO a +nkQueryLedger :: + IsLedger (LedgerState blk) + => (ExtLedgerState blk -> a) + -> NodeKernel IO RemoteConnectionId LocalConnectionId blk + -> IO a nkQueryLedger :: (ExtLedgerState blk -> a) -> NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO a -nkQueryLedger ExtLedgerState blk -> a -f NodeKernel{ChainDB IO blk +nkQueryLedger ExtLedgerState blk -> a +f NodeKernel{ChainDB IO blk $sel:getChainDB:NodeKernel :: forall (m :: * -> *) remotePeer localPeer blk. NodeKernel m remotePeer localPeer blk -> ChainDB m blk getChainDB :: ChainDB IO blk getChainDB} = ExtLedgerState blk -> a -f (ExtLedgerState blk -> a) -> IO (ExtLedgerState blk) -> IO a +f (ExtLedgerState blk -> a) -> IO (ExtLedgerState blk) -> IO a forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> STM (ExtLedgerState blk) -> IO (ExtLedgerState blk) forall a. STM a -> IO a @@ -171,22 +171,22 @@ (Monad (STM m), IsLedger (LedgerState blk)) => ChainDB m blk -> STM m (ExtLedgerState blk) ChainDB.getCurrentLedger ChainDB IO blk -getChainDB) +getChainDB) -nkQueryChain :: - (AF.AnchoredFragment (Header blk) -> a) - -> NodeKernel IO RemoteConnectionId LocalConnectionId blk - -> IO a +nkQueryChain :: + (AF.AnchoredFragment (Header blk) -> a) + -> NodeKernel IO RemoteConnectionId LocalConnectionId blk + -> IO a nkQueryChain :: (AnchoredFragment (Header blk) -> a) -> NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO a -nkQueryChain AnchoredFragment (Header blk) -> a -f NodeKernel{ChainDB IO blk +nkQueryChain AnchoredFragment (Header blk) -> a +f NodeKernel{ChainDB IO blk getChainDB :: ChainDB IO blk $sel:getChainDB:NodeKernel :: forall (m :: * -> *) remotePeer localPeer blk. NodeKernel m remotePeer localPeer blk -> ChainDB m blk -getChainDB} = +getChainDB} = AnchoredFragment (Header blk) -> a -f (AnchoredFragment (Header blk) -> a) +f (AnchoredFragment (Header blk) -> a) -> IO (AnchoredFragment (Header blk)) -> IO a forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> STM (AnchoredFragment (Header blk)) @@ -196,5 +196,5 @@ forall (m :: * -> *) blk. ChainDB m blk -> STM m (AnchoredFragment (Header blk)) ChainDB.getCurrentChain ChainDB IO blk -getChainDB) +getChainDB) \ No newline at end of file diff --git a/cardano-node/src/Cardano.Tracing.Metrics.html b/cardano-node/src/Cardano.Tracing.Metrics.html index 3af49e669ab..30a26008020 100644 --- a/cardano-node/src/Cardano.Tracing.Metrics.html +++ b/cardano-node/src/Cardano.Tracing.Metrics.html @@ -64,48 +64,48 @@ -- | The start KES period of the configured operational certificate. newtype OperationalCertStartKESPeriod = OperationalCertStartKESPeriod Period -class HasKESMetricsData blk where +class HasKESMetricsData blk where -- Because 'ForgeStateInfo' is a type family, we need a Proxy argument to -- disambiguate. - getKESMetricsData :: Proxy blk -> ForgeStateInfo blk -> KESMetricsData + getKESMetricsData :: Proxy blk -> ForgeStateInfo blk -> KESMetricsData -- Default to 'NoKESMetricsData' - getKESMetricsData Proxy blk + getKESMetricsData Proxy blk _ ForgeStateInfo blk _ = KESMetricsData NoKESMetricsData -instance HasKESMetricsData (ShelleyBlock c) where - getKESMetricsData :: Proxy (ShelleyBlock c) +instance HasKESMetricsData (ShelleyBlock c) where + getKESMetricsData :: Proxy (ShelleyBlock c) -> ForgeStateInfo (ShelleyBlock c) -> KESMetricsData -getKESMetricsData Proxy (ShelleyBlock c) -_ ForgeStateInfo (ShelleyBlock c) -forgeStateInfo = +getKESMetricsData Proxy (ShelleyBlock c) +_ ForgeStateInfo (ShelleyBlock c) +forgeStateInfo = Period -> MaxKESEvolutions -> OperationalCertStartKESPeriod -> KESMetricsData TPraosKESMetricsData Period -currKesPeriod MaxKESEvolutions -maxKesEvos OperationalCertStartKESPeriod -oCertStartKesPeriod +currKesPeriod MaxKESEvolutions +maxKesEvos OperationalCertStartKESPeriod +oCertStartKesPeriod where HotKey.KESInfo { kesStartPeriod :: KESInfo -> KESPeriod -kesStartPeriod = KESPeriod Period -startKesPeriod +kesStartPeriod = KESPeriod Period +startKesPeriod , kesEvolution :: KESInfo -> Period -kesEvolution = Period -currKesPeriod +kesEvolution = Period +currKesPeriod , kesEndPeriod :: KESInfo -> KESPeriod -kesEndPeriod = KESPeriod Period -endKesPeriod +kesEndPeriod = KESPeriod Period +endKesPeriod } = ForgeStateInfo (ShelleyBlock c) KESInfo -forgeStateInfo +forgeStateInfo - maxKesEvos :: MaxKESEvolutions -maxKesEvos = Word64 -> MaxKESEvolutions + maxKesEvos :: MaxKESEvolutions +maxKesEvos = Word64 -> MaxKESEvolutions MaxKESEvolutions (Word64 -> MaxKESEvolutions) -> Word64 -> MaxKESEvolutions forall a b. (a -> b) -> a -> b $ @@ -114,29 +114,29 @@ fromIntegral (Period -> Word64) -> Period -> Word64 forall a b. (a -> b) -> a -> b $ Period -endKesPeriod Period -> Period -> Period +endKesPeriod Period -> Period -> Period forall a. Num a => a -> a -> a - Period -startKesPeriod +startKesPeriod - oCertStartKesPeriod :: OperationalCertStartKESPeriod -oCertStartKesPeriod = Period -> OperationalCertStartKESPeriod + oCertStartKesPeriod :: OperationalCertStartKESPeriod +oCertStartKesPeriod = Period -> OperationalCertStartKESPeriod OperationalCertStartKESPeriod Period -startKesPeriod +startKesPeriod -instance HasKESMetricsData ByronBlock where +instance HasKESMetricsData ByronBlock where -instance All HasKESMetricsData xs => HasKESMetricsData (HardForkBlock xs) where - getKESMetricsData :: Proxy (HardForkBlock xs) +instance All HasKESMetricsData xs => HasKESMetricsData (HardForkBlock xs) where + getKESMetricsData :: Proxy (HardForkBlock xs) -> ForgeStateInfo (HardForkBlock xs) -> KESMetricsData -getKESMetricsData Proxy (HardForkBlock xs) -_ ForgeStateInfo (HardForkBlock xs) -forgeStateInfo = +getKESMetricsData Proxy (HardForkBlock xs) +_ ForgeStateInfo (HardForkBlock xs) +forgeStateInfo = case ForgeStateInfo (HardForkBlock xs) -forgeStateInfo of +forgeStateInfo of CurrentEraLacksBlockForging _ -> KESMetricsData NoKESMetricsData - CurrentEraForgeStateUpdated currentEraForgeStateInfo -> + CurrentEraForgeStateUpdated currentEraForgeStateInfo -> NS (K KESMetricsData) xs -> KESMetricsData forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -166,7 +166,7 @@ Proxy @HasKESMetricsData) forall a. HasKESMetricsData a => WrapForgeStateInfo a -> K KESMetricsData a -getOne +getOne (NS WrapForgeStateInfo xs -> NS (K KESMetricsData) xs) -> (OneEraForgeStateInfo xs -> NS WrapForgeStateInfo xs) -> OneEraForgeStateInfo xs @@ -182,13 +182,13 @@ -> OneEraForgeStateInfo xs -> KESMetricsData forall a b. (a -> b) -> a -> b $ OneEraForgeStateInfo xs -currentEraForgeStateInfo +currentEraForgeStateInfo where - getOne :: forall blk. HasKESMetricsData blk - => WrapForgeStateInfo blk - -> K KESMetricsData blk - getOne :: WrapForgeStateInfo blk -> K KESMetricsData blk -getOne = KESMetricsData -> K KESMetricsData blk + getOne :: forall blk. HasKESMetricsData blk + => WrapForgeStateInfo blk + -> K KESMetricsData blk + getOne :: WrapForgeStateInfo blk -> K KESMetricsData blk +getOne = KESMetricsData -> K KESMetricsData blk forall k a (b :: k). a -> K a b K (KESMetricsData -> K KESMetricsData blk) -> (WrapForgeStateInfo blk -> KESMetricsData) @@ -203,7 +203,7 @@ Proxy blk -> ForgeStateInfo blk -> KESMetricsData getKESMetricsData (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) (ForgeStateInfo blk -> KESMetricsData) +Proxy @blk) (ForgeStateInfo blk -> KESMetricsData) -> (WrapForgeStateInfo blk -> ForgeStateInfo blk) -> WrapForgeStateInfo blk -> KESMetricsData @@ -214,34 +214,34 @@ forall blk. WrapForgeStateInfo blk -> ForgeStateInfo blk unwrapForgeStateInfo -class HasKESInfo blk where - getKESInfo :: Proxy blk -> ForgeStateUpdateError blk -> Maybe HotKey.KESInfo - getKESInfo Proxy blk +class HasKESInfo blk where + getKESInfo :: Proxy blk -> ForgeStateUpdateError blk -> Maybe HotKey.KESInfo + getKESInfo Proxy blk _ ForgeStateUpdateError blk _ = Maybe KESInfo forall a. Maybe a Nothing -instance HasKESInfo (ShelleyBlock era) where - getKESInfo :: Proxy (ShelleyBlock era) +instance HasKESInfo (ShelleyBlock era) where + getKESInfo :: Proxy (ShelleyBlock era) -> ForgeStateUpdateError (ShelleyBlock era) -> Maybe KESInfo -getKESInfo Proxy (ShelleyBlock era) -_ (HotKey.KESCouldNotEvolve ki _) = KESInfo -> Maybe KESInfo +getKESInfo Proxy (ShelleyBlock era) +_ (HotKey.KESCouldNotEvolve ki _) = KESInfo -> Maybe KESInfo forall a. a -> Maybe a Just KESInfo -ki +ki getKESInfo Proxy (ShelleyBlock era) -_ (HotKey.KESKeyAlreadyPoisoned ki _) = KESInfo -> Maybe KESInfo +_ (HotKey.KESKeyAlreadyPoisoned ki _) = KESInfo -> Maybe KESInfo forall a. a -> Maybe a Just KESInfo -ki +ki -instance HasKESInfo ByronBlock +instance HasKESInfo ByronBlock -instance All HasKESInfo xs => HasKESInfo (HardForkBlock xs) where - getKESInfo :: Proxy (HardForkBlock xs) +instance All HasKESInfo xs => HasKESInfo (HardForkBlock xs) where + getKESInfo :: Proxy (HardForkBlock xs) -> ForgeStateUpdateError (HardForkBlock xs) -> Maybe KESInfo -getKESInfo Proxy (HardForkBlock xs) +getKESInfo Proxy (HardForkBlock xs) _ = NS (K (Maybe KESInfo)) xs -> Maybe KESInfo forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. @@ -272,7 +272,7 @@ Proxy @HasKESInfo) forall a. HasKESInfo a => WrapForgeStateUpdateError a -> K (Maybe KESInfo) a -getOne +getOne (NS WrapForgeStateUpdateError xs -> NS (K (Maybe KESInfo)) xs) -> (OneEraForgeStateUpdateError xs -> NS WrapForgeStateUpdateError xs) @@ -286,11 +286,11 @@ OneEraForgeStateUpdateError xs -> NS WrapForgeStateUpdateError xs getOneEraForgeStateUpdateError where - getOne :: forall blk. HasKESInfo blk - => WrapForgeStateUpdateError blk - -> K (Maybe HotKey.KESInfo) blk - getOne :: WrapForgeStateUpdateError blk -> K (Maybe KESInfo) blk -getOne = Maybe KESInfo -> K (Maybe KESInfo) blk + getOne :: forall blk. HasKESInfo blk + => WrapForgeStateUpdateError blk + -> K (Maybe HotKey.KESInfo) blk + getOne :: WrapForgeStateUpdateError blk -> K (Maybe KESInfo) blk +getOne = Maybe KESInfo -> K (Maybe KESInfo) blk forall k a (b :: k). a -> K a b K (Maybe KESInfo -> K (Maybe KESInfo) blk) -> (WrapForgeStateUpdateError blk -> Maybe KESInfo) @@ -305,7 +305,7 @@ Proxy blk -> ForgeStateUpdateError blk -> Maybe KESInfo getKESInfo (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) (ForgeStateUpdateError blk -> Maybe KESInfo) +Proxy @blk) (ForgeStateUpdateError blk -> Maybe KESInfo) -> (WrapForgeStateUpdateError blk -> ForgeStateUpdateError blk) -> WrapForgeStateUpdateError blk -> Maybe KESInfo @@ -399,56 +399,56 @@ -> (Int -> Int) -> IO Int mapForgingStatsTxsProcessed :: ForgingStats -> (Int -> Int) -> IO Int -mapForgingStatsTxsProcessed ForgingStats -fs Int -> Int -f = +mapForgingStatsTxsProcessed ForgingStats +fs Int -> Int +f = IORef Int -> (Int -> (Int, Int)) -> IO Int forall a b. IORef a -> (a -> (a, b)) -> IO b atomicModifyIORef' (ForgingStats -> IORef Int fsTxsProcessedNum ForgingStats -fs) ((Int -> (Int, Int)) -> IO Int) -> (Int -> (Int, Int)) -> IO Int +fs) ((Int -> (Int, Int)) -> IO Int) -> (Int -> (Int, Int)) -> IO Int forall a b. (a -> b) -> a -> b $ - \Int -txCount -> (Int -> Int -> (Int, Int)) -> Int -> (Int, Int) + \Int +txCount -> (Int -> Int -> (Int, Int)) -> Int -> (Int, Int) forall (m :: * -> *) a. Monad m => m (m a) -> m a join (,) (Int -> (Int, Int)) -> Int -> (Int, Int) forall a b. (a -> b) -> a -> b $ Int -> Int -f Int -txCount +f Int +txCount -mapForgingCurrentThreadStats :: +mapForgingCurrentThreadStats :: ForgingStats - -> (ForgeThreadStats -> (ForgeThreadStats, a)) - -> IO a + -> (ForgeThreadStats -> (ForgeThreadStats, a)) + -> IO a mapForgingCurrentThreadStats :: ForgingStats -> (ForgeThreadStats -> (ForgeThreadStats, a)) -> IO a -mapForgingCurrentThreadStats ForgingStats { TVar (Map ThreadId (TVar ForgeThreadStats)) +mapForgingCurrentThreadStats ForgingStats { TVar (Map ThreadId (TVar ForgeThreadStats)) fsState :: TVar (Map ThreadId (TVar ForgeThreadStats)) fsState :: ForgingStats -> TVar (Map ThreadId (TVar ForgeThreadStats)) -fsState } ForgeThreadStats -> (ForgeThreadStats, a) -f = do - ThreadId -tid <- IO ThreadId +fsState } ForgeThreadStats -> (ForgeThreadStats, a) +f = do + ThreadId +tid <- IO ThreadId myThreadId - Map ThreadId (TVar ForgeThreadStats) -allStats <- TVar (Map ThreadId (TVar ForgeThreadStats)) + Map ThreadId (TVar ForgeThreadStats) +allStats <- TVar (Map ThreadId (TVar ForgeThreadStats)) -> IO (Map ThreadId (TVar ForgeThreadStats)) forall a. TVar a -> IO a readTVarIO TVar (Map ThreadId (TVar ForgeThreadStats)) -fsState - TVar ForgeThreadStats -varStats <- case ThreadId +fsState + TVar ForgeThreadStats +varStats <- case ThreadId -> Map ThreadId (TVar ForgeThreadStats) -> Maybe (TVar ForgeThreadStats) forall k a. Ord k => k -> Map k a -> Maybe a Map.lookup ThreadId -tid Map ThreadId (TVar ForgeThreadStats) -allStats of +tid Map ThreadId (TVar ForgeThreadStats) +allStats of Maybe (TVar ForgeThreadStats) Nothing -> do - TVar ForgeThreadStats -varStats <- ForgeThreadStats -> IO (TVar ForgeThreadStats) + TVar ForgeThreadStats +varStats <- ForgeThreadStats -> IO (TVar ForgeThreadStats) forall a. a -> IO (TVar a) newTVarIO (ForgeThreadStats -> IO (TVar ForgeThreadStats)) -> ForgeThreadStats -> IO (TVar ForgeThreadStats) @@ -470,7 +470,7 @@ -> STM () forall a. TVar a -> (a -> a) -> STM () modifyTVar TVar (Map ThreadId (TVar ForgeThreadStats)) -fsState ((Map ThreadId (TVar ForgeThreadStats) +fsState ((Map ThreadId (TVar ForgeThreadStats) -> Map ThreadId (TVar ForgeThreadStats)) -> STM ()) -> (Map ThreadId (TVar ForgeThreadStats) @@ -483,51 +483,51 @@ -> Map ThreadId (TVar ForgeThreadStats) forall k a. Ord k => k -> a -> Map k a -> Map k a Map.insert ThreadId -tid TVar ForgeThreadStats -varStats +tid TVar ForgeThreadStats +varStats TVar ForgeThreadStats -> IO (TVar ForgeThreadStats) forall (m :: * -> *) a. Monad m => a -> m a return TVar ForgeThreadStats -varStats - Just TVar ForgeThreadStats -varStats -> +varStats + Just TVar ForgeThreadStats +varStats -> TVar ForgeThreadStats -> IO (TVar ForgeThreadStats) forall (m :: * -> *) a. Monad m => a -> m a return TVar ForgeThreadStats -varStats +varStats STM a -> IO a forall a. STM a -> IO a atomically (STM a -> IO a) -> STM a -> IO a forall a b. (a -> b) -> a -> b $ do - ForgeThreadStats -stats <- TVar ForgeThreadStats -> STM ForgeThreadStats + ForgeThreadStats +stats <- TVar ForgeThreadStats -> STM ForgeThreadStats forall a. TVar a -> STM a readTVar TVar ForgeThreadStats -varStats - let !(!ForgeThreadStats -stats', a -x) = ForgeThreadStats -> (ForgeThreadStats, a) -f ForgeThreadStats -stats +varStats + let !(!ForgeThreadStats +stats', a +x) = ForgeThreadStats -> (ForgeThreadStats, a) +f ForgeThreadStats +stats TVar ForgeThreadStats -> ForgeThreadStats -> STM () forall a. TVar a -> a -> STM () writeTVar TVar ForgeThreadStats -varStats ForgeThreadStats -stats' +varStats ForgeThreadStats +stats' a -> STM a forall (m :: * -> *) a. Monad m => a -> m a return a -x +x mapForgingCurrentThreadStats_ :: ForgingStats -> (ForgeThreadStats -> ForgeThreadStats) -> IO () mapForgingCurrentThreadStats_ :: ForgingStats -> (ForgeThreadStats -> ForgeThreadStats) -> IO () -mapForgingCurrentThreadStats_ ForgingStats -fs ForgeThreadStats -> ForgeThreadStats -f = +mapForgingCurrentThreadStats_ ForgingStats +fs ForgeThreadStats -> ForgeThreadStats +f = IO () -> IO () forall (f :: * -> *) a. Functor f => f a -> f () void (IO () -> IO ()) -> IO () -> IO () @@ -537,7 +537,7 @@ forall a. ForgingStats -> (ForgeThreadStats -> (ForgeThreadStats, a)) -> IO a mapForgingCurrentThreadStats ForgingStats -fs ((, ()) (ForgeThreadStats -> (ForgeThreadStats, ())) +fs ((, ()) (ForgeThreadStats -> (ForgeThreadStats, ())) -> (ForgeThreadStats -> ForgeThreadStats) -> ForgeThreadStats -> (ForgeThreadStats, ()) @@ -545,27 +545,27 @@ Category cat => cat b c -> cat a b -> cat a c . ForgeThreadStats -> ForgeThreadStats -f) +f) -threadStatsProjection :: +threadStatsProjection :: ForgingStats - -> (ForgeThreadStats -> a) - -> IO [a] + -> (ForgeThreadStats -> a) + -> IO [a] threadStatsProjection :: ForgingStats -> (ForgeThreadStats -> a) -> IO [a] -threadStatsProjection ForgingStats -fs ForgeThreadStats -> a -f = STM [a] -> IO [a] +threadStatsProjection ForgingStats +fs ForgeThreadStats -> a +f = STM [a] -> IO [a] forall a. STM a -> IO a atomically (STM [a] -> IO [a]) -> STM [a] -> IO [a] forall a b. (a -> b) -> a -> b $ do - Map ThreadId (TVar ForgeThreadStats) -allStats <- TVar (Map ThreadId (TVar ForgeThreadStats)) + Map ThreadId (TVar ForgeThreadStats) +allStats <- TVar (Map ThreadId (TVar ForgeThreadStats)) -> STM (Map ThreadId (TVar ForgeThreadStats)) forall a. TVar a -> STM a readTVar (ForgingStats -> TVar (Map ThreadId (TVar ForgeThreadStats)) fsState ForgingStats -fs) +fs) (TVar ForgeThreadStats -> STM a) -> [TVar ForgeThreadStats] -> STM [a] forall (t :: * -> *) (m :: * -> *) a b. @@ -574,7 +574,7 @@ mapM ((ForgeThreadStats -> a) -> STM ForgeThreadStats -> STM a forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b fmap ForgeThreadStats -> a -f (STM ForgeThreadStats -> STM a) +f (STM ForgeThreadStats -> STM a) -> (TVar ForgeThreadStats -> STM ForgeThreadStats) -> TVar ForgeThreadStats -> STM a @@ -589,5 +589,5 @@ $ Map ThreadId (TVar ForgeThreadStats) -> [TVar ForgeThreadStats] forall k a. Map k a -> [a] Map.elems Map ThreadId (TVar ForgeThreadStats) -allStats +allStats \ No newline at end of file diff --git a/cardano-node/src/Cardano.Tracing.OrphanInstances.Byron.html b/cardano-node/src/Cardano.Tracing.OrphanInstances.Byron.html index 619accc1849..4e4d9a28e81 100644 --- a/cardano-node/src/Cardano.Tracing.OrphanInstances.Byron.html +++ b/cardano-node/src/Cardano.Tracing.OrphanInstances.Byron.html @@ -42,11 +42,11 @@ -- -- NOTE: this list is sorted by the unqualified name of the outermost type. -instance ToObject ApplyMempoolPayloadErr where - toObject :: TracingVerbosity -> ApplyMempoolPayloadErr -> Object -toObject TracingVerbosity -_verb (MempoolTxErr UTxOValidationError -utxoValidationErr) = +instance ToObject ApplyMempoolPayloadErr where + toObject :: TracingVerbosity -> ApplyMempoolPayloadErr -> Object +toObject TracingVerbosity +_verb (MempoolTxErr UTxOValidationError +utxoValidationErr) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -63,11 +63,11 @@ String (UTxOValidationError -> Text forall a b. (Show a, ConvertText String b) => a -> b show UTxOValidationError -utxoValidationErr) +utxoValidationErr) ] - toObject TracingVerbosity -_verb (MempoolDlgErr Error -delegScheduleError) = + toObject TracingVerbosity +_verb (MempoolDlgErr Error +delegScheduleError) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -84,11 +84,11 @@ String (Error -> Text forall a b. (Show a, ConvertText String b) => a -> b show Error -delegScheduleError) +delegScheduleError) ] - toObject TracingVerbosity -_verb (MempoolUpdateProposalErr Error -iFaceErr) = + toObject TracingVerbosity +_verb (MempoolUpdateProposalErr Error +iFaceErr) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -105,11 +105,11 @@ String (Error -> Text forall a b. (Show a, ConvertText String b) => a -> b show Error -iFaceErr) +iFaceErr) ] - toObject TracingVerbosity -_verb (MempoolUpdateVoteErr Error -iFaceErrr) = + toObject TracingVerbosity +_verb (MempoolUpdateVoteErr Error +iFaceErrr) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -126,14 +126,14 @@ String (Error -> Text forall a b. (Show a, ConvertText String b) => a -> b show Error -iFaceErrr) +iFaceErrr) ] -instance ToObject ByronLedgerUpdate where - toObject :: TracingVerbosity -> ByronLedgerUpdate -> Object -toObject TracingVerbosity -verb (ByronUpdatedProtocolUpdates [ProtocolUpdate] -protocolUpdates) = +instance ToObject ByronLedgerUpdate where + toObject :: TracingVerbosity -> ByronLedgerUpdate -> Object +toObject TracingVerbosity +verb (ByronUpdatedProtocolUpdates [ProtocolUpdate] +protocolUpdates) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -151,16 +151,16 @@ map (TracingVerbosity -> ProtocolUpdate -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) [ProtocolUpdate] -protocolUpdates +verb) [ProtocolUpdate] +protocolUpdates ] -instance ToObject ProtocolUpdate where - toObject :: TracingVerbosity -> ProtocolUpdate -> Object -toObject TracingVerbosity -verb (ProtocolUpdate ProtocolVersion -updateVersion UpdateState -updateState) = +instance ToObject ProtocolUpdate where + toObject :: TracingVerbosity -> ProtocolUpdate -> Object +toObject TracingVerbosity +verb (ProtocolUpdate ProtocolVersion +updateVersion UpdateState +updateState) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -174,25 +174,25 @@ "protocolUpdateVersion" Text -> ProtocolVersion -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ProtocolVersion -updateVersion +updateVersion , Text "protocolUpdateState" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> UpdateState -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb UpdateState -updateState +verb UpdateState +updateState ] -instance ToObject UpdateState where - toObject :: TracingVerbosity -> UpdateState -> Object -toObject TracingVerbosity -_verb UpdateState -updateState = case UpdateState -updateState of - UpdateRegistered SlotNo -slot -> +instance ToObject UpdateState where + toObject :: TracingVerbosity -> UpdateState -> Object +toObject TracingVerbosity +_verb UpdateState +updateState = case UpdateState +updateState of + UpdateRegistered SlotNo +slot -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -206,10 +206,10 @@ "slot" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot +slot ] - UpdateActive Set KeyHash -votes -> + UpdateActive Set KeyHash +votes -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -234,10 +234,10 @@ show) (Set KeyHash -> [KeyHash] forall a. Set a -> [a] Set.toList Set KeyHash -votes) +votes) ] - UpdateConfirmed SlotNo -slot -> + UpdateConfirmed SlotNo +slot -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -251,10 +251,10 @@ "slot" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot +slot ] - UpdateStablyConfirmed Set KeyHash -endorsements -> + UpdateStablyConfirmed Set KeyHash +endorsements -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -279,11 +279,11 @@ show) (Set KeyHash -> [KeyHash] forall a. Set a -> [a] Set.toList Set KeyHash -endorsements) +endorsements) ] - UpdateCandidate SlotNo -slot EpochNo -epoch -> + UpdateCandidate SlotNo +slot EpochNo +epoch -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -297,15 +297,15 @@ "slot" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot +slot , Text "epoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -epoch +epoch ] - UpdateStableCandidate EpochNo -transitionEpoch -> + UpdateStableCandidate EpochNo +transitionEpoch -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -319,14 +319,14 @@ "transitionEpoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -transitionEpoch +transitionEpoch ] -instance ToObject (GenTx ByronBlock) where - toObject :: TracingVerbosity -> GenTx ByronBlock -> Object -toObject TracingVerbosity -verb GenTx ByronBlock -tx = +instance ToObject (GenTx ByronBlock) where + toObject :: TracingVerbosity -> GenTx ByronBlock -> Object +toObject TracingVerbosity +verb GenTx ByronBlock +tx = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -338,7 +338,7 @@ .= GenTx ByronBlock -> TxId (GenTx ByronBlock) forall tx. HasTxId tx => tx -> TxId tx txId GenTx ByronBlock -tx ] +tx ] [(Text, Value)] -> [(Text, Value)] -> [(Text, Value)] forall a. [a] -> [a] -> [a] ++ [ Text @@ -347,45 +347,45 @@ .= GenTx ByronBlock -> String forall a. Condense a => a -> String condense GenTx ByronBlock -tx | TracingVerbosity -verb TracingVerbosity -> TracingVerbosity -> Bool +tx | TracingVerbosity +verb TracingVerbosity -> TracingVerbosity -> Bool forall a. Eq a => a -> a -> Bool == TracingVerbosity MaximalVerbosity ] -instance ToJSON (TxId (GenTx ByronBlock)) where - toJSON :: TxId (GenTx ByronBlock) -> Value -toJSON (ByronTxId i) = String -> Value +instance ToJSON (TxId (GenTx ByronBlock)) where + toJSON :: TxId (GenTx ByronBlock) -> Value +toJSON (ByronTxId i) = String -> Value forall a. ToJSON a => a -> Value toJSON (TxId -> String forall a. Condense a => a -> String condense TxId -i) - toJSON (ByronDlgId i) = String -> Value +i) + toJSON (ByronDlgId i) = String -> Value forall a. ToJSON a => a -> Value toJSON (CertificateId -> String forall a. Condense a => a -> String condense CertificateId -i) - toJSON (ByronUpdateProposalId i) = String -> Value +i) + toJSON (ByronUpdateProposalId i) = String -> Value forall a. ToJSON a => a -> Value toJSON (UpId -> String forall a. Condense a => a -> String condense UpId -i) - toJSON (ByronUpdateVoteId i) = String -> Value +i) + toJSON (ByronUpdateVoteId i) = String -> Value forall a. ToJSON a => a -> Value toJSON (VoteId -> String forall a. Condense a => a -> String condense VoteId -i) +i) -instance ToObject ChainValidationError where - toObject :: TracingVerbosity -> ChainValidationError -> Object -toObject TracingVerbosity -_verb ChainValidationError +instance ToObject ChainValidationError where + toObject :: TracingVerbosity -> ChainValidationError -> Object +toObject TracingVerbosity +_verb ChainValidationError ChainValidationBoundaryTooLarge = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -396,8 +396,8 @@ .= Text -> Value String Text "ChainValidationBoundaryTooLarge" ] - toObject TracingVerbosity -_verb ChainValidationError + toObject TracingVerbosity +_verb ChainValidationError ChainValidationBlockAttributesTooLarge = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -408,8 +408,8 @@ .= Text -> Value String Text "ChainValidationBlockAttributesTooLarge" ] - toObject TracingVerbosity -_verb (ChainValidationBlockTooLarge Natural + toObject TracingVerbosity +_verb (ChainValidationBlockTooLarge Natural _ Natural _) = [(Text, Value)] -> Object @@ -421,8 +421,8 @@ .= Text -> Value String Text "ChainValidationBlockTooLarge" ] - toObject TracingVerbosity -_verb ChainValidationError + toObject TracingVerbosity +_verb ChainValidationError ChainValidationHeaderAttributesTooLarge = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -433,8 +433,8 @@ .= Text -> Value String Text "ChainValidationHeaderAttributesTooLarge" ] - toObject TracingVerbosity -_verb (ChainValidationHeaderTooLarge Natural + toObject TracingVerbosity +_verb (ChainValidationHeaderTooLarge Natural _ Natural _) = [(Text, Value)] -> Object @@ -446,9 +446,9 @@ .= Text -> Value String Text "ChainValidationHeaderTooLarge" ] - toObject TracingVerbosity -_verb (ChainValidationDelegationPayloadError Text -err) = + toObject TracingVerbosity +_verb (ChainValidationDelegationPayloadError Text +err) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -457,9 +457,9 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -> Value String Text -err ] - toObject TracingVerbosity -_verb (ChainValidationInvalidDelegation VerificationKey +err ] + toObject TracingVerbosity +_verb (ChainValidationInvalidDelegation VerificationKey _ VerificationKey _) = [(Text, Value)] -> Object @@ -471,8 +471,8 @@ .= Text -> Value String Text "ChainValidationInvalidDelegation" ] - toObject TracingVerbosity -_verb (ChainValidationGenesisHashMismatch GenesisHash + toObject TracingVerbosity +_verb (ChainValidationGenesisHashMismatch GenesisHash _ GenesisHash _) = [(Text, Value)] -> Object @@ -484,8 +484,8 @@ .= Text -> Value String Text "ChainValidationGenesisHashMismatch" ] - toObject TracingVerbosity -_verb (ChainValidationExpectedGenesisHash GenesisHash + toObject TracingVerbosity +_verb (ChainValidationExpectedGenesisHash GenesisHash _ HeaderHash _) = [(Text, Value)] -> Object @@ -497,8 +497,8 @@ .= Text -> Value String Text "ChainValidationExpectedGenesisHash" ] - toObject TracingVerbosity -_verb (ChainValidationExpectedHeaderHash HeaderHash + toObject TracingVerbosity +_verb (ChainValidationExpectedHeaderHash HeaderHash _ GenesisHash _) = [(Text, Value)] -> Object @@ -510,8 +510,8 @@ .= Text -> Value String Text "ChainValidationExpectedHeaderHash" ] - toObject TracingVerbosity -_verb (ChainValidationInvalidHash HeaderHash + toObject TracingVerbosity +_verb (ChainValidationInvalidHash HeaderHash _ HeaderHash _) = [(Text, Value)] -> Object @@ -523,8 +523,8 @@ .= Text -> Value String Text "ChainValidationInvalidHash" ] - toObject TracingVerbosity -_verb (ChainValidationMissingHash HeaderHash + toObject TracingVerbosity +_verb (ChainValidationMissingHash HeaderHash _) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -535,8 +535,8 @@ .= Text -> Value String Text "ChainValidationMissingHash" ] - toObject TracingVerbosity -_verb (ChainValidationUnexpectedGenesisHash HeaderHash + toObject TracingVerbosity +_verb (ChainValidationUnexpectedGenesisHash HeaderHash _) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -547,8 +547,8 @@ .= Text -> Value String Text "ChainValidationUnexpectedGenesisHash" ] - toObject TracingVerbosity -_verb (ChainValidationInvalidSignature BlockSignature + toObject TracingVerbosity +_verb (ChainValidationInvalidSignature BlockSignature _) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -559,8 +559,8 @@ .= Text -> Value String Text "ChainValidationInvalidSignature" ] - toObject TracingVerbosity -_verb (ChainValidationDelegationSchedulingError Error + toObject TracingVerbosity +_verb (ChainValidationDelegationSchedulingError Error _) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -571,8 +571,8 @@ .= Text -> Value String Text "ChainValidationDelegationSchedulingError" ] - toObject TracingVerbosity -_verb (ChainValidationProtocolMagicMismatch ProtocolMagicId + toObject TracingVerbosity +_verb (ChainValidationProtocolMagicMismatch ProtocolMagicId _ ProtocolMagicId _) = [(Text, Value)] -> Object @@ -584,8 +584,8 @@ .= Text -> Value String Text "ChainValidationProtocolMagicMismatch" ] - toObject TracingVerbosity -_verb ChainValidationError + toObject TracingVerbosity +_verb ChainValidationError ChainValidationSignatureLight = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -596,8 +596,8 @@ .= Text -> Value String Text "ChainValidationSignatureLight" ] - toObject TracingVerbosity -_verb (ChainValidationTooManyDelegations VerificationKey + toObject TracingVerbosity +_verb (ChainValidationTooManyDelegations VerificationKey _) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -608,8 +608,8 @@ .= Text -> Value String Text "ChainValidationTooManyDelegations" ] - toObject TracingVerbosity -_verb (ChainValidationUpdateError SlotNumber + toObject TracingVerbosity +_verb (ChainValidationUpdateError SlotNumber _ Error _) = [(Text, Value)] -> Object @@ -621,8 +621,8 @@ .= Text -> Value String Text "ChainValidationUpdateError" ] - toObject TracingVerbosity -_verb (ChainValidationUTxOValidationError UTxOValidationError + toObject TracingVerbosity +_verb (ChainValidationUTxOValidationError UTxOValidationError _) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -633,8 +633,8 @@ .= Text -> Value String Text "ChainValidationUTxOValidationError" ] - toObject TracingVerbosity -_verb (ChainValidationProofValidationError ProofValidationError + toObject TracingVerbosity +_verb (ChainValidationProofValidationError ProofValidationError _) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -647,11 +647,11 @@ "ChainValidationProofValidationError" ] -instance ToObject (Header ByronBlock) where - toObject :: TracingVerbosity -> Header ByronBlock -> Object -toObject TracingVerbosity -_verb Header ByronBlock -b = +instance ToObject (Header ByronBlock) where + toObject :: TracingVerbosity -> Header ByronBlock -> Object +toObject TracingVerbosity +_verb Header ByronBlock +b = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -671,7 +671,7 @@ condense (Header ByronBlock -> HeaderHash (Header ByronBlock) forall b. HasHeader b => b -> HeaderHash b blockHash Header ByronBlock -b) +b) , Text "slotNo" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -680,7 +680,7 @@ condense (Header ByronBlock -> SlotNo forall b. HasHeader b => b -> SlotNo blockSlot Header ByronBlock -b) +b) , Text "blockNo" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -689,28 +689,28 @@ condense (Header ByronBlock -> BlockNo forall b. HasHeader b => b -> BlockNo blockNo Header ByronBlock -b) +b) ] [(Text, Value)] -> [(Text, Value)] -> [(Text, Value)] forall a. Semigroup a => a -> a -> a <> case Header ByronBlock -> ABlockOrBoundaryHdr ByteString byronHeaderRaw Header ByronBlock -b of +b of ABOBBoundaryHdr{} -> [] - ABOBBlockHdr AHeader ByteString -h -> + ABOBBlockHdr AHeader ByteString +h -> [ Text "delegate" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= VerificationKey -> String forall a. Condense a => a -> String condense (AHeader ByteString -> VerificationKey -headerSignerVk AHeader ByteString -h) ] +headerSignerVk AHeader ByteString +h) ] where - headerSignerVk :: AHeader ByteString -> VerificationKey - headerSignerVk :: AHeader ByteString -> VerificationKey -headerSignerVk = + headerSignerVk :: AHeader ByteString -> VerificationKey + headerSignerVk :: AHeader ByteString -> VerificationKey +headerSignerVk = ACertificate ByteString -> VerificationKey forall a. ACertificate a -> VerificationKey delegateVK (ACertificate ByteString -> VerificationKey) @@ -734,11 +734,11 @@ headerSignature -instance ToObject ByronOtherHeaderEnvelopeError where - toObject :: TracingVerbosity -> ByronOtherHeaderEnvelopeError -> Object -toObject TracingVerbosity -_verb (UnexpectedEBBInSlot SlotNo -slot) = +instance ToObject ByronOtherHeaderEnvelopeError where + toObject :: TracingVerbosity -> ByronOtherHeaderEnvelopeError -> Object +toObject TracingVerbosity +_verb (UnexpectedEBBInSlot SlotNo +slot) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -752,6 +752,6 @@ "slot" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot +slot ] \ No newline at end of file diff --git a/cardano-node/src/Cardano.Tracing.OrphanInstances.Common.html b/cardano-node/src/Cardano.Tracing.OrphanInstances.Common.html index 35b1b83be18..000f8410210 100644 --- a/cardano-node/src/Cardano.Tracing.OrphanInstances.Common.html +++ b/cardano-node/src/Cardano.Tracing.OrphanInstances.Common.html @@ -67,20 +67,20 @@ -- consensus interfaces are sometimes instantiated to 'Void', when there are -- no cases needed. -- -instance ToObject Void where - toObject :: TracingVerbosity -> Void -> Object -toObject TracingVerbosity -_verb Void -x = case Void -x of {} +instance ToObject Void where + toObject :: TracingVerbosity -> Void -> Object +toObject TracingVerbosity +_verb Void +x = case Void +x of {} -deriving instance Show TracingVerbosity +deriving instance Show TracingVerbosity -instance FromJSON TracingVerbosity where - parseJSON :: Value -> Parser TracingVerbosity -parseJSON (String Text -str) = case Text -str of +instance FromJSON TracingVerbosity where + parseJSON :: Value -> Parser TracingVerbosity +parseJSON (String Text +str) = case Text +str of Text "MinimalVerbosity" -> TracingVerbosity -> Parser TracingVerbosity forall (f :: * -> *) a. Applicative f => a -> f a @@ -96,8 +96,8 @@ forall (f :: * -> *) a. Applicative f => a -> f a pure TracingVerbosity NormalVerbosity - Text -invalid -> String -> Parser TracingVerbosity + Text +invalid -> String -> Parser TracingVerbosity forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser TracingVerbosity) -> String -> Parser TracingVerbosity @@ -108,12 +108,12 @@ forall a. Semigroup a => a -> a -> a <> Text -> String Text.unpack Text -invalid String -> ShowS +invalid String -> ShowS forall a. Semigroup a => a -> a -> a <> String " is not a valid TracingVerbosity" - parseJSON Value -invalid = String -> Parser TracingVerbosity + parseJSON Value +invalid = String -> Parser TracingVerbosity forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser TracingVerbosity) -> String -> Parser TracingVerbosity @@ -128,12 +128,12 @@ <> Value -> String forall a b. (Show a, ConvertText String b) => a -> b show Value -invalid +invalid -instance FromJSON PortNumber where - parseJSON :: Value -> Parser PortNumber -parseJSON (Number Scientific -portNum) = case String -> Maybe PortNumber +instance FromJSON PortNumber where + parseJSON :: Value -> Parser PortNumber +parseJSON (Number Scientific +portNum) = case String -> Maybe PortNumber forall a. Read a => String -> Maybe a readMaybe (String -> Maybe PortNumber) -> (Integer -> String) -> Integer -> Maybe PortNumber @@ -146,12 +146,12 @@ forall a b. (a -> b) -> a -> b $ Scientific -> Integer coefficient Scientific -portNum of - Just PortNumber -port -> PortNumber -> Parser PortNumber +portNum of + Just PortNumber +port -> PortNumber -> Parser PortNumber forall (f :: * -> *) a. Applicative f => a -> f a pure PortNumber -port +port Maybe PortNumber Nothing -> String -> Parser PortNumber forall (m :: * -> *) a. MonadFail m => String -> m a @@ -160,12 +160,12 @@ $ Scientific -> String forall a b. (Show a, ConvertText String b) => a -> b show Scientific -portNum String -> ShowS +portNum String -> ShowS forall a. Semigroup a => a -> a -> a <> String " is not a valid port number." - parseJSON Value -invalid = String -> Parser PortNumber + parseJSON Value +invalid = String -> Parser PortNumber forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser PortNumber) -> String -> Parser PortNumber forall a b. (a -> b) -> a -> b @@ -179,21 +179,21 @@ <> Value -> String forall a b. (Show a, ConvertText String b) => a -> b show Value -invalid +invalid -instance FromJSON Update.ApplicationName where - parseJSON :: Value -> Parser ApplicationName -parseJSON (String Text -x) = ApplicationName -> Parser ApplicationName +instance FromJSON Update.ApplicationName where + parseJSON :: Value -> Parser ApplicationName +parseJSON (String Text +x) = ApplicationName -> Parser ApplicationName forall (f :: * -> *) a. Applicative f => a -> f a pure (ApplicationName -> Parser ApplicationName) -> ApplicationName -> Parser ApplicationName forall a b. (a -> b) -> a -> b $ Text -> ApplicationName Update.ApplicationName Text -x - parseJSON Value -invalid = +x + parseJSON Value +invalid = String -> Parser ApplicationName forall (m :: * -> *) a. MonadFail m => String -> m a fail (String -> Parser ApplicationName) @@ -209,44 +209,44 @@ <> Value -> String forall a b. (Show a, ConvertText String b) => a -> b show Value -invalid +invalid -instance ToJSON (HeaderHash blk) => ToJSON (Tip blk) where - toJSON :: Tip blk -> Value -toJSON Tip blk +instance ToJSON (HeaderHash blk) => ToJSON (Tip blk) where + toJSON :: Tip blk -> Value +toJSON Tip blk TipGenesis = [Pair] -> Value object [ Text "genesis" Text -> Bool -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Bool True ] - toJSON (Tip SlotNo -slotNo HeaderHash blk -headerHash BlockNo -blockNo) = + toJSON (Tip SlotNo +slotNo HeaderHash blk +headerHash BlockNo +blockNo) = [Pair] -> Value object [ Text "slotNo" Text -> SlotNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slotNo +slotNo , Text "headerHash" Text -> HeaderHash blk -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= HeaderHash blk -headerHash +headerHash , Text "blockNo" Text -> BlockNo -> Pair forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= BlockNo -blockNo +blockNo ] -instance ToJSON (OneEraHash xs) where - toJSON :: OneEraHash xs -> Value -toJSON (OneEraHash ShortByteString -bs) = +instance ToJSON (OneEraHash xs) where + toJSON :: OneEraHash xs -> Value +toJSON (OneEraHash ShortByteString +bs) = Text -> Value forall a. ToJSON a => a -> Value toJSON (Text -> Value) @@ -270,19 +270,19 @@ SBS.fromShort (ShortByteString -> Value) -> ShortByteString -> Value forall a b. (a -> b) -> a -> b $ ShortByteString -bs +bs -deriving newtype instance ToJSON ByronHash -deriving newtype instance ToJSON BlockNo +deriving newtype instance ToJSON ByronHash +deriving newtype instance ToJSON BlockNo -instance HasPrivacyAnnotation ResourceStats +instance HasPrivacyAnnotation ResourceStats instance HasSeverityAnnotation ResourceStats where - getSeverityAnnotation :: ResourceStats -> Severity + getSeverityAnnotation :: ResourceStats -> Severity getSeverityAnnotation ResourceStats _ = Severity Info instance Transformable Text IO ResourceStats where - trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO ResourceStats + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO ResourceStats trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO ResourceStats forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasPrivacyAnnotation b, @@ -290,18 +290,18 @@ TracingVerbosity -> Trace m a -> Tracer m b trStructured -instance ToObject ResourceStats where - toObject :: TracingVerbosity -> ResourceStats -> Object -toObject TracingVerbosity -_verb ResourceStats -stats = +instance ToObject ResourceStats where + toObject :: TracingVerbosity -> ResourceStats -> Object +toObject TracingVerbosity +_verb ResourceStats +stats = case ResourceStats -> Value forall a. ToJSON a => a -> Value toJSON ResourceStats -stats of - Object Object -x -> Object -x +stats of + Object Object +x -> Object +x Value _ -> Object forall a. Monoid a => a diff --git a/cardano-node/src/Cardano.Tracing.OrphanInstances.Consensus.html b/cardano-node/src/Cardano.Tracing.OrphanInstances.Consensus.html index 3ad317d4f16..81b8842d47a 100644 --- a/cardano-node/src/Cardano.Tracing.OrphanInstances.Consensus.html +++ b/cardano-node/src/Cardano.Tracing.OrphanInstances.Consensus.html @@ -71,31 +71,31 @@ {- HLINT ignore "Use const" -} {- HLINT ignore "Use record patterns" -} -instance ConvertRawHash blk => ConvertRawHash (Header blk) where - toShortRawHash :: proxy (Header blk) -> HeaderHash (Header blk) -> ShortByteString +instance ConvertRawHash blk => ConvertRawHash (Header blk) where + toShortRawHash :: proxy (Header blk) -> HeaderHash (Header blk) -> ShortByteString toShortRawHash proxy (Header blk) -_ HeaderHash (Header blk) -h = Proxy blk -> HeaderHash blk -> ShortByteString +_ HeaderHash (Header blk) +h = Proxy blk -> HeaderHash blk -> ShortByteString forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> HeaderHash blk -> ShortByteString toShortRawHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) HeaderHash blk +Proxy @blk) HeaderHash blk HeaderHash (Header blk) -h - fromShortRawHash :: proxy (Header blk) -> ShortByteString -> HeaderHash (Header blk) +h + fromShortRawHash :: proxy (Header blk) -> ShortByteString -> HeaderHash (Header blk) fromShortRawHash proxy (Header blk) -_ ShortByteString -bs = Proxy blk -> ShortByteString -> HeaderHash blk +_ ShortByteString +bs = Proxy blk -> ShortByteString -> HeaderHash blk forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> ShortByteString -> HeaderHash blk fromShortRawHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) ShortByteString -bs - hashSize :: proxy (Header blk) -> Word32 +Proxy @blk) ShortByteString +bs + hashSize :: proxy (Header blk) -> Word32 hashSize proxy (Header blk) _ = Proxy blk -> Word32 forall blk (proxy :: * -> *). @@ -103,19 +103,19 @@ proxy blk -> Word32 hashSize (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) +Proxy @blk) -- -- * instances of @HasPrivacyAnnotation@ and @HasSeverityAnnotation@ -- -- NOTE: this list is sorted by the unqualified name of the outermost type. -instance HasPrivacyAnnotation (ChainDB.TraceEvent blk) -instance HasSeverityAnnotation (ChainDB.TraceEvent blk) where - getSeverityAnnotation :: TraceEvent blk -> Severity -getSeverityAnnotation (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk -ev) = case TraceAddBlockEvent blk -ev of +instance HasPrivacyAnnotation (ChainDB.TraceEvent blk) +instance HasSeverityAnnotation (ChainDB.TraceEvent blk) where + getSeverityAnnotation :: TraceEvent blk -> Severity +getSeverityAnnotation (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk +ev) = case TraceAddBlockEvent blk +ev of ChainDB.IgnoreBlockOlderThanK {} -> Severity Info ChainDB.IgnoreBlockAlreadyInVolatileDB {} -> Severity @@ -134,8 +134,8 @@ Info ChainDB.StoreButDontChange {} -> Severity Debug - ChainDB.AddedToCurrentChain [LedgerEvent blk] -events NewTipInfo blk + ChainDB.AddedToCurrentChain [LedgerEvent blk] +events NewTipInfo blk _ AnchoredFragment (Header blk) _ AnchoredFragment (Header blk) _ -> @@ -147,9 +147,9 @@ map LedgerEvent blk -> Severity forall a. HasSeverityAnnotation a => a -> Severity getSeverityAnnotation [LedgerEvent blk] -events) - ChainDB.SwitchedToAFork [LedgerEvent blk] -events NewTipInfo blk +events) + ChainDB.SwitchedToAFork [LedgerEvent blk] +events NewTipInfo blk _ AnchoredFragment (Header blk) _ AnchoredFragment (Header blk) _ -> @@ -161,10 +161,10 @@ map LedgerEvent blk -> Severity forall a. HasSeverityAnnotation a => a -> Severity getSeverityAnnotation [LedgerEvent blk] -events) - ChainDB.AddBlockValidation TraceValidationEvent blk -ev' -> case TraceValidationEvent blk -ev' of +events) + ChainDB.AddBlockValidation TraceValidationEvent blk +ev' -> case TraceValidationEvent blk +ev' of ChainDB.InvalidBlock {} -> Severity Error ChainDB.InvalidCandidate {} -> Severity @@ -178,9 +178,9 @@ ChainDB.ChainSelectionForFutureBlock{} -> Severity Debug - getSeverityAnnotation (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk -ev) = case TraceLedgerReplayEvent blk -ev of + getSeverityAnnotation (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk +ev) = case TraceLedgerReplayEvent blk +ev of LedgerDB.ReplayFromGenesis {} -> Severity Info LedgerDB.ReplayFromSnapshot {} -> Severity @@ -188,9 +188,9 @@ LedgerDB.ReplayedBlock {} -> Severity Info - getSeverityAnnotation (ChainDB.TraceLedgerEvent TraceEvent blk -ev) = case TraceEvent blk -ev of + getSeverityAnnotation (ChainDB.TraceLedgerEvent TraceEvent blk +ev) = case TraceEvent blk +ev of LedgerDB.TookSnapshot {} -> Severity Info LedgerDB.DeletedSnapshot {} -> Severity @@ -198,26 +198,26 @@ LedgerDB.InvalidSnapshot {} -> Severity Error - getSeverityAnnotation (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk -ev) = case TraceCopyToImmutableDBEvent blk -ev of + getSeverityAnnotation (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk +ev) = case TraceCopyToImmutableDBEvent blk +ev of ChainDB.CopiedBlockToImmutableDB {} -> Severity Debug TraceCopyToImmutableDBEvent blk ChainDB.NoBlocksToCopyToImmutableDB -> Severity Debug - getSeverityAnnotation (ChainDB.TraceGCEvent TraceGCEvent blk -ev) = case TraceGCEvent blk -ev of + getSeverityAnnotation (ChainDB.TraceGCEvent TraceGCEvent blk +ev) = case TraceGCEvent blk +ev of ChainDB.PerformedGC {} -> Severity Debug ChainDB.ScheduledGC {} -> Severity Debug - getSeverityAnnotation (ChainDB.TraceOpenEvent TraceOpenEvent blk -ev) = case TraceOpenEvent blk -ev of + getSeverityAnnotation (ChainDB.TraceOpenEvent TraceOpenEvent blk +ev) = case TraceOpenEvent blk +ev of ChainDB.OpenedDB {} -> Severity Info ChainDB.ClosedDB {} -> Severity @@ -231,9 +231,9 @@ ChainDB.OpenedLgrDB -> Severity Info - getSeverityAnnotation (ChainDB.TraceFollowerEvent TraceFollowerEvent blk -ev) = case TraceFollowerEvent blk -ev of + getSeverityAnnotation (ChainDB.TraceFollowerEvent TraceFollowerEvent blk +ev) = case TraceFollowerEvent blk +ev of ChainDB.NewFollower {} -> Severity Debug ChainDB.FollowerNoLongerInMem {} -> Severity @@ -242,47 +242,47 @@ Debug ChainDB.FollowerNewImmIterator {} -> Severity Debug - getSeverityAnnotation (ChainDB.TraceInitChainSelEvent TraceInitChainSelEvent blk -ev) = case TraceInitChainSelEvent blk -ev of + getSeverityAnnotation (ChainDB.TraceInitChainSelEvent TraceInitChainSelEvent blk +ev) = case TraceInitChainSelEvent blk +ev of ChainDB.InitChainSelValidation {} -> Severity Debug - getSeverityAnnotation (ChainDB.TraceIteratorEvent TraceIteratorEvent blk -ev) = case TraceIteratorEvent blk -ev of + getSeverityAnnotation (ChainDB.TraceIteratorEvent TraceIteratorEvent blk +ev) = case TraceIteratorEvent blk +ev of ChainDB.StreamFromVolatileDB {} -> Severity Debug TraceIteratorEvent blk _ -> Severity Debug - getSeverityAnnotation (ChainDB.TraceImmutableDBEvent TraceEvent blk -_ev) = Severity + getSeverityAnnotation (ChainDB.TraceImmutableDBEvent TraceEvent blk +_ev) = Severity Debug - getSeverityAnnotation (ChainDB.TraceVolatileDBEvent TraceEvent blk -_ev) = Severity + getSeverityAnnotation (ChainDB.TraceVolatileDBEvent TraceEvent blk +_ev) = Severity Debug -instance HasSeverityAnnotation (LedgerEvent blk) where - getSeverityAnnotation :: LedgerEvent blk -> Severity -getSeverityAnnotation (LedgerUpdate LedgerUpdate blk +instance HasSeverityAnnotation (LedgerEvent blk) where + getSeverityAnnotation :: LedgerEvent blk -> Severity +getSeverityAnnotation (LedgerUpdate LedgerUpdate blk _) = Severity Notice getSeverityAnnotation (LedgerWarning LedgerWarning blk _) = Severity Critical -instance HasPrivacyAnnotation (TraceBlockFetchServerEvent blk) -instance HasSeverityAnnotation (TraceBlockFetchServerEvent blk) where - getSeverityAnnotation :: TraceBlockFetchServerEvent blk -> Severity -getSeverityAnnotation TraceBlockFetchServerEvent blk +instance HasPrivacyAnnotation (TraceBlockFetchServerEvent blk) +instance HasSeverityAnnotation (TraceBlockFetchServerEvent blk) where + getSeverityAnnotation :: TraceBlockFetchServerEvent blk -> Severity +getSeverityAnnotation TraceBlockFetchServerEvent blk _ = Severity Info -instance HasPrivacyAnnotation (TraceChainSyncClientEvent blk) -instance HasSeverityAnnotation (TraceChainSyncClientEvent blk) where - getSeverityAnnotation :: TraceChainSyncClientEvent blk -> Severity -getSeverityAnnotation (TraceDownloadedHeader Header blk +instance HasPrivacyAnnotation (TraceChainSyncClientEvent blk) +instance HasSeverityAnnotation (TraceChainSyncClientEvent blk) where + getSeverityAnnotation :: TraceChainSyncClientEvent blk -> Severity +getSeverityAnnotation (TraceDownloadedHeader Header blk _) = Severity Info getSeverityAnnotation (TraceFoundIntersection Point blk @@ -301,31 +301,31 @@ Notice -instance HasPrivacyAnnotation (TraceChainSyncServerEvent blk) -instance HasSeverityAnnotation (TraceChainSyncServerEvent blk) where - getSeverityAnnotation :: TraceChainSyncServerEvent blk -> Severity -getSeverityAnnotation TraceChainSyncServerEvent blk +instance HasPrivacyAnnotation (TraceChainSyncServerEvent blk) +instance HasSeverityAnnotation (TraceChainSyncServerEvent blk) where + getSeverityAnnotation :: TraceChainSyncServerEvent blk -> Severity +getSeverityAnnotation TraceChainSyncServerEvent blk _ = Severity Info -instance HasPrivacyAnnotation (TraceEventMempool blk) -instance HasSeverityAnnotation (TraceEventMempool blk) where - getSeverityAnnotation :: TraceEventMempool blk -> Severity -getSeverityAnnotation TraceEventMempool blk +instance HasPrivacyAnnotation (TraceEventMempool blk) +instance HasSeverityAnnotation (TraceEventMempool blk) where + getSeverityAnnotation :: TraceEventMempool blk -> Severity +getSeverityAnnotation TraceEventMempool blk _ = Severity Info -instance HasPrivacyAnnotation () +instance HasPrivacyAnnotation () instance HasSeverityAnnotation () where - getSeverityAnnotation :: () -> Severity -getSeverityAnnotation () = Severity + getSeverityAnnotation :: () -> Severity +getSeverityAnnotation () = Severity Info -instance HasPrivacyAnnotation (TraceForgeEvent blk) -instance HasSeverityAnnotation (TraceForgeEvent blk) where - getSeverityAnnotation :: TraceForgeEvent blk -> Severity -getSeverityAnnotation TraceStartLeadershipCheck {} = Severity +instance HasPrivacyAnnotation (TraceForgeEvent blk) +instance HasSeverityAnnotation (TraceForgeEvent blk) where + getSeverityAnnotation :: TraceForgeEvent blk -> Severity +getSeverityAnnotation TraceStartLeadershipCheck {} = Severity Info getSeverityAnnotation TraceSlotIsImmutable {} = Severity Error @@ -359,10 +359,10 @@ Info -instance HasPrivacyAnnotation (TraceLocalTxSubmissionServerEvent blk) -instance HasSeverityAnnotation (TraceLocalTxSubmissionServerEvent blk) where - getSeverityAnnotation :: TraceLocalTxSubmissionServerEvent blk -> Severity -getSeverityAnnotation TraceLocalTxSubmissionServerEvent blk +instance HasPrivacyAnnotation (TraceLocalTxSubmissionServerEvent blk) +instance HasSeverityAnnotation (TraceLocalTxSubmissionServerEvent blk) where + getSeverityAnnotation :: TraceLocalTxSubmissionServerEvent blk -> Severity +getSeverityAnnotation TraceLocalTxSubmissionServerEvent blk _ = Severity Info @@ -372,12 +372,12 @@ -- -- NOTE: this list is sorted by the unqualified name of the outermost type. -instance ( HasPrivacyAnnotation (ChainDB.TraceAddBlockEvent blk) - , HasSeverityAnnotation (ChainDB.TraceAddBlockEvent blk) - , LedgerSupportsProtocol blk - , ToObject (ChainDB.TraceAddBlockEvent blk)) - => Transformable Text IO (ChainDB.TraceAddBlockEvent blk) where - trTransformer :: TracingVerbosity +instance ( HasPrivacyAnnotation (ChainDB.TraceAddBlockEvent blk) + , HasSeverityAnnotation (ChainDB.TraceAddBlockEvent blk) + , LedgerSupportsProtocol blk + , ToObject (ChainDB.TraceAddBlockEvent blk)) + => Transformable Text IO (ChainDB.TraceAddBlockEvent blk) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceAddBlockEvent blk) trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceAddBlockEvent blk) @@ -388,9 +388,9 @@ trStructuredText -instance (LedgerSupportsProtocol blk) - => HasTextFormatter (ChainDB.TraceAddBlockEvent blk) where - formatText :: TraceAddBlockEvent blk -> Object -> Text +instance (LedgerSupportsProtocol blk) + => HasTextFormatter (ChainDB.TraceAddBlockEvent blk) where + formatText :: TraceAddBlockEvent blk -> Object -> Text formatText TraceAddBlockEvent blk _ = String -> Text pack (String -> Text) -> (Object -> String) -> Object -> Text @@ -408,11 +408,11 @@ toList -instance ConvertRawHash blk - => Transformable Text IO (TraceBlockFetchServerEvent blk) where - trTransformer :: TracingVerbosity +instance ConvertRawHash blk + => Transformable Text IO (TraceBlockFetchServerEvent blk) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceBlockFetchServerEvent blk) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceBlockFetchServerEvent blk) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, @@ -421,9 +421,9 @@ trStructuredText -instance HasTextFormatter (TraceBlockFetchServerEvent blk) where - formatText :: TraceBlockFetchServerEvent blk -> Object -> Text -formatText TraceBlockFetchServerEvent blk +instance HasTextFormatter (TraceBlockFetchServerEvent blk) where + formatText :: TraceBlockFetchServerEvent blk -> Object -> Text +formatText TraceBlockFetchServerEvent blk _ = String -> Text pack (String -> Text) -> (Object -> String) -> Object -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). @@ -440,11 +440,11 @@ toList -instance (ConvertRawHash blk, LedgerSupportsProtocol blk) - => Transformable Text IO (TraceChainSyncClientEvent blk) where - trTransformer :: TracingVerbosity +instance (ConvertRawHash blk, LedgerSupportsProtocol blk) + => Transformable Text IO (TraceChainSyncClientEvent blk) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceChainSyncClientEvent blk) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceChainSyncClientEvent blk) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasPrivacyAnnotation b, @@ -453,11 +453,11 @@ trStructured -instance ConvertRawHash blk - => Transformable Text IO (TraceChainSyncServerEvent blk) where - trTransformer :: TracingVerbosity +instance ConvertRawHash blk + => Transformable Text IO (TraceChainSyncServerEvent blk) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceChainSyncServerEvent blk) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceChainSyncServerEvent blk) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasPrivacyAnnotation b, @@ -466,12 +466,12 @@ trStructured -instance ( ToObject (ApplyTxErr blk), Show (ApplyTxErr blk), ToObject (GenTx blk), - ToJSON (GenTxId blk), LedgerSupportsMempool blk) - => Transformable Text IO (TraceEventMempool blk) where - trTransformer :: TracingVerbosity +instance ( ToObject (ApplyTxErr blk), Show (ApplyTxErr blk), ToObject (GenTx blk), + ToJSON (GenTxId blk), LedgerSupportsMempool blk) + => Transformable Text IO (TraceEventMempool blk) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceEventMempool blk) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceEventMempool blk) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasPrivacyAnnotation b, @@ -480,7 +480,7 @@ trStructured -condenseT :: Condense a => a -> Text +condenseT :: Condense a => a -> Text condenseT :: a -> Text condenseT = String -> Text pack (String -> Text) -> (a -> String) -> a -> Text @@ -491,7 +491,7 @@ forall a. Condense a => a -> String condense -showT :: Show a => a -> Text +showT :: Show a => a -> Text showT :: a -> Text showT = String -> Text pack (String -> Text) -> (a -> String) -> a -> Text @@ -503,20 +503,20 @@ show -instance ( tx ~ GenTx blk - , HasTxId tx - , RunNode blk - , Show (TxId tx) - , ToObject (LedgerError blk) - , ToObject (OtherHeaderEnvelopeError blk) - , ToObject (ValidationErr (BlockProtocol blk)) - , ToObject (CannotForge blk) - , ToObject (ForgeStateUpdateError blk) - , LedgerSupportsMempool blk) - => Transformable Text IO (TraceForgeEvent blk) where - trTransformer :: TracingVerbosity +instance ( tx ~ GenTx blk + , HasTxId tx + , RunNode blk + , Show (TxId tx) + , ToObject (LedgerError blk) + , ToObject (OtherHeaderEnvelopeError blk) + , ToObject (ValidationErr (BlockProtocol blk)) + , ToObject (CannotForge blk) + , ToObject (ForgeStateUpdateError blk) + , LedgerSupportsMempool blk) + => Transformable Text IO (TraceForgeEvent blk) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceForgeEvent blk) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceForgeEvent blk) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, @@ -524,21 +524,21 @@ TracingVerbosity -> Trace m a -> Tracer m b trStructuredText -instance ( tx ~ GenTx blk - , ConvertRawHash blk - , HasTxId tx - , LedgerSupportsMempool blk - , LedgerSupportsProtocol blk - , LedgerSupportsMempool blk - , Show (TxId tx) - , Show (ForgeStateUpdateError blk) - , Show (CannotForge blk) - , LedgerSupportsMempool blk) - => HasTextFormatter (TraceForgeEvent blk) where - formatText :: TraceForgeEvent blk -> Object -> Text -formatText = \case - TraceStartLeadershipCheck SlotNo -slotNo -> Text -> Object -> Text +instance ( tx ~ GenTx blk + , ConvertRawHash blk + , HasTxId tx + , LedgerSupportsMempool blk + , LedgerSupportsProtocol blk + , LedgerSupportsMempool blk + , Show (TxId tx) + , Show (ForgeStateUpdateError blk) + , Show (CannotForge blk) + , LedgerSupportsMempool blk) + => HasTextFormatter (TraceForgeEvent blk) where + formatText :: TraceForgeEvent blk -> Object -> Text +formatText = \case + TraceStartLeadershipCheck SlotNo +slotNo -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -550,11 +550,11 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) - TraceSlotIsImmutable SlotNo -slotNo Point blk -immutableTipPoint BlockNo -immutableTipBlkNo -> Text -> Object -> Text +slotNo) + TraceSlotIsImmutable SlotNo +slotNo Point blk +immutableTipPoint BlockNo +immutableTipBlkNo -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -569,7 +569,7 @@ <> Point blk -> Text forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase Point blk -immutableTipPoint +immutableTipPoint Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -579,7 +579,7 @@ forall a. Show a => a -> Text showT (BlockNo -> Word64 unBlockNo BlockNo -immutableTipBlkNo) +immutableTipBlkNo) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -589,10 +589,10 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) - TraceBlockFromFuture SlotNo -currentSlot SlotNo -tipSlot -> Text -> Object -> Text +slotNo) + TraceBlockFromFuture SlotNo +currentSlot SlotNo +tipSlot -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -608,7 +608,7 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -tipSlot) +tipSlot) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -618,11 +618,11 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -currentSlot) - TraceBlockContext SlotNo -currentSlot BlockNo -tipBlockNo Point blk -tipPoint -> Text -> Object -> Text +currentSlot) + TraceBlockContext SlotNo +currentSlot BlockNo +tipBlockNo Point blk +tipPoint -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -637,7 +637,7 @@ <> Point blk -> Text forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase Point blk -tipPoint +tipPoint Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -647,7 +647,7 @@ forall a. Show a => a -> Text showT (BlockNo -> Word64 unBlockNo BlockNo -tipBlockNo) +tipBlockNo) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -657,10 +657,10 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -currentSlot) - TraceNoLedgerState SlotNo -slotNo Point blk -pt -> Text -> Object -> Text +currentSlot) + TraceNoLedgerState SlotNo +slotNo Point blk +pt -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -672,7 +672,7 @@ <> Point blk -> Text forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase Point blk -pt +pt Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -683,10 +683,10 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) - TraceLedgerState SlotNo -slotNo Point blk -pt -> Text -> Object -> Text +slotNo) + TraceLedgerState SlotNo +slotNo Point blk +pt -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -698,7 +698,7 @@ <> Point blk -> Text forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase Point blk -pt +pt Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -709,9 +709,9 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) - TraceNoLedgerView SlotNo -slotNo OutsideForecastRange +slotNo) + TraceNoLedgerView SlotNo +slotNo OutsideForecastRange _ -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text @@ -724,9 +724,9 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) - TraceLedgerView SlotNo -slotNo -> Text -> Object -> Text +slotNo) + TraceLedgerView SlotNo +slotNo -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -738,10 +738,10 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) - TraceForgeStateUpdateError SlotNo -slotNo ForgeStateUpdateError blk -reason -> Text -> Object -> Text +slotNo) + TraceForgeStateUpdateError SlotNo +slotNo ForgeStateUpdateError blk +reason -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -754,7 +754,7 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -764,10 +764,10 @@ <> ForgeStateUpdateError blk -> Text forall a. Show a => a -> Text showT ForgeStateUpdateError blk -reason - TraceNodeCannotForge SlotNo -slotNo CannotForge blk -reason -> Text -> Object -> Text +reason + TraceNodeCannotForge SlotNo +slotNo CannotForge blk +reason -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -780,7 +780,7 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -790,9 +790,9 @@ <> CannotForge blk -> Text forall a. Show a => a -> Text showT CannotForge blk -reason - TraceNodeNotLeader SlotNo -slotNo -> Text -> Object -> Text +reason + TraceNodeNotLeader SlotNo +slotNo -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -804,9 +804,9 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) - TraceNodeIsLeader SlotNo -slotNo -> Text -> Object -> Text +slotNo) + TraceNodeIsLeader SlotNo +slotNo -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -818,9 +818,9 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) - TraceForgedBlock SlotNo -slotNo Point blk +slotNo) + TraceForgedBlock SlotNo +slotNo Point blk _ blk _ MempoolSize _ -> Text -> Object -> Text @@ -835,9 +835,9 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) - TraceDidntAdoptBlock SlotNo -slotNo blk +slotNo) + TraceDidntAdoptBlock SlotNo +slotNo blk _ -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text @@ -850,11 +850,11 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) - TraceForgedInvalidBlock SlotNo -slotNo blk -_ InvalidBlockReason blk -reason -> Text -> Object -> Text +slotNo) + TraceForgedInvalidBlock SlotNo +slotNo blk +_ InvalidBlockReason blk +reason -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -867,7 +867,7 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -876,11 +876,11 @@ <> InvalidBlockReason blk -> Text forall a. Show a => a -> Text showT InvalidBlockReason blk -reason - TraceAdoptedBlock SlotNo -slotNo blk -blk [Validated (GenTx blk)] -txs -> Text -> Object -> Text +reason + TraceAdoptedBlock SlotNo +slotNo blk +blk [Validated (GenTx blk)] +txs -> Text -> Object -> Text forall a b. a -> b -> a const (Text -> Object -> Text) -> Text -> Object -> Text forall a b. (a -> b) -> a -> b @@ -893,7 +893,7 @@ forall a. Show a => a -> Text showT (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -905,10 +905,10 @@ proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) (blk -> HeaderHash blk +Proxy @blk) (blk -> HeaderHash blk forall b. HasHeader b => b -> HeaderHash b blockHash blk -blk) +blk) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -933,14 +933,14 @@ LedgerSupportsMempool blk => Validated (GenTx blk) -> GenTx blk txForgetValidated) [Validated (GenTx blk)] -txs) +txs) -instance Transformable Text IO (TraceLocalTxSubmissionServerEvent blk) where - trTransformer :: TracingVerbosity +instance Transformable Text IO (TraceLocalTxSubmissionServerEvent blk) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceLocalTxSubmissionServerEvent blk) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceLocalTxSubmissionServerEvent blk) forall b (m :: * -> *) a. @@ -949,22 +949,22 @@ TracingVerbosity -> Trace m a -> Tracer m b trStructured -instance HasPrivacyAnnotation a => HasPrivacyAnnotation (Consensus.TraceLabelCreds a) -instance HasSeverityAnnotation a => HasSeverityAnnotation (Consensus.TraceLabelCreds a) where - getSeverityAnnotation :: TraceLabelCreds a -> Severity -getSeverityAnnotation (Consensus.TraceLabelCreds Text -_ a -a) = a -> Severity +instance HasPrivacyAnnotation a => HasPrivacyAnnotation (Consensus.TraceLabelCreds a) +instance HasSeverityAnnotation a => HasSeverityAnnotation (Consensus.TraceLabelCreds a) where + getSeverityAnnotation :: TraceLabelCreds a -> Severity +getSeverityAnnotation (Consensus.TraceLabelCreds Text +_ a +a) = a -> Severity forall a. HasSeverityAnnotation a => a -> Severity getSeverityAnnotation a -a +a -instance ToObject a => ToObject (Consensus.TraceLabelCreds a) where - toObject :: TracingVerbosity -> TraceLabelCreds a -> Object -toObject TracingVerbosity -verb (Consensus.TraceLabelCreds Text -creds a -val) = +instance ToObject a => ToObject (Consensus.TraceLabelCreds a) where + toObject :: TracingVerbosity -> TraceLabelCreds a -> Object +toObject TracingVerbosity +verb (Consensus.TraceLabelCreds Text +creds a +val) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -973,91 +973,91 @@ .= Text -> Value forall a. ToJSON a => a -> Value toJSON Text -creds +creds , Text "val" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb a -val +verb a +val ] -instance (HasPrivacyAnnotation a, HasSeverityAnnotation a, ToObject a) - => Transformable Text IO (Consensus.TraceLabelCreds a) where - trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceLabelCreds a) -trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceLabelCreds a) +instance (HasPrivacyAnnotation a, HasSeverityAnnotation a, ToObject a) + => Transformable Text IO (Consensus.TraceLabelCreds a) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceLabelCreds a) +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceLabelCreds a) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructured -instance ( ConvertRawHash blk - , LedgerSupportsProtocol blk - , InspectLedger blk - , ToObject (Header blk) - , ToObject (LedgerEvent blk)) - => Transformable Text IO (ChainDB.TraceEvent blk) where - trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceEvent blk) -trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceEvent blk) +instance ( ConvertRawHash blk + , LedgerSupportsProtocol blk + , InspectLedger blk + , ToObject (Header blk) + , ToObject (LedgerEvent blk)) + => Transformable Text IO (ChainDB.TraceEvent blk) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceEvent blk) +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceEvent blk) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText -instance ( ConvertRawHash blk - , LedgerSupportsProtocol blk - , InspectLedger blk) - => HasTextFormatter (ChainDB.TraceEvent blk) where - formatText :: TraceEvent blk -> Object -> Text -formatText TraceEvent blk -tev Object -_obj = case TraceEvent blk -tev of - ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk -ev -> case TraceAddBlockEvent blk -ev of - ChainDB.IgnoreBlockOlderThanK RealPoint blk -pt -> +instance ( ConvertRawHash blk + , LedgerSupportsProtocol blk + , InspectLedger blk) + => HasTextFormatter (ChainDB.TraceEvent blk) where + formatText :: TraceEvent blk -> Object -> Text +formatText TraceEvent blk +tev Object +_obj = case TraceEvent blk +tev of + ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk +ev -> case TraceAddBlockEvent blk +ev of + ChainDB.IgnoreBlockOlderThanK RealPoint blk +pt -> Text "Ignoring block older than K: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt - ChainDB.IgnoreBlockAlreadyInVolatileDB RealPoint blk -pt -> +pt + ChainDB.IgnoreBlockAlreadyInVolatileDB RealPoint blk +pt -> Text "Ignoring block already in DB: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt - ChainDB.IgnoreInvalidBlock RealPoint blk -pt InvalidBlockReason blk -_reason -> +pt + ChainDB.IgnoreInvalidBlock RealPoint blk +pt InvalidBlockReason blk +_reason -> Text "Ignoring previously seen invalid block: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt - ChainDB.AddedBlockToQueue RealPoint blk -pt Word -sz -> +pt + ChainDB.AddedBlockToQueue RealPoint blk +pt Word +sz -> Text "Block added to queue: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt Text -> Text -> Text +pt Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " queue size " Text -> Text -> Text @@ -1065,17 +1065,17 @@ <> Word -> Text forall a. Condense a => a -> Text condenseT Word -sz - ChainDB.BlockInTheFuture RealPoint blk -pt SlotNo -slot -> +sz + ChainDB.BlockInTheFuture RealPoint blk +pt SlotNo +slot -> Text "Ignoring block from future: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt Text -> Text -> Text +pt Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text ", slot " Text -> Text -> Text @@ -1083,27 +1083,27 @@ <> SlotNo -> Text forall a. Condense a => a -> Text condenseT SlotNo -slot - ChainDB.StoreButDontChange RealPoint blk -pt -> +slot + ChainDB.StoreButDontChange RealPoint blk +pt -> Text "Ignoring block: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt - ChainDB.TryAddToCurrentChain RealPoint blk -pt -> +pt + ChainDB.TryAddToCurrentChain RealPoint blk +pt -> Text "Block fits onto the current chain: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt - ChainDB.TrySwitchToAFork RealPoint blk -pt ChainDiff (HeaderFields blk) +pt + ChainDB.TrySwitchToAFork RealPoint blk +pt ChainDiff (HeaderFields blk) _ -> Text "Block fits onto some fork: " Text -> Text -> Text @@ -1111,12 +1111,12 @@ <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt - ChainDB.AddedToCurrentChain [LedgerEvent blk] -es NewTipInfo blk +pt + ChainDB.AddedToCurrentChain [LedgerEvent blk] +es NewTipInfo blk _ AnchoredFragment (Header blk) -_ AnchoredFragment (Header blk) -c -> +_ AnchoredFragment (Header blk) +c -> Text "Chain extended, new tip: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -1127,7 +1127,7 @@ HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) Text -> Text -> Text +c) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> [Text] -> Text @@ -1137,14 +1137,14 @@ <> LedgerEvent blk -> Text forall a. Show a => a -> Text showT LedgerEvent blk -e | LedgerEvent blk -e <- [LedgerEvent blk] -es ] - ChainDB.SwitchedToAFork [LedgerEvent blk] -es NewTipInfo blk +e | LedgerEvent blk +e <- [LedgerEvent blk] +es ] + ChainDB.SwitchedToAFork [LedgerEvent blk] +es NewTipInfo blk _ AnchoredFragment (Header blk) -_ AnchoredFragment (Header blk) -c -> +_ AnchoredFragment (Header blk) +c -> Text "Switched to a fork, new tip: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -1155,7 +1155,7 @@ HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) Text -> Text -> Text +c) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> [Text] -> Text @@ -1165,22 +1165,22 @@ <> LedgerEvent blk -> Text forall a. Show a => a -> Text showT LedgerEvent blk -e | LedgerEvent blk -e <- [LedgerEvent blk] -es ] - ChainDB.AddBlockValidation TraceValidationEvent blk -ev' -> case TraceValidationEvent blk -ev' of - ChainDB.InvalidBlock ExtValidationError blk -err RealPoint blk -pt -> +e | LedgerEvent blk +e <- [LedgerEvent blk] +es ] + ChainDB.AddBlockValidation TraceValidationEvent blk +ev' -> case TraceValidationEvent blk +ev' of + ChainDB.InvalidBlock ExtValidationError blk +err RealPoint blk +pt -> Text "Invalid block " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt Text -> Text -> Text +pt Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text ": " Text -> Text -> Text @@ -1188,9 +1188,9 @@ <> ExtValidationError blk -> Text forall a. Show a => a -> Text showT ExtValidationError blk -err - ChainDB.InvalidCandidate AnchoredFragment (Header blk) -c -> +err + ChainDB.InvalidCandidate AnchoredFragment (Header blk) +c -> Text "Invalid candidate " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -1201,9 +1201,9 @@ HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) - ChainDB.ValidCandidate AnchoredFragment (Header blk) -c -> +c) + ChainDB.ValidCandidate AnchoredFragment (Header blk) +c -> Text "Valid candidate " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -1214,10 +1214,10 @@ HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) - ChainDB.CandidateContainsFutureBlocks AnchoredFragment (Header blk) -c [Header blk] -hdrs -> +c) + ChainDB.CandidateContainsFutureBlocks AnchoredFragment (Header blk) +c [Header blk] +hdrs -> Text "Candidate contains blocks from near future: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -1229,7 +1229,7 @@ HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) Text -> Text -> Text +c) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text ", slots " Text -> Text -> Text @@ -1249,10 +1249,10 @@ . Header blk -> Point blk forall blk. HasHeader (Header blk) => Header blk -> Point blk headerPoint) [Header blk] -hdrs) - ChainDB.CandidateContainsFutureBlocksExceedingClockSkew AnchoredFragment (Header blk) -c [Header blk] -hdrs -> +hdrs) + ChainDB.CandidateContainsFutureBlocksExceedingClockSkew AnchoredFragment (Header blk) +c [Header blk] +hdrs -> Text "Candidate contains blocks from future exceeding clock skew limit: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -1264,7 +1264,7 @@ HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) Text -> Text -> Text +c) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text ", slots " Text -> Text -> Text @@ -1284,9 +1284,9 @@ . Header blk -> Point blk forall blk. HasHeader (Header blk) => Header blk -> Point blk headerPoint) [Header blk] -hdrs) - ChainDB.AddedBlockToVolatileDB RealPoint blk -pt BlockNo +hdrs) + ChainDB.AddedBlockToVolatileDB RealPoint blk +pt BlockNo _ IsEBB _ -> Text @@ -1295,34 +1295,34 @@ <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt - ChainDB.ChainSelectionForFutureBlock RealPoint blk -pt -> +pt + ChainDB.ChainSelectionForFutureBlock RealPoint blk +pt -> Text "Chain selection run for block previously from future: " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt - ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk -ev -> case TraceLedgerReplayEvent blk -ev of - LedgerDB.ReplayFromGenesis Point blk -_replayTo -> +pt + ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk +ev -> case TraceLedgerReplayEvent blk +ev of + LedgerDB.ReplayFromGenesis Point blk +_replayTo -> Text "Replaying ledger from genesis" - LedgerDB.ReplayFromSnapshot DiskSnapshot -snap RealPoint blk -tip' Point blk -_replayTo -> + LedgerDB.ReplayFromSnapshot DiskSnapshot +snap RealPoint blk +tip' Point blk +_replayTo -> Text "Replaying ledger from snapshot " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> DiskSnapshot -> Text forall a. Show a => a -> Text showT DiskSnapshot -snap Text -> Text -> Text +snap Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " at " Text -> Text -> Text @@ -1331,11 +1331,11 @@ RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -tip' - LedgerDB.ReplayedBlock RealPoint blk -pt [LedgerEvent blk] -_ledgerEvents Point blk -replayTo -> +tip' + LedgerDB.ReplayedBlock RealPoint blk +pt [LedgerEvent blk] +_ledgerEvents Point blk +replayTo -> Text "Replayed block: slot " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -1344,7 +1344,7 @@ showT (RealPoint blk -> SlotNo forall blk. RealPoint blk -> SlotNo realPointSlot RealPoint blk -pt) Text -> Text -> Text +pt) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " of " Text -> Text -> Text @@ -1354,20 +1354,20 @@ showT (Point blk -> WithOrigin SlotNo forall block. Point block -> WithOrigin SlotNo pointSlot Point blk -replayTo) - ChainDB.TraceLedgerEvent TraceEvent blk -ev -> case TraceEvent blk -ev of - LedgerDB.TookSnapshot DiskSnapshot -snap RealPoint blk -pt -> +replayTo) + ChainDB.TraceLedgerEvent TraceEvent blk +ev -> case TraceEvent blk +ev of + LedgerDB.TookSnapshot DiskSnapshot +snap RealPoint blk +pt -> Text "Took ledger snapshot " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> DiskSnapshot -> Text forall a. Show a => a -> Text showT DiskSnapshot -snap Text -> Text -> Text +snap Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -1376,43 +1376,43 @@ <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPointAsPhrase RealPoint blk -pt - LedgerDB.DeletedSnapshot DiskSnapshot -snap -> +pt + LedgerDB.DeletedSnapshot DiskSnapshot +snap -> Text "Deleted old snapshot " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> DiskSnapshot -> Text forall a. Show a => a -> Text showT DiskSnapshot -snap - LedgerDB.InvalidSnapshot DiskSnapshot -snap InitFailure blk -failure -> +snap + LedgerDB.InvalidSnapshot DiskSnapshot +snap InitFailure blk +failure -> Text "Invalid snapshot " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> DiskSnapshot -> Text forall a. Show a => a -> Text showT DiskSnapshot -snap Text -> Text -> Text +snap Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> InitFailure blk -> Text forall a. Show a => a -> Text showT InitFailure blk -failure - ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk -ev -> case TraceCopyToImmutableDBEvent blk -ev of - ChainDB.CopiedBlockToImmutableDB Point blk -pt -> +failure + ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk +ev -> case TraceCopyToImmutableDBEvent blk +ev of + ChainDB.CopiedBlockToImmutableDB Point blk +pt -> Text "Copied block " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Point blk -> Text forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase Point blk -pt Text -> Text -> Text +pt Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " to the ImmutableDB" @@ -1420,41 +1420,41 @@ ChainDB.NoBlocksToCopyToImmutableDB -> Text "There are no blocks to copy to the ImmutableDB" - ChainDB.TraceGCEvent TraceGCEvent blk -ev -> case TraceGCEvent blk -ev of - ChainDB.PerformedGC SlotNo -slot -> + ChainDB.TraceGCEvent TraceGCEvent blk +ev -> case TraceGCEvent blk +ev of + ChainDB.PerformedGC SlotNo +slot -> Text "Performed a garbage collection for " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> SlotNo -> Text forall a. Condense a => a -> Text condenseT SlotNo -slot - ChainDB.ScheduledGC SlotNo -slot Time -_difft -> +slot + ChainDB.ScheduledGC SlotNo +slot Time +_difft -> Text "Scheduled a garbage collection for " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> SlotNo -> Text forall a. Condense a => a -> Text condenseT SlotNo -slot - ChainDB.TraceOpenEvent TraceOpenEvent blk -ev -> case TraceOpenEvent blk -ev of - ChainDB.OpenedDB Point blk -immTip Point blk -tip' -> +slot + ChainDB.TraceOpenEvent TraceOpenEvent blk +ev -> case TraceOpenEvent blk +ev of + ChainDB.OpenedDB Point blk +immTip Point blk +tip' -> Text "Opened db with immutable tip at " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Point blk -> Text forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase Point blk -immTip Text -> Text -> Text +immTip Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -1463,17 +1463,17 @@ <> Point blk -> Text forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase Point blk -tip' - ChainDB.ClosedDB Point blk -immTip Point blk -tip' -> +tip' + ChainDB.ClosedDB Point blk +immTip Point blk +tip' -> Text "Closed db with immutable tip at " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Point blk -> Text forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase Point blk -immTip Text -> Text -> Text +immTip Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -1482,17 +1482,17 @@ <> Point blk -> Text forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase Point blk -tip' - ChainDB.OpenedImmutableDB Point blk -immTip ChunkNo -chunk -> +tip' + ChainDB.OpenedImmutableDB Point blk +immTip ChunkNo +chunk -> Text "Opened imm db with immutable tip at " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Point blk -> Text forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase Point blk -immTip Text -> Text -> Text +immTip Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -1501,16 +1501,16 @@ <> ChunkNo -> Text forall a. Show a => a -> Text showT ChunkNo -chunk +chunk TraceOpenEvent blk ChainDB.OpenedVolatileDB -> Text "Opened vol db" TraceOpenEvent blk ChainDB.OpenedLgrDB -> Text "Opened lgr db" - ChainDB.TraceFollowerEvent TraceFollowerEvent blk -ev -> case TraceFollowerEvent blk -ev of + ChainDB.TraceFollowerEvent TraceFollowerEvent blk +ev -> case TraceFollowerEvent blk +ev of TraceFollowerEvent blk ChainDB.NewFollower -> Text "New follower was created" @@ -1525,21 +1525,21 @@ _ WithOrigin SlotNo _ -> Text "FollowerNewImmIterator" - ChainDB.TraceInitChainSelEvent TraceInitChainSelEvent blk -ev -> case TraceInitChainSelEvent blk -ev of + ChainDB.TraceInitChainSelEvent TraceInitChainSelEvent blk +ev -> case TraceInitChainSelEvent blk +ev of ChainDB.InitChainSelValidation TraceValidationEvent blk _ -> Text "InitChainSelValidation" - ChainDB.TraceIteratorEvent TraceIteratorEvent blk -ev -> case TraceIteratorEvent blk -ev of - ChainDB.UnknownRangeRequested UnknownRange blk -ev' -> + ChainDB.TraceIteratorEvent TraceIteratorEvent blk +ev -> case TraceIteratorEvent blk +ev of + ChainDB.UnknownRangeRequested UnknownRange blk +ev' -> case UnknownRange blk -ev' of - ChainDB.MissingBlock RealPoint blk -realPt -> +ev' of + ChainDB.MissingBlock RealPoint blk +realPt -> Text "The block at the given point was not found in the ChainDB." Text -> Text -> Text @@ -1547,9 +1547,9 @@ <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint RealPoint blk -realPt - ChainDB.ForkTooOld StreamFrom blk -streamFrom -> +realPt + ChainDB.ForkTooOld StreamFrom blk +streamFrom -> Text "The requested range forks off too far in the past" Text -> Text -> Text @@ -1557,9 +1557,9 @@ <> StreamFrom blk -> Text forall a. Show a => a -> Text showT StreamFrom blk -streamFrom - ChainDB.BlockMissingFromVolatileDB RealPoint blk -realPt -> +streamFrom + ChainDB.BlockMissingFromVolatileDB RealPoint blk +realPt -> Text "This block is no longer in the VolatileDB because it has been garbage\ \ collected. It might now be in the ImmutableDB if it was part of the\ @@ -1568,17 +1568,17 @@ <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint RealPoint blk -realPt - ChainDB.StreamFromImmutableDB StreamFrom blk -sFrom StreamTo blk -sTo -> +realPt + ChainDB.StreamFromImmutableDB StreamFrom blk +sFrom StreamTo blk +sTo -> Text "Stream only from the ImmutableDB. StreamFrom:" Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> StreamFrom blk -> Text forall a. Show a => a -> Text showT StreamFrom blk -sFrom Text -> Text -> Text +sFrom Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -1587,11 +1587,11 @@ <> StreamTo blk -> Text forall a. Show a => a -> Text showT StreamTo blk -sTo - ChainDB.StreamFromBoth StreamFrom blk -sFrom StreamTo blk -sTo [RealPoint blk] -pts -> +sTo + ChainDB.StreamFromBoth StreamFrom blk +sFrom StreamTo blk +sTo [RealPoint blk] +pts -> Text "Stream from both the VolatileDB and the ImmutableDB." Text -> Text -> Text @@ -1602,7 +1602,7 @@ <> StreamFrom blk -> Text forall a. Show a => a -> Text showT StreamFrom blk -sFrom Text -> Text -> Text +sFrom Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " StreamTo: " Text -> Text -> Text @@ -1610,7 +1610,7 @@ <> StreamTo blk -> Text forall a. Show a => a -> Text showT StreamTo blk -sTo +sTo Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -1623,11 +1623,11 @@ map RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint [RealPoint blk] -pts) - ChainDB.StreamFromVolatileDB StreamFrom blk -sFrom StreamTo blk -sTo [RealPoint blk] -pts -> +pts) + ChainDB.StreamFromVolatileDB StreamFrom blk +sFrom StreamTo blk +sTo [RealPoint blk] +pts -> Text "Stream only from the VolatileDB." Text -> Text -> Text @@ -1638,7 +1638,7 @@ <> StreamFrom blk -> Text forall a. Show a => a -> Text showT StreamFrom blk -sFrom Text -> Text -> Text +sFrom Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " StreamTo: " Text -> Text -> Text @@ -1646,7 +1646,7 @@ <> StreamTo blk -> Text forall a. Show a => a -> Text showT StreamTo blk -sTo +sTo Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -1659,9 +1659,9 @@ map RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint [RealPoint blk] -pts) - ChainDB.BlockWasCopiedToImmutableDB RealPoint blk -pt -> +pts) + ChainDB.BlockWasCopiedToImmutableDB RealPoint blk +pt -> Text "This block has been garbage collected from the VolatileDB is now\ \ found and streamed from the ImmutableDB. Block: " Text -> Text -> Text @@ -1669,9 +1669,9 @@ <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint RealPoint blk -pt - ChainDB.BlockGCedFromVolatileDB RealPoint blk -pt -> +pt + ChainDB.BlockGCedFromVolatileDB RealPoint blk +pt -> Text "This block no longer in the VolatileDB and isn't in the ImmutableDB\ \ either; it wasn't part of the current chain. Block: " Text -> Text -> Text @@ -1679,15 +1679,15 @@ <> RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint RealPoint blk -pt +pt TraceIteratorEvent blk ChainDB.SwitchBackToVolatileDB -> Text "SwitchBackToVolatileDB" - ChainDB.TraceImmutableDBEvent TraceEvent blk -_ev -> Text + ChainDB.TraceImmutableDBEvent TraceEvent blk +_ev -> Text "TraceImmutableDBEvent" - ChainDB.TraceVolatileDBEvent TraceEvent blk -_ev -> Text + ChainDB.TraceVolatileDBEvent TraceEvent blk +_ev -> Text "TraceVolatileDBEvent" @@ -1696,11 +1696,11 @@ -- -- NOTE: this list is sorted by the unqualified name of the outermost type. -instance ToObject BFT.BftValidationErr where - toObject :: TracingVerbosity -> BftValidationErr -> Object -toObject TracingVerbosity -_verb (BFT.BftInvalidSignature String -err) = +instance ToObject BFT.BftValidationErr where + toObject :: TracingVerbosity -> BftValidationErr -> Object +toObject TracingVerbosity +_verb (BFT.BftInvalidSignature String +err) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1716,19 +1716,19 @@ .= Text -> Value String (String -> Text pack String -err) +err) ] -instance ToObject LedgerDB.DiskSnapshot where - toObject :: TracingVerbosity -> DiskSnapshot -> Object -toObject TracingVerbosity -MinimalVerbosity DiskSnapshot -snap = TracingVerbosity -> DiskSnapshot -> Object +instance ToObject LedgerDB.DiskSnapshot where + toObject :: TracingVerbosity -> DiskSnapshot -> Object +toObject TracingVerbosity +MinimalVerbosity DiskSnapshot +snap = TracingVerbosity -> DiskSnapshot -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity NormalVerbosity DiskSnapshot -snap +snap toObject TracingVerbosity NormalVerbosity DiskSnapshot _ = [(Text, Value)] -> Object @@ -1740,8 +1740,8 @@ String Text "snapshot" ] toObject TracingVerbosity -MaximalVerbosity DiskSnapshot -snap = +MaximalVerbosity DiskSnapshot +snap = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1760,40 +1760,40 @@ $ DiskSnapshot -> String forall a. Show a => a -> String show DiskSnapshot -snap) ] +snap) ] -instance ( StandardHash blk - , ToObject (LedgerError blk) - , ToObject (OtherHeaderEnvelopeError blk) - , ToObject (ValidationErr (BlockProtocol blk))) - => ToObject (ExtValidationError blk) where - toObject :: TracingVerbosity -> ExtValidationError blk -> Object -toObject TracingVerbosity -verb (ExtValidationErrorLedger LedgerError blk -err) = TracingVerbosity -> LedgerError blk -> Object +instance ( StandardHash blk + , ToObject (LedgerError blk) + , ToObject (OtherHeaderEnvelopeError blk) + , ToObject (ValidationErr (BlockProtocol blk))) + => ToObject (ExtValidationError blk) where + toObject :: TracingVerbosity -> ExtValidationError blk -> Object +toObject TracingVerbosity +verb (ExtValidationErrorLedger LedgerError blk +err) = TracingVerbosity -> LedgerError blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb LedgerError blk -err - toObject TracingVerbosity -verb (ExtValidationErrorHeader HeaderError blk -err) = TracingVerbosity -> HeaderError blk -> Object +verb LedgerError blk +err + toObject TracingVerbosity +verb (ExtValidationErrorHeader HeaderError blk +err) = TracingVerbosity -> HeaderError blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb HeaderError blk -err +verb HeaderError blk +err -instance ( StandardHash blk - , ToObject (OtherHeaderEnvelopeError blk) +instance ( StandardHash blk + , ToObject (OtherHeaderEnvelopeError blk) ) - => ToObject (HeaderEnvelopeError blk) where - toObject :: TracingVerbosity -> HeaderEnvelopeError blk -> Object -toObject TracingVerbosity -_verb (UnexpectedBlockNo BlockNo -expect BlockNo -act) = + => ToObject (HeaderEnvelopeError blk) where + toObject :: TracingVerbosity -> HeaderEnvelopeError blk -> Object +toObject TracingVerbosity +_verb (UnexpectedBlockNo BlockNo +expect BlockNo +act) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1809,19 +1809,19 @@ .= BlockNo -> String forall a. Condense a => a -> String condense BlockNo -expect +expect , Text "actual" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= BlockNo -> String forall a. Condense a => a -> String condense BlockNo -act +act ] - toObject TracingVerbosity -_verb (UnexpectedSlotNo SlotNo -expect SlotNo -act) = + toObject TracingVerbosity +_verb (UnexpectedSlotNo SlotNo +expect SlotNo +act) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1837,19 +1837,19 @@ .= SlotNo -> String forall a. Condense a => a -> String condense SlotNo -expect +expect , Text "actual" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -> String forall a. Condense a => a -> String condense SlotNo -act +act ] - toObject TracingVerbosity -_verb (UnexpectedPrevHash WithOrigin (HeaderHash blk) -expect ChainHash blk -act) = + toObject TracingVerbosity +_verb (UnexpectedPrevHash WithOrigin (HeaderHash blk) +expect ChainHash blk +act) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1869,7 +1869,7 @@ $ WithOrigin (HeaderHash blk) -> String forall a. Show a => a -> String show WithOrigin (HeaderHash blk) -expect) +expect) , Text "actual" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1880,27 +1880,27 @@ $ ChainHash blk -> String forall a. Show a => a -> String show ChainHash blk -act) +act) ] - toObject TracingVerbosity -verb (OtherHeaderEnvelopeError OtherHeaderEnvelopeError blk -err) = + toObject TracingVerbosity +verb (OtherHeaderEnvelopeError OtherHeaderEnvelopeError blk +err) = TracingVerbosity -> OtherHeaderEnvelopeError blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb OtherHeaderEnvelopeError blk -err +verb OtherHeaderEnvelopeError blk +err -instance ( StandardHash blk - , ToObject (ValidationErr (BlockProtocol blk)) - , ToObject (OtherHeaderEnvelopeError blk) +instance ( StandardHash blk + , ToObject (ValidationErr (BlockProtocol blk)) + , ToObject (OtherHeaderEnvelopeError blk) ) - => ToObject (HeaderError blk) where - toObject :: TracingVerbosity -> HeaderError blk -> Object -toObject TracingVerbosity -verb (HeaderProtocolError ValidationErr (BlockProtocol blk) -err) = + => ToObject (HeaderError blk) where + toObject :: TracingVerbosity -> HeaderError blk -> Object +toObject TracingVerbosity +verb (HeaderProtocolError ValidationErr (BlockProtocol blk) +err) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1916,12 +1916,12 @@ .= TracingVerbosity -> ValidationErr (BlockProtocol blk) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb ValidationErr (BlockProtocol blk) -err +verb ValidationErr (BlockProtocol blk) +err ] - toObject TracingVerbosity -verb (HeaderEnvelopeError HeaderEnvelopeError blk -err) = + toObject TracingVerbosity +verb (HeaderEnvelopeError HeaderEnvelopeError blk +err) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1937,21 +1937,21 @@ .= TracingVerbosity -> HeaderEnvelopeError blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb HeaderEnvelopeError blk -err +verb HeaderEnvelopeError blk +err ] -instance ( ConvertRawHash blk - , StandardHash blk - , ToObject (LedgerError blk) - , ToObject (OtherHeaderEnvelopeError blk) - , ToObject (ValidationErr (BlockProtocol blk))) - => ToObject (ChainDB.InvalidBlockReason blk) where - toObject :: TracingVerbosity -> InvalidBlockReason blk -> Object -toObject TracingVerbosity -verb (ChainDB.ValidationError ExtValidationError blk -extvalerr) = +instance ( ConvertRawHash blk + , StandardHash blk + , ToObject (LedgerError blk) + , ToObject (OtherHeaderEnvelopeError blk) + , ToObject (ValidationErr (BlockProtocol blk))) + => ToObject (ChainDB.InvalidBlockReason blk) where + toObject :: TracingVerbosity -> InvalidBlockReason blk -> Object +toObject TracingVerbosity +verb (ChainDB.ValidationError ExtValidationError blk +extvalerr) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1967,12 +1967,12 @@ .= TracingVerbosity -> ExtValidationError blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb ExtValidationError blk -extvalerr +verb ExtValidationError blk +extvalerr ] - toObject TracingVerbosity -verb (ChainDB.InFutureExceedsClockSkew RealPoint blk -point) = + toObject TracingVerbosity +verb (ChainDB.InFutureExceedsClockSkew RealPoint blk +point) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1988,17 +1988,17 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -point +verb RealPoint blk +point ] -instance (Show (PBFT.PBftVerKeyHash c)) - => ToObject (PBFT.PBftValidationErr c) where - toObject :: TracingVerbosity -> PBftValidationErr c -> Object -toObject TracingVerbosity -_verb (PBFT.PBftInvalidSignature Text -text) = +instance (Show (PBFT.PBftVerKeyHash c)) + => ToObject (PBFT.PBftValidationErr c) where + toObject :: TracingVerbosity -> PBftValidationErr c -> Object +toObject TracingVerbosity +_verb (PBFT.PBftInvalidSignature Text +text) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2013,12 +2013,12 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -> Value String Text -text +text ] - toObject TracingVerbosity -_verb (PBFT.PBftNotGenesisDelegate PBftVerKeyHash c -vkhash PBftLedgerView c -_ledgerView) = + toObject TracingVerbosity +_verb (PBFT.PBftNotGenesisDelegate PBftVerKeyHash c +vkhash PBftLedgerView c +_ledgerView) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2038,12 +2038,12 @@ $ PBftVerKeyHash c -> String forall a. Show a => a -> String show PBftVerKeyHash c -vkhash) +vkhash) ] - toObject TracingVerbosity -_verb (PBFT.PBftExceededSignThreshold PBftVerKeyHash c -vkhash Word64 -numForged) = + toObject TracingVerbosity +_verb (PBFT.PBftExceededSignThreshold PBftVerKeyHash c +vkhash Word64 +numForged) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2063,7 +2063,7 @@ $ PBftVerKeyHash c -> String forall a. Show a => a -> String show PBftVerKeyHash c -vkhash) +vkhash) , Text "numForged" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2072,10 +2072,10 @@ pack (Word64 -> String forall a. Show a => a -> String show Word64 -numForged)) +numForged)) ] - toObject TracingVerbosity -_verb PBftValidationErr c + toObject TracingVerbosity +_verb PBftValidationErr c PBFT.PBftInvalidSlot = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -2089,12 +2089,12 @@ ] -instance (Show (PBFT.PBftVerKeyHash c)) - => ToObject (PBFT.PBftCannotForge c) where - toObject :: TracingVerbosity -> PBftCannotForge c -> Object -toObject TracingVerbosity -_verb (PBFT.PBftCannotForgeInvalidDelegation PBftVerKeyHash c -vkhash) = +instance (Show (PBFT.PBftVerKeyHash c)) + => ToObject (PBFT.PBftCannotForge c) where + toObject :: TracingVerbosity -> PBftCannotForge c -> Object +toObject TracingVerbosity +_verb (PBFT.PBftCannotForgeInvalidDelegation PBftVerKeyHash c +vkhash) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2114,11 +2114,11 @@ $ PBftVerKeyHash c -> String forall a. Show a => a -> String show PBftVerKeyHash c -vkhash) +vkhash) ] - toObject TracingVerbosity -_verb (PBFT.PBftCannotForgeThresholdExceeded Word64 -numForged) = + toObject TracingVerbosity +_verb (PBFT.PBftCannotForgeThresholdExceeded Word64 +numForged) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2132,16 +2132,16 @@ "numForged" Text -> Word64 -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word64 -numForged +numForged ] -instance ConvertRawHash blk - => ToObject (RealPoint blk) where - toObject :: TracingVerbosity -> RealPoint blk -> Object -toObject TracingVerbosity -verb RealPoint blk -p = [(Text, Value)] -> Object +instance ConvertRawHash blk + => ToObject (RealPoint blk) where + toObject :: TracingVerbosity -> RealPoint blk -> Object +toObject TracingVerbosity +verb RealPoint blk +p = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2157,7 +2157,7 @@ unSlotNo (RealPoint blk -> SlotNo forall blk. RealPoint blk -> SlotNo realPointSlot RealPoint blk -p) +p) , Text "hash" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2167,44 +2167,44 @@ proxy blk -> TracingVerbosity -> HeaderHash blk -> Text renderHeaderHashForVerbosity (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) TracingVerbosity -verb (RealPoint blk -> HeaderHash blk +Proxy @blk) TracingVerbosity +verb (RealPoint blk -> HeaderHash blk forall blk. RealPoint blk -> HeaderHash blk realPointHash RealPoint blk -p) ] +p) ] -instance (ToObject (LedgerUpdate blk), ToObject (LedgerWarning blk)) - => ToObject (LedgerEvent blk) where - toObject :: TracingVerbosity -> LedgerEvent blk -> Object -toObject TracingVerbosity -verb = \case - LedgerUpdate LedgerUpdate blk -update -> TracingVerbosity -> LedgerUpdate blk -> Object +instance (ToObject (LedgerUpdate blk), ToObject (LedgerWarning blk)) + => ToObject (LedgerEvent blk) where + toObject :: TracingVerbosity -> LedgerEvent blk -> Object +toObject TracingVerbosity +verb = \case + LedgerUpdate LedgerUpdate blk +update -> TracingVerbosity -> LedgerUpdate blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb LedgerUpdate blk -update - LedgerWarning LedgerWarning blk -warning -> TracingVerbosity -> LedgerWarning blk -> Object +verb LedgerUpdate blk +update + LedgerWarning LedgerWarning blk +warning -> TracingVerbosity -> LedgerWarning blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb LedgerWarning blk -warning +verb LedgerWarning blk +warning -instance ( ConvertRawHash blk - , LedgerSupportsProtocol blk - , ToObject (Header blk) - , ToObject (LedgerEvent blk)) - => ToObject (ChainDB.TraceEvent blk) where - toObject :: TracingVerbosity -> TraceEvent blk -> Object -toObject TracingVerbosity -verb (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk -ev) = case TraceAddBlockEvent blk -ev of - ChainDB.IgnoreBlockOlderThanK RealPoint blk -pt -> +instance ( ConvertRawHash blk + , LedgerSupportsProtocol blk + , ToObject (Header blk) + , ToObject (LedgerEvent blk)) + => ToObject (ChainDB.TraceEvent blk) where + toObject :: TracingVerbosity -> TraceEvent blk -> Object +toObject TracingVerbosity +verb (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk +ev) = case TraceAddBlockEvent blk +ev of + ChainDB.IgnoreBlockOlderThanK RealPoint blk +pt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2219,10 +2219,10 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt ] - ChainDB.IgnoreBlockAlreadyInVolatileDB RealPoint blk -pt -> +verb RealPoint blk +pt ] + ChainDB.IgnoreBlockAlreadyInVolatileDB RealPoint blk +pt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2237,11 +2237,11 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt ] - ChainDB.IgnoreInvalidBlock RealPoint blk -pt InvalidBlockReason blk -reason -> +verb RealPoint blk +pt ] + ChainDB.IgnoreInvalidBlock RealPoint blk +pt InvalidBlockReason blk +reason -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2256,18 +2256,18 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt +verb RealPoint blk +pt , Text "reason" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= InvalidBlockReason blk -> String forall a. Show a => a -> String show InvalidBlockReason blk -reason ] - ChainDB.AddedBlockToQueue RealPoint blk -pt Word -sz -> +reason ] + ChainDB.AddedBlockToQueue RealPoint blk +pt Word +sz -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2282,18 +2282,18 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt +verb RealPoint blk +pt , Text "queueSize" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word -> Value forall a. ToJSON a => a -> Value toJSON Word -sz ] - ChainDB.BlockInTheFuture RealPoint blk -pt SlotNo -slot -> +sz ] + ChainDB.BlockInTheFuture RealPoint blk +pt SlotNo +slot -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2308,18 +2308,18 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt +verb RealPoint blk +pt , Text "slot" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> SlotNo -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb SlotNo -slot ] - ChainDB.StoreButDontChange RealPoint blk -pt -> +verb SlotNo +slot ] + ChainDB.StoreButDontChange RealPoint blk +pt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2334,10 +2334,10 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt ] - ChainDB.TryAddToCurrentChain RealPoint blk -pt -> +verb RealPoint blk +pt ] + ChainDB.TryAddToCurrentChain RealPoint blk +pt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2352,10 +2352,10 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt ] - ChainDB.TrySwitchToAFork RealPoint blk -pt ChainDiff (HeaderFields blk) +verb RealPoint blk +pt ] + ChainDB.TrySwitchToAFork RealPoint blk +pt ChainDiff (HeaderFields blk) _ -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -2371,13 +2371,13 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt ] - ChainDB.AddedToCurrentChain [LedgerEvent blk] -events NewTipInfo blk -_ AnchoredFragment (Header blk) -base AnchoredFragment (Header blk) -extended -> +verb RealPoint blk +pt ] + ChainDB.AddedToCurrentChain [LedgerEvent blk] +events NewTipInfo blk +_ AnchoredFragment (Header blk) +base AnchoredFragment (Header blk) +extended -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -2397,20 +2397,20 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (AnchoredFragment (Header blk) -> Point (Header blk) +verb (AnchoredFragment (Header blk) -> Point (Header blk) forall block. HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -extended) +extended) , Text "chainLengthDelta" Text -> Int -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AnchoredFragment (Header blk) -extended AnchoredFragment (Header blk) +extended AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> Int -`chainLengthΔ` AnchoredFragment (Header blk) -base +`chainLengthΔ` AnchoredFragment (Header blk) +base ] [(Text, Value)] -> [(Text, Value)] -> [(Text, Value)] forall a. [a] -> [a] -> [a] @@ -2422,15 +2422,15 @@ toJSON (TracingVerbosity -> Header blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (Header blk -> Object) -> [Header blk] -> [Object] +verb (Header blk -> Object) -> [Header blk] -> [Object] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b `map` AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> [Header blk] -addedHdrsNewChain AnchoredFragment (Header blk) -base AnchoredFragment (Header blk) -extended) +addedHdrsNewChain AnchoredFragment (Header blk) +base AnchoredFragment (Header blk) +extended) | TracingVerbosity -verb TracingVerbosity -> TracingVerbosity -> Bool +verb TracingVerbosity -> TracingVerbosity -> Bool forall a. Eq a => a -> a -> Bool == TracingVerbosity MaximalVerbosity ] @@ -2446,18 +2446,18 @@ map (TracingVerbosity -> LedgerEvent blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) [LedgerEvent blk] -events) +verb) [LedgerEvent blk] +events) | Bool -> Bool not ([LedgerEvent blk] -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null [LedgerEvent blk] -events) ] - ChainDB.SwitchedToAFork [LedgerEvent blk] -events NewTipInfo blk -_ AnchoredFragment (Header blk) -old AnchoredFragment (Header blk) -new -> +events) ] + ChainDB.SwitchedToAFork [LedgerEvent blk] +events NewTipInfo blk +_ AnchoredFragment (Header blk) +old AnchoredFragment (Header blk) +new -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -2477,20 +2477,20 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (AnchoredFragment (Header blk) -> Point (Header blk) +verb (AnchoredFragment (Header blk) -> Point (Header blk) forall block. HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -new) +new) , Text "chainLengthDelta" Text -> Int -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AnchoredFragment (Header blk) -new AnchoredFragment (Header blk) +new AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> Int -`chainLengthΔ` AnchoredFragment (Header blk) -old +`chainLengthΔ` AnchoredFragment (Header blk) +old ] [(Text, Value)] -> [(Text, Value)] -> [(Text, Value)] forall a. [a] -> [a] -> [a] @@ -2502,15 +2502,15 @@ toJSON (TracingVerbosity -> Header blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (Header blk -> Object) -> [Header blk] -> [Object] +verb (Header blk -> Object) -> [Header blk] -> [Object] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b `map` AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> [Header blk] -addedHdrsNewChain AnchoredFragment (Header blk) -old AnchoredFragment (Header blk) -new) +addedHdrsNewChain AnchoredFragment (Header blk) +old AnchoredFragment (Header blk) +new) | TracingVerbosity -verb TracingVerbosity -> TracingVerbosity -> Bool +verb TracingVerbosity -> TracingVerbosity -> Bool forall a. Eq a => a -> a -> Bool == TracingVerbosity MaximalVerbosity ] @@ -2526,19 +2526,19 @@ map (TracingVerbosity -> LedgerEvent blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) [LedgerEvent blk] -events) +verb) [LedgerEvent blk] +events) | Bool -> Bool not ([LedgerEvent blk] -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null [LedgerEvent blk] -events) ] - ChainDB.AddBlockValidation TraceValidationEvent blk -ev' -> case TraceValidationEvent blk -ev' of - ChainDB.InvalidBlock ExtValidationError blk -err RealPoint blk -pt -> +events) ] + ChainDB.AddBlockValidation TraceValidationEvent blk +ev' -> case TraceValidationEvent blk +ev' of + ChainDB.InvalidBlock ExtValidationError blk +err RealPoint blk +pt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2553,17 +2553,17 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt +verb RealPoint blk +pt , Text "error" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ExtValidationError blk -> String forall a. Show a => a -> String show ExtValidationError blk -err ] - ChainDB.InvalidCandidate AnchoredFragment (Header blk) -c -> +err ] + ChainDB.InvalidCandidate AnchoredFragment (Header blk) +c -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2580,14 +2580,14 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (AnchoredFragment (Header blk) -> Point (Header blk) +verb (AnchoredFragment (Header blk) -> Point (Header blk) forall block. HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) ] - ChainDB.ValidCandidate AnchoredFragment (Header blk) -c -> +c) ] + ChainDB.ValidCandidate AnchoredFragment (Header blk) +c -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2604,15 +2604,15 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (AnchoredFragment (Header blk) -> Point (Header blk) +verb (AnchoredFragment (Header blk) -> Point (Header blk) forall block. HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) ] - ChainDB.CandidateContainsFutureBlocks AnchoredFragment (Header blk) -c [Header blk] -hdrs -> +c) ] + ChainDB.CandidateContainsFutureBlocks AnchoredFragment (Header blk) +c [Header blk] +hdrs -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2629,12 +2629,12 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (AnchoredFragment (Header blk) -> Point (Header blk) +verb (AnchoredFragment (Header blk) -> Point (Header blk) forall block. HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) +c) , Text "headers" Text -> [Text] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2645,7 +2645,7 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (Point blk -> Text) +verb (Point blk -> Text) -> (Header blk -> Point blk) -> Header blk -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -2653,10 +2653,10 @@ . Header blk -> Point blk forall blk. HasHeader (Header blk) => Header blk -> Point blk headerPoint) [Header blk] -hdrs ] - ChainDB.CandidateContainsFutureBlocksExceedingClockSkew AnchoredFragment (Header blk) -c [Header blk] -hdrs -> +hdrs ] + ChainDB.CandidateContainsFutureBlocksExceedingClockSkew AnchoredFragment (Header blk) +c [Header blk] +hdrs -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2673,12 +2673,12 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (AnchoredFragment (Header blk) -> Point (Header blk) +verb (AnchoredFragment (Header blk) -> Point (Header blk) forall block. HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) +c) , Text "headers" Text -> [Text] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2689,7 +2689,7 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (Point blk -> Text) +verb (Point blk -> Text) -> (Header blk -> Point blk) -> Header blk -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -2697,10 +2697,10 @@ . Header blk -> Point blk forall blk. HasHeader (Header blk) => Header blk -> Point blk headerPoint) [Header blk] -hdrs ] - ChainDB.AddedBlockToVolatileDB RealPoint blk -pt (BlockNo Word64 -bn) IsEBB +hdrs ] + ChainDB.AddedBlockToVolatileDB RealPoint blk +pt (BlockNo Word64 +bn) IsEBB _ -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -2716,17 +2716,17 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt +verb RealPoint blk +pt , Text "blockNo" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word64 -> String forall a. Show a => a -> String show Word64 -bn ] - ChainDB.ChainSelectionForFutureBlock RealPoint blk -pt -> +bn ] + ChainDB.ChainSelectionForFutureBlock RealPoint blk +pt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2741,18 +2741,18 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt ] +verb RealPoint blk +pt ] where - addedHdrsNewChain - :: AF.AnchoredFragment (Header blk) - -> AF.AnchoredFragment (Header blk) - -> [Header blk] - addedHdrsNewChain :: AnchoredFragment (Header blk) + addedHdrsNewChain + :: AF.AnchoredFragment (Header blk) + -> AF.AnchoredFragment (Header blk) + -> [Header blk] + addedHdrsNewChain :: AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> [Header blk] -addedHdrsNewChain AnchoredFragment (Header blk) -fro AnchoredFragment (Header blk) -to_ = +addedHdrsNewChain AnchoredFragment (Header blk) +fro AnchoredFragment (Header blk) +to_ = case AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> Maybe @@ -2767,25 +2767,25 @@ (AnchoredFragment block1, AnchoredFragment block2, AnchoredFragment block1, AnchoredFragment block2) AF.intersect AnchoredFragment (Header blk) -fro AnchoredFragment (Header blk) -to_ of +fro AnchoredFragment (Header blk) +to_ of Just (AnchoredFragment (Header blk) _, AnchoredFragment (Header blk) _, AnchoredFragment (Header blk) -_, AnchoredFragment (Header blk) -s2 :: AF.AnchoredFragment (Header blk)) -> +_, AnchoredFragment (Header blk) +s2 :: AF.AnchoredFragment (Header blk)) -> AnchoredFragment (Header blk) -> [Header blk] forall v a b. AnchoredSeq v a b -> [b] AF.toOldestFirst AnchoredFragment (Header blk) -s2 +s2 Maybe (AnchoredFragment (Header blk), AnchoredFragment (Header blk), AnchoredFragment (Header blk), AnchoredFragment (Header blk)) Nothing -> [] -- No sense to do validation here. - chainLengthΔ :: AF.AnchoredFragment (Header blk) -> AF.AnchoredFragment (Header blk) -> Int - chainLengthΔ :: AnchoredFragment (Header blk) + chainLengthΔ :: AF.AnchoredFragment (Header blk) -> AF.AnchoredFragment (Header blk) -> Int + chainLengthΔ :: AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) -> Int -chainLengthΔ = (Int -> Int -> Int) +chainLengthΔ = (Int -> Int -> Int) -> (AnchoredFragment (Header blk) -> Int) -> AnchoredFragment (Header blk) -> AnchoredFragment (Header blk) @@ -2823,16 +2823,16 @@ AnchoredFragment block -> WithOrigin BlockNo AF.headBlockNo) toObject TracingVerbosity -MinimalVerbosity (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk -_ev) = Object +MinimalVerbosity (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk +_ev) = Object forall a. ToObject a => HashMap Text a emptyObject -- no output - toObject TracingVerbosity -verb (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk -ev) = case TraceLedgerReplayEvent blk -ev of - LedgerDB.ReplayFromGenesis Point blk -_replayTo -> + toObject TracingVerbosity +verb (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk +ev) = case TraceLedgerReplayEvent blk +ev of + LedgerDB.ReplayFromGenesis Point blk +_replayTo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2841,10 +2841,10 @@ .= Text -> Value String Text "TraceLedgerReplayEvent.ReplayFromGenesis" ] - LedgerDB.ReplayFromSnapshot DiskSnapshot -snap RealPoint blk -tip' Point blk -_replayTo -> + LedgerDB.ReplayFromSnapshot DiskSnapshot +snap RealPoint blk +tip' Point blk +_replayTo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2859,19 +2859,19 @@ .= TracingVerbosity -> DiskSnapshot -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb DiskSnapshot -snap +verb DiskSnapshot +snap , Text "tip" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= RealPoint blk -> String forall a. Show a => a -> String show RealPoint blk -tip' ] - LedgerDB.ReplayedBlock RealPoint blk -pt [LedgerEvent blk] -_ledgerEvents Point blk -replayTo -> +tip' ] + LedgerDB.ReplayedBlock RealPoint blk +pt [LedgerEvent blk] +_ledgerEvents Point blk +replayTo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2887,7 +2887,7 @@ unSlotNo (RealPoint blk -> SlotNo forall blk. RealPoint blk -> SlotNo realPointSlot RealPoint blk -pt) +pt) , Text "tip" Text -> Word64 -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2898,20 +2898,20 @@ unSlotNo (Point blk -> WithOrigin SlotNo forall block. Point block -> WithOrigin SlotNo pointSlot Point blk -replayTo) ] +replayTo) ] toObject TracingVerbosity -MinimalVerbosity (ChainDB.TraceLedgerEvent TraceEvent blk -_ev) = Object +MinimalVerbosity (ChainDB.TraceLedgerEvent TraceEvent blk +_ev) = Object forall a. ToObject a => HashMap Text a emptyObject -- no output - toObject TracingVerbosity -verb (ChainDB.TraceLedgerEvent TraceEvent blk -ev) = case TraceEvent blk -ev of - LedgerDB.TookSnapshot DiskSnapshot -snap RealPoint blk -pt -> + toObject TracingVerbosity +verb (ChainDB.TraceLedgerEvent TraceEvent blk +ev) = case TraceEvent blk +ev of + LedgerDB.TookSnapshot DiskSnapshot +snap RealPoint blk +pt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2926,17 +2926,17 @@ .= TracingVerbosity -> DiskSnapshot -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb DiskSnapshot -snap +verb DiskSnapshot +snap , Text "tip" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= RealPoint blk -> String forall a. Show a => a -> String show RealPoint blk -pt ] - LedgerDB.DeletedSnapshot DiskSnapshot -snap -> +pt ] + LedgerDB.DeletedSnapshot DiskSnapshot +snap -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2951,11 +2951,11 @@ .= TracingVerbosity -> DiskSnapshot -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb DiskSnapshot -snap ] - LedgerDB.InvalidSnapshot DiskSnapshot -snap InitFailure blk -failure -> +verb DiskSnapshot +snap ] + LedgerDB.InvalidSnapshot DiskSnapshot +snap InitFailure blk +failure -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2970,22 +2970,22 @@ .= TracingVerbosity -> DiskSnapshot -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb DiskSnapshot -snap +verb DiskSnapshot +snap , Text "failure" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= InitFailure blk -> String forall a. Show a => a -> String show InitFailure blk -failure ] +failure ] - toObject TracingVerbosity -verb (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk -ev) = case TraceCopyToImmutableDBEvent blk -ev of - ChainDB.CopiedBlockToImmutableDB Point blk -pt -> + toObject TracingVerbosity +verb (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk +ev) = case TraceCopyToImmutableDBEvent blk +ev of + ChainDB.CopiedBlockToImmutableDB Point blk +pt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3000,8 +3000,8 @@ .= TracingVerbosity -> Point blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb Point blk -pt ] +verb Point blk +pt ] TraceCopyToImmutableDBEvent blk ChainDB.NoBlocksToCopyToImmutableDB -> [(Text, Value)] -> Object @@ -3013,12 +3013,12 @@ String Text "TraceCopyToImmutableDBEvent.NoBlocksToCopyToImmutableDB" ] - toObject TracingVerbosity -verb (ChainDB.TraceGCEvent TraceGCEvent blk -ev) = case TraceGCEvent blk -ev of - ChainDB.PerformedGC SlotNo -slot -> + toObject TracingVerbosity +verb (ChainDB.TraceGCEvent TraceGCEvent blk +ev) = case TraceGCEvent blk +ev of + ChainDB.PerformedGC SlotNo +slot -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3033,11 +3033,11 @@ .= TracingVerbosity -> SlotNo -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb SlotNo -slot ] - ChainDB.ScheduledGC SlotNo -slot Time -difft -> +verb SlotNo +slot ] + ChainDB.ScheduledGC SlotNo +slot Time +difft -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -3054,8 +3054,8 @@ .= TracingVerbosity -> SlotNo -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb SlotNo -slot ] [(Text, Value)] -> [(Text, Value)] -> [(Text, Value)] +verb SlotNo +slot ] [(Text, Value)] -> [(Text, Value)] -> [(Text, Value)] forall a. Semigroup a => a -> a -> a <> [ Text @@ -3070,19 +3070,19 @@ . Time -> String forall a. Show a => a -> String show) Time -difft) | TracingVerbosity -verb TracingVerbosity -> TracingVerbosity -> Bool +difft) | TracingVerbosity +verb TracingVerbosity -> TracingVerbosity -> Bool forall a. Ord a => a -> a -> Bool >= TracingVerbosity MaximalVerbosity] - toObject TracingVerbosity -verb (ChainDB.TraceOpenEvent TraceOpenEvent blk -ev) = case TraceOpenEvent blk -ev of - ChainDB.OpenedDB Point blk -immTip Point blk -tip' -> + toObject TracingVerbosity +verb (ChainDB.TraceOpenEvent TraceOpenEvent blk +ev) = case TraceOpenEvent blk +ev of + ChainDB.OpenedDB Point blk +immTip Point blk +tip' -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3097,19 +3097,19 @@ .= TracingVerbosity -> Point blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb Point blk -immTip +verb Point blk +immTip , Text "tip" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> Point blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb Point blk -tip' ] - ChainDB.ClosedDB Point blk -immTip Point blk -tip' -> +verb Point blk +tip' ] + ChainDB.ClosedDB Point blk +immTip Point blk +tip' -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3124,19 +3124,19 @@ .= TracingVerbosity -> Point blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb Point blk -immTip +verb Point blk +immTip , Text "tip" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> Point blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb Point blk -tip' ] - ChainDB.OpenedImmutableDB Point blk -immTip ChunkNo -epoch -> +verb Point blk +tip' ] + ChainDB.OpenedImmutableDB Point blk +immTip ChunkNo +epoch -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3151,8 +3151,8 @@ .= TracingVerbosity -> Point blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb Point blk -immTip +verb Point blk +immTip , Text "epoch" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3165,7 +3165,7 @@ . ChunkNo -> String forall a. Show a => a -> String show) ChunkNo -epoch) ] +epoch) ] TraceOpenEvent blk ChainDB.OpenedVolatileDB -> [(Text, Value)] -> Object @@ -3187,10 +3187,10 @@ String Text "TraceOpenEvent.OpenedLgrDB" ] - toObject TracingVerbosity -_verb (ChainDB.TraceFollowerEvent TraceFollowerEvent blk -ev) = case TraceFollowerEvent blk -ev of + toObject TracingVerbosity +_verb (ChainDB.TraceFollowerEvent TraceFollowerEvent blk +ev) = case TraceFollowerEvent blk +ev of TraceFollowerEvent blk ChainDB.NewFollower -> [(Text, Value)] -> Object @@ -3233,16 +3233,16 @@ .= Text -> Value String Text "TraceFollowerEvent.FollowerNewImmIterator" ] - toObject TracingVerbosity -verb (ChainDB.TraceInitChainSelEvent TraceInitChainSelEvent blk -ev) = case TraceInitChainSelEvent blk -ev of - ChainDB.InitChainSelValidation TraceValidationEvent blk -ev' -> case TraceValidationEvent blk -ev' of - ChainDB.InvalidBlock ExtValidationError blk -err RealPoint blk -pt -> + toObject TracingVerbosity +verb (ChainDB.TraceInitChainSelEvent TraceInitChainSelEvent blk +ev) = case TraceInitChainSelEvent blk +ev of + ChainDB.InitChainSelValidation TraceValidationEvent blk +ev' -> case TraceValidationEvent blk +ev' of + ChainDB.InvalidBlock ExtValidationError blk +err RealPoint blk +pt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3257,17 +3257,17 @@ .= TracingVerbosity -> RealPoint blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb RealPoint blk -pt +verb RealPoint blk +pt , Text "error" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ExtValidationError blk -> String forall a. Show a => a -> String show ExtValidationError blk -err ] - ChainDB.InvalidCandidate AnchoredFragment (Header blk) -c -> +err ] + ChainDB.InvalidCandidate AnchoredFragment (Header blk) +c -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3284,14 +3284,14 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (AnchoredFragment (Header blk) -> Point (Header blk) +verb (AnchoredFragment (Header blk) -> Point (Header blk) forall block. HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) ] - ChainDB.ValidCandidate AnchoredFragment (Header blk) -c -> +c) ] + ChainDB.ValidCandidate AnchoredFragment (Header blk) +c -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3308,15 +3308,15 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (AnchoredFragment (Header blk) -> Point (Header blk) +verb (AnchoredFragment (Header blk) -> Point (Header blk) forall block. HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) ] - ChainDB.CandidateContainsFutureBlocks AnchoredFragment (Header blk) -c [Header blk] -hdrs -> +c) ] + ChainDB.CandidateContainsFutureBlocks AnchoredFragment (Header blk) +c [Header blk] +hdrs -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3333,12 +3333,12 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (AnchoredFragment (Header blk) -> Point (Header blk) +verb (AnchoredFragment (Header blk) -> Point (Header blk) forall block. HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) +c) , Text "headers" Text -> [Text] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3349,7 +3349,7 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (Point blk -> Text) +verb (Point blk -> Text) -> (Header blk -> Point blk) -> Header blk -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -3357,10 +3357,10 @@ . Header blk -> Point blk forall blk. HasHeader (Header blk) => Header blk -> Point blk headerPoint) [Header blk] -hdrs ] - ChainDB.CandidateContainsFutureBlocksExceedingClockSkew AnchoredFragment (Header blk) -c [Header blk] -hdrs -> +hdrs ] + ChainDB.CandidateContainsFutureBlocksExceedingClockSkew AnchoredFragment (Header blk) +c [Header blk] +hdrs -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3377,12 +3377,12 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (AnchoredFragment (Header blk) -> Point (Header blk) +verb (AnchoredFragment (Header blk) -> Point (Header blk) forall block. HasHeader block => AnchoredFragment block -> Point block AF.headPoint AnchoredFragment (Header blk) -c) +c) , Text "headers" Text -> [Text] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3393,7 +3393,7 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (Point blk -> Text) +verb (Point blk -> Text) -> (Header blk -> Point blk) -> Header blk -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -3401,13 +3401,13 @@ . Header blk -> Point blk forall blk. HasHeader (Header blk) => Header blk -> Point blk headerPoint) [Header blk] -hdrs ] - toObject TracingVerbosity -_verb (ChainDB.TraceIteratorEvent TraceIteratorEvent blk -ev) = case TraceIteratorEvent blk -ev of - ChainDB.UnknownRangeRequested UnknownRange blk -unkRange -> +hdrs ] + toObject TracingVerbosity +_verb (ChainDB.TraceIteratorEvent TraceIteratorEvent blk +ev) = case TraceIteratorEvent blk +ev of + ChainDB.UnknownRangeRequested UnknownRange blk +unkRange -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3423,12 +3423,12 @@ String (UnknownRange blk -> Text forall a. Show a => a -> Text showT UnknownRange blk -unkRange) +unkRange) ] - ChainDB.StreamFromVolatileDB StreamFrom blk -streamFrom StreamTo blk -streamTo [RealPoint blk] -realPt -> + ChainDB.StreamFromVolatileDB StreamFrom blk +streamFrom StreamTo blk +streamTo [RealPoint blk] +realPt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3444,7 +3444,7 @@ String (StreamFrom blk -> Text forall a. Show a => a -> Text showT StreamFrom blk -streamFrom) +streamFrom) , Text "to" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3452,7 +3452,7 @@ String (StreamTo blk -> Text forall a. Show a => a -> Text showT StreamTo blk -streamTo) +streamTo) , Text "point" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3471,11 +3471,11 @@ map RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint [RealPoint blk] -realPt) +realPt) ] - ChainDB.StreamFromImmutableDB StreamFrom blk -streamFrom StreamTo blk -streamTo -> + ChainDB.StreamFromImmutableDB StreamFrom blk +streamFrom StreamTo blk +streamTo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3491,7 +3491,7 @@ String (StreamFrom blk -> Text forall a. Show a => a -> Text showT StreamFrom blk -streamFrom) +streamFrom) , Text "to" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3499,12 +3499,12 @@ String (StreamTo blk -> Text forall a. Show a => a -> Text showT StreamTo blk -streamTo) +streamTo) ] - ChainDB.StreamFromBoth StreamFrom blk -streamFrom StreamTo blk -streamTo [RealPoint blk] -realPt -> + ChainDB.StreamFromBoth StreamFrom blk +streamFrom StreamTo blk +streamTo [RealPoint blk] +realPt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3520,7 +3520,7 @@ String (StreamFrom blk -> Text forall a. Show a => a -> Text showT StreamFrom blk -streamFrom) +streamFrom) , Text "to" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3528,7 +3528,7 @@ String (StreamTo blk -> Text forall a. Show a => a -> Text showT StreamTo blk -streamTo) +streamTo) , Text "point" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3547,10 +3547,10 @@ map RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint [RealPoint blk] -realPt) +realPt) ] - ChainDB.BlockMissingFromVolatileDB RealPoint blk -realPt -> + ChainDB.BlockMissingFromVolatileDB RealPoint blk +realPt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3566,10 +3566,10 @@ String (RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint RealPoint blk -realPt) +realPt) ] - ChainDB.BlockWasCopiedToImmutableDB RealPoint blk -realPt -> + ChainDB.BlockWasCopiedToImmutableDB RealPoint blk +realPt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3585,10 +3585,10 @@ String (RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint RealPoint blk -realPt) +realPt) ] - ChainDB.BlockGCedFromVolatileDB RealPoint blk -realPt -> + ChainDB.BlockGCedFromVolatileDB RealPoint blk +realPt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3604,7 +3604,7 @@ String (RealPoint blk -> Text forall blk. ConvertRawHash blk => RealPoint blk -> Text renderRealPoint RealPoint blk -realPt) +realPt) ] TraceIteratorEvent blk ChainDB.SwitchBackToVolatileDB -> @@ -3617,10 +3617,10 @@ String Text "TraceIteratorEvent.SwitchBackToVolatileDB" ] - toObject TracingVerbosity -verb (ChainDB.TraceImmutableDBEvent TraceEvent blk -ev) = case TraceEvent blk -ev of + toObject TracingVerbosity +verb (ChainDB.TraceImmutableDBEvent TraceEvent blk +ev) = case TraceEvent blk +ev of TraceEvent blk ImmDB.NoValidLastLocation -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -3630,9 +3630,9 @@ .= Text -> Value String Text "TraceImmutableDBEvent.NoValidLastLocation" ] - ImmDB.ValidatedLastLocation ChunkNo -chunkNo Tip blk -immTip -> + ImmDB.ValidatedLastLocation ChunkNo +chunkNo Tip blk +immTip -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3647,7 +3647,7 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) , Text "immTip" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3655,7 +3655,7 @@ String (Tip blk -> Text forall blk. StandardHash blk => Tip blk -> Text renderTipHash Tip blk -immTip) +immTip) , Text "blockNo" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3663,10 +3663,10 @@ String (Tip blk -> Text forall blk. Tip blk -> Text renderTipBlockNo Tip blk -immTip) +immTip) ] - ImmDB.ValidatingChunk ChunkNo -chunkNo -> + ImmDB.ValidatingChunk ChunkNo +chunkNo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3681,10 +3681,10 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) ] - ImmDB.MissingChunkFile ChunkNo -chunkNo -> + ImmDB.MissingChunkFile ChunkNo +chunkNo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3699,11 +3699,11 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) ] - ImmDB.InvalidChunkFile ChunkNo -chunkNo (ImmDB.ChunkErrRead ReadIncrementalErr -readIncErr) -> + ImmDB.InvalidChunkFile ChunkNo +chunkNo (ImmDB.ChunkErrRead ReadIncrementalErr +readIncErr) -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3718,7 +3718,7 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3726,12 +3726,12 @@ String (ReadIncrementalErr -> Text forall a. Show a => a -> Text showT ReadIncrementalErr -readIncErr) +readIncErr) ] - ImmDB.InvalidChunkFile ChunkNo -chunkNo (ImmDB.ChunkErrHashMismatch HeaderHash blk -hashPrevBlock ChainHash blk -prevHashOfBlock) -> + ImmDB.InvalidChunkFile ChunkNo +chunkNo (ImmDB.ChunkErrHashMismatch HeaderHash blk +hashPrevBlock ChainHash blk +prevHashOfBlock) -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3746,7 +3746,7 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) , Text "hashPrevBlock" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3763,10 +3763,10 @@ proxy blk -> HeaderHash blk -> ByteString toRawHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) (HeaderHash blk -> Text) -> HeaderHash blk -> Text +Proxy @blk) (HeaderHash blk -> Text) -> HeaderHash blk -> Text forall a b. (a -> b) -> a -> b $ HeaderHash blk -hashPrevBlock) +hashPrevBlock) , Text "prevHashOfBlock" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3785,12 +3785,12 @@ proxy blk -> HeaderHash blk -> ByteString toRawHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk)) ChainHash blk -prevHashOfBlock) +Proxy @blk)) ChainHash blk +prevHashOfBlock) ] - ImmDB.InvalidChunkFile ChunkNo -chunkNo (ImmDB.ChunkErrCorrupt Point blk -pt) -> + ImmDB.InvalidChunkFile ChunkNo +chunkNo (ImmDB.ChunkErrCorrupt Point blk +pt) -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3805,7 +3805,7 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) , Text "block" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3815,12 +3815,12 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb Point blk -pt) +verb Point blk +pt) ] - ImmDB.ChunkFileDoesntFit ChainHash blk -expectPrevHash ChainHash blk -actualPrevHash -> + ImmDB.ChunkFileDoesntFit ChainHash blk +expectPrevHash ChainHash blk +actualPrevHash -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3847,8 +3847,8 @@ proxy blk -> HeaderHash blk -> ByteString toRawHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk)) ChainHash blk -expectPrevHash) +Proxy @blk)) ChainHash blk +expectPrevHash) , Text "actualPrevHash" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3867,11 +3867,11 @@ proxy blk -> HeaderHash blk -> ByteString toRawHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk)) ChainHash blk -actualPrevHash) +Proxy @blk)) ChainHash blk +actualPrevHash) ] - ImmDB.MissingPrimaryIndex ChunkNo -chunkNo -> + ImmDB.MissingPrimaryIndex ChunkNo +chunkNo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3886,10 +3886,10 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) ] - ImmDB.MissingSecondaryIndex ChunkNo -chunkNo -> + ImmDB.MissingSecondaryIndex ChunkNo +chunkNo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3904,10 +3904,10 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) ] - ImmDB.InvalidPrimaryIndex ChunkNo -chunkNo -> + ImmDB.InvalidPrimaryIndex ChunkNo +chunkNo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3922,10 +3922,10 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) ] - ImmDB.InvalidSecondaryIndex ChunkNo -chunkNo -> + ImmDB.InvalidSecondaryIndex ChunkNo +chunkNo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3940,10 +3940,10 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) ] - ImmDB.RewritePrimaryIndex ChunkNo -chunkNo -> + ImmDB.RewritePrimaryIndex ChunkNo +chunkNo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3958,10 +3958,10 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) ] - ImmDB.RewriteSecondaryIndex ChunkNo -chunkNo -> + ImmDB.RewriteSecondaryIndex ChunkNo +chunkNo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3976,10 +3976,10 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) ] - ImmDB.Migrating Text -txt -> + ImmDB.Migrating Text +txt -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3993,10 +3993,10 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -> Value String Text -txt +txt ] - ImmDB.DeletingAfter WithOrigin (Tip blk) -immTipWithInfo -> + ImmDB.DeletingAfter WithOrigin (Tip blk) +immTipWithInfo -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4014,7 +4014,7 @@ renderWithOrigin Tip blk -> Text forall blk. StandardHash blk => Tip blk -> Text renderTipHash WithOrigin (Tip blk) -immTipWithInfo) +immTipWithInfo) , Text "immTipBlockNo" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4024,7 +4024,7 @@ renderWithOrigin Tip blk -> Text forall blk. Tip blk -> Text renderTipBlockNo WithOrigin (Tip blk) -immTipWithInfo) +immTipWithInfo) ] TraceEvent blk ImmDB.DBAlreadyClosed -> [(Text, Value)] -> Object @@ -4044,13 +4044,13 @@ .= Text -> Value String Text "TraceImmutableDBEvent.DBClosed" ] - ImmDB.TraceCacheEvent TraceCacheEvent -cacheEv -> + ImmDB.TraceCacheEvent TraceCacheEvent +cacheEv -> case TraceCacheEvent -cacheEv of - ImmDB.TraceCurrentChunkHit ChunkNo -chunkNo Word32 -nbPastChunksInCache -> +cacheEv of + ImmDB.TraceCurrentChunkHit ChunkNo +chunkNo Word32 +nbPastChunksInCache -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4065,7 +4065,7 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) , Text "noPastChunks" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4073,11 +4073,11 @@ String (Word32 -> Text forall a. Show a => a -> Text showT Word32 -nbPastChunksInCache) +nbPastChunksInCache) ] - ImmDB.TracePastChunkHit ChunkNo -chunkNo Word32 -nbPastChunksInCache -> + ImmDB.TracePastChunkHit ChunkNo +chunkNo Word32 +nbPastChunksInCache -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4092,7 +4092,7 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) , Text "noPastChunks" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4100,11 +4100,11 @@ String (Word32 -> Text forall a. Show a => a -> Text showT Word32 -nbPastChunksInCache) +nbPastChunksInCache) ] - ImmDB.TracePastChunkMiss ChunkNo -chunkNo Word32 -nbPastChunksInCache -> + ImmDB.TracePastChunkMiss ChunkNo +chunkNo Word32 +nbPastChunksInCache -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4119,7 +4119,7 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) , Text "noPastChunks" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4127,11 +4127,11 @@ String (Word32 -> Text forall a. Show a => a -> Text showT Word32 -nbPastChunksInCache) +nbPastChunksInCache) ] - ImmDB.TracePastChunkEvict ChunkNo -chunkNo Word32 -nbPastChunksInCache -> + ImmDB.TracePastChunkEvict ChunkNo +chunkNo Word32 +nbPastChunksInCache -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4146,7 +4146,7 @@ .= Text -> Value String (ChunkNo -> Text renderChunkNo ChunkNo -chunkNo) +chunkNo) , Text "noPastChunks" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4154,11 +4154,11 @@ String (Word32 -> Text forall a. Show a => a -> Text showT Word32 -nbPastChunksInCache) +nbPastChunksInCache) ] - ImmDB.TracePastChunksExpired [ChunkNo] -chunkNos Word32 -nbPastChunksInCache -> + ImmDB.TracePastChunksExpired [ChunkNo] +chunkNos Word32 +nbPastChunksInCache -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4184,7 +4184,7 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map ChunkNo -> Text renderChunkNo [ChunkNo] -chunkNos) +chunkNos) , Text "noPastChunks" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4192,12 +4192,12 @@ String (Word32 -> Text forall a. Show a => a -> Text showT Word32 -nbPastChunksInCache) +nbPastChunksInCache) ] - toObject TracingVerbosity -_verb (ChainDB.TraceVolatileDBEvent TraceEvent blk -ev) = case TraceEvent blk -ev of + toObject TracingVerbosity +_verb (ChainDB.TraceVolatileDBEvent TraceEvent blk +ev) = case TraceEvent blk +ev of TraceEvent blk VolDb.DBAlreadyClosed -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -4216,8 +4216,8 @@ .= Text -> Value String Text "TraceVolatileDbEvent.DBAlreadyOpen"] - VolDb.BlockAlreadyHere HeaderHash blk -blockId -> + VolDb.BlockAlreadyHere HeaderHash blk +blockId -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4233,10 +4233,10 @@ String (HeaderHash blk -> Text forall a. Show a => a -> Text showT HeaderHash blk -blockId) +blockId) ] - VolDb.TruncateCurrentFile FsPath -fsPath -> + VolDb.TruncateCurrentFile FsPath +fsPath -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4252,12 +4252,12 @@ String (FsPath -> Text forall a. Show a => a -> Text showT FsPath -fsPath) +fsPath) ] - VolDb.Truncate ParseError blk -pErr FsPath -fsPath BlockOffset -blockOffset -> + VolDb.Truncate ParseError blk +pErr FsPath +fsPath BlockOffset +blockOffset -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4273,7 +4273,7 @@ String (ParseError blk -> Text forall a. Show a => a -> Text showT ParseError blk -pErr) +pErr) , Text "file" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4281,7 +4281,7 @@ String (FsPath -> Text forall a. Show a => a -> Text showT FsPath -fsPath) +fsPath) , Text "blockOffset" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4289,10 +4289,10 @@ String (BlockOffset -> Text forall a. Show a => a -> Text showT BlockOffset -blockOffset) +blockOffset) ] - VolDb.InvalidFileNames [FsPath] -fsPaths -> + VolDb.InvalidFileNames [FsPath] +fsPaths -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4319,14 +4319,14 @@ map FsPath -> String forall a. Show a => a -> String show [FsPath] -fsPaths) +fsPaths) ] -instance ConvertRawHash blk => ToObject (TraceBlockFetchServerEvent blk) where - toObject :: TracingVerbosity -> TraceBlockFetchServerEvent blk -> Object -toObject TracingVerbosity -_verb (TraceBlockFetchServerSendBlock Point blk -blk) = +instance ConvertRawHash blk => ToObject (TraceBlockFetchServerEvent blk) where + toObject :: TracingVerbosity -> TraceBlockFetchServerEvent blk -> Object +toObject TracingVerbosity +_verb (TraceBlockFetchServerSendBlock Point blk +blk) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4341,21 +4341,21 @@ .= Text -> Value String ((HeaderHash blk -> Text) -> ChainHash blk -> Text forall blk. (HeaderHash blk -> Text) -> ChainHash blk -> Text -renderChainHash @blk (Proxy blk -> HeaderHash blk -> Text +renderChainHash @blk (Proxy blk -> HeaderHash blk -> Text forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk)) (ChainHash blk -> Text) -> ChainHash blk -> Text +Proxy @blk)) (ChainHash blk -> Text) -> ChainHash blk -> Text forall a b. (a -> b) -> a -> b $ Point blk -> ChainHash blk forall block. Point block -> ChainHash block pointHash Point blk -blk) +blk) ] -tipToObject :: forall blk. ConvertRawHash blk => Tip blk -> [(Text, Value)] +tipToObject :: forall blk. ConvertRawHash blk => Tip blk -> [(Text, Value)] tipToObject :: Tip blk -> [(Text, Value)] tipToObject = \case Tip blk @@ -4381,15 +4381,15 @@ toJSON ((-Int 1) :: Int) ] - Tip SlotNo -slot HeaderHash blk -hash BlockNo -blockno -> + Tip SlotNo +slot HeaderHash blk +hash BlockNo +blockno -> [ Text "slot" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot +slot , Text "block" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4400,24 +4400,24 @@ proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) HeaderHash blk -hash) +Proxy @blk) HeaderHash blk +hash) , Text "blockNo" Text -> BlockNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= BlockNo -blockno +blockno ] -instance (ConvertRawHash blk, LedgerSupportsProtocol blk) - => ToObject (TraceChainSyncClientEvent blk) where - toObject :: TracingVerbosity -> TraceChainSyncClientEvent blk -> Object -toObject TracingVerbosity -verb TraceChainSyncClientEvent blk -ev = case TraceChainSyncClientEvent blk -ev of - TraceDownloadedHeader Header blk -h -> +instance (ConvertRawHash blk, LedgerSupportsProtocol blk) + => ToObject (TraceChainSyncClientEvent blk) where + toObject :: TracingVerbosity -> TraceChainSyncClientEvent blk -> Object +toObject TracingVerbosity +verb TraceChainSyncClientEvent blk +ev = case TraceChainSyncClientEvent blk +ev of + TraceDownloadedHeader Header blk +h -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -4436,9 +4436,9 @@ tipToObject (Header blk -> Tip (Header blk) forall a. HasHeader a => a -> Tip a tipFromHeader Header blk -h) - TraceRolledBack Point blk -tip -> +h) + TraceRolledBack Point blk +tip -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4453,10 +4453,10 @@ .= TracingVerbosity -> Point blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb Point blk -tip ] - TraceException ChainSyncClientException -exc -> +verb Point blk +tip ] + TraceException ChainSyncClientException +exc -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4475,7 +4475,7 @@ $ ChainSyncClientException -> String forall a. Show a => a -> String show ChainSyncClientException -exc) ] +exc) ] TraceFoundIntersection Point blk _ Our (Tip blk) _ Their (Tip blk) @@ -4499,15 +4499,15 @@ String Text "ChainSyncClientEvent.TraceTermination" ] -instance ConvertRawHash blk - => ToObject (TraceChainSyncServerEvent blk) where - toObject :: TracingVerbosity -> TraceChainSyncServerEvent blk -> Object -toObject TracingVerbosity -verb TraceChainSyncServerEvent blk -ev = case TraceChainSyncServerEvent blk -ev of - TraceChainSyncServerRead Tip blk -tip AddBlock{} -> +instance ConvertRawHash blk + => ToObject (TraceChainSyncServerEvent blk) where + toObject :: TracingVerbosity -> TraceChainSyncServerEvent blk -> Object +toObject TracingVerbosity +verb TraceChainSyncServerEvent blk +ev = case TraceChainSyncServerEvent blk +ev of + TraceChainSyncServerRead Tip blk +tip AddBlock{} -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -4524,9 +4524,9 @@ <> Tip blk -> [(Text, Value)] forall blk. ConvertRawHash blk => Tip blk -> [(Text, Value)] tipToObject Tip blk -tip - TraceChainSyncServerRead Tip blk -tip RollBack{} -> +tip + TraceChainSyncServerRead Tip blk +tip RollBack{} -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -4543,9 +4543,9 @@ <> Tip blk -> [(Text, Value)] forall blk. ConvertRawHash blk => Tip blk -> [(Text, Value)] tipToObject Tip blk -tip - TraceChainSyncServerReadBlocked Tip blk -tip AddBlock{} -> +tip + TraceChainSyncServerReadBlocked Tip blk +tip AddBlock{} -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -4562,9 +4562,9 @@ <> Tip blk -> [(Text, Value)] forall blk. ConvertRawHash blk => Tip blk -> [(Text, Value)] tipToObject Tip blk -tip - TraceChainSyncServerReadBlocked Tip blk -tip RollBack{} -> +tip + TraceChainSyncServerReadBlocked Tip blk +tip RollBack{} -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -4581,10 +4581,10 @@ <> Tip blk -> [(Text, Value)] forall blk. ConvertRawHash blk => Tip blk -> [(Text, Value)] tipToObject Tip blk -tip +tip - TraceChainSyncRollForward Point blk -point -> + TraceChainSyncRollForward Point blk +point -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4599,11 +4599,11 @@ .= TracingVerbosity -> Point blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb Point blk -point +verb Point blk +point ] - TraceChainSyncRollBackward Point blk -point -> + TraceChainSyncRollBackward Point blk +point -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -4618,19 +4618,19 @@ .= TracingVerbosity -> Point blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb Point blk -point +verb Point blk +point ] -instance ( Show (ApplyTxErr blk), ToObject (ApplyTxErr blk), ToObject (GenTx blk), - ToJSON (GenTxId blk), LedgerSupportsMempool blk - ) => ToObject (TraceEventMempool blk) where - toObject :: TracingVerbosity -> TraceEventMempool blk -> Object -toObject TracingVerbosity -verb (TraceMempoolAddedTx Validated (GenTx blk) -tx MempoolSize -_mpSzBefore MempoolSize -mpSzAfter) = +instance ( Show (ApplyTxErr blk), ToObject (ApplyTxErr blk), ToObject (GenTx blk), + ToJSON (GenTxId blk), LedgerSupportsMempool blk + ) => ToObject (TraceEventMempool blk) where + toObject :: TracingVerbosity -> TraceEventMempool blk -> Object +toObject TracingVerbosity +verb (TraceMempoolAddedTx Validated (GenTx blk) +tx MempoolSize +_mpSzBefore MempoolSize +mpSzAfter) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -4646,26 +4646,26 @@ .= TracingVerbosity -> GenTx blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (Validated (GenTx blk) -> GenTx blk +verb (Validated (GenTx blk) -> GenTx blk forall blk. LedgerSupportsMempool blk => Validated (GenTx blk) -> GenTx blk txForgetValidated Validated (GenTx blk) -tx) +tx) , Text "mempoolSize" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> MempoolSize -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb MempoolSize -mpSzAfter +verb MempoolSize +mpSzAfter ] - toObject TracingVerbosity -verb (TraceMempoolRejectedTx GenTx blk -tx ApplyTxErr blk -txApplyErr MempoolSize -mpSz) = + toObject TracingVerbosity +verb (TraceMempoolRejectedTx GenTx blk +tx ApplyTxErr blk +txApplyErr MempoolSize +mpSz) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -4681,29 +4681,29 @@ .= TracingVerbosity -> ApplyTxErr blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb ApplyTxErr blk -txApplyErr +verb ApplyTxErr blk +txApplyErr , Text "tx" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> GenTx blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb GenTx blk -tx +verb GenTx blk +tx , Text "mempoolSize" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> MempoolSize -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb MempoolSize -mpSz +verb MempoolSize +mpSz ] - toObject TracingVerbosity -verb (TraceMempoolRemoveTxs [Validated (GenTx blk)] -txs MempoolSize -mpSz) = + toObject TracingVerbosity +verb (TraceMempoolRemoveTxs [Validated (GenTx blk)] +txs MempoolSize +mpSz) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -4722,7 +4722,7 @@ map (TracingVerbosity -> GenTx blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (GenTx blk -> Object) +verb (GenTx blk -> Object) -> (Validated (GenTx blk) -> GenTx blk) -> Validated (GenTx blk) -> Object @@ -4734,21 +4734,21 @@ LedgerSupportsMempool blk => Validated (GenTx blk) -> GenTx blk txForgetValidated) [Validated (GenTx blk)] -txs +txs , Text "mempoolSize" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> MempoolSize -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb MempoolSize -mpSz +verb MempoolSize +mpSz ] - toObject TracingVerbosity -verb (TraceMempoolManuallyRemovedTxs [GenTxId blk] -txs0 [Validated (GenTx blk)] -txs1 MempoolSize -mpSz) = + toObject TracingVerbosity +verb (TraceMempoolManuallyRemovedTxs [GenTxId blk] +txs0 [Validated (GenTx blk)] +txs1 MempoolSize +mpSz) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -4762,7 +4762,7 @@ "txsRemoved" Text -> [GenTxId blk] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [GenTxId blk] -txs0 +txs0 , Text "txsInvalidated" Text -> [Object] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4772,7 +4772,7 @@ map (TracingVerbosity -> GenTx blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (GenTx blk -> Object) +verb (GenTx blk -> Object) -> (Validated (GenTx blk) -> GenTx blk) -> Validated (GenTx blk) -> Object @@ -4784,24 +4784,24 @@ LedgerSupportsMempool blk => Validated (GenTx blk) -> GenTx blk txForgetValidated) [Validated (GenTx blk)] -txs1 +txs1 , Text "mempoolSize" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> MempoolSize -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb MempoolSize -mpSz +verb MempoolSize +mpSz ] -instance ToObject MempoolSize where - toObject :: TracingVerbosity -> MempoolSize -> Object -toObject TracingVerbosity -_verb MempoolSize{Word32 +instance ToObject MempoolSize where + toObject :: TracingVerbosity -> MempoolSize -> Object +toObject TracingVerbosity +_verb MempoolSize{Word32 msNumTxs :: MempoolSize -> Word32 msNumTxs :: Word32 -msNumTxs, Word32 +msNumTxs, Word32 msNumBytes :: MempoolSize -> Word32 msNumBytes :: Word32 msNumBytes} = @@ -4812,17 +4812,17 @@ "numTxs" Text -> Word32 -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word32 -msNumTxs +msNumTxs , Text "bytes" Text -> Word32 -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word32 -msNumBytes +msNumBytes ] instance HasTextFormatter () where - formatText :: () -> Object -> Text -formatText () + formatText :: () -> Object -> Text +formatText () _ = String -> Text pack (String -> Text) -> (Object -> String) -> Object -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). @@ -4840,29 +4840,29 @@ -- ForgeStateInfo default value = () instance Transformable Text IO () where - trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO () -trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO () + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO () +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO () forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText -instance ( tx ~ GenTx blk - , ConvertRawHash blk - , HasTxId tx - , RunNode blk - , Show (TxId tx) - , ToObject (LedgerError blk) - , ToObject (OtherHeaderEnvelopeError blk) - , ToObject (ValidationErr (BlockProtocol blk)) - , ToObject (CannotForge blk) - , ToObject (ForgeStateUpdateError blk)) - => ToObject (TraceForgeEvent blk) where - toObject :: TracingVerbosity -> TraceForgeEvent blk -> Object -toObject TracingVerbosity -_verb (TraceStartLeadershipCheck SlotNo -slotNo) = +instance ( tx ~ GenTx blk + , ConvertRawHash blk + , HasTxId tx + , RunNode blk + , Show (TxId tx) + , ToObject (LedgerError blk) + , ToObject (OtherHeaderEnvelopeError blk) + , ToObject (ValidationErr (BlockProtocol blk)) + , ToObject (CannotForge blk) + , ToObject (ForgeStateUpdateError blk)) + => ToObject (TraceForgeEvent blk) where + toObject :: TracingVerbosity -> TraceForgeEvent blk -> Object +toObject TracingVerbosity +_verb (TraceStartLeadershipCheck SlotNo +slotNo) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -4879,13 +4879,13 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) ] - toObject TracingVerbosity -verb (TraceSlotIsImmutable SlotNo -slotNo Point blk -tipPoint BlockNo -tipBlkNo) = + toObject TracingVerbosity +verb (TraceSlotIsImmutable SlotNo +slotNo Point blk +tipPoint BlockNo +tipBlkNo) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -4902,7 +4902,7 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) , Text "tip" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4911,8 +4911,8 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb Point blk -tipPoint +verb Point blk +tipPoint , Text "tipBlockNo" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4920,12 +4920,12 @@ forall a. ToJSON a => a -> Value toJSON (BlockNo -> Word64 unBlockNo BlockNo -tipBlkNo) +tipBlkNo) ] - toObject TracingVerbosity -_verb (TraceBlockFromFuture SlotNo -currentSlot SlotNo -tip) = + toObject TracingVerbosity +_verb (TraceBlockFromFuture SlotNo +currentSlot SlotNo +tip) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -4942,7 +4942,7 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -currentSlot) +currentSlot) , Text "tip" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4950,13 +4950,13 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -tip) +tip) ] - toObject TracingVerbosity -verb (TraceBlockContext SlotNo -currentSlot BlockNo -tipBlkNo Point blk -tipPoint) = + toObject TracingVerbosity +verb (TraceBlockContext SlotNo +currentSlot BlockNo +tipBlkNo Point blk +tipPoint) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -4973,7 +4973,7 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -currentSlot) +currentSlot) , Text "tip" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4982,8 +4982,8 @@ ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb Point blk -tipPoint +verb Point blk +tipPoint , Text "tipBlockNo" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -4991,12 +4991,12 @@ forall a. ToJSON a => a -> Value toJSON (BlockNo -> Word64 unBlockNo BlockNo -tipBlkNo) +tipBlkNo) ] - toObject TracingVerbosity -_verb (TraceNoLedgerState SlotNo -slotNo Point blk -_pt) = + toObject TracingVerbosity +_verb (TraceNoLedgerState SlotNo +slotNo Point blk +_pt) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -5013,12 +5013,12 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) ] - toObject TracingVerbosity -_verb (TraceLedgerState SlotNo -slotNo Point blk -_pt) = + toObject TracingVerbosity +_verb (TraceLedgerState SlotNo +slotNo Point blk +_pt) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -5035,11 +5035,11 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) ] - toObject TracingVerbosity -_verb (TraceNoLedgerView SlotNo -slotNo OutsideForecastRange + toObject TracingVerbosity +_verb (TraceNoLedgerView SlotNo +slotNo OutsideForecastRange _) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -5057,11 +5057,11 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) ] - toObject TracingVerbosity -_verb (TraceLedgerView SlotNo -slotNo) = + toObject TracingVerbosity +_verb (TraceLedgerView SlotNo +slotNo) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -5078,12 +5078,12 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) ] - toObject TracingVerbosity -verb (TraceForgeStateUpdateError SlotNo -slotNo ForgeStateUpdateError blk -reason) = + toObject TracingVerbosity +verb (TraceForgeStateUpdateError SlotNo +slotNo ForgeStateUpdateError blk +reason) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -5100,20 +5100,20 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) , Text "reason" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> ForgeStateUpdateError blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb ForgeStateUpdateError blk -reason +verb ForgeStateUpdateError blk +reason ] - toObject TracingVerbosity -verb (TraceNodeCannotForge SlotNo -slotNo CannotForge blk -reason) = + toObject TracingVerbosity +verb (TraceNodeCannotForge SlotNo +slotNo CannotForge blk +reason) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -5130,19 +5130,19 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) , Text "reason" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> CannotForge blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb CannotForge blk -reason +verb CannotForge blk +reason ] - toObject TracingVerbosity -_verb (TraceNodeNotLeader SlotNo -slotNo) = + toObject TracingVerbosity +_verb (TraceNodeNotLeader SlotNo +slotNo) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -5159,11 +5159,11 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) ] - toObject TracingVerbosity -_verb (TraceNodeIsLeader SlotNo -slotNo) = + toObject TracingVerbosity +_verb (TraceNodeIsLeader SlotNo +slotNo) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -5180,13 +5180,13 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) ] - toObject TracingVerbosity -_verb (TraceForgedBlock SlotNo -slotNo Point blk -_ blk -blk MempoolSize + toObject TracingVerbosity +_verb (TraceForgedBlock SlotNo +slotNo Point blk +_ blk +blk MempoolSize _) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -5204,7 +5204,7 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) , Text "block" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -5215,12 +5215,12 @@ proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) (HeaderHash blk -> Text) -> HeaderHash blk -> Text +Proxy @blk) (HeaderHash blk -> Text) -> HeaderHash blk -> Text forall a b. (a -> b) -> a -> b $ blk -> HeaderHash blk forall b. HasHeader b => b -> HeaderHash b blockHash blk -blk) +blk) , Text "blockNo" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -5232,29 +5232,29 @@ $ blk -> BlockNo forall b. HasHeader b => b -> BlockNo blockNo blk -blk) +blk) , Text "blockPrev" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -> Value String ((HeaderHash blk -> Text) -> ChainHash blk -> Text forall blk. (HeaderHash blk -> Text) -> ChainHash blk -> Text -renderChainHash @blk (Proxy blk -> HeaderHash blk -> Text +renderChainHash @blk (Proxy blk -> HeaderHash blk -> Text forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk)) (ChainHash blk -> Text) -> ChainHash blk -> Text +Proxy @blk)) (ChainHash blk -> Text) -> ChainHash blk -> Text forall a b. (a -> b) -> a -> b $ blk -> ChainHash blk forall blk. GetPrevHash blk => blk -> ChainHash blk blockPrevHash blk -blk) +blk) ] - toObject TracingVerbosity -_verb (TraceDidntAdoptBlock SlotNo -slotNo blk + toObject TracingVerbosity +_verb (TraceDidntAdoptBlock SlotNo +slotNo blk _) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -5272,13 +5272,13 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) ] - toObject TracingVerbosity -verb (TraceForgedInvalidBlock SlotNo -slotNo blk -_ InvalidBlockReason blk -reason) = + toObject TracingVerbosity +verb (TraceForgedInvalidBlock SlotNo +slotNo blk +_ InvalidBlockReason blk +reason) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -5295,21 +5295,21 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) , Text "reason" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> InvalidBlockReason blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb InvalidBlockReason blk -reason +verb InvalidBlockReason blk +reason ] toObject TracingVerbosity -MaximalVerbosity (TraceAdoptedBlock SlotNo -slotNo blk -blk [Validated (GenTx blk)] -txs) = +MaximalVerbosity (TraceAdoptedBlock SlotNo +slotNo blk +blk [Validated (GenTx blk)] +txs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -5326,7 +5326,7 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) , Text "blockHash" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -5337,13 +5337,13 @@ renderHeaderHashForVerbosity (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) +Proxy @blk) TracingVerbosity MaximalVerbosity (blk -> HeaderHash blk forall b. HasHeader b => b -> HeaderHash b blockHash blk -blk) +blk) , Text "blockSize" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -5356,7 +5356,7 @@ estimateBlockSize (blk -> Header blk forall blk. GetHeader blk => blk -> Header blk getHeader blk -blk)) +blk)) , Text "txIds" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -5388,13 +5388,13 @@ LedgerSupportsMempool blk => Validated (GenTx blk) -> GenTx blk txForgetValidated) [Validated (GenTx blk)] -txs) +txs) ] - toObject TracingVerbosity -verb (TraceAdoptedBlock SlotNo -slotNo blk -blk [Validated (GenTx blk)] -_txs) = + toObject TracingVerbosity +verb (TraceAdoptedBlock SlotNo +slotNo blk +blk [Validated (GenTx blk)] +_txs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -5411,7 +5411,7 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slotNo) +slotNo) , Text "blockHash" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -5422,13 +5422,13 @@ renderHeaderHashForVerbosity (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) +Proxy @blk) TracingVerbosity -verb +verb (blk -> HeaderHash blk forall b. HasHeader b => b -> HeaderHash b blockHash blk -blk) +blk) , Text "blockSize" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -5441,14 +5441,14 @@ estimateBlockSize (blk -> Header blk forall blk. GetHeader blk => blk -> Header blk getHeader blk -blk)) +blk)) ] -instance ToObject (TraceLocalTxSubmissionServerEvent blk) where - toObject :: TracingVerbosity -> TraceLocalTxSubmissionServerEvent blk -> Object -toObject TracingVerbosity -_verb TraceLocalTxSubmissionServerEvent blk +instance ToObject (TraceLocalTxSubmissionServerEvent blk) where + toObject :: TracingVerbosity -> TraceLocalTxSubmissionServerEvent blk -> Object +toObject TracingVerbosity +_verb TraceLocalTxSubmissionServerEvent blk _ = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a diff --git a/cardano-node/src/Cardano.Tracing.OrphanInstances.HardFork.html b/cardano-node/src/Cardano.Tracing.OrphanInstances.HardFork.html index c74f66d009c..e398d67ff55 100644 --- a/cardano-node/src/Cardano.Tracing.OrphanInstances.HardFork.html +++ b/cardano-node/src/Cardano.Tracing.OrphanInstances.HardFork.html @@ -52,8 +52,8 @@ -- instances for hashes -- -instance Condense (OneEraHash xs) where - condense :: OneEraHash xs -> String +instance Condense (OneEraHash xs) where + condense :: OneEraHash xs -> String condense = Hash Any Any -> String forall a. Condense a => a -> String condense (Hash Any Any -> String) @@ -78,10 +78,10 @@ -- instances for Header HardForkBlock -- -instance All (ToObject `Compose` Header) xs => ToObject (Header (HardForkBlock xs)) where - toObject :: TracingVerbosity -> Header (HardForkBlock xs) -> Object -toObject TracingVerbosity -verb = +instance All (ToObject `Compose` Header) xs => ToObject (Header (HardForkBlock xs)) where + toObject :: TracingVerbosity -> Header (HardForkBlock xs) -> Object +toObject TracingVerbosity +verb = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -116,7 +116,7 @@ . TracingVerbosity -> Header a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS Header xs -> NS (K Object) xs) -> (Header (HardForkBlock xs) -> NS Header xs) -> Header (HardForkBlock xs) @@ -143,10 +143,10 @@ -- instances for GenTx HardForkBlock -- -instance All (Compose ToObject GenTx) xs => ToObject (GenTx (HardForkBlock xs)) where - toObject :: TracingVerbosity -> GenTx (HardForkBlock xs) -> Object -toObject TracingVerbosity -verb = +instance All (Compose ToObject GenTx) xs => ToObject (GenTx (HardForkBlock xs)) where + toObject :: TracingVerbosity -> GenTx (HardForkBlock xs) -> Object +toObject TracingVerbosity +verb = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -181,7 +181,7 @@ . TracingVerbosity -> GenTx a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS GenTx xs -> NS (K Object) xs) -> (GenTx (HardForkBlock xs) -> NS GenTx xs) -> GenTx (HardForkBlock xs) @@ -203,8 +203,8 @@ forall (xs :: [*]). GenTx (HardForkBlock xs) -> OneEraGenTx xs getHardForkGenTx -instance All (Compose ToJSON WrapGenTxId) xs => ToJSON (TxId (GenTx (HardForkBlock xs))) where - toJSON :: TxId (GenTx (HardForkBlock xs)) -> Value +instance All (Compose ToJSON WrapGenTxId) xs => ToJSON (TxId (GenTx (HardForkBlock xs))) where + toJSON :: TxId (GenTx (HardForkBlock xs)) -> Value toJSON = NS (K Value) xs -> Value forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. @@ -264,9 +264,9 @@ TxId (GenTx (HardForkBlock xs)) -> OneEraGenTxId xs getHardForkGenTxId -instance ToJSON (TxId (GenTx blk)) => ToJSON (WrapGenTxId blk) where - toJSON :: WrapGenTxId blk -> Value -toJSON = TxId (GenTx blk) -> Value +instance ToJSON (TxId (GenTx blk)) => ToJSON (WrapGenTxId blk) where + toJSON :: WrapGenTxId blk -> Value +toJSON = TxId (GenTx blk) -> Value forall a. ToJSON a => a -> Value toJSON (TxId (GenTx blk) -> Value) -> (WrapGenTxId blk -> TxId (GenTx blk)) @@ -284,18 +284,18 @@ -- instances for HardForkApplyTxErr -- -instance All (ToObject `Compose` WrapApplyTxErr) xs => ToObject (HardForkApplyTxErr xs) where - toObject :: TracingVerbosity -> HardForkApplyTxErr xs -> Object -toObject TracingVerbosity -verb (HardForkApplyTxErrFromEra OneEraApplyTxErr xs -err) = TracingVerbosity -> OneEraApplyTxErr xs -> Object +instance All (ToObject `Compose` WrapApplyTxErr) xs => ToObject (HardForkApplyTxErr xs) where + toObject :: TracingVerbosity -> HardForkApplyTxErr xs -> Object +toObject TracingVerbosity +verb (HardForkApplyTxErrFromEra OneEraApplyTxErr xs +err) = TracingVerbosity -> OneEraApplyTxErr xs -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb OneEraApplyTxErr xs -err - toObject TracingVerbosity -_verb (HardForkApplyTxErrWrongEra MismatchEraInfo xs -mismatch) = +verb OneEraApplyTxErr xs +err + toObject TracingVerbosity +_verb (HardForkApplyTxErrWrongEra MismatchEraInfo xs +mismatch) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -309,29 +309,29 @@ "currentEra" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -ledgerEraName +ledgerEraName , Text "txEra" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -otherEraName +otherEraName ] where - EraMismatch {Text + EraMismatch {Text ledgerEraName :: EraMismatch -> Text ledgerEraName :: Text -ledgerEraName, Text +ledgerEraName, Text otherEraName :: EraMismatch -> Text otherEraName :: Text otherEraName} = MismatchEraInfo xs -> EraMismatch forall (xs :: [*]). SListI xs => MismatchEraInfo xs -> EraMismatch mkEraMismatch MismatchEraInfo xs -mismatch +mismatch -instance All (ToObject `Compose` WrapApplyTxErr) xs => ToObject (OneEraApplyTxErr xs) where - toObject :: TracingVerbosity -> OneEraApplyTxErr xs -> Object -toObject TracingVerbosity -verb = +instance All (ToObject `Compose` WrapApplyTxErr) xs => ToObject (OneEraApplyTxErr xs) where + toObject :: TracingVerbosity -> OneEraApplyTxErr xs -> Object +toObject TracingVerbosity +verb = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -368,7 +368,7 @@ . TracingVerbosity -> WrapApplyTxErr a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS WrapApplyTxErr xs -> NS (K Object) xs) -> (OneEraApplyTxErr xs -> NS WrapApplyTxErr xs) -> OneEraApplyTxErr xs @@ -380,13 +380,13 @@ forall (xs :: [*]). OneEraApplyTxErr xs -> NS WrapApplyTxErr xs getOneEraApplyTxErr -instance ToObject (ApplyTxErr blk) => ToObject (WrapApplyTxErr blk) where - toObject :: TracingVerbosity -> WrapApplyTxErr blk -> Object -toObject TracingVerbosity -verb = TracingVerbosity -> ApplyTxErr blk -> Object +instance ToObject (ApplyTxErr blk) => ToObject (WrapApplyTxErr blk) where + toObject :: TracingVerbosity -> WrapApplyTxErr blk -> Object +toObject TracingVerbosity +verb = TracingVerbosity -> ApplyTxErr blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (ApplyTxErr blk -> Object) +verb (ApplyTxErr blk -> Object) -> (WrapApplyTxErr blk -> ApplyTxErr blk) -> WrapApplyTxErr blk -> Object @@ -402,19 +402,19 @@ -- instances for HardForkLedgerError -- -instance All (ToObject `Compose` WrapLedgerErr) xs => ToObject (HardForkLedgerError xs) where - toObject :: TracingVerbosity -> HardForkLedgerError xs -> Object -toObject TracingVerbosity -verb (HardForkLedgerErrorFromEra OneEraLedgerError xs -err) = TracingVerbosity -> OneEraLedgerError xs -> Object +instance All (ToObject `Compose` WrapLedgerErr) xs => ToObject (HardForkLedgerError xs) where + toObject :: TracingVerbosity -> HardForkLedgerError xs -> Object +toObject TracingVerbosity +verb (HardForkLedgerErrorFromEra OneEraLedgerError xs +err) = TracingVerbosity -> OneEraLedgerError xs -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb OneEraLedgerError xs -err +verb OneEraLedgerError xs +err - toObject TracingVerbosity -_verb (HardForkLedgerErrorWrongEra MismatchEraInfo xs -mismatch) = + toObject TracingVerbosity +_verb (HardForkLedgerErrorWrongEra MismatchEraInfo xs +mismatch) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -428,29 +428,29 @@ "currentEra" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -ledgerEraName +ledgerEraName , Text "blockEra" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -otherEraName +otherEraName ] where - EraMismatch {Text + EraMismatch {Text ledgerEraName :: Text ledgerEraName :: EraMismatch -> Text -ledgerEraName, Text +ledgerEraName, Text otherEraName :: Text otherEraName :: EraMismatch -> Text -otherEraName} = MismatchEraInfo xs -> EraMismatch +otherEraName} = MismatchEraInfo xs -> EraMismatch forall (xs :: [*]). SListI xs => MismatchEraInfo xs -> EraMismatch mkEraMismatch MismatchEraInfo xs -mismatch +mismatch -instance All (ToObject `Compose` WrapLedgerErr) xs => ToObject (OneEraLedgerError xs) where - toObject :: TracingVerbosity -> OneEraLedgerError xs -> Object -toObject TracingVerbosity -verb = +instance All (ToObject `Compose` WrapLedgerErr) xs => ToObject (OneEraLedgerError xs) where + toObject :: TracingVerbosity -> OneEraLedgerError xs -> Object +toObject TracingVerbosity +verb = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -487,7 +487,7 @@ . TracingVerbosity -> WrapLedgerErr a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS WrapLedgerErr xs -> NS (K Object) xs) -> (OneEraLedgerError xs -> NS WrapLedgerErr xs) -> OneEraLedgerError xs @@ -499,13 +499,13 @@ forall (xs :: [*]). OneEraLedgerError xs -> NS WrapLedgerErr xs getOneEraLedgerError -instance ToObject (LedgerError blk) => ToObject (WrapLedgerErr blk) where - toObject :: TracingVerbosity -> WrapLedgerErr blk -> Object -toObject TracingVerbosity -verb = TracingVerbosity -> LedgerError blk -> Object +instance ToObject (LedgerError blk) => ToObject (WrapLedgerErr blk) where + toObject :: TracingVerbosity -> WrapLedgerErr blk -> Object +toObject TracingVerbosity +verb = TracingVerbosity -> LedgerError blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (LedgerError blk -> Object) +verb (LedgerError blk -> Object) -> (WrapLedgerErr blk -> LedgerError blk) -> WrapLedgerErr blk -> Object @@ -521,25 +521,25 @@ -- instances for HardForkLedgerWarning -- -instance ( All (ToObject `Compose` WrapLedgerWarning) xs - , All SingleEraBlock xs - ) => ToObject (HardForkLedgerWarning xs) where - toObject :: TracingVerbosity -> HardForkLedgerWarning xs -> Object -toObject TracingVerbosity -verb HardForkLedgerWarning xs -warning = case HardForkLedgerWarning xs -warning of - HardForkWarningInEra OneEraLedgerWarning xs -err -> TracingVerbosity -> OneEraLedgerWarning xs -> Object +instance ( All (ToObject `Compose` WrapLedgerWarning) xs + , All SingleEraBlock xs + ) => ToObject (HardForkLedgerWarning xs) where + toObject :: TracingVerbosity -> HardForkLedgerWarning xs -> Object +toObject TracingVerbosity +verb HardForkLedgerWarning xs +warning = case HardForkLedgerWarning xs +warning of + HardForkWarningInEra OneEraLedgerWarning xs +err -> TracingVerbosity -> OneEraLedgerWarning xs -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb OneEraLedgerWarning xs -err +verb OneEraLedgerWarning xs +err - HardForkWarningTransitionMismatch EraIndex xs -toEra EraParams -eraParams EpochNo -epoch -> + HardForkWarningTransitionMismatch EraIndex xs +toEra EraParams +eraParams EpochNo +epoch -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -555,25 +555,25 @@ .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -toEra +toEra , Text "eraParams" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> EraParams -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb EraParams -eraParams +verb EraParams +eraParams , Text "transitionEpoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -epoch +epoch ] - HardForkWarningTransitionInFinalEra EraIndex xs -fromEra EpochNo -epoch -> + HardForkWarningTransitionInFinalEra EraIndex xs +fromEra EpochNo +epoch -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -589,16 +589,16 @@ .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -fromEra +fromEra , Text "transitionEpoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -epoch +epoch ] - HardForkWarningTransitionUnconfirmed EraIndex xs -toEra -> + HardForkWarningTransitionUnconfirmed EraIndex xs +toEra -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -614,14 +614,14 @@ .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -toEra +toEra ] - HardForkWarningTransitionReconfirmed EraIndex xs -fromEra EraIndex xs -toEra EpochNo -prevEpoch EpochNo -newEpoch -> + HardForkWarningTransitionReconfirmed EraIndex xs +fromEra EraIndex xs +toEra EpochNo +prevEpoch EpochNo +newEpoch -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -637,30 +637,30 @@ .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -fromEra +fromEra , Text "toEra" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -toEra +toEra , Text "prevTransitionEpoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -prevEpoch +prevEpoch , Text "newTransitionEpoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -newEpoch +newEpoch ] -instance All (ToObject `Compose` WrapLedgerWarning) xs => ToObject (OneEraLedgerWarning xs) where - toObject :: TracingVerbosity -> OneEraLedgerWarning xs -> Object -toObject TracingVerbosity -verb = +instance All (ToObject `Compose` WrapLedgerWarning) xs => ToObject (OneEraLedgerWarning xs) where + toObject :: TracingVerbosity -> OneEraLedgerWarning xs -> Object +toObject TracingVerbosity +verb = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -699,7 +699,7 @@ . TracingVerbosity -> WrapLedgerWarning a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS WrapLedgerWarning xs -> NS (K Object) xs) -> (OneEraLedgerWarning xs -> NS WrapLedgerWarning xs) -> OneEraLedgerWarning xs @@ -712,13 +712,13 @@ OneEraLedgerWarning xs -> NS WrapLedgerWarning xs getOneEraLedgerWarning -instance ToObject (LedgerWarning blk) => ToObject (WrapLedgerWarning blk) where - toObject :: TracingVerbosity -> WrapLedgerWarning blk -> Object -toObject TracingVerbosity -verb = TracingVerbosity -> LedgerWarning blk -> Object +instance ToObject (LedgerWarning blk) => ToObject (WrapLedgerWarning blk) where + toObject :: TracingVerbosity -> WrapLedgerWarning blk -> Object +toObject TracingVerbosity +verb = TracingVerbosity -> LedgerWarning blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (LedgerWarning blk -> Object) +verb (LedgerWarning blk -> Object) -> (WrapLedgerWarning blk -> LedgerWarning blk) -> WrapLedgerWarning blk -> Object @@ -729,16 +729,16 @@ forall blk. WrapLedgerWarning blk -> LedgerWarning blk unwrapLedgerWarning -instance ToObject EraParams where - toObject :: TracingVerbosity -> EraParams -> Object -toObject TracingVerbosity -_verb EraParams{ EpochSize +instance ToObject EraParams where + toObject :: TracingVerbosity -> EraParams -> Object +toObject TracingVerbosity +_verb EraParams{ EpochSize eraEpochSize :: EraParams -> EpochSize eraEpochSize :: EpochSize -eraEpochSize, SlotLength +eraEpochSize, SlotLength eraSlotLength :: EraParams -> SlotLength eraSlotLength :: SlotLength -eraSlotLength, SafeZone +eraSlotLength, SafeZone eraSafeZone :: EraParams -> SafeZone eraSafeZone :: SafeZone eraSafeZone} = @@ -750,46 +750,46 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochSize -> Word64 unEpochSize EpochSize -eraEpochSize +eraEpochSize , Text "slotLength" Text -> NominalDiffTime -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotLength -> NominalDiffTime getSlotLength SlotLength -eraSlotLength +eraSlotLength , Text "safeZone" Text -> SafeZone -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SafeZone -eraSafeZone +eraSafeZone ] -deriving instance ToJSON SafeZone +deriving instance ToJSON SafeZone -- -- instances for HardForkLedgerUpdate -- -instance ( All (ToObject `Compose` WrapLedgerUpdate) xs - , All SingleEraBlock xs - ) => ToObject (HardForkLedgerUpdate xs) where - toObject :: TracingVerbosity -> HardForkLedgerUpdate xs -> Object -toObject TracingVerbosity -verb HardForkLedgerUpdate xs -update = case HardForkLedgerUpdate xs -update of - HardForkUpdateInEra OneEraLedgerUpdate xs -err -> TracingVerbosity -> OneEraLedgerUpdate xs -> Object +instance ( All (ToObject `Compose` WrapLedgerUpdate) xs + , All SingleEraBlock xs + ) => ToObject (HardForkLedgerUpdate xs) where + toObject :: TracingVerbosity -> HardForkLedgerUpdate xs -> Object +toObject TracingVerbosity +verb HardForkLedgerUpdate xs +update = case HardForkLedgerUpdate xs +update of + HardForkUpdateInEra OneEraLedgerUpdate xs +err -> TracingVerbosity -> OneEraLedgerUpdate xs -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb OneEraLedgerUpdate xs -err +verb OneEraLedgerUpdate xs +err - HardForkUpdateTransitionConfirmed EraIndex xs -fromEra EraIndex xs -toEra EpochNo -epoch -> + HardForkUpdateTransitionConfirmed EraIndex xs +fromEra EraIndex xs +toEra EpochNo +epoch -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -805,25 +805,25 @@ .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -fromEra +fromEra , Text "toEra" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -toEra +toEra , Text "transitionEpoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -epoch +epoch ] - HardForkUpdateTransitionDone EraIndex xs -fromEra EraIndex xs -toEra EpochNo -epoch -> + HardForkUpdateTransitionDone EraIndex xs +fromEra EraIndex xs +toEra EpochNo +epoch -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -839,24 +839,24 @@ .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -fromEra +fromEra , Text "toEra" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -toEra +toEra , Text "transitionEpoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -epoch +epoch ] - HardForkUpdateTransitionRolledBack EraIndex xs -fromEra EraIndex xs -toEra -> + HardForkUpdateTransitionRolledBack EraIndex xs +fromEra EraIndex xs +toEra -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -872,20 +872,20 @@ .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -fromEra +fromEra , Text "toEra" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EraIndex xs -> String forall a. Condense a => a -> String condense EraIndex xs -toEra +toEra ] -instance All (ToObject `Compose` WrapLedgerUpdate) xs => ToObject (OneEraLedgerUpdate xs) where - toObject :: TracingVerbosity -> OneEraLedgerUpdate xs -> Object -toObject TracingVerbosity -verb = +instance All (ToObject `Compose` WrapLedgerUpdate) xs => ToObject (OneEraLedgerUpdate xs) where + toObject :: TracingVerbosity -> OneEraLedgerUpdate xs -> Object +toObject TracingVerbosity +verb = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -924,7 +924,7 @@ . TracingVerbosity -> WrapLedgerUpdate a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS WrapLedgerUpdate xs -> NS (K Object) xs) -> (OneEraLedgerUpdate xs -> NS WrapLedgerUpdate xs) -> OneEraLedgerUpdate xs @@ -936,13 +936,13 @@ forall (xs :: [*]). OneEraLedgerUpdate xs -> NS WrapLedgerUpdate xs getOneEraLedgerUpdate -instance ToObject (LedgerUpdate blk) => ToObject (WrapLedgerUpdate blk) where - toObject :: TracingVerbosity -> WrapLedgerUpdate blk -> Object -toObject TracingVerbosity -verb = TracingVerbosity -> LedgerUpdate blk -> Object +instance ToObject (LedgerUpdate blk) => ToObject (WrapLedgerUpdate blk) where + toObject :: TracingVerbosity -> WrapLedgerUpdate blk -> Object +toObject TracingVerbosity +verb = TracingVerbosity -> LedgerUpdate blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (LedgerUpdate blk -> Object) +verb (LedgerUpdate blk -> Object) -> (WrapLedgerUpdate blk -> LedgerUpdate blk) -> WrapLedgerUpdate blk -> Object @@ -958,19 +958,19 @@ -- instances for HardForkEnvelopeErr -- -instance All (ToObject `Compose` WrapEnvelopeErr) xs => ToObject (HardForkEnvelopeErr xs) where - toObject :: TracingVerbosity -> HardForkEnvelopeErr xs -> Object -toObject TracingVerbosity -verb (HardForkEnvelopeErrFromEra OneEraEnvelopeErr xs -err) = TracingVerbosity -> OneEraEnvelopeErr xs -> Object +instance All (ToObject `Compose` WrapEnvelopeErr) xs => ToObject (HardForkEnvelopeErr xs) where + toObject :: TracingVerbosity -> HardForkEnvelopeErr xs -> Object +toObject TracingVerbosity +verb (HardForkEnvelopeErrFromEra OneEraEnvelopeErr xs +err) = TracingVerbosity -> OneEraEnvelopeErr xs -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb OneEraEnvelopeErr xs -err +verb OneEraEnvelopeErr xs +err - toObject TracingVerbosity -_verb (HardForkEnvelopeErrWrongEra MismatchEraInfo xs -mismatch) = + toObject TracingVerbosity +_verb (HardForkEnvelopeErrWrongEra MismatchEraInfo xs +mismatch) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -984,29 +984,29 @@ "currentEra" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -ledgerEraName +ledgerEraName , Text "blockEra" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -otherEraName +otherEraName ] where - EraMismatch {Text + EraMismatch {Text ledgerEraName :: Text ledgerEraName :: EraMismatch -> Text -ledgerEraName, Text +ledgerEraName, Text otherEraName :: Text otherEraName :: EraMismatch -> Text -otherEraName} = MismatchEraInfo xs -> EraMismatch +otherEraName} = MismatchEraInfo xs -> EraMismatch forall (xs :: [*]). SListI xs => MismatchEraInfo xs -> EraMismatch mkEraMismatch MismatchEraInfo xs -mismatch +mismatch -instance All (ToObject `Compose` WrapEnvelopeErr) xs => ToObject (OneEraEnvelopeErr xs) where - toObject :: TracingVerbosity -> OneEraEnvelopeErr xs -> Object -toObject TracingVerbosity -verb = +instance All (ToObject `Compose` WrapEnvelopeErr) xs => ToObject (OneEraEnvelopeErr xs) where + toObject :: TracingVerbosity -> OneEraEnvelopeErr xs -> Object +toObject TracingVerbosity +verb = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -1043,7 +1043,7 @@ . TracingVerbosity -> WrapEnvelopeErr a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS WrapEnvelopeErr xs -> NS (K Object) xs) -> (OneEraEnvelopeErr xs -> NS WrapEnvelopeErr xs) -> OneEraEnvelopeErr xs @@ -1055,13 +1055,13 @@ forall (xs :: [*]). OneEraEnvelopeErr xs -> NS WrapEnvelopeErr xs getOneEraEnvelopeErr -instance ToObject (OtherHeaderEnvelopeError blk) => ToObject (WrapEnvelopeErr blk) where - toObject :: TracingVerbosity -> WrapEnvelopeErr blk -> Object -toObject TracingVerbosity -verb = TracingVerbosity -> OtherHeaderEnvelopeError blk -> Object +instance ToObject (OtherHeaderEnvelopeError blk) => ToObject (WrapEnvelopeErr blk) where + toObject :: TracingVerbosity -> WrapEnvelopeErr blk -> Object +toObject TracingVerbosity +verb = TracingVerbosity -> OtherHeaderEnvelopeError blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (OtherHeaderEnvelopeError blk -> Object) +verb (OtherHeaderEnvelopeError blk -> Object) -> (WrapEnvelopeErr blk -> OtherHeaderEnvelopeError blk) -> WrapEnvelopeErr blk -> Object @@ -1077,19 +1077,19 @@ -- instances for HardForkValidationErr -- -instance All (ToObject `Compose` WrapValidationErr) xs => ToObject (HardForkValidationErr xs) where - toObject :: TracingVerbosity -> HardForkValidationErr xs -> Object -toObject TracingVerbosity -verb (HardForkValidationErrFromEra OneEraValidationErr xs -err) = TracingVerbosity -> OneEraValidationErr xs -> Object +instance All (ToObject `Compose` WrapValidationErr) xs => ToObject (HardForkValidationErr xs) where + toObject :: TracingVerbosity -> HardForkValidationErr xs -> Object +toObject TracingVerbosity +verb (HardForkValidationErrFromEra OneEraValidationErr xs +err) = TracingVerbosity -> OneEraValidationErr xs -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb OneEraValidationErr xs -err +verb OneEraValidationErr xs +err - toObject TracingVerbosity -_verb (HardForkValidationErrWrongEra MismatchEraInfo xs -mismatch) = + toObject TracingVerbosity +_verb (HardForkValidationErrWrongEra MismatchEraInfo xs +mismatch) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1103,29 +1103,29 @@ "currentEra" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -ledgerEraName +ledgerEraName , Text "blockEra" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -otherEraName +otherEraName ] where - EraMismatch {Text + EraMismatch {Text ledgerEraName :: Text ledgerEraName :: EraMismatch -> Text -ledgerEraName, Text +ledgerEraName, Text otherEraName :: Text otherEraName :: EraMismatch -> Text -otherEraName} = MismatchEraInfo xs -> EraMismatch +otherEraName} = MismatchEraInfo xs -> EraMismatch forall (xs :: [*]). SListI xs => MismatchEraInfo xs -> EraMismatch mkEraMismatch MismatchEraInfo xs -mismatch +mismatch -instance All (ToObject `Compose` WrapValidationErr) xs => ToObject (OneEraValidationErr xs) where - toObject :: TracingVerbosity -> OneEraValidationErr xs -> Object -toObject TracingVerbosity -verb = +instance All (ToObject `Compose` WrapValidationErr) xs => ToObject (OneEraValidationErr xs) where + toObject :: TracingVerbosity -> OneEraValidationErr xs -> Object +toObject TracingVerbosity +verb = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -1164,7 +1164,7 @@ . TracingVerbosity -> WrapValidationErr a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS WrapValidationErr xs -> NS (K Object) xs) -> (OneEraValidationErr xs -> NS WrapValidationErr xs) -> OneEraValidationErr xs @@ -1177,13 +1177,13 @@ OneEraValidationErr xs -> NS WrapValidationErr xs getOneEraValidationErr -instance ToObject (ValidationErr (BlockProtocol blk)) => ToObject (WrapValidationErr blk) where - toObject :: TracingVerbosity -> WrapValidationErr blk -> Object -toObject TracingVerbosity -verb = TracingVerbosity -> ValidationErr (BlockProtocol blk) -> Object +instance ToObject (ValidationErr (BlockProtocol blk)) => ToObject (WrapValidationErr blk) where + toObject :: TracingVerbosity -> WrapValidationErr blk -> Object +toObject TracingVerbosity +verb = TracingVerbosity -> ValidationErr (BlockProtocol blk) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (ValidationErr (BlockProtocol blk) -> Object) +verb (ValidationErr (BlockProtocol blk) -> Object) -> (WrapValidationErr blk -> ValidationErr (BlockProtocol blk)) -> WrapValidationErr blk -> Object @@ -1203,10 +1203,10 @@ -- It's a type alias: -- type HardForkCannotForge xs = OneEraCannotForge xs -instance All (ToObject `Compose` WrapCannotForge) xs => ToObject (OneEraCannotForge xs) where - toObject :: TracingVerbosity -> OneEraCannotForge xs -> Object -toObject TracingVerbosity -verb = +instance All (ToObject `Compose` WrapCannotForge) xs => ToObject (OneEraCannotForge xs) where + toObject :: TracingVerbosity -> OneEraCannotForge xs -> Object +toObject TracingVerbosity +verb = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -1244,7 +1244,7 @@ . TracingVerbosity -> WrapCannotForge a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS WrapCannotForge xs -> NS (K Object) xs) -> (OneEraCannotForge xs -> NS WrapCannotForge xs) -> OneEraCannotForge xs @@ -1256,13 +1256,13 @@ forall (xs :: [*]). OneEraCannotForge xs -> NS WrapCannotForge xs getOneEraCannotForge -instance ToObject (CannotForge blk) => ToObject (WrapCannotForge blk) where - toObject :: TracingVerbosity -> WrapCannotForge blk -> Object -toObject TracingVerbosity -verb = TracingVerbosity -> CannotForge blk -> Object +instance ToObject (CannotForge blk) => ToObject (WrapCannotForge blk) where + toObject :: TracingVerbosity -> WrapCannotForge blk -> Object +toObject TracingVerbosity +verb = TracingVerbosity -> CannotForge blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (CannotForge blk -> Object) +verb (CannotForge blk -> Object) -> (WrapCannotForge blk -> CannotForge blk) -> WrapCannotForge blk -> Object @@ -1281,11 +1281,11 @@ -- It's a type alias: -- type HardForkForgeStateInfo xs = OneEraForgeStateInfo xs -instance All (ToObject `Compose` WrapForgeStateInfo) xs => ToObject (OneEraForgeStateInfo xs) where - toObject :: TracingVerbosity -> OneEraForgeStateInfo xs -> Object -toObject TracingVerbosity -verb OneEraForgeStateInfo xs -forgeStateInfo = +instance All (ToObject `Compose` WrapForgeStateInfo) xs => ToObject (OneEraForgeStateInfo xs) where + toObject :: TracingVerbosity -> OneEraForgeStateInfo xs -> Object +toObject TracingVerbosity +verb OneEraForgeStateInfo xs +forgeStateInfo = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1301,12 +1301,12 @@ .= Object -> Value forall a. ToJSON a => a -> Value toJSON Object -forgeStateInfo' +forgeStateInfo' ] where - forgeStateInfo' :: Object - forgeStateInfo' :: Object -forgeStateInfo' = + forgeStateInfo' :: Object + forgeStateInfo' :: Object +forgeStateInfo' = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -1346,7 +1346,7 @@ . TracingVerbosity -> WrapForgeStateInfo a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS WrapForgeStateInfo xs -> NS (K Object) xs) -> (OneEraForgeStateInfo xs -> NS WrapForgeStateInfo xs) -> OneEraForgeStateInfo xs @@ -1362,15 +1362,15 @@ -> OneEraForgeStateInfo xs -> Object forall a b. (a -> b) -> a -> b $ OneEraForgeStateInfo xs -forgeStateInfo +forgeStateInfo -instance ToObject (ForgeStateInfo blk) => ToObject (WrapForgeStateInfo blk) where - toObject :: TracingVerbosity -> WrapForgeStateInfo blk -> Object -toObject TracingVerbosity -verb = TracingVerbosity -> ForgeStateInfo blk -> Object +instance ToObject (ForgeStateInfo blk) => ToObject (WrapForgeStateInfo blk) where + toObject :: TracingVerbosity -> WrapForgeStateInfo blk -> Object +toObject TracingVerbosity +verb = TracingVerbosity -> ForgeStateInfo blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (ForgeStateInfo blk -> Object) +verb (ForgeStateInfo blk -> Object) -> (WrapForgeStateInfo blk -> ForgeStateInfo blk) -> WrapForgeStateInfo blk -> Object @@ -1389,11 +1389,11 @@ -- It's a type alias: -- type HardForkForgeStateUpdateError xs = OneEraForgeStateUpdateError xs -instance All (ToObject `Compose` WrapForgeStateUpdateError) xs => ToObject (OneEraForgeStateUpdateError xs) where - toObject :: TracingVerbosity -> OneEraForgeStateUpdateError xs -> Object -toObject TracingVerbosity -verb OneEraForgeStateUpdateError xs -forgeStateUpdateError = +instance All (ToObject `Compose` WrapForgeStateUpdateError) xs => ToObject (OneEraForgeStateUpdateError xs) where + toObject :: TracingVerbosity -> OneEraForgeStateUpdateError xs -> Object +toObject TracingVerbosity +verb OneEraForgeStateUpdateError xs +forgeStateUpdateError = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1409,12 +1409,12 @@ .= Object -> Value forall a. ToJSON a => a -> Value toJSON Object -forgeStateUpdateError' +forgeStateUpdateError' ] where - forgeStateUpdateError' :: Object - forgeStateUpdateError' :: Object -forgeStateUpdateError' = + forgeStateUpdateError' :: Object + forgeStateUpdateError' :: Object +forgeStateUpdateError' = NS (K Object) xs -> Object forall k l (h :: (k -> *) -> l -> *) (xs :: l) a. (HCollapse h, SListIN h xs) => @@ -1454,7 +1454,7 @@ . TracingVerbosity -> WrapForgeStateUpdateError a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) +verb) (NS WrapForgeStateUpdateError xs -> NS (K Object) xs) -> (OneEraForgeStateUpdateError xs -> NS WrapForgeStateUpdateError xs) @@ -1471,15 +1471,15 @@ -> OneEraForgeStateUpdateError xs -> Object forall a b. (a -> b) -> a -> b $ OneEraForgeStateUpdateError xs -forgeStateUpdateError +forgeStateUpdateError -instance ToObject (ForgeStateUpdateError blk) => ToObject (WrapForgeStateUpdateError blk) where - toObject :: TracingVerbosity -> WrapForgeStateUpdateError blk -> Object -toObject TracingVerbosity -verb = TracingVerbosity -> ForgeStateUpdateError blk -> Object +instance ToObject (ForgeStateUpdateError blk) => ToObject (WrapForgeStateUpdateError blk) where + toObject :: TracingVerbosity -> WrapForgeStateUpdateError blk -> Object +toObject TracingVerbosity +verb = TracingVerbosity -> ForgeStateUpdateError blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (ForgeStateUpdateError blk -> Object) +verb (ForgeStateUpdateError blk -> Object) -> (WrapForgeStateUpdateError blk -> ForgeStateUpdateError blk) -> WrapForgeStateUpdateError blk -> Object diff --git a/cardano-node/src/Cardano.Tracing.OrphanInstances.Network.html b/cardano-node/src/Cardano.Tracing.OrphanInstances.Network.html index 93c3b21e4bf..a9054c4283a 100644 --- a/cardano-node/src/Cardano.Tracing.OrphanInstances.Network.html +++ b/cardano-node/src/Cardano.Tracing.OrphanInstances.Network.html @@ -73,42 +73,42 @@ -- -- NOTE: this list is sorted by the unqualified name of the outermost type. -instance HasPrivacyAnnotation ND.DiffusionInitializationTracer +instance HasPrivacyAnnotation ND.DiffusionInitializationTracer instance HasSeverityAnnotation ND.DiffusionInitializationTracer where - getSeverityAnnotation :: DiffusionInitializationTracer -> Severity + getSeverityAnnotation :: DiffusionInitializationTracer -> Severity getSeverityAnnotation DiffusionInitializationTracer _ = Severity Info -instance HasPrivacyAnnotation NtC.HandshakeTr +instance HasPrivacyAnnotation NtC.HandshakeTr instance HasSeverityAnnotation NtC.HandshakeTr where - getSeverityAnnotation :: HandshakeTr -> Severity -getSeverityAnnotation HandshakeTr + getSeverityAnnotation :: HandshakeTr -> Severity +getSeverityAnnotation HandshakeTr _ = Severity Info -instance HasPrivacyAnnotation NtN.HandshakeTr +instance HasPrivacyAnnotation NtN.HandshakeTr instance HasSeverityAnnotation NtN.HandshakeTr where - getSeverityAnnotation :: HandshakeTr -> Severity -getSeverityAnnotation HandshakeTr + getSeverityAnnotation :: HandshakeTr -> Severity +getSeverityAnnotation HandshakeTr _ = Severity Info -instance HasPrivacyAnnotation NtN.AcceptConnectionsPolicyTrace +instance HasPrivacyAnnotation NtN.AcceptConnectionsPolicyTrace instance HasSeverityAnnotation NtN.AcceptConnectionsPolicyTrace where - getSeverityAnnotation :: AcceptConnectionsPolicyTrace -> Severity -getSeverityAnnotation NtN.ServerTraceAcceptConnectionRateLimiting {} = Severity + getSeverityAnnotation :: AcceptConnectionsPolicyTrace -> Severity +getSeverityAnnotation NtN.ServerTraceAcceptConnectionRateLimiting {} = Severity Info getSeverityAnnotation NtN.ServerTraceAcceptConnectionHardLimit {} = Severity Warning -instance HasPrivacyAnnotation (TraceFetchClientState header) -instance HasSeverityAnnotation (TraceFetchClientState header) where - getSeverityAnnotation :: TraceFetchClientState header -> Severity -getSeverityAnnotation BlockFetch.AddedFetchRequest {} = Severity +instance HasPrivacyAnnotation (TraceFetchClientState header) +instance HasSeverityAnnotation (TraceFetchClientState header) where + getSeverityAnnotation :: TraceFetchClientState header -> Severity +getSeverityAnnotation BlockFetch.AddedFetchRequest {} = Severity Info getSeverityAnnotation BlockFetch.SendFetchRequest {} = Severity Info @@ -126,32 +126,32 @@ Notice -instance HasPrivacyAnnotation (TraceSendRecv a) -instance HasSeverityAnnotation (TraceSendRecv a) where - getSeverityAnnotation :: TraceSendRecv a -> Severity -getSeverityAnnotation TraceSendRecv a +instance HasPrivacyAnnotation (TraceSendRecv a) +instance HasSeverityAnnotation (TraceSendRecv a) where + getSeverityAnnotation :: TraceSendRecv a -> Severity +getSeverityAnnotation TraceSendRecv a _ = Severity Debug -instance HasPrivacyAnnotation a => HasPrivacyAnnotation (TraceLabelPeer peer a) -instance HasSeverityAnnotation a => HasSeverityAnnotation (TraceLabelPeer peer a) where - getSeverityAnnotation :: TraceLabelPeer peer a -> Severity -getSeverityAnnotation (TraceLabelPeer peer -_p a -a) = a -> Severity +instance HasPrivacyAnnotation a => HasPrivacyAnnotation (TraceLabelPeer peer a) +instance HasSeverityAnnotation a => HasSeverityAnnotation (TraceLabelPeer peer a) where + getSeverityAnnotation :: TraceLabelPeer peer a -> Severity +getSeverityAnnotation (TraceLabelPeer peer +_p a +a) = a -> Severity forall a. HasSeverityAnnotation a => a -> Severity getSeverityAnnotation a -a +a -instance HasPrivacyAnnotation [TraceLabelPeer peer (FetchDecision [Point header])] -instance HasSeverityAnnotation [TraceLabelPeer peer (FetchDecision [Point header])] where - getSeverityAnnotation :: [TraceLabelPeer peer (FetchDecision [Point header])] -> Severity -getSeverityAnnotation [] = Severity +instance HasPrivacyAnnotation [TraceLabelPeer peer (FetchDecision [Point header])] +instance HasSeverityAnnotation [TraceLabelPeer peer (FetchDecision [Point header])] where + getSeverityAnnotation :: [TraceLabelPeer peer (FetchDecision [Point header])] -> Severity +getSeverityAnnotation [] = Severity Debug - getSeverityAnnotation [TraceLabelPeer peer (FetchDecision [Point header])] -xs = + getSeverityAnnotation [TraceLabelPeer peer (FetchDecision [Point header])] +xs = [Severity] -> Severity forall (t :: * -> *) a. (Foldable t, Ord a) => t a -> a maximum ([Severity] -> Severity) -> [Severity] -> Severity @@ -161,19 +161,19 @@ -> [Severity] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map (\(TraceLabelPeer peer -_ FetchDecision [Point header] -a) -> FetchDecision [Point header] -> Severity +_ FetchDecision [Point header] +a) -> FetchDecision [Point header] -> Severity forall a. FetchDecision a -> Severity -fetchDecisionSeverity FetchDecision [Point header] -a) [TraceLabelPeer peer (FetchDecision [Point header])] -xs +fetchDecisionSeverity FetchDecision [Point header] +a) [TraceLabelPeer peer (FetchDecision [Point header])] +xs where - fetchDecisionSeverity :: FetchDecision a -> Severity - fetchDecisionSeverity :: FetchDecision a -> Severity -fetchDecisionSeverity FetchDecision a -fd = + fetchDecisionSeverity :: FetchDecision a -> Severity + fetchDecisionSeverity :: FetchDecision a -> Severity +fetchDecisionSeverity FetchDecision a +fd = case FetchDecision a -fd of +fd of Left FetchDecline FetchDeclineChainNotPlausible -> Severity Debug @@ -208,37 +208,37 @@ Info -instance HasPrivacyAnnotation (TraceTxSubmissionInbound txid tx) -instance HasSeverityAnnotation (TraceTxSubmissionInbound txid tx) where - getSeverityAnnotation :: TraceTxSubmissionInbound txid tx -> Severity -getSeverityAnnotation TraceTxSubmissionInbound txid tx +instance HasPrivacyAnnotation (TraceTxSubmissionInbound txid tx) +instance HasSeverityAnnotation (TraceTxSubmissionInbound txid tx) where + getSeverityAnnotation :: TraceTxSubmissionInbound txid tx -> Severity +getSeverityAnnotation TraceTxSubmissionInbound txid tx _ = Severity Info -instance HasPrivacyAnnotation (TraceTxSubmissionOutbound txid tx) -instance HasSeverityAnnotation (TraceTxSubmissionOutbound txid tx) where - getSeverityAnnotation :: TraceTxSubmissionOutbound txid tx -> Severity -getSeverityAnnotation TraceTxSubmissionOutbound txid tx +instance HasPrivacyAnnotation (TraceTxSubmissionOutbound txid tx) +instance HasSeverityAnnotation (TraceTxSubmissionOutbound txid tx) where + getSeverityAnnotation :: TraceTxSubmissionOutbound txid tx -> Severity +getSeverityAnnotation TraceTxSubmissionOutbound txid tx _ = Severity Info -instance HasPrivacyAnnotation (TraceKeepAliveClient remotePeer) -instance HasSeverityAnnotation (TraceKeepAliveClient remotePeer) where - getSeverityAnnotation :: TraceKeepAliveClient remotePeer -> Severity -getSeverityAnnotation TraceKeepAliveClient remotePeer +instance HasPrivacyAnnotation (TraceKeepAliveClient remotePeer) +instance HasSeverityAnnotation (TraceKeepAliveClient remotePeer) where + getSeverityAnnotation :: TraceKeepAliveClient remotePeer -> Severity +getSeverityAnnotation TraceKeepAliveClient remotePeer _ = Severity Info -instance HasPrivacyAnnotation (WithAddr addr ErrorPolicyTrace) -instance HasSeverityAnnotation (WithAddr addr ErrorPolicyTrace) where - getSeverityAnnotation :: WithAddr addr ErrorPolicyTrace -> Severity -getSeverityAnnotation (WithAddr addr -_ ErrorPolicyTrace -ev) = case ErrorPolicyTrace -ev of +instance HasPrivacyAnnotation (WithAddr addr ErrorPolicyTrace) +instance HasSeverityAnnotation (WithAddr addr ErrorPolicyTrace) where + getSeverityAnnotation :: WithAddr addr ErrorPolicyTrace -> Severity +getSeverityAnnotation (WithAddr addr +_ ErrorPolicyTrace +ev) = case ErrorPolicyTrace +ev of ErrorPolicySuspendPeer {} -> Severity Warning -- peer misbehaved ErrorPolicySuspendConsumer {} -> Severity @@ -261,13 +261,13 @@ Error -instance HasPrivacyAnnotation (WithDomainName DnsTrace) +instance HasPrivacyAnnotation (WithDomainName DnsTrace) instance HasSeverityAnnotation (WithDomainName DnsTrace) where - getSeverityAnnotation :: WithDomainName DnsTrace -> Severity -getSeverityAnnotation (WithDomainName Domain -_ DnsTrace -ev) = case DnsTrace -ev of + getSeverityAnnotation :: WithDomainName DnsTrace -> Severity +getSeverityAnnotation (WithDomainName Domain +_ DnsTrace +ev) = case DnsTrace +ev of DnsTraceLookupException {} -> Severity Error DnsTraceLookupAError {} -> Severity @@ -286,20 +286,20 @@ Debug -instance HasPrivacyAnnotation (WithDomainName (SubscriptionTrace SockAddr)) +instance HasPrivacyAnnotation (WithDomainName (SubscriptionTrace SockAddr)) instance HasSeverityAnnotation (WithDomainName (SubscriptionTrace SockAddr)) where - getSeverityAnnotation :: WithDomainName (SubscriptionTrace SockAddr) -> Severity -getSeverityAnnotation (WithDomainName Domain -_ SubscriptionTrace SockAddr -ev) = case SubscriptionTrace SockAddr -ev of + getSeverityAnnotation :: WithDomainName (SubscriptionTrace SockAddr) -> Severity +getSeverityAnnotation (WithDomainName Domain +_ SubscriptionTrace SockAddr +ev) = case SubscriptionTrace SockAddr +ev of SubscriptionTraceConnectStart {} -> Severity Notice SubscriptionTraceConnectEnd {} -> Severity Notice SubscriptionTraceConnectException SockAddr -_ e -e -> +_ e +e -> case SomeException -> Maybe SubscriberError forall e. Exception e => SomeException -> Maybe e fromException (SomeException -> Maybe SubscriberError) @@ -308,7 +308,7 @@ $ e -> SomeException forall e. Exception e => e -> SomeException SomeException e -e of +e of Just (SubscriberError _::SubscriberError) -> Severity Debug @@ -343,8 +343,8 @@ SubscriptionTraceMissingLocalAddress -> Severity Warning SubscriptionTraceApplicationException SockAddr -_ e -e -> +_ e +e -> case SomeException -> Maybe SubscriberError forall e. Exception e => SomeException -> Maybe e fromException (SomeException -> Maybe SubscriberError) @@ -353,7 +353,7 @@ $ e -> SomeException forall e. Exception e => e -> SomeException SomeException e -e of +e of Just (SubscriberError _::SubscriberError) -> Severity Debug @@ -366,21 +366,21 @@ Debug -instance HasPrivacyAnnotation (WithIPList (SubscriptionTrace SockAddr)) +instance HasPrivacyAnnotation (WithIPList (SubscriptionTrace SockAddr)) instance HasSeverityAnnotation (WithIPList (SubscriptionTrace SockAddr)) where - getSeverityAnnotation :: WithIPList (SubscriptionTrace SockAddr) -> Severity -getSeverityAnnotation (WithIPList LocalAddresses SockAddr + getSeverityAnnotation :: WithIPList (SubscriptionTrace SockAddr) -> Severity +getSeverityAnnotation (WithIPList LocalAddresses SockAddr _ [SockAddr] -_ SubscriptionTrace SockAddr -ev) = case SubscriptionTrace SockAddr -ev of +_ SubscriptionTrace SockAddr +ev) = case SubscriptionTrace SockAddr +ev of SubscriptionTraceConnectStart SockAddr _ -> Severity Info SubscriptionTraceConnectEnd SockAddr -_ ConnectResult -connectResult -> case ConnectResult -connectResult of +_ ConnectResult +connectResult -> case ConnectResult +connectResult of ConnectResult ConnectSuccess -> Severity Info @@ -391,8 +391,8 @@ ConnectValencyExceeded -> Severity Warning SubscriptionTraceConnectException SockAddr -_ e -e -> +_ e +e -> case SomeException -> Maybe SubscriberError forall e. Exception e => SomeException -> Maybe e fromException (SomeException -> Maybe SubscriberError) @@ -401,7 +401,7 @@ $ e -> SomeException forall e. Exception e => e -> SomeException SomeException e -e of +e of Just (SubscriberError _::SubscriberError) -> Severity Debug @@ -436,8 +436,8 @@ SubscriptionTraceMissingLocalAddress -> Severity Warning SubscriptionTraceApplicationException SockAddr -_ e -e -> +_ e +e -> case SomeException -> Maybe SubscriberError forall e. Exception e => SomeException -> Maybe e fromException (SomeException -> Maybe SubscriberError) @@ -446,7 +446,7 @@ $ e -> SomeException forall e. Exception e => e -> SomeException SomeException e -e of +e of Just (SubscriberError _::SubscriberError) -> Severity Debug @@ -459,12 +459,12 @@ Info -instance HasPrivacyAnnotation (Identity (SubscriptionTrace LocalAddress)) +instance HasPrivacyAnnotation (Identity (SubscriptionTrace LocalAddress)) instance HasSeverityAnnotation (Identity (SubscriptionTrace LocalAddress)) where - getSeverityAnnotation :: Identity (SubscriptionTrace LocalAddress) -> Severity -getSeverityAnnotation (Identity SubscriptionTrace LocalAddress -ev) = case SubscriptionTrace LocalAddress -ev of + getSeverityAnnotation :: Identity (SubscriptionTrace LocalAddress) -> Severity +getSeverityAnnotation (Identity SubscriptionTrace LocalAddress +ev) = case SubscriptionTrace LocalAddress +ev of SubscriptionTraceConnectStart {} -> Severity Notice SubscriptionTraceConnectEnd {} -> Severity @@ -507,7 +507,7 @@ instance Transformable Text IO (Identity (SubscriptionTrace LocalAddress)) where - trTransformer :: TracingVerbosity + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (Identity (SubscriptionTrace LocalAddress)) trTransformer = TracingVerbosity @@ -519,22 +519,22 @@ TracingVerbosity -> Trace m a -> Tracer m b trStructuredText instance HasTextFormatter (Identity (SubscriptionTrace LocalAddress)) where - formatText :: Identity (SubscriptionTrace LocalAddress) -> Object -> Text -formatText Identity (SubscriptionTrace LocalAddress) -a Object + formatText :: Identity (SubscriptionTrace LocalAddress) -> Object -> Text +formatText Identity (SubscriptionTrace LocalAddress) +a Object _ = String -> Text pack (Identity (SubscriptionTrace LocalAddress) -> String forall a. Show a => a -> String show Identity (SubscriptionTrace LocalAddress) -a) +a) -instance ToObject (Identity (SubscriptionTrace LocalAddress)) where - toObject :: TracingVerbosity +instance ToObject (Identity (SubscriptionTrace LocalAddress)) where + toObject :: TracingVerbosity -> Identity (SubscriptionTrace LocalAddress) -> Object -toObject TracingVerbosity -_verb (Identity SubscriptionTrace LocalAddress -ev) = +toObject TracingVerbosity +_verb (Identity SubscriptionTrace LocalAddress +ev) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -548,17 +548,17 @@ .= SubscriptionTrace LocalAddress -> String forall a. Show a => a -> String show SubscriptionTrace LocalAddress -ev +ev ] -instance HasPrivacyAnnotation (WithMuxBearer peer MuxTrace) -instance HasSeverityAnnotation (WithMuxBearer peer MuxTrace) where - getSeverityAnnotation :: WithMuxBearer peer MuxTrace -> Severity -getSeverityAnnotation (WithMuxBearer peer -_ MuxTrace -ev) = case MuxTrace -ev of +instance HasPrivacyAnnotation (WithMuxBearer peer MuxTrace) +instance HasSeverityAnnotation (WithMuxBearer peer MuxTrace) where + getSeverityAnnotation :: WithMuxBearer peer MuxTrace -> Severity +getSeverityAnnotation (WithMuxBearer peer +_ MuxTrace +ev) = case MuxTrace +ev of MuxTrace MuxTraceRecvHeaderStart -> Severity Debug @@ -633,9 +633,9 @@ -- NOTE: this list is sorted by the unqualified name of the outermost type. instance Transformable Text IO ND.DiffusionInitializationTracer where - trTransformer :: TracingVerbosity + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO DiffusionInitializationTracer -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO DiffusionInitializationTracer forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, @@ -643,57 +643,57 @@ TracingVerbosity -> Trace m a -> Tracer m b trStructuredText instance HasTextFormatter ND.DiffusionInitializationTracer where - formatText :: DiffusionInitializationTracer -> Object -> Text -formatText DiffusionInitializationTracer -a Object + formatText :: DiffusionInitializationTracer -> Object -> Text +formatText DiffusionInitializationTracer +a Object _ = String -> Text pack (DiffusionInitializationTracer -> String forall a. Show a => a -> String show DiffusionInitializationTracer -a) +a) instance Transformable Text IO NtN.HandshakeTr where - trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO HandshakeTr -trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO HandshakeTr + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO HandshakeTr +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO HandshakeTr forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText instance HasTextFormatter NtN.HandshakeTr where - formatText :: HandshakeTr -> Object -> Text -formatText HandshakeTr -a Object + formatText :: HandshakeTr -> Object -> Text +formatText HandshakeTr +a Object _ = String -> Text pack (HandshakeTr -> String forall a. Show a => a -> String show HandshakeTr -a) +a) instance Transformable Text IO NtC.HandshakeTr where - trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO HandshakeTr -trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO HandshakeTr + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO HandshakeTr +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO HandshakeTr forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText instance HasTextFormatter NtC.HandshakeTr where - formatText :: HandshakeTr -> Object -> Text -formatText HandshakeTr -a Object + formatText :: HandshakeTr -> Object -> Text +formatText HandshakeTr +a Object _ = String -> Text pack (HandshakeTr -> String forall a. Show a => a -> String show HandshakeTr -a) +a) instance Transformable Text IO NtN.AcceptConnectionsPolicyTrace where - trTransformer :: TracingVerbosity + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO AcceptConnectionsPolicyTrace -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO AcceptConnectionsPolicyTrace forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, @@ -701,22 +701,22 @@ TracingVerbosity -> Trace m a -> Tracer m b trStructuredText instance HasTextFormatter NtN.AcceptConnectionsPolicyTrace where - formatText :: AcceptConnectionsPolicyTrace -> Object -> Text -formatText AcceptConnectionsPolicyTrace -a Object + formatText :: AcceptConnectionsPolicyTrace -> Object -> Text +formatText AcceptConnectionsPolicyTrace +a Object _ = String -> Text pack (AcceptConnectionsPolicyTrace -> String forall a. Show a => a -> String show AcceptConnectionsPolicyTrace -a) +a) -instance (StandardHash header, Show peer, ToObject peer) - => Transformable Text IO [TraceLabelPeer peer (FetchDecision [Point header])] where - trTransformer :: TracingVerbosity +instance (StandardHash header, Show peer, ToObject peer) + => Transformable Text IO [TraceLabelPeer peer (FetchDecision [Point header])] where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO [TraceLabelPeer peer (FetchDecision [Point header])] -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO [TraceLabelPeer peer (FetchDecision [Point header])] forall b (m :: * -> *) a. @@ -724,135 +724,135 @@ HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText -instance (StandardHash header, Show peer) - => HasTextFormatter [TraceLabelPeer peer (FetchDecision [Point header])] where - formatText :: [TraceLabelPeer peer (FetchDecision [Point header])] +instance (StandardHash header, Show peer) + => HasTextFormatter [TraceLabelPeer peer (FetchDecision [Point header])] where + formatText :: [TraceLabelPeer peer (FetchDecision [Point header])] -> Object -> Text -formatText [TraceLabelPeer peer (FetchDecision [Point header])] -a Object +formatText [TraceLabelPeer peer (FetchDecision [Point header])] +a Object _ = String -> Text pack ([TraceLabelPeer peer (FetchDecision [Point header])] -> String forall a. Show a => a -> String show [TraceLabelPeer peer (FetchDecision [Point header])] -a) +a) -instance ( Show peer, ToObject peer, Show a, HasPrivacyAnnotation a - , HasSeverityAnnotation a, ToObject a) - => Transformable Text IO (TraceLabelPeer peer a) where - trTransformer :: TracingVerbosity +instance ( Show peer, ToObject peer, Show a, HasPrivacyAnnotation a + , HasSeverityAnnotation a, ToObject a) + => Transformable Text IO (TraceLabelPeer peer a) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceLabelPeer peer a) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceLabelPeer peer a) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText -instance (Show peer, Show a) - => HasTextFormatter (TraceLabelPeer peer a) where - formatText :: TraceLabelPeer peer a -> Object -> Text -formatText TraceLabelPeer peer a -a Object +instance (Show peer, Show a) + => HasTextFormatter (TraceLabelPeer peer a) where + formatText :: TraceLabelPeer peer a -> Object -> Text +formatText TraceLabelPeer peer a +a Object _ = String -> Text pack (TraceLabelPeer peer a -> String forall a. Show a => a -> String show TraceLabelPeer peer a -a) +a) -instance Transformable Text IO (TraceTxSubmissionInbound txid tx) where - trTransformer :: TracingVerbosity +instance Transformable Text IO (TraceTxSubmissionInbound txid tx) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceTxSubmissionInbound txid tx) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceTxSubmissionInbound txid tx) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText -instance HasTextFormatter (TraceTxSubmissionInbound txid tx) where - formatText :: TraceTxSubmissionInbound txid tx -> Object -> Text -formatText TraceTxSubmissionInbound txid tx -a Object +instance HasTextFormatter (TraceTxSubmissionInbound txid tx) where + formatText :: TraceTxSubmissionInbound txid tx -> Object -> Text +formatText TraceTxSubmissionInbound txid tx +a Object _ = String -> Text pack (TraceTxSubmissionInbound txid tx -> String forall a. Show a => a -> String show TraceTxSubmissionInbound txid tx -a) +a) -instance (Show tx, Show txid) - => Transformable Text IO (TraceTxSubmissionOutbound txid tx) where - trTransformer :: TracingVerbosity +instance (Show tx, Show txid) + => Transformable Text IO (TraceTxSubmissionOutbound txid tx) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceTxSubmissionOutbound txid tx) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceTxSubmissionOutbound txid tx) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText -instance (Show tx, Show txid) - => HasTextFormatter (TraceTxSubmissionOutbound txid tx) where - formatText :: TraceTxSubmissionOutbound txid tx -> Object -> Text -formatText TraceTxSubmissionOutbound txid tx -a Object +instance (Show tx, Show txid) + => HasTextFormatter (TraceTxSubmissionOutbound txid tx) where + formatText :: TraceTxSubmissionOutbound txid tx -> Object -> Text +formatText TraceTxSubmissionOutbound txid tx +a Object _ = String -> Text pack (TraceTxSubmissionOutbound txid tx -> String forall a. Show a => a -> String show TraceTxSubmissionOutbound txid tx -a) +a) -instance Show remotePeer => Transformable Text IO (TraceKeepAliveClient remotePeer) where - trTransformer :: TracingVerbosity +instance Show remotePeer => Transformable Text IO (TraceKeepAliveClient remotePeer) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (TraceKeepAliveClient remotePeer) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (TraceKeepAliveClient remotePeer) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText -instance Show addr - => HasTextFormatter (TraceKeepAliveClient addr) where - formatText :: TraceKeepAliveClient addr -> Object -> Text -formatText TraceKeepAliveClient addr -a Object +instance Show addr + => HasTextFormatter (TraceKeepAliveClient addr) where + formatText :: TraceKeepAliveClient addr -> Object -> Text +formatText TraceKeepAliveClient addr +a Object _ = String -> Text pack (TraceKeepAliveClient addr -> String forall a. Show a => a -> String show TraceKeepAliveClient addr -a) +a) -instance Show addr => Transformable Text IO (WithAddr addr ErrorPolicyTrace) where - trTransformer :: TracingVerbosity +instance Show addr => Transformable Text IO (WithAddr addr ErrorPolicyTrace) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (WithAddr addr ErrorPolicyTrace) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (WithAddr addr ErrorPolicyTrace) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText -instance Show addr => HasTextFormatter (WithAddr addr ErrorPolicyTrace) where - formatText :: WithAddr addr ErrorPolicyTrace -> Object -> Text -formatText WithAddr addr ErrorPolicyTrace -a Object +instance Show addr => HasTextFormatter (WithAddr addr ErrorPolicyTrace) where + formatText :: WithAddr addr ErrorPolicyTrace -> Object -> Text +formatText WithAddr addr ErrorPolicyTrace +a Object _ = String -> Text pack (WithAddr addr ErrorPolicyTrace -> String forall a. Show a => a -> String show WithAddr addr ErrorPolicyTrace -a) +a) instance Transformable Text IO (WithDomainName (SubscriptionTrace SockAddr)) where - trTransformer :: TracingVerbosity + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (WithDomainName (SubscriptionTrace SockAddr)) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (WithDomainName (SubscriptionTrace SockAddr)) forall b (m :: * -> *) a. @@ -861,20 +861,20 @@ TracingVerbosity -> Trace m a -> Tracer m b trStructuredText instance HasTextFormatter (WithDomainName (SubscriptionTrace SockAddr)) where - formatText :: WithDomainName (SubscriptionTrace SockAddr) -> Object -> Text -formatText WithDomainName (SubscriptionTrace SockAddr) -a Object + formatText :: WithDomainName (SubscriptionTrace SockAddr) -> Object -> Text +formatText WithDomainName (SubscriptionTrace SockAddr) +a Object _ = String -> Text pack (WithDomainName (SubscriptionTrace SockAddr) -> String forall a. Show a => a -> String show WithDomainName (SubscriptionTrace SockAddr) -a) +a) instance Transformable Text IO (WithDomainName DnsTrace) where - trTransformer :: TracingVerbosity + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (WithDomainName DnsTrace) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (WithDomainName DnsTrace) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, @@ -882,21 +882,21 @@ TracingVerbosity -> Trace m a -> Tracer m b trStructuredText instance HasTextFormatter (WithDomainName DnsTrace) where - formatText :: WithDomainName DnsTrace -> Object -> Text -formatText WithDomainName DnsTrace -a Object + formatText :: WithDomainName DnsTrace -> Object -> Text +formatText WithDomainName DnsTrace +a Object _ = String -> Text pack (WithDomainName DnsTrace -> String forall a. Show a => a -> String show WithDomainName DnsTrace -a) +a) instance Transformable Text IO (WithIPList (SubscriptionTrace SockAddr)) where - trTransformer :: TracingVerbosity + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (WithIPList (SubscriptionTrace SockAddr)) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (WithIPList (SubscriptionTrace SockAddr)) forall b (m :: * -> *) a. @@ -905,34 +905,34 @@ TracingVerbosity -> Trace m a -> Tracer m b trStructuredText instance HasTextFormatter (WithIPList (SubscriptionTrace SockAddr)) where - formatText :: WithIPList (SubscriptionTrace SockAddr) -> Object -> Text -formatText WithIPList (SubscriptionTrace SockAddr) -a Object + formatText :: WithIPList (SubscriptionTrace SockAddr) -> Object -> Text +formatText WithIPList (SubscriptionTrace SockAddr) +a Object _ = String -> Text pack (WithIPList (SubscriptionTrace SockAddr) -> String forall a. Show a => a -> String show WithIPList (SubscriptionTrace SockAddr) -a) +a) -instance (Show peer) - => Transformable Text IO (WithMuxBearer peer MuxTrace) where - trTransformer :: TracingVerbosity +instance (Show peer) + => Transformable Text IO (WithMuxBearer peer MuxTrace) where + trTransformer :: TracingVerbosity -> Trace IO Text -> Tracer IO (WithMuxBearer peer MuxTrace) -trTransformer = TracingVerbosity +trTransformer = TracingVerbosity -> Trace IO Text -> Tracer IO (WithMuxBearer peer MuxTrace) forall b (m :: * -> *) a. (ToObject b, MonadIO m, HasTextFormatter b, HasPrivacyAnnotation b, HasSeverityAnnotation b) => TracingVerbosity -> Trace m a -> Tracer m b trStructuredText -instance (Show peer) - => HasTextFormatter (WithMuxBearer peer MuxTrace) where - formatText :: WithMuxBearer peer MuxTrace -> Object -> Text -formatText (WithMuxBearer peer -peer MuxTrace -ev) = \Object -_o -> +instance (Show peer) + => HasTextFormatter (WithMuxBearer peer MuxTrace) where + formatText :: WithMuxBearer peer MuxTrace -> Object -> Text +formatText (WithMuxBearer peer +peer MuxTrace +ev) = \Object +_o -> Text "Bearer on " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -940,7 +940,7 @@ pack (peer -> String forall a. Show a => a -> String show peer -peer) +peer) Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -950,7 +950,7 @@ pack (MuxTrace -> String forall a. Show a => a -> String show MuxTrace -ev) +ev) -- @@ -958,16 +958,16 @@ -- -- NOTE: this list is sorted by the unqualified name of the outermost type. -instance ( ConvertTxId blk - , RunNode blk - , HasTxs blk +instance ( ConvertTxId blk + , RunNode blk + , HasTxs blk ) - => ToObject (AnyMessageAndAgency (BlockFetch blk (Point blk))) where - toObject :: TracingVerbosity + => ToObject (AnyMessageAndAgency (BlockFetch blk (Point blk))) where + toObject :: TracingVerbosity -> AnyMessageAndAgency (BlockFetch blk (Point blk)) -> Object -toObject TracingVerbosity -MinimalVerbosity (AnyMessageAndAgency PeerHasAgency pr st -stok (MsgBlock blk)) = +toObject TracingVerbosity +MinimalVerbosity (AnyMessageAndAgency PeerHasAgency pr st +stok (MsgBlock blk)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -986,7 +986,7 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) , Text "blockHash" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -996,10 +996,10 @@ proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) (block1 -> HeaderHash block1 +Proxy @blk) (block1 -> HeaderHash block1 forall b. HasHeader b => b -> HeaderHash b blockHash block1 -blk) +blk) , Text "blockSize" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1012,12 +1012,12 @@ estimateBlockSize (block1 -> Header block1 forall blk. GetHeader blk => blk -> Header blk getHeader block1 -blk)) +blk)) ] - toObject TracingVerbosity -verb (AnyMessageAndAgency PeerHasAgency pr st -stok (MsgBlock blk)) = + toObject TracingVerbosity +verb (AnyMessageAndAgency PeerHasAgency pr st +stok (MsgBlock blk)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1036,7 +1036,7 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) , Text "blockHash" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1046,10 +1046,10 @@ proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) (block1 -> HeaderHash block1 +Proxy @blk) (block1 -> HeaderHash block1 forall b. HasHeader b => b -> HeaderHash b blockHash block1 -blk) +blk) , Text "blockSize" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1062,14 +1062,14 @@ estimateBlockSize (block1 -> Header block1 forall blk. GetHeader blk => blk -> Header blk getHeader block1 -blk)) +blk)) , Text "txIds" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [Value] -> Value forall a. ToJSON a => a -> Value toJSON (GenTx blk -> Value -presentTx (GenTx blk -> Value) -> [GenTx blk] -> [Value] +presentTx (GenTx blk -> Value) -> [GenTx blk] -> [Value] forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> (Validated (GenTx block1) -> GenTx block1) -> [Validated (GenTx block1)] -> [GenTx block1] @@ -1081,12 +1081,12 @@ txForgetValidated (block1 -> [Validated (GenTx block1)] forall blk. HasTxs blk => blk -> [Validated (GenTx blk)] extractTxs block1 -blk)) +blk)) ] where - presentTx :: GenTx blk -> Value - presentTx :: GenTx blk -> Value -presentTx = Text -> Value + presentTx :: GenTx blk -> Value + presentTx :: GenTx blk -> Value +presentTx = Text -> Value String (Text -> Value) -> (GenTx blk -> Text) -> GenTx blk -> Value forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -1096,7 +1096,7 @@ ConvertTxId blk => TracingVerbosity -> TxId (GenTx blk) -> Text renderTxIdForVerbosity TracingVerbosity -verb (TxId (GenTx blk) -> Text) +verb (TxId (GenTx blk) -> Text) -> (GenTx blk -> TxId (GenTx blk)) -> GenTx blk -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -1105,9 +1105,9 @@ forall tx. HasTxId tx => tx -> TxId tx txId - toObject TracingVerbosity -_v (AnyMessageAndAgency PeerHasAgency pr st -stok MsgRequestRange{}) = + toObject TracingVerbosity +_v (AnyMessageAndAgency PeerHasAgency pr st +stok MsgRequestRange{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1126,11 +1126,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_v (AnyMessageAndAgency PeerHasAgency pr st -stok MsgStartBatch{}) = + toObject TracingVerbosity +_v (AnyMessageAndAgency PeerHasAgency pr st +stok MsgStartBatch{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1149,11 +1149,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_v (AnyMessageAndAgency PeerHasAgency pr st -stok MsgNoBlocks{}) = + toObject TracingVerbosity +_v (AnyMessageAndAgency PeerHasAgency pr st +stok MsgNoBlocks{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1172,11 +1172,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_v (AnyMessageAndAgency PeerHasAgency pr st -stok MsgBatchDone{}) = + toObject TracingVerbosity +_v (AnyMessageAndAgency PeerHasAgency pr st +stok MsgBatchDone{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1195,11 +1195,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_v (AnyMessageAndAgency PeerHasAgency pr st -stok MsgClientDone{}) = + toObject TracingVerbosity +_v (AnyMessageAndAgency PeerHasAgency pr st +stok MsgClientDone{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1218,16 +1218,16 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] -instance (forall result. Show (query result)) - => ToObject (AnyMessageAndAgency (LocalStateQuery blk pt query)) where - toObject :: TracingVerbosity +instance (forall result. Show (query result)) + => ToObject (AnyMessageAndAgency (LocalStateQuery blk pt query)) where + toObject :: TracingVerbosity -> AnyMessageAndAgency (LocalStateQuery blk pt query) -> Object -toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalStateQuery.MsgAcquire{}) = +toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalStateQuery.MsgAcquire{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1246,11 +1246,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalStateQuery.MsgAcquired{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalStateQuery.MsgAcquired{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1269,11 +1269,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalStateQuery.MsgFailure{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalStateQuery.MsgFailure{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1292,11 +1292,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalStateQuery.MsgQuery{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalStateQuery.MsgQuery{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1315,11 +1315,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalStateQuery.MsgResult{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalStateQuery.MsgResult{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1338,11 +1338,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalStateQuery.MsgRelease{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalStateQuery.MsgRelease{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1361,11 +1361,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalStateQuery.MsgReAcquire{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalStateQuery.MsgReAcquire{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1384,11 +1384,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalStateQuery.MsgDone{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalStateQuery.MsgDone{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1407,15 +1407,15 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] -instance ToObject (AnyMessageAndAgency (LocalTxSubmission tx err)) where - toObject :: TracingVerbosity +instance ToObject (AnyMessageAndAgency (LocalTxSubmission tx err)) where + toObject :: TracingVerbosity -> AnyMessageAndAgency (LocalTxSubmission tx err) -> Object -toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalTxSub.MsgSubmitTx{}) = +toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalTxSub.MsgSubmitTx{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1434,11 +1434,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalTxSub.MsgAcceptTx{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalTxSub.MsgAcceptTx{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1457,11 +1457,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalTxSub.MsgRejectTx{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalTxSub.MsgRejectTx{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1480,11 +1480,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok LocalTxSub.MsgDone{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok LocalTxSub.MsgDone{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1503,15 +1503,15 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] -instance ToObject (AnyMessageAndAgency (ChainSync blk pt tip)) where - toObject :: TracingVerbosity +instance ToObject (AnyMessageAndAgency (ChainSync blk pt tip)) where + toObject :: TracingVerbosity -> AnyMessageAndAgency (ChainSync blk pt tip) -> Object -toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok ChainSync.MsgRequestNext{}) = +toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok ChainSync.MsgRequestNext{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1530,11 +1530,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok ChainSync.MsgAwaitReply{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok ChainSync.MsgAwaitReply{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1553,11 +1553,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok ChainSync.MsgRollForward{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok ChainSync.MsgRollForward{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1576,11 +1576,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok ChainSync.MsgRollBackward{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok ChainSync.MsgRollBackward{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1599,11 +1599,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok ChainSync.MsgFindIntersect{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok ChainSync.MsgFindIntersect{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1622,11 +1622,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok ChainSync.MsgIntersectFound{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok ChainSync.MsgIntersectFound{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1645,11 +1645,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok ChainSync.MsgIntersectNotFound{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok ChainSync.MsgIntersectNotFound{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1668,11 +1668,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok ChainSync.MsgDone{}) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok ChainSync.MsgDone{}) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1691,16 +1691,16 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] -instance (Show txid, Show tx) - => ToObject (AnyMessageAndAgency (TxSubmission txid tx)) where - toObject :: TracingVerbosity +instance (Show txid, Show tx) + => ToObject (AnyMessageAndAgency (TxSubmission txid tx)) where + toObject :: TracingVerbosity -> AnyMessageAndAgency (TxSubmission txid tx) -> Object -toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok (MsgRequestTxs txids)) = +toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok (MsgRequestTxs txids)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1720,7 +1720,7 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) , Text "txIds" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1731,11 +1731,11 @@ $ [txid1] -> String forall a. Show a => a -> String show [txid1] -txids) +txids) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok (MsgReplyTxs txs)) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok (MsgReplyTxs txs)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1755,7 +1755,7 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) , Text "txs" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1766,11 +1766,11 @@ $ [tx1] -> String forall a. Show a => a -> String show [tx1] -txs) +txs) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok (MsgRequestTxIds _ _ _)) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok (MsgRequestTxIds _ _ _)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1790,11 +1790,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok (MsgReplyTxIds _)) = + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok (MsgReplyTxIds _)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -1814,11 +1814,11 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -_verb (AnyMessageAndAgency PeerHasAgency pr st -stok Message (TxSubmission txid tx) st st' + toObject TracingVerbosity +_verb (AnyMessageAndAgency PeerHasAgency pr st +stok Message (TxSubmission txid tx) st st' MsgDone) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -1839,19 +1839,19 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] -instance (Show txid, Show tx) - => ToObject (AnyMessageAndAgency (TxSubmission2 txid tx)) where - toObject :: TracingVerbosity +instance (Show txid, Show tx) + => ToObject (AnyMessageAndAgency (TxSubmission2 txid tx)) where + toObject :: TracingVerbosity -> AnyMessageAndAgency (TxSubmission2 txid tx) -> Object -toObject TracingVerbosity -_verb (AnyMessageAndAgency +toObject TracingVerbosity +_verb (AnyMessageAndAgency -- we need this pattern match for GHC to recognise this -- function as total. - stok :: PeerHasAgency pr st -stok@(ClientAgency ClientHasAgency st + stok :: PeerHasAgency pr st +stok@(ClientAgency ClientHasAgency st TokHello) Message (TxSubmission2 txid tx) st st' MsgHello) = @@ -1874,17 +1874,17 @@ $ PeerHasAgency pr st -> String forall a. Show a => a -> String show PeerHasAgency pr st -stok) +stok) ] - toObject TracingVerbosity -verb (AnyMessageAndAgency - (ClientAgency (TokClientTalk stok)) - (MsgTalk msg)) = + toObject TracingVerbosity +verb (AnyMessageAndAgency + (ClientAgency (TokClientTalk stok)) + (MsgTalk msg)) = TracingVerbosity -> AnyMessageAndAgency (TxSubmission txid tx) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (PeerHasAgency 'AsClient stInner +verb (PeerHasAgency 'AsClient stInner -> Message (TxSubmission txid tx) stInner stInner' -> AnyMessageAndAgency (TxSubmission txid tx) forall (pr :: PeerRole) ps (st :: ps) (st' :: ps). @@ -1893,18 +1893,18 @@ forall ps (st :: ps). ClientHasAgency st -> PeerHasAgency 'AsClient st ClientAgency ClientHasAgency stInner -stok) Message (TxSubmission txid tx) stInner stInner' +stok) Message (TxSubmission txid tx) stInner stInner' Message (TxSubmission txid tx) stInner stInner' -msg) - toObject TracingVerbosity -verb (AnyMessageAndAgency - (ServerAgency (TokServerTalk stok)) - (MsgTalk msg)) = +msg) + toObject TracingVerbosity +verb (AnyMessageAndAgency + (ServerAgency (TokServerTalk stok)) + (MsgTalk msg)) = TracingVerbosity -> AnyMessageAndAgency (TxSubmission txid tx) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb (PeerHasAgency 'AsServer stInner +verb (PeerHasAgency 'AsServer stInner -> Message (TxSubmission txid tx) stInner stInner' -> AnyMessageAndAgency (TxSubmission txid tx) forall (pr :: PeerRole) ps (st :: ps) (st' :: ps). @@ -1913,16 +1913,16 @@ forall ps (st :: ps). ServerHasAgency st -> PeerHasAgency 'AsServer st ServerAgency ServerHasAgency stInner -stok) Message (TxSubmission txid tx) stInner stInner' +stok) Message (TxSubmission txid tx) stInner stInner' Message (TxSubmission txid tx) stInner stInner' -msg) +msg) -instance ToObject (FetchDecision [Point header]) where - toObject :: TracingVerbosity -> FetchDecision [Point header] -> Object -toObject TracingVerbosity -_verb (Left FetchDecline -decline) = +instance ToObject (FetchDecision [Point header]) where + toObject :: TracingVerbosity -> FetchDecision [Point header] -> Object +toObject TracingVerbosity +_verb (Left FetchDecline +decline) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1939,11 +1939,11 @@ pack (FetchDecline -> String forall a. Show a => a -> String show FetchDecline -decline)) +decline)) ] - toObject TracingVerbosity -_verb (Right [Point header] -results) = + toObject TracingVerbosity +_verb (Right [Point header] +results) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1966,14 +1966,14 @@ $ [Point header] -> Int forall a. HasLength a => a -> Int length [Point header] -results) +results) ] -instance ToObject ND.DiffusionInitializationTracer where - toObject :: TracingVerbosity -> DiffusionInitializationTracer -> Object -toObject TracingVerbosity -_verb (ND.RunServer SockAddr -sockAddr) = [(Text, Value)] -> Object +instance ToObject ND.DiffusionInitializationTracer where + toObject :: TracingVerbosity -> DiffusionInitializationTracer -> Object +toObject TracingVerbosity +_verb (ND.RunServer SockAddr +sockAddr) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1990,12 +1990,12 @@ pack (SockAddr -> String forall a. Show a => a -> String show SockAddr -sockAddr)) +sockAddr)) ] - toObject TracingVerbosity -_verb (ND.RunLocalServer LocalAddress -localAddress) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.RunLocalServer LocalAddress +localAddress) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2012,11 +2012,11 @@ pack (LocalAddress -> String forall a. Show a => a -> String show LocalAddress -localAddress)) +localAddress)) ] - toObject TracingVerbosity -_verb (ND.UsingSystemdSocket String -path) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.UsingSystemdSocket String +path) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2031,12 +2031,12 @@ .= Text -> Value String (String -> Text pack String -path) +path) ] - toObject TracingVerbosity -_verb (ND.CreateSystemdSocketForSnocketPath String -path) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.CreateSystemdSocketForSnocketPath String +path) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2051,11 +2051,11 @@ .= Text -> Value String (String -> Text pack String -path) +path) ] - toObject TracingVerbosity -_verb (ND.CreatedLocalSocket String -path) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.CreatedLocalSocket String +path) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2070,12 +2070,12 @@ .= Text -> Value String (String -> Text pack String -path) +path) ] - toObject TracingVerbosity -_verb (ND.ConfiguringLocalSocket String -path FileDescriptor -socket) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.ConfiguringLocalSocket String +path FileDescriptor +socket) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2090,7 +2090,7 @@ .= Text -> Value String (String -> Text pack String -path) +path) , Text "socket" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2099,12 +2099,12 @@ pack (FileDescriptor -> String forall a. Show a => a -> String show FileDescriptor -socket)) +socket)) ] - toObject TracingVerbosity -_verb (ND.ListeningLocalSocket String -path FileDescriptor -socket) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.ListeningLocalSocket String +path FileDescriptor +socket) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2119,7 +2119,7 @@ .= Text -> Value String (String -> Text pack String -path) +path) , Text "socket" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2128,12 +2128,12 @@ pack (FileDescriptor -> String forall a. Show a => a -> String show FileDescriptor -socket)) +socket)) ] - toObject TracingVerbosity -_verb (ND.LocalSocketUp String -path FileDescriptor -fd) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.LocalSocketUp String +path FileDescriptor +fd) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2148,7 +2148,7 @@ .= Text -> Value String (String -> Text pack String -path) +path) , Text "socket" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2157,11 +2157,11 @@ pack (FileDescriptor -> String forall a. Show a => a -> String show FileDescriptor -fd)) +fd)) ] - toObject TracingVerbosity -_verb (ND.CreatingServerSocket SockAddr -socket) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.CreatingServerSocket SockAddr +socket) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2178,11 +2178,11 @@ pack (SockAddr -> String forall a. Show a => a -> String show SockAddr -socket)) +socket)) ] - toObject TracingVerbosity -_verb (ND.ListeningServerSocket SockAddr -socket) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.ListeningServerSocket SockAddr +socket) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2199,11 +2199,11 @@ pack (SockAddr -> String forall a. Show a => a -> String show SockAddr -socket)) +socket)) ] - toObject TracingVerbosity -_verb (ND.ServerSocketUp SockAddr -socket) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.ServerSocketUp SockAddr +socket) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2220,11 +2220,11 @@ pack (SockAddr -> String forall a. Show a => a -> String show SockAddr -socket)) +socket)) ] - toObject TracingVerbosity -_verb (ND.ConfiguringServerSocket SockAddr -socket) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.ConfiguringServerSocket SockAddr +socket) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2241,11 +2241,11 @@ pack (SockAddr -> String forall a. Show a => a -> String show SockAddr -socket)) +socket)) ] - toObject TracingVerbosity -_verb (ND.UnsupportedLocalSystemdSocket SockAddr -path) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.UnsupportedLocalSystemdSocket SockAddr +path) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2262,10 +2262,10 @@ pack (SockAddr -> String forall a. Show a => a -> String show SockAddr -path)) +path)) ] - toObject TracingVerbosity -_verb DiffusionInitializationTracer + toObject TracingVerbosity +_verb DiffusionInitializationTracer ND.UnsupportedReadySocketCase = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2276,9 +2276,9 @@ String Text "UnsupportedReadySocketCase" ] - toObject TracingVerbosity -_verb (ND.DiffusionErrored SomeException -exception) = [(Text, Value)] -> Object + toObject TracingVerbosity +_verb (ND.DiffusionErrored SomeException +exception) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2295,15 +2295,15 @@ pack (SomeException -> String forall a. Show a => a -> String show SomeException -exception)) +exception)) ] -instance ToObject NtC.HandshakeTr where - toObject :: TracingVerbosity -> HandshakeTr -> Object -toObject TracingVerbosity -_verb (WithMuxBearer ConnectionId LocalAddress -b TraceSendRecv (Handshake NodeToClientVersion Term) -ev) = +instance ToObject NtC.HandshakeTr where + toObject :: TracingVerbosity -> HandshakeTr -> Object +toObject TracingVerbosity +_verb (WithMuxBearer ConnectionId LocalAddress +b TraceSendRecv (Handshake NodeToClientVersion Term) +ev) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2318,22 +2318,22 @@ .= ConnectionId LocalAddress -> String forall a. Show a => a -> String show ConnectionId LocalAddress -b +b , Text "event" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TraceSendRecv (Handshake NodeToClientVersion Term) -> String forall a. Show a => a -> String show TraceSendRecv (Handshake NodeToClientVersion Term) -ev ] +ev ] -instance ToObject NtN.HandshakeTr where - toObject :: TracingVerbosity -> HandshakeTr -> Object -toObject TracingVerbosity -_verb (WithMuxBearer ConnectionId SockAddr -b TraceSendRecv (Handshake NodeToNodeVersion Term) -ev) = +instance ToObject NtN.HandshakeTr where + toObject :: TracingVerbosity -> HandshakeTr -> Object +toObject TracingVerbosity +_verb (WithMuxBearer ConnectionId SockAddr +b TraceSendRecv (Handshake NodeToNodeVersion Term) +ev) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2348,22 +2348,22 @@ .= ConnectionId SockAddr -> String forall a. Show a => a -> String show ConnectionId SockAddr -b +b , Text "event" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TraceSendRecv (Handshake NodeToNodeVersion Term) -> String forall a. Show a => a -> String show TraceSendRecv (Handshake NodeToNodeVersion Term) -ev ] +ev ] -instance ToObject NtN.AcceptConnectionsPolicyTrace where - toObject :: TracingVerbosity -> AcceptConnectionsPolicyTrace -> Object -toObject TracingVerbosity -_verb (NtN.ServerTraceAcceptConnectionRateLimiting DiffTime -delay Int -numOfConnections) = +instance ToObject NtN.AcceptConnectionsPolicyTrace where + toObject :: TracingVerbosity -> AcceptConnectionsPolicyTrace -> Object +toObject TracingVerbosity +_verb (NtN.ServerTraceAcceptConnectionRateLimiting DiffTime +delay Int +numOfConnections) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2378,18 +2378,18 @@ .= DiffTime -> String forall a. Show a => a -> String show DiffTime -delay +delay , Text "numberOfConnection" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Int -> String forall a. Show a => a -> String show Int -numOfConnections +numOfConnections ] - toObject TracingVerbosity -_verb (NtN.ServerTraceAcceptConnectionHardLimit SizeInBytes -softLimit) = + toObject TracingVerbosity +_verb (NtN.ServerTraceAcceptConnectionHardLimit SizeInBytes +softLimit) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2404,15 +2404,15 @@ .= SizeInBytes -> String forall a. Show a => a -> String show SizeInBytes -softLimit +softLimit ] -instance ConvertRawHash blk - => ToObject (Point blk) where - toObject :: TracingVerbosity -> Point blk -> Object -toObject TracingVerbosity -_verb Point blk +instance ConvertRawHash blk + => ToObject (Point blk) where + toObject :: TracingVerbosity -> Point blk -> Object +toObject TracingVerbosity +_verb Point blk GenesisPoint = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -2423,10 +2423,10 @@ .= Text -> Value String Text "GenesisPoint" ] - toObject TracingVerbosity -verb (BlockPoint SlotNo -slot HeaderHash blk -h) = + toObject TracingVerbosity +verb (BlockPoint SlotNo +slot HeaderHash blk +h) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2443,7 +2443,7 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slot) +slot) , Text "headerHash" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2453,17 +2453,17 @@ proxy blk -> TracingVerbosity -> HeaderHash blk -> Text renderHeaderHashForVerbosity (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) TracingVerbosity -verb HeaderHash blk -h +Proxy @blk) TracingVerbosity +verb HeaderHash blk +h ] -instance ToObject SlotNo where - toObject :: TracingVerbosity -> SlotNo -> Object -toObject TracingVerbosity -_verb SlotNo -slot = +instance ToObject SlotNo where + toObject :: TracingVerbosity -> SlotNo -> Object +toObject TracingVerbosity +_verb SlotNo +slot = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2479,13 +2479,13 @@ forall a. ToJSON a => a -> Value toJSON (SlotNo -> Word64 unSlotNo SlotNo -slot) ] +slot) ] -instance (HasHeader header, ConvertRawHash header) - => ToObject (TraceFetchClientState header) where - toObject :: TracingVerbosity -> TraceFetchClientState header -> Object -toObject TracingVerbosity -_verb BlockFetch.AddedFetchRequest {} = +instance (HasHeader header, ConvertRawHash header) + => ToObject (TraceFetchClientState header) where + toObject :: TracingVerbosity -> TraceFetchClientState header -> Object +toObject TracingVerbosity +_verb BlockFetch.AddedFetchRequest {} = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2494,8 +2494,8 @@ .= Text -> Value String Text "AddedFetchRequest" ] - toObject TracingVerbosity -_verb BlockFetch.AcknowledgedFetchRequest {} = + toObject TracingVerbosity +_verb BlockFetch.AcknowledgedFetchRequest {} = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2504,9 +2504,9 @@ .= Text -> Value String Text "AcknowledgedFetchRequest" ] - toObject TracingVerbosity -_verb (BlockFetch.SendFetchRequest AnchoredFragment header -af) = + toObject TracingVerbosity +_verb (BlockFetch.SendFetchRequest AnchoredFragment header +af) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2528,29 +2528,29 @@ proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy header forall k (t :: k). Proxy t -Proxy @header)) +Proxy @header)) (AnchoredFragment header -> ChainHash header forall block. HasHeader block => AnchoredFragment block -> ChainHash block AF.headHash AnchoredFragment header -af)) +af)) , Text "length" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Int -> Value forall a. ToJSON a => a -> Value toJSON (AnchoredFragment header -> Int -fragmentLength AnchoredFragment header -af)] +fragmentLength AnchoredFragment header +af)] where -- NOTE: this ignores the Byron era with its EBB complication: -- the length would be underestimated by 1, if the AF is anchored -- at the epoch boundary. - fragmentLength :: AF.AnchoredFragment header -> Int - fragmentLength :: AnchoredFragment header -> Int -fragmentLength AnchoredFragment header -f = Word64 -> Int + fragmentLength :: AF.AnchoredFragment header -> Int + fragmentLength :: AnchoredFragment header -> Int +fragmentLength AnchoredFragment header +f = Word64 -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 -> Int) -> (BlockNo -> Word64) -> BlockNo -> Int forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). @@ -2561,30 +2561,30 @@ forall a b. (a -> b) -> a -> b $ case (AnchoredFragment header -f, AnchoredFragment header -f) of +f, AnchoredFragment header +f) of (AS.Empty{}, AS.Empty{}) -> BlockNo 0 - (header -firstHdr AS.:< AnchoredFragment header + (header +firstHdr AS.:< AnchoredFragment header _, AnchoredFragment header -_ AS.:> header -lastHdr) -> +_ AS.:> header +lastHdr) -> header -> BlockNo forall b. HasHeader b => b -> BlockNo blockNo header -lastHdr BlockNo -> BlockNo -> BlockNo +lastHdr BlockNo -> BlockNo -> BlockNo forall a. Num a => a -> a -> a - header -> BlockNo forall b. HasHeader b => b -> BlockNo blockNo header -firstHdr BlockNo -> BlockNo -> BlockNo +firstHdr BlockNo -> BlockNo -> BlockNo forall a. Num a => a -> a -> a + BlockNo 1 - toObject TracingVerbosity -_verb (BlockFetch.CompletedBlockFetch Point header -pt PeerFetchInFlight header + toObject TracingVerbosity +_verb (BlockFetch.CompletedBlockFetch Point header +pt PeerFetchInFlight header _ PeerFetchInFlightLimits _ PeerFetchStatus header _ NominalDiffTime @@ -2603,23 +2603,23 @@ .= Text -> Value String (case Point header -pt of +pt of Point header GenesisPoint -> Text "Genesis" BlockPoint SlotNo -_ HeaderHash header -h -> Proxy header -> HeaderHash header -> Text +_ HeaderHash header +h -> Proxy header -> HeaderHash header -> Text forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy header forall k (t :: k). Proxy t -Proxy @header) HeaderHash header -h) +Proxy @header) HeaderHash header +h) ] - toObject TracingVerbosity -_verb BlockFetch.CompletedFetchBatch {} = + toObject TracingVerbosity +_verb BlockFetch.CompletedFetchBatch {} = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2628,8 +2628,8 @@ .= Text -> Value String Text "CompletedFetchBatch" ] - toObject TracingVerbosity -_verb BlockFetch.StartedFetchBatch {} = + toObject TracingVerbosity +_verb BlockFetch.StartedFetchBatch {} = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2638,8 +2638,8 @@ .= Text -> Value String Text "StartedFetchBatch" ] - toObject TracingVerbosity -_verb BlockFetch.RejectedFetchBatch {} = + toObject TracingVerbosity +_verb BlockFetch.RejectedFetchBatch {} = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2648,8 +2648,8 @@ .= Text -> Value String Text "RejectedFetchBatch" ] - toObject TracingVerbosity -_verb BlockFetch.ClientTerminating {} = + toObject TracingVerbosity +_verb BlockFetch.ClientTerminating {} = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2660,11 +2660,11 @@ "ClientTerminating" ] -instance (ToObject peer) - => ToObject [TraceLabelPeer peer (FetchDecision [Point header])] where - toObject :: TracingVerbosity +instance (ToObject peer) + => ToObject [TraceLabelPeer peer (FetchDecision [Point header])] where + toObject :: TracingVerbosity -> [TraceLabelPeer peer (FetchDecision [Point header])] -> Object -toObject TracingVerbosity +toObject TracingVerbosity MinimalVerbosity [TraceLabelPeer peer (FetchDecision [Point header])] _ = Object forall a. ToObject a => HashMap Text a @@ -2674,8 +2674,8 @@ forall a. ToObject a => HashMap Text a emptyObject toObject TracingVerbosity -_ [TraceLabelPeer peer (FetchDecision [Point header])] -xs = [(Text, Value)] -> Object +_ [TraceLabelPeer peer (FetchDecision [Point header])] +xs = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2698,25 +2698,25 @@ forall (t :: * -> *) b a. Foldable t => (b -> a -> b) -> b -> t a -> b -foldl' (\[Object] -acc TraceLabelPeer peer (FetchDecision [Point header]) -x -> TracingVerbosity +foldl' (\[Object] +acc TraceLabelPeer peer (FetchDecision [Point header]) +x -> TracingVerbosity -> TraceLabelPeer peer (FetchDecision [Point header]) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity MaximalVerbosity TraceLabelPeer peer (FetchDecision [Point header]) -x Object -> [Object] -> [Object] +x Object -> [Object] -> [Object] forall a. a -> [a] -> [a] : [Object] -acc) [] [TraceLabelPeer peer (FetchDecision [Point header])] -xs) ] +acc) [] [TraceLabelPeer peer (FetchDecision [Point header])] +xs) ] -instance (ToObject peer, ToObject a) => ToObject (TraceLabelPeer peer a) where - toObject :: TracingVerbosity -> TraceLabelPeer peer a -> Object -toObject TracingVerbosity -verb (TraceLabelPeer peer -peerid a -a) = +instance (ToObject peer, ToObject a) => ToObject (TraceLabelPeer peer a) where + toObject :: TracingVerbosity -> TraceLabelPeer peer a -> Object +toObject TracingVerbosity +verb (TraceLabelPeer peer +peerid a +a) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2725,22 +2725,22 @@ .= TracingVerbosity -> peer -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb peer -peerid ] Object -> Object -> Object +verb peer +peerid ] Object -> Object -> Object forall a. Semigroup a => a -> a -> a <> TracingVerbosity -> a -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb a -a +verb a +a -instance ToObject (AnyMessageAndAgency ps) - => ToObject (TraceSendRecv ps) where - toObject :: TracingVerbosity -> TraceSendRecv ps -> Object -toObject TracingVerbosity -verb (TraceSendMsg AnyMessageAndAgency ps -m) = [(Text, Value)] -> Object +instance ToObject (AnyMessageAndAgency ps) + => ToObject (TraceSendRecv ps) where + toObject :: TracingVerbosity -> TraceSendRecv ps -> Object +toObject TracingVerbosity +verb (TraceSendMsg AnyMessageAndAgency ps +m) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2754,11 +2754,11 @@ .= TracingVerbosity -> AnyMessageAndAgency ps -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb AnyMessageAndAgency ps -m ] - toObject TracingVerbosity -verb (TraceRecvMsg AnyMessageAndAgency ps -m) = [(Text, Value)] -> Object +verb AnyMessageAndAgency ps +m ] + toObject TracingVerbosity +verb (TraceRecvMsg AnyMessageAndAgency ps +m) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2772,15 +2772,15 @@ .= TracingVerbosity -> AnyMessageAndAgency ps -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb AnyMessageAndAgency ps -m ] +verb AnyMessageAndAgency ps +m ] -instance ToObject (TraceTxSubmissionInbound txid tx) where - toObject :: TracingVerbosity -> TraceTxSubmissionInbound txid tx -> Object -toObject TracingVerbosity -_verb (TraceTxSubmissionCollected Int -count) = +instance ToObject (TraceTxSubmissionInbound txid tx) where + toObject :: TracingVerbosity -> TraceTxSubmissionInbound txid tx -> Object +toObject TracingVerbosity +_verb (TraceTxSubmissionCollected Int +count) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2796,11 +2796,11 @@ .= Int -> Value forall a. ToJSON a => a -> Value toJSON Int -count +count ] - toObject TracingVerbosity -_verb (TraceTxSubmissionProcessed ProcessedTxCount -processed) = + toObject TracingVerbosity +_verb (TraceTxSubmissionProcessed ProcessedTxCount +processed) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2817,7 +2817,7 @@ forall a. ToJSON a => a -> Value toJSON (ProcessedTxCount -> Int ptxcAccepted ProcessedTxCount -processed) +processed) , Text "rejected" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2825,10 +2825,10 @@ forall a. ToJSON a => a -> Value toJSON (ProcessedTxCount -> Int ptxcRejected ProcessedTxCount -processed) +processed) ] - toObject TracingVerbosity -_verb TraceTxSubmissionInbound txid tx + toObject TracingVerbosity +_verb TraceTxSubmissionInbound txid tx TraceTxInboundTerminated = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -2840,9 +2840,9 @@ String Text "TraceTxInboundTerminated" ] - toObject TracingVerbosity -_verb (TraceTxInboundCanRequestMoreTxs Int -count) = + toObject TracingVerbosity +_verb (TraceTxInboundCanRequestMoreTxs Int +count) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2858,11 +2858,11 @@ .= Int -> Value forall a. ToJSON a => a -> Value toJSON Int -count +count ] - toObject TracingVerbosity -_verb (TraceTxInboundCannotRequestMoreTxs Int -count) = + toObject TracingVerbosity +_verb (TraceTxInboundCannotRequestMoreTxs Int +count) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2878,16 +2878,16 @@ .= Int -> Value forall a. ToJSON a => a -> Value toJSON Int -count +count ] -instance (Show txid, Show tx) - => ToObject (TraceTxSubmissionOutbound txid tx) where - toObject :: TracingVerbosity -> TraceTxSubmissionOutbound txid tx -> Object -toObject TracingVerbosity -MaximalVerbosity (TraceTxSubmissionOutboundRecvMsgRequestTxs [txid] -txids) = +instance (Show txid, Show tx) + => ToObject (TraceTxSubmissionOutbound txid tx) where + toObject :: TracingVerbosity -> TraceTxSubmissionOutbound txid tx -> Object +toObject TracingVerbosity +MaximalVerbosity (TraceTxSubmissionOutboundRecvMsgRequestTxs [txid] +txids) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2907,11 +2907,11 @@ $ [txid] -> String forall a. Show a => a -> String show [txid] -txids) +txids) ] - toObject TracingVerbosity -_verb (TraceTxSubmissionOutboundRecvMsgRequestTxs [txid] -_txids) = + toObject TracingVerbosity +_verb (TraceTxSubmissionOutboundRecvMsgRequestTxs [txid] +_txids) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2923,8 +2923,8 @@ "TraceTxSubmissionOutboundRecvMsgRequestTxs" ] toObject TracingVerbosity -MaximalVerbosity (TraceTxSubmissionOutboundSendMsgReplyTxs [tx] -txs) = +MaximalVerbosity (TraceTxSubmissionOutboundSendMsgReplyTxs [tx] +txs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2944,11 +2944,11 @@ $ [tx] -> String forall a. Show a => a -> String show [tx] -txs) +txs) ] - toObject TracingVerbosity -_verb (TraceTxSubmissionOutboundSendMsgReplyTxs [tx] -_txs) = + toObject TracingVerbosity +_verb (TraceTxSubmissionOutboundSendMsgReplyTxs [tx] +_txs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2959,9 +2959,9 @@ String Text "TraceTxSubmissionOutboundSendMsgReplyTxs" ] - toObject TracingVerbosity -_verb (TraceControlMessage ControlMessage -_msg) = + toObject TracingVerbosity +_verb (TraceControlMessage ControlMessage +_msg) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2974,13 +2974,13 @@ ] -instance Show remotePeer => ToObject (TraceKeepAliveClient remotePeer) where - toObject :: TracingVerbosity -> TraceKeepAliveClient remotePeer -> Object -toObject TracingVerbosity -_verb (AddSample remotePeer -peer DiffTime -rtt PeerGSV -pgsv) = +instance Show remotePeer => ToObject (TraceKeepAliveClient remotePeer) where + toObject :: TracingVerbosity -> TraceKeepAliveClient remotePeer -> Object +toObject TracingVerbosity +_verb (AddSample remotePeer +peer DiffTime +rtt PeerGSV +pgsv) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -2996,23 +2996,23 @@ .= remotePeer -> String forall a. Show a => a -> String show remotePeer -peer +peer , Text "rtt" Text -> DiffTime -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= DiffTime -rtt +rtt , Text "sampleTime" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Double -> String forall a. Show a => a -> String show (Time -> Double -dTime (Time -> Double) -> Time -> Double +dTime (Time -> Double) -> Time -> Double forall a b. (a -> b) -> a -> b $ PeerGSV -> Time sampleTime PeerGSV -pgsv) +pgsv) , Text "outboundG" Text -> Double -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3021,9 +3021,9 @@ realToFrac (DiffTime -> Double) -> DiffTime -> Double forall a b. (a -> b) -> a -> b $ GSV -> DiffTime -gGSV (PeerGSV -> GSV +gGSV (PeerGSV -> GSV outboundGSV PeerGSV -pgsv) :: Double) +pgsv) :: Double) , Text "inboundG" Text -> Double -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3032,33 +3032,33 @@ realToFrac (DiffTime -> Double) -> DiffTime -> Double forall a b. (a -> b) -> a -> b $ GSV -> DiffTime -gGSV (PeerGSV -> GSV +gGSV (PeerGSV -> GSV inboundGSV PeerGSV -pgsv) :: Double) +pgsv) :: Double) ] where - gGSV :: GSV -> DiffTime - gGSV :: GSV -> DiffTime -gGSV (GSV DiffTime -g SizeInBytes -> DiffTime + gGSV :: GSV -> DiffTime + gGSV :: GSV -> DiffTime +gGSV (GSV DiffTime +g SizeInBytes -> DiffTime _ Distribution DiffTime _) = DiffTime -g +g - dTime :: Time -> Double - dTime :: Time -> Double -dTime (Time DiffTime -d) = DiffTime -> Double + dTime :: Time -> Double + dTime :: Time -> Double +dTime (Time DiffTime +d) = DiffTime -> Double forall a b. (Real a, Fractional b) => a -> b realToFrac DiffTime -d +d -instance Show addr => ToObject (WithAddr addr ErrorPolicyTrace) where - toObject :: TracingVerbosity -> WithAddr addr ErrorPolicyTrace -> Object -toObject TracingVerbosity -_verb (WithAddr addr -addr ErrorPolicyTrace -ev) = +instance Show addr => ToObject (WithAddr addr ErrorPolicyTrace) where + toObject :: TracingVerbosity -> WithAddr addr ErrorPolicyTrace -> Object +toObject TracingVerbosity +_verb (WithAddr addr +addr ErrorPolicyTrace +ev) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3073,24 +3073,24 @@ .= addr -> String forall a. Show a => a -> String show addr -addr +addr , Text "event" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ErrorPolicyTrace -> String forall a. Show a => a -> String show ErrorPolicyTrace -ev ] +ev ] -instance ToObject (WithIPList (SubscriptionTrace SockAddr)) where - toObject :: TracingVerbosity +instance ToObject (WithIPList (SubscriptionTrace SockAddr)) where + toObject :: TracingVerbosity -> WithIPList (SubscriptionTrace SockAddr) -> Object -toObject TracingVerbosity -_verb (WithIPList LocalAddresses SockAddr -localAddresses [SockAddr] -dests SubscriptionTrace SockAddr -ev) = +toObject TracingVerbosity +_verb (WithIPList LocalAddresses SockAddr +localAddresses [SockAddr] +dests SubscriptionTrace SockAddr +ev) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3105,29 +3105,29 @@ .= LocalAddresses SockAddr -> String forall a. Show a => a -> String show LocalAddresses SockAddr -localAddresses +localAddresses , Text "dests" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [SockAddr] -> String forall a. Show a => a -> String show [SockAddr] -dests +dests , Text "event" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SubscriptionTrace SockAddr -> String forall a. Show a => a -> String show SubscriptionTrace SockAddr -ev ] +ev ] -instance ToObject (WithDomainName DnsTrace) where - toObject :: TracingVerbosity -> WithDomainName DnsTrace -> Object -toObject TracingVerbosity -_verb (WithDomainName Domain -dom DnsTrace -ev) = +instance ToObject (WithDomainName DnsTrace) where + toObject :: TracingVerbosity -> WithDomainName DnsTrace -> Object +toObject TracingVerbosity +_verb (WithDomainName Domain +dom DnsTrace +ev) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3142,23 +3142,23 @@ .= Domain -> String forall a. Show a => a -> String show Domain -dom +dom , Text "event" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= DnsTrace -> String forall a. Show a => a -> String show DnsTrace -ev ] +ev ] -instance ToObject (WithDomainName (SubscriptionTrace SockAddr)) where - toObject :: TracingVerbosity +instance ToObject (WithDomainName (SubscriptionTrace SockAddr)) where + toObject :: TracingVerbosity -> WithDomainName (SubscriptionTrace SockAddr) -> Object -toObject TracingVerbosity -_verb (WithDomainName Domain -dom SubscriptionTrace SockAddr -ev) = +toObject TracingVerbosity +_verb (WithDomainName Domain +dom SubscriptionTrace SockAddr +ev) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3173,22 +3173,22 @@ .= Domain -> String forall a. Show a => a -> String show Domain -dom +dom , Text "event" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SubscriptionTrace SockAddr -> String forall a. Show a => a -> String show SubscriptionTrace SockAddr -ev ] +ev ] -instance (Show peer) => ToObject (WithMuxBearer peer MuxTrace) where - toObject :: TracingVerbosity -> WithMuxBearer peer MuxTrace -> Object -toObject TracingVerbosity -_verb (WithMuxBearer peer -b MuxTrace -ev) = +instance (Show peer) => ToObject (WithMuxBearer peer MuxTrace) where + toObject :: TracingVerbosity -> WithMuxBearer peer MuxTrace -> Object +toObject TracingVerbosity +_verb (WithMuxBearer peer +b MuxTrace +ev) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3203,25 +3203,25 @@ .= peer -> String forall a. Show a => a -> String show peer -b +b , Text "event" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= MuxTrace -> String forall a. Show a => a -> String show MuxTrace -ev ] +ev ] -instance ToObject NtN.RemoteAddress where - toObject :: TracingVerbosity -> SockAddr -> Object -toObject TracingVerbosity -_verb (SockAddrInet PortNumber -port SizeInBytes -addr) = - let ip :: IPv4 -ip = SizeInBytes -> IPv4 +instance ToObject NtN.RemoteAddress where + toObject :: TracingVerbosity -> SockAddr -> Object +toObject TracingVerbosity +_verb (SockAddrInet PortNumber +port SizeInBytes +addr) = + let ip :: IPv4 +ip = SizeInBytes -> IPv4 IP.fromHostAddress SizeInBytes -addr in +addr in [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3230,25 +3230,25 @@ .= IPv4 -> String forall a. Show a => a -> String show IPv4 -ip +ip , Text "port" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PortNumber -> String forall a. Show a => a -> String show PortNumber -port +port ] - toObject TracingVerbosity -_verb (SockAddrInet6 PortNumber -port SizeInBytes -_ HostAddress6 -addr SizeInBytes + toObject TracingVerbosity +_verb (SockAddrInet6 PortNumber +port SizeInBytes +_ HostAddress6 +addr SizeInBytes _) = - let ip :: IPv6 -ip = HostAddress6 -> IPv6 + let ip :: IPv6 +ip = HostAddress6 -> IPv6 IP.fromHostAddress6 HostAddress6 -addr in +addr in [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3257,18 +3257,18 @@ .= IPv6 -> String forall a. Show a => a -> String show IPv6 -ip +ip , Text "port" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PortNumber -> String forall a. Show a => a -> String show PortNumber -port +port ] - toObject TracingVerbosity -_verb (SockAddrUnix String -path) = + toObject TracingVerbosity +_verb (SockAddrUnix String +path) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3277,15 +3277,15 @@ .= String -> String forall a. Show a => a -> String show String -path ] +path ] -instance ToObject NtN.RemoteConnectionId where - toObject :: TracingVerbosity -> ConnectionId SockAddr -> Object -toObject TracingVerbosity -verb (NtN.ConnectionId SockAddr -l SockAddr -r) = +instance ToObject NtN.RemoteConnectionId where + toObject :: TracingVerbosity -> ConnectionId SockAddr -> Object +toObject TracingVerbosity +verb (NtN.ConnectionId SockAddr +l SockAddr +r) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3294,37 +3294,37 @@ .= TracingVerbosity -> SockAddr -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb SockAddr -l +verb SockAddr +l , Text "remote" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> SockAddr -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb SockAddr -r +verb SockAddr +r ] -instance ToObject LocalAddress where - toObject :: TracingVerbosity -> LocalAddress -> Object -toObject TracingVerbosity -_verb (LocalAddress String -path) = +instance ToObject LocalAddress where + toObject :: TracingVerbosity -> LocalAddress -> Object +toObject TracingVerbosity +_verb (LocalAddress String +path) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [Text "path" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= String -path] +path] -instance ToObject NtC.LocalConnectionId where - toObject :: TracingVerbosity -> ConnectionId LocalAddress -> Object -toObject TracingVerbosity -verb (NtC.ConnectionId LocalAddress -l LocalAddress -r) = +instance ToObject NtC.LocalConnectionId where + toObject :: TracingVerbosity -> ConnectionId LocalAddress -> Object +toObject TracingVerbosity +verb (NtC.ConnectionId LocalAddress +l LocalAddress +r) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3333,15 +3333,15 @@ .= TracingVerbosity -> LocalAddress -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb LocalAddress -l +verb LocalAddress +l , Text "remote" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> LocalAddress -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb LocalAddress -r +verb LocalAddress +r ] \ No newline at end of file diff --git a/cardano-node/src/Cardano.Tracing.OrphanInstances.Shelley.html b/cardano-node/src/Cardano.Tracing.OrphanInstances.Shelley.html index 9f1cb05401f..0ca1424a3c5 100644 --- a/cardano-node/src/Cardano.Tracing.OrphanInstances.Shelley.html +++ b/cardano-node/src/Cardano.Tracing.OrphanInstances.Shelley.html @@ -99,11 +99,11 @@ -- -- NOTE: this list is sorted in roughly topological order. -instance ShelleyBasedEra era => ToObject (GenTx (ShelleyBlock era)) where - toObject :: TracingVerbosity -> GenTx (ShelleyBlock era) -> Object -toObject TracingVerbosity -verb GenTx (ShelleyBlock era) -tx = +instance ShelleyBasedEra era => ToObject (GenTx (ShelleyBlock era)) where + toObject :: TracingVerbosity -> GenTx (ShelleyBlock era) -> Object +toObject TracingVerbosity +verb GenTx (ShelleyBlock era) +tx = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject ([(Text, Value)] -> Object) -> [(Text, Value)] -> Object @@ -115,7 +115,7 @@ .= GenTx (ShelleyBlock era) -> TxId (GenTx (ShelleyBlock era)) forall tx. HasTxId tx => tx -> TxId tx txId GenTx (ShelleyBlock era) -tx ] +tx ] [(Text, Value)] -> [(Text, Value)] -> [(Text, Value)] forall a. [a] -> [a] -> [a] ++ [ Text @@ -124,27 +124,27 @@ .= GenTx (ShelleyBlock era) -> String forall a. Condense a => a -> String condense GenTx (ShelleyBlock era) -tx | TracingVerbosity -verb TracingVerbosity -> TracingVerbosity -> Bool +tx | TracingVerbosity +verb TracingVerbosity -> TracingVerbosity -> Bool forall a. Eq a => a -> a -> Bool == TracingVerbosity MaximalVerbosity ] -instance ToJSON (SupportsMempool.TxId (GenTx (ShelleyBlock era))) where - toJSON :: TxId (GenTx (ShelleyBlock era)) -> Value -toJSON TxId (GenTx (ShelleyBlock era)) -i = String -> Value +instance ToJSON (SupportsMempool.TxId (GenTx (ShelleyBlock era))) where + toJSON :: TxId (GenTx (ShelleyBlock era)) -> Value +toJSON TxId (GenTx (ShelleyBlock era)) +i = String -> Value forall a. ToJSON a => a -> Value toJSON (TxId (GenTx (ShelleyBlock era)) -> String forall a. Condense a => a -> String condense TxId (GenTx (ShelleyBlock era)) -i) +i) -instance ShelleyBasedEra era => ToObject (Header (ShelleyBlock era)) where - toObject :: TracingVerbosity -> Header (ShelleyBlock era) -> Object -toObject TracingVerbosity -_verb Header (ShelleyBlock era) -b = [(Text, Value)] -> Object +instance ShelleyBasedEra era => ToObject (Header (ShelleyBlock era)) where + toObject :: TracingVerbosity -> Header (ShelleyBlock era) -> Object +toObject TracingVerbosity +_verb Header (ShelleyBlock era) +b = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -161,7 +161,7 @@ condense (Header (ShelleyBlock era) -> HeaderHash (Header (ShelleyBlock era)) forall b. HasHeader b => b -> HeaderHash b blockHash Header (ShelleyBlock era) -b) +b) , Text "slotNo" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -170,7 +170,7 @@ condense (Header (ShelleyBlock era) -> SlotNo forall b. HasHeader b => b -> SlotNo blockSlot Header (ShelleyBlock era) -b) +b) , Text "blockNo" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -179,19 +179,19 @@ condense (Header (ShelleyBlock era) -> BlockNo forall b. HasHeader b => b -> BlockNo blockNo Header (ShelleyBlock era) -b) +b) -- , "delegate" .= condense (headerSignerVk h) ] -instance ( ShelleyBasedEra era - , ToObject (PredicateFailure (UTXO era)) - , ToObject (PredicateFailure (UTXOW era)) - , ToObject (PredicateFailure (Core.EraRule "LEDGER" era)) - ) => ToObject (ApplyTxError era) where - toObject :: TracingVerbosity -> ApplyTxError era -> Object -toObject TracingVerbosity -verb (ApplyTxError [PredicateFailure (EraRule "LEDGER" era)] -predicateFailures) = +instance ( ShelleyBasedEra era + , ToObject (PredicateFailure (UTXO era)) + , ToObject (PredicateFailure (UTXOW era)) + , ToObject (PredicateFailure (Core.EraRule "LEDGER" era)) + ) => ToObject (ApplyTxError era) where + toObject :: TracingVerbosity -> ApplyTxError era -> Object +toObject TracingVerbosity +verb (ApplyTxError [PredicateFailure (EraRule "LEDGER" era)] +predicateFailures) = [Object] -> Object forall k v. (Eq k, Hashable k) => [HashMap k v] -> HashMap k v HMS.unions ([Object] -> Object) -> [Object] -> Object @@ -202,16 +202,16 @@ map (TracingVerbosity -> LedgerPredicateFailure era -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) [PredicateFailure (EraRule "LEDGER" era)] +verb) [PredicateFailure (EraRule "LEDGER" era)] [LedgerPredicateFailure era] -predicateFailures +predicateFailures -instance ToObject (TPraosCannotForge era) where - toObject :: TracingVerbosity -> TPraosCannotForge era -> Object -toObject TracingVerbosity -_verb (TPraosCannotForgeKeyNotUsableYet KESPeriod -wallClockPeriod KESPeriod -keyStartPeriod) = +instance ToObject (TPraosCannotForge era) where + toObject :: TracingVerbosity -> TPraosCannotForge era -> Object +toObject TracingVerbosity +_verb (TPraosCannotForgeKeyNotUsableYet KESPeriod +wallClockPeriod KESPeriod +keyStartPeriod) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -225,17 +225,17 @@ "keyStart" Text -> KESPeriod -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KESPeriod -keyStartPeriod +keyStartPeriod , Text "wallClock" Text -> KESPeriod -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KESPeriod -wallClockPeriod +wallClockPeriod ] - toObject TracingVerbosity -_verb (TPraosCannotForgeWrongVRF Hash era (VerKeyVRF era) -genDlgVRFHash Hash era (VerKeyVRF era) -coreNodeVRFHash) = + toObject TracingVerbosity +_verb (TPraosCannotForgeWrongVRF Hash era (VerKeyVRF era) +genDlgVRFHash Hash era (VerKeyVRF era) +coreNodeVRFHash) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -249,26 +249,26 @@ "expected" Text -> Hash era (VerKeyVRF era) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Hash era (VerKeyVRF era) -genDlgVRFHash +genDlgVRFHash , Text "actual" Text -> Hash era (VerKeyVRF era) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Hash era (VerKeyVRF era) -coreNodeVRFHash +coreNodeVRFHash ] -deriving newtype instance ToJSON KESPeriod +deriving newtype instance ToJSON KESPeriod -instance ToObject HotKey.KESInfo where - toObject :: TracingVerbosity -> KESInfo -> Object -toObject TracingVerbosity -_verb HotKey.KESInfo { KESPeriod +instance ToObject HotKey.KESInfo where + toObject :: TracingVerbosity -> KESInfo -> Object +toObject TracingVerbosity +_verb HotKey.KESInfo { KESPeriod kesStartPeriod :: KESInfo -> KESPeriod kesStartPeriod :: KESPeriod -kesStartPeriod, KESPeriod +kesStartPeriod, KESPeriod kesEndPeriod :: KESInfo -> KESPeriod kesEndPeriod :: KESPeriod -kesEndPeriod, KESEvolution +kesEndPeriod, KESEvolution kesEvolution :: KESInfo -> KESEvolution kesEvolution :: KESEvolution kesEvolution } = @@ -285,25 +285,25 @@ "startPeriod" Text -> KESPeriod -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KESPeriod -kesStartPeriod +kesStartPeriod , Text "endPeriod" Text -> KESPeriod -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KESPeriod -kesEndPeriod +kesEndPeriod , Text "evolution" Text -> KESEvolution -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KESEvolution -kesEvolution +kesEvolution ] -instance ToObject HotKey.KESEvolutionError where - toObject :: TracingVerbosity -> KESEvolutionError -> Object -toObject TracingVerbosity -verb (HotKey.KESCouldNotEvolve KESInfo -kesInfo KESPeriod -targetPeriod) = +instance ToObject HotKey.KESEvolutionError where + toObject :: TracingVerbosity -> KESEvolutionError -> Object +toObject TracingVerbosity +verb (HotKey.KESCouldNotEvolve KESInfo +kesInfo KESPeriod +targetPeriod) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -319,18 +319,18 @@ .= TracingVerbosity -> KESInfo -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb KESInfo -kesInfo +verb KESInfo +kesInfo , Text "targetPeriod" Text -> KESPeriod -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KESPeriod -targetPeriod +targetPeriod ] - toObject TracingVerbosity -verb (HotKey.KESKeyAlreadyPoisoned KESInfo -kesInfo KESPeriod -targetPeriod) = + toObject TracingVerbosity +verb (HotKey.KESKeyAlreadyPoisoned KESInfo +kesInfo KESPeriod +targetPeriod) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject @@ -346,24 +346,24 @@ .= TracingVerbosity -> KESInfo -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb KESInfo -kesInfo +verb KESInfo +kesInfo , Text "targetPeriod" Text -> KESPeriod -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KESPeriod -targetPeriod +targetPeriod ] -instance ( ShelleyBasedEra era - , ToObject (PredicateFailure (UTXO era)) - , ToObject (PredicateFailure (UTXOW era)) - , ToObject (PredicateFailure (Core.EraRule "BBODY" era)) - ) => ToObject (ShelleyLedgerError era) where - toObject :: TracingVerbosity -> ShelleyLedgerError era -> Object -toObject TracingVerbosity -verb (BBodyError (BlockTransitionError [PredicateFailure (EraRule "BBODY" era)] -fs)) = +instance ( ShelleyBasedEra era + , ToObject (PredicateFailure (UTXO era)) + , ToObject (PredicateFailure (UTXOW era)) + , ToObject (PredicateFailure (Core.EraRule "BBODY" era)) + ) => ToObject (ShelleyLedgerError era) where + toObject :: TracingVerbosity -> ShelleyLedgerError era -> Object +toObject TracingVerbosity +verb (BBodyError (BlockTransitionError [PredicateFailure (EraRule "BBODY" era)] +fs)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -382,17 +382,17 @@ -> PredicateFailure (EraRule "BBODY" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) [PredicateFailure (EraRule "BBODY" era)] -fs +verb) [PredicateFailure (EraRule "BBODY" era)] +fs ] -instance ( ShelleyBasedEra era - , ToJSON (Ledger.PParamsDelta era) - ) => ToObject (ShelleyLedgerUpdate era) where - toObject :: TracingVerbosity -> ShelleyLedgerUpdate era -> Object -toObject TracingVerbosity -verb (ShelleyUpdatedProtocolUpdates [ProtocolUpdate era] -updates) = +instance ( ShelleyBasedEra era + , ToJSON (Ledger.PParamsDelta era) + ) => ToObject (ShelleyLedgerUpdate era) where + toObject :: TracingVerbosity -> ShelleyLedgerUpdate era -> Object +toObject TracingVerbosity +verb (ShelleyUpdatedProtocolUpdates [ProtocolUpdate era] +updates) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -409,18 +409,18 @@ map (TracingVerbosity -> ProtocolUpdate era -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) [ProtocolUpdate era] -updates +verb) [ProtocolUpdate era] +updates ] -instance ToJSON (Ledger.PParamsDelta era) - => ToObject (ProtocolUpdate era) where - toObject :: TracingVerbosity -> ProtocolUpdate era -> Object -toObject TracingVerbosity -verb ProtocolUpdate{UpdateProposal era +instance ToJSON (Ledger.PParamsDelta era) + => ToObject (ProtocolUpdate era) where + toObject :: TracingVerbosity -> ProtocolUpdate era -> Object +toObject TracingVerbosity +verb ProtocolUpdate{UpdateProposal era protocolUpdateProposal :: forall era. ProtocolUpdate era -> UpdateProposal era protocolUpdateProposal :: UpdateProposal era -protocolUpdateProposal, UpdateState (EraCrypto era) +protocolUpdateProposal, UpdateState (EraCrypto era) protocolUpdateState :: forall era. ProtocolUpdate era -> UpdateState (EraCrypto era) protocolUpdateState :: UpdateState (EraCrypto era) protocolUpdateState} = @@ -432,29 +432,29 @@ .= TracingVerbosity -> UpdateProposal era -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb UpdateProposal era -protocolUpdateProposal +verb UpdateProposal era +protocolUpdateProposal , Text "state" Text -> Object -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TracingVerbosity -> UpdateState (EraCrypto era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb UpdateState (EraCrypto era) -protocolUpdateState +verb UpdateState (EraCrypto era) +protocolUpdateState ] -instance ToJSON (Ledger.PParamsDelta era) - => ToObject (UpdateProposal era) where - toObject :: TracingVerbosity -> UpdateProposal era -> Object -toObject TracingVerbosity -_verb UpdateProposal{PParamsDelta era +instance ToJSON (Ledger.PParamsDelta era) + => ToObject (UpdateProposal era) where + toObject :: TracingVerbosity -> UpdateProposal era -> Object +toObject TracingVerbosity +_verb UpdateProposal{PParamsDelta era proposalParams :: forall era. UpdateProposal era -> PParamsDelta era proposalParams :: PParamsDelta era -proposalParams, Maybe ProtVer +proposalParams, Maybe ProtVer proposalVersion :: forall era. UpdateProposal era -> Maybe ProtVer proposalVersion :: Maybe ProtVer -proposalVersion, EpochNo +proposalVersion, EpochNo proposalEpoch :: forall era. UpdateProposal era -> EpochNo proposalEpoch :: EpochNo proposalEpoch} = @@ -464,26 +464,26 @@ "params" Text -> PParamsDelta era -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= PParamsDelta era -proposalParams +proposalParams , Text "version" Text -> Maybe ProtVer -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe ProtVer -proposalVersion +proposalVersion , Text "epoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -proposalEpoch +proposalEpoch ] -instance ToObject (UpdateState crypto) where - toObject :: TracingVerbosity -> UpdateState crypto -> Object -toObject TracingVerbosity -_verb UpdateState{[KeyHash 'Genesis crypto] +instance ToObject (UpdateState crypto) where + toObject :: TracingVerbosity -> UpdateState crypto -> Object +toObject TracingVerbosity +_verb UpdateState{[KeyHash 'Genesis crypto] proposalVotes :: forall c. UpdateState c -> [KeyHash 'Genesis c] proposalVotes :: [KeyHash 'Genesis crypto] -proposalVotes, Bool +proposalVotes, Bool proposalReachedQuorum :: forall c. UpdateState c -> Bool proposalReachedQuorum :: Bool proposalReachedQuorum} = @@ -493,19 +493,19 @@ "proposal" Text -> [KeyHash 'Genesis crypto] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [KeyHash 'Genesis crypto] -proposalVotes +proposalVotes , Text "reachedQuorum" Text -> Bool -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Bool -proposalReachedQuorum +proposalReachedQuorum ] -instance Core.Crypto crypto => ToObject (ChainTransitionError crypto) where - toObject :: TracingVerbosity -> ChainTransitionError crypto -> Object -toObject TracingVerbosity -verb (ChainTransitionError [PredicateFailure (PRTCL crypto)] -fs) = +instance Core.Crypto crypto => ToObject (ChainTransitionError crypto) where + toObject :: TracingVerbosity -> ChainTransitionError crypto -> Object +toObject TracingVerbosity +verb (ChainTransitionError [PredicateFailure (PRTCL crypto)] +fs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -523,22 +523,22 @@ map (TracingVerbosity -> PrtclPredicateFailure crypto -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb) [PredicateFailure (PRTCL crypto)] +verb) [PredicateFailure (PRTCL crypto)] [PrtclPredicateFailure crypto] -fs +fs ] -instance ( ShelleyBasedEra era - , ToObject (PredicateFailure (Core.EraRule "UTXOW" era)) - , ToObject (PredicateFailure (Core.EraRule "BBODY" era)) - , ToObject (PredicateFailure (Core.EraRule "TICK" era)) - , ToObject (PredicateFailure (Core.EraRule "TICKN" era)) - ) => ToObject (ChainPredicateFailure era) where - toObject :: TracingVerbosity -> ChainPredicateFailure era -> Object -toObject TracingVerbosity -_verb (HeaderSizeTooLargeCHAIN Natural -hdrSz Natural -maxHdrSz) = +instance ( ShelleyBasedEra era + , ToObject (PredicateFailure (Core.EraRule "UTXOW" era)) + , ToObject (PredicateFailure (Core.EraRule "BBODY" era)) + , ToObject (PredicateFailure (Core.EraRule "TICK" era)) + , ToObject (PredicateFailure (Core.EraRule "TICKN" era)) + ) => ToObject (ChainPredicateFailure era) where + toObject :: TracingVerbosity -> ChainPredicateFailure era -> Object +toObject TracingVerbosity +_verb (HeaderSizeTooLargeCHAIN Natural +hdrSz Natural +maxHdrSz) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -551,17 +551,17 @@ "headerSize" Text -> Natural -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -hdrSz +hdrSz , Text "maxHeaderSize" Text -> Natural -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -maxHdrSz +maxHdrSz ] - toObject TracingVerbosity -_verb (BlockSizeTooLargeCHAIN Natural -blkSz Natural -maxBlkSz) = + toObject TracingVerbosity +_verb (BlockSizeTooLargeCHAIN Natural +blkSz Natural +maxBlkSz) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -574,17 +574,17 @@ "blockSize" Text -> Natural -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -blkSz +blkSz , Text "maxBlockSize" Text -> Natural -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -maxBlkSz +maxBlkSz ] - toObject TracingVerbosity -_verb (ObsoleteNodeCHAIN Natural -currentPtcl Natural -supportedPtcl) = + toObject TracingVerbosity +_verb (ObsoleteNodeCHAIN Natural +currentPtcl Natural +supportedPtcl) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -598,70 +598,70 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -> Value String Text -explanation +explanation , Text "currentProtocol" Text -> Natural -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -currentPtcl +currentPtcl , Text "supportedProtocol" Text -> Natural -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -supportedPtcl ] +supportedPtcl ] where - explanation :: Text -explanation = Text + explanation :: Text +explanation = Text "A scheduled major protocol version change (hard fork) \ \has taken place on the chain, but this node does not \ \understand the new major protocol version. This node \ \must be upgraded before it can continue with the new \ \protocol version." - toObject TracingVerbosity -verb (BbodyFailure PredicateFailure (EraRule "BBODY" era) -f) = TracingVerbosity + toObject TracingVerbosity +verb (BbodyFailure PredicateFailure (EraRule "BBODY" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "BBODY" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "BBODY" era) -f - toObject TracingVerbosity -verb (TickFailure PredicateFailure (EraRule "TICK" era) -f) = TracingVerbosity -> PredicateFailure (EraRule "TICK" era) -> Object +verb PredicateFailure (EraRule "BBODY" era) +f + toObject TracingVerbosity +verb (TickFailure PredicateFailure (EraRule "TICK" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "TICK" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "TICK" era) -f - toObject TracingVerbosity -verb (TicknFailure PredicateFailure (EraRule "TICKN" era) -f) = TracingVerbosity +verb PredicateFailure (EraRule "TICK" era) +f + toObject TracingVerbosity +verb (TicknFailure PredicateFailure (EraRule "TICKN" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "TICKN" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "TICKN" era) -f - toObject TracingVerbosity -verb (PrtclFailure PredicateFailure (PRTCL (Crypto era)) -f) = TracingVerbosity -> PrtclPredicateFailure (Crypto era) -> Object +verb PredicateFailure (EraRule "TICKN" era) +f + toObject TracingVerbosity +verb (PrtclFailure PredicateFailure (PRTCL (Crypto era)) +f) = TracingVerbosity -> PrtclPredicateFailure (Crypto era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (PRTCL (Crypto era)) +verb PredicateFailure (PRTCL (Crypto era)) PrtclPredicateFailure (Crypto era) -f - toObject TracingVerbosity -verb (PrtclSeqFailure PrtlSeqFailure (Crypto era) -f) = TracingVerbosity -> PrtlSeqFailure (Crypto era) -> Object +f + toObject TracingVerbosity +verb (PrtclSeqFailure PrtlSeqFailure (Crypto era) +f) = TracingVerbosity -> PrtlSeqFailure (Crypto era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PrtlSeqFailure (Crypto era) -f +verb PrtlSeqFailure (Crypto era) +f -instance ToObject (PrtlSeqFailure crypto) where - toObject :: TracingVerbosity -> PrtlSeqFailure crypto -> Object -toObject TracingVerbosity -_verb (WrongSlotIntervalPrtclSeq (SlotNo Word64 -lastSlot) (SlotNo Word64 -currSlot)) = +instance ToObject (PrtlSeqFailure crypto) where + toObject :: TracingVerbosity -> PrtlSeqFailure crypto -> Object +toObject TracingVerbosity +_verb (WrongSlotIntervalPrtclSeq (SlotNo Word64 +lastSlot) (SlotNo Word64 +currSlot)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -674,17 +674,17 @@ "lastSlot" Text -> Word64 -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word64 -lastSlot +lastSlot , Text "currentSlot" Text -> Word64 -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word64 -currSlot +currSlot ] - toObject TracingVerbosity -_verb (WrongBlockNoPrtclSeq WithOrigin (LastAppliedBlock crypto) -lab BlockNo -currentBlockNo) = + toObject TracingVerbosity +_verb (WrongBlockNoPrtclSeq WithOrigin (LastAppliedBlock crypto) +lab BlockNo +currentBlockNo) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -699,7 +699,7 @@ .= WithOrigin (LastAppliedBlock crypto) -> Text forall crypto. WithOrigin (LastAppliedBlock crypto) -> Text showLastAppBlockNo WithOrigin (LastAppliedBlock crypto) -lab +lab , Text "currentBlockNo" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -714,12 +714,12 @@ forall a b. (a -> b) -> a -> b $ BlockNo -> Word64 unBlockNo BlockNo -currentBlockNo) +currentBlockNo) ] - toObject TracingVerbosity -_verb (WrongBlockSequencePrtclSeq PrevHash crypto -lastAppliedHash PrevHash crypto -currentHash) = + toObject TracingVerbosity +_verb (WrongBlockSequencePrtclSeq PrevHash crypto +lastAppliedHash PrevHash crypto +currentHash) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -735,7 +735,7 @@ String (PrevHash crypto -> Text forall a. Show a => a -> Text textShow PrevHash crypto -lastAppliedHash) +lastAppliedHash) , Text "currentBlockHash" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -743,20 +743,20 @@ String (PrevHash crypto -> Text forall a. Show a => a -> Text textShow PrevHash crypto -currentHash) +currentHash) ] -instance ( ShelleyBasedEra era - , ToObject (PredicateFailure (UTXO era)) - , ToObject (PredicateFailure (UTXOW era)) - , ToObject (PredicateFailure (Core.EraRule "LEDGER" era)) - , ToObject (PredicateFailure (Core.EraRule "LEDGERS" era)) - ) => ToObject (BbodyPredicateFailure era) where - toObject :: TracingVerbosity -> BbodyPredicateFailure era -> Object -toObject TracingVerbosity -_verb (WrongBlockBodySizeBBODY Int -actualBodySz Int -claimedBodySz) = +instance ( ShelleyBasedEra era + , ToObject (PredicateFailure (UTXO era)) + , ToObject (PredicateFailure (UTXOW era)) + , ToObject (PredicateFailure (Core.EraRule "LEDGER" era)) + , ToObject (PredicateFailure (Core.EraRule "LEDGERS" era)) + ) => ToObject (BbodyPredicateFailure era) where + toObject :: TracingVerbosity -> BbodyPredicateFailure era -> Object +toObject TracingVerbosity +_verb (WrongBlockBodySizeBBODY Int +actualBodySz Int +claimedBodySz) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -769,17 +769,17 @@ "actualBlockBodySize" Text -> Int -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Int -actualBodySz +actualBodySz , Text "claimedBlockBodySize" Text -> Int -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Int -claimedBodySz +claimedBodySz ] - toObject TracingVerbosity -_verb (InvalidBodyHashBBODY Hash (Crypto era) EraIndependentBlockBody -actualHash Hash (Crypto era) EraIndependentBlockBody -claimedHash) = + toObject TracingVerbosity +_verb (InvalidBodyHashBBODY Hash (Crypto era) EraIndependentBlockBody +actualHash Hash (Crypto era) EraIndependentBlockBody +claimedHash) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -794,81 +794,81 @@ .= Hash (Crypto era) EraIndependentBlockBody -> Text forall a. Show a => a -> Text textShow Hash (Crypto era) EraIndependentBlockBody -actualHash +actualHash , Text "claimedBodyHash" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Hash (Crypto era) EraIndependentBlockBody -> Text forall a. Show a => a -> Text textShow Hash (Crypto era) EraIndependentBlockBody -claimedHash +claimedHash ] - toObject TracingVerbosity -verb (LedgersFailure PredicateFailure (EraRule "LEDGERS" era) -f) = TracingVerbosity + toObject TracingVerbosity +verb (LedgersFailure PredicateFailure (EraRule "LEDGERS" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "LEDGERS" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "LEDGERS" era) -f +verb PredicateFailure (EraRule "LEDGERS" era) +f -instance ( ShelleyBasedEra era - , ToObject (PredicateFailure (UTXO era)) - , ToObject (PredicateFailure (UTXOW era)) - , ToObject (PredicateFailure (Core.EraRule "LEDGER" era)) - ) => ToObject (LedgersPredicateFailure era) where - toObject :: TracingVerbosity -> LedgersPredicateFailure era -> Object -toObject TracingVerbosity -verb (LedgerFailure PredicateFailure (EraRule "LEDGER" era) -f) = TracingVerbosity -> LedgerPredicateFailure era -> Object +instance ( ShelleyBasedEra era + , ToObject (PredicateFailure (UTXO era)) + , ToObject (PredicateFailure (UTXOW era)) + , ToObject (PredicateFailure (Core.EraRule "LEDGER" era)) + ) => ToObject (LedgersPredicateFailure era) where + toObject :: TracingVerbosity -> LedgersPredicateFailure era -> Object +toObject TracingVerbosity +verb (LedgerFailure PredicateFailure (EraRule "LEDGER" era) +f) = TracingVerbosity -> LedgerPredicateFailure era -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "LEDGER" era) +verb PredicateFailure (EraRule "LEDGER" era) LedgerPredicateFailure era -f +f -instance ( ShelleyBasedEra era - , ToObject (PredicateFailure (UTXO era)) - , ToObject (PredicateFailure (UTXOW era)) - , ToObject (PredicateFailure (Core.EraRule "DELEGS" era)) - , ToObject (PredicateFailure (Core.EraRule "UTXOW" era)) - ) => ToObject (LedgerPredicateFailure era) where - toObject :: TracingVerbosity -> LedgerPredicateFailure era -> Object -toObject TracingVerbosity -verb (UtxowFailure PredicateFailure (EraRule "UTXOW" era) -f) = TracingVerbosity +instance ( ShelleyBasedEra era + , ToObject (PredicateFailure (UTXO era)) + , ToObject (PredicateFailure (UTXOW era)) + , ToObject (PredicateFailure (Core.EraRule "DELEGS" era)) + , ToObject (PredicateFailure (Core.EraRule "UTXOW" era)) + ) => ToObject (LedgerPredicateFailure era) where + toObject :: TracingVerbosity -> LedgerPredicateFailure era -> Object +toObject TracingVerbosity +verb (UtxowFailure PredicateFailure (EraRule "UTXOW" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "UTXOW" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "UTXOW" era) -f - toObject TracingVerbosity -verb (DelegsFailure PredicateFailure (EraRule "DELEGS" era) -f) = TracingVerbosity +verb PredicateFailure (EraRule "UTXOW" era) +f + toObject TracingVerbosity +verb (DelegsFailure PredicateFailure (EraRule "DELEGS" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "DELEGS" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "DELEGS" era) -f +verb PredicateFailure (EraRule "DELEGS" era) +f -instance ToObject (AlonzoPredFail (Alonzo.AlonzoEra StandardCrypto)) where - toObject :: TracingVerbosity +instance ToObject (AlonzoPredFail (Alonzo.AlonzoEra StandardCrypto)) where + toObject :: TracingVerbosity -> AlonzoPredFail (AlonzoEra StandardCrypto) -> Object -toObject TracingVerbosity -v (WrappedShelleyEraFailure UtxowPredicateFailure (AlonzoEra StandardCrypto) -utxoPredFail) = +toObject TracingVerbosity +v (WrappedShelleyEraFailure UtxowPredicateFailure (AlonzoEra StandardCrypto) +utxoPredFail) = TracingVerbosity -> UtxowPredicateFailure (AlonzoEra StandardCrypto) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -v UtxowPredicateFailure (AlonzoEra StandardCrypto) -utxoPredFail +v UtxowPredicateFailure (AlonzoEra StandardCrypto) +utxoPredFail toObject TracingVerbosity -_ (UnRedeemableScripts [(ScriptPurpose (Crypto (AlonzoEra StandardCrypto)), +_ (UnRedeemableScripts [(ScriptPurpose (Crypto (AlonzoEra StandardCrypto)), ScriptHash (Crypto (AlonzoEra StandardCrypto)))] -scripts) = +scripts) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -885,12 +885,12 @@ renderUnredeemableScripts [(ScriptPurpose StandardCrypto, ScriptHash StandardCrypto)] [(ScriptPurpose (Crypto (AlonzoEra StandardCrypto)), ScriptHash (Crypto (AlonzoEra StandardCrypto)))] -scripts +scripts ] toObject TracingVerbosity -_ (DataHashSetsDontAgree Set (DataHash (Crypto (AlonzoEra StandardCrypto))) -fromTx Set (DataHash (Crypto (AlonzoEra StandardCrypto))) -fromUtxo) = +_ (DataHashSetsDontAgree Set (DataHash (Crypto (AlonzoEra StandardCrypto))) +fromTx Set (DataHash (Crypto (AlonzoEra StandardCrypto))) +fromUtxo) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -923,7 +923,7 @@ forall a. Set a -> [a] Set.toList Set (SafeHash StandardCrypto EraIndependentData) Set (DataHash (Crypto (AlonzoEra StandardCrypto))) -fromTx) +fromTx) , Text "fromUtxo" Text -> [Text] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -948,12 +948,12 @@ forall a. Set a -> [a] Set.toList Set (SafeHash StandardCrypto EraIndependentData) Set (DataHash (Crypto (AlonzoEra StandardCrypto))) -fromUtxo) +fromUtxo) ] toObject TracingVerbosity -_ (PPViewHashesDontMatch StrictMaybe (WitnessPPDataHash (Crypto (AlonzoEra StandardCrypto))) -ppHashInTxBody StrictMaybe (WitnessPPDataHash (Crypto (AlonzoEra StandardCrypto))) -ppHashFromPParams) = +_ (PPViewHashesDontMatch StrictMaybe (WitnessPPDataHash (Crypto (AlonzoEra StandardCrypto))) +ppHashInTxBody StrictMaybe (WitnessPPDataHash (Crypto (AlonzoEra StandardCrypto))) +ppHashFromPParams) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -971,7 +971,7 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe (WitnessPPDataHash StandardCrypto) StrictMaybe (WitnessPPDataHash (Crypto (AlonzoEra StandardCrypto))) -ppHashInTxBody) +ppHashInTxBody) , Text "fromPParams" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -981,11 +981,11 @@ forall a. StrictMaybe a -> Maybe a strictMaybeToMaybe StrictMaybe (WitnessPPDataHash StandardCrypto) StrictMaybe (WitnessPPDataHash (Crypto (AlonzoEra StandardCrypto))) -ppHashFromPParams) +ppHashFromPParams) ] toObject TracingVerbosity -_ (MissingRequiredSigners Set (KeyHash 'Witness (Crypto (AlonzoEra StandardCrypto))) -missingKeyWitnesses) = +_ (MissingRequiredSigners Set (KeyHash 'Witness (Crypto (AlonzoEra StandardCrypto))) +missingKeyWitnesses) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1002,11 +1002,11 @@ forall a. Set a -> [a] Set.toList Set (KeyHash 'Witness StandardCrypto) Set (KeyHash 'Witness (Crypto (AlonzoEra StandardCrypto))) -missingKeyWitnesses +missingKeyWitnesses ] toObject TracingVerbosity -_ (UnspendableUTxONoDatumHash Set (TxIn (Crypto (AlonzoEra StandardCrypto))) -txins) = +_ (UnspendableUTxONoDatumHash Set (TxIn (Crypto (AlonzoEra StandardCrypto))) +txins) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1022,13 +1022,13 @@ forall a. Set a -> [a] Set.toList Set (TxIn StandardCrypto) Set (TxIn (Crypto (AlonzoEra StandardCrypto))) -txins +txins ] renderWitnessPPDataHash :: Maybe (Alonzo.WitnessPPDataHash StandardCrypto) -> Aeson.Value renderWitnessPPDataHash :: Maybe (WitnessPPDataHash StandardCrypto) -> Value -renderWitnessPPDataHash (Just WitnessPPDataHash StandardCrypto -witPPDataHash) = +renderWitnessPPDataHash (Just WitnessPPDataHash StandardCrypto +witPPDataHash) = Text -> Value Aeson.String (Text -> Value) -> (Hash Blake2b_256 EraIndependentWitnessPPData -> Text) @@ -1046,7 +1046,7 @@ -> Hash (HASH StandardCrypto) EraIndependentWitnessPPData forall crypto i. SafeHash crypto i -> Hash (HASH crypto) i SafeHash.extractHash WitnessPPDataHash StandardCrypto -witPPDataHash +witPPDataHash renderWitnessPPDataHash Maybe (WitnessPPDataHash StandardCrypto) Nothing = Value Aeson.Null @@ -1068,8 +1068,8 @@ renderUnredeemableScripts :: [(Alonzo.ScriptPurpose StandardCrypto, ScriptHash StandardCrypto)] -> Aeson.Value renderUnredeemableScripts :: [(ScriptPurpose StandardCrypto, ScriptHash StandardCrypto)] -> Value -renderUnredeemableScripts [(ScriptPurpose StandardCrypto, ScriptHash StandardCrypto)] -scripts = [(Text, Value)] -> Value +renderUnredeemableScripts [(ScriptPurpose StandardCrypto, ScriptHash StandardCrypto)] +scripts = [(Text, Value)] -> Value Aeson.object ([(Text, Value)] -> Value) -> [(Text, Value)] -> Value forall a b. (a -> b) -> a -> b $ ((ScriptPurpose StandardCrypto, ScriptHash StandardCrypto) @@ -1079,26 +1079,26 @@ forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b map (ScriptPurpose StandardCrypto, ScriptHash StandardCrypto) -> (Text, Value) -renderTuple [(ScriptPurpose StandardCrypto, ScriptHash StandardCrypto)] -scripts +renderTuple [(ScriptPurpose StandardCrypto, ScriptHash StandardCrypto)] +scripts where - renderTuple :: (Alonzo.ScriptPurpose StandardCrypto, ScriptHash StandardCrypto) -> Aeson.Pair - renderTuple :: (ScriptPurpose StandardCrypto, ScriptHash StandardCrypto) + renderTuple :: (Alonzo.ScriptPurpose StandardCrypto, ScriptHash StandardCrypto) -> Aeson.Pair + renderTuple :: (ScriptPurpose StandardCrypto, ScriptHash StandardCrypto) -> (Text, Value) -renderTuple (ScriptPurpose StandardCrypto -scriptPurpose, ScriptHash StandardCrypto -sHash) = ScriptHash StandardCrypto -> Text +renderTuple (ScriptPurpose StandardCrypto +scriptPurpose, ScriptHash StandardCrypto +sHash) = ScriptHash StandardCrypto -> Text renderScriptHash ScriptHash StandardCrypto -sHash Text -> Value -> (Text, Value) +sHash Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ScriptPurpose StandardCrypto -> Value renderScriptPurpose ScriptPurpose StandardCrypto -scriptPurpose +scriptPurpose renderScriptPurpose :: Alonzo.ScriptPurpose StandardCrypto -> Aeson.Value renderScriptPurpose :: ScriptPurpose StandardCrypto -> Value -renderScriptPurpose (Alonzo.Minting PolicyID StandardCrypto -pid) = +renderScriptPurpose (Alonzo.Minting PolicyID StandardCrypto +pid) = [(Text, Value)] -> Value Aeson.object [ Text "minting" Text -> Value -> (Text, Value) @@ -1106,18 +1106,18 @@ .= PolicyID StandardCrypto -> Value forall a. ToJSON a => a -> Value toJSON PolicyID StandardCrypto -pid] -renderScriptPurpose (Alonzo.Spending TxIn StandardCrypto -txin) = +pid] +renderScriptPurpose (Alonzo.Spending TxIn StandardCrypto +txin) = [(Text, Value)] -> Value Aeson.object [ Text "spending" Text -> TxIn -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= TxIn StandardCrypto -> TxIn Api.fromShelleyTxIn TxIn StandardCrypto -txin] -renderScriptPurpose (Alonzo.Rewarding RewardAcnt StandardCrypto -rwdAcct) = +txin] +renderScriptPurpose (Alonzo.Rewarding RewardAcnt StandardCrypto +rwdAcct) = [(Text, Value)] -> Value Aeson.object [ Text "rewarding" Text -> Value -> (Text, Value) @@ -1129,9 +1129,9 @@ forall a b. (a -> b) -> a -> b $ RewardAcnt StandardCrypto -> StakeAddress Api.fromShelleyStakeAddr RewardAcnt StandardCrypto -rwdAcct)] -renderScriptPurpose (Alonzo.Certifying DCert StandardCrypto -cert) = +rwdAcct)] +renderScriptPurpose (Alonzo.Certifying DCert StandardCrypto +cert) = [(Text, Value)] -> Value Aeson.object [ Text "certifying" Text -> Value -> (Text, Value) @@ -1145,16 +1145,16 @@ forall a b. (a -> b) -> a -> b $ DCert StandardCrypto -> Certificate Api.fromShelleyCertificate DCert StandardCrypto -cert)] +cert)] -instance ( ShelleyBasedEra era - , ToObject (PredicateFailure (UTXO era)) - , ToObject (PredicateFailure (Core.EraRule "UTXO" era)) - ) => ToObject (UtxowPredicateFailure era) where - toObject :: TracingVerbosity -> UtxowPredicateFailure era -> Object -toObject TracingVerbosity -_verb (InvalidWitnessesUTXOW [VKey 'Witness (Crypto era)] -wits') = +instance ( ShelleyBasedEra era + , ToObject (PredicateFailure (UTXO era)) + , ToObject (PredicateFailure (Core.EraRule "UTXO" era)) + ) => ToObject (UtxowPredicateFailure era) where + toObject :: TracingVerbosity -> UtxowPredicateFailure era -> Object +toObject TracingVerbosity +_verb (InvalidWitnessesUTXOW [VKey 'Witness (Crypto era)] +wits') = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1172,11 +1172,11 @@ map VKey 'Witness (Crypto era) -> Text forall a. Show a => a -> Text textShow [VKey 'Witness (Crypto era)] -wits' +wits' ] - toObject TracingVerbosity -_verb (MissingVKeyWitnessesUTXOW (WitHashes Set (KeyHash 'Witness (Crypto era)) -wits')) = + toObject TracingVerbosity +_verb (MissingVKeyWitnessesUTXOW (WitHashes Set (KeyHash 'Witness (Crypto era)) +wits')) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1189,11 +1189,11 @@ "missingWitnesses" Text -> Set (KeyHash 'Witness (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (KeyHash 'Witness (Crypto era)) -wits' +wits' ] - toObject TracingVerbosity -_verb (MissingScriptWitnessesUTXOW Set (ScriptHash (Crypto era)) -missingScripts) = + toObject TracingVerbosity +_verb (MissingScriptWitnessesUTXOW Set (ScriptHash (Crypto era)) +missingScripts) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1206,11 +1206,11 @@ "missingScripts" Text -> Set (ScriptHash (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (ScriptHash (Crypto era)) -missingScripts +missingScripts ] - toObject TracingVerbosity -_verb (ScriptWitnessNotValidatingUTXOW Set (ScriptHash (Crypto era)) -failedScripts) = + toObject TracingVerbosity +_verb (ScriptWitnessNotValidatingUTXOW Set (ScriptHash (Crypto era)) +failedScripts) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1223,18 +1223,18 @@ "failedScripts" Text -> Set (ScriptHash (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (ScriptHash (Crypto era)) -failedScripts +failedScripts ] - toObject TracingVerbosity -verb (UtxoFailure PredicateFailure (EraRule "UTXO" era) -f) = TracingVerbosity -> PredicateFailure (EraRule "UTXO" era) -> Object + toObject TracingVerbosity +verb (UtxoFailure PredicateFailure (EraRule "UTXO" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "UTXO" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "UTXO" era) -f - toObject TracingVerbosity -_verb (MIRInsufficientGenesisSigsUTXOW Set (KeyHash 'Witness (Crypto era)) -genesisSigs) = +verb PredicateFailure (EraRule "UTXO" era) +f + toObject TracingVerbosity +_verb (MIRInsufficientGenesisSigsUTXOW Set (KeyHash 'Witness (Crypto era)) +genesisSigs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1247,11 +1247,11 @@ "genesisSigs" Text -> Set (KeyHash 'Witness (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (KeyHash 'Witness (Crypto era)) -genesisSigs +genesisSigs ] - toObject TracingVerbosity -_verb (MissingTxBodyMetadataHash AuxiliaryDataHash (Crypto era) -metadataHash) = + toObject TracingVerbosity +_verb (MissingTxBodyMetadataHash AuxiliaryDataHash (Crypto era) +metadataHash) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1264,11 +1264,11 @@ "metadataHash" Text -> AuxiliaryDataHash (Crypto era) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AuxiliaryDataHash (Crypto era) -metadataHash +metadataHash ] - toObject TracingVerbosity -_verb (MissingTxMetadata AuxiliaryDataHash (Crypto era) -txBodyMetadataHash) = + toObject TracingVerbosity +_verb (MissingTxMetadata AuxiliaryDataHash (Crypto era) +txBodyMetadataHash) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1281,12 +1281,12 @@ "txBodyMetadataHash" Text -> AuxiliaryDataHash (Crypto era) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AuxiliaryDataHash (Crypto era) -txBodyMetadataHash +txBodyMetadataHash ] - toObject TracingVerbosity -_verb (ConflictingMetadataHash AuxiliaryDataHash (Crypto era) -txBodyMetadataHash AuxiliaryDataHash (Crypto era) -fullMetadataHash) = + toObject TracingVerbosity +_verb (ConflictingMetadataHash AuxiliaryDataHash (Crypto era) +txBodyMetadataHash AuxiliaryDataHash (Crypto era) +fullMetadataHash) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1299,15 +1299,15 @@ "txBodyMetadataHash" Text -> AuxiliaryDataHash (Crypto era) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AuxiliaryDataHash (Crypto era) -txBodyMetadataHash +txBodyMetadataHash , Text "fullMetadataHash" Text -> AuxiliaryDataHash (Crypto era) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= AuxiliaryDataHash (Crypto era) -fullMetadataHash +fullMetadataHash ] - toObject TracingVerbosity -_verb UtxowPredicateFailure era + toObject TracingVerbosity +_verb UtxowPredicateFailure era InvalidMetadata = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -1319,16 +1319,16 @@ "InvalidMetadata" ] -instance ( ShelleyBasedEra era - , ToJSON (Core.Value era) - , ToJSON (Core.TxOut era) - , ToObject (PredicateFailure (Core.EraRule "PPUP" era)) +instance ( ShelleyBasedEra era + , ToJSON (Core.Value era) + , ToJSON (Core.TxOut era) + , ToObject (PredicateFailure (Core.EraRule "PPUP" era)) ) - => ToObject (UtxoPredicateFailure era) where - toObject :: TracingVerbosity -> UtxoPredicateFailure era -> Object -toObject TracingVerbosity -_verb (BadInputsUTxO Set (TxIn (Crypto era)) -badInputs) = + => ToObject (UtxoPredicateFailure era) where + toObject :: TracingVerbosity -> UtxoPredicateFailure era -> Object +toObject TracingVerbosity +_verb (BadInputsUTxO Set (TxIn (Crypto era)) +badInputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1341,19 +1341,19 @@ "badInputs" Text -> Set (TxIn (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (TxIn (Crypto era)) -badInputs +badInputs , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (TxIn (Crypto era)) -> Value forall era. Set (TxIn era) -> Value renderBadInputsUTxOErr Set (TxIn (Crypto era)) -badInputs +badInputs ] - toObject TracingVerbosity -_verb (ExpiredUTxO SlotNo -ttl SlotNo -slot) = + toObject TracingVerbosity +_verb (ExpiredUTxO SlotNo +ttl SlotNo +slot) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1366,16 +1366,16 @@ "ttl" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -ttl +ttl , Text "slot" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot ] - toObject TracingVerbosity -_verb (MaxTxSizeUTxO Integer -txsize Integer -maxtxsize) = +slot ] + toObject TracingVerbosity +_verb (MaxTxSizeUTxO Integer +txsize Integer +maxtxsize) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1388,16 +1388,16 @@ "size" Text -> Integer -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -txsize +txsize , Text "maxSize" Text -> Integer -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -maxtxsize ] +maxtxsize ] -- TODO: Add the minimum allowed UTxO value to OutputTooSmallUTxO - toObject TracingVerbosity -_verb (OutputTooSmallUTxO [TxOut era] -badOutputs) = + toObject TracingVerbosity +_verb (OutputTooSmallUTxO [TxOut era] +badOutputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1410,7 +1410,7 @@ "outputs" Text -> [TxOut era] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [TxOut era] -badOutputs +badOutputs , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1419,9 +1419,9 @@ "The output is smaller than the allow minimum \ \UTxO value defined in the protocol parameters" ] - toObject TracingVerbosity -_verb (OutputBootAddrAttrsTooBig [TxOut era] -badOutputs) = + toObject TracingVerbosity +_verb (OutputBootAddrAttrsTooBig [TxOut era] +badOutputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1434,7 +1434,7 @@ "outputs" Text -> [TxOut era] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [TxOut era] -badOutputs +badOutputs , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1442,8 +1442,8 @@ String Text "The Byron address attributes are too big" ] - toObject TracingVerbosity -_verb UtxoPredicateFailure era + toObject TracingVerbosity +_verb UtxoPredicateFailure era InputSetEmptyUTxO = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -1453,10 +1453,10 @@ .= Text -> Value String Text "InputSetEmptyUTxO" ] - toObject TracingVerbosity -_verb (FeeTooSmallUTxO Coin -minfee Coin -txfee) = + toObject TracingVerbosity +_verb (FeeTooSmallUTxO Coin +minfee Coin +txfee) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1469,16 +1469,16 @@ "minimum" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -minfee +minfee , Text "fee" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -txfee ] - toObject TracingVerbosity -_verb (ValueNotConservedUTxO Value era -consumed Value era -produced) = +txfee ] + toObject TracingVerbosity +_verb (ValueNotConservedUTxO Value era +consumed Value era +produced) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1491,33 +1491,33 @@ "consumed" Text -> Value era -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value era -consumed +consumed , Text "produced" Text -> Value era -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value era -produced +produced , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value era -> Value era -> Value forall val. Show val => val -> val -> Value renderValueNotConservedErr Value era -consumed Value era -produced +consumed Value era +produced ] - toObject TracingVerbosity -verb (UpdateFailure PredicateFailure (EraRule "PPUP" era) -f) = TracingVerbosity -> PredicateFailure (EraRule "PPUP" era) -> Object + toObject TracingVerbosity +verb (UpdateFailure PredicateFailure (EraRule "PPUP" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "PPUP" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "PPUP" era) -f +verb PredicateFailure (EraRule "PPUP" era) +f - toObject TracingVerbosity -_verb (WrongNetwork Network -network Set (Addr (Crypto era)) -addrs) = + toObject TracingVerbosity +_verb (WrongNetwork Network +network Set (Addr (Crypto era)) +addrs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1530,17 +1530,17 @@ "network" Text -> Network -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Network -network +network , Text "addrs" Text -> Set (Addr (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (Addr (Crypto era)) -addrs +addrs ] - toObject TracingVerbosity -_verb (WrongNetworkWithdrawal Network -network Set (RewardAcnt (Crypto era)) -addrs) = + toObject TracingVerbosity +_verb (WrongNetworkWithdrawal Network +network Set (RewardAcnt (Crypto era)) +addrs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1553,18 +1553,18 @@ "network" Text -> Network -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Network -network +network , Text "addrs" Text -> Set (RewardAcnt (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (RewardAcnt (Crypto era)) -addrs +addrs ] -instance ToJSON MA.ValidityInterval where - toJSON :: ValidityInterval -> Value -toJSON ValidityInterval -vi = +instance ToJSON MA.ValidityInterval where + toJSON :: ValidityInterval -> Value +toJSON ValidityInterval +vi = [(Text, Value)] -> Value Aeson.object ([(Text, Value)] -> Value) -> [(Text, Value)] -> Value forall a b. (a -> b) -> a -> b @@ -1573,41 +1573,41 @@ "invalidBefore" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -x | SlotNo -x <- StrictMaybe SlotNo -> [SlotNo] +x | SlotNo +x <- StrictMaybe SlotNo -> [SlotNo] forall a. StrictMaybe a -> [a] -mbfield (ValidityInterval -> StrictMaybe SlotNo +mbfield (ValidityInterval -> StrictMaybe SlotNo MA.invalidBefore ValidityInterval -vi) ] +vi) ] [(Text, Value)] -> [(Text, Value)] -> [(Text, Value)] forall a. [a] -> [a] -> [a] ++ [ Text "invalidHereafter" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -x | SlotNo -x <- StrictMaybe SlotNo -> [SlotNo] +x | SlotNo +x <- StrictMaybe SlotNo -> [SlotNo] forall a. StrictMaybe a -> [a] -mbfield (ValidityInterval -> StrictMaybe SlotNo +mbfield (ValidityInterval -> StrictMaybe SlotNo MA.invalidHereafter ValidityInterval -vi) ] +vi) ] where - mbfield :: StrictMaybe a -> [a] -mbfield StrictMaybe a + mbfield :: StrictMaybe a -> [a] +mbfield StrictMaybe a SNothing = [] - mbfield (SJust a -x) = [a -x] + mbfield (SJust a +x) = [a +x] -instance ( ShelleyBasedEra era - , ToJSON (Core.Value era) - , ToJSON (Core.TxOut era) - , ToObject (PredicateFailure (Core.EraRule "PPUP" era)) - ) => ToObject (MA.UtxoPredicateFailure era) where - toObject :: TracingVerbosity -> UtxoPredicateFailure era -> Object -toObject TracingVerbosity -_verb (MA.BadInputsUTxO Set (TxIn (Crypto era)) -badInputs) = +instance ( ShelleyBasedEra era + , ToJSON (Core.Value era) + , ToJSON (Core.TxOut era) + , ToObject (PredicateFailure (Core.EraRule "PPUP" era)) + ) => ToObject (MA.UtxoPredicateFailure era) where + toObject :: TracingVerbosity -> UtxoPredicateFailure era -> Object +toObject TracingVerbosity +_verb (MA.BadInputsUTxO Set (TxIn (Crypto era)) +badInputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1620,19 +1620,19 @@ "badInputs" Text -> Set (TxIn (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (TxIn (Crypto era)) -badInputs +badInputs , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (TxIn (Crypto era)) -> Value forall era. Set (TxIn era) -> Value renderBadInputsUTxOErr Set (TxIn (Crypto era)) -badInputs +badInputs ] - toObject TracingVerbosity -_verb (MA.OutsideValidityIntervalUTxO ValidityInterval -validityInterval SlotNo -slot) = + toObject TracingVerbosity +_verb (MA.OutsideValidityIntervalUTxO ValidityInterval +validityInterval SlotNo +slot) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1645,16 +1645,16 @@ "validityInterval" Text -> ValidityInterval -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ValidityInterval -validityInterval +validityInterval , Text "slot" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot ] - toObject TracingVerbosity -_verb (MA.MaxTxSizeUTxO Integer -txsize Integer -maxtxsize) = +slot ] + toObject TracingVerbosity +_verb (MA.MaxTxSizeUTxO Integer +txsize Integer +maxtxsize) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1667,14 +1667,14 @@ "size" Text -> Integer -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -txsize +txsize , Text "maxSize" Text -> Integer -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -maxtxsize ] - toObject TracingVerbosity -_verb UtxoPredicateFailure era +maxtxsize ] + toObject TracingVerbosity +_verb UtxoPredicateFailure era MA.InputSetEmptyUTxO = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -1684,10 +1684,10 @@ .= Text -> Value String Text "InputSetEmptyUTxO" ] - toObject TracingVerbosity -_verb (MA.FeeTooSmallUTxO Coin -minfee Coin -txfee) = + toObject TracingVerbosity +_verb (MA.FeeTooSmallUTxO Coin +minfee Coin +txfee) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1700,16 +1700,16 @@ "minimum" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -minfee +minfee , Text "fee" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -txfee ] - toObject TracingVerbosity -_verb (MA.ValueNotConservedUTxO Value era -consumed Value era -produced) = +txfee ] + toObject TracingVerbosity +_verb (MA.ValueNotConservedUTxO Value era +consumed Value era +produced) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1722,25 +1722,25 @@ "consumed" Text -> Value era -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value era -consumed +consumed , Text "produced" Text -> Value era -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value era -produced +produced , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value era -> Value era -> Value forall val. Show val => val -> val -> Value renderValueNotConservedErr Value era -consumed Value era -produced +consumed Value era +produced ] - toObject TracingVerbosity -_verb (MA.WrongNetwork Network -network Set (Addr (Crypto era)) -addrs) = + toObject TracingVerbosity +_verb (MA.WrongNetwork Network +network Set (Addr (Crypto era)) +addrs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1753,17 +1753,17 @@ "network" Text -> Network -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Network -network +network , Text "addrs" Text -> Set (Addr (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (Addr (Crypto era)) -addrs +addrs ] - toObject TracingVerbosity -_verb (MA.WrongNetworkWithdrawal Network -network Set (RewardAcnt (Crypto era)) -addrs) = + toObject TracingVerbosity +_verb (MA.WrongNetworkWithdrawal Network +network Set (RewardAcnt (Crypto era)) +addrs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1776,17 +1776,17 @@ "network" Text -> Network -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Network -network +network , Text "addrs" Text -> Set (RewardAcnt (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (RewardAcnt (Crypto era)) -addrs +addrs ] -- TODO: Add the minimum allowed UTxO value to OutputTooSmallUTxO - toObject TracingVerbosity -_verb (MA.OutputTooSmallUTxO [TxOut era] -badOutputs) = + toObject TracingVerbosity +_verb (MA.OutputTooSmallUTxO [TxOut era] +badOutputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1799,7 +1799,7 @@ "outputs" Text -> [TxOut era] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [TxOut era] -badOutputs +badOutputs , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1808,16 +1808,16 @@ "The output is smaller than the allow minimum \ \UTxO value defined in the protocol parameters" ] - toObject TracingVerbosity -verb (MA.UpdateFailure PredicateFailure (EraRule "PPUP" era) -f) = TracingVerbosity -> PredicateFailure (EraRule "PPUP" era) -> Object + toObject TracingVerbosity +verb (MA.UpdateFailure PredicateFailure (EraRule "PPUP" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "PPUP" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "PPUP" era) -f - toObject TracingVerbosity -_verb (MA.OutputBootAddrAttrsTooBig [TxOut era] -badOutputs) = +verb PredicateFailure (EraRule "PPUP" era) +f + toObject TracingVerbosity +_verb (MA.OutputBootAddrAttrsTooBig [TxOut era] +badOutputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1830,7 +1830,7 @@ "outputs" Text -> [TxOut era] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [TxOut era] -badOutputs +badOutputs , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1838,8 +1838,8 @@ String Text "The Byron address attributes are too big" ] - toObject TracingVerbosity -_verb UtxoPredicateFailure era + toObject TracingVerbosity +_verb UtxoPredicateFailure era MA.TriesToForgeADA = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -1849,9 +1849,9 @@ .= Text -> Value String Text "TriesToForgeADA" ] - toObject TracingVerbosity -_verb (MA.OutputTooBigUTxO [TxOut era] -badOutputs) = + toObject TracingVerbosity +_verb (MA.OutputTooBigUTxO [TxOut era] +badOutputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1864,7 +1864,7 @@ "outputs" Text -> [TxOut era] -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [TxOut era] -badOutputs +badOutputs , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1873,14 +1873,14 @@ "Too many asset ids in the tx output" ] -renderBadInputsUTxOErr :: Set (TxIn era) -> Aeson.Value +renderBadInputsUTxOErr :: Set (TxIn era) -> Aeson.Value renderBadInputsUTxOErr :: Set (TxIn era) -> Value -renderBadInputsUTxOErr Set (TxIn era) -txIns +renderBadInputsUTxOErr Set (TxIn era) +txIns | Set (TxIn era) -> Bool forall a. Set a -> Bool Set.null Set (TxIn era) -txIns = Text -> Value +txIns = Text -> Value String Text "The transaction contains no inputs." | Bool @@ -1888,11 +1888,11 @@ String Text "The transaction contains inputs that do not exist in the UTxO set." -renderValueNotConservedErr :: Show val => val -> val -> Aeson.Value +renderValueNotConservedErr :: Show val => val -> val -> Aeson.Value renderValueNotConservedErr :: val -> val -> Value -renderValueNotConservedErr val -consumed val -produced = Text -> Value +renderValueNotConservedErr val +consumed val +produced = Text -> Value String (Text -> Value) -> Text -> Value forall a b. (a -> b) -> a -> b $ @@ -1902,7 +1902,7 @@ <> val -> Text forall a b. (Show a, ConvertText String b) => a -> b show val -consumed Text -> Text -> Text +consumed Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " but produced " Text -> Text -> Text @@ -1910,14 +1910,14 @@ <> val -> Text forall a b. (Show a, ConvertText String b) => a -> b show val -produced +produced -instance ToObject (PpupPredicateFailure era) where - toObject :: TracingVerbosity -> PpupPredicateFailure era -> Object -toObject TracingVerbosity -_verb (NonGenesisUpdatePPUP Set (KeyHash 'Genesis (Crypto era)) -proposalKeys Set (KeyHash 'Genesis (Crypto era)) -genesisKeys) = +instance ToObject (PpupPredicateFailure era) where + toObject :: TracingVerbosity -> PpupPredicateFailure era -> Object +toObject TracingVerbosity +_verb (NonGenesisUpdatePPUP Set (KeyHash 'Genesis (Crypto era)) +proposalKeys Set (KeyHash 'Genesis (Crypto era)) +genesisKeys) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1930,17 +1930,17 @@ "keys" Text -> Set (KeyHash 'Genesis (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (KeyHash 'Genesis (Crypto era)) -proposalKeys Set (KeyHash 'Genesis (Crypto era)) +proposalKeys Set (KeyHash 'Genesis (Crypto era)) -> Set (KeyHash 'Genesis (Crypto era)) -> Set (KeyHash 'Genesis (Crypto era)) forall a. Ord a => Set a -> Set a -> Set a Set.\\ Set (KeyHash 'Genesis (Crypto era)) -genesisKeys ] - toObject TracingVerbosity -_verb (PPUpdateWrongEpoch EpochNo -currEpoch EpochNo -intendedEpoch VotingPeriod -votingPeriod) = +genesisKeys ] + toObject TracingVerbosity +_verb (PPUpdateWrongEpoch EpochNo +currEpoch EpochNo +intendedEpoch VotingPeriod +votingPeriod) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1953,12 +1953,12 @@ "currentEpoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -currEpoch +currEpoch , Text "intendedEpoch" Text -> EpochNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= EpochNo -intendedEpoch +intendedEpoch , Text "votingPeriod" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -1966,11 +1966,11 @@ String (VotingPeriod -> Text forall a b. (Show a, ConvertText String b) => a -> b show VotingPeriod -votingPeriod) +votingPeriod) ] - toObject TracingVerbosity -_verb (PVCannotFollowPPUP ProtVer -badPv) = + toObject TracingVerbosity +_verb (PVCannotFollowPPUP ProtVer +badPv) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -1983,17 +1983,17 @@ "badProtocolVersion" Text -> ProtVer -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ProtVer -badPv +badPv ] -instance ( ShelleyBasedEra era - , ToObject (PredicateFailure (Core.EraRule "DELPL" era)) - ) => ToObject (DelegsPredicateFailure era) where - toObject :: TracingVerbosity -> DelegsPredicateFailure era -> Object -toObject TracingVerbosity -_verb (DelegateeNotRegisteredDELEG KeyHash 'StakePool (Crypto era) -targetPool) = +instance ( ShelleyBasedEra era + , ToObject (PredicateFailure (Core.EraRule "DELPL" era)) + ) => ToObject (DelegsPredicateFailure era) where + toObject :: TracingVerbosity -> DelegsPredicateFailure era -> Object +toObject TracingVerbosity +_verb (DelegateeNotRegisteredDELEG KeyHash 'StakePool (Crypto era) +targetPool) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2006,11 +2006,11 @@ "targetPool" Text -> KeyHash 'StakePool (Crypto era) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KeyHash 'StakePool (Crypto era) -targetPool +targetPool ] - toObject TracingVerbosity -_verb (WithdrawalsNotInRewardsDELEGS Map (RewardAcnt (Crypto era)) Coin -incorrectWithdrawals) = + toObject TracingVerbosity +_verb (WithdrawalsNotInRewardsDELEGS Map (RewardAcnt (Crypto era)) Coin +incorrectWithdrawals) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2023,43 +2023,43 @@ "incorrectWithdrawals" Text -> Map (RewardAcnt (Crypto era)) Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Map (RewardAcnt (Crypto era)) Coin -incorrectWithdrawals +incorrectWithdrawals ] - toObject TracingVerbosity -verb (DelplFailure PredicateFailure (EraRule "DELPL" era) -f) = TracingVerbosity + toObject TracingVerbosity +verb (DelplFailure PredicateFailure (EraRule "DELPL" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "DELPL" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "DELPL" era) -f +verb PredicateFailure (EraRule "DELPL" era) +f -instance ( ToObject (PredicateFailure (Core.EraRule "POOL" era)) - , ToObject (PredicateFailure (Core.EraRule "DELEG" era)) - ) => ToObject (DelplPredicateFailure era) where - toObject :: TracingVerbosity -> DelplPredicateFailure era -> Object -toObject TracingVerbosity -verb (PoolFailure PredicateFailure (EraRule "POOL" era) -f) = TracingVerbosity -> PredicateFailure (EraRule "POOL" era) -> Object +instance ( ToObject (PredicateFailure (Core.EraRule "POOL" era)) + , ToObject (PredicateFailure (Core.EraRule "DELEG" era)) + ) => ToObject (DelplPredicateFailure era) where + toObject :: TracingVerbosity -> DelplPredicateFailure era -> Object +toObject TracingVerbosity +verb (PoolFailure PredicateFailure (EraRule "POOL" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "POOL" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "POOL" era) -f - toObject TracingVerbosity -verb (DelegFailure PredicateFailure (EraRule "DELEG" era) -f) = TracingVerbosity +verb PredicateFailure (EraRule "POOL" era) +f + toObject TracingVerbosity +verb (DelegFailure PredicateFailure (EraRule "DELEG" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "DELEG" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "DELEG" era) -f +verb PredicateFailure (EraRule "DELEG" era) +f -instance ToObject (DelegPredicateFailure era) where - toObject :: TracingVerbosity -> DelegPredicateFailure era -> Object -toObject TracingVerbosity -_verb (StakeKeyAlreadyRegisteredDELEG Credential 'Staking (Crypto era) -alreadyRegistered) = +instance ToObject (DelegPredicateFailure era) where + toObject :: TracingVerbosity -> DelegPredicateFailure era -> Object +toObject TracingVerbosity +_verb (StakeKeyAlreadyRegisteredDELEG Credential 'Staking (Crypto era) +alreadyRegistered) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2075,7 +2075,7 @@ String (Credential 'Staking (Crypto era) -> Text forall a. Show a => a -> Text textShow Credential 'Staking (Crypto era) -alreadyRegistered) +alreadyRegistered) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2083,9 +2083,9 @@ String Text "Staking credential already registered" ] - toObject TracingVerbosity -_verb (StakeKeyInRewardsDELEG Credential 'Staking (Crypto era) -alreadyRegistered) = + toObject TracingVerbosity +_verb (StakeKeyInRewardsDELEG Credential 'Staking (Crypto era) +alreadyRegistered) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2101,7 +2101,7 @@ String (Credential 'Staking (Crypto era) -> Text forall a. Show a => a -> Text textShow Credential 'Staking (Crypto era) -alreadyRegistered) +alreadyRegistered) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2109,9 +2109,9 @@ String Text "Staking credential registered in rewards map" ] - toObject TracingVerbosity -_verb (StakeKeyNotRegisteredDELEG Credential 'Staking (Crypto era) -notRegistered) = + toObject TracingVerbosity +_verb (StakeKeyNotRegisteredDELEG Credential 'Staking (Crypto era) +notRegistered) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2127,7 +2127,7 @@ String (Credential 'Staking (Crypto era) -> Text forall a. Show a => a -> Text textShow Credential 'Staking (Crypto era) -notRegistered) +notRegistered) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2135,9 +2135,9 @@ String Text "Staking credential not registered" ] - toObject TracingVerbosity -_verb (StakeKeyNonZeroAccountBalanceDELEG Maybe Coin -remBalance) = + toObject TracingVerbosity +_verb (StakeKeyNonZeroAccountBalanceDELEG Maybe Coin +remBalance) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2150,11 +2150,11 @@ "remainingBalance" Text -> Maybe Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Maybe Coin -remBalance +remBalance ] - toObject TracingVerbosity -_verb (StakeDelegationImpossibleDELEG Credential 'Staking (Crypto era) -unregistered) = + toObject TracingVerbosity +_verb (StakeDelegationImpossibleDELEG Credential 'Staking (Crypto era) +unregistered) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2170,7 +2170,7 @@ String (Credential 'Staking (Crypto era) -> Text forall a. Show a => a -> Text textShow Credential 'Staking (Crypto era) -unregistered) +unregistered) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2178,8 +2178,8 @@ String Text "Cannot delegate this stake credential because it is not registered" ] - toObject TracingVerbosity -_verb DelegPredicateFailure era + toObject TracingVerbosity +_verb DelegPredicateFailure era WrongCertificateTypeDELEG = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -2189,9 +2189,9 @@ .= Text -> Value String Text "WrongCertificateTypeDELEG" ] - toObject TracingVerbosity -_verb (GenesisKeyNotInMappingDELEG (KeyHash Hash (ADDRHASH (Crypto era)) (VerKeyDSIGN (DSIGN (Crypto era))) -genesisKeyHash)) = + toObject TracingVerbosity +_verb (GenesisKeyNotInMappingDELEG (KeyHash Hash (ADDRHASH (Crypto era)) (VerKeyDSIGN (DSIGN (Crypto era))) +genesisKeyHash)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2208,7 +2208,7 @@ -> Text forall a. Show a => a -> Text textShow Hash (ADDRHASH (Crypto era)) (VerKeyDSIGN (DSIGN (Crypto era))) -genesisKeyHash) +genesisKeyHash) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2216,9 +2216,9 @@ String Text "This genesis key is not in the delegation mapping" ] - toObject TracingVerbosity -_verb (DuplicateGenesisDelegateDELEG (KeyHash Hash (ADDRHASH (Crypto era)) (VerKeyDSIGN (DSIGN (Crypto era))) -genesisKeyHash)) = + toObject TracingVerbosity +_verb (DuplicateGenesisDelegateDELEG (KeyHash Hash (ADDRHASH (Crypto era)) (VerKeyDSIGN (DSIGN (Crypto era))) +genesisKeyHash)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2235,7 +2235,7 @@ -> Text forall a. Show a => a -> Text textShow Hash (ADDRHASH (Crypto era)) (VerKeyDSIGN (DSIGN (Crypto era))) -genesisKeyHash) +genesisKeyHash) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2243,11 +2243,11 @@ String Text "This genesis key has already been delegated to" ] - toObject TracingVerbosity -_verb (InsufficientForInstantaneousRewardsDELEG MIRPot -mirpot Coin -neededMirAmount Coin -reserves) = + toObject TracingVerbosity +_verb (InsufficientForInstantaneousRewardsDELEG MIRPot +mirpot Coin +neededMirAmount Coin +reserves) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2261,7 +2261,7 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -> Value String (case MIRPot -mirpot of +mirpot of MIRPot ReservesMIR -> Text "Reserves" @@ -2272,17 +2272,17 @@ "neededAmount" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -neededMirAmount +neededMirAmount , Text "reserves" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -reserves +reserves ] - toObject TracingVerbosity -_verb (MIRCertificateTooLateinEpochDELEG SlotNo -currSlot SlotNo -boundSlotNo) = + toObject TracingVerbosity +_verb (MIRCertificateTooLateinEpochDELEG SlotNo +currSlot SlotNo +boundSlotNo) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2295,16 +2295,16 @@ "currentSlotNo" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -currSlot +currSlot , Text "mustBeSubmittedBeforeSlotNo" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -boundSlotNo +boundSlotNo ] - toObject TracingVerbosity -_verb (DuplicateGenesisVRFDELEG Hash (Crypto era) (VerKeyVRF (Crypto era)) -vrfKeyHash) = + toObject TracingVerbosity +_verb (DuplicateGenesisVRFDELEG Hash (Crypto era) (VerKeyVRF (Crypto era)) +vrfKeyHash) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2317,10 +2317,10 @@ "keyHash" Text -> Hash (Crypto era) (VerKeyVRF (Crypto era)) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Hash (Crypto era) (VerKeyVRF (Crypto era)) -vrfKeyHash +vrfKeyHash ] - toObject TracingVerbosity -_verb DelegPredicateFailure era + toObject TracingVerbosity +_verb DelegPredicateFailure era MIRTransferNotCurrentlyAllowed = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -2331,8 +2331,8 @@ String Text "MIRTransferNotCurrentlyAllowed" ] - toObject TracingVerbosity -_verb DelegPredicateFailure era + toObject TracingVerbosity +_verb DelegPredicateFailure era MIRNegativesNotCurrentlyAllowed = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -2343,11 +2343,11 @@ String Text "MIRNegativesNotCurrentlyAllowed" ] - toObject TracingVerbosity -_verb (InsufficientForTransferDELEG MIRPot -mirpot Coin -attempted Coin -available) = + toObject TracingVerbosity +_verb (InsufficientForTransferDELEG MIRPot +mirpot Coin +attempted Coin +available) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2361,7 +2361,7 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Text -> Value String (case MIRPot -mirpot of +mirpot of MIRPot ReservesMIR -> Text "Reserves" @@ -2372,15 +2372,15 @@ "attempted" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -attempted +attempted , Text "available" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -available +available ] - toObject TracingVerbosity -_verb DelegPredicateFailure era + toObject TracingVerbosity +_verb DelegPredicateFailure era MIRProducesNegativeUpdate = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -2393,11 +2393,11 @@ ] -instance ToObject (PoolPredicateFailure era) where - toObject :: TracingVerbosity -> PoolPredicateFailure era -> Object -toObject TracingVerbosity -_verb (StakePoolNotRegisteredOnKeyPOOL (KeyHash Hash (ADDRHASH (Crypto era)) (VerKeyDSIGN (DSIGN (Crypto era))) -unregStakePool)) = +instance ToObject (PoolPredicateFailure era) where + toObject :: TracingVerbosity -> PoolPredicateFailure era -> Object +toObject TracingVerbosity +_verb (StakePoolNotRegisteredOnKeyPOOL (KeyHash Hash (ADDRHASH (Crypto era)) (VerKeyDSIGN (DSIGN (Crypto era))) +unregStakePool)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2414,7 +2414,7 @@ -> Text forall a. Show a => a -> Text textShow Hash (ADDRHASH (Crypto era)) (VerKeyDSIGN (DSIGN (Crypto era))) -unregStakePool) +unregStakePool) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2422,11 +2422,11 @@ String Text "This stake pool key hash is unregistered" ] - toObject TracingVerbosity -_verb (StakePoolRetirementWrongEpochPOOL Word64 -currentEpoch Word64 -intendedRetireEpoch Word64 -maxRetireEpoch) = + toObject TracingVerbosity +_verb (StakePoolRetirementWrongEpochPOOL Word64 +currentEpoch Word64 +intendedRetireEpoch Word64 +maxRetireEpoch) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2442,7 +2442,7 @@ String (Word64 -> Text forall a. Show a => a -> Text textShow Word64 -currentEpoch) +currentEpoch) , Text "intendedRetirementEpoch" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2450,7 +2450,7 @@ String (Word64 -> Text forall a. Show a => a -> Text textShow Word64 -intendedRetireEpoch) +intendedRetireEpoch) , Text "maxEpochForRetirement" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2458,12 +2458,12 @@ String (Word64 -> Text forall a. Show a => a -> Text textShow Word64 -maxRetireEpoch) +maxRetireEpoch) ] - toObject TracingVerbosity -_verb (StakePoolCostTooLowPOOL Coin -certCost Coin -protCost) = + toObject TracingVerbosity +_verb (StakePoolCostTooLowPOOL Coin +certCost Coin +protCost) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2479,7 +2479,7 @@ String (Coin -> Text forall a. Show a => a -> Text textShow Coin -certCost) +certCost) , Text "protocolParCost" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2487,7 +2487,7 @@ String (Coin -> Text forall a. Show a => a -> Text textShow Coin -protCost) +protCost) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2497,11 +2497,11 @@ ] -- Apparently this should never happen according to the Shelley exec spec - toObject TracingVerbosity -_verb (WrongCertificateTypePOOL Word8 -index) = + toObject TracingVerbosity +_verb (WrongCertificateTypePOOL Word8 +index) = case Word8 -index of +index of Word8 0 -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -2550,8 +2550,8 @@ String Text "Wrong certificate type: Genesis certificate" ] - Word8 -k -> [(Text, Value)] -> Object + Word8 +k -> [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text "kind" Text -> Value -> (Text, Value) @@ -2563,7 +2563,7 @@ "certificateType" Text -> Word8 -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Word8 -k +k , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2572,11 +2572,11 @@ "Wrong certificate type: Unknown certificate type" ] - toObject TracingVerbosity -_verb (WrongNetworkPOOL Network -networkId Network -listedNetworkId KeyHash 'StakePool (Crypto era) -poolId) = + toObject TracingVerbosity +_verb (WrongNetworkPOOL Network +networkId Network +listedNetworkId KeyHash 'StakePool (Crypto era) +poolId) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2592,7 +2592,7 @@ String (Network -> Text forall a. Show a => a -> Text textShow Network -networkId) +networkId) , Text "listedNetworkId" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2600,7 +2600,7 @@ String (Network -> Text forall a. Show a => a -> Text textShow Network -listedNetworkId) +listedNetworkId) , Text "poolId" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2608,7 +2608,7 @@ String (KeyHash 'StakePool (Crypto era) -> Text forall a. Show a => a -> Text textShow KeyHash 'StakePool (Crypto era) -poolId) +poolId) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2617,55 +2617,55 @@ "Wrong network ID in pool registration certificate" ] -instance ( ToObject (PredicateFailure (Core.EraRule "NEWEPOCH" era)) - , ToObject (PredicateFailure (Core.EraRule "RUPD" era)) - ) => ToObject (TickPredicateFailure era) where - toObject :: TracingVerbosity -> TickPredicateFailure era -> Object -toObject TracingVerbosity -verb (NewEpochFailure PredicateFailure (EraRule "NEWEPOCH" era) -f) = TracingVerbosity +instance ( ToObject (PredicateFailure (Core.EraRule "NEWEPOCH" era)) + , ToObject (PredicateFailure (Core.EraRule "RUPD" era)) + ) => ToObject (TickPredicateFailure era) where + toObject :: TracingVerbosity -> TickPredicateFailure era -> Object +toObject TracingVerbosity +verb (NewEpochFailure PredicateFailure (EraRule "NEWEPOCH" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "NEWEPOCH" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "NEWEPOCH" era) -f - toObject TracingVerbosity -verb (RupdFailure PredicateFailure (EraRule "RUPD" era) -f) = TracingVerbosity -> PredicateFailure (EraRule "RUPD" era) -> Object +verb PredicateFailure (EraRule "NEWEPOCH" era) +f + toObject TracingVerbosity +verb (RupdFailure PredicateFailure (EraRule "RUPD" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "RUPD" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "RUPD" era) -f +verb PredicateFailure (EraRule "RUPD" era) +f -instance ToObject TicknPredicateFailure where - toObject :: TracingVerbosity -> TicknPredicateFailure -> Object -toObject TracingVerbosity -_verb TicknPredicateFailure -x = case TicknPredicateFailure -x of {} -- no constructors +instance ToObject TicknPredicateFailure where + toObject :: TracingVerbosity -> TicknPredicateFailure -> Object +toObject TracingVerbosity +_verb TicknPredicateFailure +x = case TicknPredicateFailure +x of {} -- no constructors -instance ( ToObject (PredicateFailure (Core.EraRule "EPOCH" era)) - , ToObject (PredicateFailure (Core.EraRule "MIR" era)) - ) => ToObject (NewEpochPredicateFailure era) where - toObject :: TracingVerbosity -> NewEpochPredicateFailure era -> Object -toObject TracingVerbosity -verb (EpochFailure PredicateFailure (EraRule "EPOCH" era) -f) = TracingVerbosity +instance ( ToObject (PredicateFailure (Core.EraRule "EPOCH" era)) + , ToObject (PredicateFailure (Core.EraRule "MIR" era)) + ) => ToObject (NewEpochPredicateFailure era) where + toObject :: TracingVerbosity -> NewEpochPredicateFailure era -> Object +toObject TracingVerbosity +verb (EpochFailure PredicateFailure (EraRule "EPOCH" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "EPOCH" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "EPOCH" era) -f - toObject TracingVerbosity -verb (MirFailure PredicateFailure (EraRule "MIR" era) -f) = TracingVerbosity -> PredicateFailure (EraRule "MIR" era) -> Object +verb PredicateFailure (EraRule "EPOCH" era) +f + toObject TracingVerbosity +verb (MirFailure PredicateFailure (EraRule "MIR" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "MIR" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "MIR" era) -f - toObject TracingVerbosity -_verb (CorruptRewardUpdate RewardUpdate (Crypto era) -update) = +verb PredicateFailure (EraRule "MIR" era) +f + toObject TracingVerbosity +_verb (CorruptRewardUpdate RewardUpdate (Crypto era) +update) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2681,60 +2681,60 @@ String (RewardUpdate (Crypto era) -> Text forall a b. (Show a, ConvertText String b) => a -> b show RewardUpdate (Crypto era) -update) ] +update) ] -instance ( ToObject (PredicateFailure (Core.EraRule "POOLREAP" era)) - , ToObject (PredicateFailure (Core.EraRule "SNAP" era)) - , ToObject (PredicateFailure (Core.EraRule "UPEC" era)) - ) => ToObject (EpochPredicateFailure era) where - toObject :: TracingVerbosity -> EpochPredicateFailure era -> Object -toObject TracingVerbosity -verb (PoolReapFailure PredicateFailure (EraRule "POOLREAP" era) -f) = TracingVerbosity +instance ( ToObject (PredicateFailure (Core.EraRule "POOLREAP" era)) + , ToObject (PredicateFailure (Core.EraRule "SNAP" era)) + , ToObject (PredicateFailure (Core.EraRule "UPEC" era)) + ) => ToObject (EpochPredicateFailure era) where + toObject :: TracingVerbosity -> EpochPredicateFailure era -> Object +toObject TracingVerbosity +verb (PoolReapFailure PredicateFailure (EraRule "POOLREAP" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "POOLREAP" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "POOLREAP" era) -f - toObject TracingVerbosity -verb (SnapFailure PredicateFailure (EraRule "SNAP" era) -f) = TracingVerbosity -> PredicateFailure (EraRule "SNAP" era) -> Object +verb PredicateFailure (EraRule "POOLREAP" era) +f + toObject TracingVerbosity +verb (SnapFailure PredicateFailure (EraRule "SNAP" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "SNAP" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "SNAP" era) -f - toObject TracingVerbosity -verb (UpecFailure PredicateFailure (EraRule "UPEC" era) -f) = TracingVerbosity -> PredicateFailure (EraRule "UPEC" era) -> Object +verb PredicateFailure (EraRule "SNAP" era) +f + toObject TracingVerbosity +verb (UpecFailure PredicateFailure (EraRule "UPEC" era) +f) = TracingVerbosity -> PredicateFailure (EraRule "UPEC" era) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "UPEC" era) -f +verb PredicateFailure (EraRule "UPEC" era) +f -instance ToObject (PoolreapPredicateFailure era) where - toObject :: TracingVerbosity -> PoolreapPredicateFailure era -> Object -toObject TracingVerbosity -_verb PoolreapPredicateFailure era -x = case PoolreapPredicateFailure era -x of {} -- no constructors +instance ToObject (PoolreapPredicateFailure era) where + toObject :: TracingVerbosity -> PoolreapPredicateFailure era -> Object +toObject TracingVerbosity +_verb PoolreapPredicateFailure era +x = case PoolreapPredicateFailure era +x of {} -- no constructors -instance ToObject (SnapPredicateFailure era) where - toObject :: TracingVerbosity -> SnapPredicateFailure era -> Object -toObject TracingVerbosity -_verb SnapPredicateFailure era -x = case SnapPredicateFailure era -x of {} -- no constructors +instance ToObject (SnapPredicateFailure era) where + toObject :: TracingVerbosity -> SnapPredicateFailure era -> Object +toObject TracingVerbosity +_verb SnapPredicateFailure era +x = case SnapPredicateFailure era +x of {} -- no constructors -- TODO: Need to elaborate more on this error -instance ToObject (NewppPredicateFailure era) where - toObject :: TracingVerbosity -> NewppPredicateFailure era -> Object -toObject TracingVerbosity -_verb (UnexpectedDepositPot Coin -outstandingDeposits Coin -depositPot) = +instance ToObject (NewppPredicateFailure era) where + toObject :: TracingVerbosity -> NewppPredicateFailure era -> Object +toObject TracingVerbosity +_verb (UnexpectedDepositPot Coin +outstandingDeposits Coin +depositPot) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2750,7 +2750,7 @@ String (Coin -> Text forall a. Show a => a -> Text textShow Coin -outstandingDeposits) +outstandingDeposits) , Text "depositPot" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2758,51 +2758,51 @@ String (Coin -> Text forall a. Show a => a -> Text textShow Coin -depositPot) +depositPot) ] -instance ToObject (MirPredicateFailure era) where - toObject :: TracingVerbosity -> MirPredicateFailure era -> Object -toObject TracingVerbosity -_verb MirPredicateFailure era -x = case MirPredicateFailure era -x of {} -- no constructors +instance ToObject (MirPredicateFailure era) where + toObject :: TracingVerbosity -> MirPredicateFailure era -> Object +toObject TracingVerbosity +_verb MirPredicateFailure era +x = case MirPredicateFailure era +x of {} -- no constructors -instance ToObject (RupdPredicateFailure era) where - toObject :: TracingVerbosity -> RupdPredicateFailure era -> Object -toObject TracingVerbosity -_verb RupdPredicateFailure era -x = case RupdPredicateFailure era -x of {} -- no constructors +instance ToObject (RupdPredicateFailure era) where + toObject :: TracingVerbosity -> RupdPredicateFailure era -> Object +toObject TracingVerbosity +_verb RupdPredicateFailure era +x = case RupdPredicateFailure era +x of {} -- no constructors -instance Core.Crypto crypto => ToObject (PrtclPredicateFailure crypto) where - toObject :: TracingVerbosity -> PrtclPredicateFailure crypto -> Object -toObject TracingVerbosity -verb (OverlayFailure PredicateFailure (OVERLAY crypto) -f) = TracingVerbosity -> OverlayPredicateFailure crypto -> Object +instance Core.Crypto crypto => ToObject (PrtclPredicateFailure crypto) where + toObject :: TracingVerbosity -> PrtclPredicateFailure crypto -> Object +toObject TracingVerbosity +verb (OverlayFailure PredicateFailure (OVERLAY crypto) +f) = TracingVerbosity -> OverlayPredicateFailure crypto -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (OVERLAY crypto) +verb PredicateFailure (OVERLAY crypto) OverlayPredicateFailure crypto -f - toObject TracingVerbosity -verb (UpdnFailure PredicateFailure (UPDN crypto) -f) = TracingVerbosity -> UpdnPredicateFailure crypto -> Object +f + toObject TracingVerbosity +verb (UpdnFailure PredicateFailure (UPDN crypto) +f) = TracingVerbosity -> UpdnPredicateFailure crypto -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (UPDN crypto) +verb PredicateFailure (UPDN crypto) UpdnPredicateFailure crypto -f +f -instance Core.Crypto crypto => ToObject (OverlayPredicateFailure crypto) where - toObject :: TracingVerbosity -> OverlayPredicateFailure crypto -> Object -toObject TracingVerbosity -_verb (UnknownGenesisKeyOVERLAY (KeyHash Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) -genKeyHash)) = +instance Core.Crypto crypto => ToObject (OverlayPredicateFailure crypto) where + toObject :: TracingVerbosity -> OverlayPredicateFailure crypto -> Object +toObject TracingVerbosity +_verb (UnknownGenesisKeyOVERLAY (KeyHash Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) +genKeyHash)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2818,14 +2818,14 @@ String (Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) -> Text forall a. Show a => a -> Text textShow Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) -genKeyHash) +genKeyHash) ] - toObject TracingVerbosity -_verb (VRFKeyBadLeaderValue Nonce -seedNonce (SlotNo Word64 -currSlotNo) Nonce -prevHashNonce CertifiedVRF (VRF crypto) Nonce -leaderElecVal) = + toObject TracingVerbosity +_verb (VRFKeyBadLeaderValue Nonce +seedNonce (SlotNo Word64 +currSlotNo) Nonce +prevHashNonce CertifiedVRF (VRF crypto) Nonce +leaderElecVal) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2841,7 +2841,7 @@ String (Nonce -> Text forall a. Show a => a -> Text textShow Nonce -seedNonce) +seedNonce) , Text "currentSlot" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2849,7 +2849,7 @@ String (Word64 -> Text forall a. Show a => a -> Text textShow Word64 -currSlotNo) +currSlotNo) , Text "previousHashAsNonce" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2857,7 +2857,7 @@ String (Nonce -> Text forall a. Show a => a -> Text textShow Nonce -prevHashNonce) +prevHashNonce) , Text "leaderElectionValue" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2865,14 +2865,14 @@ String (CertifiedVRF (VRF crypto) Nonce -> Text forall a. Show a => a -> Text textShow CertifiedVRF (VRF crypto) Nonce -leaderElecVal) +leaderElecVal) ] - toObject TracingVerbosity -_verb (VRFKeyBadNonce Nonce -seedNonce (SlotNo Word64 -currSlotNo) Nonce -prevHashNonce CertifiedVRF (VRF crypto) Nonce -blockNonce) = + toObject TracingVerbosity +_verb (VRFKeyBadNonce Nonce +seedNonce (SlotNo Word64 +currSlotNo) Nonce +prevHashNonce CertifiedVRF (VRF crypto) Nonce +blockNonce) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2888,7 +2888,7 @@ String (Nonce -> Text forall a. Show a => a -> Text textShow Nonce -seedNonce) +seedNonce) , Text "currentSlot" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2896,7 +2896,7 @@ String (Word64 -> Text forall a. Show a => a -> Text textShow Word64 -currSlotNo) +currSlotNo) , Text "previousHashAsNonce" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2904,7 +2904,7 @@ String (Nonce -> Text forall a. Show a => a -> Text textShow Nonce -prevHashNonce) +prevHashNonce) , Text "blockNonce" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2912,13 +2912,13 @@ String (CertifiedVRF (VRF crypto) Nonce -> Text forall a. Show a => a -> Text textShow CertifiedVRF (VRF crypto) Nonce -blockNonce) +blockNonce) ] - toObject TracingVerbosity -_verb (VRFKeyWrongVRFKey KeyHash 'StakePool crypto -issuerHash Hash crypto (VerKeyVRF crypto) -regVRFKeyHash Hash crypto (VerKeyVRF crypto) -unregVRFKeyHash) = + toObject TracingVerbosity +_verb (VRFKeyWrongVRFKey KeyHash 'StakePool crypto +issuerHash Hash crypto (VerKeyVRF crypto) +regVRFKeyHash Hash crypto (VerKeyVRF crypto) +unregVRFKeyHash) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2933,26 +2933,26 @@ .= KeyHash 'StakePool crypto -> Text forall a. Show a => a -> Text textShow KeyHash 'StakePool crypto -issuerHash +issuerHash , Text "registeredVRFKeHash" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Hash crypto (VerKeyVRF crypto) -> Text forall a. Show a => a -> Text textShow Hash crypto (VerKeyVRF crypto) -regVRFKeyHash +regVRFKeyHash , Text "unregisteredVRFKeyHash" Text -> Text -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Hash crypto (VerKeyVRF crypto) -> Text forall a. Show a => a -> Text textShow Hash crypto (VerKeyVRF crypto) -unregVRFKeyHash +unregVRFKeyHash ] --TODO: Pipe slot number with VRFKeyUnknown - toObject TracingVerbosity -_verb (VRFKeyUnknown (KeyHash Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) -kHash)) = + toObject TracingVerbosity +_verb (VRFKeyUnknown (KeyHash Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) +kHash)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2968,13 +2968,13 @@ String (Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) -> Text forall a. Show a => a -> Text textShow Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) -kHash) +kHash) ] - toObject TracingVerbosity -_verb (VRFLeaderValueTooBig OutputVRF (VRF crypto) -leadElecVal Rational -weightOfDelegPool ActiveSlotCoeff -actSlotCoefff) = + toObject TracingVerbosity +_verb (VRFLeaderValueTooBig OutputVRF (VRF crypto) +leadElecVal Rational +weightOfDelegPool ActiveSlotCoeff +actSlotCoefff) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -2990,7 +2990,7 @@ String (OutputVRF (VRF crypto) -> Text forall a. Show a => a -> Text textShow OutputVRF (VRF crypto) -leadElecVal) +leadElecVal) , Text "delegationPoolWeight" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -2998,7 +2998,7 @@ String (Rational -> Text forall a. Show a => a -> Text textShow Rational -weightOfDelegPool) +weightOfDelegPool) , Text "activeSlotCoefficient" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3006,11 +3006,11 @@ String (ActiveSlotCoeff -> Text forall a. Show a => a -> Text textShow ActiveSlotCoeff -actSlotCoefff) +actSlotCoefff) ] - toObject TracingVerbosity -_verb (NotActiveSlotOVERLAY SlotNo -notActiveSlotNo) = + toObject TracingVerbosity +_verb (NotActiveSlotOVERLAY SlotNo +notActiveSlotNo) = -- TODO: Elaborate on NotActiveSlot error [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -3027,12 +3027,12 @@ String (SlotNo -> Text forall a. Show a => a -> Text textShow SlotNo -notActiveSlotNo) +notActiveSlotNo) ] - toObject TracingVerbosity -_verb (WrongGenesisColdKeyOVERLAY KeyHash 'BlockIssuer crypto -actual KeyHash 'GenesisDelegate crypto -expected) = + toObject TracingVerbosity +_verb (WrongGenesisColdKeyOVERLAY KeyHash 'BlockIssuer crypto +actual KeyHash 'GenesisDelegate crypto +expected) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3045,17 +3045,17 @@ "actual" Text -> KeyHash 'BlockIssuer crypto -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KeyHash 'BlockIssuer crypto -actual +actual , Text "expected" Text -> KeyHash 'GenesisDelegate crypto -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KeyHash 'GenesisDelegate crypto -expected ] - toObject TracingVerbosity -_verb (WrongGenesisVRFKeyOVERLAY KeyHash 'BlockIssuer crypto -issuer Hash crypto (VerKeyVRF crypto) -actual Hash crypto (VerKeyVRF crypto) -expected) = +expected ] + toObject TracingVerbosity +_verb (WrongGenesisVRFKeyOVERLAY KeyHash 'BlockIssuer crypto +issuer Hash crypto (VerKeyVRF crypto) +actual Hash crypto (VerKeyVRF crypto) +expected) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3068,33 +3068,33 @@ "issuer" Text -> KeyHash 'BlockIssuer crypto -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= KeyHash 'BlockIssuer crypto -issuer +issuer , Text "actual" Text -> Hash crypto (VerKeyVRF crypto) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Hash crypto (VerKeyVRF crypto) -actual +actual , Text "expected" Text -> Hash crypto (VerKeyVRF crypto) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Hash crypto (VerKeyVRF crypto) -expected ] - toObject TracingVerbosity -verb (OcertFailure PredicateFailure (OCERT crypto) -f) = TracingVerbosity -> OcertPredicateFailure crypto -> Object +expected ] + toObject TracingVerbosity +verb (OcertFailure PredicateFailure (OCERT crypto) +f) = TracingVerbosity -> OcertPredicateFailure crypto -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (OCERT crypto) +verb PredicateFailure (OCERT crypto) OcertPredicateFailure crypto -f +f -instance ToObject (OcertPredicateFailure crypto) where - toObject :: TracingVerbosity -> OcertPredicateFailure crypto -> Object -toObject TracingVerbosity -_verb (KESBeforeStartOCERT (KESPeriod KESEvolution -oCertstart) (KESPeriod KESEvolution -current)) = +instance ToObject (OcertPredicateFailure crypto) where + toObject :: TracingVerbosity -> OcertPredicateFailure crypto -> Object +toObject TracingVerbosity +_verb (KESBeforeStartOCERT (KESPeriod KESEvolution +oCertstart) (KESPeriod KESEvolution +current)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3110,7 +3110,7 @@ String (KESEvolution -> Text forall a. Show a => a -> Text textShow KESEvolution -oCertstart) +oCertstart) , Text "currentKESPeriod" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3118,7 +3118,7 @@ String (KESEvolution -> Text forall a. Show a => a -> Text textShow KESEvolution -current) +current) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3127,11 +3127,11 @@ "Your operational certificate's KES start period \ \is before the KES current period." ] - toObject TracingVerbosity -_verb (KESAfterEndOCERT (KESPeriod KESEvolution -current) (KESPeriod KESEvolution -oCertstart) Word64 -maxKESEvolutions) = + toObject TracingVerbosity +_verb (KESAfterEndOCERT (KESPeriod KESEvolution +current) (KESPeriod KESEvolution +oCertstart) Word64 +maxKESEvolutions) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3147,7 +3147,7 @@ String (KESEvolution -> Text forall a. Show a => a -> Text textShow KESEvolution -current) +current) , Text "opCertKESStartPeriod" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3155,7 +3155,7 @@ String (KESEvolution -> Text forall a. Show a => a -> Text textShow KESEvolution -oCertstart) +oCertstart) , Text "maxKESEvolutions" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3163,7 +3163,7 @@ String (Word64 -> Text forall a. Show a => a -> Text textShow Word64 -maxKESEvolutions) +maxKESEvolutions) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3172,10 +3172,10 @@ "The operational certificate's KES start period is \ \greater than the max number of KES + the KES current period" ] - toObject TracingVerbosity -_verb (CounterTooSmallOCERT Word64 -lastKEScounterUsed Word64 -currentKESCounter) = + toObject TracingVerbosity +_verb (CounterTooSmallOCERT Word64 +lastKEScounterUsed Word64 +currentKESCounter) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3191,7 +3191,7 @@ String (Word64 -> Text forall a. Show a => a -> Text textShow Word64 -currentKESCounter) +currentKESCounter) , Text "lastKESCounter" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3199,7 +3199,7 @@ String (Word64 -> Text forall a. Show a => a -> Text textShow Word64 -lastKEScounterUsed) +lastKEScounterUsed) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3208,10 +3208,10 @@ "The operational certificate's last KES counter is greater \ \than the current KES counter." ] - toObject TracingVerbosity -_verb (InvalidSignatureOCERT Word64 -oCertCounter KESPeriod -oCertKESStartPeriod) = + toObject TracingVerbosity +_verb (InvalidSignatureOCERT Word64 +oCertCounter KESPeriod +oCertKESStartPeriod) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3227,7 +3227,7 @@ String (KESPeriod -> Text forall a. Show a => a -> Text textShow KESPeriod -oCertKESStartPeriod) +oCertKESStartPeriod) , Text "opCertCounter" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3235,14 +3235,14 @@ String (Word64 -> Text forall a. Show a => a -> Text textShow Word64 -oCertCounter) +oCertCounter) ] - toObject TracingVerbosity -_verb (InvalidKesSignatureOCERT KESEvolution -currKESPeriod KESEvolution -startKESPeriod KESEvolution -expectedKESEvolutions String -err) = + toObject TracingVerbosity +_verb (InvalidKesSignatureOCERT KESEvolution +currKESPeriod KESEvolution +startKESPeriod KESEvolution +expectedKESEvolutions String +err) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3258,7 +3258,7 @@ String (KESEvolution -> Text forall a. Show a => a -> Text textShow KESEvolution -startKESPeriod) +startKESPeriod) , Text "opCertKESCurrentPeriod" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3266,7 +3266,7 @@ String (KESEvolution -> Text forall a. Show a => a -> Text textShow KESEvolution -currKESPeriod) +currKESPeriod) , Text "opCertExpectedKESEvolutions" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3274,15 +3274,15 @@ String (KESEvolution -> Text forall a. Show a => a -> Text textShow KESEvolution -expectedKESEvolutions) +expectedKESEvolutions) , Text "error" Text -> String -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= String -err ] - toObject TracingVerbosity -_verb (NoCounterForKeyHashOCERT (KeyHash Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) -stakePoolKeyHash)) = +err ] + toObject TracingVerbosity +_verb (NoCounterForKeyHashOCERT (KeyHash Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) +stakePoolKeyHash)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3298,7 +3298,7 @@ String (Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) -> Text forall a. Show a => a -> Text textShow Hash (ADDRHASH crypto) (VerKeyDSIGN (DSIGN crypto)) -stakePoolKeyHash) +stakePoolKeyHash) , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3309,17 +3309,17 @@ -instance ToObject (UpdnPredicateFailure crypto) where - toObject :: TracingVerbosity -> UpdnPredicateFailure crypto -> Object -toObject TracingVerbosity -_verb UpdnPredicateFailure crypto -x = case UpdnPredicateFailure crypto -x of {} -- no constructors +instance ToObject (UpdnPredicateFailure crypto) where + toObject :: TracingVerbosity -> UpdnPredicateFailure crypto -> Object +toObject TracingVerbosity +_verb UpdnPredicateFailure crypto +x = case UpdnPredicateFailure crypto +x of {} -- no constructors -instance ToObject (UpecPredicateFailure era) where - toObject :: TracingVerbosity -> UpecPredicateFailure era -> Object -toObject TracingVerbosity -_verb (NewPpFailure (UnexpectedDepositPot totalOutstanding depositPot)) = +instance ToObject (UpecPredicateFailure era) where + toObject :: TracingVerbosity -> UpecPredicateFailure era -> Object +toObject TracingVerbosity +_verb (NewPpFailure (UnexpectedDepositPot totalOutstanding depositPot)) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3335,7 +3335,7 @@ String (Coin -> Text forall a. Show a => a -> Text textShow Coin -totalOutstanding) +totalOutstanding) , Text "depositPot" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3343,7 +3343,7 @@ String (Coin -> Text forall a. Show a => a -> Text textShow Coin -depositPot) +depositPot) ] @@ -3352,12 +3352,12 @@ -------------------------------------------------------------------------------- -instance ToObject (Alonzo.UtxoPredicateFailure (Alonzo.AlonzoEra StandardCrypto)) where - toObject :: TracingVerbosity +instance ToObject (Alonzo.UtxoPredicateFailure (Alonzo.AlonzoEra StandardCrypto)) where + toObject :: TracingVerbosity -> UtxoPredicateFailure (AlonzoEra StandardCrypto) -> Object -toObject TracingVerbosity -_verb (Alonzo.BadInputsUTxO Set (TxIn (Crypto (AlonzoEra StandardCrypto))) -badInputs) = +toObject TracingVerbosity +_verb (Alonzo.BadInputsUTxO Set (TxIn (Crypto (AlonzoEra StandardCrypto))) +badInputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3371,7 +3371,7 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (TxIn StandardCrypto) Set (TxIn (Crypto (AlonzoEra StandardCrypto))) -badInputs +badInputs , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3379,12 +3379,12 @@ forall era. Set (TxIn era) -> Value renderBadInputsUTxOErr Set (TxIn StandardCrypto) Set (TxIn (Crypto (AlonzoEra StandardCrypto))) -badInputs +badInputs ] - toObject TracingVerbosity -_verb (Alonzo.OutsideValidityIntervalUTxO ValidityInterval -validtyInterval SlotNo -slot) = + toObject TracingVerbosity +_verb (Alonzo.OutsideValidityIntervalUTxO ValidityInterval +validtyInterval SlotNo +slot) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3397,17 +3397,17 @@ "validityInterval" Text -> ValidityInterval -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ValidityInterval -validtyInterval +validtyInterval , Text "slot" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slot +slot ] - toObject TracingVerbosity -_verb (Alonzo.MaxTxSizeUTxO Integer -txsize Integer -maxtxsize) = + toObject TracingVerbosity +_verb (Alonzo.MaxTxSizeUTxO Integer +txsize Integer +maxtxsize) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3420,15 +3420,15 @@ "size" Text -> Integer -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -txsize +txsize , Text "maxSize" Text -> Integer -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Integer -maxtxsize +maxtxsize ] - toObject TracingVerbosity -_verb UtxoPredicateFailure (AlonzoEra StandardCrypto) + toObject TracingVerbosity +_verb UtxoPredicateFailure (AlonzoEra StandardCrypto) Alonzo.InputSetEmptyUTxO = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -3438,10 +3438,10 @@ .= Text -> Value String Text "InputSetEmptyUTxO" ] - toObject TracingVerbosity -_verb (Alonzo.FeeTooSmallUTxO Coin -minfee Coin -currentFee) = + toObject TracingVerbosity +_verb (Alonzo.FeeTooSmallUTxO Coin +minfee Coin +currentFee) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3454,17 +3454,17 @@ "minimum" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -minfee +minfee , Text "fee" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -currentFee +currentFee ] - toObject TracingVerbosity -_verb (Alonzo.ValueNotConservedUTxO Value (AlonzoEra StandardCrypto) -consumed Value (AlonzoEra StandardCrypto) -produced) = + toObject TracingVerbosity +_verb (Alonzo.ValueNotConservedUTxO Value (AlonzoEra StandardCrypto) +consumed Value (AlonzoEra StandardCrypto) +produced) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3478,13 +3478,13 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value (AlonzoEra StandardCrypto) Value StandardCrypto -consumed +consumed , Text "produced" Text -> Value StandardCrypto -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value (AlonzoEra StandardCrypto) Value StandardCrypto -produced +produced , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3492,14 +3492,14 @@ forall val. Show val => val -> val -> Value renderValueNotConservedErr Value (AlonzoEra StandardCrypto) Value StandardCrypto -consumed Value (AlonzoEra StandardCrypto) +consumed Value (AlonzoEra StandardCrypto) Value StandardCrypto -produced +produced ] - toObject TracingVerbosity -_verb (Alonzo.WrongNetwork Network -network Set (Addr (Crypto (AlonzoEra StandardCrypto))) -addrs) = + toObject TracingVerbosity +_verb (Alonzo.WrongNetwork Network +network Set (Addr (Crypto (AlonzoEra StandardCrypto))) +addrs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3512,18 +3512,18 @@ "network" Text -> Network -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Network -network +network , Text "addrs" Text -> Set (Addr StandardCrypto) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (Addr StandardCrypto) Set (Addr (Crypto (AlonzoEra StandardCrypto))) -addrs +addrs ] - toObject TracingVerbosity -_verb (Alonzo.WrongNetworkWithdrawal Network -network Set (RewardAcnt (Crypto (AlonzoEra StandardCrypto))) -addrs) = + toObject TracingVerbosity +_verb (Alonzo.WrongNetworkWithdrawal Network +network Set (RewardAcnt (Crypto (AlonzoEra StandardCrypto))) +addrs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3536,17 +3536,17 @@ "network" Text -> Network -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Network -network +network , Text "addrs" Text -> Set (RewardAcnt StandardCrypto) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Set (RewardAcnt StandardCrypto) Set (RewardAcnt (Crypto (AlonzoEra StandardCrypto))) -addrs +addrs ] - toObject TracingVerbosity -_verb (Alonzo.OutputTooSmallUTxO [TxOut (AlonzoEra StandardCrypto)] -badOutputs) = + toObject TracingVerbosity +_verb (Alonzo.OutputTooSmallUTxO [TxOut (AlonzoEra StandardCrypto)] +badOutputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3560,7 +3560,7 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [TxOut (AlonzoEra StandardCrypto)] [TxOut (AlonzoEra StandardCrypto)] -badOutputs +badOutputs , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3569,19 +3569,19 @@ "The output is smaller than the allow minimum \ \UTxO value defined in the protocol parameters" ] - toObject TracingVerbosity -verb (Alonzo.UtxosFailure PredicateFailure (EraRule "UTXOS" (AlonzoEra StandardCrypto)) -predFailure) = + toObject TracingVerbosity +verb (Alonzo.UtxosFailure PredicateFailure (EraRule "UTXOS" (AlonzoEra StandardCrypto)) +predFailure) = TracingVerbosity -> UtxosPredicateFailure (AlonzoEra StandardCrypto) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "UTXOS" (AlonzoEra StandardCrypto)) +verb PredicateFailure (EraRule "UTXOS" (AlonzoEra StandardCrypto)) UtxosPredicateFailure (AlonzoEra StandardCrypto) -predFailure - toObject TracingVerbosity -_verb (Alonzo.OutputBootAddrAttrsTooBig [TxOut (AlonzoEra StandardCrypto)] -txouts) = +predFailure + toObject TracingVerbosity +_verb (Alonzo.OutputBootAddrAttrsTooBig [TxOut (AlonzoEra StandardCrypto)] +txouts) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3595,7 +3595,7 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [TxOut (AlonzoEra StandardCrypto)] [TxOut (AlonzoEra StandardCrypto)] -txouts +txouts , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3603,8 +3603,8 @@ String Text "The Byron address attributes are too big" ] - toObject TracingVerbosity -_verb UtxoPredicateFailure (AlonzoEra StandardCrypto) + toObject TracingVerbosity +_verb UtxoPredicateFailure (AlonzoEra StandardCrypto) Alonzo.TriesToForgeADA = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -3614,9 +3614,9 @@ .= Text -> Value String Text "TriesToForgeADA" ] - toObject TracingVerbosity -_verb (Alonzo.OutputTooBigUTxO [(Int, Int, TxOut (AlonzoEra StandardCrypto))] -badOutputs) = + toObject TracingVerbosity +_verb (Alonzo.OutputTooBigUTxO [(Int, Int, TxOut (AlonzoEra StandardCrypto))] +badOutputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3631,7 +3631,7 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [(Int, Int, TxOut (AlonzoEra StandardCrypto))] [(Int, Int, TxOut (AlonzoEra StandardCrypto))] -badOutputs +badOutputs , Text "error" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -3639,10 +3639,10 @@ String Text "Too many asset ids in the tx output" ] - toObject TracingVerbosity -_verb (Alonzo.InsufficientCollateral Coin -computedBalance Coin -suppliedFee) = + toObject TracingVerbosity +_verb (Alonzo.InsufficientCollateral Coin +computedBalance Coin +suppliedFee) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3655,16 +3655,16 @@ "balance" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -computedBalance +computedBalance , Text "txfee" Text -> Coin -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Coin -suppliedFee +suppliedFee ] - toObject TracingVerbosity -_verb (Alonzo.ScriptsNotPaidUTxO UTxO (AlonzoEra StandardCrypto) -utxos) = + toObject TracingVerbosity +_verb (Alonzo.ScriptsNotPaidUTxO UTxO (AlonzoEra StandardCrypto) +utxos) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3677,12 +3677,12 @@ "utxos" Text -> UTxO (AlonzoEra StandardCrypto) -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= UTxO (AlonzoEra StandardCrypto) -utxos +utxos ] - toObject TracingVerbosity -_verb (Alonzo.ExUnitsTooBigUTxO ExUnits -pParamsMaxExUnits ExUnits -suppliedExUnits) = + toObject TracingVerbosity +_verb (Alonzo.ExUnitsTooBigUTxO ExUnits +pParamsMaxExUnits ExUnits +suppliedExUnits) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3695,16 +3695,16 @@ "maxexunits" Text -> ExUnits -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ExUnits -pParamsMaxExUnits +pParamsMaxExUnits , Text "exunits" Text -> ExUnits -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ExUnits -suppliedExUnits +suppliedExUnits ] - toObject TracingVerbosity -_verb (Alonzo.CollateralContainsNonADA Value (AlonzoEra StandardCrypto) -inputs) = + toObject TracingVerbosity +_verb (Alonzo.CollateralContainsNonADA Value (AlonzoEra StandardCrypto) +inputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3718,12 +3718,12 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Value (AlonzoEra StandardCrypto) Value StandardCrypto -inputs +inputs ] - toObject TracingVerbosity -_verb (Alonzo.WrongNetworkInTxBody Network -actualNetworkId Network -netIdInTxBody) = + toObject TracingVerbosity +_verb (Alonzo.WrongNetworkInTxBody Network +actualNetworkId Network +netIdInTxBody) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3736,16 +3736,16 @@ "networkid" Text -> Network -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Network -actualNetworkId +actualNetworkId , Text "txbodyNetworkId" Text -> Network -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Network -netIdInTxBody +netIdInTxBody ] - toObject TracingVerbosity -_verb (Alonzo.OutsideForecast SlotNo -slotNum) = + toObject TracingVerbosity +_verb (Alonzo.OutsideForecast SlotNo +slotNum) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3758,12 +3758,12 @@ "slot" Text -> SlotNo -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= SlotNo -slotNum +slotNum ] - toObject TracingVerbosity -_verb (Alonzo.TooManyCollateralInputs Natural -maxCollateralInputs Natural -numberCollateralInputs) = + toObject TracingVerbosity +_verb (Alonzo.TooManyCollateralInputs Natural +maxCollateralInputs Natural +numberCollateralInputs) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3776,15 +3776,15 @@ "max" Text -> Natural -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -maxCollateralInputs +maxCollateralInputs , Text "inputs" Text -> Natural -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= Natural -numberCollateralInputs +numberCollateralInputs ] - toObject TracingVerbosity -_verb UtxoPredicateFailure (AlonzoEra StandardCrypto) + toObject TracingVerbosity +_verb UtxoPredicateFailure (AlonzoEra StandardCrypto) Alonzo.NoCollateralInputs = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a @@ -3795,12 +3795,12 @@ String Text "NoCollateralInputs" ] -instance ToObject (Alonzo.UtxosPredicateFailure (AlonzoEra StandardCrypto)) where - toObject :: TracingVerbosity +instance ToObject (Alonzo.UtxosPredicateFailure (AlonzoEra StandardCrypto)) where + toObject :: TracingVerbosity -> UtxosPredicateFailure (AlonzoEra StandardCrypto) -> Object -toObject TracingVerbosity -_ (Alonzo.ValidationTagMismatch IsValidating -isValidating) = +toObject TracingVerbosity +_ (Alonzo.ValidationTagMismatch IsValidating +isValidating) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3813,11 +3813,11 @@ "isvalidating" Text -> IsValidating -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= IsValidating -isValidating +isValidating ] toObject TracingVerbosity -_ (Alonzo.CollectErrors [CollectError (Crypto (AlonzoEra StandardCrypto))] -errors) = +_ (Alonzo.CollectErrors [CollectError (Crypto (AlonzoEra StandardCrypto))] +errors) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -3831,29 +3831,29 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= [CollectError StandardCrypto] [CollectError (Crypto (AlonzoEra StandardCrypto))] -errors +errors ] - toObject TracingVerbosity -verb (Alonzo.UpdateFailure PredicateFailure (EraRule "PPUP" (AlonzoEra StandardCrypto)) -pFailure) = + toObject TracingVerbosity +verb (Alonzo.UpdateFailure PredicateFailure (EraRule "PPUP" (AlonzoEra StandardCrypto)) +pFailure) = TracingVerbosity -> PpupPredicateFailure (AlonzoEra StandardCrypto) -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb PredicateFailure (EraRule "PPUP" (AlonzoEra StandardCrypto)) +verb PredicateFailure (EraRule "PPUP" (AlonzoEra StandardCrypto)) PpupPredicateFailure (AlonzoEra StandardCrypto) -pFailure +pFailure -deriving newtype instance ToJSON Alonzo.IsValidating +deriving newtype instance ToJSON Alonzo.IsValidating -instance ToJSON (Alonzo.CollectError StandardCrypto) where - toJSON :: CollectError StandardCrypto -> Value -toJSON CollectError StandardCrypto -cError = +instance ToJSON (Alonzo.CollectError StandardCrypto) where + toJSON :: CollectError StandardCrypto -> Value +toJSON CollectError StandardCrypto +cError = case CollectError StandardCrypto -cError of - Alonzo.NoRedeemer ScriptPurpose StandardCrypto -sPurpose -> +cError of + Alonzo.NoRedeemer ScriptPurpose StandardCrypto +sPurpose -> [(Text, Value)] -> Value object [ Text @@ -3873,10 +3873,10 @@ forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv .= ScriptPurpose StandardCrypto -> Value renderScriptPurpose ScriptPurpose StandardCrypto -sPurpose +sPurpose ] - Alonzo.NoWitness ScriptHash StandardCrypto -sHash -> + Alonzo.NoWitness ScriptHash StandardCrypto +sHash -> [(Text, Value)] -> Value object [ Text @@ -3897,10 +3897,10 @@ .= ScriptHash StandardCrypto -> Value forall a. ToJSON a => a -> Value toJSON ScriptHash StandardCrypto -sHash +sHash ] - Alonzo.NoCostModel Language -lang -> + Alonzo.NoCostModel Language +lang -> [(Text, Value)] -> Value object [ Text @@ -3921,13 +3921,13 @@ .= Language -> Value forall a. ToJSON a => a -> Value toJSON Language -lang +lang ] -instance ToObject (AlonzoBbodyPredFail (Alonzo.AlonzoEra StandardCrypto)) where - toObject :: TracingVerbosity +instance ToObject (AlonzoBbodyPredFail (Alonzo.AlonzoEra StandardCrypto)) where + toObject :: TracingVerbosity -> AlonzoBbodyPredFail (AlonzoEra StandardCrypto) -> Object -toObject TracingVerbosity +toObject TracingVerbosity _ AlonzoBbodyPredFail (AlonzoEra StandardCrypto) _ = Text -> Object forall a. HasCallStack => Text -> a @@ -3938,7 +3938,7 @@ -- Helper functions -------------------------------------------------------------------------------- -textShow :: Show a => a -> Text +textShow :: Show a => a -> Text textShow :: a -> Text textShow = String -> Text Text.pack (String -> Text) -> (a -> String) -> a -> Text @@ -3949,19 +3949,19 @@ forall a b. (Show a, ConvertText String b) => a -> b show -showLastAppBlockNo :: WithOrigin (LastAppliedBlock crypto) -> Text +showLastAppBlockNo :: WithOrigin (LastAppliedBlock crypto) -> Text showLastAppBlockNo :: WithOrigin (LastAppliedBlock crypto) -> Text -showLastAppBlockNo WithOrigin (LastAppliedBlock crypto) -wOblk = case WithOrigin (LastAppliedBlock crypto) +showLastAppBlockNo WithOrigin (LastAppliedBlock crypto) +wOblk = case WithOrigin (LastAppliedBlock crypto) -> Maybe (LastAppliedBlock crypto) forall t. WithOrigin t -> Maybe t withOriginToMaybe WithOrigin (LastAppliedBlock crypto) -wOblk of +wOblk of Maybe (LastAppliedBlock crypto) Nothing -> Text "Genesis Block" - Just LastAppliedBlock crypto -blk -> Word64 -> Text + Just LastAppliedBlock crypto +blk -> Word64 -> Text forall a. Show a => a -> Text textShow (Word64 -> Text) -> (BlockNo -> Word64) -> BlockNo -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). @@ -3973,11 +3973,11 @@ $ LastAppliedBlock crypto -> BlockNo forall crypto. LastAppliedBlock crypto -> BlockNo labBlockNo LastAppliedBlock crypto -blk +blk -- Common to cardano-cli -deriving newtype instance Core.Crypto crypto => ToJSON (Core.AuxiliaryDataHash crypto) +deriving newtype instance Core.Crypto crypto => ToJSON (Core.AuxiliaryDataHash crypto) -deriving newtype instance ToJSON (TxId crypto) +deriving newtype instance ToJSON (TxId crypto) \ No newline at end of file diff --git a/cardano-node/src/Cardano.Tracing.Peer.html b/cardano-node/src/Cardano.Tracing.Peer.html index eb19df753b7..8e06c6998a8 100644 --- a/cardano-node/src/Cardano.Tracing.Peer.html +++ b/cardano-node/src/Cardano.Tracing.Peer.html @@ -40,12 +40,12 @@ import Cardano.Tracing.Kernel -data Peer blk = +data Peer blk = Peer !RemoteConnectionId - !(Net.AnchoredFragment (Header blk)) - !(PeerFetchStatus (Header blk)) - !(PeerFetchInFlight (Header blk)) + !(Net.AnchoredFragment (Header blk)) + !(PeerFetchStatus (Header blk)) + !(PeerFetchInFlight (Header blk)) deriving ((forall x. Peer blk -> Rep (Peer blk) x) -> (forall x. Rep (Peer blk) x -> Peer blk) -> Generic (Peer blk) forall x. Rep (Peer blk) x -> Peer blk @@ -57,7 +57,7 @@ $cto :: forall blk x. Rep (Peer blk) x -> Peer blk $cfrom :: forall blk x. Peer blk -> Rep (Peer blk) x Generic) - deriving Context -> Peer blk -> IO (Maybe ThunkInfo) + deriving Context -> Peer blk -> IO (Maybe ThunkInfo) Proxy (Peer blk) -> String (Context -> Peer blk -> IO (Maybe ThunkInfo)) -> (Context -> Peer blk -> IO (Maybe ThunkInfo)) @@ -76,20 +76,20 @@ $cwNoThunks :: forall blk. Context -> Peer blk -> IO (Maybe ThunkInfo) noThunks :: Context -> Peer blk -> IO (Maybe ThunkInfo) $cnoThunks :: forall blk. Context -> Peer blk -> IO (Maybe ThunkInfo) -NoThunks via AllowThunk (Peer blk) +NoThunks via AllowThunk (Peer blk) -instance NFData (Peer blk) where - rnf :: Peer blk -> () +instance NFData (Peer blk) where + rnf :: Peer blk -> () rnf Peer blk _ = () -ppPeer :: Peer blk -> Text +ppPeer :: Peer blk -> Text ppPeer :: Peer blk -> Text -ppPeer (Peer RemoteConnectionId -cid AnchoredFragment (Header blk) -_af PeerFetchStatus (Header blk) -status PeerFetchInFlight (Header blk) -inflight) = +ppPeer (Peer RemoteConnectionId +cid AnchoredFragment (Header blk) +_af PeerFetchStatus (Header blk) +status PeerFetchInFlight (Header blk) +inflight) = String -> Text Text.pack (String -> Text) -> String -> Text forall a b. (a -> b) -> a -> b @@ -98,13 +98,13 @@ printf String "%-15s %-8s %s" (RemoteConnectionId -> String ppCid RemoteConnectionId -cid) (PeerFetchStatus (Header blk) -> String +cid) (PeerFetchStatus (Header blk) -> String forall header. PeerFetchStatus header -> String ppStatus PeerFetchStatus (Header blk) -status) (PeerFetchInFlight (Header blk) -> String +status) (PeerFetchInFlight (Header blk) -> String forall header. PeerFetchInFlight header -> String ppInFlight PeerFetchInFlight (Header blk) -inflight) +inflight) ppCid :: RemoteConnectionId -> String ppCid :: RemoteConnectionId -> String @@ -131,10 +131,10 @@ forall addr. ConnectionId addr -> addr remoteAddress -ppInFlight :: PeerFetchInFlight header -> String +ppInFlight :: PeerFetchInFlight header -> String ppInFlight :: PeerFetchInFlight header -> String -ppInFlight PeerFetchInFlight header -f = String -> String -> Word -> Int -> SizeInBytes -> String +ppInFlight PeerFetchInFlight header +f = String -> String -> Word -> Int -> SizeInBytes -> String forall r. PrintfType r => String -> r printf String @@ -145,11 +145,11 @@ $ PeerFetchInFlight header -> MaxSlotNo forall header. PeerFetchInFlight header -> MaxSlotNo peerFetchMaxSlotNo PeerFetchInFlight header -f) +f) (PeerFetchInFlight header -> Word forall header. PeerFetchInFlight header -> Word peerFetchReqsInFlight PeerFetchInFlight header -f) +f) (Set (Point header) -> Int forall a. Set a -> Int Set.size (Set (Point header) -> Int) -> Set (Point header) -> Int @@ -157,25 +157,25 @@ $ PeerFetchInFlight header -> Set (Point header) forall header. PeerFetchInFlight header -> Set (Point header) peerFetchBlocksInFlight PeerFetchInFlight header -f) +f) (PeerFetchInFlight header -> SizeInBytes forall header. PeerFetchInFlight header -> SizeInBytes peerFetchBytesInFlight PeerFetchInFlight header -f) +f) ppMaxSlotNo :: Net.MaxSlotNo -> String ppMaxSlotNo :: MaxSlotNo -> String ppMaxSlotNo MaxSlotNo Net.NoMaxSlotNo = String "???" -ppMaxSlotNo (Net.MaxSlotNo SlotNo -x) = Word64 -> String +ppMaxSlotNo (Net.MaxSlotNo SlotNo +x) = Word64 -> String forall a b. (Show a, ConvertText String b) => a -> b show (SlotNo -> Word64 unSlotNo SlotNo -x) +x) -ppStatus :: PeerFetchStatus header -> String +ppStatus :: PeerFetchStatus header -> String ppStatus :: PeerFetchStatus header -> String ppStatus PeerFetchStatus header PeerFetchStatusShutdown = String @@ -189,12 +189,12 @@ ppStatus PeerFetchStatusReady {} = String "ready" -getCurrentPeers - :: NodeKernelData blk - -> IO [Peer blk] +getCurrentPeers + :: NodeKernelData blk + -> IO [Peer blk] getCurrentPeers :: NodeKernelData blk -> IO [Peer blk] -getCurrentPeers NodeKernelData blk -nkd = (NodeKernel IO RemoteConnectionId LocalConnectionId blk +getCurrentPeers NodeKernelData blk +nkd = (NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO [Peer blk]) -> NodeKernelData blk -> IO (StrictMaybe [Peer blk]) forall blk a. @@ -205,8 +205,8 @@ forall blk. NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO [Peer blk] -extractPeers NodeKernelData blk -nkd +extractPeers NodeKernelData blk +nkd IO (StrictMaybe [Peer blk]) -> (StrictMaybe [Peer blk] -> [Peer blk]) -> IO [Peer blk] forall (f :: * -> *) a b. Functor f => f a -> (a -> b) -> f b @@ -216,31 +216,31 @@ forall a. Monoid a => a mempty where - tuple3pop :: (a, b, c) -> (a, b) - tuple3pop :: (a, b, c) -> (a, b) -tuple3pop (a -a, b -b, c + tuple3pop :: (a, b, c) -> (a, b) + tuple3pop :: (a, b, c) -> (a, b) +tuple3pop (a +a, b +b, c _) = (a -a, b -b) +a, b +b) - getCandidates - :: STM.StrictTVar IO (Map peer (STM.StrictTVar IO (Net.AnchoredFragment (Header blk)))) - -> STM.STM IO (Map peer (Net.AnchoredFragment (Header blk))) - getCandidates :: StrictTVar + getCandidates + :: STM.StrictTVar IO (Map peer (STM.StrictTVar IO (Net.AnchoredFragment (Header blk)))) + -> STM.STM IO (Map peer (Net.AnchoredFragment (Header blk))) + getCandidates :: StrictTVar IO (Map peer (StrictTVar IO (AnchoredFragment (Header blk)))) -> STM IO (Map peer (AnchoredFragment (Header blk))) -getCandidates StrictTVar +getCandidates StrictTVar IO (Map peer (StrictTVar IO (AnchoredFragment (Header blk)))) -var = StrictTVar +var = StrictTVar IO (Map peer (StrictTVar IO (AnchoredFragment (Header blk)))) -> STM IO (Map peer (StrictTVar IO (AnchoredFragment (Header blk)))) forall (m :: * -> *) a. MonadSTM m => StrictTVar m a -> STM m a STM.readTVar StrictTVar IO (Map peer (StrictTVar IO (AnchoredFragment (Header blk)))) -var STM (Map peer (StrictTVar IO (AnchoredFragment (Header blk)))) +var STM (Map peer (StrictTVar IO (AnchoredFragment (Header blk)))) -> (Map peer (StrictTVar IO (AnchoredFragment (Header blk))) -> STM (Map peer (AnchoredFragment (Header blk)))) -> STM (Map peer (AnchoredFragment (Header blk))) @@ -257,16 +257,16 @@ forall (m :: * -> *) a. MonadSTM m => StrictTVar m a -> STM m a STM.readTVar - extractPeers :: NodeKernel IO RemoteConnectionId LocalConnectionId blk - -> IO [Peer blk] - extractPeers :: NodeKernel IO RemoteConnectionId LocalConnectionId blk + extractPeers :: NodeKernel IO RemoteConnectionId LocalConnectionId blk + -> IO [Peer blk] + extractPeers :: NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO [Peer blk] -extractPeers NodeKernel IO RemoteConnectionId LocalConnectionId blk -kernel = do - Map +extractPeers NodeKernel IO RemoteConnectionId LocalConnectionId blk +kernel = do + Map RemoteConnectionId (PeerFetchStatus (Header blk), PeerFetchInFlight (Header blk)) -peerStates <- ((PeerFetchStatus (Header blk), PeerFetchInFlight (Header blk), +peerStates <- ((PeerFetchStatus (Header blk), PeerFetchInFlight (Header blk), FetchClientStateVars IO (Header blk)) -> (PeerFetchStatus (Header blk), PeerFetchInFlight (Header blk))) -> Map @@ -281,7 +281,7 @@ FetchClientStateVars IO (Header blk)) -> (PeerFetchStatus (Header blk), PeerFetchInFlight (Header blk)) forall a b c. (a, b, c) -> (a, b) -tuple3pop (Map +tuple3pop (Map RemoteConnectionId (PeerFetchStatus (Header blk), PeerFetchInFlight (Header blk), FetchClientStateVars IO (Header blk)) @@ -432,10 +432,10 @@ FetchClientStateVars IO (Header blk))) forall a b. (a -> b) -> a -> b $ NodeKernel IO RemoteConnectionId LocalConnectionId blk -kernel +kernel ) - Map RemoteConnectionId (AnchoredFragment (Header blk)) -candidates <- STM (Map RemoteConnectionId (AnchoredFragment (Header blk))) + Map RemoteConnectionId (AnchoredFragment (Header blk)) +candidates <- STM (Map RemoteConnectionId (AnchoredFragment (Header blk))) -> IO (Map RemoteConnectionId (AnchoredFragment (Header blk))) forall (m :: * -> *) a. (MonadSTM m, HasCallStack) => @@ -458,7 +458,7 @@ StrictTVar IO (Map peer (StrictTVar IO (AnchoredFragment (Header blk)))) -> STM IO (Map peer (AnchoredFragment (Header blk))) -getCandidates (StrictTVar +getCandidates (StrictTVar IO (Map RemoteConnectionId (StrictTVar IO (AnchoredFragment (Header blk)))) @@ -489,10 +489,10 @@ -> IO (Map RemoteConnectionId (AnchoredFragment (Header blk))) forall a b. (a -> b) -> a -> b $ NodeKernel IO RemoteConnectionId LocalConnectionId blk -kernel +kernel - let peers :: Map RemoteConnectionId (Peer blk) -peers = ((RemoteConnectionId + let peers :: Map RemoteConnectionId (Peer blk) +peers = ((RemoteConnectionId -> AnchoredFragment (Header blk) -> Maybe (Peer blk)) -> Map RemoteConnectionId (AnchoredFragment (Header blk)) -> Map RemoteConnectionId (Peer blk)) @@ -507,16 +507,16 @@ -> Map RemoteConnectionId (Peer blk) forall k a b. (k -> a -> Maybe b) -> Map k a -> Map k b Map.mapMaybeWithKey Map RemoteConnectionId (AnchoredFragment (Header blk)) -candidates ((RemoteConnectionId +candidates ((RemoteConnectionId -> AnchoredFragment (Header blk) -> Maybe (Peer blk)) -> Map RemoteConnectionId (Peer blk)) -> (RemoteConnectionId -> AnchoredFragment (Header blk) -> Maybe (Peer blk)) -> Map RemoteConnectionId (Peer blk) forall a b. (a -> b) -> a -> b -$ \RemoteConnectionId -cid AnchoredFragment (Header blk) -af -> +$ \RemoteConnectionId +cid AnchoredFragment (Header blk) +af -> Maybe (Peer blk) -> ((PeerFetchStatus (Header blk), PeerFetchInFlight (Header blk)) -> Maybe (Peer blk)) @@ -527,9 +527,9 @@ maybe Maybe (Peer blk) forall a. Maybe a Nothing - (\(PeerFetchStatus (Header blk) -status, PeerFetchInFlight (Header blk) -inflight) -> Peer blk -> Maybe (Peer blk) + (\(PeerFetchStatus (Header blk) +status, PeerFetchInFlight (Header blk) +inflight) -> Peer blk -> Maybe (Peer blk) forall a. a -> Maybe a Just (Peer blk -> Maybe (Peer blk)) -> Peer blk -> Maybe (Peer blk) forall a b. (a -> b) -> a -> b @@ -545,10 +545,10 @@ -> PeerFetchInFlight (Header blk) -> Peer blk Peer RemoteConnectionId -cid AnchoredFragment (Header blk) -af PeerFetchStatus (Header blk) -status PeerFetchInFlight (Header blk) -inflight) +cid AnchoredFragment (Header blk) +af PeerFetchStatus (Header blk) +status PeerFetchInFlight (Header blk) +inflight) (Maybe (PeerFetchStatus (Header blk), PeerFetchInFlight (Header blk)) -> Maybe (Peer blk)) @@ -564,10 +564,10 @@ (PeerFetchStatus (Header blk), PeerFetchInFlight (Header blk)) forall k a. Ord k => k -> Map k a -> Maybe a Map.lookup RemoteConnectionId -cid Map +cid Map RemoteConnectionId (PeerFetchStatus (Header blk), PeerFetchInFlight (Header blk)) -peerStates +peerStates [Peer blk] -> IO [Peer blk] forall (f :: * -> *) a. Applicative f => a -> f a pure ([Peer blk] -> IO [Peer blk]) @@ -583,32 +583,32 @@ -> Map RemoteConnectionId (Peer blk) -> IO [Peer blk] forall a b. (a -> b) -> a -> b $ Map RemoteConnectionId (Peer blk) -peers +peers -- | Trace peers list, it will be forwarded to an external process -- (for example, to RTView service). -tracePeers +tracePeers :: Trace IO Text - -> [Peer blk] + -> [Peer blk] -> IO () tracePeers :: Trace IO Text -> [Peer blk] -> IO () -tracePeers Trace IO Text -tr [Peer blk] -peers = do - let tr' :: Trace IO Text -tr' = Text -> Trace IO Text -> Trace IO Text +tracePeers Trace IO Text +tr [Peer blk] +peers = do + let tr' :: Trace IO Text +tr' = Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "metrics" Trace IO Text -tr - let tr'' :: Trace IO Text -tr'' = Text -> Trace IO Text -> Trace IO Text +tr + let tr'' :: Trace IO Text +tr'' = Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "peersFromNodeKernel" Trace IO Text -tr' - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta +tr' + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -620,8 +620,8 @@ MonadIO m => Trace m a -> (LOMeta, LOContent a) -> m () traceNamedObject Trace IO Text -tr'' (LOMeta -meta, Object -> LOContent Text +tr'' (LOMeta +meta, Object -> LOContent Text forall a. Object -> LOContent a LogStructured (Object -> LOContent Text) -> Object -> LOContent Text forall a b. (a -> b) -> a -> b @@ -629,13 +629,13 @@ forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity MaximalVerbosity [Peer blk] -peers) +peers) -- | Instances for converting [Peer blk] to Object. -instance ToObject [Peer blk] where - toObject :: TracingVerbosity -> [Peer blk] -> Object -toObject TracingVerbosity +instance ToObject [Peer blk] where + toObject :: TracingVerbosity -> [Peer blk] -> Object +toObject TracingVerbosity MinimalVerbosity [Peer blk] _ = Object forall a. ToObject a => HashMap Text a @@ -644,9 +644,9 @@ _ [] = Object forall a. ToObject a => HashMap Text a emptyObject - toObject TracingVerbosity -verb [Peer blk] -xs = [(Text, Value)] -> Object + toObject TracingVerbosity +verb [Peer blk] +xs = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -666,27 +666,27 @@ forall (t :: * -> *) b a. Foldable t => (b -> a -> b) -> b -> t a -> b -foldl' (\[Object] -acc Peer blk -x -> TracingVerbosity -> Peer blk -> Object +foldl' (\[Object] +acc Peer blk +x -> TracingVerbosity -> Peer blk -> Object forall a. ToObject a => TracingVerbosity -> a -> Object toObject TracingVerbosity -verb Peer blk -x Object -> [Object] -> [Object] +verb Peer blk +x Object -> [Object] -> [Object] forall a. a -> [a] -> [a] : [Object] -acc) [] [Peer blk] -xs) +acc) [] [Peer blk] +xs) ] -instance ToObject (Peer blk) where - toObject :: TracingVerbosity -> Peer blk -> Object -toObject TracingVerbosity -_verb (Peer RemoteConnectionId -cid AnchoredFragment (Header blk) -_af PeerFetchStatus (Header blk) -status PeerFetchInFlight (Header blk) -inflight) = +instance ToObject (Peer blk) where + toObject :: TracingVerbosity -> Peer blk -> Object +toObject TracingVerbosity +_verb (Peer RemoteConnectionId +cid AnchoredFragment (Header blk) +_af PeerFetchStatus (Header blk) +status PeerFetchInFlight (Header blk) +inflight) = [(Text, Value)] -> Object forall a. ToObject a => [(Text, a)] -> HashMap Text a mkObject [ Text @@ -713,7 +713,7 @@ remoteAddress (RemoteConnectionId -> Text) -> RemoteConnectionId -> Text forall a b. (a -> b) -> a -> b $ RemoteConnectionId -cid) +cid) , Text "peerStatus" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -732,7 +732,7 @@ -> PeerFetchStatus (Header blk) -> Text forall a b. (a -> b) -> a -> b $ PeerFetchStatus (Header blk) -status) +status) , Text "peerSlotNo" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -759,7 +759,7 @@ -> PeerFetchInFlight (Header blk) -> Text forall a b. (a -> b) -> a -> b $ PeerFetchInFlight (Header blk) -inflight) +inflight) , Text "peerReqsInF" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -779,7 +779,7 @@ -> PeerFetchInFlight (Header blk) -> Text forall a b. (a -> b) -> a -> b $ PeerFetchInFlight (Header blk) -inflight) +inflight) , Text "peerBlocksInF" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -808,7 +808,7 @@ -> PeerFetchInFlight (Header blk) -> Text forall a b. (a -> b) -> a -> b $ PeerFetchInFlight (Header blk) -inflight) +inflight) , Text "peerBytesInF" Text -> Value -> (Text, Value) forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv @@ -828,6 +828,6 @@ -> PeerFetchInFlight (Header blk) -> Text forall a b. (a -> b) -> a -> b $ PeerFetchInFlight (Header blk) -inflight) +inflight) ] \ No newline at end of file diff --git a/cardano-node/src/Cardano.Tracing.Queries.html b/cardano-node/src/Cardano.Tracing.Queries.html index 4ef49eaaad9..f6d5eac5805 100644 --- a/cardano-node/src/Cardano.Tracing.Queries.html +++ b/cardano-node/src/Cardano.Tracing.Queries.html @@ -26,13 +26,13 @@ import qualified Ouroboros.Consensus.Cardano.Block as Cardano -class LedgerQueries blk where - ledgerUtxoSize :: LedgerState blk -> Int - ledgerDelegMapSize :: LedgerState blk -> Int +class LedgerQueries blk where + ledgerUtxoSize :: LedgerState blk -> Int + ledgerDelegMapSize :: LedgerState blk -> Int instance LedgerQueries Byron.ByronBlock where - ledgerUtxoSize :: LedgerState ByronBlock -> Int -ledgerUtxoSize = Map CompactTxIn CompactTxOut -> Int + ledgerUtxoSize :: LedgerState ByronBlock -> Int +ledgerUtxoSize = Map CompactTxIn CompactTxOut -> Int forall k a. Map k a -> Int Map.size (Map CompactTxIn CompactTxOut -> Int) -> (LedgerState ByronBlock -> Map CompactTxIn CompactTxOut) @@ -53,19 +53,19 @@ forall b c a. (b -> c) -> (a -> b) -> a -> c . LedgerState ByronBlock -> ChainValidationState Byron.byronLedgerState - ledgerDelegMapSize :: LedgerState ByronBlock -> Int -ledgerDelegMapSize LedgerState ByronBlock + ledgerDelegMapSize :: LedgerState ByronBlock -> Int +ledgerDelegMapSize LedgerState ByronBlock _ = Int 0 -instance LedgerQueries (Shelley.ShelleyBlock era) where - ledgerUtxoSize :: LedgerState (ShelleyBlock era) -> Int -ledgerUtxoSize = - (\(Shelley.UTxO Map (TxIn (Crypto era)) (TxOut era) -xs)-> Map (TxIn (Crypto era)) (TxOut era) -> Int +instance LedgerQueries (Shelley.ShelleyBlock era) where + ledgerUtxoSize :: LedgerState (ShelleyBlock era) -> Int +ledgerUtxoSize = + (\(Shelley.UTxO Map (TxIn (Crypto era)) (TxOut era) +xs)-> Map (TxIn (Crypto era)) (TxOut era) -> Int forall k a. Map k a -> Int Map.size Map (TxIn (Crypto era)) (TxOut era) -xs) +xs) (UTxO era -> Int) -> (LedgerState (ShelleyBlock era) -> UTxO era) -> LedgerState (ShelleyBlock era) @@ -106,8 +106,8 @@ . LedgerState (ShelleyBlock era) -> NewEpochState era forall era. LedgerState (ShelleyBlock era) -> NewEpochState era Shelley.shelleyLedgerState - ledgerDelegMapSize :: LedgerState (ShelleyBlock era) -> Int -ledgerDelegMapSize = + ledgerDelegMapSize :: LedgerState (ShelleyBlock era) -> Int +ledgerDelegMapSize = Map (Credential 'Staking (Crypto era)) (KeyHash 'StakePool (Crypto era)) @@ -179,10 +179,10 @@ forall era. LedgerState (ShelleyBlock era) -> NewEpochState era Shelley.shelleyLedgerState -instance (LedgerQueries x, NoHardForks x) - => LedgerQueries (HardForkBlock '[x]) where - ledgerUtxoSize :: LedgerState (HardForkBlock '[x]) -> Int -ledgerUtxoSize = LedgerState x -> Int +instance (LedgerQueries x, NoHardForks x) + => LedgerQueries (HardForkBlock '[x]) where + ledgerUtxoSize :: LedgerState (HardForkBlock '[x]) -> Int +ledgerUtxoSize = LedgerState x -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerUtxoSize (LedgerState x -> Int) -> (LedgerState (HardForkBlock '[x]) -> LedgerState x) @@ -194,8 +194,8 @@ (Isomorphic f, NoHardForks blk) => f (HardForkBlock '[blk]) -> f blk project - ledgerDelegMapSize :: LedgerState (HardForkBlock '[x]) -> Int -ledgerDelegMapSize = LedgerState x -> Int + ledgerDelegMapSize :: LedgerState (HardForkBlock '[x]) -> Int +ledgerDelegMapSize = LedgerState x -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerDelegMapSize (LedgerState x -> Int) -> (LedgerState (HardForkBlock '[x]) -> LedgerState x) @@ -208,59 +208,59 @@ f (HardForkBlock '[blk]) -> f blk project -instance LedgerQueries (Cardano.CardanoBlock c) where - ledgerUtxoSize :: LedgerState (CardanoBlock c) -> Int -ledgerUtxoSize = \case - Cardano.LedgerStateByron LedgerState ByronBlock -ledgerByron -> LedgerState ByronBlock -> Int +instance LedgerQueries (Cardano.CardanoBlock c) where + ledgerUtxoSize :: LedgerState (CardanoBlock c) -> Int +ledgerUtxoSize = \case + Cardano.LedgerStateByron LedgerState ByronBlock +ledgerByron -> LedgerState ByronBlock -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerUtxoSize LedgerState ByronBlock -ledgerByron - Cardano.LedgerStateShelley LedgerState (ShelleyBlock (ShelleyEra c)) -ledgerShelley -> LedgerState (ShelleyBlock (ShelleyEra c)) -> Int +ledgerByron + Cardano.LedgerStateShelley LedgerState (ShelleyBlock (ShelleyEra c)) +ledgerShelley -> LedgerState (ShelleyBlock (ShelleyEra c)) -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerUtxoSize LedgerState (ShelleyBlock (ShelleyEra c)) -ledgerShelley - Cardano.LedgerStateAllegra LedgerState (ShelleyBlock (AllegraEra c)) -ledgerAllegra -> LedgerState (ShelleyBlock (AllegraEra c)) -> Int +ledgerShelley + Cardano.LedgerStateAllegra LedgerState (ShelleyBlock (AllegraEra c)) +ledgerAllegra -> LedgerState (ShelleyBlock (AllegraEra c)) -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerUtxoSize LedgerState (ShelleyBlock (AllegraEra c)) -ledgerAllegra - Cardano.LedgerStateMary LedgerState (ShelleyBlock (MaryEra c)) -ledgerMary -> LedgerState (ShelleyBlock (MaryEra c)) -> Int +ledgerAllegra + Cardano.LedgerStateMary LedgerState (ShelleyBlock (MaryEra c)) +ledgerMary -> LedgerState (ShelleyBlock (MaryEra c)) -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerUtxoSize LedgerState (ShelleyBlock (MaryEra c)) -ledgerMary - Cardano.LedgerStateAlonzo LedgerState (ShelleyBlock (AlonzoEra c)) -ledgerAlonzo -> LedgerState (ShelleyBlock (AlonzoEra c)) -> Int +ledgerMary + Cardano.LedgerStateAlonzo LedgerState (ShelleyBlock (AlonzoEra c)) +ledgerAlonzo -> LedgerState (ShelleyBlock (AlonzoEra c)) -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerUtxoSize LedgerState (ShelleyBlock (AlonzoEra c)) -ledgerAlonzo - ledgerDelegMapSize :: LedgerState (CardanoBlock c) -> Int -ledgerDelegMapSize = \case - Cardano.LedgerStateByron LedgerState ByronBlock -ledgerByron -> LedgerState ByronBlock -> Int +ledgerAlonzo + ledgerDelegMapSize :: LedgerState (CardanoBlock c) -> Int +ledgerDelegMapSize = \case + Cardano.LedgerStateByron LedgerState ByronBlock +ledgerByron -> LedgerState ByronBlock -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerDelegMapSize LedgerState ByronBlock -ledgerByron - Cardano.LedgerStateShelley LedgerState (ShelleyBlock (ShelleyEra c)) -ledgerShelley -> LedgerState (ShelleyBlock (ShelleyEra c)) -> Int +ledgerByron + Cardano.LedgerStateShelley LedgerState (ShelleyBlock (ShelleyEra c)) +ledgerShelley -> LedgerState (ShelleyBlock (ShelleyEra c)) -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerDelegMapSize LedgerState (ShelleyBlock (ShelleyEra c)) -ledgerShelley - Cardano.LedgerStateAllegra LedgerState (ShelleyBlock (AllegraEra c)) -ledgerAllegra -> LedgerState (ShelleyBlock (AllegraEra c)) -> Int +ledgerShelley + Cardano.LedgerStateAllegra LedgerState (ShelleyBlock (AllegraEra c)) +ledgerAllegra -> LedgerState (ShelleyBlock (AllegraEra c)) -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerDelegMapSize LedgerState (ShelleyBlock (AllegraEra c)) -ledgerAllegra - Cardano.LedgerStateMary LedgerState (ShelleyBlock (MaryEra c)) -ledgerMary -> LedgerState (ShelleyBlock (MaryEra c)) -> Int +ledgerAllegra + Cardano.LedgerStateMary LedgerState (ShelleyBlock (MaryEra c)) +ledgerMary -> LedgerState (ShelleyBlock (MaryEra c)) -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerDelegMapSize LedgerState (ShelleyBlock (MaryEra c)) -ledgerMary - Cardano.LedgerStateAlonzo LedgerState (ShelleyBlock (AlonzoEra c)) -ledgerAlonzo -> LedgerState (ShelleyBlock (AlonzoEra c)) -> Int +ledgerMary + Cardano.LedgerStateAlonzo LedgerState (ShelleyBlock (AlonzoEra c)) +ledgerAlonzo -> LedgerState (ShelleyBlock (AlonzoEra c)) -> Int forall blk. LedgerQueries blk => LedgerState blk -> Int ledgerDelegMapSize LedgerState (ShelleyBlock (AlonzoEra c)) -ledgerAlonzo +ledgerAlonzo \ No newline at end of file diff --git a/cardano-node/src/Cardano.Tracing.Render.html b/cardano-node/src/Cardano.Tracing.Render.html index 1814b9eecd0..cc1fd5e1728 100644 --- a/cardano-node/src/Cardano.Tracing.Render.html +++ b/cardano-node/src/Cardano.Tracing.Render.html @@ -42,20 +42,20 @@ renderBlockOrEBB :: BlockOrEBB -> Text renderBlockOrEBB :: BlockOrEBB -> Text -renderBlockOrEBB (Block SlotNo -slotNo) = Text +renderBlockOrEBB (Block SlotNo +slotNo) = Text "Block at " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> SlotNo -> Text renderSlotNo SlotNo -slotNo -renderBlockOrEBB (EBB EpochNo -epochNo) = Text +slotNo +renderBlockOrEBB (EBB EpochNo +epochNo) = Text "Epoch boundary block at " Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> EpochNo -> Text renderEpochNo EpochNo -epochNo +epochNo renderChunkNo :: ChunkNo -> Text renderChunkNo :: ChunkNo -> Text @@ -89,7 +89,7 @@ . EpochNo -> Word64 unEpochNo -renderTipBlockNo :: ImmDB.Tip blk -> Text +renderTipBlockNo :: ImmDB.Tip blk -> Text renderTipBlockNo :: Tip blk -> Text renderTipBlockNo = String -> Text Text.pack (String -> Text) -> (Tip blk -> String) -> Tip blk -> Text @@ -111,10 +111,10 @@ forall blk. Tip blk -> BlockNo ImmDB.tipBlockNo -renderTipHash :: StandardHash blk => ImmDB.Tip blk -> Text +renderTipHash :: StandardHash blk => ImmDB.Tip blk -> Text renderTipHash :: Tip blk -> Text -renderTipHash Tip blk -tInfo = String -> Text +renderTipHash Tip blk +tInfo = String -> Text Text.pack (String -> Text) -> (HeaderHash blk -> String) -> HeaderHash blk -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). @@ -127,18 +127,18 @@ $ Tip blk -> HeaderHash blk forall blk. Tip blk -> HeaderHash blk ImmDB.tipHash Tip blk -tInfo +tInfo -renderTxIdForVerbosity - :: ConvertTxId blk +renderTxIdForVerbosity + :: ConvertTxId blk => TracingVerbosity - -> TxId (GenTx blk) + -> TxId (GenTx blk) -> Text renderTxIdForVerbosity :: TracingVerbosity -> TxId (GenTx blk) -> Text -renderTxIdForVerbosity TracingVerbosity -verb = TracingVerbosity -> Text -> Text +renderTxIdForVerbosity TracingVerbosity +verb = TracingVerbosity -> Text -> Text trimHashTextForVerbosity TracingVerbosity -verb (Text -> Text) +verb (Text -> Text) -> (TxId (GenTx blk) -> Text) -> TxId (GenTx blk) -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -147,7 +147,7 @@ forall blk. ConvertTxId blk => TxId (GenTx blk) -> Text renderTxId -renderTxId :: ConvertTxId blk => TxId (GenTx blk) -> Text +renderTxId :: ConvertTxId blk => TxId (GenTx blk) -> Text renderTxId :: TxId (GenTx blk) -> Text renderTxId = ByteString -> Text Text.decodeLatin1 (ByteString -> Text) @@ -167,17 +167,17 @@ forall blk. ConvertTxId blk => TxId (GenTx blk) -> ByteString txIdToRawBytes -renderWithOrigin :: (a -> Text) -> WithOrigin a -> Text +renderWithOrigin :: (a -> Text) -> WithOrigin a -> Text renderWithOrigin :: (a -> Text) -> WithOrigin a -> Text renderWithOrigin a -> Text _ WithOrigin a Origin = Text "origin" -renderWithOrigin a -> Text -render (At a -a) = a -> Text -render a -a +renderWithOrigin a -> Text +render (At a +a) = a -> Text +render a +a renderSlotNo :: SlotNo -> Text renderSlotNo :: SlotNo -> Text @@ -196,22 +196,22 @@ unSlotNo renderRealPoint - :: forall blk. - ConvertRawHash blk - => RealPoint blk + :: forall blk. + ConvertRawHash blk + => RealPoint blk -> Text renderRealPoint :: RealPoint blk -> Text -renderRealPoint (RealPoint SlotNo -slotNo HeaderHash blk -headerHash) = +renderRealPoint (RealPoint SlotNo +slotNo HeaderHash blk +headerHash) = Proxy blk -> HeaderHash blk -> Text forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) HeaderHash blk -headerHash +Proxy @blk) HeaderHash blk +headerHash Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -220,28 +220,28 @@ forall a. Semigroup a => a -> a -> a <> SlotNo -> Text renderSlotNo SlotNo -slotNo +slotNo -- | Render a short phrase describing a 'RealPoint'. -- e.g. "62292d753b2ee7e903095bc5f10b03cf4209f456ea08f55308e0aaab4350dda4 at -- slot 39920" renderRealPointAsPhrase - :: forall blk. - ConvertRawHash blk - => RealPoint blk + :: forall blk. + ConvertRawHash blk + => RealPoint blk -> Text renderRealPointAsPhrase :: RealPoint blk -> Text -renderRealPointAsPhrase (RealPoint SlotNo -slotNo HeaderHash blk -headerHash) = +renderRealPointAsPhrase (RealPoint SlotNo +slotNo HeaderHash blk +headerHash) = Proxy blk -> HeaderHash blk -> Text forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) HeaderHash blk -headerHash +Proxy @blk) HeaderHash blk +headerHash Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -250,35 +250,35 @@ forall a. Semigroup a => a -> a -> a <> SlotNo -> Text renderSlotNo SlotNo -slotNo +slotNo renderPointForVerbosity - :: forall blk. - ConvertRawHash blk + :: forall blk. + ConvertRawHash blk => TracingVerbosity - -> Point blk + -> Point blk -> Text renderPointForVerbosity :: TracingVerbosity -> Point blk -> Text -renderPointForVerbosity TracingVerbosity -verb Point blk -point = +renderPointForVerbosity TracingVerbosity +verb Point blk +point = case Point blk -point of +point of Point blk GenesisPoint -> Text "genesis (origin)" - BlockPoint SlotNo -slot HeaderHash blk -h -> + BlockPoint SlotNo +slot HeaderHash blk +h -> Proxy blk -> TracingVerbosity -> HeaderHash blk -> Text forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> TracingVerbosity -> HeaderHash blk -> Text renderHeaderHashForVerbosity (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) TracingVerbosity -verb HeaderHash blk -h +Proxy @blk) TracingVerbosity +verb HeaderHash blk +h Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -287,9 +287,9 @@ forall a. Semigroup a => a -> a -> a <> SlotNo -> Text renderSlotNo SlotNo -slot +slot -renderPoint :: ConvertRawHash blk => Point blk -> Text +renderPoint :: ConvertRawHash blk => Point blk -> Text renderPoint :: Point blk -> Text renderPoint = TracingVerbosity -> Point blk -> Text forall blk. @@ -301,26 +301,26 @@ -- | Render a short phrase describing a 'Point'. -- e.g. "62292d753b2ee7e903095bc5f10b03cf4209f456ea08f55308e0aaab4350dda4 at -- slot 39920" or "genesis (origin)" in the case of a genesis point. -renderPointAsPhrase :: forall blk. ConvertRawHash blk => Point blk -> Text +renderPointAsPhrase :: forall blk. ConvertRawHash blk => Point blk -> Text renderPointAsPhrase :: Point blk -> Text -renderPointAsPhrase Point blk -point = +renderPointAsPhrase Point blk +point = case Point blk -point of +point of Point blk GenesisPoint -> Text "genesis (origin)" - BlockPoint SlotNo -slot HeaderHash blk -h -> + BlockPoint SlotNo +slot HeaderHash blk +h -> Proxy blk -> HeaderHash blk -> Text forall blk (proxy :: * -> *). ConvertRawHash blk => proxy blk -> HeaderHash blk -> Text renderHeaderHash (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) HeaderHash blk -h +Proxy @blk) HeaderHash blk +h Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -329,21 +329,21 @@ forall a. Semigroup a => a -> a -> a <> SlotNo -> Text renderSlotNo SlotNo -slot +slot -renderTipForVerbosity - :: ConvertRawHash blk +renderTipForVerbosity + :: ConvertRawHash blk => TracingVerbosity - -> Tip blk + -> Tip blk -> Text renderTipForVerbosity :: TracingVerbosity -> Tip blk -> Text -renderTipForVerbosity TracingVerbosity -verb = TracingVerbosity -> Point blk -> Text +renderTipForVerbosity TracingVerbosity +verb = TracingVerbosity -> Point blk -> Text forall blk. ConvertRawHash blk => TracingVerbosity -> Point blk -> Text renderPointForVerbosity TracingVerbosity -verb (Point blk -> Text) -> (Tip blk -> Point blk) -> Tip blk -> Text +verb (Point blk -> Text) -> (Tip blk -> Point blk) -> Tip blk -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c @@ -351,7 +351,7 @@ forall b. Tip b -> Point b getTipPoint -renderTip :: ConvertRawHash blk => Tip blk -> Text +renderTip :: ConvertRawHash blk => Tip blk -> Text renderTip :: Tip blk -> Text renderTip = TracingVerbosity -> Tip blk -> Text forall blk. @@ -360,19 +360,19 @@ renderTipForVerbosity TracingVerbosity MaximalVerbosity -renderHeaderHashForVerbosity - :: ConvertRawHash blk - => proxy blk +renderHeaderHashForVerbosity + :: ConvertRawHash blk + => proxy blk -> TracingVerbosity - -> HeaderHash blk + -> HeaderHash blk -> Text renderHeaderHashForVerbosity :: proxy blk -> TracingVerbosity -> HeaderHash blk -> Text -renderHeaderHashForVerbosity proxy blk -p TracingVerbosity -verb = +renderHeaderHashForVerbosity proxy blk +p TracingVerbosity +verb = TracingVerbosity -> Text -> Text trimHashTextForVerbosity TracingVerbosity -verb (Text -> Text) +verb (Text -> Text) -> (HeaderHash blk -> Text) -> HeaderHash blk -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -382,13 +382,13 @@ ConvertRawHash blk => proxy blk -> HeaderHash blk -> Text renderHeaderHash proxy blk -p +p -- | Hex encode and render a 'HeaderHash' as text. -renderHeaderHash :: ConvertRawHash blk => proxy blk -> HeaderHash blk -> Text +renderHeaderHash :: ConvertRawHash blk => proxy blk -> HeaderHash blk -> Text renderHeaderHash :: proxy blk -> HeaderHash blk -> Text -renderHeaderHash proxy blk -p = ByteString -> Text +renderHeaderHash proxy blk +p = ByteString -> Text Text.decodeLatin1 (ByteString -> Text) -> (HeaderHash blk -> ByteString) -> HeaderHash blk -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). @@ -405,26 +405,26 @@ ConvertRawHash blk => proxy blk -> HeaderHash blk -> ByteString toRawHash proxy blk -p +p -renderChainHash :: (HeaderHash blk -> Text) -> ChainHash blk -> Text +renderChainHash :: (HeaderHash blk -> Text) -> ChainHash blk -> Text renderChainHash :: (HeaderHash blk -> Text) -> ChainHash blk -> Text renderChainHash HeaderHash blk -> Text _ ChainHash blk GenesisHash = Text "GenesisHash" -renderChainHash HeaderHash blk -> Text -p (BlockHash HeaderHash blk -hash) = HeaderHash blk -> Text -p HeaderHash blk -hash +renderChainHash HeaderHash blk -> Text +p (BlockHash HeaderHash blk +hash) = HeaderHash blk -> Text +p HeaderHash blk +hash trimHashTextForVerbosity :: TracingVerbosity -> Text -> Text trimHashTextForVerbosity :: TracingVerbosity -> Text -> Text -trimHashTextForVerbosity TracingVerbosity -verb = +trimHashTextForVerbosity TracingVerbosity +verb = case TracingVerbosity -verb of +verb of TracingVerbosity MinimalVerbosity -> Int -> Text -> Text Text.take Int diff --git a/cardano-node/src/Cardano.Tracing.Tracers.html b/cardano-node/src/Cardano.Tracing.Tracers.html index 98fa04ed3b5..106456209f8 100644 --- a/cardano-node/src/Cardano.Tracing.Tracers.html +++ b/cardano-node/src/Cardano.Tracing.Tracers.html @@ -112,22 +112,22 @@ {- HLINT ignore "Redundant bracket" -} {- HLINT ignore "Use record patterns" -} -data Tracers peer localPeer blk = Tracers +data Tracers peer localPeer blk = Tracers { -- | Trace the ChainDB Tracers peer localPeer blk -> Tracer IO (TraceEvent blk) -chainDBTracer :: Tracer IO (ChainDB.TraceEvent blk) +chainDBTracer :: Tracer IO (ChainDB.TraceEvent blk) -- | Consensus-specific tracers. , Tracers peer localPeer blk -> Tracers IO peer localPeer blk -consensusTracers :: Consensus.Tracers IO peer localPeer blk +consensusTracers :: Consensus.Tracers IO peer localPeer blk -- | Tracers for the node-to-node protocols. , Tracers peer localPeer blk -> Tracers IO peer blk DeserialiseFailure -nodeToNodeTracers :: NodeToNode.Tracers IO peer blk DeserialiseFailure +nodeToNodeTracers :: NodeToNode.Tracers IO peer blk DeserialiseFailure --, serialisedBlockTracer :: NodeToNode.SerialisedTracer IO peer blk (SerialisedBlockTrace) -- | Tracers for the node-to-client protocols , Tracers peer localPeer blk -> Tracers IO localPeer blk DeserialiseFailure -nodeToClientTracers :: NodeToClient.Tracers IO localPeer blk DeserialiseFailure +nodeToClientTracers :: NodeToClient.Tracers IO localPeer blk DeserialiseFailure -- | Trace the IP subscription manager , Tracers peer localPeer blk -> Tracer IO (WithIPList (SubscriptionTrace SockAddr)) @@ -153,10 +153,10 @@ -- | Trace the Mux , Tracers peer localPeer blk -> Tracer IO (WithMuxBearer peer MuxTrace) -muxTracer :: Tracer IO (WithMuxBearer peer MuxTrace) +muxTracer :: Tracer IO (WithMuxBearer peer MuxTrace) , Tracers peer localPeer blk -> Tracer IO (WithMuxBearer localPeer MuxTrace) -muxLocalTracer :: Tracer IO (WithMuxBearer localPeer MuxTrace) +muxLocalTracer :: Tracer IO (WithMuxBearer localPeer MuxTrace) , Tracers peer localPeer blk -> Tracer IO HandshakeTr handshakeTracer :: Tracer IO NtN.HandshakeTr , Tracers peer localPeer blk -> Tracer IO HandshakeTr @@ -193,7 +193,7 @@ ftTraceNodeIsLeader :: Trace IO Text } -nullTracers :: Tracers peer localPeer blk +nullTracers :: Tracers peer localPeer blk nullTracers :: Tracers peer localPeer blk nullTracers = Tracers :: forall peer localPeer blk. Tracer IO (TraceEvent blk) @@ -278,14 +278,14 @@ } -indexGCType :: ChainDB.TraceGCEvent a -> Int +indexGCType :: ChainDB.TraceGCEvent a -> Int indexGCType :: TraceGCEvent a -> Int indexGCType ChainDB.ScheduledGC{} = Int 1 indexGCType ChainDB.PerformedGC{} = Int 2 -indexReplType :: ChainDB.TraceLedgerReplayEvent a -> Int +indexReplType :: ChainDB.TraceLedgerReplayEvent a -> Int indexReplType :: TraceLedgerReplayEvent a -> Int indexReplType LedgerDB.ReplayFromGenesis{} = Int 1 @@ -294,104 +294,104 @@ indexReplType LedgerDB.ReplayedBlock{} = Int 3 -instance ElidingTracer (WithSeverity (ChainDB.TraceEvent blk)) where +instance ElidingTracer (WithSeverity (ChainDB.TraceEvent blk)) where -- equivalent by type and severity - isEquivalent :: WithSeverity (TraceEvent blk) + isEquivalent :: WithSeverity (TraceEvent blk) -> WithSeverity (TraceEvent blk) -> Bool -isEquivalent (WithSeverity Severity -s1 (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk -ev1)) - (WithSeverity Severity -s2 (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk -ev2)) = +isEquivalent (WithSeverity Severity +s1 (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk +ev1)) + (WithSeverity Severity +s2 (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk +ev2)) = Severity -s1 Severity -> Severity -> Bool +s1 Severity -> Severity -> Bool forall a. Eq a => a -> a -> Bool == Severity -s2 Bool -> Bool -> Bool +s2 Bool -> Bool -> Bool && TraceLedgerReplayEvent blk -> Int forall a. TraceLedgerReplayEvent a -> Int indexReplType TraceLedgerReplayEvent blk -ev1 Int -> Int -> Bool +ev1 Int -> Int -> Bool forall a. Eq a => a -> a -> Bool == TraceLedgerReplayEvent blk -> Int forall a. TraceLedgerReplayEvent a -> Int indexReplType TraceLedgerReplayEvent blk -ev2 - isEquivalent (WithSeverity Severity -s1 (ChainDB.TraceGCEvent TraceGCEvent blk -ev1)) - (WithSeverity Severity -s2 (ChainDB.TraceGCEvent TraceGCEvent blk -ev2)) = +ev2 + isEquivalent (WithSeverity Severity +s1 (ChainDB.TraceGCEvent TraceGCEvent blk +ev1)) + (WithSeverity Severity +s2 (ChainDB.TraceGCEvent TraceGCEvent blk +ev2)) = Severity -s1 Severity -> Severity -> Bool +s1 Severity -> Severity -> Bool forall a. Eq a => a -> a -> Bool == Severity -s2 Bool -> Bool -> Bool +s2 Bool -> Bool -> Bool && TraceGCEvent blk -> Int forall a. TraceGCEvent a -> Int indexGCType TraceGCEvent blk -ev1 Int -> Int -> Bool +ev1 Int -> Int -> Bool forall a. Eq a => a -> a -> Bool == TraceGCEvent blk -> Int forall a. TraceGCEvent a -> Int indexGCType TraceGCEvent blk -ev2 - isEquivalent (WithSeverity Severity -_s1 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk +ev2 + isEquivalent (WithSeverity Severity +_s1 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk _)) - (WithSeverity Severity -_s2 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk + (WithSeverity Severity +_s2 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk _)) = Bool True - isEquivalent (WithSeverity Severity -_s1 (ChainDB.TraceGCEvent TraceGCEvent blk -_ev1)) - (WithSeverity Severity -_s2 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk + isEquivalent (WithSeverity Severity +_s1 (ChainDB.TraceGCEvent TraceGCEvent blk +_ev1)) + (WithSeverity Severity +_s2 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk _)) = Bool True - isEquivalent (WithSeverity Severity -_s1 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk + isEquivalent (WithSeverity Severity +_s1 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk _)) - (WithSeverity Severity -_s2 (ChainDB.TraceGCEvent TraceGCEvent blk -_ev2)) = Bool + (WithSeverity Severity +_s2 (ChainDB.TraceGCEvent TraceGCEvent blk +_ev2)) = Bool True - isEquivalent (WithSeverity Severity -_s1 (ChainDB.TraceGCEvent TraceGCEvent blk -_ev1)) - (WithSeverity Severity -_s2 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk + isEquivalent (WithSeverity Severity +_s1 (ChainDB.TraceGCEvent TraceGCEvent blk +_ev1)) + (WithSeverity Severity +_s2 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk _)) = Bool True - isEquivalent (WithSeverity Severity -_s1 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk + isEquivalent (WithSeverity Severity +_s1 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk _)) - (WithSeverity Severity -_s2 (ChainDB.TraceGCEvent TraceGCEvent blk -_ev2)) = Bool + (WithSeverity Severity +_s2 (ChainDB.TraceGCEvent TraceGCEvent blk +_ev2)) = Bool True - isEquivalent (WithSeverity Severity -_s1 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk + isEquivalent (WithSeverity Severity +_s1 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk _)) - (WithSeverity Severity -_s2 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk + (WithSeverity Severity +_s2 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk _)) = Bool True - isEquivalent (WithSeverity Severity -_s1 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk + isEquivalent (WithSeverity Severity +_s1 (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk _)) - (WithSeverity Severity -_s2 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk + (WithSeverity Severity +_s2 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk _)) = Bool True - isEquivalent (WithSeverity Severity -_s1 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk + isEquivalent (WithSeverity Severity +_s1 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk _)) - (WithSeverity Severity -_s2 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk + (WithSeverity Severity +_s2 (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk _)) = Bool True isEquivalent WithSeverity (TraceEvent blk) @@ -399,7 +399,7 @@ _ = Bool False -- the types to be elided - doelide :: WithSeverity (TraceEvent blk) -> Bool + doelide :: WithSeverity (TraceEvent blk) -> Bool doelide (WithSeverity Severity _ (ChainDB.TraceLedgerReplayEvent TraceLedgerReplayEvent blk _)) = Bool @@ -447,14 +447,14 @@ _ (ChainDB.TraceAddBlockEvent (ChainDB.AddBlockValidation ChainDB.CandidateContainsFutureBlocksExceedingClockSkew{}))) = Bool False doelide (WithSeverity Severity -_ (ChainDB.TraceAddBlockEvent (ChainDB.AddedToCurrentChain [LedgerEvent blk] -events NewTipInfo blk +_ (ChainDB.TraceAddBlockEvent (ChainDB.AddedToCurrentChain [LedgerEvent blk] +events NewTipInfo blk _ AnchoredFragment (Header blk) _ AnchoredFragment (Header blk) _))) = [LedgerEvent blk] -> Bool forall (t :: * -> *) a. Foldable t => t a -> Bool null [LedgerEvent blk] -events +events doelide (WithSeverity Severity _ (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk _)) = Bool @@ -466,45 +466,45 @@ doelide WithSeverity (TraceEvent blk) _ = Bool False - conteliding :: TracingVerbosity + conteliding :: TracingVerbosity -> Trace IO t -> WithSeverity (TraceEvent blk) -> (Maybe (WithSeverity (TraceEvent blk)), Integer) -> IO (Maybe (WithSeverity (TraceEvent blk)), Integer) -conteliding TracingVerbosity -_tverb Trace IO t -_tr WithSeverity (TraceEvent blk) +conteliding TracingVerbosity +_tverb Trace IO t +_tr WithSeverity (TraceEvent blk) _ (Maybe (WithSeverity (TraceEvent blk)) -Nothing, Integer -_count) = (Maybe (WithSeverity (TraceEvent blk)), Integer) +Nothing, Integer +_count) = (Maybe (WithSeverity (TraceEvent blk)), Integer) -> IO (Maybe (WithSeverity (TraceEvent blk)), Integer) forall (m :: * -> *) a. Monad m => a -> m a return (Maybe (WithSeverity (TraceEvent blk)) forall a. Maybe a Nothing, Integer 0) - conteliding TracingVerbosity -tverb Trace IO t -tr ev :: WithSeverity (TraceEvent blk) -ev@(WithSeverity Severity -_ (ChainDB.TraceAddBlockEvent ChainDB.AddedToCurrentChain{})) (Maybe (WithSeverity (TraceEvent blk)) -_old, Integer -oldt) = do - Integer -tnow <- Word64 -> Integer + conteliding TracingVerbosity +tverb Trace IO t +tr ev :: WithSeverity (TraceEvent blk) +ev@(WithSeverity Severity +_ (ChainDB.TraceAddBlockEvent ChainDB.AddedToCurrentChain{})) (Maybe (WithSeverity (TraceEvent blk)) +_old, Integer +oldt) = do + Integer +tnow <- Word64 -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral (Word64 -> Integer) -> IO Word64 -> IO Integer forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> IO Word64 getMonotonicTimeNSec - let deltat :: Integer -deltat = Integer -tnow Integer -> Integer -> Integer + let deltat :: Integer +deltat = Integer +tnow Integer -> Integer -> Integer forall a. Num a => a -> a -> a - Integer -oldt +oldt if Integer -deltat Integer -> Integer -> Bool +deltat Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool > Integer 1250000000 -- report at most every 1250 ms @@ -518,9 +518,9 @@ (ToLogObject m, ToObject a, Transformable a m b) => TracingVerbosity -> Trace m a -> Tracer m b toLogObject' TracingVerbosity -tverb Trace IO t -tr) WithSeverity (TraceEvent blk) -ev +tverb Trace IO t +tr) WithSeverity (TraceEvent blk) +ev (Maybe (WithSeverity (TraceEvent blk)), Integer) -> IO (Maybe (WithSeverity (TraceEvent blk)), Integer) forall (m :: * -> *) a. Monad m => a -> m a @@ -528,8 +528,8 @@ -> Maybe (WithSeverity (TraceEvent blk)) forall a. a -> Maybe a Just WithSeverity (TraceEvent blk) -ev, Integer -tnow) +ev, Integer +tnow) else (Maybe (WithSeverity (TraceEvent blk)), Integer) -> IO (Maybe (WithSeverity (TraceEvent blk)), Integer) forall (m :: * -> *) a. Monad m => a -> m a @@ -537,16 +537,16 @@ -> Maybe (WithSeverity (TraceEvent blk)) forall a. a -> Maybe a Just WithSeverity (TraceEvent blk) -ev, Integer -oldt) - conteliding TracingVerbosity -_tverb Trace IO t -_tr ev :: WithSeverity (TraceEvent blk) -ev@(WithSeverity Severity +ev, Integer +oldt) + conteliding TracingVerbosity +_tverb Trace IO t +_tr ev :: WithSeverity (TraceEvent blk) +ev@(WithSeverity Severity _ (ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk -_)) (Maybe (WithSeverity (TraceEvent blk)) -_old, Integer -count) = +_)) (Maybe (WithSeverity (TraceEvent blk)) +_old, Integer +count) = (Maybe (WithSeverity (TraceEvent blk)), Integer) -> IO (Maybe (WithSeverity (TraceEvent blk)), Integer) forall (m :: * -> *) a. Monad m => a -> m a @@ -554,16 +554,16 @@ -> Maybe (WithSeverity (TraceEvent blk)) forall a. a -> Maybe a Just WithSeverity (TraceEvent blk) -ev, Integer -count) - conteliding TracingVerbosity -_tverb Trace IO t -_tr ev :: WithSeverity (TraceEvent blk) -ev@(WithSeverity Severity +ev, Integer +count) + conteliding TracingVerbosity +_tverb Trace IO t +_tr ev :: WithSeverity (TraceEvent blk) +ev@(WithSeverity Severity _ (ChainDB.TraceCopyToImmutableDBEvent TraceCopyToImmutableDBEvent blk -_)) (Maybe (WithSeverity (TraceEvent blk)) -_old, Integer -count) = +_)) (Maybe (WithSeverity (TraceEvent blk)) +_old, Integer +count) = (Maybe (WithSeverity (TraceEvent blk)), Integer) -> IO (Maybe (WithSeverity (TraceEvent blk)), Integer) forall (m :: * -> *) a. Monad m => a -> m a @@ -571,16 +571,16 @@ -> Maybe (WithSeverity (TraceEvent blk)) forall a. a -> Maybe a Just WithSeverity (TraceEvent blk) -ev, Integer -count) - conteliding TracingVerbosity -_tverb Trace IO t -_tr ev :: WithSeverity (TraceEvent blk) -ev@(WithSeverity Severity +ev, Integer +count) + conteliding TracingVerbosity +_tverb Trace IO t +_tr ev :: WithSeverity (TraceEvent blk) +ev@(WithSeverity Severity _ (ChainDB.TraceGCEvent TraceGCEvent blk -_)) (Maybe (WithSeverity (TraceEvent blk)) -_old, Integer -count) = +_)) (Maybe (WithSeverity (TraceEvent blk)) +_old, Integer +count) = (Maybe (WithSeverity (TraceEvent blk)), Integer) -> IO (Maybe (WithSeverity (TraceEvent blk)), Integer) forall (m :: * -> *) a. Monad m => a -> m a @@ -588,19 +588,19 @@ -> Maybe (WithSeverity (TraceEvent blk)) forall a. a -> Maybe a Just WithSeverity (TraceEvent blk) -ev, Integer -count) - conteliding TracingVerbosity -_tverb Trace IO t -tr ev :: WithSeverity (TraceEvent blk) -ev@(WithSeverity Severity -_ (ChainDB.TraceLedgerReplayEvent (LedgerDB.ReplayedBlock RealPoint blk -pt [] Point blk -replayTo))) (Maybe (WithSeverity (TraceEvent blk)) -_old, Integer -count) = do - let slotno :: Integer -slotno = Word64 -> Integer +ev, Integer +count) + conteliding TracingVerbosity +_tverb Trace IO t +tr ev :: WithSeverity (TraceEvent blk) +ev@(WithSeverity Severity +_ (ChainDB.TraceLedgerReplayEvent (LedgerDB.ReplayedBlock RealPoint blk +pt [] Point blk +replayTo))) (Maybe (WithSeverity (TraceEvent blk)) +_old, Integer +count) = do + let slotno :: Integer +slotno = Word64 -> Integer forall a. Integral a => a -> Integer toInteger (Word64 -> Integer) -> Word64 -> Integer forall a b. (a -> b) -> a -> b @@ -608,9 +608,9 @@ unSlotNo (RealPoint blk -> SlotNo forall blk. RealPoint blk -> SlotNo realPointSlot RealPoint blk -pt) - endslot :: Integer -endslot = Word64 -> Integer +pt) + endslot :: Integer +endslot = Word64 -> Integer forall a. Integral a => a -> Integer toInteger (Word64 -> Integer) -> Word64 -> Integer forall a b. (a -> b) -> a -> b @@ -621,22 +621,22 @@ unSlotNo (Point blk -> WithOrigin SlotNo forall block. Point block -> WithOrigin SlotNo pointSlot Point blk -replayTo) - startslot :: Integer -startslot = if Integer -count Integer -> Integer -> Bool +replayTo) + startslot :: Integer +startslot = if Integer +count Integer -> Integer -> Bool forall a. Eq a => a -> a -> Bool == Integer 0 then Integer -slotno else Integer -> Integer +slotno else Integer -> Integer forall a. Integral a => a -> Integer toInteger Integer -count - Double -progress :: Double = (Integer -> Double +count + Double +progress :: Double = (Integer -> Double forall a. Num a => Integer -> a fromInteger Integer -slotno Double -> Double -> Double +slotno Double -> Double -> Double forall a. Num a => a -> a -> a * Double 100.0) Double -> Double -> Double @@ -646,20 +646,20 @@ fromInteger (Integer -> Integer -> Integer forall a. Ord a => a -> a -> a max Integer -slotno Integer -endslot) +slotno Integer +endslot) Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Integer -count Integer -> Integer -> Bool +count Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool > Integer 0 Bool -> Bool -> Bool && (Integer -slotno Integer -> Integer -> Integer +slotno Integer -> Integer -> Integer forall a. Num a => a -> a -> a - Integer -startslot) Integer -> Integer -> Integer +startslot) Integer -> Integer -> Integer forall a. Integral a => a -> a -> a `mod` Integer 1000 Integer -> Integer -> Bool @@ -668,25 +668,25 @@ 0) (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ do -- report every 1000th slot - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta mkLOMeta (WithSeverity (TraceEvent blk) -> Severity forall a. HasSeverityAnnotation a => a -> Severity getSeverityAnnotation WithSeverity (TraceEvent blk) -ev) (WithSeverity (TraceEvent blk) -> PrivacyAnnotation +ev) (WithSeverity (TraceEvent blk) -> PrivacyAnnotation forall a. HasPrivacyAnnotation a => a -> PrivacyAnnotation getPrivacyAnnotation WithSeverity (TraceEvent blk) -ev) +ev) Trace IO t -> (LOMeta, LOContent t) -> IO () forall (m :: * -> *) a. MonadIO m => Trace m a -> (LOMeta, LOContent a) -> m () traceNamedObject Trace IO t -tr (LOMeta -meta, Text -> Measurable -> LOContent t +tr (LOMeta +meta, Text -> Measurable -> LOContent t forall a. Text -> Measurable -> LOContent a LogValue Text "block replay progress (%)" (Double -> Measurable @@ -695,7 +695,7 @@ fromInteger (Double -> Integer forall a b. (RealFrac a, Integral b) => a -> b round (Double -progress Double -> Double -> Double +progress Double -> Double -> Double forall a. Num a => a -> a -> a * Double 10.0)) Double -> Double -> Double @@ -709,10 +709,10 @@ -> Maybe (WithSeverity (TraceEvent blk)) forall a. a -> Maybe a Just WithSeverity (TraceEvent blk) -ev, Integer -> Integer +ev, Integer -> Integer forall a. Num a => Integer -> a fromInteger Integer -startslot) +startslot) conteliding TracingVerbosity _ Trace IO t _ WithSeverity (TraceEvent blk) @@ -725,47 +725,47 @@ Nothing, Integer 0) -instance (StandardHash header, Eq peer) => ElidingTracer - (WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])]) where +instance (StandardHash header, Eq peer) => ElidingTracer + (WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])]) where -- equivalent by type and severity - isEquivalent :: WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] + isEquivalent :: WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] -> WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] -> Bool -isEquivalent (WithSeverity Severity -s1 [TraceLabelPeer peer (FetchDecision [Point header])] -_peers1) - (WithSeverity Severity -s2 [TraceLabelPeer peer (FetchDecision [Point header])] -_peers2) = Severity -s1 Severity -> Severity -> Bool +isEquivalent (WithSeverity Severity +s1 [TraceLabelPeer peer (FetchDecision [Point header])] +_peers1) + (WithSeverity Severity +s2 [TraceLabelPeer peer (FetchDecision [Point header])] +_peers2) = Severity +s1 Severity -> Severity -> Bool forall a. Eq a => a -> a -> Bool == Severity -s2 +s2 -- the types to be elided - doelide :: WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] + doelide :: WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] -> Bool -doelide (WithSeverity Severity -_ [TraceLabelPeer peer (FetchDecision [Point header])] -peers) = - let checkDecision :: TraceLabelPeer peer (Either FetchDecline result) -> Bool - checkDecision :: TraceLabelPeer peer (Either FetchDecline result) -> Bool -checkDecision (TraceLabelPeer peer -_peer (Left FetchDecline +doelide (WithSeverity Severity +_ [TraceLabelPeer peer (FetchDecision [Point header])] +peers) = + let checkDecision :: TraceLabelPeer peer (Either FetchDecline result) -> Bool + checkDecision :: TraceLabelPeer peer (Either FetchDecline result) -> Bool +checkDecision (TraceLabelPeer peer +_peer (Left FetchDecline FetchDeclineChainNotPlausible)) = Bool True - checkDecision (TraceLabelPeer peer -_peer (Left (FetchDeclineConcurrencyLimit FetchMode + checkDecision (TraceLabelPeer peer +_peer (Left (FetchDeclineConcurrencyLimit FetchMode _ Word _))) = Bool True - checkDecision (TraceLabelPeer peer -_peer (Left (FetchDeclinePeerBusy SizeInBytes + checkDecision (TraceLabelPeer peer +_peer (Left (FetchDeclinePeerBusy SizeInBytes _ SizeInBytes _ SizeInBytes _))) = Bool True - checkDecision TraceLabelPeer peer (Either FetchDecline result) + checkDecision TraceLabelPeer peer (Either FetchDecline result) _ = Bool False in (TraceLabelPeer peer (FetchDecision [Point header]) -> Bool) @@ -774,9 +774,9 @@ any TraceLabelPeer peer (FetchDecision [Point header]) -> Bool forall result. TraceLabelPeer peer (Either FetchDecline result) -> Bool -checkDecision [TraceLabelPeer peer (FetchDecision [Point header])] -peers - conteliding :: TracingVerbosity +checkDecision [TraceLabelPeer peer (FetchDecision [Point header])] +peers + conteliding :: TracingVerbosity -> Trace IO t -> WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] @@ -789,13 +789,13 @@ (WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])]), Integer) -conteliding TracingVerbosity -_tverb Trace IO t -_tr WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] +conteliding TracingVerbosity +_tverb Trace IO t +_tr WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] _ (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])]) -Nothing, Integer -_count) = (Maybe +Nothing, Integer +_count) = (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])]), Integer) @@ -810,22 +810,22 @@ forall a. Maybe a Nothing, Integer 0) - conteliding TracingVerbosity -tverb Trace IO t -tr WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] -ev (Maybe + conteliding TracingVerbosity +tverb Trace IO t +tr WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] +ev (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])]) -_old, Integer -count) = do +_old, Integer +count) = do Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Integer -count Integer -> Integer -> Bool +count Integer -> Integer -> Bool forall a. Ord a => a -> a -> Bool > Integer 0 Bool -> Bool -> Bool && Integer -count Integer -> Integer -> Integer +count Integer -> Integer -> Integer forall a. Integral a => a -> a -> a `mod` Integer 1000 Integer -> Integer -> Bool @@ -850,9 +850,9 @@ (ToLogObject m, ToObject a, Transformable a m b) => TracingVerbosity -> Trace m a -> Tracer m b toLogObject' TracingVerbosity -tverb Trace IO t -tr) WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] -ev +tverb Trace IO t +tr) WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] +ev (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])]), @@ -868,8 +868,8 @@ (WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])]) forall a. a -> Maybe a Just WithSeverity [TraceLabelPeer peer (FetchDecision [Point header])] -ev, Integer -count Integer -> Integer -> Integer +ev, Integer +count Integer -> Integer -> Integer forall a. Num a => a -> a -> a + Integer 1) @@ -877,38 +877,38 @@ -- | Tracers for all system components. -- mkTracers - :: forall peer localPeer blk. - ( Consensus.RunNode blk - , HasKESMetricsData blk - , HasKESInfo blk - , TraceConstraints blk - , Show peer, Eq peer, ToObject peer - , Show localPeer, ToObject localPeer + :: forall peer localPeer blk. + ( Consensus.RunNode blk + , HasKESMetricsData blk + , HasKESInfo blk + , TraceConstraints blk + , Show peer, Eq peer, ToObject peer + , Show localPeer, ToObject localPeer ) - => BlockConfig blk + => BlockConfig blk -> TraceOptions -> Trace IO Text - -> NodeKernelData blk + -> NodeKernelData blk -> Maybe EKGDirect - -> IO (Tracers peer localPeer blk) + -> IO (Tracers peer localPeer blk) mkTracers :: BlockConfig blk -> TraceOptions -> Trace IO Text -> NodeKernelData blk -> Maybe EKGDirect -> IO (Tracers peer localPeer blk) -mkTracers BlockConfig blk -blockConfig tOpts :: TraceOptions -tOpts@(TracingOn TraceSelection -trSel) Trace IO Text -tr NodeKernelData blk -nodeKern Maybe EKGDirect -ekgDirect = do - ForgingStats -fStats <- IO ForgingStats +mkTracers BlockConfig blk +blockConfig tOpts :: TraceOptions +tOpts@(TracingOn TraceSelection +trSel) Trace IO Text +tr NodeKernelData blk +nodeKern Maybe EKGDirect +ekgDirect = do + ForgingStats +fStats <- IO ForgingStats mkForgingStats - Tracers' peer localPeer blk (Tracer IO) -consensusTracers <- Maybe EKGDirect + Tracers' peer localPeer blk (Tracer IO) +consensusTracers <- Maybe EKGDirect -> TraceSelection -> TracingVerbosity -> Trace IO Text @@ -931,14 +931,14 @@ -> ForgingStats -> IO (Tracers' peer localPeer blk (Tracer IO)) mkConsensusTracers Maybe EKGDirect -ekgDirect TraceSelection -trSel TracingVerbosity -verb Trace IO Text -tr NodeKernelData blk -nodeKern ForgingStats -fStats - MVar (Maybe (WithSeverity (TraceEvent blk)), Integer) -elidedChainDB <- IO (MVar (Maybe (WithSeverity (TraceEvent blk)), Integer)) +ekgDirect TraceSelection +trSel TracingVerbosity +verb Trace IO Text +tr NodeKernelData blk +nodeKern ForgingStats +fStats + MVar (Maybe (WithSeverity (TraceEvent blk)), Integer) +elidedChainDB <- IO (MVar (Maybe (WithSeverity (TraceEvent blk)), Integer)) forall a. ElidingTracer a => IO (MVar (Maybe a, Integer)) newstate -- for eliding messages in ChainDB tracer @@ -968,7 +968,7 @@ forall (b :: Symbol) a. OnOff b -> Tracer IO a -> Tracer IO a tracerOnOff' (TraceSelection -> OnOff TraceChainDB traceChainDB TraceSelection -trSel) (Tracer IO (TraceEvent blk) -> Tracer IO (TraceEvent blk)) +trSel) (Tracer IO (TraceEvent blk) -> Tracer IO (TraceEvent blk)) -> Tracer IO (TraceEvent blk) -> Tracer IO (TraceEvent blk) forall a b. (a -> b) -> a -> b $ @@ -1003,27 +1003,27 @@ -> Tracer IO (WithSeverity (TraceEvent blk)) teeTraceChainTip BlockConfig blk -blockConfig +blockConfig ForgingStats -fStats +fStats TraceOptions -tOpts MVar (Maybe (WithSeverity (TraceEvent blk)), Integer) -elidedChainDB +tOpts MVar (Maybe (WithSeverity (TraceEvent blk)), Integer) +elidedChainDB Maybe EKGDirect -ekgDirect +ekgDirect (Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "ChainDB" Trace IO Text -tr) +tr) (Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "metrics" Trace IO Text -tr) +tr) , consensusTracers :: Tracers' peer localPeer blk (Tracer IO) consensusTracers = Tracers' peer localPeer blk (Tracer IO) -consensusTracers +consensusTracers , nodeToClientTracers :: Tracers IO localPeer blk DeserialiseFailure nodeToClientTracers = TraceSelection -> TracingVerbosity @@ -1037,9 +1037,9 @@ -> Trace IO Text -> Tracers' localPeer blk DeserialiseFailure (Tracer IO) nodeToClientTracers' TraceSelection -trSel TracingVerbosity -verb Trace IO Text -tr +trSel TracingVerbosity +verb Trace IO Text +tr , nodeToNodeTracers :: Tracers IO peer blk DeserialiseFailure nodeToNodeTracers = TraceSelection -> TracingVerbosity @@ -1053,9 +1053,9 @@ -> Trace IO Text -> Tracers' peer blk DeserialiseFailure (Tracer IO) nodeToNodeTracers' TraceSelection -trSel TracingVerbosity -verb Trace IO Text -tr +trSel TracingVerbosity +verb Trace IO Text +tr , ipSubscriptionTracer :: Tracer IO (WithIPList (SubscriptionTrace SockAddr)) ipSubscriptionTracer = OnOff TraceIpSubscription -> TracingVerbosity @@ -1067,10 +1067,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceIpSubscription traceIpSubscription TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "IpSubscription" Trace IO Text -tr +tr , dnsSubscriptionTracer :: Tracer IO (WithDomainName (SubscriptionTrace SockAddr)) dnsSubscriptionTracer = OnOff TraceDnsSubscription -> TracingVerbosity @@ -1082,10 +1082,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceDnsSubscription traceDnsSubscription TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "DnsSubscription" Trace IO Text -tr +tr , dnsResolverTracer :: Tracer IO (WithDomainName DnsTrace) dnsResolverTracer = OnOff TraceDnsResolver -> TracingVerbosity @@ -1097,10 +1097,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceDnsResolver traceDnsResolver TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "DnsResolver" Trace IO Text -tr +tr , errorPolicyTracer :: Tracer IO (WithAddr SockAddr ErrorPolicyTrace) errorPolicyTracer = OnOff TraceErrorPolicy -> TracingVerbosity @@ -1112,10 +1112,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceErrorPolicy traceErrorPolicy TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "ErrorPolicy" Trace IO Text -tr +tr , localErrorPolicyTracer :: Tracer IO (WithAddr LocalAddress ErrorPolicyTrace) localErrorPolicyTracer = OnOff TraceLocalErrorPolicy -> TracingVerbosity @@ -1127,10 +1127,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceLocalErrorPolicy traceLocalErrorPolicy TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "LocalErrorPolicy" Trace IO Text -tr +tr , acceptPolicyTracer :: Tracer IO AcceptConnectionsPolicyTrace acceptPolicyTracer = OnOff TraceAcceptPolicy -> TracingVerbosity @@ -1142,10 +1142,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceAcceptPolicy traceAcceptPolicy TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "AcceptPolicy" Trace IO Text -tr +tr , muxTracer :: Tracer IO (WithMuxBearer peer MuxTrace) muxTracer = OnOff TraceMux -> TracingVerbosity @@ -1157,10 +1157,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceMux traceMux TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "Mux" Trace IO Text -tr +tr , muxLocalTracer :: Tracer IO (WithMuxBearer localPeer MuxTrace) muxLocalTracer = OnOff TraceLocalMux -> TracingVerbosity @@ -1172,10 +1172,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceLocalMux traceLocalMux TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "MuxLocal" Trace IO Text -tr +tr , handshakeTracer :: Tracer IO HandshakeTr handshakeTracer = OnOff TraceHandshake -> TracingVerbosity @@ -1187,10 +1187,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceHandshake traceHandshake TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "Handshake" Trace IO Text -tr +tr , localHandshakeTracer :: Tracer IO HandshakeTr localHandshakeTracer = OnOff TraceLocalHandshake -> TracingVerbosity @@ -1202,10 +1202,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceLocalHandshake traceLocalHandshake TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "LocalHandshake" Trace IO Text -tr +tr , diffusionInitializationTracer :: Tracer IO DiffusionInitializationTracer diffusionInitializationTracer = OnOff TraceDiffusionInitialization -> TracingVerbosity @@ -1217,17 +1217,17 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceDiffusionInitialization traceDiffusionInitialization TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "DiffusionInitializationTracer" Trace IO Text -tr +tr } where - verb :: TracingVerbosity - verb :: TracingVerbosity -verb = TraceSelection -> TracingVerbosity + verb :: TracingVerbosity + verb :: TracingVerbosity +verb = TraceSelection -> TracingVerbosity traceVerbosity TraceSelection -trSel +trSel mkTracers BlockConfig blk _ TraceOptions @@ -1537,21 +1537,21 @@ -- Chain DB Tracers -------------------------------------------------------------------------------- -teeTraceChainTip - :: ( ConvertRawHash blk - , LedgerSupportsProtocol blk - , InspectLedger blk - , ToObject (Header blk) - , ToObject (LedgerEvent blk) +teeTraceChainTip + :: ( ConvertRawHash blk + , LedgerSupportsProtocol blk + , InspectLedger blk + , ToObject (Header blk) + , ToObject (LedgerEvent blk) ) - => BlockConfig blk + => BlockConfig blk -> ForgingStats -> TraceOptions - -> MVar (Maybe (WithSeverity (ChainDB.TraceEvent blk)), Integer) + -> MVar (Maybe (WithSeverity (ChainDB.TraceEvent blk)), Integer) -> Maybe EKGDirect -> Trace IO Text -> Trace IO Text - -> Tracer IO (WithSeverity (ChainDB.TraceEvent blk)) + -> Tracer IO (WithSeverity (ChainDB.TraceEvent blk)) teeTraceChainTip :: BlockConfig blk -> ForgingStats -> TraceOptions @@ -1570,14 +1570,14 @@ _ = Tracer IO (WithSeverity (TraceEvent blk)) forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer -teeTraceChainTip BlockConfig blk -blockConfig ForgingStats -fStats (TracingOn TraceSelection -trSel) MVar (Maybe (WithSeverity (TraceEvent blk)), Integer) -elided Maybe EKGDirect -ekgDirect Trace IO Text -trTrc Trace IO Text -trMet = +teeTraceChainTip BlockConfig blk +blockConfig ForgingStats +fStats (TracingOn TraceSelection +trSel) MVar (Maybe (WithSeverity (TraceEvent blk)), Integer) +elided Maybe EKGDirect +ekgDirect Trace IO Text +trTrc Trace IO Text +trMet = (WithSeverity (TraceEvent blk) -> IO ()) -> Tracer IO (WithSeverity (TraceEvent blk)) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a @@ -1586,8 +1586,8 @@ -> (WithSeverity (TraceEvent blk) -> IO ()) -> Tracer IO (WithSeverity (TraceEvent blk)) forall a b. (a -> b) -> a -> b -$ \WithSeverity (TraceEvent blk) -ev -> do +$ \WithSeverity (TraceEvent blk) +ev -> do Tracer IO (WithSeverity (TraceEvent blk)) -> WithSeverity (TraceEvent blk) -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () @@ -1604,10 +1604,10 @@ -> Tracer IO (WithSeverity (TraceEvent blk)) teeTraceChainTipElide (TraceSelection -> TracingVerbosity traceVerbosity TraceSelection -trSel) MVar (Maybe (WithSeverity (TraceEvent blk)), Integer) -elided Trace IO Text -trTrc) WithSeverity (TraceEvent blk) -ev +trSel) MVar (Maybe (WithSeverity (TraceEvent blk)), Integer) +elided Trace IO Text +trTrc) WithSeverity (TraceEvent blk) +ev Tracer IO (WithSeverity (TraceEvent blk)) -> WithSeverity (TraceEvent blk) -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () @@ -1627,23 +1627,23 @@ -> Trace IO Text -> Tracer IO (TraceEvent blk) traceChainMetrics Maybe EKGDirect -ekgDirect BlockConfig blk -blockConfig ForgingStats -fStats Trace IO Text -trMet)) WithSeverity (TraceEvent blk) -ev +ekgDirect BlockConfig blk +blockConfig ForgingStats +fStats Trace IO Text +trMet)) WithSeverity (TraceEvent blk) +ev -teeTraceChainTipElide - :: ( ConvertRawHash blk - , LedgerSupportsProtocol blk - , InspectLedger blk - , ToObject (Header blk) - , ToObject (LedgerEvent blk) +teeTraceChainTipElide + :: ( ConvertRawHash blk + , LedgerSupportsProtocol blk + , InspectLedger blk + , ToObject (Header blk) + , ToObject (LedgerEvent blk) ) => TracingVerbosity - -> MVar (Maybe (WithSeverity (ChainDB.TraceEvent blk)), Integer) + -> MVar (Maybe (WithSeverity (ChainDB.TraceEvent blk)), Integer) -> Trace IO Text - -> Tracer IO (WithSeverity (ChainDB.TraceEvent blk)) + -> Tracer IO (WithSeverity (ChainDB.TraceEvent blk)) teeTraceChainTipElide :: TracingVerbosity -> MVar (Maybe (WithSeverity (TraceEvent blk)), Integer) -> Trace IO Text @@ -1659,31 +1659,31 @@ elideToLogObject {-# INLINE teeTraceChainTipElide #-} -ignoringSeverity :: Tracer IO a -> Tracer IO (WithSeverity a) +ignoringSeverity :: Tracer IO a -> Tracer IO (WithSeverity a) ignoringSeverity :: Tracer IO a -> Tracer IO (WithSeverity a) -ignoringSeverity Tracer IO a -tr = (WithSeverity a -> IO ()) -> Tracer IO (WithSeverity a) +ignoringSeverity Tracer IO a +tr = (WithSeverity a -> IO ()) -> Tracer IO (WithSeverity a) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((WithSeverity a -> IO ()) -> Tracer IO (WithSeverity a)) -> (WithSeverity a -> IO ()) -> Tracer IO (WithSeverity a) forall a b. (a -> b) -> a -> b $ \(WithSeverity Severity -_ a -ev) -> Tracer IO a -> a -> IO () +_ a +ev) -> Tracer IO a -> a -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Tracer IO a -tr a -ev +tr a +ev {-# INLINE ignoringSeverity #-} traceChainMetrics - :: forall blk. () - => HasHeader (Header blk) + :: forall blk. () + => HasHeader (Header blk) => Maybe EKGDirect - -> BlockConfig blk + -> BlockConfig blk -> ForgingStats -> Trace IO Text - -> Tracer IO (ChainDB.TraceEvent blk) + -> Tracer IO (ChainDB.TraceEvent blk) traceChainMetrics :: Maybe EKGDirect -> BlockConfig blk -> ForgingStats @@ -1696,18 +1696,18 @@ _ = Tracer IO (TraceEvent blk) forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer -traceChainMetrics (Just EKGDirect -_ekgDirect) BlockConfig blk -_blockConfig ForgingStats -_fStats Trace IO Text -tr = do +traceChainMetrics (Just EKGDirect +_ekgDirect) BlockConfig blk +_blockConfig ForgingStats +_fStats Trace IO Text +tr = do (TraceEvent blk -> IO ()) -> Tracer IO (TraceEvent blk) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((TraceEvent blk -> IO ()) -> Tracer IO (TraceEvent blk)) -> (TraceEvent blk -> IO ()) -> Tracer IO (TraceEvent blk) forall a b. (a -> b) -> a -> b -$ \TraceEvent blk -ev -> +$ \TraceEvent blk +ev -> IO () -> Maybe (IO ()) -> IO () forall a. a -> Maybe a -> a fromMaybe (() -> IO () @@ -1715,24 +1715,24 @@ pure ()) (Maybe (IO ()) -> IO ()) -> Maybe (IO ()) -> IO () forall a b. (a -> b) -> a -> b $ ChainInformation -> IO () -doTrace (ChainInformation -> IO ()) +doTrace (ChainInformation -> IO ()) -> Maybe ChainInformation -> Maybe (IO ()) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> TraceEvent blk -> Maybe ChainInformation -chainTipInformation TraceEvent blk -ev +chainTipInformation TraceEvent blk +ev where - chainTipInformation :: ChainDB.TraceEvent blk -> Maybe ChainInformation - chainTipInformation :: TraceEvent blk -> Maybe ChainInformation -chainTipInformation = \case - ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk -ev -> case TraceAddBlockEvent blk -ev of - ChainDB.SwitchedToAFork [LedgerEvent blk] -_warnings NewTipInfo blk -newTipInfo AnchoredFragment (Header blk) -_oldChain AnchoredFragment (Header blk) -newChain -> + chainTipInformation :: ChainDB.TraceEvent blk -> Maybe ChainInformation + chainTipInformation :: TraceEvent blk -> Maybe ChainInformation +chainTipInformation = \case + ChainDB.TraceAddBlockEvent TraceAddBlockEvent blk +ev -> case TraceAddBlockEvent blk +ev of + ChainDB.SwitchedToAFork [LedgerEvent blk] +_warnings NewTipInfo blk +newTipInfo AnchoredFragment (Header blk) +_oldChain AnchoredFragment (Header blk) +newChain -> ChainInformation -> Maybe ChainInformation forall a. a -> Maybe a Just (ChainInformation -> Maybe ChainInformation) @@ -1745,14 +1745,14 @@ NewTipInfo blk -> AnchoredFragment (Header blk) -> Int64 -> ChainInformation chainInformation NewTipInfo blk -newTipInfo AnchoredFragment (Header blk) -newChain Int64 +newTipInfo AnchoredFragment (Header blk) +newChain Int64 0 - ChainDB.AddedToCurrentChain [LedgerEvent blk] -_warnings NewTipInfo blk -newTipInfo AnchoredFragment (Header blk) -_oldChain AnchoredFragment (Header blk) -newChain -> + ChainDB.AddedToCurrentChain [LedgerEvent blk] +_warnings NewTipInfo blk +newTipInfo AnchoredFragment (Header blk) +_oldChain AnchoredFragment (Header blk) +newChain -> ChainInformation -> Maybe ChainInformation forall a. a -> Maybe a Just (ChainInformation -> Maybe ChainInformation) @@ -1765,8 +1765,8 @@ NewTipInfo blk -> AnchoredFragment (Header blk) -> Int64 -> ChainInformation chainInformation NewTipInfo blk -newTipInfo AnchoredFragment (Header blk) -newChain Int64 +newTipInfo AnchoredFragment (Header blk) +newChain Int64 0 TraceAddBlockEvent blk _ -> Maybe ChainInformation @@ -1776,29 +1776,29 @@ _ -> Maybe ChainInformation forall a. Maybe a Nothing - doTrace :: ChainInformation -> IO () + doTrace :: ChainInformation -> IO () - doTrace :: ChainInformation -> IO () -doTrace - ChainInformation { Word64 + doTrace :: ChainInformation -> IO () +doTrace + ChainInformation { Word64 slots :: ChainInformation -> Word64 slots :: Word64 -slots, Word64 +slots, Word64 blocks :: ChainInformation -> Word64 blocks :: Word64 -blocks, Rational +blocks, Rational density :: ChainInformation -> Rational density :: Rational -density, EpochNo +density, EpochNo epoch :: ChainInformation -> EpochNo epoch :: EpochNo -epoch, Word64 +epoch, Word64 slotInEpoch :: ChainInformation -> Word64 slotInEpoch :: Word64 slotInEpoch } = do -- TODO this is executed each time the newFhain changes. How cheap is it? - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -1809,130 +1809,130 @@ Trace IO Text -> LOMeta -> Text -> Double -> IO () forall a. Trace IO a -> LOMeta -> Text -> Double -> IO () traceD Trace IO Text -tr LOMeta -meta Text +tr LOMeta +meta Text "density" (Rational -> Double forall a. Fractional a => Rational -> a fromRational Rational -density) +density) Trace IO Text -> LOMeta -> Text -> Word64 -> IO () forall i a. Integral i => Trace IO a -> LOMeta -> Text -> i -> IO () traceI Trace IO Text -tr LOMeta -meta Text +tr LOMeta +meta Text "slotNum" Word64 -slots +slots Trace IO Text -> LOMeta -> Text -> Word64 -> IO () forall i a. Integral i => Trace IO a -> LOMeta -> Text -> i -> IO () traceI Trace IO Text -tr LOMeta -meta Text +tr LOMeta +meta Text "blockNum" Word64 -blocks +blocks Trace IO Text -> LOMeta -> Text -> Word64 -> IO () forall i a. Integral i => Trace IO a -> LOMeta -> Text -> i -> IO () traceI Trace IO Text -tr LOMeta -meta Text +tr LOMeta +meta Text "slotInEpoch" Word64 -slotInEpoch +slotInEpoch Trace IO Text -> LOMeta -> Text -> Word64 -> IO () forall i a. Integral i => Trace IO a -> LOMeta -> Text -> i -> IO () traceI Trace IO Text -tr LOMeta -meta Text +tr LOMeta +meta Text "epoch" (EpochNo -> Word64 unEpochNo EpochNo -epoch) +epoch) -traceD :: Trace IO a -> LOMeta -> Text -> Double -> IO () +traceD :: Trace IO a -> LOMeta -> Text -> Double -> IO () traceD :: Trace IO a -> LOMeta -> Text -> Double -> IO () -traceD Trace IO a -tr LOMeta -meta Text -msg Double -d = Trace IO a -> (LOMeta, LOContent a) -> IO () +traceD Trace IO a +tr LOMeta +meta Text +msg Double +d = Trace IO a -> (LOMeta, LOContent a) -> IO () forall (m :: * -> *) a. MonadIO m => Trace m a -> (LOMeta, LOContent a) -> m () traceNamedObject Trace IO a -tr (LOMeta -meta, Text -> Measurable -> LOContent a +tr (LOMeta +meta, Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text -msg (Double -> Measurable +msg (Double -> Measurable PureD Double -d)) +d)) -traceI :: Integral i => Trace IO a -> LOMeta -> Text -> i -> IO () +traceI :: Integral i => Trace IO a -> LOMeta -> Text -> i -> IO () traceI :: Trace IO a -> LOMeta -> Text -> i -> IO () -traceI Trace IO a -tr LOMeta -meta Text -msg i -i = Trace IO a -> (LOMeta, LOContent a) -> IO () +traceI Trace IO a +tr LOMeta +meta Text +msg i +i = Trace IO a -> (LOMeta, LOContent a) -> IO () forall (m :: * -> *) a. MonadIO m => Trace m a -> (LOMeta, LOContent a) -> m () traceNamedObject Trace IO a -tr (LOMeta -meta, Text -> Measurable -> LOContent a +tr (LOMeta +meta, Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text -msg (Integer -> Measurable +msg (Integer -> Measurable PureI (i -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral i -i))) +i))) sendEKGDirectCounter :: EKGDirect -> Text -> IO () sendEKGDirectCounter :: EKGDirect -> Text -> IO () -sendEKGDirectCounter EKGDirect -ekgDirect Text -name = do +sendEKGDirectCounter EKGDirect +ekgDirect Text +name = do MVar (Map Text Counter) -> (Map Text Counter -> IO (Map Text Counter)) -> IO () forall a. MVar a -> (a -> IO a) -> IO () modifyMVar_ (EKGDirect -> MVar (Map Text Counter) ekgCounters EKGDirect -ekgDirect) ((Map Text Counter -> IO (Map Text Counter)) -> IO ()) +ekgDirect) ((Map Text Counter -> IO (Map Text Counter)) -> IO ()) -> (Map Text Counter -> IO (Map Text Counter)) -> IO () forall a b. (a -> b) -> a -> b -$ \Map Text Counter -registeredMap -> do +$ \Map Text Counter +registeredMap -> do case Text -> Map Text Counter -> Maybe Counter forall k a. Ord k => k -> Map k a -> Maybe a SMap.lookup Text -name Map Text Counter -registeredMap of - Just Counter -counter -> do +name Map Text Counter +registeredMap of + Just Counter +counter -> do Counter -> IO () Counter.inc Counter -counter +counter Map Text Counter -> IO (Map Text Counter) forall (f :: * -> *) a. Applicative f => a -> f a pure Map Text Counter -registeredMap +registeredMap Maybe Counter Nothing -> do - Counter -counter <- Text -> Server -> IO Counter + Counter +counter <- Text -> Server -> IO Counter EKG.getCounter Text -name (EKGDirect -> Server +name (EKGDirect -> Server ekgServer EKGDirect -ekgDirect) +ekgDirect) Counter -> IO () Counter.inc Counter -counter +counter Map Text Counter -> IO (Map Text Counter) forall (f :: * -> *) a. Applicative f => a -> f a pure (Map Text Counter -> IO (Map Text Counter)) @@ -1941,57 +1941,57 @@ $ Text -> Counter -> Map Text Counter -> Map Text Counter forall k a. Ord k => k -> a -> Map k a -> Map k a SMap.insert Text -name Counter -counter Map Text Counter -registeredMap +name Counter +counter Map Text Counter +registeredMap -_sendEKGDirectInt :: Integral a => EKGDirect -> Text -> a -> IO () +_sendEKGDirectInt :: Integral a => EKGDirect -> Text -> a -> IO () _sendEKGDirectInt :: EKGDirect -> Text -> a -> IO () -_sendEKGDirectInt EKGDirect -ekgDirect Text -name a -val = do +_sendEKGDirectInt EKGDirect +ekgDirect Text +name a +val = do MVar (Map Text Gauge) -> (Map Text Gauge -> IO (Map Text Gauge)) -> IO () forall a. MVar a -> (a -> IO a) -> IO () modifyMVar_ (EKGDirect -> MVar (Map Text Gauge) ekgGauges EKGDirect -ekgDirect) ((Map Text Gauge -> IO (Map Text Gauge)) -> IO ()) +ekgDirect) ((Map Text Gauge -> IO (Map Text Gauge)) -> IO ()) -> (Map Text Gauge -> IO (Map Text Gauge)) -> IO () forall a b. (a -> b) -> a -> b -$ \Map Text Gauge -registeredMap -> do +$ \Map Text Gauge +registeredMap -> do case Text -> Map Text Gauge -> Maybe Gauge forall k a. Ord k => k -> Map k a -> Maybe a SMap.lookup Text -name Map Text Gauge -registeredMap of - Just Gauge -gauge -> do +name Map Text Gauge +registeredMap of + Just Gauge +gauge -> do Gauge -> Int64 -> IO () Gauge.set Gauge -gauge (a -> Int64 +gauge (a -> Int64 forall a b. (Integral a, Num b) => a -> b fromIntegral a -val) +val) Map Text Gauge -> IO (Map Text Gauge) forall (f :: * -> *) a. Applicative f => a -> f a pure Map Text Gauge -registeredMap +registeredMap Maybe Gauge Nothing -> do - Gauge -gauge <- Text -> Server -> IO Gauge + Gauge +gauge <- Text -> Server -> IO Gauge EKG.getGauge Text -name (EKGDirect -> Server +name (EKGDirect -> Server ekgServer EKGDirect -ekgDirect) +ekgDirect) Gauge -> Int64 -> IO () Gauge.set Gauge -gauge (a -> Int64 +gauge (a -> Int64 forall a b. (Integral a, Num b) => a -> b fromIntegral a -val) +val) Map Text Gauge -> IO (Map Text Gauge) forall (f :: * -> *) a. Applicative f => a -> f a pure (Map Text Gauge -> IO (Map Text Gauge)) @@ -2000,59 +2000,59 @@ $ Text -> Gauge -> Map Text Gauge -> Map Text Gauge forall k a. Ord k => k -> a -> Map k a -> Map k a SMap.insert Text -name Gauge -gauge Map Text Gauge -registeredMap +name Gauge +gauge Map Text Gauge +registeredMap _sendEKGDirectDouble :: EKGDirect -> Text -> Double -> IO () _sendEKGDirectDouble :: EKGDirect -> Text -> Double -> IO () -_sendEKGDirectDouble EKGDirect -ekgDirect Text -name Double -val = do +_sendEKGDirectDouble EKGDirect +ekgDirect Text +name Double +val = do MVar (Map Text Label) -> (Map Text Label -> IO (Map Text Label)) -> IO () forall a. MVar a -> (a -> IO a) -> IO () modifyMVar_ (EKGDirect -> MVar (Map Text Label) ekgLabels EKGDirect -ekgDirect) ((Map Text Label -> IO (Map Text Label)) -> IO ()) +ekgDirect) ((Map Text Label -> IO (Map Text Label)) -> IO ()) -> (Map Text Label -> IO (Map Text Label)) -> IO () forall a b. (a -> b) -> a -> b -$ \Map Text Label -registeredMap -> do +$ \Map Text Label +registeredMap -> do case Text -> Map Text Label -> Maybe Label forall k a. Ord k => k -> Map k a -> Maybe a SMap.lookup Text -name Map Text Label -registeredMap of - Just Label -label -> do +name Map Text Label +registeredMap of + Just Label +label -> do Label -> Text -> IO () Label.set Label -label (String -> Text +label (String -> Text Text.pack (Double -> String forall a. Show a => a -> String show Double -val)) +val)) Map Text Label -> IO (Map Text Label) forall (f :: * -> *) a. Applicative f => a -> f a pure Map Text Label -registeredMap +registeredMap Maybe Label Nothing -> do - Label -label <- Text -> Server -> IO Label + Label +label <- Text -> Server -> IO Label EKG.getLabel Text -name (EKGDirect -> Server +name (EKGDirect -> Server ekgServer EKGDirect -ekgDirect) +ekgDirect) Label -> Text -> IO () Label.set Label -label (String -> Text +label (String -> Text Text.pack (Double -> String forall a. Show a => a -> String show Double -val)) +val)) Map Text Label -> IO (Map Text Label) forall (f :: * -> *) a. Applicative f => a -> f a pure (Map Text Label -> IO (Map Text Label)) @@ -2061,15 +2061,15 @@ $ Text -> Label -> Map Text Label -> Map Text Label forall k a. Ord k => k -> a -> Map k a -> Map k a SMap.insert Text -name Label -label Map Text Label -registeredMap +name Label +label Map Text Label +registeredMap -------------------------------------------------------------------------------- -- Consensus Tracers -------------------------------------------------------------------------------- -isRollForward :: TraceChainSyncServerEvent blk -> Bool +isRollForward :: TraceChainSyncServerEvent blk -> Bool isRollForward :: TraceChainSyncServerEvent blk -> Bool isRollForward (TraceChainSyncRollForward Point blk _) = Bool @@ -2078,38 +2078,38 @@ _ = Bool False -isTraceBlockFetchServerBlockCount :: TraceBlockFetchServerEvent blk -> Bool +isTraceBlockFetchServerBlockCount :: TraceBlockFetchServerEvent blk -> Bool isTraceBlockFetchServerBlockCount :: TraceBlockFetchServerEvent blk -> Bool isTraceBlockFetchServerBlockCount (TraceBlockFetchServerSendBlock Point blk _) = Bool True mkConsensusTracers - :: forall blk peer localPeer. - ( Show peer - , Eq peer - , LedgerQueries blk - , ToJSON (GenTxId blk) - , ToObject (ApplyTxErr blk) - , ToObject (CannotForge blk) - , ToObject (GenTx blk) - , ToObject (LedgerErr (LedgerState blk)) - , ToObject (OtherHeaderEnvelopeError blk) - , ToObject (ValidationErr (BlockProtocol blk)) - , ToObject (ForgeStateUpdateError blk) - , ToObject peer - , Consensus.RunNode blk - , HasKESMetricsData blk - , HasKESInfo blk - , Show (Header blk) + :: forall blk peer localPeer. + ( Show peer + , Eq peer + , LedgerQueries blk + , ToJSON (GenTxId blk) + , ToObject (ApplyTxErr blk) + , ToObject (CannotForge blk) + , ToObject (GenTx blk) + , ToObject (LedgerErr (LedgerState blk)) + , ToObject (OtherHeaderEnvelopeError blk) + , ToObject (ValidationErr (BlockProtocol blk)) + , ToObject (ForgeStateUpdateError blk) + , ToObject peer + , Consensus.RunNode blk + , HasKESMetricsData blk + , HasKESInfo blk + , Show (Header blk) ) => Maybe EKGDirect -> TraceSelection -> TracingVerbosity -> Trace IO Text - -> NodeKernelData blk + -> NodeKernelData blk -> ForgingStats - -> IO (Consensus.Tracers' peer localPeer blk (Tracer IO)) + -> IO (Consensus.Tracers' peer localPeer blk (Tracer IO)) mkConsensusTracers :: Maybe EKGDirect -> TraceSelection -> TracingVerbosity @@ -2117,26 +2117,26 @@ -> NodeKernelData blk -> ForgingStats -> IO (Tracers' peer localPeer blk (Tracer IO)) -mkConsensusTracers Maybe EKGDirect -mbEKGDirect TraceSelection -trSel TracingVerbosity -verb Trace IO Text -tr NodeKernelData blk -nodeKern ForgingStats -fStats = do - let trmet :: Trace IO Text -trmet = Text -> Trace IO Text -> Trace IO Text +mkConsensusTracers Maybe EKGDirect +mbEKGDirect TraceSelection +trSel TracingVerbosity +verb Trace IO Text +tr NodeKernelData blk +nodeKern ForgingStats +fStats = do + let trmet :: Trace IO Text +trmet = Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "metrics" Trace IO Text -tr +tr - MVar + MVar (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]), Integer) -elidedFetchDecision <- IO +elidedFetchDecision <- IO (MVar (Maybe (WithSeverity @@ -2144,11 +2144,11 @@ Integer)) forall a. ElidingTracer a => IO (MVar (Maybe a, Integer)) newstate -- for eliding messages in FetchDecision tr - ForgeTracers -forgeTracers <- IO ForgeTracers -mkForgeTracers - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta + ForgeTracers +forgeTracers <- IO ForgeTracers +mkForgeTracers + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -2156,23 +2156,23 @@ Critical PrivacyAnnotation Public - TVar Int -tBlocksServed <- Int -> IO (TVar Int) + TVar Int +tBlocksServed <- Int -> IO (TVar Int) forall a. a -> IO (TVar a) STM.newTVarIO @Int Int 0 - TVar Int -tSubmissionsCollected <- Int -> IO (TVar Int) + TVar Int +tSubmissionsCollected <- Int -> IO (TVar Int) forall a. a -> IO (TVar a) STM.newTVarIO Int 0 - TVar Int -tSubmissionsAccepted <- Int -> IO (TVar Int) + TVar Int +tSubmissionsAccepted <- Int -> IO (TVar Int) forall a. a -> IO (TVar a) STM.newTVarIO Int 0 - TVar Int -tSubmissionsRejected <- Int -> IO (TVar Int) + TVar Int +tSubmissionsRejected <- Int -> IO (TVar Int) forall a. a -> IO (TVar a) STM.newTVarIO Int 0 @@ -2212,10 +2212,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceChainSyncClient traceChainSyncClient TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "ChainSyncClient" Trace IO Text -tr +tr , chainSyncServerHeaderTracer :: Tracer IO (TraceChainSyncServerEvent blk) Consensus.chainSyncServerHeaderTracer = (TraceChainSyncServerEvent blk -> IO ()) @@ -2226,8 +2226,8 @@ -> (TraceChainSyncServerEvent blk -> IO ()) -> Tracer IO (TraceChainSyncServerEvent blk) forall a b. (a -> b) -> a -> b -$ \TraceChainSyncServerEvent blk -ev -> do +$ \TraceChainSyncServerEvent blk +ev -> do Tracer IO (TraceChainSyncServerEvent blk) -> TraceChainSyncServerEvent blk -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () @@ -2252,19 +2252,19 @@ (ToLogObject m, ToObject a, Transformable a m b) => TracingVerbosity -> Trace m a -> Tracer m b toLogObject' TracingVerbosity -verb (Trace IO Text -> Tracer IO (TraceChainSyncServerEvent blk)) +verb (Trace IO Text -> Tracer IO (TraceChainSyncServerEvent blk)) -> Trace IO Text -> Tracer IO (TraceChainSyncServerEvent blk) forall a b. (a -> b) -> a -> b $ Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "ChainSyncHeaderServer" Trace IO Text -tr) TraceChainSyncServerEvent blk -ev +tr) TraceChainSyncServerEvent blk +ev Maybe EKGDirect -> TraceChainSyncServerEvent blk -> IO () -traceServedCount Maybe EKGDirect -mbEKGDirect TraceChainSyncServerEvent blk -ev +traceServedCount Maybe EKGDirect +mbEKGDirect TraceChainSyncServerEvent blk +ev , chainSyncServerBlockTracer :: Tracer IO (TraceChainSyncServerEvent blk) Consensus.chainSyncServerBlockTracer = OnOff TraceChainSyncBlockServer -> TracingVerbosity @@ -2276,10 +2276,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceChainSyncBlockServer traceChainSyncBlockServer TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "ChainSyncBlockServer" Trace IO Text -tr +tr , blockFetchDecisionTracer :: Tracer IO [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] Consensus.blockFetchDecisionTracer = OnOff TraceBlockFetchDecisions @@ -2290,7 +2290,7 @@ forall (b :: Symbol) a. OnOff b -> Tracer IO a -> Tracer IO a tracerOnOff' (TraceSelection -> OnOff TraceBlockFetchDecisions traceBlockFetchDecisions TraceSelection -trSel) (Tracer +trSel) (Tracer IO [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] -> Tracer IO [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) @@ -2347,13 +2347,13 @@ (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) teeTraceBlockFetchDecision TracingVerbosity -verb MVar +verb MVar (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]), Integer) -elidedFetchDecision Trace IO Text -tr +elidedFetchDecision Trace IO Text +tr , blockFetchClientTracer :: Tracer IO (TraceLabelPeer peer (TraceFetchClientState (Header blk))) Consensus.blockFetchClientTracer = OnOff TraceBlockFetchClient @@ -2367,10 +2367,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceBlockFetchClient traceBlockFetchClient TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "BlockFetchClient" Trace IO Text -tr +tr , blockFetchServerTracer :: Tracer IO (TraceBlockFetchServerEvent blk) Consensus.blockFetchServerTracer = OnOff TraceBlockFetchServer -> Tracer IO (TraceBlockFetchServerEvent blk) @@ -2378,7 +2378,7 @@ forall (b :: Symbol) a. OnOff b -> Tracer IO a -> Tracer IO a tracerOnOff' (TraceSelection -> OnOff TraceBlockFetchServer traceBlockFetchServer TraceSelection -trSel) (Tracer IO (TraceBlockFetchServerEvent blk) +trSel) (Tracer IO (TraceBlockFetchServerEvent blk) -> Tracer IO (TraceBlockFetchServerEvent blk)) -> Tracer IO (TraceBlockFetchServerEvent blk) -> Tracer IO (TraceBlockFetchServerEvent blk) @@ -2392,8 +2392,8 @@ -> (TraceBlockFetchServerEvent blk -> IO ()) -> Tracer IO (TraceBlockFetchServerEvent blk) forall a b. (a -> b) -> a -> b -$ \TraceBlockFetchServerEvent blk -ev -> do +$ \TraceBlockFetchServerEvent blk +ev -> do Tracer IO (TraceBlockFetchServerEvent blk) -> TraceBlockFetchServerEvent blk -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () @@ -2418,21 +2418,21 @@ (ToLogObject m, ToObject a, Transformable a m b) => TracingVerbosity -> Trace m a -> Tracer m b toLogObject' TracingVerbosity -verb (Trace IO Text -> Tracer IO (TraceBlockFetchServerEvent blk)) +verb (Trace IO Text -> Tracer IO (TraceBlockFetchServerEvent blk)) -> Trace IO Text -> Tracer IO (TraceBlockFetchServerEvent blk) forall a b. (a -> b) -> a -> b $ Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "BlockFetchServer" Trace IO Text -tr) TraceBlockFetchServerEvent blk -ev +tr) TraceBlockFetchServerEvent blk +ev Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (TraceBlockFetchServerEvent blk -> Bool forall blk. TraceBlockFetchServerEvent blk -> Bool isTraceBlockFetchServerBlockCount TraceBlockFetchServerEvent blk -ev) (IO () -> IO ()) -> IO () -> IO () +ev) (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ Trace IO Text -> LOMeta -> Text -> Int -> IO () @@ -2440,15 +2440,15 @@ Integral i => Trace IO a -> LOMeta -> Text -> i -> IO () traceI Trace IO Text -trmet LOMeta -meta Text +trmet LOMeta +meta Text "served.block.count" (Int -> IO ()) -> IO Int -> IO () forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< TVar Int -> (Int -> Int) -> IO Int forall a. TVar a -> (a -> a) -> IO a STM.modifyReadTVarIO TVar Int -tBlocksServed (Int -> Int -> Int +tBlocksServed (Int -> Int -> Int forall a. Num a => a -> a -> a +Int 1) @@ -2459,7 +2459,7 @@ forall (b :: Symbol) a. OnOff b -> Tracer IO a -> Tracer IO a tracerOnOff' (TraceSelection -> OnOff TraceForgeStateInfo traceForgeStateInfo TraceSelection -trSel) (Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) +trSel) (Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk))) -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) @@ -2477,9 +2477,9 @@ -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) forgeStateInfoTracer (Proxy blk forall k (t :: k). Proxy t -Proxy @ blk) TraceSelection -trSel Trace IO Text -tr +Proxy @ blk) TraceSelection +trSel Trace IO Text +tr , txInboundTracer :: Tracer IO (TraceLabelPeer @@ -2496,7 +2496,7 @@ forall (b :: Symbol) a. OnOff b -> Tracer IO a -> Tracer IO a tracerOnOff' (TraceSelection -> OnOff TraceTxInbound traceTxInbound TraceSelection -trSel) (Tracer +trSel) (Tracer IO (TraceLabelPeer peer (TraceTxSubmissionInbound (GenTxId blk) (GenTx blk))) @@ -2537,9 +2537,9 @@ (TraceLabelPeer peer (TraceTxSubmissionInbound (GenTxId blk) (GenTx blk))) forall a b. (a -> b) -> a -> b -$ \TraceLabelPeer +$ \TraceLabelPeer peer (TraceTxSubmissionInbound (GenTxId blk) (GenTx blk)) -ev -> do +ev -> do Tracer IO (TraceLabelPeer @@ -2594,7 +2594,7 @@ (ToLogObject m, ToObject a, Transformable a m b) => TracingVerbosity -> Trace m a -> Tracer m b toLogObject' TracingVerbosity -verb (Trace IO Text +verb (Trace IO Text -> Tracer IO (TraceLabelPeer @@ -2609,72 +2609,72 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "TxInbound" Trace IO Text -tr) TraceLabelPeer +tr) TraceLabelPeer peer (TraceTxSubmissionInbound (GenTxId blk) (GenTx blk)) -ev +ev case TraceLabelPeer peer (TraceTxSubmissionInbound (GenTxId blk) (GenTx blk)) -ev of +ev of TraceLabelPeer peer -_ (TraceTxSubmissionCollected Int -collected) -> +_ (TraceTxSubmissionCollected Int +collected) -> Trace IO Text -> LOMeta -> Text -> Int -> IO () forall i a. Integral i => Trace IO a -> LOMeta -> Text -> i -> IO () traceI Trace IO Text -trmet LOMeta -meta Text +trmet LOMeta +meta Text "submissions.submitted.count" (Int -> IO ()) -> IO Int -> IO () forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< TVar Int -> (Int -> Int) -> IO Int forall a. TVar a -> (a -> a) -> IO a STM.modifyReadTVarIO TVar Int -tSubmissionsCollected (Int -> Int -> Int +tSubmissionsCollected (Int -> Int -> Int forall a. Num a => a -> a -> a + Int -collected) +collected) TraceLabelPeer peer -_ (TraceTxSubmissionProcessed ProcessedTxCount -processed) -> do +_ (TraceTxSubmissionProcessed ProcessedTxCount +processed) -> do Trace IO Text -> LOMeta -> Text -> Int -> IO () forall i a. Integral i => Trace IO a -> LOMeta -> Text -> i -> IO () traceI Trace IO Text -trmet LOMeta -meta Text +trmet LOMeta +meta Text "submissions.accepted.count" (Int -> IO ()) -> IO Int -> IO () forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< TVar Int -> (Int -> Int) -> IO Int forall a. TVar a -> (a -> a) -> IO a STM.modifyReadTVarIO TVar Int -tSubmissionsAccepted (Int -> Int -> Int +tSubmissionsAccepted (Int -> Int -> Int forall a. Num a => a -> a -> a + ProcessedTxCount -> Int ptxcAccepted ProcessedTxCount -processed) +processed) Trace IO Text -> LOMeta -> Text -> Int -> IO () forall i a. Integral i => Trace IO a -> LOMeta -> Text -> i -> IO () traceI Trace IO Text -trmet LOMeta -meta Text +trmet LOMeta +meta Text "submissions.rejected.count" (Int -> IO ()) -> IO Int -> IO () forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< TVar Int -> (Int -> Int) -> IO Int forall a. TVar a -> (a -> a) -> IO a STM.modifyReadTVarIO TVar Int -tSubmissionsRejected (Int -> Int -> Int +tSubmissionsRejected (Int -> Int -> Int forall a. Num a => a -> a -> a + ProcessedTxCount -> Int ptxcRejected ProcessedTxCount -processed) +processed) TraceLabelPeer peer _ TraceTxSubmissionInbound (GenTxId blk) (GenTx blk) @@ -2709,10 +2709,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceTxOutbound traceTxOutbound TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "TxOutbound" Trace IO Text -tr +tr , localTxSubmissionServerTracer :: Tracer IO (TraceLocalTxSubmissionServerEvent blk) Consensus.localTxSubmissionServerTracer = OnOff TraceLocalTxSubmissionServer -> TracingVerbosity @@ -2724,10 +2724,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceLocalTxSubmissionServer traceLocalTxSubmissionServer TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "LocalTxSubmissionServer" Trace IO Text -tr +tr , mempoolTracer :: Tracer IO (TraceEventMempool blk) Consensus.mempoolTracer = OnOff TraceMempool -> Tracer IO (TraceEventMempool blk) @@ -2735,7 +2735,7 @@ forall (b :: Symbol) a. OnOff b -> Tracer IO a -> Tracer IO a tracerOnOff' (TraceSelection -> OnOff TraceMempool traceMempool TraceSelection -trSel) (Tracer IO (TraceEventMempool blk) +trSel) (Tracer IO (TraceEventMempool blk) -> Tracer IO (TraceEventMempool blk)) -> Tracer IO (TraceEventMempool blk) -> Tracer IO (TraceEventMempool blk) @@ -2752,9 +2752,9 @@ -> ForgingStats -> Tracer IO (TraceEventMempool blk) mempoolTracer TraceSelection -trSel Trace IO Text -tr ForgingStats -fStats +trSel Trace IO Text +tr ForgingStats +fStats , forgeTracer :: Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) Consensus.forgeTracer = OnOff TraceForge -> Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) @@ -2762,7 +2762,7 @@ forall (b :: Symbol) a. OnOff b -> Tracer IO a -> Tracer IO a tracerOnOff' (TraceSelection -> OnOff TraceForge traceForge TraceSelection -trSel) (Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) +trSel) (Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) -> Tracer IO (TraceLabelCreds (TraceForgeEvent blk))) -> Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) -> Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) @@ -2776,8 +2776,8 @@ -> (TraceLabelCreds (TraceForgeEvent blk) -> IO ()) -> Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) forall a b. (a -> b) -> a -> b -$ \tlcev :: TraceLabelCreds (TraceForgeEvent blk) -tlcev@Consensus.TraceLabelCreds{} -> do +$ \tlcev :: TraceLabelCreds (TraceForgeEvent blk) +tlcev@Consensus.TraceLabelCreds{} -> do Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) -> TraceLabelCreds (TraceForgeEvent blk) -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () @@ -2805,11 +2805,11 @@ -> Trace IO Text -> Tracer IO (WithSeverity (TraceLabelCreds (TraceForgeEvent blk))) traceLeadershipChecks ForgeTracers -forgeTracers NodeKernelData blk -nodeKern TracingVerbosity -verb Trace IO Text -tr) TraceLabelCreds (TraceForgeEvent blk) -tlcev +forgeTracers NodeKernelData blk +nodeKern TracingVerbosity +verb Trace IO Text +tr) TraceLabelCreds (TraceForgeEvent blk) +tlcev Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) -> TraceLabelCreds (TraceForgeEvent blk) -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () @@ -2830,11 +2830,11 @@ -> ForgingStats -> Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) forgeTracer TracingVerbosity -verb Trace IO Text -tr ForgeTracers -forgeTracers ForgingStats -fStats) TraceLabelCreds (TraceForgeEvent blk) -tlcev +verb Trace IO Text +tr ForgeTracers +forgeTracers ForgingStats +fStats) TraceLabelCreds (TraceForgeEvent blk) +tlcev , blockchainTimeTracer :: Tracer IO (TraceBlockchainTimeEvent UTCTime) Consensus.blockchainTimeTracer = OnOff TraceBlockchainTime @@ -2843,7 +2843,7 @@ forall (b :: Symbol) a. OnOff b -> Tracer IO a -> Tracer IO a tracerOnOff' (TraceSelection -> OnOff TraceBlockchainTime traceBlockchainTime TraceSelection -trSel) (Tracer IO (TraceBlockchainTimeEvent UTCTime) +trSel) (Tracer IO (TraceBlockchainTimeEvent UTCTime) -> Tracer IO (TraceBlockchainTimeEvent UTCTime)) -> Tracer IO (TraceBlockchainTimeEvent UTCTime) -> Tracer IO (TraceBlockchainTimeEvent UTCTime) @@ -2857,8 +2857,8 @@ -> (TraceBlockchainTimeEvent UTCTime -> IO ()) -> Tracer IO (TraceBlockchainTimeEvent UTCTime) forall a b. (a -> b) -> a -> b -$ \TraceBlockchainTimeEvent UTCTime -ev -> +$ \TraceBlockchainTimeEvent UTCTime +ev -> Tracer IO Text -> Text -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith (Trace IO Text -> Tracer IO Text @@ -2866,9 +2866,9 @@ (ToLogObject m, ToObject a, Transformable a m b) => Trace m a -> Tracer m b toLogObject Trace IO Text -tr) (TraceBlockchainTimeEvent UTCTime -> Text +tr) (TraceBlockchainTimeEvent UTCTime -> Text readableTraceBlockchainTimeEvent TraceBlockchainTimeEvent UTCTime -ev) +ev) , keepAliveClientTracer :: Tracer IO (TraceKeepAliveClient peer) Consensus.keepAliveClientTracer = OnOff TraceKeepAliveClient -> TracingVerbosity @@ -2880,26 +2880,26 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceKeepAliveClient traceKeepAliveClient TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "KeepAliveClient" Trace IO Text -tr +tr } where - mkForgeTracers :: IO ForgeTracers - mkForgeTracers :: IO ForgeTracers -mkForgeTracers = do + mkForgeTracers :: IO ForgeTracers + mkForgeTracers :: IO ForgeTracers +mkForgeTracers = do -- We probably don't want to pay the extra IO cost per-counter-increment. -- sk - LOMeta -staticMeta <- Severity -> PrivacyAnnotation -> IO LOMeta + LOMeta +staticMeta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta mkLOMeta Severity Critical PrivacyAnnotation Confidential - let Text -name :: LoggerName = Text + let Text +name :: LoggerName = Text "metrics.Forge" Trace IO Text -> Trace IO Text @@ -2959,10 +2959,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "forged" Trace IO Text -tr) +tr) IO (Trace IO Text -> Trace IO Text @@ -3006,10 +3006,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "forge-about-to-lead" Trace IO Text -tr) +tr) IO (Trace IO Text -> Trace IO Text @@ -3051,10 +3051,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "could-not-forge" Trace IO Text -tr) +tr) IO (Trace IO Text -> Trace IO Text @@ -3094,10 +3094,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "adopted" Trace IO Text -tr) +tr) IO (Trace IO Text -> Trace IO Text @@ -3135,10 +3135,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "didnt-adopt" Trace IO Text -tr) +tr) IO (Trace IO Text -> Trace IO Text @@ -3174,10 +3174,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "forged-invalid" Trace IO Text -tr) +tr) IO (Trace IO Text -> Trace IO Text @@ -3211,10 +3211,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "node-not-leader" Trace IO Text -tr) +tr) IO (Trace IO Text -> Trace IO Text @@ -3243,10 +3243,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "cannot-forge" Trace IO Text -tr) +tr) IO (Trace IO Text -> Trace IO Text -> Trace IO Text -> Trace IO Text -> ForgeTracers) @@ -3270,10 +3270,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "forge-state-update-error" Trace IO Text -tr) +tr) IO (Trace IO Text -> Trace IO Text -> Trace IO Text -> ForgeTracers) -> IO (Trace IO Text) @@ -3295,10 +3295,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "block-from-future" Trace IO Text -tr) +tr) IO (Trace IO Text -> Trace IO Text -> ForgeTracers) -> IO (Trace IO Text) -> IO (Trace IO Text -> ForgeTracers) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b @@ -3318,10 +3318,10 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "slot-is-immutable" Trace IO Text -tr) +tr) IO (Trace IO Text -> ForgeTracers) -> IO (Trace IO Text) -> IO ForgeTracers forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b @@ -3341,54 +3341,54 @@ -> Trace m a -> Tracer m (Counting (Text, LogObject a)) liftCounting LOMeta -staticMeta Text -name Text +staticMeta Text +name Text "node-is-leader" Trace IO Text -tr) +tr) - traceServedCount :: Maybe EKGDirect -> TraceChainSyncServerEvent blk -> IO () - traceServedCount :: Maybe EKGDirect -> TraceChainSyncServerEvent blk -> IO () -traceServedCount Maybe EKGDirect + traceServedCount :: Maybe EKGDirect -> TraceChainSyncServerEvent blk -> IO () + traceServedCount :: Maybe EKGDirect -> TraceChainSyncServerEvent blk -> IO () +traceServedCount Maybe EKGDirect Nothing TraceChainSyncServerEvent blk _ = () -> IO () forall (f :: * -> *) a. Applicative f => a -> f a pure () - traceServedCount (Just EKGDirect -ekgDirect) TraceChainSyncServerEvent blk -ev = + traceServedCount (Just EKGDirect +ekgDirect) TraceChainSyncServerEvent blk +ev = Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (TraceChainSyncServerEvent blk -> Bool forall blk. TraceChainSyncServerEvent blk -> Bool isRollForward TraceChainSyncServerEvent blk -ev) (IO () -> IO ()) -> IO () -> IO () +ev) (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ EKGDirect -> Text -> IO () sendEKGDirectCounter EKGDirect -ekgDirect Text +ekgDirect Text "cardano.node.metrics.served.header.counter.int" traceLeadershipChecks :: - forall blk - . ( Consensus.RunNode blk - , LedgerQueries blk + forall blk + . ( Consensus.RunNode blk + , LedgerQueries blk ) => ForgeTracers - -> NodeKernelData blk + -> NodeKernelData blk -> TracingVerbosity -> Trace IO Text - -> Tracer IO (WithSeverity (Consensus.TraceLabelCreds (Consensus.TraceForgeEvent blk))) + -> Tracer IO (WithSeverity (Consensus.TraceLabelCreds (Consensus.TraceForgeEvent blk))) traceLeadershipChecks :: ForgeTracers -> NodeKernelData blk -> TracingVerbosity -> Trace IO Text -> Tracer IO (WithSeverity (TraceLabelCreds (TraceForgeEvent blk))) -traceLeadershipChecks ForgeTracers -_ft NodeKernelData blk -nodeKern TracingVerbosity -_tverb Trace IO Text -tr = (WithSeverity (TraceLabelCreds (TraceForgeEvent blk)) -> IO ()) +traceLeadershipChecks ForgeTracers +_ft NodeKernelData blk +nodeKern TracingVerbosity +_tverb Trace IO Text +tr = (WithSeverity (TraceLabelCreds (TraceForgeEvent blk)) -> IO ()) -> Tracer IO (WithSeverity (TraceLabelCreds (TraceForgeEvent blk))) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((WithSeverity (TraceLabelCreds (TraceForgeEvent blk)) -> IO ()) @@ -3398,24 +3398,24 @@ -> Tracer IO (WithSeverity (TraceLabelCreds (TraceForgeEvent blk))) forall a b. (a -> b) -> a -> b $ - \(WithSeverity Severity -sev (Consensus.TraceLabelCreds Text -creds TraceForgeEvent blk -event)) -> + \(WithSeverity Severity +sev (Consensus.TraceLabelCreds Text +creds TraceForgeEvent blk +event)) -> case TraceForgeEvent blk -event of - Consensus.TraceStartLeadershipCheck SlotNo -slot -> do - !StrictMaybe (Int, Int, Rational) -query <- (NodeKernel IO RemoteConnectionId LocalConnectionId blk +event of + Consensus.TraceStartLeadershipCheck SlotNo +slot -> do + !StrictMaybe (Int, Int, Rational) +query <- (NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO (Int, Int, Rational)) -> NodeKernelData blk -> IO (StrictMaybe (Int, Int, Rational)) forall blk a. (NodeKernel IO RemoteConnectionId LocalConnectionId blk -> IO a) -> NodeKernelData blk -> IO (StrictMaybe a) mapNodeKernelDataIO - (\NodeKernel IO RemoteConnectionId LocalConnectionId blk -nk -> + (\NodeKernel IO RemoteConnectionId LocalConnectionId blk +nk -> (,,) (Int -> Int -> Rational -> (Int, Int, Rational)) -> IO Int -> IO (Int -> Rational -> (Int, Int, Rational)) @@ -3438,7 +3438,7 @@ . ExtLedgerState blk -> LedgerState blk forall blk. ExtLedgerState blk -> LedgerState blk ledgerState) NodeKernel IO RemoteConnectionId LocalConnectionId blk -nk +nk IO (Int -> Rational -> (Int, Int, Rational)) -> IO Int -> IO (Rational -> (Int, Int, Rational)) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b @@ -3460,7 +3460,7 @@ . ExtLedgerState blk -> LedgerState blk forall blk. ExtLedgerState blk -> LedgerState blk ledgerState) NodeKernel IO RemoteConnectionId LocalConnectionId blk -nk +nk IO (Rational -> (Int, Int, Rational)) -> IO Rational -> IO (Int, Int, Rational) forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b @@ -3475,16 +3475,16 @@ HasHeader (Header blk) => AnchoredFragment (Header blk) -> Rational fragmentChainDensity NodeKernel IO RemoteConnectionId LocalConnectionId blk -nk) +nk) NodeKernelData blk -nodeKern - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta +nodeKern + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta mkLOMeta Severity -sev PrivacyAnnotation +sev PrivacyAnnotation Public IO () -> StrictMaybe (IO ()) -> IO () forall a. a -> StrictMaybe a -> a @@ -3494,24 +3494,24 @@ forall a b. (a -> b) -> a -> b $ StrictMaybe (Int, Int, Rational) -query StrictMaybe (Int, Int, Rational) +query StrictMaybe (Int, Int, Rational) -> ((Int, Int, Rational) -> IO ()) -> StrictMaybe (IO ()) forall (f :: * -> *) a b. Functor f => f a -> (a -> b) -> f b <&> - \(Int -utxoSize, Int -delegMapSize, Rational + \(Int +utxoSize, Int +delegMapSize, Rational _) -> do Text -> Trace IO Text -> Int -> IO () traceCounter Text "utxoSize" Trace IO Text -tr Int -utxoSize +tr Int +utxoSize Text -> Trace IO Text -> Int -> IO () traceCounter Text "delegMapSize" Trace IO Text -tr Int -delegMapSize +tr Int +delegMapSize Trace IO Text -> (LOMeta, LOContent Text) -> IO () forall (m :: * -> *) a. MonadIO m => @@ -3520,9 +3520,9 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "LeadershipCheck" Trace IO Text -tr) +tr) ( LOMeta -meta +meta , Object -> LOContent Text forall a. Object -> LOContent a LogStructured (Object -> LOContent Text) -> Object -> LOContent Text @@ -3539,7 +3539,7 @@ ,(Text "credentials", Text -> Value String Text -creds) +creds) ,(Text "slot", Word64 -> Value forall a. ToJSON a => a -> Value @@ -3547,39 +3547,39 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot)] +slot)] [(Text, Value)] -> [(Text, Value)] -> [(Text, Value)] forall a. [a] -> [a] -> [a] ++ [(Text, Value)] -> StrictMaybe [(Text, Value)] -> [(Text, Value)] forall a. a -> StrictMaybe a -> a fromSMaybe [] (StrictMaybe (Int, Int, Rational) -query StrictMaybe (Int, Int, Rational) +query StrictMaybe (Int, Int, Rational) -> ((Int, Int, Rational) -> [(Text, Value)]) -> StrictMaybe [(Text, Value)] forall (f :: * -> *) a b. Functor f => f a -> (a -> b) -> f b <&> - \(Int -utxoSize, Int -delegMapSize, Rational -chainDensity) -> + \(Int +utxoSize, Int +delegMapSize, Rational +chainDensity) -> [ (Text "utxoSize", Int -> Value forall a. ToJSON a => a -> Value toJSON Int -utxoSize) +utxoSize) , (Text "delegMapSize", Int -> Value forall a. ToJSON a => a -> Value toJSON Int -delegMapSize) +delegMapSize) , (Text "chainDensity", Float -> Value forall a. ToJSON a => a -> Value toJSON (Rational -> Float forall a. Fractional a => Rational -> a fromRational Rational -chainDensity :: Float)) +chainDensity :: Float)) ]) ) TraceForgeEvent blk @@ -3588,26 +3588,26 @@ pure () teeForge :: - forall blk - . ( Consensus.RunNode blk - , ToObject (CannotForge blk) - , ToObject (LedgerErr (LedgerState blk)) - , ToObject (OtherHeaderEnvelopeError blk) - , ToObject (ValidationErr (BlockProtocol blk)) - , ToObject (ForgeStateUpdateError blk) + forall blk + . ( Consensus.RunNode blk + , ToObject (CannotForge blk) + , ToObject (LedgerErr (LedgerState blk)) + , ToObject (OtherHeaderEnvelopeError blk) + , ToObject (ValidationErr (BlockProtocol blk)) + , ToObject (ForgeStateUpdateError blk) ) => ForgeTracers -> TracingVerbosity -> Trace IO Text - -> Tracer IO (WithSeverity (Consensus.TraceLabelCreds (Consensus.TraceForgeEvent blk))) + -> Tracer IO (WithSeverity (Consensus.TraceLabelCreds (Consensus.TraceForgeEvent blk))) teeForge :: ForgeTracers -> TracingVerbosity -> Trace IO Text -> Tracer IO (WithSeverity (TraceLabelCreds (TraceForgeEvent blk))) -teeForge ForgeTracers -ft TracingVerbosity -tverb Trace IO Text -tr = (WithSeverity (TraceLabelCreds (TraceForgeEvent blk)) -> IO ()) +teeForge ForgeTracers +ft TracingVerbosity +tverb Trace IO Text +tr = (WithSeverity (TraceLabelCreds (TraceForgeEvent blk)) -> IO ()) -> Tracer IO (WithSeverity (TraceLabelCreds (TraceForgeEvent blk))) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((WithSeverity (TraceLabelCreds (TraceForgeEvent blk)) -> IO ()) @@ -3617,11 +3617,11 @@ -> Tracer IO (WithSeverity (TraceLabelCreds (TraceForgeEvent blk))) forall a b. (a -> b) -> a -> b $ - \ev :: WithSeverity (TraceLabelCreds (TraceForgeEvent blk)) -ev@(WithSeverity Severity -sev (Consensus.TraceLabelCreds Text -_creds TraceForgeEvent blk -event)) -> do + \ev :: WithSeverity (TraceLabelCreds (TraceForgeEvent blk)) +ev@(WithSeverity Severity +sev (Consensus.TraceLabelCreds Text +_creds TraceForgeEvent blk +event)) -> do (Tracer IO (WithSeverity (TraceForgeEvent blk)) -> WithSeverity (TraceForgeEvent blk) -> IO ()) -> WithSeverity (TraceForgeEvent blk) @@ -3635,8 +3635,8 @@ -> TraceForgeEvent blk -> WithSeverity (TraceForgeEvent blk) forall a. Severity -> a -> WithSeverity a WithSeverity Severity -sev TraceForgeEvent blk -event) (Tracer IO (WithSeverity (TraceForgeEvent blk)) -> IO ()) +sev TraceForgeEvent blk +event) (Tracer IO (WithSeverity (TraceForgeEvent blk)) -> IO ()) -> Tracer IO (WithSeverity (TraceForgeEvent blk)) -> IO () forall a b. (a -> b) -> a -> b $ (WithSeverity (TraceForgeEvent blk) @@ -3651,28 +3651,28 @@ -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall a b. (a -> b) -> a -> b $ \(WithSeverity Severity -_ TraceForgeEvent blk -e) -> +_ TraceForgeEvent blk +e) -> case TraceForgeEvent blk -e of +e of Consensus.TraceStartLeadershipCheck{} -> Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall blk. Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftForgeAboutToLead ForgeTracers -ft) +ft) Consensus.TraceSlotIsImmutable{} -> Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall blk. Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftTraceSlotIsImmutable ForgeTracers -ft) +ft) Consensus.TraceBlockFromFuture{} -> Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall blk. Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftTraceBlockFromFuture ForgeTracers -ft) +ft) Consensus.TraceBlockContext{} -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer @@ -3681,7 +3681,7 @@ Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftCouldNotForge ForgeTracers -ft) +ft) Consensus.TraceLedgerState{} -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer @@ -3690,7 +3690,7 @@ Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftCouldNotForge ForgeTracers -ft) +ft) Consensus.TraceLedgerView{} -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer @@ -3699,53 +3699,53 @@ Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftTraceForgeStateUpdateError ForgeTracers -ft) +ft) Consensus.TraceNodeCannotForge {} -> Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall blk. Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftTraceNodeCannotForge ForgeTracers -ft) +ft) Consensus.TraceNodeNotLeader{} -> Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall blk. Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftTraceNodeNotLeader ForgeTracers -ft) +ft) Consensus.TraceNodeIsLeader{} -> Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall blk. Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftTraceNodeIsLeader ForgeTracers -ft) +ft) Consensus.TraceForgedBlock{} -> Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall blk. Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftForged ForgeTracers -ft) +ft) Consensus.TraceDidntAdoptBlock{} -> Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall blk. Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftDidntAdoptBlock ForgeTracers -ft) +ft) Consensus.TraceForgedInvalidBlock{} -> Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall blk. Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftForgedInvalid ForgeTracers -ft) +ft) Consensus.TraceAdoptedBlock{} -> Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall blk. Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) teeForge' (ForgeTracers -> Trace IO Text ftAdopted ForgeTracers -ft) +ft) case TraceForgeEvent blk -event of - Consensus.TraceStartLeadershipCheck SlotNo -_slot -> () -> IO () +event of + Consensus.TraceStartLeadershipCheck SlotNo +_slot -> () -> IO () forall (f :: * -> *) a. Applicative f => a -> f a pure () TraceForgeEvent blk @@ -3759,16 +3759,16 @@ (ToLogObject m, ToObject a, Transformable a m b) => TracingVerbosity -> Trace m a -> Tracer m b toLogObject' TracingVerbosity -tverb Trace IO Text -tr) WithSeverity (TraceLabelCreds (TraceForgeEvent blk)) -ev +tverb Trace IO Text +tr) WithSeverity (TraceLabelCreds (TraceForgeEvent blk)) +ev -teeForge' +teeForge' :: Trace IO Text - -> Tracer IO (WithSeverity (Consensus.TraceForgeEvent blk)) + -> Tracer IO (WithSeverity (Consensus.TraceForgeEvent blk)) teeForge' :: Trace IO Text -> Tracer IO (WithSeverity (TraceForgeEvent blk)) -teeForge' Trace IO Text -tr = +teeForge' Trace IO Text +tr = (WithSeverity (TraceForgeEvent blk) -> IO ()) -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a @@ -3778,10 +3778,10 @@ -> Tracer IO (WithSeverity (TraceForgeEvent blk)) forall a b. (a -> b) -> a -> b $ \(WithSeverity Severity -_ TraceForgeEvent blk -ev) -> do - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta +_ TraceForgeEvent blk +ev) -> do + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -3796,7 +3796,7 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "metrics" Trace IO Text -tr) ((LOMeta, LOContent Text) -> IO ()) +tr) ((LOMeta, LOContent Text) -> IO ()) -> (LOContent Text -> (LOMeta, LOContent Text)) -> LOContent Text -> IO () @@ -3804,13 +3804,13 @@ Category cat => cat b c -> cat a b -> cat a c . (LOMeta -meta,) (LOContent Text -> IO ()) -> LOContent Text -> IO () +meta,) (LOContent Text -> IO ()) -> LOContent Text -> IO () forall a b. (a -> b) -> a -> b $ case TraceForgeEvent blk -ev of - Consensus.TraceStartLeadershipCheck SlotNo -slot -> +ev of + Consensus.TraceStartLeadershipCheck SlotNo +slot -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text @@ -3825,11 +3825,11 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceSlotIsImmutable SlotNo -slot Point blk -_tipPoint BlockNo -_tipBlkNo -> +slot + Consensus.TraceSlotIsImmutable SlotNo +slot Point blk +_tipPoint BlockNo +_tipBlkNo -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text @@ -3844,10 +3844,10 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceBlockFromFuture SlotNo -slot SlotNo -_slotNo -> +slot + Consensus.TraceBlockFromFuture SlotNo +slot SlotNo +_slotNo -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text @@ -3862,11 +3862,11 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceBlockContext SlotNo -slot BlockNo -_tipBlkNo Point blk -_tipPoint -> +slot + Consensus.TraceBlockContext SlotNo +slot BlockNo +_tipBlkNo Point blk +_tipPoint -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text @@ -3881,9 +3881,9 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceNoLedgerState SlotNo -slot Point blk +slot + Consensus.TraceNoLedgerState SlotNo +slot Point blk _ -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a @@ -3899,9 +3899,9 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceLedgerState SlotNo -slot Point blk +slot + Consensus.TraceLedgerState SlotNo +slot Point blk _ -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a @@ -3917,9 +3917,9 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceNoLedgerView SlotNo -slot OutsideForecastRange +slot + Consensus.TraceNoLedgerView SlotNo +slot OutsideForecastRange _ -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a @@ -3935,9 +3935,9 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceLedgerView SlotNo -slot -> +slot + Consensus.TraceLedgerView SlotNo +slot -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text @@ -3952,10 +3952,10 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceForgeStateUpdateError SlotNo -slot ForgeStateUpdateError blk -_reason -> +slot + Consensus.TraceForgeStateUpdateError SlotNo +slot ForgeStateUpdateError blk +_reason -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text @@ -3970,10 +3970,10 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceNodeCannotForge SlotNo -slot CannotForge blk -_reason -> +slot + Consensus.TraceNodeCannotForge SlotNo +slot CannotForge blk +_reason -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text @@ -3988,9 +3988,9 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceNodeNotLeader SlotNo -slot -> +slot + Consensus.TraceNodeNotLeader SlotNo +slot -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text @@ -4005,9 +4005,9 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceNodeIsLeader SlotNo -slot -> +slot + Consensus.TraceNodeIsLeader SlotNo +slot -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text @@ -4022,9 +4022,9 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceForgedBlock SlotNo -slot Point blk +slot + Consensus.TraceForgedBlock SlotNo +slot Point blk _ blk _ MempoolSize _ -> @@ -4042,9 +4042,9 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceDidntAdoptBlock SlotNo -slot blk +slot + Consensus.TraceDidntAdoptBlock SlotNo +slot blk _ -> Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a @@ -4060,9 +4060,9 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceForgedInvalidBlock SlotNo -slot blk +slot + Consensus.TraceForgedInvalidBlock SlotNo +slot blk _ InvalidBlockReason blk _ -> Text -> Measurable -> LOContent Text @@ -4079,9 +4079,9 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot - Consensus.TraceAdoptedBlock SlotNo -slot blk +slot + Consensus.TraceAdoptedBlock SlotNo +slot blk _ [Validated (GenTx blk)] _ -> Text -> Measurable -> LOContent Text @@ -4098,33 +4098,33 @@ forall a b. (a -> b) -> a -> b $ SlotNo -> Word64 unSlotNo SlotNo -slot +slot forgeTracer - :: forall blk. - ( Consensus.RunNode blk - , ToObject (CannotForge blk) - , ToObject (LedgerErr (LedgerState blk)) - , ToObject (OtherHeaderEnvelopeError blk) - , ToObject (ValidationErr (BlockProtocol blk)) - , ToObject (ForgeStateUpdateError blk) - , HasKESInfo blk + :: forall blk. + ( Consensus.RunNode blk + , ToObject (CannotForge blk) + , ToObject (LedgerErr (LedgerState blk)) + , ToObject (OtherHeaderEnvelopeError blk) + , ToObject (ValidationErr (BlockProtocol blk)) + , ToObject (ForgeStateUpdateError blk) + , HasKESInfo blk ) => TracingVerbosity -> Trace IO Text -> ForgeTracers -> ForgingStats - -> Tracer IO (Consensus.TraceLabelCreds (Consensus.TraceForgeEvent blk)) + -> Tracer IO (Consensus.TraceLabelCreds (Consensus.TraceForgeEvent blk)) forgeTracer :: TracingVerbosity -> Trace IO Text -> ForgeTracers -> ForgingStats -> Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) -forgeTracer TracingVerbosity -verb Trace IO Text -tr ForgeTracers -forgeTracers ForgingStats -fStats = +forgeTracer TracingVerbosity +verb Trace IO Text +tr ForgeTracers +forgeTracers ForgingStats +fStats = (TraceLabelCreds (TraceForgeEvent blk) -> IO ()) -> Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a @@ -4133,10 +4133,10 @@ -> (TraceLabelCreds (TraceForgeEvent blk) -> IO ()) -> Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) forall a b. (a -> b) -> a -> b -$ \tlcev :: TraceLabelCreds (TraceForgeEvent blk) -tlcev@(Consensus.TraceLabelCreds Text -_ TraceForgeEvent blk -ev) -> do +$ \tlcev :: TraceLabelCreds (TraceForgeEvent blk) +tlcev@(Consensus.TraceLabelCreds Text +_ TraceForgeEvent blk +ev) -> do -- Ignoring the credentials label for measurement and counters: Tracer IO (TraceForgeEvent blk) -> TraceForgeEvent blk -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () @@ -4144,9 +4144,9 @@ forall blk. ForgingStats -> Trace IO Text -> Tracer IO (TraceForgeEvent blk) notifyBlockForging ForgingStats -fStats Trace IO Text -tr) TraceForgeEvent blk -ev +fStats Trace IO Text +tr) TraceForgeEvent blk +ev -- Consensus tracer -- here we track the label: Tracer IO (TraceLabelCreds (TraceForgeEvent blk)) -> TraceLabelCreds (TraceForgeEvent blk) -> IO () @@ -4177,8 +4177,8 @@ -> Trace IO Text -> Tracer IO (WithSeverity (TraceLabelCreds (TraceForgeEvent blk))) teeForge ForgeTracers -forgeTracers TracingVerbosity -verb +forgeTracers TracingVerbosity +verb (Trace IO Text -> Tracer IO (WithSeverity (TraceLabelCreds (TraceForgeEvent blk)))) @@ -4189,20 +4189,20 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "Forge" Trace IO Text -tr) TraceLabelCreds (TraceForgeEvent blk) -tlcev +tr) TraceLabelCreds (TraceForgeEvent blk) +tlcev TraceForgeEvent blk -> IO () -traceKESInfoIfKESExpired TraceForgeEvent blk -ev +traceKESInfoIfKESExpired TraceForgeEvent blk +ev where - traceKESInfoIfKESExpired :: TraceForgeEvent blk -> IO () -traceKESInfoIfKESExpired TraceForgeEvent blk -ev = + traceKESInfoIfKESExpired :: TraceForgeEvent blk -> IO () +traceKESInfoIfKESExpired TraceForgeEvent blk +ev = case TraceForgeEvent blk -ev of +ev of Consensus.TraceForgeStateUpdateError SlotNo -_ ForgeStateUpdateError blk -reason -> +_ ForgeStateUpdateError blk +reason -> -- KES-key cannot be evolved, but anyway trace KES-values. case Proxy blk -> ForgeStateUpdateError blk -> Maybe KESInfo forall blk. @@ -4210,17 +4210,17 @@ Proxy blk -> ForgeStateUpdateError blk -> Maybe KESInfo getKESInfo (Proxy blk forall k (t :: k). Proxy t -Proxy @blk) ForgeStateUpdateError blk -reason of +Proxy @blk) ForgeStateUpdateError blk +reason of Maybe KESInfo Nothing -> () -> IO () forall (f :: * -> *) a. Applicative f => a -> f a pure () - Just KESInfo -kesInfo -> do - let logValues :: [LOContent a] - logValues :: [LOContent a] -logValues = + Just KESInfo +kesInfo -> do + let logValues :: [LOContent a] + logValues :: [LOContent a] +logValues = [ Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text @@ -4248,7 +4248,7 @@ HotKey.kesStartPeriod (KESInfo -> Measurable) -> KESInfo -> Measurable forall a b. (a -> b) -> a -> b $ KESInfo -kesInfo +kesInfo , Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text @@ -4276,7 +4276,7 @@ HotKey.kesEndPeriod (KESInfo -> Measurable) -> KESInfo -> Measurable forall a b. (a -> b) -> a -> b $ KESInfo -kesInfo +kesInfo , Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text @@ -4296,8 +4296,8 @@ PureI Integer 0 ] - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -4316,7 +4316,7 @@ forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "metrics" Trace IO Text -tr) ((LOMeta, LOContent Text) -> IO ()) +tr) ((LOMeta, LOContent Text) -> IO ()) -> (LOContent Text -> (LOMeta, LOContent Text)) -> LOContent Text -> IO () @@ -4324,22 +4324,22 @@ Category cat => cat b c -> cat a b -> cat a c . (LOMeta -meta,)) [LOContent Text] +meta,)) [LOContent Text] forall a. [LOContent a] -logValues +logValues TraceForgeEvent blk _ -> () -> IO () forall (f :: * -> *) a. Applicative f => a -> f a pure () -notifyBlockForging +notifyBlockForging :: ForgingStats -> Trace IO Text - -> Tracer IO (Consensus.TraceForgeEvent blk) + -> Tracer IO (Consensus.TraceForgeEvent blk) notifyBlockForging :: ForgingStats -> Trace IO Text -> Tracer IO (TraceForgeEvent blk) -notifyBlockForging ForgingStats -fStats Trace IO Text -tr = (TraceForgeEvent blk -> IO ()) -> Tracer IO (TraceForgeEvent blk) +notifyBlockForging ForgingStats +fStats Trace IO Text +tr = (TraceForgeEvent blk -> IO ()) -> Tracer IO (TraceForgeEvent blk) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((TraceForgeEvent blk -> IO ()) -> Tracer IO (TraceForgeEvent blk)) -> (TraceForgeEvent blk -> IO ()) @@ -4350,7 +4350,7 @@ Text -> Trace IO Text -> Int -> IO () traceCounter Text "nodeCannotForge" Trace IO Text -tr +tr (Int -> IO ()) -> IO Int -> IO () forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< ForgingStats @@ -4358,33 +4358,33 @@ forall a. ForgingStats -> (ForgeThreadStats -> (ForgeThreadStats, a)) -> IO a mapForgingCurrentThreadStats ForgingStats -fStats - (\ForgeThreadStats -fts -> (ForgeThreadStats -fts { ftsNodeCannotForgeNum :: Int +fStats + (\ForgeThreadStats +fts -> (ForgeThreadStats +fts { ftsNodeCannotForgeNum :: Int ftsNodeCannotForgeNum = ForgeThreadStats -> Int ftsNodeCannotForgeNum ForgeThreadStats -fts Int -> Int -> Int +fts Int -> Int -> Int forall a. Num a => a -> a -> a + Int 1 }, ForgeThreadStats -> Int ftsNodeCannotForgeNum ForgeThreadStats -fts Int -> Int -> Int +fts Int -> Int -> Int forall a. Num a => a -> a -> a + Int 1)) - (Consensus.TraceNodeIsLeader (SlotNo Word64 -slot')) -> do - let slot :: Int -slot = Word64 -> Int + (Consensus.TraceNodeIsLeader (SlotNo Word64 +slot')) -> do + let slot :: Int +slot = Word64 -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Word64 -slot' +slot' Text -> Trace IO Text -> Int -> IO () traceCounter Text "nodeIsLeaderNum" Trace IO Text -tr +tr (Int -> IO ()) -> IO Int -> IO () forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< ForgingStats @@ -4392,22 +4392,22 @@ forall a. ForgingStats -> (ForgeThreadStats -> (ForgeThreadStats, a)) -> IO a mapForgingCurrentThreadStats ForgingStats -fStats - (\ForgeThreadStats -fts -> (ForgeThreadStats -fts { ftsNodeIsLeaderNum :: Int +fStats + (\ForgeThreadStats +fts -> (ForgeThreadStats +fts { ftsNodeIsLeaderNum :: Int ftsNodeIsLeaderNum = ForgeThreadStats -> Int ftsNodeIsLeaderNum ForgeThreadStats -fts Int -> Int -> Int +fts Int -> Int -> Int forall a. Num a => a -> a -> a + Int 1 , ftsLastSlot :: Int ftsLastSlot = Int -slot }, +slot }, ForgeThreadStats -> Int ftsNodeIsLeaderNum ForgeThreadStats -fts Int -> Int -> Int +fts Int -> Int -> Int forall a. Num a => a -> a -> a + Int 1)) @@ -4415,7 +4415,7 @@ Text -> Trace IO Text -> Int -> IO () traceCounter Text "blocksForgedNum" Trace IO Text -tr +tr (Int -> IO ()) -> IO Int -> IO () forall (m :: * -> *) a b. Monad m => (a -> m b) -> m a -> m b =<< ForgingStats @@ -4423,45 +4423,45 @@ forall a. ForgingStats -> (ForgeThreadStats -> (ForgeThreadStats, a)) -> IO a mapForgingCurrentThreadStats ForgingStats -fStats - (\ForgeThreadStats -fts -> (ForgeThreadStats -fts { ftsBlocksForgedNum :: Int +fStats + (\ForgeThreadStats +fts -> (ForgeThreadStats +fts { ftsBlocksForgedNum :: Int ftsBlocksForgedNum = ForgeThreadStats -> Int ftsBlocksForgedNum ForgeThreadStats -fts Int -> Int -> Int +fts Int -> Int -> Int forall a. Num a => a -> a -> a + Int 1 }, ForgeThreadStats -> Int ftsBlocksForgedNum ForgeThreadStats -fts Int -> Int -> Int +fts Int -> Int -> Int forall a. Num a => a -> a -> a + Int 1)) - Consensus.TraceNodeNotLeader (SlotNo Word64 -slot') -> do + Consensus.TraceNodeNotLeader (SlotNo Word64 +slot') -> do -- Not is not a leader again, so now the number of blocks forged by this node -- should be equal to the number of slots when this node was a leader. - let slot :: Int -slot = Word64 -> Int + let slot :: Int +slot = Word64 -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Word64 -slot' - Bool -hasMissed <- +slot' + Bool +hasMissed <- ForgingStats -> (ForgeThreadStats -> (ForgeThreadStats, Bool)) -> IO Bool forall a. ForgingStats -> (ForgeThreadStats -> (ForgeThreadStats, a)) -> IO a mapForgingCurrentThreadStats ForgingStats -fStats - (\ForgeThreadStats -fts -> +fStats + (\ForgeThreadStats +fts -> if ForgeThreadStats -> Int ftsLastSlot ForgeThreadStats -fts Int -> Int -> Bool +fts Int -> Int -> Bool forall a. Eq a => a -> a -> Bool == Int 0 Bool -> Bool -> Bool @@ -4469,55 +4469,55 @@ forall a. Enum a => a -> a succ (ForgeThreadStats -> Int ftsLastSlot ForgeThreadStats -fts) Int -> Int -> Bool +fts) Int -> Int -> Bool forall a. Eq a => a -> a -> Bool == Int -slot then +slot then (ForgeThreadStats -fts { ftsLastSlot :: Int +fts { ftsLastSlot :: Int ftsLastSlot = Int -slot }, Bool +slot }, Bool False) else - let missed :: Int -missed = ForgeThreadStats -> Int + let missed :: Int +missed = ForgeThreadStats -> Int ftsSlotsMissedNum ForgeThreadStats -fts Int -> Int -> Int +fts Int -> Int -> Int forall a. Num a => a -> a -> a + (Int -slot Int -> Int -> Int +slot Int -> Int -> Int forall a. Num a => a -> a -> a - ForgeThreadStats -> Int ftsLastSlot ForgeThreadStats -fts) +fts) in (ForgeThreadStats -fts { ftsLastSlot :: Int +fts { ftsLastSlot :: Int ftsLastSlot = Int -slot, ftsSlotsMissedNum :: Int +slot, ftsSlotsMissedNum :: Int ftsSlotsMissedNum = Int -missed }, Bool +missed }, Bool True)) Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when Bool -hasMissed (IO () -> IO ()) -> IO () -> IO () +hasMissed (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ do - Int -x <- [Int] -> Int + Int +x <- [Int] -> Int forall (f :: * -> *) a. (Foldable f, Num a) => f a -> a sum ([Int] -> Int) -> IO [Int] -> IO Int forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b <$> ForgingStats -> (ForgeThreadStats -> Int) -> IO [Int] forall a. ForgingStats -> (ForgeThreadStats -> a) -> IO [a] threadStatsProjection ForgingStats -fStats ForgeThreadStats -> Int +fStats ForgeThreadStats -> Int ftsSlotsMissedNum Text -> Trace IO Text -> Int -> IO () traceCounter Text "slotsMissedNum" Trace IO Text -tr Int -x +tr Int +x TraceForgeEvent blk _ -> () -> IO () forall (f :: * -> *) a. Applicative f => a -> f a @@ -4528,11 +4528,11 @@ -- Mempool Tracers -------------------------------------------------------------------------------- -notifyTxsProcessed :: ForgingStats -> Trace IO Text -> Tracer IO (TraceEventMempool blk) +notifyTxsProcessed :: ForgingStats -> Trace IO Text -> Tracer IO (TraceEventMempool blk) notifyTxsProcessed :: ForgingStats -> Trace IO Text -> Tracer IO (TraceEventMempool blk) -notifyTxsProcessed ForgingStats -fStats Trace IO Text -tr = (TraceEventMempool blk -> IO ()) +notifyTxsProcessed ForgingStats +fStats Trace IO Text +tr = (TraceEventMempool blk -> IO ()) -> Tracer IO (TraceEventMempool blk) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((TraceEventMempool blk -> IO ()) @@ -4545,28 +4545,28 @@ _ -> () -> IO () forall (m :: * -> *) a. Monad m => a -> m a return () - TraceMempoolRemoveTxs [Validated (GenTx blk)] -txs MempoolSize + TraceMempoolRemoveTxs [Validated (GenTx blk)] +txs MempoolSize _ -> do -- TraceMempoolRemoveTxs are previously valid transactions that are no longer valid because of -- changes in the ledger state. These transactions are already removed from the mempool, -- so we can treat them as completely processed. - Int -updatedTxProcessed <- ForgingStats -> (Int -> Int) -> IO Int + Int +updatedTxProcessed <- ForgingStats -> (Int -> Int) -> IO Int mapForgingStatsTxsProcessed ForgingStats -fStats (Int -> Int -> Int +fStats (Int -> Int -> Int forall a. Num a => a -> a -> a + ([Validated (GenTx blk)] -> Int forall a. HasLength a => a -> Int length [Validated (GenTx blk)] -txs)) +txs)) Text -> Trace IO Text -> Int -> IO () traceCounter Text "txsProcessedNum" Trace IO Text -tr (Int -> Int +tr (Int -> Int forall a b. (Integral a, Num b) => a -> b fromIntegral Int -updatedTxProcessed) +updatedTxProcessed) -- The rest of the constructors. TraceEventMempool blk _ -> () -> IO () @@ -4574,10 +4574,10 @@ return () -mempoolMetricsTraceTransformer :: Trace IO a -> Tracer IO (TraceEventMempool blk) +mempoolMetricsTraceTransformer :: Trace IO a -> Tracer IO (TraceEventMempool blk) mempoolMetricsTraceTransformer :: Trace IO a -> Tracer IO (TraceEventMempool blk) -mempoolMetricsTraceTransformer Trace IO a -tr = (TraceEventMempool blk -> IO ()) +mempoolMetricsTraceTransformer Trace IO a +tr = (TraceEventMempool blk -> IO ()) -> Tracer IO (TraceEventMempool blk) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((TraceEventMempool blk -> IO ()) @@ -4585,53 +4585,53 @@ -> (TraceEventMempool blk -> IO ()) -> Tracer IO (TraceEventMempool blk) forall a b. (a -> b) -> a -> b -$ \TraceEventMempool blk -mempoolEvent -> do - let tr' :: Trace IO a -tr' = Text -> Trace IO a -> Trace IO a +$ \TraceEventMempool blk +mempoolEvent -> do + let tr' :: Trace IO a +tr' = Text -> Trace IO a -> Trace IO a forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "metrics" Trace IO a -tr - (Int -_n, MempoolSize -tot) = case TraceEventMempool blk -mempoolEvent of - TraceMempoolAddedTx Validated (GenTx blk) -_tx0 MempoolSize -_ MempoolSize -tot0 -> (Int +tr + (Int +_n, MempoolSize +tot) = case TraceEventMempool blk +mempoolEvent of + TraceMempoolAddedTx Validated (GenTx blk) +_tx0 MempoolSize +_ MempoolSize +tot0 -> (Int 1, MempoolSize -tot0) - TraceMempoolRejectedTx GenTx blk -_tx0 ApplyTxErr blk -_ MempoolSize -tot0 -> (Int +tot0) + TraceMempoolRejectedTx GenTx blk +_tx0 ApplyTxErr blk +_ MempoolSize +tot0 -> (Int 1, MempoolSize -tot0) - TraceMempoolRemoveTxs [Validated (GenTx blk)] -txs0 MempoolSize -tot0 -> ([Validated (GenTx blk)] -> Int +tot0) + TraceMempoolRemoveTxs [Validated (GenTx blk)] +txs0 MempoolSize +tot0 -> ([Validated (GenTx blk)] -> Int forall a. HasLength a => a -> Int length [Validated (GenTx blk)] -txs0, MempoolSize -tot0) - TraceMempoolManuallyRemovedTxs [GenTxId blk] -txs0 [Validated (GenTx blk)] -txs1 MempoolSize -tot0 -> ( [GenTxId blk] -> Int +txs0, MempoolSize +tot0) + TraceMempoolManuallyRemovedTxs [GenTxId blk] +txs0 [Validated (GenTx blk)] +txs1 MempoolSize +tot0 -> ( [GenTxId blk] -> Int forall a. HasLength a => a -> Int length [GenTxId blk] -txs0 Int -> Int -> Int +txs0 Int -> Int -> Int forall a. Num a => a -> a -> a + [Validated (GenTx blk)] -> Int forall a. HasLength a => a -> Int length [Validated (GenTx blk)] -txs1, MempoolSize -tot0) - logValue1 :: LOContent a - logValue1 :: LOContent a -logValue1 = Text -> Measurable -> LOContent a +txs1, MempoolSize +tot0) + logValue1 :: LOContent a + logValue1 :: LOContent a +logValue1 = Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text "txsInMempool" (Measurable -> LOContent a) -> Measurable -> LOContent a @@ -4643,10 +4643,10 @@ forall a b. (Integral a, Num b) => a -> b fromIntegral (MempoolSize -> SizeInBytes msNumTxs MempoolSize -tot) - logValue2 :: LOContent a - logValue2 :: LOContent a -logValue2 = Text -> Measurable -> LOContent a +tot) + logValue2 :: LOContent a + logValue2 :: LOContent a +logValue2 = Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text "mempoolBytes" (Measurable -> LOContent a) -> Measurable -> LOContent a @@ -4658,9 +4658,9 @@ forall a b. (Integral a, Num b) => a -> b fromIntegral (MempoolSize -> SizeInBytes msNumBytes MempoolSize -tot) - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta +tot) + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -4672,38 +4672,38 @@ MonadIO m => Trace m a -> (LOMeta, LOContent a) -> m () traceNamedObject Trace IO a -tr' (LOMeta -meta, LOContent a +tr' (LOMeta +meta, LOContent a forall a. LOContent a -logValue1) +logValue1) Trace IO a -> (LOMeta, LOContent a) -> IO () forall (m :: * -> *) a. MonadIO m => Trace m a -> (LOMeta, LOContent a) -> m () traceNamedObject Trace IO a -tr' (LOMeta -meta, LOContent a +tr' (LOMeta +meta, LOContent a forall a. LOContent a -logValue2) +logValue2) -mempoolTracer - :: ( ToJSON (GenTxId blk) - , ToObject (ApplyTxErr blk) - , ToObject (GenTx blk) - , LedgerSupportsMempool blk +mempoolTracer + :: ( ToJSON (GenTxId blk) + , ToObject (ApplyTxErr blk) + , ToObject (GenTx blk) + , LedgerSupportsMempool blk ) => TraceSelection -> Trace IO Text -> ForgingStats - -> Tracer IO (TraceEventMempool blk) + -> Tracer IO (TraceEventMempool blk) mempoolTracer :: TraceSelection -> Trace IO Text -> ForgingStats -> Tracer IO (TraceEventMempool blk) -mempoolTracer TraceSelection -tc Trace IO Text -tracer ForgingStats -fStats = (TraceEventMempool blk -> IO ()) +mempoolTracer TraceSelection +tc Trace IO Text +tracer ForgingStats +fStats = (TraceEventMempool blk -> IO ()) -> Tracer IO (TraceEventMempool blk) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((TraceEventMempool blk -> IO ()) @@ -4711,30 +4711,30 @@ -> (TraceEventMempool blk -> IO ()) -> Tracer IO (TraceEventMempool blk) forall a b. (a -> b) -> a -> b -$ \TraceEventMempool blk -ev -> do +$ \TraceEventMempool blk +ev -> do Tracer IO (TraceEventMempool blk) -> TraceEventMempool blk -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith (Trace IO Text -> Tracer IO (TraceEventMempool blk) forall a blk. Trace IO a -> Tracer IO (TraceEventMempool blk) mempoolMetricsTraceTransformer Trace IO Text -tracer) TraceEventMempool blk -ev +tracer) TraceEventMempool blk +ev Tracer IO (TraceEventMempool blk) -> TraceEventMempool blk -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith (ForgingStats -> Trace IO Text -> Tracer IO (TraceEventMempool blk) forall blk. ForgingStats -> Trace IO Text -> Tracer IO (TraceEventMempool blk) notifyTxsProcessed ForgingStats -fStats Trace IO Text -tracer) TraceEventMempool blk -ev - let tr :: Trace IO Text -tr = Text -> Trace IO Text -> Trace IO Text +fStats Trace IO Text +tracer) TraceEventMempool blk +ev + let tr :: Trace IO Text +tr = Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "Mempool" Trace IO Text -tracer +tracer Tracer IO (TraceEventMempool blk) -> TraceEventMempool blk -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith (TraceSelection @@ -4745,21 +4745,21 @@ TraceSelection -> Trace IO Text -> Tracer IO (TraceEventMempool blk) mpTracer TraceSelection -tc Trace IO Text -tr) TraceEventMempool blk -ev +tc Trace IO Text +tr) TraceEventMempool blk +ev -mpTracer :: ( ToJSON (GenTxId blk) - , ToObject (ApplyTxErr blk) - , ToObject (GenTx blk) - , LedgerSupportsMempool blk +mpTracer :: ( ToJSON (GenTxId blk) + , ToObject (ApplyTxErr blk) + , ToObject (GenTx blk) + , LedgerSupportsMempool blk ) - => TraceSelection -> Trace IO Text -> Tracer IO (TraceEventMempool blk) + => TraceSelection -> Trace IO Text -> Tracer IO (TraceEventMempool blk) mpTracer :: TraceSelection -> Trace IO Text -> Tracer IO (TraceEventMempool blk) -mpTracer TraceSelection -tc Trace IO Text -tr = Tracer IO (WithSeverity (TraceEventMempool blk)) +mpTracer TraceSelection +tc Trace IO Text +tr = Tracer IO (WithSeverity (TraceEventMempool blk)) -> Tracer IO (TraceEventMempool blk) forall a (m :: * -> *). HasSeverityAnnotation a => @@ -4777,23 +4777,23 @@ TracingVerbosity -> Trace m a -> Tracer m b toLogObject' (TraceSelection -> TracingVerbosity traceVerbosity TraceSelection -tc) Trace IO Text -tr +tc) Trace IO Text +tr -------------------------------------------------------------------------------- -- ForgeStateInfo Tracers -------------------------------------------------------------------------------- forgeStateInfoMetricsTraceTransformer - :: forall a blk. HasKESMetricsData blk - => Proxy blk - -> Trace IO a - -> Tracer IO (Consensus.TraceLabelCreds (ForgeStateInfo blk)) + :: forall a blk. HasKESMetricsData blk + => Proxy blk + -> Trace IO a + -> Tracer IO (Consensus.TraceLabelCreds (ForgeStateInfo blk)) forgeStateInfoMetricsTraceTransformer :: Proxy blk -> Trace IO a -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) -forgeStateInfoMetricsTraceTransformer Proxy blk -p Trace IO a -tr = (TraceLabelCreds (ForgeStateInfo blk) -> IO ()) +forgeStateInfoMetricsTraceTransformer Proxy blk +p Trace IO a +tr = (TraceLabelCreds (ForgeStateInfo blk) -> IO ()) -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((TraceLabelCreds (ForgeStateInfo blk) -> IO ()) @@ -4803,64 +4803,64 @@ forall a b. (a -> b) -> a -> b $ \(Consensus.TraceLabelCreds Text -_ ForgeStateInfo blk -forgeStateInfo) -> do +_ ForgeStateInfo blk +forgeStateInfo) -> do case Proxy blk -> ForgeStateInfo blk -> KESMetricsData forall blk. HasKESMetricsData blk => Proxy blk -> ForgeStateInfo blk -> KESMetricsData getKESMetricsData Proxy blk -p ForgeStateInfo blk -forgeStateInfo of +p ForgeStateInfo blk +forgeStateInfo of KESMetricsData NoKESMetricsData -> () -> IO () forall (f :: * -> *) a. Applicative f => a -> f a pure () - TPraosKESMetricsData Word -kesPeriodOfKey - (MaxKESEvolutions Word64 -maxKesEvos) - (OperationalCertStartKESPeriod Word -oCertStartKesPeriod) -> do - let metricsTr :: Trace IO a -metricsTr = Text -> Trace IO a -> Trace IO a + TPraosKESMetricsData Word +kesPeriodOfKey + (MaxKESEvolutions Word64 +maxKesEvos) + (OperationalCertStartKESPeriod Word +oCertStartKesPeriod) -> do + let metricsTr :: Trace IO a +metricsTr = Text -> Trace IO a -> Trace IO a forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "metrics" Trace IO a -tr +tr -- The KES period of the hot key is relative to the start KES -- period of the operational certificate. - currentKesPeriod :: Word -currentKesPeriod = Word -oCertStartKesPeriod Word -> Word -> Word + currentKesPeriod :: Word +currentKesPeriod = Word +oCertStartKesPeriod Word -> Word -> Word forall a. Num a => a -> a -> a + Word -kesPeriodOfKey +kesPeriodOfKey - oCertExpiryKesPeriod :: Word -oCertExpiryKesPeriod = Word -oCertStartKesPeriod Word -> Word -> Word + oCertExpiryKesPeriod :: Word +oCertExpiryKesPeriod = Word +oCertStartKesPeriod Word -> Word -> Word forall a. Num a => a -> a -> a + Word64 -> Word forall a b. (Integral a, Num b) => a -> b fromIntegral Word64 -maxKesEvos +maxKesEvos - kesPeriodsUntilExpiry :: Word -kesPeriodsUntilExpiry = + kesPeriodsUntilExpiry :: Word +kesPeriodsUntilExpiry = Word -> Word -> Word forall a. Ord a => a -> a -> a max Word 0 (Word -oCertExpiryKesPeriod Word -> Word -> Word +oCertExpiryKesPeriod Word -> Word -> Word forall a. Num a => a -> a -> a - Word -currentKesPeriod) +currentKesPeriod) - logValues :: [LOContent a] - logValues :: [LOContent a] -logValues = + logValues :: [LOContent a] + logValues :: [LOContent a] +logValues = [ Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text @@ -4874,7 +4874,7 @@ $ Word -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral Word -oCertStartKesPeriod +oCertStartKesPeriod , Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text @@ -4888,7 +4888,7 @@ $ Word -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral Word -oCertExpiryKesPeriod +oCertExpiryKesPeriod , Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text @@ -4902,7 +4902,7 @@ $ Word -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral Word -currentKesPeriod +currentKesPeriod , Text -> Measurable -> LOContent a forall a. Text -> Measurable -> LOContent a LogValue Text @@ -4916,11 +4916,11 @@ $ Word -> Integer forall a b. (Integral a, Num b) => a -> b fromIntegral Word -kesPeriodsUntilExpiry +kesPeriodsUntilExpiry ] - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -4936,27 +4936,27 @@ MonadIO m => Trace m a -> (LOMeta, LOContent a) -> m () traceNamedObject Trace IO a -metricsTr ((LOMeta, LOContent a) -> IO ()) +metricsTr ((LOMeta, LOContent a) -> IO ()) -> (LOContent a -> (LOMeta, LOContent a)) -> LOContent a -> IO () forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => cat b c -> cat a b -> cat a c . (LOMeta -meta,)) [LOContent a] -logValues +meta,)) [LOContent a] +logValues -- Trace warning messages on the last 7 KES periods and, in the -- final and subsequent KES periods, trace alert messages. - LOMeta -metaWarning <- Severity -> PrivacyAnnotation -> IO LOMeta + LOMeta +metaWarning <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta mkLOMeta Severity Warning PrivacyAnnotation Public - LOMeta -metaAlert <- Severity -> PrivacyAnnotation -> IO LOMeta + LOMeta +metaAlert <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -4966,7 +4966,7 @@ Bool -> IO () -> IO () forall (f :: * -> *). Applicative f => Bool -> f () -> f () when (Word -kesPeriodsUntilExpiry Word -> Word -> Bool +kesPeriodsUntilExpiry Word -> Word -> Bool forall a. Ord a => a -> a -> Bool <= Word 7) (IO () -> IO ()) -> IO () -> IO () @@ -4975,7 +4975,7 @@ Trace IO a -> (Text, LogObject a) -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith Trace IO a -tr +tr ( Text forall a. Monoid a => a mempty @@ -4986,25 +4986,25 @@ forall a. Monoid a => a mempty (if Word -kesPeriodsUntilExpiry Word -> Word -> Bool +kesPeriodsUntilExpiry Word -> Word -> Bool forall a. Ord a => a -> a -> Bool <= Word 1 then LOMeta -metaAlert else LOMeta -metaWarning) +metaAlert else LOMeta +metaWarning) (Object -> Text -> LOContent a forall a. Object -> Text -> LOContent a LogStructuredText Object forall a. Monoid a => a mempty (Word -> Text -expiryLogMessage Word -kesPeriodsUntilExpiry)) +expiryLogMessage Word +kesPeriodsUntilExpiry)) ) where - expiryLogMessage :: Word -> Text - expiryLogMessage :: Word -> Text -expiryLogMessage Word -kesPeriodsUntilExpiry = + expiryLogMessage :: Word -> Text + expiryLogMessage :: Word -> Text +expiryLogMessage Word +kesPeriodsUntilExpiry = Text "Operational key will expire in " Text -> Text -> Text @@ -5017,29 +5017,29 @@ . Word -> String forall a. Show a => a -> String show) Word -kesPeriodsUntilExpiry +kesPeriodsUntilExpiry Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " KES periods." forgeStateInfoTracer - :: forall blk. - ( HasKESMetricsData blk - , Show (ForgeStateInfo blk) + :: forall blk. + ( HasKESMetricsData blk + , Show (ForgeStateInfo blk) ) - => Proxy blk + => Proxy blk -> TraceSelection -> Trace IO Text - -> Tracer IO (Consensus.TraceLabelCreds (ForgeStateInfo blk)) + -> Tracer IO (Consensus.TraceLabelCreds (ForgeStateInfo blk)) forgeStateInfoTracer :: Proxy blk -> TraceSelection -> Trace IO Text -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) -forgeStateInfoTracer Proxy blk -p TraceSelection -_ts Trace IO Text -tracer = (TraceLabelCreds (ForgeStateInfo blk) -> IO ()) +forgeStateInfoTracer Proxy blk +p TraceSelection +_ts Trace IO Text +tracer = (TraceLabelCreds (ForgeStateInfo blk) -> IO ()) -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) forall (m :: * -> *) a. (a -> m ()) -> Tracer m a Tracer ((TraceLabelCreds (ForgeStateInfo blk) -> IO ()) @@ -5047,14 +5047,14 @@ -> (TraceLabelCreds (ForgeStateInfo blk) -> IO ()) -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) forall a b. (a -> b) -> a -> b -$ \TraceLabelCreds (ForgeStateInfo blk) -ev -> do - let tr :: Trace IO Text -tr = Text -> Trace IO Text -> Trace IO Text +$ \TraceLabelCreds (ForgeStateInfo blk) +ev -> do + let tr :: Trace IO Text +tr = Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "Forge" Trace IO Text -tracer +tracer Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) -> TraceLabelCreds (ForgeStateInfo blk) -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () @@ -5066,21 +5066,21 @@ Proxy blk -> Trace IO a -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) forgeStateInfoMetricsTraceTransformer Proxy blk -p Trace IO Text -tracer) TraceLabelCreds (ForgeStateInfo blk) -ev +p Trace IO Text +tracer) TraceLabelCreds (ForgeStateInfo blk) +ev Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) -> TraceLabelCreds (ForgeStateInfo blk) -> IO () forall (m :: * -> *) a. Tracer m a -> a -> m () traceWith (Trace IO Text -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) -fsTracer Trace IO Text -tr) TraceLabelCreds (ForgeStateInfo blk) -ev +fsTracer Trace IO Text +tr) TraceLabelCreds (ForgeStateInfo blk) +ev where - fsTracer :: Trace IO Text -> Tracer IO (Consensus.TraceLabelCreds (ForgeStateInfo blk)) - fsTracer :: Trace IO Text -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) -fsTracer Trace IO Text -tr = Tracer IO String + fsTracer :: Trace IO Text -> Tracer IO (Consensus.TraceLabelCreds (ForgeStateInfo blk)) + fsTracer :: Trace IO Text -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) +fsTracer Trace IO Text +tr = Tracer IO String -> Tracer IO (TraceLabelCreds (ForgeStateInfo blk)) forall a (m :: * -> *). Show a => Tracer m String -> Tracer m a showTracing (Tracer IO String @@ -5099,32 +5099,32 @@ (ToLogObject m, ToObject a, Transformable a m b) => Trace m a -> Tracer m b toLogObject Trace IO Text -tr +tr -------------------------------------------------------------------------------- -- NodeToClient Tracers -------------------------------------------------------------------------------- -nodeToClientTracers' - :: ( StandardHash blk - , Show (ApplyTxErr blk) - , Show (GenTx blk) - , Show localPeer - , ToObject localPeer - , ShowQuery (Query blk) +nodeToClientTracers' + :: ( StandardHash blk + , Show (ApplyTxErr blk) + , Show (GenTx blk) + , Show localPeer + , ToObject localPeer + , ShowQuery (Query blk) ) => TraceSelection -> TracingVerbosity -> Trace IO Text - -> NodeToClient.Tracers' localPeer blk DeserialiseFailure (Tracer IO) + -> NodeToClient.Tracers' localPeer blk DeserialiseFailure (Tracer IO) nodeToClientTracers' :: TraceSelection -> TracingVerbosity -> Trace IO Text -> Tracers' localPeer blk DeserialiseFailure (Tracer IO) -nodeToClientTracers' TraceSelection -trSel TracingVerbosity -verb Trace IO Text -tr = +nodeToClientTracers' TraceSelection +trSel TracingVerbosity +verb Trace IO Text +tr = Tracers :: forall peer blk e (f :: * -> *). f (TraceLabelPeer peer @@ -5156,10 +5156,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceLocalChainSyncProtocol traceLocalChainSyncProtocol TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "LocalChainSyncProtocol" Trace IO Text -tr +tr , tTxSubmissionTracer :: Tracer IO (TraceLabelPeer @@ -5180,10 +5180,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceLocalTxSubmissionProtocol traceLocalTxSubmissionProtocol TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "LocalTxSubmissionProtocol" Trace IO Text -tr +tr , tStateQueryTracer :: Tracer IO (TraceLabelPeer @@ -5204,37 +5204,37 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceLocalStateQueryProtocol traceLocalStateQueryProtocol TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "LocalStateQueryProtocol" Trace IO Text -tr +tr } -------------------------------------------------------------------------------- -- NodeToNode Tracers -------------------------------------------------------------------------------- -nodeToNodeTracers' - :: ( Consensus.RunNode blk - , ConvertTxId blk - , HasTxs blk - , Show blk - , Show (Header blk) - , Show peer - , ToObject peer +nodeToNodeTracers' + :: ( Consensus.RunNode blk + , ConvertTxId blk + , HasTxs blk + , Show blk + , Show (Header blk) + , Show peer + , ToObject peer ) => TraceSelection -> TracingVerbosity -> Trace IO Text - -> NodeToNode.Tracers' peer blk DeserialiseFailure (Tracer IO) + -> NodeToNode.Tracers' peer blk DeserialiseFailure (Tracer IO) nodeToNodeTracers' :: TraceSelection -> TracingVerbosity -> Trace IO Text -> Tracers' peer blk DeserialiseFailure (Tracer IO) -nodeToNodeTracers' TraceSelection -trSel TracingVerbosity -verb Trace IO Text -tr = +nodeToNodeTracers' TraceSelection +trSel TracingVerbosity +verb Trace IO Text +tr = Tracers :: forall peer blk e (f :: * -> *). f (TraceLabelPeer peer @@ -5272,10 +5272,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceChainSyncProtocol traceChainSyncProtocol TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "ChainSyncProtocol" Trace IO Text -tr +tr , tChainSyncSerialisedTracer :: Tracer IO (TraceLabelPeer @@ -5296,9 +5296,9 @@ OnOff b -> Text -> Trace IO Text -> Tracer IO a showOnOff (TraceSelection -> OnOff TraceChainSyncProtocol traceChainSyncProtocol TraceSelection -trSel) Text +trSel) Text "ChainSyncProtocolSerialised" Trace IO Text -tr +tr , tBlockFetchTracer :: Tracer IO (TraceLabelPeer peer (TraceSendRecv (BlockFetch blk (Point blk)))) @@ -5314,10 +5314,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceBlockFetchProtocol traceBlockFetchProtocol TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "BlockFetchProtocol" Trace IO Text -tr +tr , tBlockFetchSerialisedTracer :: Tracer IO (TraceLabelPeer @@ -5334,9 +5334,9 @@ OnOff b -> Text -> Trace IO Text -> Tracer IO a showOnOff (TraceSelection -> OnOff TraceBlockFetchProtocolSerialised traceBlockFetchProtocolSerialised TraceSelection -trSel) Text +trSel) Text "BlockFetchProtocolSerialised" Trace IO Text -tr +tr , tTxSubmissionTracer :: Tracer IO (TraceLabelPeer @@ -5354,10 +5354,10 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceTxSubmissionProtocol traceTxSubmissionProtocol TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "TxSubmissionProtocol" Trace IO Text -tr +tr , tTxSubmission2Tracer :: Tracer IO (TraceLabelPeer @@ -5375,22 +5375,22 @@ OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (TraceSelection -> OnOff TraceTxSubmission2Protocol traceTxSubmission2Protocol TraceSelection -trSel) TracingVerbosity -verb Text +trSel) TracingVerbosity +verb Text "TxSubmission2Protocol" Trace IO Text -tr +tr } -teeTraceBlockFetchDecision - :: ( Eq peer - , HasHeader blk - , Show peer - , ToObject peer +teeTraceBlockFetchDecision + :: ( Eq peer + , HasHeader blk + , Show peer + , ToObject peer ) => TracingVerbosity - -> MVar (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]),Integer) + -> MVar (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]),Integer) -> Trace IO Text - -> Tracer IO (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) + -> Tracer IO (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) teeTraceBlockFetchDecision :: TracingVerbosity -> MVar (Maybe @@ -5402,14 +5402,14 @@ IO (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) -teeTraceBlockFetchDecision TracingVerbosity -verb MVar +teeTraceBlockFetchDecision TracingVerbosity +verb MVar (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]), Integer) -eliding Trace IO Text -tr = +eliding Trace IO Text +tr = (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] -> IO ()) @@ -5433,9 +5433,9 @@ (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) forall a b. (a -> b) -> a -> b -$ \WithSeverity +$ \WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] -ev -> do +ev -> do Tracer IO (WithSeverity @@ -5456,9 +5456,9 @@ (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) teeTraceBlockFetchDecision' Trace IO Text -meTr) WithSeverity +meTr) WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] -ev +ev Tracer IO (WithSeverity @@ -5492,39 +5492,39 @@ (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) teeTraceBlockFetchDecisionElide TracingVerbosity -verb MVar +verb MVar (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]), Integer) -eliding Trace IO Text -bfdTr) WithSeverity +eliding Trace IO Text +bfdTr) WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] -ev +ev where - meTr :: Trace IO Text -meTr = Text -> Trace IO Text -> Trace IO Text + meTr :: Trace IO Text +meTr = Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "metrics" Trace IO Text -tr - bfdTr :: Trace IO Text -bfdTr = Text -> Trace IO Text -> Trace IO Text +tr + bfdTr :: Trace IO Text +bfdTr = Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text "BlockFetchDecision" Trace IO Text -tr +tr -teeTraceBlockFetchDecision' +teeTraceBlockFetchDecision' :: Trace IO Text - -> Tracer IO (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) + -> Tracer IO (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) teeTraceBlockFetchDecision' :: Trace IO Text -> Tracer IO (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) -teeTraceBlockFetchDecision' Trace IO Text -tr = +teeTraceBlockFetchDecision' Trace IO Text +tr = (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] -> IO ()) @@ -5549,10 +5549,10 @@ [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) forall a b. (a -> b) -> a -> b $ \(WithSeverity Severity -_ [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] -peers) -> do - LOMeta -meta <- Severity -> PrivacyAnnotation -> IO LOMeta +_ [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] +peers) -> do + LOMeta +meta <- Severity -> PrivacyAnnotation -> IO LOMeta forall (m :: * -> *). MonadIO m => Severity -> PrivacyAnnotation -> m LOMeta @@ -5564,8 +5564,8 @@ MonadIO m => Trace m a -> (LOMeta, LOContent a) -> m () traceNamedObject Trace IO Text -tr (LOMeta -meta, Text -> Measurable -> LOContent Text +tr (LOMeta +meta, Text -> Measurable -> LOContent Text forall a. Text -> Measurable -> LOContent a LogValue Text "connectedPeers" (Measurable -> LOContent Text) @@ -5583,18 +5583,18 @@ $ [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] -> Int forall a. HasLength a => a -> Int length [TraceLabelPeer peer (FetchDecision [Point (Header blk)])] -peers) +peers) -teeTraceBlockFetchDecisionElide - :: ( Eq peer - , HasHeader blk - , Show peer - , ToObject peer +teeTraceBlockFetchDecisionElide + :: ( Eq peer + , HasHeader blk + , Show peer + , ToObject peer ) => TracingVerbosity - -> MVar (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]),Integer) + -> MVar (Maybe (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]),Integer) -> Trace IO Text - -> Tracer IO (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) + -> Tracer IO (WithSeverity [TraceLabelPeer peer (FetchDecision [Point (Header blk)])]) teeTraceBlockFetchDecisionElide :: TracingVerbosity -> MVar (Maybe @@ -5649,17 +5649,17 @@ } chainInformation - :: forall blk. HasHeader (Header blk) - => ChainDB.NewTipInfo blk - -> AF.AnchoredFragment (Header blk) + :: forall blk. HasHeader (Header blk) + => ChainDB.NewTipInfo blk + -> AF.AnchoredFragment (Header blk) -> Int64 -> ChainInformation chainInformation :: NewTipInfo blk -> AnchoredFragment (Header blk) -> Int64 -> ChainInformation -chainInformation NewTipInfo blk -newTipInfo AnchoredFragment (Header blk) -frag Int64 -blocksUncoupledDelta = ChainInformation :: Word64 +chainInformation NewTipInfo blk +newTipInfo AnchoredFragment (Header blk) +frag Int64 +blocksUncoupledDelta = ChainInformation :: Word64 -> Word64 -> Rational -> EpochNo @@ -5679,7 +5679,7 @@ HasHeader block => AnchoredFragment block -> WithOrigin SlotNo AF.headSlot AnchoredFragment (Header blk) -frag) +frag) , blocks :: Word64 blocks = BlockNo -> Word64 unBlockNo (BlockNo -> Word64) -> BlockNo -> Word64 @@ -5693,62 +5693,62 @@ HasHeader block => AnchoredFragment block -> WithOrigin BlockNo AF.headBlockNo AnchoredFragment (Header blk) -frag) +frag) , density :: Rational density = AnchoredFragment (Header blk) -> Rational forall blk. HasHeader (Header blk) => AnchoredFragment (Header blk) -> Rational fragmentChainDensity AnchoredFragment (Header blk) -frag +frag , epoch :: EpochNo epoch = NewTipInfo blk -> EpochNo forall blk. NewTipInfo blk -> EpochNo ChainDB.newTipEpoch NewTipInfo blk -newTipInfo +newTipInfo , slotInEpoch :: Word64 slotInEpoch = NewTipInfo blk -> Word64 forall blk. NewTipInfo blk -> Word64 ChainDB.newTipSlotInEpoch NewTipInfo blk -newTipInfo +newTipInfo , blocksUncoupledDelta :: Int64 blocksUncoupledDelta = Int64 -blocksUncoupledDelta +blocksUncoupledDelta } -fragmentChainDensity :: - HasHeader (Header blk) - => AF.AnchoredFragment (Header blk) -> Rational +fragmentChainDensity :: + HasHeader (Header blk) + => AF.AnchoredFragment (Header blk) -> Rational fragmentChainDensity :: AnchoredFragment (Header blk) -> Rational -fragmentChainDensity AnchoredFragment (Header blk) -frag = Word64 -> Word64 -> Rational -calcDensity Word64 -blockD Word64 -slotD +fragmentChainDensity AnchoredFragment (Header blk) +frag = Word64 -> Word64 -> Rational +calcDensity Word64 +blockD Word64 +slotD where - calcDensity :: Word64 -> Word64 -> Rational - calcDensity :: Word64 -> Word64 -> Rational -calcDensity Word64 -bl Word64 -sl + calcDensity :: Word64 -> Word64 -> Rational + calcDensity :: Word64 -> Word64 -> Rational +calcDensity Word64 +bl Word64 +sl | Word64 -sl Word64 -> Word64 -> Bool +sl Word64 -> Word64 -> Bool forall a. Ord a => a -> a -> Bool > Word64 0 = Word64 -> Rational forall a. Real a => a -> Rational toRational Word64 -bl Rational -> Rational -> Rational +bl Rational -> Rational -> Rational forall a. Fractional a => a -> a -> a / Word64 -> Rational forall a. Real a => a -> Rational toRational Word64 -sl +sl | Bool otherwise = Rational 0 - slotN :: Word64 -slotN = SlotNo -> Word64 + slotN :: Word64 +slotN = SlotNo -> Word64 unSlotNo (SlotNo -> Word64) -> SlotNo -> Word64 forall a b. (a -> b) -> a -> b $ SlotNo -> WithOrigin SlotNo -> SlotNo @@ -5759,12 +5759,12 @@ HasHeader block => AnchoredFragment block -> WithOrigin SlotNo AF.headSlot AnchoredFragment (Header blk) -frag) +frag) -- Slot of the tip - slot @k@ blocks back. Use 0 as the slot for genesis -- includes EBBs - slotD :: Word64 -slotD = Word64 -slotN + slotD :: Word64 +slotD = Word64 +slotN Word64 -> Word64 -> Word64 forall a. Num a => a -> a -> a - SlotNo -> Word64 @@ -5776,16 +5776,16 @@ HasHeader block => AnchoredFragment block -> WithOrigin SlotNo AF.lastSlot AnchoredFragment (Header blk) -frag)) +frag)) -- Block numbers start at 1. We ignore the genesis EBB, which has block number 0. - blockD :: Word64 -blockD = Word64 -blockN Word64 -> Word64 -> Word64 + blockD :: Word64 +blockD = Word64 +blockN Word64 -> Word64 -> Word64 forall a. Num a => a -> a -> a - Word64 -firstBlock - blockN :: Word64 -blockN = BlockNo -> Word64 +firstBlock + blockN :: Word64 +blockN = BlockNo -> Word64 unBlockNo (BlockNo -> Word64) -> BlockNo -> Word64 forall a b. (a -> b) -> a -> b $ BlockNo -> WithOrigin BlockNo -> BlockNo @@ -5797,9 +5797,9 @@ HasHeader block => AnchoredFragment block -> WithOrigin BlockNo AF.headBlockNo AnchoredFragment (Header blk) -frag) - firstBlock :: Word64 -firstBlock = case BlockNo -> Word64 +frag) + firstBlock :: Word64 +firstBlock = case BlockNo -> Word64 unBlockNo (BlockNo -> Word64) -> (Header blk -> BlockNo) -> Header blk -> Word64 forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). @@ -5815,7 +5815,7 @@ -> Either (Anchor (Header blk)) (Header blk) forall v a b. Anchorable v a b => AnchoredSeq v a b -> Either a b AF.last AnchoredFragment (Header blk) -frag of +frag of -- Empty fragment, no blocks. We have that @blocks = 1 - 1 = 0@ Left Anchor (Header blk) _ -> Word64 @@ -5825,9 +5825,9 @@ Right Word64 0 -> Word64 1 - Right Word64 -b -> Word64 -b + Right Word64 +b -> Word64 +b -------------------------------------------------------------------------------- @@ -5836,12 +5836,12 @@ readableTraceBlockchainTimeEvent :: TraceBlockchainTimeEvent UTCTime -> Text readableTraceBlockchainTimeEvent :: TraceBlockchainTimeEvent UTCTime -> Text -readableTraceBlockchainTimeEvent TraceBlockchainTimeEvent UTCTime -ev = case TraceBlockchainTimeEvent UTCTime -ev of - TraceStartTimeInTheFuture (SystemStart UTCTime -start) NominalDiffTime -toWait -> +readableTraceBlockchainTimeEvent TraceBlockchainTimeEvent UTCTime +ev = case TraceBlockchainTimeEvent UTCTime +ev of + TraceStartTimeInTheFuture (SystemStart UTCTime +start) NominalDiffTime +toWait -> Text "Waiting " Text -> Text -> Text forall a. Semigroup a => a -> a -> a @@ -5854,7 +5854,7 @@ . NominalDiffTime -> String forall a. Show a => a -> String show) NominalDiffTime -toWait Text -> Text -> Text +toWait Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text " until genesis start time at " Text -> Text -> Text @@ -5867,9 +5867,9 @@ . UTCTime -> String forall a. Show a => a -> String show) UTCTime -start - TraceCurrentSlotUnknown UTCTime -time PastHorizonException +start + TraceCurrentSlotUnknown UTCTime +time PastHorizonException _ -> Text "Too far from the chain tip to determine the current slot number for the time " @@ -5883,10 +5883,10 @@ . UTCTime -> String forall a. Show a => a -> String show) UTCTime -time - TraceSystemClockMovedBack UTCTime -prevTime UTCTime -newTime -> +time + TraceSystemClockMovedBack UTCTime +prevTime UTCTime +newTime -> Text "The system wall clock time moved backwards, but within our tolerance " Text -> Text -> Text @@ -5902,7 +5902,7 @@ . UTCTime -> String forall a. Show a => a -> String show) UTCTime -prevTime +prevTime Text -> Text -> Text forall a. Semigroup a => a -> a -> a <> Text @@ -5916,14 +5916,14 @@ . UTCTime -> String forall a. Show a => a -> String show) UTCTime -newTime +newTime -tracerOnOff :: Transformable Text IO a - => OnOff b +tracerOnOff :: Transformable Text IO a + => OnOff b -> TracingVerbosity -> LoggerName -> Trace IO Text - -> Tracer IO a + -> Tracer IO a tracerOnOff :: OnOff b -> TracingVerbosity -> Text -> Trace IO Text -> Tracer IO a tracerOnOff (OnOff Bool False) TracingVerbosity @@ -5933,10 +5933,10 @@ forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer tracerOnOff (OnOff Bool -True) TracingVerbosity -verb Text -name Trace IO Text -trcer = Tracer IO (WithSeverity a) -> Tracer IO a +True) TracingVerbosity +verb Text +name Trace IO Text +trcer = Tracer IO (WithSeverity a) -> Tracer IO a forall a (m :: * -> *). HasSeverityAnnotation a => Tracer m (WithSeverity a) -> Tracer m a @@ -5949,18 +5949,18 @@ (ToLogObject m, ToObject a, Transformable a m b) => TracingVerbosity -> Trace m a -> Tracer m b toLogObject' TracingVerbosity -verb +verb (Trace IO Text -> Tracer IO (WithSeverity a)) -> Trace IO Text -> Tracer IO (WithSeverity a) forall a b. (a -> b) -> a -> b $ Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text -name Trace IO Text -trcer +name Trace IO Text +trcer -tracerOnOff' - :: OnOff b -> Tracer IO a -> Tracer IO a +tracerOnOff' + :: OnOff b -> Tracer IO a -> Tracer IO a tracerOnOff' :: OnOff b -> Tracer IO a -> Tracer IO a tracerOnOff' (OnOff Bool False) Tracer IO a @@ -5968,22 +5968,22 @@ forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer tracerOnOff' (OnOff Bool -True) Tracer IO a -tr = Tracer IO a -tr +True) Tracer IO a +tr = Tracer IO a +tr -instance Show a => Show (WithSeverity a) where - show :: WithSeverity a -> String -show (WithSeverity Severity -_sev a -a) = a -> String +instance Show a => Show (WithSeverity a) where + show :: WithSeverity a -> String +show (WithSeverity Severity +_sev a +a) = a -> String forall a. Show a => a -> String show a -a +a -showOnOff - :: (Show a, HasSeverityAnnotation a) - => OnOff b -> LoggerName -> Trace IO Text -> Tracer IO a +showOnOff + :: (Show a, HasSeverityAnnotation a) + => OnOff b -> LoggerName -> Trace IO Text -> Tracer IO a showOnOff :: OnOff b -> Text -> Trace IO Text -> Tracer IO a showOnOff (OnOff Bool False) Text @@ -5992,9 +5992,9 @@ forall (m :: * -> *) a. Applicative m => Tracer m a nullTracer showOnOff (OnOff Bool -True) Text -name Trace IO Text -trcer = Tracer IO (WithSeverity a) -> Tracer IO a +True) Text +name Trace IO Text +trcer = Tracer IO (WithSeverity a) -> Tracer IO a forall a (m :: * -> *). HasSeverityAnnotation a => Tracer m (WithSeverity a) -> Tracer m a @@ -6010,14 +6010,14 @@ forall a b. (a -> b) -> a -> b $ Text -> Trace IO Text -> Tracer IO String withName Text -name Trace IO Text -trcer +name Trace IO Text +trcer withName :: Text -> Trace IO Text -> Tracer IO String withName :: Text -> Trace IO Text -> Tracer IO String -withName Text -name Trace IO Text -tr = (String -> Text) -> Tracer IO Text -> Tracer IO String +withName Text +name Trace IO Text +tr = (String -> Text) -> Tracer IO Text -> Tracer IO String forall (f :: * -> *) a b. Contravariant f => (a -> b) -> f b -> f a contramap String -> Text Text.pack (Tracer IO Text -> Tracer IO String) @@ -6033,6 +6033,6 @@ $ Text -> Trace IO Text -> Trace IO Text forall (m :: * -> *) a. Text -> Trace m a -> Trace m a appendName Text -name Trace IO Text -tr +name Trace IO Text +tr \ No newline at end of file diff --git a/cardano-node/src/Main.html b/cardano-node/src/Main.html index 176d6d2957e..b15bed4fe41 100644 --- a/cardano-node/src/Main.html +++ b/cardano-node/src/Main.html @@ -29,32 +29,32 @@ forall a b. (a -> b) -> a -> b $ do - Command -cmd <- ParserPrefs -> ParserInfo Command -> IO Command + Command +cmd <- ParserPrefs -> ParserInfo Command -> IO Command forall a. ParserPrefs -> ParserInfo a -> IO a Opt.customExecParser ParserPrefs -p ParserInfo Command -opts +p ParserInfo Command +opts case Command -cmd of - RunCmd PartialNodeConfiguration -args -> PartialNodeConfiguration -> IO () +cmd of + RunCmd PartialNodeConfiguration +args -> PartialNodeConfiguration -> IO () runRunCommand PartialNodeConfiguration -args +args Command VersionCmd -> IO () runVersionCommand where - p :: ParserPrefs -p = PrefsMod -> ParserPrefs + p :: ParserPrefs +p = PrefsMod -> ParserPrefs Opt.prefs PrefsMod Opt.showHelpOnEmpty - opts :: Opt.ParserInfo Command - opts :: ParserInfo Command -opts = + opts :: Opt.ParserInfo Command + opts :: ParserInfo Command +opts = Parser Command -> InfoMod Command -> ParserInfo Command forall a. Parser a -> InfoMod a -> ParserInfo a Opt.info ((PartialNodeConfiguration -> Command) @@ -70,10 +70,10 @@ forall (f :: * -> *) a b. Applicative f => f a -> f (a -> b) -> f b <**> String -> String -> String -> Parser (Command -> Command) forall a. String -> String -> String -> Parser (a -> a) -helperBrief String +helperBrief String "help" String "Show this help text" String -nodeCliHelpMain) +nodeCliHelpMain) ( InfoMod Command forall a. InfoMod a @@ -86,17 +86,17 @@ "Start node of the Cardano blockchain." ) - helperBrief :: String -> String -> String -> Parser (a -> a) - helperBrief :: String -> String -> String -> Parser (a -> a) -helperBrief String -l String -d String -helpText = ParseError -> Mod OptionFields (a -> a) -> Parser (a -> a) + helperBrief :: String -> String -> String -> Parser (a -> a) + helperBrief :: String -> String -> String -> Parser (a -> a) +helperBrief String +l String +d String +helpText = ParseError -> Mod OptionFields (a -> a) -> Parser (a -> a) forall a. ParseError -> Mod OptionFields (a -> a) -> Parser (a -> a) Opt.abortOption (String -> ParseError Opt.InfoMsg String -helpText) (Mod OptionFields (a -> a) -> Parser (a -> a)) +helpText) (Mod OptionFields (a -> a) -> Parser (a -> a)) -> Mod OptionFields (a -> a) -> Parser (a -> a) forall a b. (a -> b) -> a -> b $ [Mod OptionFields (a -> a)] -> Mod OptionFields (a -> a) @@ -105,15 +105,15 @@ [ String -> Mod OptionFields (a -> a) forall (f :: * -> *) a. HasName f => String -> Mod f a Opt.long String -l +l , String -> Mod OptionFields (a -> a) forall (f :: * -> *) a. String -> Mod f a Opt.help String -d ] +d ] - nodeCliHelpMain :: String - nodeCliHelpMain :: String -nodeCliHelpMain = Int -> Doc -> String + nodeCliHelpMain :: String + nodeCliHelpMain :: String +nodeCliHelpMain = Int -> Doc -> String renderHelpDoc Int 80 (Doc -> String) -> Doc -> String forall a b. (a -> b) -> a -> b @@ -206,7 +206,7 @@ mconcat [ Text "cardano-node ", Version -> Text -renderVersion Version +renderVersion Version version , Text " - ", String -> Text @@ -220,15 +220,15 @@ Text.pack String compilerName, Text "-", Version -> Text -renderVersion Version +renderVersion Version compilerVersion , Text "\ngit rev ", Text gitRev ] where - renderVersion :: Version -> Text -renderVersion = String -> Text + renderVersion :: Version -> Text +renderVersion = String -> Text Text.pack (String -> Text) -> (Version -> String) -> Version -> Text forall k (cat :: k -> k -> *) (b :: k) (c :: k) (a :: k). Category cat => @@ -239,31 +239,31 @@ runRunCommand :: PartialNodeConfiguration -> IO () runRunCommand :: PartialNodeConfiguration -> IO () -runRunCommand PartialNodeConfiguration -pnc = IO () -> IO () +runRunCommand PartialNodeConfiguration +pnc = IO () -> IO () forall (m :: * -> *) a. MonadIO m => IO a -> m a liftIO (IO () -> IO ()) -> IO () -> IO () forall a b. (a -> b) -> a -> b $ PartialNodeConfiguration -> IO () runNode PartialNodeConfiguration -pnc +pnc -command' :: String -> String -> Parser a -> Mod CommandFields a +command' :: String -> String -> Parser a -> Mod CommandFields a command' :: String -> String -> Parser a -> Mod CommandFields a -command' String -c String -descr Parser a -p = +command' String +c String +descr Parser a +p = String -> ParserInfo a -> Mod CommandFields a forall a. String -> ParserInfo a -> Mod CommandFields a command String -c (ParserInfo a -> Mod CommandFields a) +c (ParserInfo a -> Mod CommandFields a) -> ParserInfo a -> Mod CommandFields a forall a b. (a -> b) -> a -> b $ Parser a -> InfoMod a -> ParserInfo a forall a. Parser a -> InfoMod a -> ParserInfo a info (Parser a -p Parser a -> Parser (a -> a) -> Parser a +p Parser a -> Parser (a -> a) -> Parser a forall (f :: * -> *) a b. Applicative f => f a -> f (a -> b) -> f b <**> Parser (a -> a) forall a. Parser (a -> a) @@ -275,5 +275,5 @@ mconcat [ String -> InfoMod a forall a. String -> InfoMod a progDesc String -descr ] +descr ] \ No newline at end of file diff --git a/cardano-node/src/Paths_cardano_node.html b/cardano-node/src/Paths_cardano_node.html index 2188bd07dc4..54e75bb79fe 100644 --- a/cardano-node/src/Paths_cardano_node.html +++ b/cardano-node/src/Paths_cardano_node.html @@ -16,7 +16,7 @@ #if defined(VERSION_base) #if MIN_VERSION_base(4,0,0) -catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a +catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a #else catchIO :: IO a -> (Exception.Exception -> IO a) -> IO a #endif @@ -121,19 +121,19 @@ getDataFileName :: FilePath -> IO FilePath getDataFileName :: String -> IO String -getDataFileName String -name = do - String -dir <- IO String +getDataFileName String +name = do + String +dir <- IO String getDataDir String -> IO String forall (m :: * -> *) a. Monad m => a -> m a return (String -dir String -> String -> String +dir String -> String -> String forall a. [a] -> [a] -> [a] ++ String "/" String -> String -> String forall a. [a] -> [a] -> [a] ++ String -name) +name) \ No newline at end of file diff --git a/doc-index-All.html b/doc-index-All.html index 1c393eda55a..d5c55b26adb 100644 --- a/doc-index-All.html +++ b/doc-index-All.html @@ -1 +1 @@ -cardano-node API (Index)
cardano-node API

Index

?!Cardano.Api.Utils
?!.Cardano.Api.Utils
AByronSigningKey 
1 (Data Constructor)Cardano.Api.KeysByron, Cardano.Api.Byron
2 (Data Constructor)Cardano.CLI.Shelley.Run.Key
AByronSigningKeyLegacyCardano.Api.KeysByron, Cardano.Api.Byron
AByronVerificationKeyCardano.CLI.Shelley.Run.Address
AcquireFailureCardano.Api.IPC
AcquireFailurePointNotOnChainCardano.Api.IPC
AcquireFailurePointTooOldCardano.Api.IPC
activeSlotsCoeff 
1 (Function)Testnet.Shelley
2 (Function)Testnet.ByronShelley
AdaAssetIdCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressBuildCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressBuildMultiSigCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressByronCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressInEra 
1 (Data Constructor)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressInfoCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyByronCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyGenCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyHashCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyShelleyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyShelleyExtendedCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyTypeCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressShelleyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressTypeInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
adjustSimpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AGenesisDelegateExtendedSigningKeyCardano.CLI.Shelley.Run.Key
AGenesisDelegateSigningKeyCardano.CLI.Shelley.Run.Key
AGenesisExtendedSigningKeyCardano.CLI.Shelley.Run.Key
AGenesisSigningKeyCardano.CLI.Shelley.Run.Key
AGenesisUTxOSigningKeyCardano.CLI.Shelley.Run.Key
AGenesisUTxOVerificationKeyCardano.CLI.Shelley.Run.Address
AKesSigningKeyCardano.CLI.Shelley.Run.Key
AllegraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AllegraEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AllegraEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AlonzoEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AlonzoEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyAddressInShelleyBasedEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyCardanoEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyCardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyConsensusMode 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyConsensusModeParams 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyEraInMode 
1 (Data Constructor)Cardano.Api.Modes
2 (Type/Class)Cardano.Api.Modes
anyEraInModeToAnyEraCardano.Api.Modes
AnyPlutusScriptVersion 
1 (Data Constructor)Cardano.Api.Script
2 (Type/Class)Cardano.Api.Script
AnyScriptLanguage 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
APaymentExtendedSigningKeyCardano.CLI.Shelley.Run.Key
APaymentExtendedVerificationKeyCardano.CLI.Shelley.Run.Address
APaymentSigningKeyCardano.CLI.Shelley.Run.Key
APaymentVerificationKeyCardano.CLI.Shelley.Run.Address
applyBlockCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ApplyMempoolPayloadErrCardano.Api.TxSubmit.Types
AsAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAddressAnyCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAddressInEraCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAllegraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAllegraEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAlonzoEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAssetNameCardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronAddrCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronKeyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronKeyLegacyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
AsByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
AsByronWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsCertificateCardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisDelegateExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisDelegateKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisUTxOKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsHashCardano.Api.Hash, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ASigningKeyFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AsKesKeyCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsKeyWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsOperationalCertificateCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsOperationalCertificateIssueCounterCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPaymentExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPaymentKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPlutusScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPlutusScriptV1Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPolicyIdCardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptHashCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptInAnyLangCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptInEraCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AssetId 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AssetName 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyAddrCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSigningKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptV1Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptV2Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakePoolKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakePoolMetadataCardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AStakeExtendedSigningKeyCardano.CLI.Shelley.Run.Key
AStakePoolSigningKeyCardano.CLI.Shelley.Run.Key
AStakeSigningKeyCardano.CLI.Shelley.Run.Key
AsTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxIdCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxMetadataCardano.Api.TxMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTypeCardano.Api.HasTypeProxy, Cardano.Api.Eras, Cardano.Api.Hash, Cardano.Api.SerialiseTextEnvelope, Cardano.Api.Key, Cardano.Api.TxMetadata, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.SpecialByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Address, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.TxBody, Cardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Shelley, Cardano.Api.Byron, Cardano.Api.Byron
AsUpdateProposalCardano.Api.ProtocolParameters, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsVerificationKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsVrfKeyCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AtEpochTestnet.ByronShelley
AtVersionTestnet.ByronShelley
AuxScriptsInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
auxScriptsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AVerificationKeyFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AVrfSigningKeyCardano.CLI.Shelley.Run.Key
backwardsCompatibilityCommandsCardano.CLI.Byron.Parsers
baseTestnet.Conf
Bech32DataPartToBytesErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DecodeErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DecodingErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DeserialiseFromBytesErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
bech32PrefixesPermittedCardano.Api.SerialiseBech32
bech32PrefixForCardano.Api.SerialiseBech32
Bech32UnexpectedPrefixCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32WrongPrefixCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Block 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockHeader 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockId 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
BlockInMode 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockNo 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockTypeCardano.Api.Protocol.Types
bPpuHeavyDelThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxBlockSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxHeaderSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxProposalSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxTxSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMpcThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuScriptVersionCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuSlotDurationCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuSoftforkRuleCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuTxFeePolicyCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUnlockStakeEpochCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateProposalThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateProposalTTLCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateVoteThdCardano.Api.SpecialByron, Cardano.Api.Byron
buildShelleyAddressCardano.CLI.Shelley.Run.Address
BuildTxCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BuildTxWith 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronAddrCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronAddressCardano.Api.Address, Cardano.Api.Byron
ByronAddressInAnyEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
byronAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronBlockCardano.Api.Block
ByronBlockTypeCardano.Api.Protocol.Types
ByronClientCmdErrorCardano.CLI.Byron.Run
ByronCommand 
1 (Data Constructor)Cardano.CLI.Run
2 (Type/Class)Cardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
ByronDelegateKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ByronDelegationCertSerializationErrorCardano.CLI.Byron.Genesis
ByronDelegationErrorCardano.CLI.Byron.Delegation
ByronDelegationKeyErrorCardano.CLI.Byron.Delegation
ByronDelegationKeySerializationErrorCardano.CLI.Byron.Genesis
ByronEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronEraInByronModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronGenesisErrorCardano.CLI.Byron.Genesis
ByronGenesisKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ByronKeyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyFailureCardano.CLI.Byron.Key
ByronKeyFormat 
1 (Type/Class)Cardano.Api.KeysByron
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
byronKeyFormatCardano.Api.KeysByron
ByronKeyHashCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyHashLegacyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyLegacyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyTypeCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ByronKeyWitnessCardano.Api.Tx, Cardano.Api.Byron
ByronLegacyKeyFormatCardano.Api.KeysByron
ByronMode 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Byron
ByronModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronModernKeyFormatCardano.Api.KeysByron
ByronPaymentKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ByronProtocolParametersUpdate 
1 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
ByronQueryEnvVarSocketErrCardano.CLI.Byron.Query
ByronQueryErrorCardano.CLI.Byron.Query
ByronReadUpdateProposalFileFailureCardano.CLI.Byron.UpdateProposal
ByronSigningKeyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronSigningKeyLegacyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronTxCardano.Api.Tx, Cardano.Api.Byron
ByronTxBodyCardano.Api.TxBody, Cardano.Api.Byron
ByronTxErrorCardano.CLI.Byron.Tx
ByronTxSubmitErrorCardano.CLI.Byron.Tx
ByronTxSubmitErrorEraMismatchCardano.CLI.Byron.Tx
ByronTxValidationErrorCardano.Api.TxInMode
ByronUpdateProposal 
1 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
ByronUpdateProposalErrorCardano.CLI.Byron.UpdateProposal
ByronUpdateProposalGenesisReadErrorCardano.CLI.Byron.UpdateProposal
ByronUpdateProposalTxErrorCardano.CLI.Byron.UpdateProposal
ByronUpdateProposalWriteErrorCardano.CLI.Byron.UpdateProposal
ByronVerificationKeyCardano.Api.KeysByron, Cardano.Api.Byron
ByronVerificationKeyLegacyCardano.Api.KeysByron, Cardano.Api.Byron
ByronVote 
1 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
ByronVoteDecodingErrorCardano.CLI.Byron.Vote
ByronVoteErrorCardano.CLI.Byron.Vote
ByronVoteGenesisReadErrorCardano.CLI.Byron.Vote
ByronVoteKeyReadFailureCardano.CLI.Byron.Vote
ByronVoteReadFileFailureCardano.CLI.Byron.Vote
ByronVoteTxSubmissionErrorCardano.CLI.Byron.Vote
ByronVoteUpdateHelperErrorCardano.CLI.Byron.Vote
ByronVoteUpdateProposalDecodingErrorCardano.CLI.Byron.Vote
ByronVoteUpdateProposalFailureCardano.CLI.Byron.Vote
byronWitnessToVerKeyCardano.CLI.Byron.Key
calcMinimumDepositCardano.Api.Value, Cardano.Api.Shelley
CannotMigrateFromNonLegacySigningKeyCardano.CLI.Byron.Key
CardanoAddressByronPaymentKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CardanoAddressIcarusPaymentKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CardanoAddressKeyTypeCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CardanoAddressShelleyPaymentKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CardanoAddressShelleyStakeKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CardanoBlockTypeCardano.Api.Protocol.Types
CardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
cardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoEraStyleCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
cardanoEraStyleCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoMode 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoModeIsMultiEraCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastHashCardano.Api.Hash
castHashCardano.Api.Hash, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
castSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastSigningKeyRoleCardano.Api.Key
castVerificationKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastVerificationKeyRoleCardano.Api.Key
CBORBlockByronCardano.CLI.Types
CBORDecodingErrorCardano.CLI.Helpers
CBORDelegationCertificateByronCardano.CLI.Types
CBORObjectCardano.CLI.Types
CBORPrettyPrintErrorCardano.CLI.Helpers
CBORTxByronCardano.CLI.Types
CBORUpdateProposalByronCardano.CLI.Types
CBORVoteByronCardano.CLI.Types
CertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificateFile 
1 (Data Constructor)Cardano.CLI.Types, Cardano.CLI.Byron.Commands
2 (Type/Class)Cardano.CLI.Types, Cardano.CLI.Byron.Commands
CertificatesInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
certificatesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificateValidationErrorsCardano.CLI.Byron.Delegation
ChainPoint 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainPointAtGenesisCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainSyncClient 
1 (Data Constructor)Cardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
chainSyncClientNullCardano.Api.ChainSync.Client
ChainSyncClientPipelined 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainSyncInstructionCardano.Api.ChainSync.ClientPipelined
ChainTip 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainTipAtGenesisCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
chainTipToChainPointCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
chairmanTestCardano.Chairman
checkByronGenesisDelegationCardano.CLI.Byron.Delegation
ClientCommandCardano.CLI.Run
ClientCommandErrorsCardano.CLI.Run
ClientPipelinedStIdleCardano.Api.ChainSync.ClientPipelined
ClientPipelinedStIntersect 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
ClientStIdleCardano.Api.ChainSync.Client
ClientStIntersect 
1 (Data Constructor)Cardano.Api.ChainSync.Client
2 (Type/Class)Cardano.Api.ChainSync.Client
ClientStNext 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
3 (Data Constructor)Cardano.Api.ChainSync.Client
4 (Type/Class)Cardano.Api.ChainSync.Client
CliEnvVarLookupCardano.CLI.Environment
clsStateCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
cmdRunCardano.Chairman.Commands.Run
cmdVersionCardano.Chairman.Commands.Version
ColdGenesisDelegateVerificationKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ColdStakePoolVerificationKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ColdVerificationKeyFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ColdVerificationKeyOrFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CollateralInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CollateralSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
collateralSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CollectCardano.Api.ChainSync.ClientPipelined
CollectOrPipelineCardano.Api.ChainSync.ClientPipelined
CollectResponseCardano.Api.ChainSync.ClientPipelined
commandsCardano.Chairman.Commands
Conf 
1 (Data Constructor)Testnet.Conf
2 (Type/Class)Testnet.Conf
connectToLocalNodeCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusBlockForEraCardano.Api.Modes
ConsensusBlockForModeCardano.Api.Modes
ConsensusModeCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusModeIsMultiEraCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
consensusModeOnlyCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
constantPipelineDecisionCardano.Api.ChainSync.ClientPipelined
CostModel 
1 (Data Constructor)Cardano.Api.ProtocolParameters
2 (Type/Class)Cardano.Api.ProtocolParameters
CreateVoteCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
DebugLedgerState 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
decodeBech32Cardano.CLI.Shelley.Run.Key
decodeLegacyDelegateKeyCardano.CLI.Byron.Legacy
defaultRenderPrettyValueOptionsCardano.CLI.Mary.RenderValue
defaultRenderValueOptionsCardano.CLI.Mary.RenderValue
defaultTestnetOptions 
1 (Function)Testnet.Shelley
2 (Function)Testnet.Byron
3 (Function)Testnet.ByronShelley
DeprecatedShelleySubcommandCardano.CLI.Run
deserialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseAnyOfFromBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromRawBytesHexCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromTextEnvelopeAnyOfCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseInputCardano.CLI.Shelley.Key
deserialiseInputAnyOfCardano.CLI.Shelley.Key
deserialiseScriptInAnyLangCardano.CLI.Shelley.Script
deterministicSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deterministicSigningKeySeedSizeCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
displayErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
DisplayVersionCardano.CLI.Run
DlgCertificateDeserialisationFailedCardano.CLI.Byron.Delegation
dropNthTestnet.List
dumpGenesisCardano.CLI.Byron.Genesis
Ed25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
encodedListSizeExprCardano.Api.SerialiseCBOR
encodedSizeExprCardano.Api.SerialiseCBOR
encodeLegacyDelegateKeyCardano.CLI.Byron.Legacy
ensureNewFileCardano.CLI.Helpers
ensureNewFileLBSCardano.CLI.Helpers
Env 
1 (Data Constructor)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envLedgerConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envProtocolConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envSecurityParamCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EnvSocketError 
1 (Data Constructor)Cardano.CLI.Byron.Tx
2 (Type/Class)Cardano.CLI.Environment
epochLength 
1 (Function)Testnet.Shelley
2 (Function)Testnet.ByronShelley
EpochNo 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EpochSize 
1 (Data Constructor)Cardano.Api.GenesisParameters
2 (Type/Class)Cardano.Api.GenesisParameters
EpochSlots 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EraHistory 
1 (Data Constructor)Cardano.Api.Query
2 (Type/Class)Cardano.Api.Query
EraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
eraInModeToEraCardano.Api.Modes
eraOfScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
eraOfScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ErrorAsException 
1 (Data Constructor)Cardano.Api.Error
2 (Type/Class)Cardano.Api.Error
estimateTransactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
examplePlutusScriptAlwaysFailsCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
examplePlutusScriptAlwaysSucceedsCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
execCliTest.Process
executionMemoryCardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
executionStepsCardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ExecutionUnitPrices 
1 (Data Constructor)Cardano.Api.ProtocolParameters
2 (Type/Class)Cardano.Api.ProtocolParameters
ExecutionUnits 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ExtraKeyWitnessesInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
extraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileError 
1 (Data Constructor)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileErrorTempFileCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileIOErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FilterByAddressCardano.CLI.Types
filterValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
foldBlocksCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksApplyBlockErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ForkPointTestnet.ByronShelley
forkPointTestnet.ByronShelley
friendlyTxBodyBSCardano.CLI.Run.Friendly
fromAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
fromAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromAlonzoExUnitsCardano.Api.Script
fromAlonzoLanguageCardano.Api.Script
fromAlonzoPricesCardano.Api.ProtocolParameters
fromByronLovelaceCardano.Api.Value
fromByronTxInCardano.Api.TxBody, Cardano.Api.Byron
FromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromCBORCardano.Api.SerialiseCBOR
fromCborTxAuxCardano.CLI.Byron.Tx
fromConsensusApplyTxErrCardano.Api.TxInMode
fromConsensusBlockCardano.Api.Block
fromConsensusEraIndexCardano.Api.Modes
fromConsensusPointCardano.Api.Block
fromConsensusPointInModeCardano.Api.Block
fromConsensusQueryResultCardano.Api.Query
fromConsensusTipCardano.Api.Block
fromGroupTest.Tasty.Hedgehog.Group
FromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromLedgerPParamsCardano.Api.ProtocolParameters
fromLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
fromLedgerUpdateCardano.Api.ProtocolParameters
fromMaryValueCardano.Api.Value, Cardano.Api.Shelley
fromPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyBasedScriptCardano.Api.Script
fromShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
fromShelleyDeltaLovelaceCardano.Api.Value
fromShelleyGenesisCardano.Api.GenesisParameters
fromShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
fromShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
fromShelleyNetworkCardano.Api.NetworkId
fromShelleyPaymentCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyPParamsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
fromShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
fromShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeReferenceCardano.Api.Address, Cardano.Api.Shelley
fromShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
FromSomeType 
1 (Data Constructor)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromTxOutCardano.Api.TxBody
futurePoolParametersCardano.CLI.Types
genAddressByronTest.Cardano.Api.Typed.Gen
genAddressShelleyTest.Cardano.Api.Typed.Gen
genByronKeyWitnessTest.Cardano.Api.Typed.Gen
generateSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
GenesisAddrCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCmdKeyHashCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisConfigErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisCreateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCreateStakedCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisDelegateExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDir 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisFile 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
GenesisGenerationErrorCardano.CLI.Byron.Genesis
GenesisHashFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisKeyDelegationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
GenesisKeyFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenDelegateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenGenesisCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenUTxOCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisOutputDirAlreadyExistsCardano.CLI.Byron.Genesis
GenesisParameters 
1 (Data Constructor)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
3 (Data Constructor)Cardano.CLI.Byron.Genesis
4 (Type/Class)Cardano.CLI.Byron.Genesis
GenesisReadErrorCardano.CLI.Byron.Genesis
GenesisSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisSpecErrorCardano.CLI.Byron.Genesis
GenesisTxInCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisUTxOKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
genesisUTxOPseudoTxInCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisVerKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
genMaybePraosNonceTest.Cardano.Api.Typed.Gen
genOperationalCertificateTest.Cardano.Api.Typed.Gen
genOperationalCertificateIssueCounterTest.Cardano.Api.Typed.Gen
genPlutusScriptTest.Cardano.Api.Typed.Gen
genProtocolParametersTest.Cardano.Api.Typed.Gen
genScriptTest.Cardano.Api.Typed.Gen
genScriptDataTest.Cardano.Api.Typed.Gen
genScriptHashTest.Cardano.Api.Typed.Gen
genScriptInAnyLangTest.Cardano.Api.Typed.Gen
genScriptInEraTest.Cardano.Api.Typed.Gen
genShelleyWitnessTest.Cardano.Api.Typed.Gen
genSigningKeyTest.Cardano.Api.Typed.Gen
genSimpleScriptTest.Cardano.Api.Typed.Gen
genStakeAddressTest.Cardano.Api.Typed.Gen
genTxTest.Cardano.Api.Typed.Gen
genTxBodyTest.Cardano.Api.Typed.Gen
genTxIdTest.Cardano.Api.Typed.Gen
genTxInTest.Cardano.Api.Typed.Gen
genTxMetadataTest.Cardano.Api.Metadata
genTxOutTest.Cardano.Api.Typed.Gen
genValueTest.Cardano.Api.Typed.Gen
genValueDefaultTest.Cardano.Api.Typed.Gen
genValueNestedBundleTest.Cardano.Api.Typed.Gen
genValueNestedRepTest.Cardano.Api.Typed.Gen
genVerificationKeyTest.Cardano.Api.Typed.Gen
getBinDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDataDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDataFileName 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDynLibDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLibDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLibexecDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLocalChainTipCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GetLocalNodeTipCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
getShelleyKeyWitnessVerificationKeyCardano.Api.Tx, Cardano.Api.Shelley
getSysconfDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getTxBodyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GetTxIdCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
getTxIdCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getTxWitnessesCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getVerificationKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
gitRevCardano.Config.Git.Rev
gitRevFromGitCardano.Config.Git.RevFromGit
goPoolCardano.CLI.Types
goTotalCardano.CLI.Types
GovernanceCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceGenesisKeyDelegationCertificateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceMIRPayStakeAddressesCertificateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceMIRTransferCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceUpdateProposalCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
gpAvvmBalanceFactorCardano.CLI.Byron.Genesis
gpFakeAvvmOptionsCardano.CLI.Byron.Genesis
gpKCardano.CLI.Byron.Genesis
gpProtocolMagicCardano.CLI.Byron.Genesis
gpProtocolParamsFileCardano.CLI.Byron.Genesis
gpSeedCardano.CLI.Byron.Genesis
gpStartTimeCardano.CLI.Byron.Genesis
gpTestnetBalanceCardano.CLI.Byron.Genesis
HashCardano.Api.Hash, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
hashScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HasTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HasTypeProxyCardano.Api.HasTypeProxy, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HeaderHashCardano.Api.Block
HelpersErrorCardano.CLI.Helpers
hprop_testnetTestnet.Shelley
hprop_testnet_pauseTestnet.Shelley
ILSEConfigFileCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ILSEGenesisFileCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ILSELedgerConsensusConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InAnyCardanoEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InAnyShelleyBasedEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IndentSpacesCardano.CLI.Mary.RenderValue
IndentTabCardano.CLI.Mary.RenderValue
initialLedgerStateCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InputBech32DecodeErrorCardano.CLI.Shelley.Key
InputDecodeErrorCardano.CLI.Shelley.Key
InputFormatCardano.CLI.Shelley.Key
InputFormatBech32Cardano.CLI.Shelley.Key
InputFormatHexCardano.CLI.Shelley.Key
InputFormatTextEnvelopeCardano.CLI.Shelley.Key
InputInvalidErrorCardano.CLI.Shelley.Key
InputTextEnvelopeErrorCardano.CLI.Shelley.Key
InputTxBodyFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
InputTxFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
integrationTest.Base
IOError'Cardano.CLI.Helpers
IsByronKeyCardano.Api.KeysByron
IsCardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsShelleyBasedEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsSimpleScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
issueByronGenesisDelegationCardano.CLI.Byron.Delegation
issueOperationalCertificateCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
JsonDecodeError 
1 (Data Constructor)Cardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KesKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
KesKeyHashCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
KESPeriod 
1 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
KesSigningKeyCardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KesVerificationKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
KeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertByronGenesisVKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertByronKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertCardanoAddressSigningKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertITNBip32ToStakeKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertITNExtendedToStakeKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertITNStakeKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeygenCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
KeyGetVerificationKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyNonExtendedKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyWitness 
1 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessForSpendingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessForStakeAddrCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessInCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessSigningDataCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
labelCardano.Api.SerialiseCBOR
languageOfScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerState 
1 (Data Constructor)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateAllegraCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateByronCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateMaryCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateShelleyCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LegacyByronEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LegacyByronKeyFormatCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
LegacyDelegateKey 
1 (Data Constructor)Cardano.CLI.Byron.Legacy
2 (Type/Class)Cardano.CLI.Byron.Legacy
LegacySigningKeyDeserialisationFailedCardano.CLI.Byron.Key
LocalChainSyncClient 
1 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localChainSyncClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalChainSyncClientPipelinedCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localConsensusModeCardano.Api.IPC
localConsensusModeParamsCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeClientProtocols 
1 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeClientProtocolsInModeCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeConnectInfo 
1 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localNodeNetworkIdCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localNodeSocketPathCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalStateQueryClient 
1 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localStateQueryClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalTxSubmissionClient 
1 (Data Constructor)Cardano.Api.IPC, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localTxSubmissionClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
logDirTestnet.Conf
Lovelace 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
lovelaceToQuantityCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
lovelaceToValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
lrkSigningKeyCardano.CLI.Byron.Legacy
main 
1 (Function)Main
2 (Function)Main
MainnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mainnetNetworkMagicCardano.Api.NetworkId
makeByronAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronKeyWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
makeByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
MakeGenesisDelegationErrorCardano.CLI.Byron.Genesis
makeGenesisKeyDelegationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeMIRCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makePraosNonceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeProtocolParametersUpdateCardano.Api.SpecialByron, Cardano.Api.Byron
makeShelleyAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyBootstrapWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyKeyWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleySignatureCardano.Api.Tx, Cardano.Api.Shelley
makeShelleyUpdateProposalCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeSignedTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressDelegationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressDeregistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressRegistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakePoolRegistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakePoolRetirementCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeTransactionBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeTransactionMetadataCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mapChainSyncClientCardano.Api.ChainSync.Client
mapChainSyncClientPipelinedCardano.Api.ChainSync.ClientPipelined
markPoolCardano.CLI.Types
markTotalCardano.CLI.Types
MaryCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MaryEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MaryEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
maxLovelaceSupplyTestnet.Shelley
MempoolDlgErrCardano.Api.TxSubmit.Types
MempoolTxErrCardano.Api.TxSubmit.Types
MempoolUpdateProposalErrCardano.Api.TxSubmit.Types
MempoolUpdateVoteErrCardano.Api.TxSubmit.Types
MetadataFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
MetadataFileCBORCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
MetadataFileJSONCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
metadataFromJsonCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
metadataToJsonCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
metadataValueToJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MigrateDelegateKeyFromCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
MIRCertificateCardano.Api.Certificate, Cardano.Api.Shelley
MIRTargetCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mkConfTestnet.Conf
mkGenesisCardano.CLI.Byron.Genesis
mkNodeClientProtocolByronCardano.Api.Protocol.Byron
mkNodeClientProtocolCardanoCardano.Api.Protocol.Cardano
mkNodeClientProtocolShelleyCardano.Api.Protocol.Shelley
MkPipelineDecision 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
mkSomeNodeClientProtocolByronCardano.Api.Protocol.Byron
mkSomeNodeClientProtocolCardanoCardano.Api.Protocol.Cardano
mkSomeNodeClientProtocolShelleyCardano.Api.Protocol.Shelley
MultiAssetInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MultiAssetInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MultiAssetSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
multiAssetSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NCardano.Api.ChainSync.ClientPipelined
naeConfigCardano.Api.TxSubmit.Types
naeSocketCardano.Api.TxSubmit.Types
NatCardano.Api.ChainSync.ClientPipelined
natToIntCardano.Api.ChainSync.ClientPipelined
NEByronConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NECardanoConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NEErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
negateValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NEShelleyConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NetworkIdCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NetworkMagic 
1 (Data Constructor)Cardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NewCertificateFile 
1 (Data Constructor)Cardano.CLI.Byron.Commands
2 (Type/Class)Cardano.CLI.Byron.Commands
NewDirectory 
1 (Data Constructor)Cardano.CLI.Byron.Genesis
2 (Type/Class)Cardano.CLI.Byron.Genesis
NewSigningKeyFile 
1 (Data Constructor)Cardano.CLI.Byron.Key
2 (Type/Class)Cardano.CLI.Byron.Key
NewTxFile 
1 (Data Constructor)Cardano.CLI.Byron.Tx
2 (Type/Class)Cardano.CLI.Byron.Tx
NewVerificationKeyFile 
1 (Data Constructor)Cardano.CLI.Byron.Key, Cardano.CLI.Byron.Commands
2 (Type/Class)Cardano.CLI.Byron.Key, Cardano.CLI.Byron.Commands
nFpCardano.CLI.Byron.Commands
NodeApiEnv 
1 (Data Constructor)Cardano.Api.TxSubmit.Types
2 (Type/Class)Cardano.Api.TxSubmit.Types
NodeCmd 
1 (Data Constructor)Cardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
2 (Type/Class)Cardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
3 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
4 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeIssueOpCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeKeyGenColdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeKeyGenKESCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeKeyGenVRFCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeKeyHashVRFCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeNewCounterCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
nodeSubmitTxCardano.CLI.Byron.Tx
NoFilterCardano.CLI.Types
NoGenesisDelegationForKeyCardano.CLI.Byron.Genesis
NoLocalChainSyncClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NonLegacyByronKeyFormatCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
normalByronTxToGenTxCardano.CLI.Byron.Tx
NoScriptDatumForMintCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NoScriptDatumForStakeCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NoScriptDatumOrFileForMintCardano.CLI.Types
NoScriptDatumOrFileForStakeCardano.CLI.Types
NoStakeAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
nPoorAddressesTestnet.Byron
numBftNodes 
1 (Function)Testnet.Byron
2 (Function)Testnet.ByronShelley
numPoolNodes 
1 (Function)Testnet.Shelley
2 (Function)Testnet.ByronShelley
numPraosNodesTestnet.Shelley
OnlyAdaSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OpCertCounterFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
OperationalCertificate 
1 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OperationalCertificateIssueCounter 
1 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OperationalCertIssueErrorCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OperationalCertKeyMismatchCardano.Api.OperationalCertificate, Cardano.Api.Shelley
optsCardano.CLI.Parsers
OutputFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
OutputFormatCardano.CLI.Types
OutputFormatBech32Cardano.CLI.Types
OutputFormatHexCardano.CLI.Types
OutputMustNotAlreadyExistCardano.CLI.Helpers
Params 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
ParamsFromFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ParamsFromGenesisCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
parseAllCardano.Api.TxMetadata
parseByronCommandsCardano.CLI.Byron.Parsers
parseHeavyDelThdCardano.CLI.Byron.Parsers
parseInstallerHashCardano.CLI.Byron.Parsers
parseJSONCardano.Api.SerialiseJSON
parseJSONListCardano.Api.SerialiseJSON
parseMaxBlockSizeCardano.CLI.Byron.Parsers
parseMaxHeaderSizeCardano.CLI.Byron.Parsers
parseMaxProposalSizeCardano.CLI.Byron.Parsers
parseMaxTxSizeCardano.CLI.Byron.Parsers
parseMpcThdCardano.CLI.Byron.Parsers
parseScriptVersionCardano.CLI.Byron.Parsers
parseShelleyCommandsCardano.CLI.Shelley.Parsers
parseSlotDurationCardano.CLI.Byron.Parsers
parseSoftforkRuleCardano.CLI.Byron.Parsers
parseSystemTagCardano.CLI.Byron.Parsers
parseTxFeePolicyCardano.CLI.Byron.Parsers
parseTxInCardano.CLI.Shelley.Parsers
parseTxOutAnyEraCardano.CLI.Mary.TxOutParser
parseUnlockStakeEpochCardano.CLI.Byron.Parsers
parseUpdateProposalThdCardano.CLI.Byron.Parsers
parseUpdateProposalTTLCardano.CLI.Byron.Parsers
parseUpdateVoteThdCardano.CLI.Byron.Parsers
parseValueCardano.CLI.Mary.ValueParser
PaymentCredentialCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentCredentialByKeyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentCredentialByScriptCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentVerifierCardano.CLI.Shelley.Key
PaymentVerifierKeyCardano.CLI.Shelley.Key
PaymentVerifierScriptFileCardano.CLI.Shelley.Key
pBytesCardano.Api.TxMetadata
PipelineCardano.Api.ChainSync.ClientPipelined
PipelineDecisionCardano.Api.ChainSync.ClientPipelined
pipelineDecisionLowHighMarkCardano.Api.ChainSync.ClientPipelined
pipelineDecisionMaxCardano.Api.ChainSync.ClientPipelined
pipelineDecisionMinCardano.Api.ChainSync.ClientPipelined
PlutusScript 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptSerialisedCardano.Api.Script, Cardano.Api.Shelley
PlutusScriptV1Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptV1InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptWitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptWitnessFilesCardano.CLI.Types
PolicyId 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PoolCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoolGetIdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoolId 
1 (Type/Class)Cardano.Api.Certificate, Cardano.Api.Shelley
2 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
3 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoolMetadataFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoolMetadataHashCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
poolParametersCardano.CLI.Types
PoolRegistrationCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoolRetirementCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoorKeyFailureCardano.CLI.Byron.Genesis
pPrintCBORCardano.CLI.Helpers
PraosNonceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
prefCardano.CLI.Parsers
prettyAddressCardano.CLI.Byron.Tx
PrettyPrintCBORCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
prettyPrintJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
prettyPublicKeyCardano.CLI.Byron.Key
PrettySigningKeyPublicCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
priceExecutionMemoryCardano.Api.ProtocolParameters
priceExecutionStepsCardano.Api.ProtocolParameters
PrintGenesisHashCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
PrintSigningKeyAddressCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
PrivKeyFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
procChairmanTest.Process
procCliTest.Process
procNodeTest.Process
ProtocolCardano.Api.Protocol.Types
ProtocolClientCardano.Api.Protocol.Types
protocolClientInfoCardano.Api.Protocol.Types
ProtocolClientInfoArgsCardano.Api.Protocol.Types, Cardano.Api.Protocol.Types
ProtocolClientInfoArgsByronCardano.Api.Protocol.Types
ProtocolClientInfoArgsCardanoCardano.Api.Protocol.Types
ProtocolClientInfoArgsShelleyCardano.Api.Protocol.Types
protocolInfoCardano.Api.Protocol.Types
ProtocolInfoArgsCardano.Api.Protocol.Types, Cardano.Api.Protocol.Types
ProtocolInfoArgsByronCardano.Api.Protocol.Types
ProtocolInfoArgsCardanoCardano.Api.Protocol.Types
ProtocolInfoArgsShelleyCardano.Api.Protocol.Types
protocolInitialUpdateableProtocolParametersCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamActiveSlotsCoefficientCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamCollateralPercentCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamCostModelsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamDecentralizationCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamEpochLengthCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ProtocolParameters 
1 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api.Shelley
ProtocolParametersParseFailedCardano.CLI.Byron.Genesis
ProtocolParametersUpdate 
1 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamExtraPraosEntropyCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockBodySizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockExUnitsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockHeaderSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxCollateralInputsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxKESEvolutionsCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamMaxLovelaceSupplyCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamMaxTxExUnitsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxTxSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxValueSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMinPoolCostCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMinUTxOValueCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMonetaryExpansionCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamNetworkIdCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamPoolPledgeInfluenceCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamPoolRetireMaxEpochCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamPricesCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamProtocolVersionCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamSecurityCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ProtocolParamsFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
protocolParamSlotLengthCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamSlotsPerKESPeriodCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ProtocolParamsSourceSpecCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
protocolParamStakeAddressDepositCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamStakePoolDepositCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamStakePoolTargetNumCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamSystemStartCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamTreasuryCutCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamTxFeeFixedCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamTxFeePerByteCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamUpdateQuorumCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamUTxOCostPerWordCardano.Api.ProtocolParameters, Cardano.Api.Shelley
ProtocolState 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
protocolUpdateCollateralPercentCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateCostModelsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateDecentralizationCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateExtraPraosEntropyCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockBodySizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockExUnitsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockHeaderSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxCollateralInputsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxTxExUnitsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxTxSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxValueSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMinPoolCostCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMinUTxOValueCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMonetaryExpansionCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePoolPledgeInfluenceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePoolRetireMaxEpochCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePricesCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateProtocolVersionCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakeAddressDepositCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakePoolDepositCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakePoolTargetNumCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTreasuryCutCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTxFeeFixedCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTxFeePerByteCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateUTxOCostPerWordCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Proxy 
1 (Data Constructor)Cardano.Api.HasTypeProxy
2 (Type/Class)Cardano.Api.HasTypeProxy
proxyToAsTypeCardano.Api.HasTypeProxy, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
pSignedCardano.Api.TxMetadata
pUnsignedCardano.Api.TxMetadata
Quantity 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
quantityToLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryByronUpdateStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryChainPointCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryCurrentEraCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryDebugLedgerStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryDebugLedgerState'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryEpochCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryEraHistoryCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryFilterCardano.CLI.Types
QueryGenesisParametersCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInEra 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInModeCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInShelleyBasedEra 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
queryNodeLocalStateCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryPoolParams'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryProtocolParametersCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolParameters'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryProtocolParametersUpdateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolState'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryStakeAddressesCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryStakeAddressInfoCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryStakeDistributionCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryStakeDistribution'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryStakeSnapshot'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryTipCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryUTxOCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryUTxO'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
readAddressVerificationKeyTextOrFileCardano.CLI.Shelley.Run.Address
readAlonzoGenesisCardano.CLI.Shelley.Run.Genesis
readByronSigningKeyCardano.CLI.Byron.Key
readByronTxCardano.CLI.Byron.Tx
readByronUpdateProposalCardano.CLI.Byron.UpdateProposal
readByronVoteCardano.CLI.Byron.Vote
readCBORCardano.CLI.Helpers
ReadCBORFileFailureCardano.CLI.Helpers
readEnvSocketPathCardano.CLI.Environment
readFileJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readFileScriptInAnyLangCardano.CLI.Shelley.Script
readFileTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readFileTextEnvelopeAnyOfCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readGenesisCardano.CLI.Byron.Genesis
readKeyFileCardano.CLI.Shelley.Key
readKeyFileAnyOfCardano.CLI.Shelley.Key
readKeyFileTextEnvelopeCardano.CLI.Shelley.Key
readPaymentVerificationKeyCardano.CLI.Byron.Key
readShelleyGenesisCardano.CLI.Shelley.Run.Genesis
ReadSigningKeyFailure 
1 (Data Constructor)Cardano.CLI.Byron.UpdateProposal
2 (Data Constructor)Cardano.CLI.Byron.Key
readSigningKeyFileCardano.CLI.Shelley.Key
readSigningKeyFileAnyOfCardano.CLI.Shelley.Key
readTextEnvelopeFromFileCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readTextEnvelopeOfTypeFromFileCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ReadVerificationKeyFailureCardano.CLI.Byron.Key
readVerificationKeyOrFileCardano.CLI.Shelley.Key
readVerificationKeyOrHashOrFileCardano.CLI.Shelley.Key
readVerificationKeyOrHashOrTextEnvFileCardano.CLI.Shelley.Key
readVerificationKeyOrTextEnvFileCardano.CLI.Shelley.Key
readVerificationKeyTextOrFileAnyOfCardano.CLI.Shelley.Key
recvMsgIntersectFound 
1 (Function)Cardano.Api.ChainSync.ClientPipelined
2 (Function)Cardano.Api.ChainSync.Client
recvMsgIntersectNotFound 
1 (Function)Cardano.Api.ChainSync.ClientPipelined
2 (Function)Cardano.Api.ChainSync.Client
recvMsgRollBackward 
1 (Function)Cardano.Api.ChainSync.ClientPipelined
2 (Function)Cardano.Api.ChainSync.Client
recvMsgRollForward 
1 (Function)Cardano.Api.ChainSync.ClientPipelined
2 (Function)Cardano.Api.ChainSync.Client
RenderAdaAssetId 
1 (Data Constructor)Cardano.CLI.Mary.RenderValue
2 (Type/Class)Cardano.CLI.Mary.RenderValue
renderApplyMempoolPayloadErrCardano.Api.TxSubmit.ErrorRender
renderByronClientCmdErrorCardano.CLI.Byron.Run
renderByronDelegationErrorCardano.CLI.Byron.Delegation
renderByronGenesisErrorCardano.CLI.Byron.Genesis
renderByronKeyFailureCardano.CLI.Byron.Key
renderByronQueryErrorCardano.CLI.Byron.Query
renderByronTxErrorCardano.CLI.Byron.Tx
renderByronUpdateProposalErrorCardano.CLI.Byron.UpdateProposal
renderByronVoteErrorCardano.CLI.Byron.Vote
renderClientCommandErrorCardano.CLI.Run
renderEnvSocketErrorCardano.CLI.Environment
renderFoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderGenesisConfigErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderHelpersErrorCardano.CLI.Helpers
RenderIndentationCardano.CLI.Mary.RenderValue
renderInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderInputDecodeErrorCardano.CLI.Shelley.Key
renderModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RenderNoAdaAssetIdCardano.CLI.Mary.RenderValue
renderPrettyValueCardano.CLI.Mary.RenderValue
RenderPrettyValueOptions 
1 (Data Constructor)Cardano.CLI.Mary.RenderValue
2 (Type/Class)Cardano.CLI.Mary.RenderValue
renderShelleyAddressCmdErrorCardano.CLI.Shelley.Run.Address
renderShelleyClientCmdErrorCardano.CLI.Shelley.Run
renderShelleyCommandCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
renderShelleyGenesisCmdErrorCardano.CLI.Shelley.Run.Genesis
renderShelleyGovernanceErrorCardano.CLI.Shelley.Run.Governance
renderShelleyKeyCmdErrorCardano.CLI.Shelley.Run.Key
renderShelleyNodeCmdErrorCardano.CLI.Shelley.Run.Node
renderShelleyPoolCmdErrorCardano.CLI.Shelley.Run.Pool
renderShelleyQueryCmdErrorCardano.CLI.Shelley.Run.Query
renderShelleyStakeAddressCmdErrorCardano.CLI.Shelley.Run.StakeAddress
renderShelleyTextViewFileErrorCardano.CLI.Shelley.Run.TextView
renderShelleyTxCmdErrorCardano.CLI.Shelley.Run.Transaction
renderTxInCardano.CLI.Shelley.Parsers
renderTxSubmitStatusCardano.Api.TxSubmit.Types
renderValueCardano.CLI.Mary.RenderValue
RenderValueOptions 
1 (Data Constructor)Cardano.CLI.Mary.RenderValue
2 (Type/Class)Cardano.CLI.Mary.RenderValue
renderVerificationKeyTextOrFileErrorCardano.CLI.Shelley.Key
RequestCardano.Api.ChainSync.ClientPipelined
RequireAllOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireAnyOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireMOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireSignatureCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireTimeAfterCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireTimeBeforeCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
retiringEpochCardano.CLI.Types
RollBackwardCardano.Api.ChainSync.ClientPipelined
RollForwardCardano.Api.ChainSync.ClientPipelined
rpvoIndentationCardano.CLI.Mary.RenderValue
rpvoRenderAdaAssetIdCardano.CLI.Mary.RenderValue
runAddressCmdCardano.CLI.Shelley.Run.Address
runAddressInfoCardano.CLI.Shelley.Run.Address.Info
runAddressKeyGenCardano.CLI.Shelley.Run.Address
runByronClientCommandCardano.CLI.Byron.Run
runChainSyncClientCardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runChainSyncClientPipelinedCardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runClientCommandCardano.CLI.Run
runGenesisCmdCardano.CLI.Shelley.Run.Genesis
runGetLocalNodeTipCardano.CLI.Byron.Query
runGovernanceCmdCardano.CLI.Shelley.Run.Governance
runKeyCmdCardano.CLI.Shelley.Run.Key
runLocalStateQueryClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runLocalTxSubmissionClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runNodeCmdCardano.CLI.Shelley.Run.Node
runNodeIssueOpCertCardano.CLI.Shelley.Run.Node
runNodeKeyGenColdCardano.CLI.Shelley.Run.Node
runNodeKeyGenKESCardano.CLI.Shelley.Run.Node
runNodeKeyGenVRFCardano.CLI.Shelley.Run.Node
runPipelineDecisionCardano.Api.ChainSync.ClientPipelined
runPoolCmdCardano.CLI.Shelley.Run.Pool
runProposalCreationCardano.CLI.Byron.UpdateProposal
runQueryCmdCardano.CLI.Shelley.Run.Query
runShelleyClientCommandCardano.CLI.Shelley.Run
runStakeAddressCmdCardano.CLI.Shelley.Run.StakeAddress
runStakeAddressKeyGenCardano.CLI.Shelley.Run.StakeAddress
runTextViewCmdCardano.CLI.Shelley.Run.TextView
runTransactionCmdCardano.CLI.Shelley.Run.Transaction
runVersionOptionsCardano.Chairman.Commands.Version
runVoteCreationCardano.CLI.Byron.Vote
SCardano.Api.ChainSync.ClientPipelined
ScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataBytesCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataBytesTooLongCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataConstructorCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataConstructorOutOfRangeCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataFileCardano.CLI.Types
scriptDataFromJsonCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataHashCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
ScriptDataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBadMapPairCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBadObjectCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBoolNotAllowedCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonDetailedSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonErrorCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNoSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNotObjectCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNullNotAllowedCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNumberNotIntegerCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonSchemaError 
1 (Data Constructor)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonTypeMismatchCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataListCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataMapCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataNumberCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataNumberOutOfRangeCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataOrFileCardano.CLI.Types
ScriptDataRangeError 
1 (Type/Class)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptDataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptDataToJsonCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataValueCardano.CLI.Types
ScriptDatumCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDatumForTxInCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDatumOrFileCardano.CLI.Types
ScriptDatumOrFileForTxInCardano.CLI.Types
ScriptDecodeErrorCardano.CLI.Shelley.Script
ScriptDecodeSimpleScriptErrorCardano.CLI.Shelley.Script
ScriptDecodeTextEnvelopeErrorCardano.CLI.Shelley.Script
ScriptFile 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
ScriptHash 
1 (Data Constructor)Cardano.Api.Script
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptInAnyLang 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptInEra 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptLanguageSupportedInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptPolicyIdCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptRedeemerCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptRedeemerOrFileCardano.CLI.Types
ScriptWitness 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessFilesCardano.CLI.Types
ScriptWitnessForMintingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessForSpendingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessForStakeAddrCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessInCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptWitnessScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
securityParam 
1 (Function)Testnet.Shelley
2 (Function)Testnet.Byron
selectAssetCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
selectLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SendMsgDone 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Data Constructor)Cardano.Api.ChainSync.Client
SendMsgFindIntersect 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Data Constructor)Cardano.Api.ChainSync.Client
SendMsgRequestNext 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Data Constructor)Cardano.Api.ChainSync.Client
SendMsgRequestNextPipelinedCardano.Api.ChainSync.ClientPipelined
SendToReservesMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SendToTreasuryMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseAddressForTxOutCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseByronWitnessCardano.CLI.Byron.Delegation
SerialisedDebugLedgerState 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
serialiseDelegationCertCardano.CLI.Byron.Delegation
serialiseToBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesHexCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesHexTextCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
setPoolCardano.CLI.Types
setTotalCardano.CLI.Types
sgActiveSlotsCoeffCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgEpochLengthCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgGenDelegsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgInitialFundsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgMaxKESEvolutionsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgMaxLovelaceSupplyCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgNetworkIdCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgNetworkMagicCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgProtocolParamsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSecurityParamCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSlotLengthCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSlotsPerKESPeriodCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgStakingCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSystemStartCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgUpdateQuorumCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
ShelleyCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyAddrCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyAddressCardano.Api.Address, Cardano.Api.Shelley
ShelleyAddressCmdAddressInfoErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressCmdErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressCmdReadKeyFileErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressCmdReadScriptFileErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressCmdVerificationKeyTextOrFileErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressCmdWriteFileErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyAddressInfoErrorCardano.CLI.Shelley.Run.Address.Info
ShelleyAddressInvalidCardano.CLI.Shelley.Run.Address.Info
ShelleyBasedEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyBasedEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraAllegraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraAlonzoCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraMaryCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraShelleyCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyBasedToCardanoEraCardano.Api.Eras
ShelleyBlockCardano.Api.Block
ShelleyBlockTypeCardano.Api.Protocol.Types
ShelleyBootstrapWitnessCardano.Api.Tx, Cardano.Api.Shelley
ShelleyClientCmdErrorCardano.CLI.Shelley.Run
ShelleyCommand 
1 (Data Constructor)Cardano.CLI.Run
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ShelleyEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyEraInShelleyModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyExtendedSigningKeyCardano.Api.Tx
ShelleyGenesis 
1 (Data Constructor)Cardano.Api.Shelley.Genesis, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Shelley.Genesis, Cardano.Api.Shelley
ShelleyGenesisCmdAddressCmdErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdAesonDecodeErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdCostModelsErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdFileErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdFilesDupIndexCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdFilesNoIndexCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdGenesisFileErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdMismatchedGenesisKeyFilesCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdNodeCmdErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdPoolCmdErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdStakeAddressCmdErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdTextEnvReadFileErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdTooFewPoolsForBulkCredsCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdUnexpectedAddressVerificationKeyCardano.CLI.Shelley.Run.Genesis
shelleyGenesisDefaultsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
ShelleyGovernanceCmdErrorCardano.CLI.Shelley.Run.Governance
ShelleyKeyCmdErrorCardano.CLI.Shelley.Run.Key
ShelleyKeyWitnessCardano.Api.Tx, Cardano.Api.Shelley
ShelleyLedgerEraCardano.Api.Eras, Cardano.Api.Shelley
ShelleyMode 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Shelley
ShelleyModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyNodeCmdErrorCardano.CLI.Shelley.Run.Node
ShelleyNodeCmdReadFileErrorCardano.CLI.Shelley.Run.Node
ShelleyNormalSigningKeyCardano.Api.Tx
ShelleyPoolCmdErrorCardano.CLI.Shelley.Run.Pool
ShelleyPoolCmdReadFileErrorCardano.CLI.Shelley.Run.Pool
ShelleyQueryCmdErrorCardano.CLI.Shelley.Run.Query
ShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
ShelleyStakeAddressCmdErrorCardano.CLI.Shelley.Run.StakeAddress
ShelleyStakeAddressCmdReadKeyFileErrorCardano.CLI.Shelley.Run.StakeAddress
ShelleyTextViewFileErrorCardano.CLI.Shelley.Run.TextView
ShelleyTxCardano.Api.Tx, Cardano.Api.Shelley
ShelleyTxBodyCardano.Api.TxBody, Cardano.Api.Shelley
ShelleyTxCmdErrorCardano.CLI.Shelley.Run.Transaction
ShelleyTxValidationErrorCardano.Api.TxInMode
ShelleyWitnessSigningKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SigDSIGNCardano.Api.Crypto.Ed25519Bip32
SigEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
signByronTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SigningKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SigningKeyDeserialisationFailedCardano.CLI.Byron.Key
SigningKeyFile 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
SignKeyDSIGNCardano.Api.Crypto.Ed25519Bip32
SignKeyEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
signShelleyTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScript 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InAllegraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InMaryCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InShelleyCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InAllegraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InMaryCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
simpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptWitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptWitnessFileCardano.CLI.Types
slotDurationTestnet.Byron
slotLengthTestnet.Shelley
SlotNo 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SlotsInEpoch 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SlotsToEpochEnd 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
slotToEpochCardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
socketDirTestnet.Conf
SocketPath 
1 (Data Constructor)Cardano.Api.TxSubmit.Types
2 (Type/Class)Cardano.Api.TxSubmit.Types
3 (Data Constructor)Cardano.CLI.Types
4 (Type/Class)Cardano.CLI.Types
SomeAddressVerificationKeyCardano.CLI.Shelley.Run.Address
SomeByronSigningKeyCardano.Api.KeysByron, Cardano.Api.Byron
SomeKeyFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
SomeNodeClientProtocol 
1 (Data Constructor)Cardano.Api.Protocol.Types, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Protocol.Types, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SomeSigningKeyCardano.CLI.Shelley.Run.Key
SpendGenesisUTxOCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
SpendUTxOCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
StakeAddress 
1 (Data Constructor)Cardano.Api.Address, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressBuildCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeAddressByPointerCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressByValueCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeAddressDelegationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeAddressDeregistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeAddressesMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressKeyGenCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeAddressKeyHashCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeAddressReferenceCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressRegistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeCredentialCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeCredentialByKeyCardano.Api.Address, Cardano.Api.Shelley
StakeCredentialByScriptCardano.Api.Address, Cardano.Api.Shelley
StakeExtendedKeyCardano.Api.KeysShelley, Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
StakeKeyCardano.Api.KeysShelley, Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeKeyDelegationCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeKeyDeRegistrationCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
StakeKeyRegistrationCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
stakePoolCostCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolDescriptionCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolHomepageCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolIdCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolKeyCardano.Api.KeysShelley, Cardano.Api.Shelley
StakePoolKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolMarginCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadata 
1 (Data Constructor)Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolMetadataCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataHashCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolMetadataHashCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataInvalidLengthErrorCardano.Api.StakePoolMetadata
StakePoolMetadataJsonDecodeErrorCardano.Api.StakePoolMetadata
StakePoolMetadataReference 
1 (Data Constructor)Cardano.Api.Certificate, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolMetadataURLCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataValidationErrorCardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolNameCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolOwnersCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolParameters 
1 (Data Constructor)Cardano.Api.Certificate, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolPledgeCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRegistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakePoolRelayDnsARecordCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayDnsSrvRecordCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayIpCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolRelaysCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRetirementCertificateCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolRewardAccountCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolTickerCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
StakePoolVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolVRFCardano.Api.Certificate, Cardano.Api.Shelley
Stakes 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
StakeSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
StakeVerifierCardano.CLI.Shelley.Key
StakeVerifierKeyCardano.CLI.Shelley.Key
StakeVerifierScriptFileCardano.CLI.Shelley.Key
submitByronUpdateProposalCardano.CLI.Byron.UpdateProposal
submitByronVoteCardano.CLI.Byron.Vote
SubmitFailCardano.Api.IPC
SubmitResultCardano.Api.IPC
SubmitSuccessCardano.Api.IPC
SubmitTxCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
submitTxToNodeLocalCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SubmitUpdateProposalCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
SubmitVoteCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
SuccCardano.Api.ChainSync.ClientPipelined
teDescriptionCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
tempAbsPathTestnet.Conf
tempBaseAbsPathTestnet.Conf
tempRelPathTestnet.Conf
teRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TestnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
testnet 
1 (Function)Testnet.Shelley
2 (Function)Testnet.Byron
3 (Function)Testnet.ByronShelley
testnetMagicTestnet.Conf
TestnetOptions 
1 (Data Constructor)Testnet.Shelley
2 (Type/Class)Testnet.Shelley
3 (Data Constructor)Testnet.Byron
4 (Type/Class)Testnet.Byron
5 (Data Constructor)Testnet.ByronShelley
6 (Type/Class)Testnet.ByronShelley
testsTest.Cardano.Api.Metadata
teTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelope 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeAesonDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeDefaultDescrCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDescr 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeType 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeTypeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textShow 
1 (Function)Cardano.Api.TxSubmit.Types
2 (Function)Cardano.CLI.Helpers
TextViewCBORPrettyPrintErrorCardano.CLI.Shelley.Run.TextView
TextViewCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TextViewInfoCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TextViewReadFileErrorCardano.CLI.Shelley.Run.TextView
throwErrorAsExceptionCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksInSimpleScriptV2Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
timeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
toAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toAlonzoExUnitsCardano.Api.Script
toAlonzoLanguageCardano.Api.Script
toAlonzoPricesCardano.Api.ProtocolParameters
toByronLedgertoByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLedgerUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLovelaceCardano.Api.Value, Cardano.Api.Byron
toByronNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronProtocolMagicIdCardano.Api.NetworkId, Cardano.Api.Byron
toByronRequiresNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronSigningKeyCardano.Api.KeysByron
ToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toCBORCardano.Api.SerialiseCBOR
toCborTxAuxCardano.CLI.Byron.Tx
toConsensusEraIndexCardano.Api.Modes
toConsensusGenTxCardano.Api.TxInMode
toConsensusPointCardano.Api.Block
toConsensusPointInModeCardano.Api.Block
toConsensusQueryCardano.Api.Query
toEncodingCardano.Api.SerialiseJSON
toEncodingListCardano.Api.SerialiseJSON
toEraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toJSONCardano.Api.SerialiseJSON
toJSONListCardano.Api.SerialiseJSON
toLedgerPParamsCardano.Api.ProtocolParameters
toLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
toLedgerUpdateCardano.Api.ProtocolParameters
toMaryValueCardano.Api.Value, Cardano.Api.Shelley
toNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toplevelExceptionHandlerCardano.CLI.TopHandler
toPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toScriptInAnyLangCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
toShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
toShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
toShelleyNetworkCardano.Api.NetworkId, Cardano.Api.Shelley
toShelleyPoolParamsCardano.Api.Certificate
toShelleyScriptCardano.Api.Script, Cardano.Api.Shelley
toShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
toShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
toShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
toShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
totalBalanceTestnet.Byron
ToVerificationCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
TransactionCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
transactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TransferDirectionCardano.CLI.Types
TransferToReservesCardano.CLI.Types
TransferToTreasuryCardano.CLI.Types
Tx 
1 (Data Constructor)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAssembleTxBodyWitnessCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxAuxScriptData 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptDataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptDataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScripts 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBody 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyAuxDataHashInvalidErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyContent 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxBodyMetadataErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintAdaErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintBeforeMaryErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMissingProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyNoScriptDataCardano.Api.TxBody
TxBodyOutputNegativeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyOutputOverflowCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyScriptData 
1 (Data Constructor)Cardano.Api.TxBody
2 (Type/Class)Cardano.Api.TxBody
TxBuildRawCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxByronWitnessCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCalculateMinFeeCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCalculateMinValueCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCertificates 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txCertificatesCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCertificatesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCreateWitnessCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxDeserialisationFailedCardano.CLI.Byron.Tx
TxExtraKeyWitnesses 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txExtraKeyWitsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeExplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeImplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFile 
1 (Data Constructor)Cardano.CLI.Byron.Tx
2 (Type/Class)Cardano.CLI.Byron.Tx
3 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
4 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxGetTxIdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxId 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIn 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInByronSpecialCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxInMode 
1 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateral 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateralNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIx 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaBytesCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadata 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataBytesTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInEra 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadMapPairCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBoolNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonDetailedSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonErrorCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNotObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNullNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNumberNotIntegerCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaError 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelBadKeyCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelNotMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonTypeMismatchCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNumberOutOfRangeCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataRangeError 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataTextTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataValueCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaListCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaNumberCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaTextCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintedPolicyIdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxMintNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintValue 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMintValueCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOut 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAdaOnlyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAnyEra 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
TxOutCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxOutDatumHash 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHashNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutValue 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxShelleyWitnessCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxSignCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
txSpendGenesisUTxOByronPBFTCardano.CLI.Byron.Tx
txSpendUTxOByronPBFTCardano.CLI.Byron.Tx
TxSubmitCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxSubmitBadTxCardano.Api.TxSubmit.Types
TxSubmitDecodeFailCardano.Api.TxSubmit.Types
TxSubmitDecodeHexCardano.Api.TxSubmit.Types
TxSubmitEmptyCardano.Api.TxSubmit.Types
TxSubmitFailCardano.Api.TxSubmit.Types
TxSubmitOkCardano.Api.TxSubmit.Types
TxSubmitStatusCardano.Api.TxSubmit.Types
TxUpdateProposal 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txUpdateProposalCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxUpdateProposalNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationEraMismatchCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationErrorCardano.Api.TxInMode, Cardano.Api.IPC
TxValidationErrorInMode 
1 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityLowerBound 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoLowerBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoUpperBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txValidityRangeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityUpperBound 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxViewCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxWithdrawals 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txWithdrawalsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawalsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unBlockNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
unByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
unCertificateFileCardano.CLI.Types, Cardano.CLI.Byron.Commands
unEpochNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unEpochSizeCardano.Api.GenesisParameters
unEpochSlotsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unGenesisFileCardano.CLI.Types
unKESPeriodCardano.Api.OperationalCertificate, Cardano.Api.Shelley
unNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unPoolMetadataFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
unScriptFileCardano.CLI.Types
unSigningKeyFileCardano.CLI.Types
unSlotNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unSocketPath 
1 (Function)Cardano.Api.TxSubmit.Types
2 (Function)Cardano.CLI.Types
unUpdateProposalFileCardano.CLI.Types
unVerificationKeyFileCardano.CLI.Types, Cardano.CLI.Byron.Key, Cardano.CLI.Byron.Commands
UpdateProposal 
1 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
3 (Data Constructor)Cardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
UpdateProposalDecodingErrorCardano.CLI.Byron.UpdateProposal
UpdateProposalFile 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
UpdateProposalInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
updateProposalSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UsingRawBytesHex 
1 (Data Constructor)Cardano.Api.SerialiseRaw
2 (Type/Class)Cardano.Api.SerialiseRaw
UTxO 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
validateAndHashStakePoolMetadataCardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidateCBORCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
validateCBORCardano.CLI.Helpers
validateCostModelCardano.Api.ProtocolParameters
validateScriptDataCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validateTxMetadataCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityLowerBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityNoUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueFromListCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueFromNestedRepCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedBundle 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedBundleAdaCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedRep 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToListCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToNestedRepCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VerificationKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Shelley, Cardano.Api.Byron, Cardano.Api.Byron
VerificationKeyBase64 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
VerificationKeyDeserialisationFailedCardano.CLI.Byron.Key
VerificationKeyFile 
1 (Data Constructor)Cardano.CLI.Types, Cardano.CLI.Byron.Key, Cardano.CLI.Byron.Commands
2 (Type/Class)Cardano.CLI.Types, Cardano.CLI.Byron.Key, Cardano.CLI.Byron.Commands
VerificationKeyFileErrorCardano.CLI.Shelley.Key
VerificationKeyFilePathCardano.CLI.Shelley.Key
VerificationKeyHashCardano.CLI.Shelley.Key
verificationKeyHashCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VerificationKeyOrFile 
1 (Type/Class)Cardano.CLI.Shelley.Key
2 (Data Constructor)Cardano.CLI.Shelley.Key
VerificationKeyOrHashOrFileCardano.CLI.Shelley.Key
VerificationKeyTextErrorCardano.CLI.Shelley.Key
VerificationKeyTextOrFileCardano.CLI.Shelley.Key
VerificationKeyTextOrFileErrorCardano.CLI.Shelley.Key
VerificationKeyValueCardano.CLI.Shelley.Key
VerKeyDSIGNCardano.Api.Crypto.Ed25519Bip32
VerKeyEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
version 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
VersionOptions 
1 (Data Constructor)Cardano.Chairman.Commands.Version
2 (Type/Class)Cardano.Chairman.Commands.Version
ViewTx 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VktofVerificationKeyFileCardano.CLI.Shelley.Key
VktofVerificationKeyTextCardano.CLI.Shelley.Key
VrfKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
VrfKeyHashCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
VrfSigningKeyCardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VrfVerificationKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
WitCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxMint 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxStake 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxTxIn 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
withdrawalsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessByronAddressCardano.Api.Tx, Cardano.Api.Byron
WitnessFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
WitnessGenesisDelegateExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisDelegateKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisUTxOKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessNetworkIdCardano.Api.Tx, Cardano.Api.Byron
WitnessNetworkIdOrByronAddressCardano.Api.Tx, Cardano.Api.Byron
WitnessPaymentExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessPaymentKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessSigningDataCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
WitnessStakeExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessStakeKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessStakePoolKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileTextEnvelopeWithOwnerPermissionsCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
xPrvFromBytesCardano.Api.Crypto.Ed25519Bip32
xPrvToBytesCardano.Api.Crypto.Ed25519Bip32
ZCardano.Api.ChainSync.ClientPipelined
ZeroCardano.Api.ChainSync.ClientPipelined
\ No newline at end of file +cardano-node API (Index)
cardano-node API

Index

?!Cardano.Api.Utils
?!.Cardano.Api.Utils
AByronSigningKey 
1 (Data Constructor)Cardano.Api.KeysByron, Cardano.Api.Byron
2 (Data Constructor)Cardano.CLI.Shelley.Run.Key
AByronSigningKeyLegacyCardano.Api.KeysByron, Cardano.Api.Byron
AByronVerificationKeyCardano.CLI.Shelley.Run.Address
AcquireFailureCardano.Api.IPC
AcquireFailurePointNotOnChainCardano.Api.IPC
AcquireFailurePointTooOldCardano.Api.IPC
activeSlotsCoeff 
1 (Function)Testnet.Shelley
2 (Function)Testnet.ByronShelley
AdaAssetIdCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AdaOnlyInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressBuildCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressBuildMultiSigCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressByronCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressInEra 
1 (Data Constructor)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressInfoCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyByronCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyGenCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyHashCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyShelleyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyShelleyExtendedCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressKeyTypeCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AddressShelleyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AddressTypeInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
adjustSimpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AGenesisDelegateExtendedSigningKeyCardano.CLI.Shelley.Run.Key
AGenesisDelegateSigningKeyCardano.CLI.Shelley.Run.Key
AGenesisExtendedSigningKeyCardano.CLI.Shelley.Run.Key
AGenesisSigningKeyCardano.CLI.Shelley.Run.Key
AGenesisUTxOSigningKeyCardano.CLI.Shelley.Run.Key
AGenesisUTxOVerificationKeyCardano.CLI.Shelley.Run.Address
AKesSigningKeyCardano.CLI.Shelley.Run.Key
AllegraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AllegraEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AllegraEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AlonzoEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AlonzoEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyAddressInShelleyBasedEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyCardanoEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
anyCardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyConsensusMode 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyConsensusModeParams 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AnyEraInMode 
1 (Data Constructor)Cardano.Api.Modes
2 (Type/Class)Cardano.Api.Modes
anyEraInModeToAnyEraCardano.Api.Modes
AnyPlutusScriptVersion 
1 (Data Constructor)Cardano.Api.Script
2 (Type/Class)Cardano.Api.Script
AnyScriptLanguage 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
APaymentExtendedSigningKeyCardano.CLI.Shelley.Run.Key
APaymentExtendedVerificationKeyCardano.CLI.Shelley.Run.Address
APaymentSigningKeyCardano.CLI.Shelley.Run.Key
APaymentVerificationKeyCardano.CLI.Shelley.Run.Address
applyBlockCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ApplyMempoolPayloadErrCardano.Api.TxSubmit.Types
AsAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAddressAnyCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAddressInEraCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAllegraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAllegraEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAlonzoEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsAssetNameCardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronAddrCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronKeyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronKeyLegacyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
AsByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
AsByronWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsCertificateCardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisDelegateExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisDelegateKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsGenesisUTxOKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsHashCardano.Api.Hash, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ASigningKeyFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AsKesKeyCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsKeyWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsMaryTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsOperationalCertificateCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsOperationalCertificateIssueCounterCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPaymentExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPaymentKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPlutusScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPlutusScriptV1Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsPolicyIdCardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptHashCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptInAnyLangCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsScriptInEraCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AssetId 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AssetName 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyAddrCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyEraCardano.Api.Eras, Cardano.Api.TxMetadata, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsShelleyWitnessCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSigningKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptCardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptV1Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsSimpleScriptV2Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeAddressCardano.Api.Address, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeExtendedKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakeKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakePoolKeyCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsStakePoolMetadataCardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AStakeExtendedSigningKeyCardano.CLI.Shelley.Run.Key
AStakePoolSigningKeyCardano.CLI.Shelley.Run.Key
AStakeSigningKeyCardano.CLI.Shelley.Run.Key
AsTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxCardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxIdCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTxMetadataCardano.Api.TxMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsTypeCardano.Api.HasTypeProxy, Cardano.Api.Eras, Cardano.Api.Hash, Cardano.Api.SerialiseTextEnvelope, Cardano.Api.Key, Cardano.Api.TxMetadata, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.SpecialByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Address, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.TxBody, Cardano.Api.Tx, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Shelley, Cardano.Api.Byron, Cardano.Api.Byron
AsUpdateProposalCardano.Api.ProtocolParameters, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsVerificationKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Value, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AsVrfKeyCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.ProtocolParameters, Cardano.Api.Certificate, Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AtEpochTestnet.ByronShelley
AtVersionTestnet.ByronShelley
AuxScriptsInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AuxScriptsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
auxScriptsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
AVerificationKeyFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
AVrfSigningKeyCardano.CLI.Shelley.Run.Key
backwardsCompatibilityCommandsCardano.CLI.Byron.Parsers
baseTestnet.Conf
Bech32DataPartToBytesErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DecodeErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DecodingErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32DeserialiseFromBytesErrorCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
bech32PrefixesPermittedCardano.Api.SerialiseBech32
bech32PrefixForCardano.Api.SerialiseBech32
Bech32UnexpectedPrefixCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Bech32WrongPrefixCardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Block 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockHeader 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockId 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
BlockInMode 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockNo 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BlockTypeCardano.Api.Protocol.Types
bPpuHeavyDelThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxBlockSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxHeaderSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxProposalSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMaxTxSizeCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuMpcThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuScriptVersionCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuSlotDurationCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuSoftforkRuleCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuTxFeePolicyCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUnlockStakeEpochCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateProposalThdCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateProposalTTLCardano.Api.SpecialByron, Cardano.Api.Byron
bPpuUpdateVoteThdCardano.Api.SpecialByron, Cardano.Api.Byron
buildShelleyAddressCardano.CLI.Shelley.Run.Address
BuildTxCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
BuildTxWith 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronAddrCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronAddressCardano.Api.Address, Cardano.Api.Byron
ByronAddressInAnyEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
byronAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronBlockCardano.Api.Block
ByronBlockTypeCardano.Api.Protocol.Types
ByronClientCmdErrorCardano.CLI.Byron.Run
ByronCommand 
1 (Data Constructor)Cardano.CLI.Run
2 (Type/Class)Cardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
ByronDelegateKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ByronDelegationCertSerializationErrorCardano.CLI.Byron.Genesis
ByronDelegationErrorCardano.CLI.Byron.Delegation
ByronDelegationKeyErrorCardano.CLI.Byron.Delegation
ByronDelegationKeySerializationErrorCardano.CLI.Byron.Genesis
ByronEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronEraInByronModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronGenesisErrorCardano.CLI.Byron.Genesis
ByronGenesisKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ByronKeyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyFailureCardano.CLI.Byron.Key
ByronKeyFormat 
1 (Type/Class)Cardano.Api.KeysByron
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
byronKeyFormatCardano.Api.KeysByron
ByronKeyHashCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyHashLegacyCardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyLegacyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronKeyTypeCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ByronKeyWitnessCardano.Api.Tx, Cardano.Api.Byron
ByronLegacyKeyFormatCardano.Api.KeysByron
ByronMode 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Byron
ByronModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronModernKeyFormatCardano.Api.KeysByron
ByronPaymentKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ByronProtocolParametersUpdate 
1 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
ByronQueryEnvVarSocketErrCardano.CLI.Byron.Query
ByronQueryErrorCardano.CLI.Byron.Query
ByronReadUpdateProposalFileFailureCardano.CLI.Byron.UpdateProposal
ByronSigningKeyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronSigningKeyLegacyCardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ByronTxCardano.Api.Tx, Cardano.Api.Byron
ByronTxBodyCardano.Api.TxBody, Cardano.Api.Byron
ByronTxErrorCardano.CLI.Byron.Tx
ByronTxSubmitErrorCardano.CLI.Byron.Tx
ByronTxSubmitErrorEraMismatchCardano.CLI.Byron.Tx
ByronTxValidationErrorCardano.Api.TxInMode
ByronUpdateProposal 
1 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
ByronUpdateProposalErrorCardano.CLI.Byron.UpdateProposal
ByronUpdateProposalGenesisReadErrorCardano.CLI.Byron.UpdateProposal
ByronUpdateProposalTxErrorCardano.CLI.Byron.UpdateProposal
ByronUpdateProposalWriteErrorCardano.CLI.Byron.UpdateProposal
ByronVerificationKeyCardano.Api.KeysByron, Cardano.Api.Byron
ByronVerificationKeyLegacyCardano.Api.KeysByron, Cardano.Api.Byron
ByronVote 
1 (Data Constructor)Cardano.Api.SpecialByron, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SpecialByron, Cardano.Api.Byron
ByronVoteDecodingErrorCardano.CLI.Byron.Vote
ByronVoteErrorCardano.CLI.Byron.Vote
ByronVoteGenesisReadErrorCardano.CLI.Byron.Vote
ByronVoteKeyReadFailureCardano.CLI.Byron.Vote
ByronVoteReadFileFailureCardano.CLI.Byron.Vote
ByronVoteTxSubmissionErrorCardano.CLI.Byron.Vote
ByronVoteUpdateHelperErrorCardano.CLI.Byron.Vote
ByronVoteUpdateProposalDecodingErrorCardano.CLI.Byron.Vote
ByronVoteUpdateProposalFailureCardano.CLI.Byron.Vote
byronWitnessToVerKeyCardano.CLI.Byron.Key
calcMinimumDepositCardano.Api.Value, Cardano.Api.Shelley
CannotMigrateFromNonLegacySigningKeyCardano.CLI.Byron.Key
CardanoAddressByronPaymentKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CardanoAddressIcarusPaymentKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CardanoAddressKeyTypeCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CardanoAddressShelleyPaymentKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CardanoAddressShelleyStakeKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CardanoBlockTypeCardano.Api.Protocol.Types
CardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
cardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoEraStyleCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
cardanoEraStyleCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoMode 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoModeIsMultiEraCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CardanoModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastHashCardano.Api.Hash
castHashCardano.Api.Hash, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
castSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastSigningKeyRoleCardano.Api.Key
castVerificationKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CastVerificationKeyRoleCardano.Api.Key
CBORBlockByronCardano.CLI.Types
CBORDecodingErrorCardano.CLI.Helpers
CBORDelegationCertificateByronCardano.CLI.Types
CBORObjectCardano.CLI.Types
CBORPrettyPrintErrorCardano.CLI.Helpers
CBORTxByronCardano.CLI.Types
CBORUpdateProposalByronCardano.CLI.Types
CBORVoteByronCardano.CLI.Types
CertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificateFile 
1 (Data Constructor)Cardano.CLI.Types, Cardano.CLI.Byron.Commands
2 (Type/Class)Cardano.CLI.Types, Cardano.CLI.Byron.Commands
CertificatesInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificatesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
certificatesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CertificateValidationErrorsCardano.CLI.Byron.Delegation
ChainPoint 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainPointAtGenesisCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainSyncClient 
1 (Data Constructor)Cardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
chainSyncClientNullCardano.Api.ChainSync.Client
ChainSyncClientPipelined 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainSyncInstructionCardano.Api.ChainSync.ClientPipelined
ChainTip 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ChainTipAtGenesisCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
chainTipToChainPointCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
chairmanTestCardano.Chairman
checkByronGenesisDelegationCardano.CLI.Byron.Delegation
ClientCommandCardano.CLI.Run
ClientCommandErrorsCardano.CLI.Run
ClientPipelinedStIdleCardano.Api.ChainSync.ClientPipelined
ClientPipelinedStIntersect 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
ClientStIdleCardano.Api.ChainSync.Client
ClientStIntersect 
1 (Data Constructor)Cardano.Api.ChainSync.Client
2 (Type/Class)Cardano.Api.ChainSync.Client
ClientStNext 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
3 (Data Constructor)Cardano.Api.ChainSync.Client
4 (Type/Class)Cardano.Api.ChainSync.Client
CliEnvVarLookupCardano.CLI.Environment
clsStateCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
cmdRunCardano.Chairman.Commands.Run
cmdVersionCardano.Chairman.Commands.Version
ColdGenesisDelegateVerificationKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ColdStakePoolVerificationKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ColdVerificationKeyFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ColdVerificationKeyOrFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
CollateralInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CollateralSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
collateralSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
CollectCardano.Api.ChainSync.ClientPipelined
CollectOrPipelineCardano.Api.ChainSync.ClientPipelined
CollectResponseCardano.Api.ChainSync.ClientPipelined
commandsCardano.Chairman.Commands
Conf 
1 (Data Constructor)Testnet.Conf
2 (Type/Class)Testnet.Conf
connectToLocalNodeCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusBlockForEraCardano.Api.Modes
ConsensusBlockForModeCardano.Api.Modes
ConsensusModeCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusModeIsMultiEraCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
consensusModeOnlyCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ConsensusModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
constantPipelineDecisionCardano.Api.ChainSync.ClientPipelined
CostModel 
1 (Data Constructor)Cardano.Api.ProtocolParameters
2 (Type/Class)Cardano.Api.ProtocolParameters
CreateVoteCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
DebugLedgerState 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
decodeBech32Cardano.CLI.Shelley.Run.Key
decodeLegacyDelegateKeyCardano.CLI.Byron.Legacy
defaultRenderPrettyValueOptionsCardano.CLI.Mary.RenderValue
defaultRenderValueOptionsCardano.CLI.Mary.RenderValue
defaultTestnetOptions 
1 (Function)Testnet.Shelley
2 (Function)Testnet.Byron
3 (Function)Testnet.ByronShelley
DeprecatedShelleySubcommandCardano.CLI.Run
deserialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseAnyOfFromBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromRawBytesHexCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseFromTextEnvelopeAnyOfCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deserialiseInputCardano.CLI.Shelley.Key
deserialiseInputAnyOfCardano.CLI.Shelley.Key
deserialiseScriptInAnyLangCardano.CLI.Shelley.Script
deterministicSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
deterministicSigningKeySeedSizeCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
displayErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
DisplayVersionCardano.CLI.Run
DlgCertificateDeserialisationFailedCardano.CLI.Byron.Delegation
dropNthTestnet.List
dumpGenesisCardano.CLI.Byron.Genesis
Ed25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
encodedListSizeExprCardano.Api.SerialiseCBOR
encodedSizeExprCardano.Api.SerialiseCBOR
encodeLegacyDelegateKeyCardano.CLI.Byron.Legacy
ensureNewFileCardano.CLI.Helpers
ensureNewFileLBSCardano.CLI.Helpers
Env 
1 (Data Constructor)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envLedgerConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envProtocolConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
envSecurityParamCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EnvSocketError 
1 (Data Constructor)Cardano.CLI.Byron.Tx
2 (Type/Class)Cardano.CLI.Environment
epochLength 
1 (Function)Testnet.Shelley
2 (Function)Testnet.ByronShelley
EpochNo 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EpochSize 
1 (Data Constructor)Cardano.Api.GenesisParameters
2 (Type/Class)Cardano.Api.GenesisParameters
EpochSlots 
1 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
EraHistory 
1 (Data Constructor)Cardano.Api.Query
2 (Type/Class)Cardano.Api.Query
EraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
eraInModeToEraCardano.Api.Modes
eraOfScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
eraOfScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ErrorAsException 
1 (Data Constructor)Cardano.Api.Error
2 (Type/Class)Cardano.Api.Error
estimateTransactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
examplePlutusScriptAlwaysFailsCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
examplePlutusScriptAlwaysSucceedsCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
execCliTest.Process
executionMemoryCardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
executionStepsCardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ExecutionUnitPrices 
1 (Data Constructor)Cardano.Api.ProtocolParameters
2 (Type/Class)Cardano.Api.ProtocolParameters
ExecutionUnits 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ExtraKeyWitnessesInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
extraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileError 
1 (Data Constructor)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileErrorTempFileCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileIOErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FilterByAddressCardano.CLI.Types
filterValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
foldBlocksCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksApplyBlockErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ForkPointTestnet.ByronShelley
forkPointTestnet.ByronShelley
friendlyTxBodyBSCardano.CLI.Run.Friendly
fromAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
fromAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromAlonzoExUnitsCardano.Api.Script
fromAlonzoLanguageCardano.Api.Script
fromAlonzoPricesCardano.Api.ProtocolParameters
fromByronLovelaceCardano.Api.Value
fromByronTxInCardano.Api.TxBody, Cardano.Api.Byron
FromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromCBORCardano.Api.SerialiseCBOR
fromCborTxAuxCardano.CLI.Byron.Tx
fromConsensusApplyTxErrCardano.Api.TxInMode
fromConsensusBlockCardano.Api.Block
fromConsensusEraIndexCardano.Api.Modes
fromConsensusPointCardano.Api.Block
fromConsensusPointInModeCardano.Api.Block
fromConsensusQueryResultCardano.Api.Query
fromConsensusTipCardano.Api.Block
fromGroupTest.Tasty.Hedgehog.Group
FromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromLedgerPParamsCardano.Api.ProtocolParameters
fromLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
fromLedgerUpdateCardano.Api.ProtocolParameters
fromMaryValueCardano.Api.Value, Cardano.Api.Shelley
fromPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyBasedScriptCardano.Api.Script
fromShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
fromShelleyDeltaLovelaceCardano.Api.Value
fromShelleyGenesisCardano.Api.GenesisParameters
fromShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
fromShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMetadatumCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
fromShelleyNetworkCardano.Api.NetworkId
fromShelleyPaymentCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyPParamsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
fromShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
fromShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeReferenceCardano.Api.Address, Cardano.Api.Shelley
fromShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
FromSomeType 
1 (Data Constructor)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromTxOutCardano.Api.TxBody
futurePoolParametersCardano.CLI.Types
genAddressByronTest.Cardano.Api.Typed.Gen
genAddressShelleyTest.Cardano.Api.Typed.Gen
genByronKeyWitnessTest.Cardano.Api.Typed.Gen
generateSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
GenesisAddrCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCmdKeyHashCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisConfigErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisCreateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCreateStakedCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisDelegateExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDir 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisFile 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
GenesisGenerationErrorCardano.CLI.Byron.Genesis
GenesisHashFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisKeyDelegationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
GenesisKeyFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenDelegateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenGenesisCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenUTxOCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisOutputDirAlreadyExistsCardano.CLI.Byron.Genesis
GenesisParameters 
1 (Data Constructor)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
3 (Data Constructor)Cardano.CLI.Byron.Genesis
4 (Type/Class)Cardano.CLI.Byron.Genesis
GenesisReadErrorCardano.CLI.Byron.Genesis
GenesisSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisSpecErrorCardano.CLI.Byron.Genesis
GenesisTxInCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisUTxOKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
genesisUTxOPseudoTxInCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisVerKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
genMaybePraosNonceTest.Cardano.Api.Typed.Gen
genOperationalCertificateTest.Cardano.Api.Typed.Gen
genOperationalCertificateIssueCounterTest.Cardano.Api.Typed.Gen
genPlutusScriptTest.Cardano.Api.Typed.Gen
genProtocolParametersTest.Cardano.Api.Typed.Gen
genScriptTest.Cardano.Api.Typed.Gen
genScriptDataTest.Cardano.Api.Typed.Gen
genScriptHashTest.Cardano.Api.Typed.Gen
genScriptInAnyLangTest.Cardano.Api.Typed.Gen
genScriptInEraTest.Cardano.Api.Typed.Gen
genShelleyWitnessTest.Cardano.Api.Typed.Gen
genSigningKeyTest.Cardano.Api.Typed.Gen
genSimpleScriptTest.Cardano.Api.Typed.Gen
genStakeAddressTest.Cardano.Api.Typed.Gen
genTxTest.Cardano.Api.Typed.Gen
genTxBodyTest.Cardano.Api.Typed.Gen
genTxIdTest.Cardano.Api.Typed.Gen
genTxInTest.Cardano.Api.Typed.Gen
genTxMetadataTest.Cardano.Api.Metadata
genTxMetadataValueTest.Cardano.Api.Metadata
genTxOutTest.Cardano.Api.Typed.Gen
genValueTest.Cardano.Api.Typed.Gen
genValueDefaultTest.Cardano.Api.Typed.Gen
genValueNestedBundleTest.Cardano.Api.Typed.Gen
genValueNestedRepTest.Cardano.Api.Typed.Gen
genVerificationKeyTest.Cardano.Api.Typed.Gen
getBinDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDataDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDataFileName 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDynLibDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLibDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLibexecDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLocalChainTipCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GetLocalNodeTipCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
getShelleyKeyWitnessVerificationKeyCardano.Api.Tx, Cardano.Api.Shelley
getSysconfDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getTxBodyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GetTxIdCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
getTxIdCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getTxWitnessesCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getVerificationKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
gitRevCardano.Config.Git.Rev
gitRevFromGitCardano.Config.Git.RevFromGit
goPoolCardano.CLI.Types
goTotalCardano.CLI.Types
GovernanceCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceGenesisKeyDelegationCertificateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceMIRPayStakeAddressesCertificateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceMIRTransferCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceUpdateProposalCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
gpAvvmBalanceFactorCardano.CLI.Byron.Genesis
gpFakeAvvmOptionsCardano.CLI.Byron.Genesis
gpKCardano.CLI.Byron.Genesis
gpProtocolMagicCardano.CLI.Byron.Genesis
gpProtocolParamsFileCardano.CLI.Byron.Genesis
gpSeedCardano.CLI.Byron.Genesis
gpStartTimeCardano.CLI.Byron.Genesis
gpTestnetBalanceCardano.CLI.Byron.Genesis
HashCardano.Api.Hash, Cardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
hashScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HasTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HasTypeProxyCardano.Api.HasTypeProxy, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
HeaderHashCardano.Api.Block
HelpersErrorCardano.CLI.Helpers
hprop_testnetTestnet.Shelley
hprop_testnet_pauseTestnet.Shelley
ILSEConfigFileCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ILSEGenesisFileCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ILSELedgerConsensusConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InAnyCardanoEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InAnyShelleyBasedEra 
1 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IndentSpacesCardano.CLI.Mary.RenderValue
IndentTabCardano.CLI.Mary.RenderValue
initialLedgerStateCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
InputBech32DecodeErrorCardano.CLI.Shelley.Key
InputDecodeErrorCardano.CLI.Shelley.Key
InputFormatCardano.CLI.Shelley.Key
InputFormatBech32Cardano.CLI.Shelley.Key
InputFormatHexCardano.CLI.Shelley.Key
InputFormatTextEnvelopeCardano.CLI.Shelley.Key
InputInvalidErrorCardano.CLI.Shelley.Key
InputTextEnvelopeErrorCardano.CLI.Shelley.Key
InputTxBodyFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
InputTxFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
integrationTest.Base
IOError'Cardano.CLI.Helpers
IsByronKeyCardano.Api.KeysByron
IsCardanoEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsShelleyBasedEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
IsSimpleScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
issueByronGenesisDelegationCardano.CLI.Byron.Delegation
issueOperationalCertificateCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
JsonDecodeError 
1 (Data Constructor)Cardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KesKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
KesKeyHashCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
KESPeriod 
1 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
KesSigningKeyCardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KesVerificationKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
KeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertByronGenesisVKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertByronKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertCardanoAddressSigningKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertITNBip32ToStakeKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertITNExtendedToStakeKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyConvertITNStakeKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeygenCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
KeyGetVerificationKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyNonExtendedKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
KeyWitness 
1 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessForSpendingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessForStakeAddrCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessInCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
KeyWitnessSigningDataCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
labelCardano.Api.SerialiseCBOR
languageOfScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerState 
1 (Data Constructor)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateAllegraCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateByronCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateMaryCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LedgerStateShelleyCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LegacyByronEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LegacyByronKeyFormatCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
LegacyDelegateKey 
1 (Data Constructor)Cardano.CLI.Byron.Legacy
2 (Type/Class)Cardano.CLI.Byron.Legacy
LegacySigningKeyDeserialisationFailedCardano.CLI.Byron.Key
LocalChainSyncClient 
1 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localChainSyncClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalChainSyncClientPipelinedCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localConsensusModeCardano.Api.IPC
localConsensusModeParamsCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeClientProtocols 
1 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeClientProtocolsInModeCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalNodeConnectInfo 
1 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localNodeNetworkIdCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localNodeSocketPathCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalStateQueryClient 
1 (Data Constructor)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localStateQueryClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
LocalTxSubmissionClient 
1 (Data Constructor)Cardano.Api.IPC, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
localTxSubmissionClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
logDirTestnet.Conf
Lovelace 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
lovelaceToQuantityCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
lovelaceToValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
lrkSigningKeyCardano.CLI.Byron.Legacy
main 
1 (Function)Main
2 (Function)Main
MainnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mainnetNetworkMagicCardano.Api.NetworkId
makeByronAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronKeyWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
makeByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
MakeGenesisDelegationErrorCardano.CLI.Byron.Genesis
makeGenesisKeyDelegationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeMIRCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makePraosNonceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeProtocolParametersUpdateCardano.Api.SpecialByron, Cardano.Api.Byron
makeShelleyAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyBootstrapWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleyKeyWitnessCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeShelleySignatureCardano.Api.Tx, Cardano.Api.Shelley
makeShelleyUpdateProposalCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeSignedTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressDelegationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressDeregistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakeAddressRegistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakePoolRegistrationCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeStakePoolRetirementCertificateCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeTransactionBodyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
makeTransactionMetadataCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mapChainSyncClientCardano.Api.ChainSync.Client
mapChainSyncClientPipelinedCardano.Api.ChainSync.ClientPipelined
markPoolCardano.CLI.Types
markTotalCardano.CLI.Types
MaryCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MaryEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MaryEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
maxLovelaceSupplyTestnet.Shelley
MempoolDlgErrCardano.Api.TxSubmit.Types
MempoolTxErrCardano.Api.TxSubmit.Types
MempoolUpdateProposalErrCardano.Api.TxSubmit.Types
MempoolUpdateVoteErrCardano.Api.TxSubmit.Types
MetadataFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
MetadataFileCBORCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
MetadataFileJSONCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
metadataFromJsonCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
metadataToJsonCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
metadataValueToJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MigrateDelegateKeyFromCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
MIRCertificateCardano.Api.Certificate, Cardano.Api.Shelley
MIRTargetCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
mkConfTestnet.Conf
mkGenesisCardano.CLI.Byron.Genesis
mkNodeClientProtocolByronCardano.Api.Protocol.Byron
mkNodeClientProtocolCardanoCardano.Api.Protocol.Cardano
mkNodeClientProtocolShelleyCardano.Api.Protocol.Shelley
MkPipelineDecision 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Type/Class)Cardano.Api.ChainSync.ClientPipelined
mkSomeNodeClientProtocolByronCardano.Api.Protocol.Byron
mkSomeNodeClientProtocolCardanoCardano.Api.Protocol.Cardano
mkSomeNodeClientProtocolShelleyCardano.Api.Protocol.Shelley
MultiAssetInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MultiAssetInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
MultiAssetSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
multiAssetSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NCardano.Api.ChainSync.ClientPipelined
naeConfigCardano.Api.TxSubmit.Types
naeSocketCardano.Api.TxSubmit.Types
NatCardano.Api.ChainSync.ClientPipelined
natToIntCardano.Api.ChainSync.ClientPipelined
NEByronConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NECardanoConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NEErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
negateValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NEShelleyConfigCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NetworkIdCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NetworkMagic 
1 (Data Constructor)Cardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NewCertificateFile 
1 (Data Constructor)Cardano.CLI.Byron.Commands
2 (Type/Class)Cardano.CLI.Byron.Commands
NewDirectory 
1 (Data Constructor)Cardano.CLI.Byron.Genesis
2 (Type/Class)Cardano.CLI.Byron.Genesis
NewSigningKeyFile 
1 (Data Constructor)Cardano.CLI.Byron.Key
2 (Type/Class)Cardano.CLI.Byron.Key
NewTxFile 
1 (Data Constructor)Cardano.CLI.Byron.Tx
2 (Type/Class)Cardano.CLI.Byron.Tx
NewVerificationKeyFile 
1 (Data Constructor)Cardano.CLI.Byron.Key, Cardano.CLI.Byron.Commands
2 (Type/Class)Cardano.CLI.Byron.Key, Cardano.CLI.Byron.Commands
nFpCardano.CLI.Byron.Commands
NodeApiEnv 
1 (Data Constructor)Cardano.Api.TxSubmit.Types
2 (Type/Class)Cardano.Api.TxSubmit.Types
NodeCmd 
1 (Data Constructor)Cardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
2 (Type/Class)Cardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
3 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
4 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeIssueOpCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeKeyGenColdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeKeyGenKESCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeKeyGenVRFCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeKeyHashVRFCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
NodeNewCounterCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
nodeSubmitTxCardano.CLI.Byron.Tx
NoFilterCardano.CLI.Types
NoGenesisDelegationForKeyCardano.CLI.Byron.Genesis
NoLocalChainSyncClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NonLegacyByronKeyFormatCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
normalByronTxToGenTxCardano.CLI.Byron.Tx
NoScriptDatumForMintCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NoScriptDatumForStakeCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
NoScriptDatumOrFileForMintCardano.CLI.Types
NoScriptDatumOrFileForStakeCardano.CLI.Types
NoStakeAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
nPoorAddressesTestnet.Byron
numBftNodes 
1 (Function)Testnet.Byron
2 (Function)Testnet.ByronShelley
numPoolNodes 
1 (Function)Testnet.Shelley
2 (Function)Testnet.ByronShelley
numPraosNodesTestnet.Shelley
OnlyAdaSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OpCertCounterFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
OperationalCertificate 
1 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OperationalCertificateIssueCounter 
1 (Data Constructor)Cardano.Api.OperationalCertificate, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OperationalCertIssueErrorCardano.Api.OperationalCertificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
OperationalCertKeyMismatchCardano.Api.OperationalCertificate, Cardano.Api.Shelley
optsCardano.CLI.Parsers
OutputFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
OutputFormatCardano.CLI.Types
OutputFormatBech32Cardano.CLI.Types
OutputFormatHexCardano.CLI.Types
OutputMustNotAlreadyExistCardano.CLI.Helpers
Params 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
ParamsFromFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ParamsFromGenesisCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
parseAllCardano.Api.TxMetadata
parseByronCommandsCardano.CLI.Byron.Parsers
parseHeavyDelThdCardano.CLI.Byron.Parsers
parseInstallerHashCardano.CLI.Byron.Parsers
parseJSONCardano.Api.SerialiseJSON
parseJSONListCardano.Api.SerialiseJSON
parseMaxBlockSizeCardano.CLI.Byron.Parsers
parseMaxHeaderSizeCardano.CLI.Byron.Parsers
parseMaxProposalSizeCardano.CLI.Byron.Parsers
parseMaxTxSizeCardano.CLI.Byron.Parsers
parseMpcThdCardano.CLI.Byron.Parsers
parseScriptVersionCardano.CLI.Byron.Parsers
parseShelleyCommandsCardano.CLI.Shelley.Parsers
parseSlotDurationCardano.CLI.Byron.Parsers
parseSoftforkRuleCardano.CLI.Byron.Parsers
parseSystemTagCardano.CLI.Byron.Parsers
parseTxFeePolicyCardano.CLI.Byron.Parsers
parseTxInCardano.CLI.Shelley.Parsers
parseTxOutAnyEraCardano.CLI.Mary.TxOutParser
parseUnlockStakeEpochCardano.CLI.Byron.Parsers
parseUpdateProposalThdCardano.CLI.Byron.Parsers
parseUpdateProposalTTLCardano.CLI.Byron.Parsers
parseUpdateVoteThdCardano.CLI.Byron.Parsers
parseValueCardano.CLI.Mary.ValueParser
PaymentCredentialCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentCredentialByKeyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentCredentialByScriptCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
PaymentVerifierCardano.CLI.Shelley.Key
PaymentVerifierKeyCardano.CLI.Shelley.Key
PaymentVerifierScriptFileCardano.CLI.Shelley.Key
pBytesCardano.Api.TxMetadata
PipelineCardano.Api.ChainSync.ClientPipelined
PipelineDecisionCardano.Api.ChainSync.ClientPipelined
pipelineDecisionLowHighMarkCardano.Api.ChainSync.ClientPipelined
pipelineDecisionMaxCardano.Api.ChainSync.ClientPipelined
pipelineDecisionMinCardano.Api.ChainSync.ClientPipelined
PlutusScript 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptSerialisedCardano.Api.Script, Cardano.Api.Shelley
PlutusScriptV1Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptV1InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptWitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PlutusScriptWitnessFilesCardano.CLI.Types
PolicyId 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
PoolCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoolGetIdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoolId 
1 (Type/Class)Cardano.Api.Certificate, Cardano.Api.Shelley
2 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
3 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoolMetadataFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoolMetadataHashCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
poolParametersCardano.CLI.Types
PoolRegistrationCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoolRetirementCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
PoorKeyFailureCardano.CLI.Byron.Genesis
pPrintCBORCardano.CLI.Helpers
PraosNonceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
prefCardano.CLI.Parsers
prettyAddressCardano.CLI.Byron.Tx
PrettyPrintCBORCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
prettyPrintJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
prettyPublicKeyCardano.CLI.Byron.Key
PrettySigningKeyPublicCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
priceExecutionMemoryCardano.Api.ProtocolParameters
priceExecutionStepsCardano.Api.ProtocolParameters
PrintGenesisHashCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
PrintSigningKeyAddressCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
PrivKeyFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
procChairmanTest.Process
procCliTest.Process
procNodeTest.Process
ProtocolCardano.Api.Protocol.Types
ProtocolClientCardano.Api.Protocol.Types
protocolClientInfoCardano.Api.Protocol.Types
ProtocolClientInfoArgsCardano.Api.Protocol.Types, Cardano.Api.Protocol.Types
ProtocolClientInfoArgsByronCardano.Api.Protocol.Types
ProtocolClientInfoArgsCardanoCardano.Api.Protocol.Types
ProtocolClientInfoArgsShelleyCardano.Api.Protocol.Types
protocolInfoCardano.Api.Protocol.Types
ProtocolInfoArgsCardano.Api.Protocol.Types, Cardano.Api.Protocol.Types
ProtocolInfoArgsByronCardano.Api.Protocol.Types
ProtocolInfoArgsCardanoCardano.Api.Protocol.Types
ProtocolInfoArgsShelleyCardano.Api.Protocol.Types
protocolInitialUpdateableProtocolParametersCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamActiveSlotsCoefficientCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamCollateralPercentCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamCostModelsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamDecentralizationCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamEpochLengthCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ProtocolParameters 
1 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api.Shelley
ProtocolParametersParseFailedCardano.CLI.Byron.Genesis
ProtocolParametersUpdate 
1 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamExtraPraosEntropyCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockBodySizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockExUnitsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxBlockHeaderSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxCollateralInputsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxKESEvolutionsCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamMaxLovelaceSupplyCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamMaxTxExUnitsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxTxSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMaxValueSizeCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMinPoolCostCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMinUTxOValueCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamMonetaryExpansionCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamNetworkIdCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamPoolPledgeInfluenceCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamPoolRetireMaxEpochCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamPricesCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamProtocolVersionCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamSecurityCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ProtocolParamsFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
protocolParamSlotLengthCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamSlotsPerKESPeriodCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ProtocolParamsSourceSpecCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
protocolParamStakeAddressDepositCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamStakePoolDepositCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamStakePoolTargetNumCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamSystemStartCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamTreasuryCutCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamTxFeeFixedCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamTxFeePerByteCardano.Api.ProtocolParameters, Cardano.Api.Shelley
protocolParamUpdateQuorumCardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolParamUTxOCostPerWordCardano.Api.ProtocolParameters, Cardano.Api.Shelley
ProtocolState 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
protocolUpdateCollateralPercentCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateCostModelsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateDecentralizationCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateExtraPraosEntropyCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockBodySizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockExUnitsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxBlockHeaderSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxCollateralInputsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxTxExUnitsCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxTxSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMaxValueSizeCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMinPoolCostCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMinUTxOValueCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateMonetaryExpansionCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePoolPledgeInfluenceCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePoolRetireMaxEpochCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdatePricesCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateProtocolVersionCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakeAddressDepositCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakePoolDepositCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateStakePoolTargetNumCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTreasuryCutCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTxFeeFixedCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateTxFeePerByteCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
protocolUpdateUTxOCostPerWordCardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
Proxy 
1 (Data Constructor)Cardano.Api.HasTypeProxy
2 (Type/Class)Cardano.Api.HasTypeProxy
proxyToAsTypeCardano.Api.HasTypeProxy, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
pSignedCardano.Api.TxMetadata
pUnsignedCardano.Api.TxMetadata
Quantity 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
quantityToLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryByronUpdateStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryChainPointCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryCurrentEraCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryDebugLedgerStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryDebugLedgerState'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryEpochCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryEraHistoryCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryFilterCardano.CLI.Types
QueryGenesisParametersCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInEra 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInModeCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryInShelleyBasedEra 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
queryNodeLocalStateCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryPoolParams'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryProtocolParametersCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolParameters'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryProtocolParametersUpdateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolStateCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryProtocolState'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryStakeAddressesCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryStakeAddressInfoCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryStakeDistributionCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryStakeDistribution'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryStakeSnapshot'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryTipCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
QueryUTxOCardano.Api.Query, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
QueryUTxO'Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
readAddressVerificationKeyTextOrFileCardano.CLI.Shelley.Run.Address
readAlonzoGenesisCardano.CLI.Shelley.Run.Genesis
readByronSigningKeyCardano.CLI.Byron.Key
readByronTxCardano.CLI.Byron.Tx
readByronUpdateProposalCardano.CLI.Byron.UpdateProposal
readByronVoteCardano.CLI.Byron.Vote
readCBORCardano.CLI.Helpers
ReadCBORFileFailureCardano.CLI.Helpers
readEnvSocketPathCardano.CLI.Environment
readFileJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readFileScriptInAnyLangCardano.CLI.Shelley.Script
readFileTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readFileTextEnvelopeAnyOfCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readGenesisCardano.CLI.Byron.Genesis
readKeyFileCardano.CLI.Shelley.Key
readKeyFileAnyOfCardano.CLI.Shelley.Key
readKeyFileTextEnvelopeCardano.CLI.Shelley.Key
readPaymentVerificationKeyCardano.CLI.Byron.Key
readShelleyGenesisCardano.CLI.Shelley.Run.Genesis
ReadSigningKeyFailure 
1 (Data Constructor)Cardano.CLI.Byron.UpdateProposal
2 (Data Constructor)Cardano.CLI.Byron.Key
readSigningKeyFileCardano.CLI.Shelley.Key
readSigningKeyFileAnyOfCardano.CLI.Shelley.Key
readTextEnvelopeFromFileCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
readTextEnvelopeOfTypeFromFileCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ReadVerificationKeyFailureCardano.CLI.Byron.Key
readVerificationKeyOrFileCardano.CLI.Shelley.Key
readVerificationKeyOrHashOrFileCardano.CLI.Shelley.Key
readVerificationKeyOrHashOrTextEnvFileCardano.CLI.Shelley.Key
readVerificationKeyOrTextEnvFileCardano.CLI.Shelley.Key
readVerificationKeyTextOrFileAnyOfCardano.CLI.Shelley.Key
recvMsgIntersectFound 
1 (Function)Cardano.Api.ChainSync.ClientPipelined
2 (Function)Cardano.Api.ChainSync.Client
recvMsgIntersectNotFound 
1 (Function)Cardano.Api.ChainSync.ClientPipelined
2 (Function)Cardano.Api.ChainSync.Client
recvMsgRollBackward 
1 (Function)Cardano.Api.ChainSync.ClientPipelined
2 (Function)Cardano.Api.ChainSync.Client
recvMsgRollForward 
1 (Function)Cardano.Api.ChainSync.ClientPipelined
2 (Function)Cardano.Api.ChainSync.Client
RenderAdaAssetId 
1 (Data Constructor)Cardano.CLI.Mary.RenderValue
2 (Type/Class)Cardano.CLI.Mary.RenderValue
renderApplyMempoolPayloadErrCardano.Api.TxSubmit.ErrorRender
renderByronClientCmdErrorCardano.CLI.Byron.Run
renderByronDelegationErrorCardano.CLI.Byron.Delegation
renderByronGenesisErrorCardano.CLI.Byron.Genesis
renderByronKeyFailureCardano.CLI.Byron.Key
renderByronQueryErrorCardano.CLI.Byron.Query
renderByronTxErrorCardano.CLI.Byron.Tx
renderByronUpdateProposalErrorCardano.CLI.Byron.UpdateProposal
renderByronVoteErrorCardano.CLI.Byron.Vote
renderClientCommandErrorCardano.CLI.Run
renderEnvSocketErrorCardano.CLI.Environment
renderFoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderGenesisConfigErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderHelpersErrorCardano.CLI.Helpers
RenderIndentationCardano.CLI.Mary.RenderValue
renderInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
renderInputDecodeErrorCardano.CLI.Shelley.Key
renderModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RenderNoAdaAssetIdCardano.CLI.Mary.RenderValue
renderPrettyValueCardano.CLI.Mary.RenderValue
RenderPrettyValueOptions 
1 (Data Constructor)Cardano.CLI.Mary.RenderValue
2 (Type/Class)Cardano.CLI.Mary.RenderValue
renderShelleyAddressCmdErrorCardano.CLI.Shelley.Run.Address
renderShelleyClientCmdErrorCardano.CLI.Shelley.Run
renderShelleyCommandCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
renderShelleyGenesisCmdErrorCardano.CLI.Shelley.Run.Genesis
renderShelleyGovernanceErrorCardano.CLI.Shelley.Run.Governance
renderShelleyKeyCmdErrorCardano.CLI.Shelley.Run.Key
renderShelleyNodeCmdErrorCardano.CLI.Shelley.Run.Node
renderShelleyPoolCmdErrorCardano.CLI.Shelley.Run.Pool
renderShelleyQueryCmdErrorCardano.CLI.Shelley.Run.Query
renderShelleyStakeAddressCmdErrorCardano.CLI.Shelley.Run.StakeAddress
renderShelleyTextViewFileErrorCardano.CLI.Shelley.Run.TextView
renderShelleyTxCmdErrorCardano.CLI.Shelley.Run.Transaction
renderTxInCardano.CLI.Shelley.Parsers
renderTxSubmitStatusCardano.Api.TxSubmit.Types
renderValueCardano.CLI.Mary.RenderValue
RenderValueOptions 
1 (Data Constructor)Cardano.CLI.Mary.RenderValue
2 (Type/Class)Cardano.CLI.Mary.RenderValue
renderVerificationKeyTextOrFileErrorCardano.CLI.Shelley.Key
RequestCardano.Api.ChainSync.ClientPipelined
RequireAllOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireAnyOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireMOfCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireSignatureCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireTimeAfterCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
RequireTimeBeforeCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
retiringEpochCardano.CLI.Types
RollBackwardCardano.Api.ChainSync.ClientPipelined
RollForwardCardano.Api.ChainSync.ClientPipelined
rpvoIndentationCardano.CLI.Mary.RenderValue
rpvoRenderAdaAssetIdCardano.CLI.Mary.RenderValue
runAddressCmdCardano.CLI.Shelley.Run.Address
runAddressInfoCardano.CLI.Shelley.Run.Address.Info
runAddressKeyGenCardano.CLI.Shelley.Run.Address
runByronClientCommandCardano.CLI.Byron.Run
runChainSyncClientCardano.Api.ChainSync.Client, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runChainSyncClientPipelinedCardano.Api.ChainSync.ClientPipelined, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runClientCommandCardano.CLI.Run
runGenesisCmdCardano.CLI.Shelley.Run.Genesis
runGetLocalNodeTipCardano.CLI.Byron.Query
runGovernanceCmdCardano.CLI.Shelley.Run.Governance
runKeyCmdCardano.CLI.Shelley.Run.Key
runLocalStateQueryClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runLocalTxSubmissionClientCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
runNodeCmdCardano.CLI.Shelley.Run.Node
runNodeIssueOpCertCardano.CLI.Shelley.Run.Node
runNodeKeyGenColdCardano.CLI.Shelley.Run.Node
runNodeKeyGenKESCardano.CLI.Shelley.Run.Node
runNodeKeyGenVRFCardano.CLI.Shelley.Run.Node
runPipelineDecisionCardano.Api.ChainSync.ClientPipelined
runPoolCmdCardano.CLI.Shelley.Run.Pool
runProposalCreationCardano.CLI.Byron.UpdateProposal
runQueryCmdCardano.CLI.Shelley.Run.Query
runShelleyClientCommandCardano.CLI.Shelley.Run
runStakeAddressCmdCardano.CLI.Shelley.Run.StakeAddress
runStakeAddressKeyGenCardano.CLI.Shelley.Run.StakeAddress
runTextViewCmdCardano.CLI.Shelley.Run.TextView
runTransactionCmdCardano.CLI.Shelley.Run.Transaction
runVersionOptionsCardano.Chairman.Commands.Version
runVoteCreationCardano.CLI.Byron.Vote
SCardano.Api.ChainSync.ClientPipelined
ScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataBytesCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataBytesTooLongCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataConstructorCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataConstructorOutOfRangeCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataFileCardano.CLI.Types
scriptDataFromJsonCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataHashCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
ScriptDataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBadMapPairCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBadObjectCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonBoolNotAllowedCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonDetailedSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonErrorCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNoSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNotObjectCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNullNotAllowedCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonNumberNotIntegerCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonSchemaCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonSchemaError 
1 (Data Constructor)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataJsonTypeMismatchCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataListCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataMapCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataNumberCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataNumberOutOfRangeCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataOrFileCardano.CLI.Types
ScriptDataRangeError 
1 (Type/Class)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptDataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptDataToJsonCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDataValueCardano.CLI.Types
ScriptDatumCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDatumForTxInCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptDatumOrFileCardano.CLI.Types
ScriptDatumOrFileForTxInCardano.CLI.Types
ScriptDecodeErrorCardano.CLI.Shelley.Script
ScriptDecodeSimpleScriptErrorCardano.CLI.Shelley.Script
ScriptDecodeTextEnvelopeErrorCardano.CLI.Shelley.Script
ScriptFile 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
ScriptHash 
1 (Data Constructor)Cardano.Api.Script
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptInAnyLang 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptInEra 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptLanguageInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptLanguageSupportedInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptPolicyIdCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptRedeemerCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptRedeemerOrFileCardano.CLI.Types
ScriptWitness 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessFilesCardano.CLI.Types
ScriptWitnessForMintingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessForSpendingCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessForStakeAddrCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ScriptWitnessInCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
scriptWitnessScriptCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
securityParam 
1 (Function)Testnet.Shelley
2 (Function)Testnet.Byron
selectAssetCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
selectLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SendMsgDone 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Data Constructor)Cardano.Api.ChainSync.Client
SendMsgFindIntersect 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Data Constructor)Cardano.Api.ChainSync.Client
SendMsgRequestNext 
1 (Data Constructor)Cardano.Api.ChainSync.ClientPipelined
2 (Data Constructor)Cardano.Api.ChainSync.Client
SendMsgRequestNextPipelinedCardano.Api.ChainSync.ClientPipelined
SendToReservesMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SendToTreasuryMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseAddressCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseAddressForTxOutCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SerialiseAsRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseByronWitnessCardano.CLI.Byron.Delegation
SerialisedDebugLedgerState 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
serialiseDelegationCertCardano.CLI.Byron.Delegation
serialiseToBech32Cardano.Api.SerialiseBech32, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesHexCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToRawBytesHexTextCardano.Api.SerialiseRaw, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
serialiseToTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
setPoolCardano.CLI.Types
setTotalCardano.CLI.Types
sgActiveSlotsCoeffCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgEpochLengthCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgGenDelegsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgInitialFundsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgMaxKESEvolutionsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgMaxLovelaceSupplyCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgNetworkIdCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgNetworkMagicCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgProtocolParamsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSecurityParamCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSlotLengthCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSlotsPerKESPeriodCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgStakingCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgSystemStartCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
sgUpdateQuorumCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
ShelleyCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyAddrCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyAddressCardano.Api.Address, Cardano.Api.Shelley
ShelleyAddressCmdAddressInfoErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressCmdErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressCmdReadKeyFileErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressCmdReadScriptFileErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressCmdVerificationKeyTextOrFileErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressCmdWriteFileErrorCardano.CLI.Shelley.Run.Address
ShelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyAddressInEraCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyAddressInfoErrorCardano.CLI.Shelley.Run.Address.Info
ShelleyAddressInvalidCardano.CLI.Shelley.Run.Address.Info
ShelleyBasedEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyBasedEraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraAllegraCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraAlonzoCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraMaryCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyBasedEraShelleyCardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
shelleyBasedToCardanoEraCardano.Api.Eras
ShelleyBlockCardano.Api.Block
ShelleyBlockTypeCardano.Api.Protocol.Types
ShelleyBootstrapWitnessCardano.Api.Tx, Cardano.Api.Shelley
ShelleyClientCmdErrorCardano.CLI.Shelley.Run
ShelleyCommand 
1 (Data Constructor)Cardano.CLI.Run
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
ShelleyEra 
1 (Type/Class)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Eras, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyEraInCardanoModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyEraInShelleyModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyExtendedSigningKeyCardano.Api.Tx
ShelleyGenesis 
1 (Data Constructor)Cardano.Api.Shelley.Genesis, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Shelley.Genesis, Cardano.Api.Shelley
ShelleyGenesisCmdAddressCmdErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdAesonDecodeErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdCostModelsErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdFileErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdFilesDupIndexCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdFilesNoIndexCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdGenesisFileErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdMismatchedGenesisKeyFilesCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdNodeCmdErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdPoolCmdErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdStakeAddressCmdErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdTextEnvReadFileErrorCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdTooFewPoolsForBulkCredsCardano.CLI.Shelley.Run.Genesis
ShelleyGenesisCmdUnexpectedAddressVerificationKeyCardano.CLI.Shelley.Run.Genesis
shelleyGenesisDefaultsCardano.Api.Shelley.Genesis, Cardano.Api.Shelley
ShelleyGovernanceCmdErrorCardano.CLI.Shelley.Run.Governance
ShelleyKeyCmdErrorCardano.CLI.Shelley.Run.Key
ShelleyKeyWitnessCardano.Api.Tx, Cardano.Api.Shelley
ShelleyLedgerEraCardano.Api.Eras, Cardano.Api.Shelley
ShelleyMode 
1 (Type/Class)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Shelley
2 (Data Constructor)Cardano.Api.Modes, Cardano.Api.IPC, Cardano.Api.Shelley
ShelleyModeParamsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ShelleyNodeCmdErrorCardano.CLI.Shelley.Run.Node
ShelleyNodeCmdReadFileErrorCardano.CLI.Shelley.Run.Node
ShelleyNormalSigningKeyCardano.Api.Tx
ShelleyPoolCmdErrorCardano.CLI.Shelley.Run.Pool
ShelleyPoolCmdReadFileErrorCardano.CLI.Shelley.Run.Pool
ShelleyQueryCmdErrorCardano.CLI.Shelley.Run.Query
ShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
ShelleyStakeAddressCmdErrorCardano.CLI.Shelley.Run.StakeAddress
ShelleyStakeAddressCmdReadKeyFileErrorCardano.CLI.Shelley.Run.StakeAddress
ShelleyTextViewFileErrorCardano.CLI.Shelley.Run.TextView
ShelleyTxCardano.Api.Tx, Cardano.Api.Shelley
ShelleyTxBodyCardano.Api.TxBody, Cardano.Api.Shelley
ShelleyTxCmdErrorCardano.CLI.Shelley.Run.Transaction
ShelleyTxValidationErrorCardano.Api.TxInMode
ShelleyWitnessSigningKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SigDSIGNCardano.Api.Crypto.Ed25519Bip32
SigEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
signByronTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SigningKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SigningKeyDeserialisationFailedCardano.CLI.Byron.Key
SigningKeyFile 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
SignKeyDSIGNCardano.Api.Crypto.Ed25519Bip32
SignKeyEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
signShelleyTransactionCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScript 
1 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptLanguageCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InAllegraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InMaryCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV1InShelleyCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InAllegraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InAlonzoCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptV2InMaryCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
simpleScriptVersionCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptWitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SimpleScriptWitnessFileCardano.CLI.Types
slotDurationTestnet.Byron
slotLengthTestnet.Shelley
SlotNo 
1 (Data Constructor)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SlotsInEpoch 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SlotsToEpochEnd 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
slotToEpochCardano.Api.Query, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
socketDirTestnet.Conf
SocketPath 
1 (Data Constructor)Cardano.Api.TxSubmit.Types
2 (Type/Class)Cardano.Api.TxSubmit.Types
3 (Data Constructor)Cardano.CLI.Types
4 (Type/Class)Cardano.CLI.Types
SomeAddressVerificationKeyCardano.CLI.Shelley.Run.Address
SomeByronSigningKeyCardano.Api.KeysByron, Cardano.Api.Byron
SomeKeyFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
SomeNodeClientProtocol 
1 (Data Constructor)Cardano.Api.Protocol.Types, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Protocol.Types, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SomeSigningKeyCardano.CLI.Shelley.Run.Key
SpendGenesisUTxOCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
SpendUTxOCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
StakeAddress 
1 (Data Constructor)Cardano.Api.Address, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressBuildCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeAddressByPointerCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressByValueCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeAddressDelegationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeAddressDeregistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeAddressesMIRCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressKeyGenCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeAddressKeyHashCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeAddressReferenceCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeAddressRegistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakeCredentialCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeCredentialByKeyCardano.Api.Address, Cardano.Api.Shelley
StakeCredentialByScriptCardano.Api.Address, Cardano.Api.Shelley
StakeExtendedKeyCardano.Api.KeysShelley, Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
StakeKeyCardano.Api.KeysShelley, Cardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeKeyDelegationCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeKeyDeRegistrationCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
StakeKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
StakeKeyRegistrationCertCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
stakePoolCostCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolDescriptionCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolHomepageCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolIdCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolKeyCardano.Api.KeysShelley, Cardano.Api.Shelley
StakePoolKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolMarginCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadata 
1 (Data Constructor)Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolMetadataCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataHashCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolMetadataHashCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataInvalidLengthErrorCardano.Api.StakePoolMetadata
StakePoolMetadataJsonDecodeErrorCardano.Api.StakePoolMetadata
StakePoolMetadataReference 
1 (Data Constructor)Cardano.Api.Certificate, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolMetadataURLCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolMetadataValidationErrorCardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolNameCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
stakePoolOwnersCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolParameters 
1 (Data Constructor)Cardano.Api.Certificate, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolPledgeCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRegistrationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayCardano.Api.Certificate, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakePoolRelayDnsARecordCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayDnsSrvRecordCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRelayIpCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolRelaysCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolRetirementCertificateCardano.Api.Certificate, Cardano.Api.Shelley
stakePoolRewardAccountCardano.Api.Certificate, Cardano.Api.Shelley
StakePoolSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolTickerCardano.Api.StakePoolMetadata, Cardano.Api.Shelley
StakePoolVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
stakePoolVRFCardano.Api.Certificate, Cardano.Api.Shelley
Stakes 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
StakeSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
StakeVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
StakeVerifierCardano.CLI.Shelley.Key
StakeVerifierKeyCardano.CLI.Shelley.Key
StakeVerifierScriptFileCardano.CLI.Shelley.Key
submitByronUpdateProposalCardano.CLI.Byron.UpdateProposal
submitByronVoteCardano.CLI.Byron.Vote
SubmitFailCardano.Api.IPC
SubmitResultCardano.Api.IPC
SubmitSuccessCardano.Api.IPC
SubmitTxCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
submitTxToNodeLocalCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
SubmitUpdateProposalCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
SubmitVoteCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
SuccCardano.Api.ChainSync.ClientPipelined
teDescriptionCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
tempAbsPathTestnet.Conf
tempBaseAbsPathTestnet.Conf
tempRelPathTestnet.Conf
teRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TestnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
testnet 
1 (Function)Testnet.Shelley
2 (Function)Testnet.Byron
3 (Function)Testnet.ByronShelley
testnetMagicTestnet.Conf
TestnetOptions 
1 (Data Constructor)Testnet.Shelley
2 (Type/Class)Testnet.Shelley
3 (Data Constructor)Testnet.Byron
4 (Type/Class)Testnet.Byron
5 (Data Constructor)Testnet.ByronShelley
6 (Type/Class)Testnet.ByronShelley
testsTest.Cardano.Api.Metadata
teTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelope 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeAesonDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeDefaultDescrCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDescr 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeType 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeTypeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textShow 
1 (Function)Cardano.Api.TxSubmit.Types
2 (Function)Cardano.CLI.Helpers
TextViewCBORPrettyPrintErrorCardano.CLI.Shelley.Run.TextView
TextViewCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TextViewInfoCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TextViewReadFileErrorCardano.CLI.Shelley.Run.TextView
throwErrorAsExceptionCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksInSimpleScriptV2Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
timeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
toAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toAlonzoExUnitsCardano.Api.Script
toAlonzoLanguageCardano.Api.Script
toAlonzoPricesCardano.Api.ProtocolParameters
toByronLedgertoByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLedgerUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLovelaceCardano.Api.Value, Cardano.Api.Byron
toByronNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronProtocolMagicIdCardano.Api.NetworkId, Cardano.Api.Byron
toByronRequiresNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronSigningKeyCardano.Api.KeysByron
ToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toCBORCardano.Api.SerialiseCBOR
toCborTxAuxCardano.CLI.Byron.Tx
toConsensusEraIndexCardano.Api.Modes
toConsensusGenTxCardano.Api.TxInMode
toConsensusPointCardano.Api.Block
toConsensusPointInModeCardano.Api.Block
toConsensusQueryCardano.Api.Query
toEncodingCardano.Api.SerialiseJSON
toEncodingListCardano.Api.SerialiseJSON
toEraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toJSONCardano.Api.SerialiseJSON
toJSONListCardano.Api.SerialiseJSON
toLedgerPParamsCardano.Api.ProtocolParameters
toLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
toLedgerUpdateCardano.Api.ProtocolParameters
toMaryValueCardano.Api.Value, Cardano.Api.Shelley
toNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toplevelExceptionHandlerCardano.CLI.TopHandler
toPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toScriptInAnyLangCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
toShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
toShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMetadatumCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
toShelleyNetworkCardano.Api.NetworkId, Cardano.Api.Shelley
toShelleyPoolParamsCardano.Api.Certificate
toShelleyScriptCardano.Api.Script, Cardano.Api.Shelley
toShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
toShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
toShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
toShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
totalBalanceTestnet.Byron
ToVerificationCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
TransactionCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
transactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TransferDirectionCardano.CLI.Types
TransferToReservesCardano.CLI.Types
TransferToTreasuryCardano.CLI.Types
Tx 
1 (Data Constructor)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAssembleTxBodyWitnessCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxAuxScriptData 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptDataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptDataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScripts 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBody 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyAuxDataHashInvalidErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyContent 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxBodyMetadataErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintAdaErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintBeforeMaryErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMissingProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyNoScriptDataCardano.Api.TxBody
TxBodyOutputNegativeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyOutputOverflowCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyScriptData 
1 (Data Constructor)Cardano.Api.TxBody
2 (Type/Class)Cardano.Api.TxBody
TxBuildRawCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxByronWitnessCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCalculateMinFeeCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCalculateMinValueCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCertificates 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txCertificatesCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCertificatesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCreateWitnessCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxDeserialisationFailedCardano.CLI.Byron.Tx
TxExtraKeyWitnesses 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txExtraKeyWitsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeExplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeImplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFile 
1 (Data Constructor)Cardano.CLI.Byron.Tx
2 (Type/Class)Cardano.CLI.Byron.Tx
3 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
4 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxGetTxIdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxId 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIn 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInByronSpecialCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxInMode 
1 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateral 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateralNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIx 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaBytesCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadata 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataBytesTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInEra 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadMapPairCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBoolNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonDetailedSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonErrorCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNotObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNullNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNumberNotIntegerCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaError 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelBadKeyCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelNotMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonTypeMismatchCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNumberOutOfRangeCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataRangeError 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataTextTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataValueCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaListCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaNumberCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaTextCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintedPolicyIdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxMintNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintValue 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMintValueCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOut 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAdaOnlyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAnyEra 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
TxOutCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxOutDatumHash 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHashNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutValue 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxShelleyWitnessCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxSignCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
txSpendGenesisUTxOByronPBFTCardano.CLI.Byron.Tx
txSpendUTxOByronPBFTCardano.CLI.Byron.Tx
TxSubmitCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxSubmitBadTxCardano.Api.TxSubmit.Types
TxSubmitDecodeFailCardano.Api.TxSubmit.Types
TxSubmitDecodeHexCardano.Api.TxSubmit.Types
TxSubmitEmptyCardano.Api.TxSubmit.Types
TxSubmitFailCardano.Api.TxSubmit.Types
TxSubmitOkCardano.Api.TxSubmit.Types
TxSubmitStatusCardano.Api.TxSubmit.Types
TxUpdateProposal 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txUpdateProposalCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxUpdateProposalNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationEraMismatchCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationErrorCardano.Api.TxInMode, Cardano.Api.IPC
TxValidationErrorInMode 
1 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityLowerBound 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoLowerBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoUpperBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txValidityRangeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityUpperBound 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxViewCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxWithdrawals 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txWithdrawalsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawalsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unBlockNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unByronUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
unByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
unCertificateFileCardano.CLI.Types, Cardano.CLI.Byron.Commands
unEpochNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unEpochSizeCardano.Api.GenesisParameters
unEpochSlotsCardano.Api.Modes, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unGenesisFileCardano.CLI.Types
unKESPeriodCardano.Api.OperationalCertificate, Cardano.Api.Shelley
unNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unPoolMetadataFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
unScriptFileCardano.CLI.Types
unSigningKeyFileCardano.CLI.Types
unSlotNoCardano.Api.Block, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
unSocketPath 
1 (Function)Cardano.Api.TxSubmit.Types
2 (Function)Cardano.CLI.Types
unUpdateProposalFileCardano.CLI.Types
unVerificationKeyFileCardano.CLI.Types, Cardano.CLI.Byron.Key, Cardano.CLI.Byron.Commands
UpdateProposal 
1 (Data Constructor)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.ProtocolParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
3 (Data Constructor)Cardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
UpdateProposalDecodingErrorCardano.CLI.Byron.UpdateProposal
UpdateProposalFile 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
UpdateProposalInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UpdateProposalSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
updateProposalSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
UsingRawBytesHex 
1 (Data Constructor)Cardano.Api.SerialiseRaw
2 (Type/Class)Cardano.Api.SerialiseRaw
UTxO 
1 (Data Constructor)Cardano.Api.Query, Cardano.Api.Shelley
2 (Type/Class)Cardano.Api.Query, Cardano.Api.Shelley
validateAndHashStakePoolMetadataCardano.Api.StakePoolMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidateCBORCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
validateCBORCardano.CLI.Helpers
validateCostModelCardano.Api.ProtocolParameters
validateScriptDataCardano.Api.ScriptData, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validateTxMetadataCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityLowerBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityLowerBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityNoUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityNoUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValidityUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
validityUpperBoundSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueFromListCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueFromNestedRepCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedBundle 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedBundleAdaCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ValueNestedRep 
1 (Data Constructor)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToListCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToLovelaceCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
valueToNestedRepCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VerificationKeyCardano.Api.Key, Cardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Shelley, Cardano.Api.Byron, Cardano.Api.Byron
VerificationKeyBase64 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
VerificationKeyDeserialisationFailedCardano.CLI.Byron.Key
VerificationKeyFile 
1 (Data Constructor)Cardano.CLI.Types, Cardano.CLI.Byron.Key, Cardano.CLI.Byron.Commands
2 (Type/Class)Cardano.CLI.Types, Cardano.CLI.Byron.Key, Cardano.CLI.Byron.Commands
VerificationKeyFileErrorCardano.CLI.Shelley.Key
VerificationKeyFilePathCardano.CLI.Shelley.Key
VerificationKeyHashCardano.CLI.Shelley.Key
verificationKeyHashCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VerificationKeyOrFile 
1 (Type/Class)Cardano.CLI.Shelley.Key
2 (Data Constructor)Cardano.CLI.Shelley.Key
VerificationKeyOrHashOrFileCardano.CLI.Shelley.Key
VerificationKeyTextErrorCardano.CLI.Shelley.Key
VerificationKeyTextOrFileCardano.CLI.Shelley.Key
VerificationKeyTextOrFileErrorCardano.CLI.Shelley.Key
VerificationKeyValueCardano.CLI.Shelley.Key
VerKeyDSIGNCardano.Api.Crypto.Ed25519Bip32
VerKeyEd25519Bip32DSIGNCardano.Api.Crypto.Ed25519Bip32
version 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
VersionOptions 
1 (Data Constructor)Cardano.Chairman.Commands.Version
2 (Type/Class)Cardano.Chairman.Commands.Version
ViewTx 
1 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VktofVerificationKeyFileCardano.CLI.Shelley.Key
VktofVerificationKeyTextCardano.CLI.Shelley.Key
VrfKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
VrfKeyHashCardano.Api.KeysPraos, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley
VrfSigningKeyCardano.Api.KeysPraos, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
VrfVerificationKeyCardano.Api.KeysPraos, Cardano.Api.Shelley
WitCtxCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxMint 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxStake 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitCtxTxIn 
1 (Type/Class)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WithdrawalsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
withdrawalsSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessByronAddressCardano.Api.Tx, Cardano.Api.Byron
WitnessFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
WitnessGenesisDelegateExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisDelegateKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessGenesisUTxOKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessNetworkIdCardano.Api.Tx, Cardano.Api.Byron
WitnessNetworkIdOrByronAddressCardano.Api.Tx, Cardano.Api.Byron
WitnessPaymentExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessPaymentKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessSigningDataCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
WitnessStakeExtendedKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessStakeKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
WitnessStakePoolKeyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileTextEnvelopeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
writeFileTextEnvelopeWithOwnerPermissionsCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
xPrvFromBytesCardano.Api.Crypto.Ed25519Bip32
xPrvToBytesCardano.Api.Crypto.Ed25519Bip32
ZCardano.Api.ChainSync.ClientPipelined
ZeroCardano.Api.ChainSync.ClientPipelined
\ No newline at end of file diff --git a/doc-index-F.html b/doc-index-F.html index d02bd6335a2..256181e2c37 100644 --- a/doc-index-F.html +++ b/doc-index-F.html @@ -1 +1 @@ -cardano-node API (Index - F)
cardano-node API

Index - F

FileError 
1 (Data Constructor)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileErrorTempFileCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileIOErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FilterByAddressCardano.CLI.Types
filterValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
foldBlocksCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksApplyBlockErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ForkPointTestnet.ByronShelley
forkPointTestnet.ByronShelley
friendlyTxBodyBSCardano.CLI.Run.Friendly
fromAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
fromAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromAlonzoExUnitsCardano.Api.Script
fromAlonzoLanguageCardano.Api.Script
fromAlonzoPricesCardano.Api.ProtocolParameters
fromByronLovelaceCardano.Api.Value
fromByronTxInCardano.Api.TxBody, Cardano.Api.Byron
FromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromCBORCardano.Api.SerialiseCBOR
fromCborTxAuxCardano.CLI.Byron.Tx
fromConsensusApplyTxErrCardano.Api.TxInMode
fromConsensusBlockCardano.Api.Block
fromConsensusEraIndexCardano.Api.Modes
fromConsensusPointCardano.Api.Block
fromConsensusPointInModeCardano.Api.Block
fromConsensusQueryResultCardano.Api.Query
fromConsensusTipCardano.Api.Block
fromGroupTest.Tasty.Hedgehog.Group
FromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromLedgerPParamsCardano.Api.ProtocolParameters
fromLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
fromLedgerUpdateCardano.Api.ProtocolParameters
fromMaryValueCardano.Api.Value, Cardano.Api.Shelley
fromPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyBasedScriptCardano.Api.Script
fromShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
fromShelleyDeltaLovelaceCardano.Api.Value
fromShelleyGenesisCardano.Api.GenesisParameters
fromShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
fromShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
fromShelleyNetworkCardano.Api.NetworkId
fromShelleyPaymentCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyPParamsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
fromShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
fromShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeReferenceCardano.Api.Address, Cardano.Api.Shelley
fromShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
FromSomeType 
1 (Data Constructor)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromTxOutCardano.Api.TxBody
futurePoolParametersCardano.CLI.Types
\ No newline at end of file +cardano-node API (Index - F)
cardano-node API

Index - F

FileError 
1 (Data Constructor)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileErrorTempFileCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FileIOErrorCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FilterByAddressCardano.CLI.Types
filterValueCardano.Api.Value, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
foldBlocksCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksApplyBlockErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
FoldBlocksInitialLedgerStateErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ForkPointTestnet.ByronShelley
forkPointTestnet.ByronShelley
friendlyTxBodyBSCardano.CLI.Run.Friendly
fromAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
fromAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromAlonzoExUnitsCardano.Api.Script
fromAlonzoLanguageCardano.Api.Script
fromAlonzoPricesCardano.Api.ProtocolParameters
fromByronLovelaceCardano.Api.Value
fromByronTxInCardano.Api.TxBody, Cardano.Api.Byron
FromCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromCBORCardano.Api.SerialiseCBOR
fromCborTxAuxCardano.CLI.Byron.Tx
fromConsensusApplyTxErrCardano.Api.TxInMode
fromConsensusBlockCardano.Api.Block
fromConsensusEraIndexCardano.Api.Modes
fromConsensusPointCardano.Api.Block
fromConsensusPointInModeCardano.Api.Block
fromConsensusQueryResultCardano.Api.Query
fromConsensusTipCardano.Api.Block
fromGroupTest.Tasty.Hedgehog.Group
FromJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromLedgerPParamsCardano.Api.ProtocolParameters
fromLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
fromLedgerUpdateCardano.Api.ProtocolParameters
fromMaryValueCardano.Api.Value, Cardano.Api.Shelley
fromPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
fromShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyBasedScriptCardano.Api.Script
fromShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
fromShelleyDeltaLovelaceCardano.Api.Value
fromShelleyGenesisCardano.Api.GenesisParameters
fromShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
fromShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMetadatumCardano.Api.TxMetadata, Cardano.Api.Shelley
fromShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
fromShelleyNetworkCardano.Api.NetworkId
fromShelleyPaymentCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyPParamsCardano.Api.ProtocolParameters, Cardano.Api.Shelley
fromShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
fromShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
fromShelleyStakeReferenceCardano.Api.Address, Cardano.Api.Shelley
fromShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
fromShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
FromSomeType 
1 (Data Constructor)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.HasTypeProxy, Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
fromTxOutCardano.Api.TxBody
futurePoolParametersCardano.CLI.Types
\ No newline at end of file diff --git a/doc-index-G.html b/doc-index-G.html index c3d6434fdf1..ae56062dff2 100644 --- a/doc-index-G.html +++ b/doc-index-G.html @@ -1 +1 @@ -cardano-node API (Index - G)
cardano-node API

Index - G

genAddressByronTest.Cardano.Api.Typed.Gen
genAddressShelleyTest.Cardano.Api.Typed.Gen
genByronKeyWitnessTest.Cardano.Api.Typed.Gen
generateSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
GenesisAddrCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCmdKeyHashCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisConfigErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisCreateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCreateStakedCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisDelegateExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDir 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisFile 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
GenesisGenerationErrorCardano.CLI.Byron.Genesis
GenesisHashFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisKeyDelegationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
GenesisKeyFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenDelegateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenGenesisCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenUTxOCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisOutputDirAlreadyExistsCardano.CLI.Byron.Genesis
GenesisParameters 
1 (Data Constructor)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
3 (Data Constructor)Cardano.CLI.Byron.Genesis
4 (Type/Class)Cardano.CLI.Byron.Genesis
GenesisReadErrorCardano.CLI.Byron.Genesis
GenesisSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisSpecErrorCardano.CLI.Byron.Genesis
GenesisTxInCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisUTxOKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
genesisUTxOPseudoTxInCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisVerKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
genMaybePraosNonceTest.Cardano.Api.Typed.Gen
genOperationalCertificateTest.Cardano.Api.Typed.Gen
genOperationalCertificateIssueCounterTest.Cardano.Api.Typed.Gen
genPlutusScriptTest.Cardano.Api.Typed.Gen
genProtocolParametersTest.Cardano.Api.Typed.Gen
genScriptTest.Cardano.Api.Typed.Gen
genScriptDataTest.Cardano.Api.Typed.Gen
genScriptHashTest.Cardano.Api.Typed.Gen
genScriptInAnyLangTest.Cardano.Api.Typed.Gen
genScriptInEraTest.Cardano.Api.Typed.Gen
genShelleyWitnessTest.Cardano.Api.Typed.Gen
genSigningKeyTest.Cardano.Api.Typed.Gen
genSimpleScriptTest.Cardano.Api.Typed.Gen
genStakeAddressTest.Cardano.Api.Typed.Gen
genTxTest.Cardano.Api.Typed.Gen
genTxBodyTest.Cardano.Api.Typed.Gen
genTxIdTest.Cardano.Api.Typed.Gen
genTxInTest.Cardano.Api.Typed.Gen
genTxMetadataTest.Cardano.Api.Metadata
genTxOutTest.Cardano.Api.Typed.Gen
genValueTest.Cardano.Api.Typed.Gen
genValueDefaultTest.Cardano.Api.Typed.Gen
genValueNestedBundleTest.Cardano.Api.Typed.Gen
genValueNestedRepTest.Cardano.Api.Typed.Gen
genVerificationKeyTest.Cardano.Api.Typed.Gen
getBinDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDataDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDataFileName 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDynLibDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLibDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLibexecDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLocalChainTipCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GetLocalNodeTipCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
getShelleyKeyWitnessVerificationKeyCardano.Api.Tx, Cardano.Api.Shelley
getSysconfDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getTxBodyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GetTxIdCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
getTxIdCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getTxWitnessesCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getVerificationKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
gitRevCardano.Config.Git.Rev
gitRevFromGitCardano.Config.Git.RevFromGit
goPoolCardano.CLI.Types
goTotalCardano.CLI.Types
GovernanceCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceGenesisKeyDelegationCertificateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceMIRPayStakeAddressesCertificateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceMIRTransferCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceUpdateProposalCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
gpAvvmBalanceFactorCardano.CLI.Byron.Genesis
gpFakeAvvmOptionsCardano.CLI.Byron.Genesis
gpKCardano.CLI.Byron.Genesis
gpProtocolMagicCardano.CLI.Byron.Genesis
gpProtocolParamsFileCardano.CLI.Byron.Genesis
gpSeedCardano.CLI.Byron.Genesis
gpStartTimeCardano.CLI.Byron.Genesis
gpTestnetBalanceCardano.CLI.Byron.Genesis
\ No newline at end of file +cardano-node API (Index - G)
cardano-node API

Index - G

genAddressByronTest.Cardano.Api.Typed.Gen
genAddressShelleyTest.Cardano.Api.Typed.Gen
genByronKeyWitnessTest.Cardano.Api.Typed.Gen
generateSigningKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
GenesisAddrCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCmdKeyHashCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisConfigErrorCardano.Api.LedgerState, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisCreateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisCreateStakedCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisDelegateExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDelegateVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisDir 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisExtendedKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisExtendedVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisFile 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
GenesisGenerationErrorCardano.CLI.Byron.Genesis
GenesisHashFileCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisKeyDelegationCertificateCardano.Api.Certificate, Cardano.Api.Shelley
GenesisKeyFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenDelegateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenGenesisCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyGenUTxOCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisOutputDirAlreadyExistsCardano.CLI.Byron.Genesis
GenesisParameters 
1 (Data Constructor)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.GenesisParameters, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
3 (Data Constructor)Cardano.CLI.Byron.Genesis
4 (Type/Class)Cardano.CLI.Byron.Genesis
GenesisReadErrorCardano.CLI.Byron.Genesis
GenesisSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisSpecErrorCardano.CLI.Byron.Genesis
GenesisTxInCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GenesisUTxOKeyCardano.Api.KeysShelley, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOKeyHashCardano.Api.KeysShelley, Cardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.KeysByron, Cardano.Api.StakePoolMetadata, Cardano.Api.Shelley, Cardano.Api.Byron
genesisUTxOPseudoTxInCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOSigningKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisUTxOVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisVerificationKeyCardano.Api.KeysShelley, Cardano.Api.KeysByron, Cardano.Api.Shelley, Cardano.Api.Byron
GenesisVerKeyCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
genMaybePraosNonceTest.Cardano.Api.Typed.Gen
genOperationalCertificateTest.Cardano.Api.Typed.Gen
genOperationalCertificateIssueCounterTest.Cardano.Api.Typed.Gen
genPlutusScriptTest.Cardano.Api.Typed.Gen
genProtocolParametersTest.Cardano.Api.Typed.Gen
genScriptTest.Cardano.Api.Typed.Gen
genScriptDataTest.Cardano.Api.Typed.Gen
genScriptHashTest.Cardano.Api.Typed.Gen
genScriptInAnyLangTest.Cardano.Api.Typed.Gen
genScriptInEraTest.Cardano.Api.Typed.Gen
genShelleyWitnessTest.Cardano.Api.Typed.Gen
genSigningKeyTest.Cardano.Api.Typed.Gen
genSimpleScriptTest.Cardano.Api.Typed.Gen
genStakeAddressTest.Cardano.Api.Typed.Gen
genTxTest.Cardano.Api.Typed.Gen
genTxBodyTest.Cardano.Api.Typed.Gen
genTxIdTest.Cardano.Api.Typed.Gen
genTxInTest.Cardano.Api.Typed.Gen
genTxMetadataTest.Cardano.Api.Metadata
genTxMetadataValueTest.Cardano.Api.Metadata
genTxOutTest.Cardano.Api.Typed.Gen
genValueTest.Cardano.Api.Typed.Gen
genValueDefaultTest.Cardano.Api.Typed.Gen
genValueNestedBundleTest.Cardano.Api.Typed.Gen
genValueNestedRepTest.Cardano.Api.Typed.Gen
genVerificationKeyTest.Cardano.Api.Typed.Gen
getBinDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDataDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDataFileName 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getDynLibDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLibDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLibexecDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getLocalChainTipCardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GetLocalNodeTipCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
getShelleyKeyWitnessVerificationKeyCardano.Api.Tx, Cardano.Api.Shelley
getSysconfDir 
1 (Function)Paths_cardano_cli
2 (Function)Paths_cardano_node
3 (Function)Paths_cardano_node_chairman
getTxBodyCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
GetTxIdCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
getTxIdCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getTxWitnessesCardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
getVerificationKeyCardano.Api.Key, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
gitRevCardano.Config.Git.Rev
gitRevFromGitCardano.Config.Git.RevFromGit
goPoolCardano.CLI.Types
goTotalCardano.CLI.Types
GovernanceCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceGenesisKeyDelegationCertificateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceMIRPayStakeAddressesCertificateCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceMIRTransferCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
GovernanceUpdateProposalCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
gpAvvmBalanceFactorCardano.CLI.Byron.Genesis
gpFakeAvvmOptionsCardano.CLI.Byron.Genesis
gpKCardano.CLI.Byron.Genesis
gpProtocolMagicCardano.CLI.Byron.Genesis
gpProtocolParamsFileCardano.CLI.Byron.Genesis
gpSeedCardano.CLI.Byron.Genesis
gpStartTimeCardano.CLI.Byron.Genesis
gpTestnetBalanceCardano.CLI.Byron.Genesis
\ No newline at end of file diff --git a/doc-index-T.html b/doc-index-T.html index f19e612a2ce..b695abd1ef5 100644 --- a/doc-index-T.html +++ b/doc-index-T.html @@ -1 +1 @@ -cardano-node API (Index - T)
cardano-node API

Index - T

teDescriptionCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
tempAbsPathTestnet.Conf
tempBaseAbsPathTestnet.Conf
tempRelPathTestnet.Conf
teRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TestnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
testnet 
1 (Function)Testnet.Shelley
2 (Function)Testnet.Byron
3 (Function)Testnet.ByronShelley
testnetMagicTestnet.Conf
TestnetOptions 
1 (Data Constructor)Testnet.Shelley
2 (Type/Class)Testnet.Shelley
3 (Data Constructor)Testnet.Byron
4 (Type/Class)Testnet.Byron
5 (Data Constructor)Testnet.ByronShelley
6 (Type/Class)Testnet.ByronShelley
testsTest.Cardano.Api.Metadata
teTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelope 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeAesonDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeDefaultDescrCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDescr 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeType 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeTypeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textShow 
1 (Function)Cardano.Api.TxSubmit.Types
2 (Function)Cardano.CLI.Helpers
TextViewCBORPrettyPrintErrorCardano.CLI.Shelley.Run.TextView
TextViewCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TextViewInfoCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TextViewReadFileErrorCardano.CLI.Shelley.Run.TextView
throwErrorAsExceptionCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksInSimpleScriptV2Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
timeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
toAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toAlonzoExUnitsCardano.Api.Script
toAlonzoLanguageCardano.Api.Script
toAlonzoPricesCardano.Api.ProtocolParameters
toByronLedgertoByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLedgerUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLovelaceCardano.Api.Value, Cardano.Api.Byron
toByronNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronProtocolMagicIdCardano.Api.NetworkId, Cardano.Api.Byron
toByronRequiresNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronSigningKeyCardano.Api.KeysByron
ToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toCBORCardano.Api.SerialiseCBOR
toCborTxAuxCardano.CLI.Byron.Tx
toConsensusEraIndexCardano.Api.Modes
toConsensusGenTxCardano.Api.TxInMode
toConsensusPointCardano.Api.Block
toConsensusPointInModeCardano.Api.Block
toConsensusQueryCardano.Api.Query
toEncodingCardano.Api.SerialiseJSON
toEncodingListCardano.Api.SerialiseJSON
toEraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toJSONCardano.Api.SerialiseJSON
toJSONListCardano.Api.SerialiseJSON
toLedgerPParamsCardano.Api.ProtocolParameters
toLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
toLedgerUpdateCardano.Api.ProtocolParameters
toMaryValueCardano.Api.Value, Cardano.Api.Shelley
toNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toplevelExceptionHandlerCardano.CLI.TopHandler
toPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toScriptInAnyLangCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
toShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
toShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
toShelleyNetworkCardano.Api.NetworkId, Cardano.Api.Shelley
toShelleyPoolParamsCardano.Api.Certificate
toShelleyScriptCardano.Api.Script, Cardano.Api.Shelley
toShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
toShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
toShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
toShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
totalBalanceTestnet.Byron
ToVerificationCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
TransactionCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
transactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TransferDirectionCardano.CLI.Types
TransferToReservesCardano.CLI.Types
TransferToTreasuryCardano.CLI.Types
Tx 
1 (Data Constructor)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAssembleTxBodyWitnessCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxAuxScriptData 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptDataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptDataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScripts 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBody 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyAuxDataHashInvalidErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyContent 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxBodyMetadataErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintAdaErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintBeforeMaryErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMissingProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyNoScriptDataCardano.Api.TxBody
TxBodyOutputNegativeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyOutputOverflowCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyScriptData 
1 (Data Constructor)Cardano.Api.TxBody
2 (Type/Class)Cardano.Api.TxBody
TxBuildRawCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxByronWitnessCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCalculateMinFeeCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCalculateMinValueCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCertificates 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txCertificatesCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCertificatesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCreateWitnessCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxDeserialisationFailedCardano.CLI.Byron.Tx
TxExtraKeyWitnesses 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txExtraKeyWitsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeExplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeImplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFile 
1 (Data Constructor)Cardano.CLI.Byron.Tx
2 (Type/Class)Cardano.CLI.Byron.Tx
3 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
4 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxGetTxIdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxId 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIn 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInByronSpecialCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxInMode 
1 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateral 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateralNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIx 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaBytesCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadata 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataBytesTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInEra 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadMapPairCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBoolNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonDetailedSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonErrorCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNotObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNullNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNumberNotIntegerCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaError 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelBadKeyCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelNotMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonTypeMismatchCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNumberOutOfRangeCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataRangeError 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataTextTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataValueCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaListCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaNumberCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaTextCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintedPolicyIdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxMintNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintValue 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMintValueCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOut 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAdaOnlyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAnyEra 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
TxOutCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxOutDatumHash 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHashNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutValue 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxShelleyWitnessCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxSignCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
txSpendGenesisUTxOByronPBFTCardano.CLI.Byron.Tx
txSpendUTxOByronPBFTCardano.CLI.Byron.Tx
TxSubmitCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxSubmitBadTxCardano.Api.TxSubmit.Types
TxSubmitDecodeFailCardano.Api.TxSubmit.Types
TxSubmitDecodeHexCardano.Api.TxSubmit.Types
TxSubmitEmptyCardano.Api.TxSubmit.Types
TxSubmitFailCardano.Api.TxSubmit.Types
TxSubmitOkCardano.Api.TxSubmit.Types
TxSubmitStatusCardano.Api.TxSubmit.Types
TxUpdateProposal 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txUpdateProposalCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxUpdateProposalNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationEraMismatchCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationErrorCardano.Api.TxInMode, Cardano.Api.IPC
TxValidationErrorInMode 
1 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityLowerBound 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoLowerBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoUpperBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txValidityRangeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityUpperBound 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxViewCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxWithdrawals 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txWithdrawalsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawalsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
\ No newline at end of file +cardano-node API (Index - T)
cardano-node API

Index - T

teDescriptionCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
tempAbsPathTestnet.Conf
tempBaseAbsPathTestnet.Conf
tempRelPathTestnet.Conf
teRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TestnetCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
testnet 
1 (Function)Testnet.Shelley
2 (Function)Testnet.Byron
3 (Function)Testnet.ByronShelley
testnetMagicTestnet.Conf
TestnetOptions 
1 (Data Constructor)Testnet.Shelley
2 (Type/Class)Testnet.Shelley
3 (Data Constructor)Testnet.Byron
4 (Type/Class)Testnet.Byron
5 (Data Constructor)Testnet.ByronShelley
6 (Type/Class)Testnet.ByronShelley
testsTest.Cardano.Api.Metadata
teTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelope 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeAesonDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDecodeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeDefaultDescrCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeDescr 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeRawCBORCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeType 
1 (Data Constructor)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textEnvelopeTypeCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TextEnvelopeTypeErrorCardano.Api.SerialiseTextEnvelope, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
textShow 
1 (Function)Cardano.Api.TxSubmit.Types
2 (Function)Cardano.CLI.Helpers
TextViewCBORPrettyPrintErrorCardano.CLI.Shelley.Run.TextView
TextViewCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TextViewInfoCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TextViewReadFileErrorCardano.CLI.Shelley.Run.TextView
throwErrorAsExceptionCardano.Api.Error, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksInSimpleScriptV2Cardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TimeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
timeLocksSupportedCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAddressAnyCardano.Api.Address, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toAllegraTimelockCardano.Api.Script, Cardano.Api.Shelley
toAlonzoDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toAlonzoExUnitsCardano.Api.Script
toAlonzoLanguageCardano.Api.Script
toAlonzoPricesCardano.Api.ProtocolParameters
toByronLedgertoByronVoteCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLedgerUpdateProposalCardano.Api.SpecialByron, Cardano.Api.Byron
toByronLovelaceCardano.Api.Value, Cardano.Api.Byron
toByronNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronProtocolMagicIdCardano.Api.NetworkId, Cardano.Api.Byron
toByronRequiresNetworkMagicCardano.Api.NetworkId, Cardano.Api.Byron
toByronSigningKeyCardano.Api.KeysByron
ToCBORCardano.Api.SerialiseCBOR, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toCBORCardano.Api.SerialiseCBOR
toCborTxAuxCardano.CLI.Byron.Tx
toConsensusEraIndexCardano.Api.Modes
toConsensusGenTxCardano.Api.TxInMode
toConsensusPointCardano.Api.Block
toConsensusPointInModeCardano.Api.Block
toConsensusQueryCardano.Api.Query
toEncodingCardano.Api.SerialiseJSON
toEncodingListCardano.Api.SerialiseJSON
toEraInModeCardano.Api.Modes, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
ToJSONCardano.Api.SerialiseJSON, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toJSONCardano.Api.SerialiseJSON
toJSONListCardano.Api.SerialiseJSON
toLedgerPParamsCardano.Api.ProtocolParameters
toLedgerProposedPPUpdatesCardano.Api.ProtocolParameters
toLedgerUpdateCardano.Api.ProtocolParameters
toMaryValueCardano.Api.Value, Cardano.Api.Shelley
toNetworkMagicCardano.Api.NetworkId, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toplevelExceptionHandlerCardano.CLI.TopHandler
toPlutusDataCardano.Api.ScriptData, Cardano.Api.Script, Cardano.Api.Shelley
toScriptInAnyLangCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toScriptInEraCardano.Api.Script, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
toShelleyAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyCertificateCardano.Api.Certificate, Cardano.Api.Shelley
toShelleyLovelaceCardano.Api.Value, Cardano.Api.Shelley
toShelleyMetadataCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMetadatumCardano.Api.TxMetadata, Cardano.Api.Shelley
toShelleyMultiSigCardano.Api.Script, Cardano.Api.Shelley
toShelleyNetworkCardano.Api.NetworkId, Cardano.Api.Shelley
toShelleyPoolParamsCardano.Api.Certificate
toShelleyScriptCardano.Api.Script, Cardano.Api.Shelley
toShelleyScriptHashCardano.Api.Script, Cardano.Api.Shelley
toShelleySigningKeyCardano.Api.Tx, Cardano.Api.Shelley
toShelleyStakeAddrCardano.Api.Address, Cardano.Api.Shelley
toShelleyStakeCredentialCardano.Api.Address, Cardano.Api.Shelley
toShelleyTxIdCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxInCardano.Api.TxBody, Cardano.Api.Shelley
toShelleyTxOutCardano.Api.TxBody, Cardano.Api.Shelley
totalBalanceTestnet.Byron
ToVerificationCardano.CLI.Byron.Commands, Cardano.CLI.Byron.Parsers
TransactionCmd 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
transactionFeeCardano.Api.Fees, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TransferDirectionCardano.CLI.Types
TransferToReservesCardano.CLI.Types
TransferToTreasuryCardano.CLI.Types
Tx 
1 (Data Constructor)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.Tx, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAssembleTxBodyWitnessCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxAuxScriptData 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptDataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptDataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScripts 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txAuxScriptsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxAuxScriptsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBody 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyAuxDataHashInvalidErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyContent 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyEmptyTxOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyFile 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxBodyMetadataErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintAdaErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMintBeforeMaryErrorCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyMissingProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyNoScriptDataCardano.Api.TxBody
TxBodyOutputNegativeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyOutputOverflowCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxBodyScriptData 
1 (Data Constructor)Cardano.Api.TxBody
2 (Type/Class)Cardano.Api.TxBody
TxBuildRawCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxByronWitnessCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCalculateMinFeeCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCalculateMinValueCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxCertificates 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txCertificatesCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCertificatesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxCreateWitnessCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxDeserialisationFailedCardano.CLI.Byron.Tx
TxExtraKeyWitnesses 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxExtraKeyWitnessesSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txExtraKeyWitsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeExplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeeImplicitCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txFeesExplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesExplicitInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInByronEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFeesImplicitInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxFile 
1 (Data Constructor)Cardano.CLI.Byron.Tx
2 (Type/Class)Cardano.CLI.Byron.Tx
3 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
4 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxGetTxIdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxId 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIn 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInByronSpecialCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxInMode 
1 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateral 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txInsCollateralCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxInsCollateralNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxIx 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaBytesCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadata 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataBytesTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAllegraEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInAlonzoEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInEra 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInMaryEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataInShelleyEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadMapPairCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBadObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonBoolNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonDetailedSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonErrorCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNoSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNotObjectCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNullNotAllowedCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonNumberNotIntegerCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonSchemaError 
1 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelBadKeyCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonToplevelNotMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataJsonTypeMismatchCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataNumberOutOfRangeCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataRangeError 
1 (Type/Class)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Data Constructor)Cardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMetadataSupportedInEraCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataTextTooLongCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetadataValueCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaListCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaMapCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaNumberCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMetaTextCardano.Api.TxMetadata, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintedPolicyIdCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxMintNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxMintValue 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txMintValueCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOut 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAdaOnlyCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutAnyEra 
1 (Data Constructor)Cardano.CLI.Types
2 (Type/Class)Cardano.CLI.Types
TxOutCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxOutDatumHash 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutDatumHashNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txOutsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxOutValue 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txProtocolParamsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxShelleyWitnessCount 
1 (Data Constructor)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
2 (Type/Class)Cardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxSignCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
txSpendGenesisUTxOByronPBFTCardano.CLI.Byron.Tx
txSpendUTxOByronPBFTCardano.CLI.Byron.Tx
TxSubmitCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxSubmitBadTxCardano.Api.TxSubmit.Types
TxSubmitDecodeFailCardano.Api.TxSubmit.Types
TxSubmitDecodeHexCardano.Api.TxSubmit.Types
TxSubmitEmptyCardano.Api.TxSubmit.Types
TxSubmitFailCardano.Api.TxSubmit.Types
TxSubmitOkCardano.Api.TxSubmit.Types
TxSubmitStatusCardano.Api.TxSubmit.Types
TxUpdateProposal 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txUpdateProposalCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxUpdateProposalNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationEraMismatchCardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidationErrorCardano.Api.TxInMode, Cardano.Api.IPC
TxValidationErrorInMode 
1 (Data Constructor)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxInMode, Cardano.Api.IPC, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityLowerBound 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoLowerBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityNoUpperBoundCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txValidityRangeCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxValidityUpperBound 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxViewCardano.CLI.Shelley.Commands, Cardano.CLI.Shelley.Parsers
TxWithdrawals 
1 (Data Constructor)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
2 (Type/Class)Cardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
txWithdrawalsCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
TxWithdrawalsNoneCardano.Api.TxBody, Cardano.Api, Cardano.Api.Shelley, Cardano.Api.Byron
\ No newline at end of file diff --git a/doc-index.json b/doc-index.json index b422c02859a..dd450d60763 100644 --- a/doc-index.json +++ b/doc-index.json @@ -17,6 +17,12 @@ "module": "Test.Cardano.Api.Metadata", "link": "cardano-api-test/Test-Cardano-Api-Metadata.html#v:genTxMetadata" }, + { + "display_html": "genTxMetadataValue ∷ Gen TxMetadataValue", + "name": "genTxMetadataValue", + "module": "Test.Cardano.Api.Metadata", + "link": "cardano-api-test/Test-Cardano-Api-Metadata.html#v:genTxMetadataValue" + }, { "display_html": "genAddressByron ∷ Gen (Address ByronAddr)", "name": "genAddressByron", @@ -1014,8 +1020,8 @@ "link": "cardano-api/Cardano-Api-TxMetadata.html#t:TxMetadata" }, { - "display_html": "data TxMetadataValue", - "name": "TxMetadataValue TxMetaNumber TxMetaBytes TxMetaText TxMetaList TxMetaMap", + "display_html": "data TxMetadataValue", + "name": "TxMetadataValue TxMetaMap TxMetaList TxMetaNumber TxMetaBytes TxMetaText", "module": "Cardano.Api.TxMetadata", "link": "cardano-api/Cardano-Api-TxMetadata.html#t:TxMetadataValue" }, @@ -1085,6 +1091,18 @@ "module": "Cardano.Api.TxMetadata", "link": "cardano-api/Cardano-Api-TxMetadata.html#v:fromShelleyMetadata" }, + { + "display_html": "toShelleyMetadatum ∷ TxMetadataValue → Metadatum", + "name": "toShelleyMetadatum", + "module": "Cardano.Api.TxMetadata", + "link": "cardano-api/Cardano-Api-TxMetadata.html#v:toShelleyMetadatum" + }, + { + "display_html": "fromShelleyMetadatum ∷ Metadatum → TxMetadataValue", + "name": "fromShelleyMetadatum", + "module": "Cardano.Api.TxMetadata", + "link": "cardano-api/Cardano-Api-TxMetadata.html#v:fromShelleyMetadatum" + }, { "display_html": "parseAll ∷ Parser a → Text → Maybe a", "name": "parseAll", @@ -4458,8 +4476,8 @@ "link": "cardano-api/Cardano-Api.html#t:TxMetadata" }, { - "display_html": "data TxMetadataValue", - "name": "TxMetadataValue TxMetaNumber TxMetaBytes TxMetaText TxMetaList TxMetaMap", + "display_html": "data TxMetadataValue", + "name": "TxMetadataValue TxMetaMap TxMetaList TxMetaNumber TxMetaBytes TxMetaText", "module": "Cardano.Api", "link": "cardano-api/Cardano-Api.html#t:TxMetadataValue" }, @@ -5807,6 +5825,18 @@ "module": "Cardano.Api.Shelley", "link": "cardano-api/Cardano-Api-Shelley.html#v:fromShelleyMetadata" }, + { + "display_html": "toShelleyMetadatum ∷ TxMetadataValue → Metadatum", + "name": "toShelleyMetadatum", + "module": "Cardano.Api.Shelley", + "link": "cardano-api/Cardano-Api-Shelley.html#v:toShelleyMetadatum" + }, + { + "display_html": "fromShelleyMetadatum ∷ Metadatum → TxMetadataValue", + "name": "fromShelleyMetadatum", + "module": "Cardano.Api.Shelley", + "link": "cardano-api/Cardano-Api-Shelley.html#v:fromShelleyMetadatum" + }, { "display_html": "data ProtocolParameters = ProtocolParameters {}", "name": "ProtocolParameters ProtocolParameters protocolParamProtocolVersion protocolParamDecentralization protocolParamExtraPraosEntropy protocolParamMaxBlockHeaderSize protocolParamMaxBlockBodySize protocolParamMaxTxSize protocolParamTxFeeFixed protocolParamTxFeePerByte protocolParamMinUTxOValue protocolParamStakeAddressDeposit protocolParamStakePoolDeposit protocolParamMinPoolCost protocolParamPoolRetireMaxEpoch protocolParamStakePoolTargetNum protocolParamPoolPledgeInfluence protocolParamMonetaryExpansion protocolParamTreasuryCut protocolParamUTxOCostPerWord protocolParamCostModels protocolParamPrices protocolParamMaxTxExUnits protocolParamMaxBlockExUnits protocolParamMaxValueSize protocolParamCollateralPercent protocolParamMaxCollateralInputs",