Skip to content

Commit

Permalink
Workaround pingPong_2 test data broken by CPP
Browse files Browse the repository at this point in the history
  • Loading branch information
Anviking authored and erikd committed Mar 16, 2023
1 parent f5803c0 commit d9a3392
Showing 1 changed file with 8 additions and 5 deletions.
13 changes: 8 additions & 5 deletions lib/wallet/test/unit/Cardano/Wallet/Shelley/TransactionSpec.hs
Original file line number Diff line number Diff line change
Expand Up @@ -4417,16 +4417,19 @@ pingPong_2 = PartialTx
, inputs = WriteTx.toCardanoUTxO $ either (error . show) id $ WriteTx.utxoFromTxOutsInLatestEra RecentEraBabbage
[ ( WriteTx.unsafeMkTxIn tid 0
, WriteTx.TxOutInRecentEra
(WriteTx.unsafeAddressFromBytes $ unsafeFromHex
"714d72cf569a339a18a7d93023139\
\83f56e0d96cd45bdcb1d6512dca6a")
(WriteTx.unsafeAddressFromBytes $ unsafeFromHex $ mconcat
[ "714d72cf569a339a18a7d93023139"
, "83f56e0d96cd45bdcb1d6512dca6a"
])
(toLedgerTokenBundle $ TokenBundle.fromCoin $ Coin 2_000_000)
(WriteTx.DatumHash
$ fromJust
$ WriteTx.datumHashFromBytes
$ unsafeFromHex
"923918e403bf43c34b4ef6b48eb2ee04\
\babed17320d8d1b9ff9ad086e86f44ec")
$ mconcat $
[ "923918e403bf43c34b4ef6b48eb2ee04"
, "babed17320d8d1b9ff9ad086e86f44ec"
])
Nothing
)
]
Expand Down

0 comments on commit d9a3392

Please sign in to comment.