From 1382d09efadc900f7242c2e23482a9970eaf4f9b Mon Sep 17 00:00:00 2001 From: Ryan Scott Date: Wed, 20 Mar 2019 09:41:00 -0400 Subject: Remove unused XArrApp and XArrForm extension points !301 removed the `HsArrApp` and `HsArrForm` constructors, which renders the corresponding extension points `XArrApp` and `XArrForm` useless. This patch finally rips them out. --- compiler/hsSyn/HsExpr.hs | 5 ----- compiler/hsSyn/HsExtension.hs | 4 ---- 2 files changed, 9 deletions(-) diff --git a/compiler/hsSyn/HsExpr.hs b/compiler/hsSyn/HsExpr.hs index bd63150c02..b86f4a147d 100644 --- a/compiler/hsSyn/HsExpr.hs +++ b/compiler/hsSyn/HsExpr.hs @@ -758,11 +758,6 @@ type instance XStatic GhcPs = NoExt type instance XStatic GhcRn = NameSet type instance XStatic GhcTc = NameSet -type instance XArrApp GhcPs = NoExt -type instance XArrApp GhcRn = NoExt -type instance XArrApp GhcTc = Type - -type instance XArrForm (GhcPass _) = NoExt type instance XTick (GhcPass _) = NoExt type instance XBinTick (GhcPass _) = NoExt type instance XTickPragma (GhcPass _) = NoExt diff --git a/compiler/hsSyn/HsExtension.hs b/compiler/hsSyn/HsExtension.hs index 9a017c250f..f5e3133788 100644 --- a/compiler/hsSyn/HsExtension.hs +++ b/compiler/hsSyn/HsExtension.hs @@ -536,8 +536,6 @@ type family XTcBracketOut x type family XSpliceE x type family XProc x type family XStatic x -type family XArrApp x -type family XArrForm x type family XTick x type family XBinTick x type family XTickPragma x @@ -586,8 +584,6 @@ type ForallXExpr (c :: * -> Constraint) (x :: *) = , c (XSpliceE x) , c (XProc x) , c (XStatic x) - , c (XArrApp x) - , c (XArrForm x) , c (XTick x) , c (XBinTick x) , c (XTickPragma x) -- cgit v1.2.1