From 74c7f2ee20b9edc802bd4ea1d8331a51b833f10a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Cl=C3=A9ment=20Hurlin?= Date: Thu, 16 Jan 2025 13:54:08 +0100 Subject: [PATCH] Sign.hs: remove deprecated patterns --- cardano-api/internal/Cardano/Api/Tx/Sign.hs | 14 -------------- 1 file changed, 14 deletions(-) diff --git a/cardano-api/internal/Cardano/Api/Tx/Sign.hs b/cardano-api/internal/Cardano/Api/Tx/Sign.hs index 00017e9fc7..83c22a77ee 100644 --- a/cardano-api/internal/Cardano/Api/Tx/Sign.hs +++ b/cardano-api/internal/Cardano/Api/Tx/Sign.hs @@ -52,8 +52,6 @@ module Cardano.Api.Tx.Sign -- * Data family instances , AsType ( AsTx - , AsByronTx - , AsShelleyTx , AsMaryTx , AsAllegraTx , AsAlonzoTx @@ -185,18 +183,6 @@ instance HasTypeProxy era => HasTypeProxy (Tx era) where data AsType (Tx era) = AsTx (AsType era) proxyToAsType _ = AsTx (proxyToAsType (Proxy :: Proxy era)) -{-# DEPRECATED AsByronTx "Use AsTx AsByronEra instead." #-} -pattern AsByronTx :: AsType (Tx ByronEra) -pattern AsByronTx = AsTx AsByronEra - -{-# COMPLETE AsByronTx #-} - -{-# DEPRECATED AsShelleyTx "Use AsTx AsShelleyEra instead." #-} -pattern AsShelleyTx :: AsType (Tx ShelleyEra) -pattern AsShelleyTx = AsTx AsShelleyEra - -{-# COMPLETE AsShelleyTx #-} - pattern AsMaryTx :: AsType (Tx MaryEra) pattern AsMaryTx = AsTx AsMaryEra