summaryrefslogtreecommitdiff
path: root/compiler/GHC/Hs/Expr.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/Hs/Expr.hs')
-rw-r--r--compiler/GHC/Hs/Expr.hs10
1 files changed, 7 insertions, 3 deletions
diff --git a/compiler/GHC/Hs/Expr.hs b/compiler/GHC/Hs/Expr.hs
index cb8eb6d935..863c68e956 100644
--- a/compiler/GHC/Hs/Expr.hs
+++ b/compiler/GHC/Hs/Expr.hs
@@ -424,9 +424,13 @@ type instance XRecordCon GhcPs = EpAnn [AddEpAnn]
type instance XRecordCon GhcRn = NoExtField
type instance XRecordCon GhcTc = PostTcExpr -- Instantiated constructor function
-type instance XRecordUpd GhcPs = EpAnn [AddEpAnn]
-type instance XRecordUpd GhcRn = NoExtField
-type instance XRecordUpd GhcTc = RecordUpdTc
+type instance XRecordUpdField GhcPs = EpAnn [AddEpAnn]
+type instance XRecordUpdField GhcRn = NoExtField
+type instance XRecordUpdField GhcTc = RecordUpdTc
+
+type instance XRecordUpdProj GhcPs = EpAnn [AddEpAnn]
+type instance XRecordUpdProj GhcRn = NoExtField
+type instance XRecordUpdProj GhcTc = DataConCantHappen
type instance XGetField GhcPs = EpAnnCO
type instance XGetField GhcRn = NoExtField