Accomodate for costmlds change to a Map in the Ledger spec

Author: facundominguez

libs/cardano-ledger-conformance/src/Test/Cardano/Ledger/Conformance/SpecTranslate/Conway/Base.hs

@@ -230,7 +230,7 @@ instance
       ppPv = (0, 0)
       ppMinUTxOValue = 0 -- minUTxOValue has been deprecated and is not supported in Conway
     ppCoinsPerUTxOByte <- toSpecRep cppCoinsPerUTxOByte
-    ppCostmdls <- toSpecRep cppCostModels
+    ppCostmdlsAssoc <- toSpecRep cppCostModels
     ppPrices <- toSpecRep cppPrices
     let
       pp = PParams cpp

libs/cardano-ledger-conformance/src/Test/Cardano/Ledger/Conformance/SpecTranslate/Core.hs

@@ -156,9 +156,9 @@ instance SpecTranslate ctx ProtVer where
   toSpecRep (ProtVer ver minor) = pure (getVersion ver, toInteger minor)
 
 instance SpecTranslate ctx CostModels where
-  type SpecRep CostModels = ()
+  type SpecRep CostModels = [((), ())]
 
-  toSpecRep _ = pure ()
+  toSpecRep _ = pure [((), ())]
 
 instance SpecTranslate ctx Prices where
   type SpecRep Prices = ()