Update dependencies

IntersectMBO · May 3, 2022 · d0e7f46 · d0e7f46
1 parent 2e989b1
commit d0e7f46
Show file tree

Hide file tree

Showing 3 changed files with 21 additions and 27 deletions.
diff --git a/cabal.project b/cabal.project
@@ -168,8 +168,8 @@ source-repository-package
 source-repository-package
   type: git
   location: https://github.com/input-output-hk/cardano-base
-  tag: 394c4637c24d82325bd04ceb99c8e8df5617e663
-  --sha256: 02q8y69za5b0vsnj9qga1364vkmfc1kh35d0yshw1lf7nw9bls8m
+  tag: 8fe904d629194b1fbaaf2d0a4e0ccd17052e9103
+  --sha256: sha256-5B5lJFfUm4jbCBQtqTMvtiY2AWtnsN/1TYftAglT38A=
   subdir:
     base-deriving-via
     binary
@@ -191,7 +191,7 @@ source-repository-package
 source-repository-package
   type: git
   location: https://github.com/input-output-hk/cardano-ledger
-  tag: fd9ec0f15623b602e3730da6fb8c57cb58bf3169
+  tag: 88c0fe663720c5ef40f6fd00b9d331de81a6a7cb
   --sha256: 0r4ifqifv7k18hq1wj90xnf9qhnhlpawjmbs4fcxs7p8hdvvbpzy
   subdir:
     eras/alonzo/impl
@@ -279,8 +279,8 @@ source-repository-package
 source-repository-package
   type: git
   location: https://github.com/input-output-hk/plutus
-  tag: ccf5bcb99ffe054dc8cd5626723f64e02708dbae
-  --sha256: 18569bgywilibz7r5jyxj9bid8g4fwr80cc0hd9rcm3jhasbgq8i
+  tag: 5cc518f1202930ad52b8ba838af32af084c0e754
+  --sha256: 0w9v0n7rv2bmp0m4nrvxxncic7b23v3m4f89k31x0cawqzvhysbf
   subdir:
     plutus-core
     plutus-ledger-api

diff --git a/cardano-node/src/Cardano/Node/Tracing/Era/Shelley.hs b/cardano-node/src/Cardano/Node/Tracing/Era/Shelley.hs
@@ -1084,14 +1084,14 @@ instance ( Ledger.Era era
         mconcat [ "kind" .= String "MalformedScripts"
                 , "scripts" .= s
                 ]
-      -- The datum contains a ByteString that is more
-      -- than 64 bytes in length.
-      -- TODO: Ledger team needs to expose a better
-      -- error type.
-      Babbage.MalformedData datums->
-        mconcat [ "kind" .= String "MalformedData"
-                , "datums" .= datums
-                ]
+      -- -- The datum contains a ByteString that is more
+      -- -- than 64 bytes in length.
+      -- -- TODO: Ledger team needs to expose a better
+      -- -- error type.
+      -- Babbage.MalformedData datums->
+      --   mconcat [ "kind" .= String "MalformedData"
+      --           , "datums" .= datums
+      --           ]
 
 instance Core.Crypto crypto => LogFormatting (Praos.PraosValidationErr crypto) where
   forMachine _ err' =

diff --git a/cardano-node/src/Cardano/Tracing/OrphanInstances/Shelley.hs b/cardano-node/src/Cardano/Tracing/OrphanInstances/Shelley.hs
@@ -1044,12 +1044,6 @@ instance ToJSON Alonzo.TagMismatchDescription where
 
 instance ToJSON Alonzo.FailureDescription where
   toJSON f = case f of
-    Alonzo.OnePhaseFailure t ->
-      object
-        [ "kind" .= String "FailureDescription"
-        , "error" .= String "OnePhaseFailure"
-        , "description" .= t
-        ]
     Alonzo.PlutusFailure t _bs ->
       object
         [ "kind" .= String "FailureDescription"
@@ -1101,14 +1095,14 @@ instance ( ToJSON (Ledger.Value era)
         mconcat [ "kind" .= String "MalformedScripts"
                 , "scripts" .= s
                 ]
-      -- The datum contains a ByteString that is more
-      -- than 64 bytes in length.
-      -- TODO: Ledger team needs to expose a better
-      -- error type.
-      Babbage.MalformedData datums->
-        mconcat [ "kind" .= String "MalformedData"
-                , "datums" .= datums
-                ]
+      -- -- The datum contains a ByteString that is more
+      -- -- than 64 bytes in length.
+      -- -- TODO: Ledger team needs to expose a better
+      -- -- error type.
+      -- Babbage.MalformedData datums->
+      --   mconcat [ "kind" .= String "MalformedData"
+      --           , "datums" .= datums
+      --           ]
 
 instance Core.Crypto crypto => ToObject (Praos.PraosValidationErr crypto) where
   toObject _ err' =