Change to last good cardano-ledger commit

cardano-foundation · Jun 22, 2022 · b89f351 · b89f351
1 parent 242396a
commit b89f351
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/cabal.project b/cabal.project
@@ -154,8 +154,8 @@ source-repository-package
 source-repository-package
     type: git
     location: https://github.com/input-output-hk/cardano-ledger
-    tag: ce3057e0863304ccb3f79d78c77136219dc786c6
-    --sha256: 19ijcy1sl1iqa7diy5nsydnjsn3281kp75i2i42qv0fpn58238s9
+    tag: aaca526f8cc0b62c3b36bdd2adb9b3d75b469f03
+    --sha256: 1ldfq7v5rnpp8svcdhn0kvbprfbdmqlk3h7lr2kwdd37b2q2hx2i
     subdir:
       eras/alonzo/impl
       eras/alonzo/test-suite

diff --git a/lib/shelley/src/Cardano/Wallet/Shelley/Compatibility.hs b/lib/shelley/src/Cardano/Wallet/Shelley/Compatibility.hs
@@ -1107,7 +1107,7 @@ fromShelleyTxIn (SL.TxIn txid (SL.TxIx ix)) =
     -- https://github.com/input-output-hk/cardano-ledger/commit/4097a9055e6ea57161755e6a8cbfcf719b65e9ab).
     -- However, the valid range is still 0 <= x <= (maxBound :: Word16), so we
     -- reflect that here.
-    unsafeCast :: Word64 -> Word32
+    unsafeCast :: Word16 -> Word32
     unsafeCast txIx =
         if txIx > fromIntegral (maxBound :: Word16)
         then error $ "Value for wallet TxIx is out of a valid range: " <> show txIx