From a65b059020a0740654ae8b72ce037b5e967894ff Mon Sep 17 00:00:00 2001 From: Marcin Szamotulski Date: Thu, 26 Sep 2024 10:41:24 +0200 Subject: [PATCH] DO NOT MERGE The support for `NodeToClientV_18` is implemented in PR#1251. --- .../Ouroboros/Consensus/Cardano/Node.hs | 3 ++- .../Consensus/Shelley/Ledger/NetworkProtocolVersion.hs | 1 + .../Ouroboros/Consensus/Ledger/Query/Version.hs | 1 + 3 files changed, 4 insertions(+), 1 deletion(-) diff --git a/ouroboros-consensus-cardano/src/ouroboros-consensus-cardano/Ouroboros/Consensus/Cardano/Node.hs b/ouroboros-consensus-cardano/src/ouroboros-consensus-cardano/Ouroboros/Consensus/Cardano/Node.hs index f4665d9851..6ef1714077 100644 --- a/ouroboros-consensus-cardano/src/ouroboros-consensus-cardano/Ouroboros/Consensus/Cardano/Node.hs +++ b/ouroboros-consensus-cardano/src/ouroboros-consensus-cardano/Ouroboros/Consensus/Cardano/Node.hs @@ -496,9 +496,10 @@ instance CardanoHardForkConstraints c , (NodeToClientV_15, CardanoNodeToClientVersion11) , (NodeToClientV_16, CardanoNodeToClientVersion12) , (NodeToClientV_17, CardanoNodeToClientVersion13) + , (NodeToClientV_18, CardanoNodeToClientVersion13) ] - latestReleasedNodeVersion _prx = (Just NodeToNodeV_13, Just NodeToClientV_17) + latestReleasedNodeVersion _prx = (Just NodeToNodeV_13, Just NodeToClientV_18) {------------------------------------------------------------------------------- ProtocolInfo diff --git a/ouroboros-consensus-cardano/src/shelley/Ouroboros/Consensus/Shelley/Ledger/NetworkProtocolVersion.hs b/ouroboros-consensus-cardano/src/shelley/Ouroboros/Consensus/Shelley/Ledger/NetworkProtocolVersion.hs index c9b08fd4cb..a774e2deec 100644 --- a/ouroboros-consensus-cardano/src/shelley/Ouroboros/Consensus/Shelley/Ledger/NetworkProtocolVersion.hs +++ b/ouroboros-consensus-cardano/src/shelley/Ouroboros/Consensus/Shelley/Ledger/NetworkProtocolVersion.hs @@ -67,6 +67,7 @@ instance SupportedNetworkProtocolVersion (ShelleyBlock proto era) where , (NodeToClientV_15, ShelleyNodeToClientVersion7) , (NodeToClientV_16, ShelleyNodeToClientVersion8) , (NodeToClientV_17, ShelleyNodeToClientVersion9) + , (NodeToClientV_18, ShelleyNodeToClientVersion9) ] latestReleasedNodeVersion = latestReleasedNodeVersionDefault diff --git a/ouroboros-consensus/src/ouroboros-consensus/Ouroboros/Consensus/Ledger/Query/Version.hs b/ouroboros-consensus/src/ouroboros-consensus/Ouroboros/Consensus/Ledger/Query/Version.hs index 509583abf3..9c14b9bf0d 100644 --- a/ouroboros-consensus/src/ouroboros-consensus/Ouroboros/Consensus/Ledger/Query/Version.hs +++ b/ouroboros-consensus/src/ouroboros-consensus/Ouroboros/Consensus/Ledger/Query/Version.hs @@ -29,3 +29,4 @@ nodeToClientVersionToQueryVersion x = case x of NodeToClientV_15 -> QueryVersion2 NodeToClientV_16 -> QueryVersion2 NodeToClientV_17 -> QueryVersion2 + NodeToClientV_18 -> QueryVersion2