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 8215779c2d..425976b7c8 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 @@ -478,6 +478,7 @@ instance CardanoHardForkConstraints c => SupportedNetworkProtocolVersion (CardanoBlock c) where supportedNodeToNodeVersions _ = Map.fromList $ [ (NodeToNodeV_13, CardanoNodeToNodeVersion2) + , (NodeToNodeV_14, CardanoNodeToNodeVersion2) ] supportedNodeToClientVersions _ = Map.fromList $ @@ -493,7 +494,7 @@ instance CardanoHardForkConstraints c , (NodeToClientV_18, CardanoNodeToClientVersion14) ] - latestReleasedNodeVersion _prx = (Just NodeToNodeV_13, Just NodeToClientV_17) + latestReleasedNodeVersion _prx = (Just NodeToNodeV_14, 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 7fc55dea08..f4f255f936 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 @@ -49,7 +49,8 @@ instance HasNetworkProtocolVersion (ShelleyBlock proto era) where -- TODO #2668 make this era-specific instance SupportedNetworkProtocolVersion (ShelleyBlock proto era) where supportedNodeToNodeVersions _ = Map.fromList [ - (NodeToNodeV_13, ShelleyNodeToNodeVersion1) + (NodeToNodeV_13, ShelleyNodeToNodeVersion1) + , (NodeToNodeV_14, ShelleyNodeToNodeVersion1) ] supportedNodeToClientVersions _ = Map.fromList [ (NodeToClientV_9, ShelleyNodeToClientVersion5)