Remove rebase conflicts. (Note, this doesn't make the code compile.)

cardano-foundation · Mar 16, 2023 · f8b2c67 · f8b2c67
1 parent cc86306
commit f8b2c67
Showing 1 changed file with 0 additions and 39 deletions.
diff --git a/lib/wallet/src/Cardano/Wallet/Shelley/Compatibility.hs b/lib/wallet/src/Cardano/Wallet/Shelley/Compatibility.hs
@@ -1381,19 +1381,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
@@ -1408,19 +1401,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
@@ -1435,19 +1421,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
@@ -1464,19 +1443,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
@@ -1493,19 +1465,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)
             ]
 
 toCardanoValue :: TokenBundle.TokenBundle -> Cardano.Value
@@ -1519,13 +1484,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