Skip to content

Commit

Permalink
Remove rebase conflicts. (Note, this doesn't make the code compile.)
Browse files Browse the repository at this point in the history
  • Loading branch information
jonathanknowles committed Mar 16, 2023
1 parent 5a8c53e commit 1a04b58
Showing 1 changed file with 0 additions and 39 deletions.
39 changes: 0 additions & 39 deletions lib/wallet/src/Cardano/Wallet/Shelley/Compatibility.hs
Expand Up @@ -1460,19 +1460,12 @@ toCardanoTxOut era = case era of
addrInEra = tina "toCardanoTxOut: malformed address"
[ Cardano.AddressInEra
(Cardano.ShelleyAddressInEra Cardano.ShelleyBasedEraShelley)
<<<<<<< HEAD
<$> eitherToMaybe
(Cardano.deserialiseFromRawBytes AsShelleyAddress addr)

, Cardano.AddressInEra Cardano.ByronAddressInAnyEra
<$> eitherToMaybe
(Cardano.deserialiseFromRawBytes AsByronAddress addr)
=======
<$> eitherToMaybe (Cardano.deserialiseFromRawBytes AsShelleyAddress addr)

, Cardano.AddressInEra Cardano.ByronAddressInAnyEra
<$> eitherToMaybe (Cardano.deserialiseFromRawBytes AsByronAddress addr)
>>>>>>> b97557afc6 (Update dependencies)
]

toAllegraTxOut :: HasCallStack => W.TxOut -> Cardano.TxOut ctx AllegraEra
Expand All @@ -1487,19 +1480,12 @@ toCardanoTxOut era = case era of
addrInEra = tina "toCardanoTxOut: malformed address"
[ Cardano.AddressInEra
(Cardano.ShelleyAddressInEra Cardano.ShelleyBasedEraAllegra)
<<<<<<< HEAD
<$> eitherToMaybe
(Cardano.deserialiseFromRawBytes AsShelleyAddress addr)

, Cardano.AddressInEra Cardano.ByronAddressInAnyEra
<$> eitherToMaybe
(Cardano.deserialiseFromRawBytes AsByronAddress addr)
=======
<$> eitherToMaybe (Cardano.deserialiseFromRawBytes AsShelleyAddress addr)

, Cardano.AddressInEra Cardano.ByronAddressInAnyEra
<$> eitherToMaybe (Cardano.deserialiseFromRawBytes AsByronAddress addr)
>>>>>>> b97557afc6 (Update dependencies)
]

toMaryTxOut :: HasCallStack => W.TxOut -> Cardano.TxOut ctx MaryEra
Expand All @@ -1514,19 +1500,12 @@ toCardanoTxOut era = case era of
addrInEra = tina "toCardanoTxOut: malformed address"
[ Cardano.AddressInEra
(Cardano.ShelleyAddressInEra Cardano.ShelleyBasedEraMary)
<<<<<<< HEAD
<$> eitherToMaybe
(Cardano.deserialiseFromRawBytes AsShelleyAddress addr)

, Cardano.AddressInEra Cardano.ByronAddressInAnyEra
<$> eitherToMaybe
(Cardano.deserialiseFromRawBytes AsByronAddress addr)
=======
<$> eitherToMaybe (Cardano.deserialiseFromRawBytes AsShelleyAddress addr)

, Cardano.AddressInEra Cardano.ByronAddressInAnyEra
<$> eitherToMaybe (Cardano.deserialiseFromRawBytes AsByronAddress addr)
>>>>>>> b97557afc6 (Update dependencies)
]

toAlonzoTxOut :: HasCallStack => W.TxOut -> Cardano.TxOut ctx AlonzoEra
Expand All @@ -1543,19 +1522,12 @@ toCardanoTxOut era = case era of
addrInEra = tina "toCardanoTxOut: malformed address"
[ Cardano.AddressInEra
(Cardano.ShelleyAddressInEra Cardano.ShelleyBasedEraAlonzo)
<<<<<<< HEAD
<$> eitherToMaybe
(Cardano.deserialiseFromRawBytes AsShelleyAddress addr)

, Cardano.AddressInEra Cardano.ByronAddressInAnyEra
<$> eitherToMaybe
(Cardano.deserialiseFromRawBytes AsByronAddress addr)
=======
<$> eitherToMaybe (Cardano.deserialiseFromRawBytes AsShelleyAddress addr)

, Cardano.AddressInEra Cardano.ByronAddressInAnyEra
<$> eitherToMaybe (Cardano.deserialiseFromRawBytes AsByronAddress addr)
>>>>>>> b97557afc6 (Update dependencies)
]

toBabbageTxOut :: HasCallStack => W.TxOut -> Cardano.TxOut ctx BabbageEra
Expand All @@ -1572,19 +1544,12 @@ toCardanoTxOut era = case era of
addrInEra = tina "toCardanoTxOut: malformed address"
[ Cardano.AddressInEra
(Cardano.ShelleyAddressInEra Cardano.ShelleyBasedEraBabbage)
<<<<<<< HEAD
<$> eitherToMaybe
(Cardano.deserialiseFromRawBytes AsShelleyAddress addr)

, Cardano.AddressInEra Cardano.ByronAddressInAnyEra
<$> eitherToMaybe
(Cardano.deserialiseFromRawBytes AsByronAddress addr)
=======
<$> eitherToMaybe (Cardano.deserialiseFromRawBytes AsShelleyAddress addr)

, Cardano.AddressInEra Cardano.ByronAddressInAnyEra
<$> eitherToMaybe (Cardano.deserialiseFromRawBytes AsByronAddress addr)
>>>>>>> b97557afc6 (Update dependencies)
]

toConwayTxOut :: HasCallStack => W.TxOut -> Cardano.TxOut ctx ConwayEra
Expand Down Expand Up @@ -1620,13 +1585,9 @@ toCardanoValue tb = Cardano.valueFromList $

toCardanoAssetName (W.UnsafeTokenName name) =
just "toCardanoValue" "TokenName"
<<<<<<< HEAD
[ eitherToMaybe
$ Cardano.deserialiseFromRawBytes Cardano.AsAssetName name
]
=======
[eitherToMaybe $ Cardano.deserialiseFromRawBytes Cardano.AsAssetName name]
>>>>>>> b97557afc6 (Update dependencies)

coinToQuantity = fromIntegral . W.unCoin
toQuantity = fromIntegral . W.unTokenQuantity
Expand Down

0 comments on commit 1a04b58

Please sign in to comment.