summaryrefslogtreecommitdiff
path: root/compiler/rename
diff options
context:
space:
mode:
authorAlan Zimmerman <alan.zimm@gmail.com>2018-06-22 21:32:19 +0200
committerAlan Zimmerman <alan.zimm@gmail.com>2018-06-22 21:34:54 +0200
commit5f06cf6b6199c8f0e4921f4126f6eb15e2ff18ac (patch)
treea307050beac702489d50804be0d0f784769a5e8d /compiler/rename
parent122ba98af22c2b016561433dfa55bbabba98d972 (diff)
downloadhaskell-5f06cf6b6199c8f0e4921f4126f6eb15e2ff18ac.tar.gz
TTG for IPBind had wrong extension name
The standard[1] for extension naming is to use the XC prefix for the internal extension points, rather than for a new constructor. This is violated for IPBind, having data IPBind id = IPBind (XIPBind id) (Either (Located HsIPName) (IdP id)) (LHsExpr id) | XCIPBind (XXIPBind id) Swap the usage of XIPBind and XCIPBind [1] https://ghc.haskell.org/trac/ghc/wiki/ImplementingTreesThatGrow#Namingconventions Closes #15302
Diffstat (limited to 'compiler/rename')
-rw-r--r--compiler/rename/RnBinds.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/rename/RnBinds.hs b/compiler/rename/RnBinds.hs
index 79b55029a1..a2218e4b3e 100644
--- a/compiler/rename/RnBinds.hs
+++ b/compiler/rename/RnBinds.hs
@@ -226,7 +226,7 @@ rnIPBind :: IPBind GhcPs -> RnM (IPBind GhcRn, FreeVars)
rnIPBind (IPBind _ ~(Left n) expr) = do
(expr',fvExpr) <- rnLExpr expr
return (IPBind noExt (Left n) expr', fvExpr)
-rnIPBind (XCIPBind _) = panic "rnIPBind"
+rnIPBind (XIPBind _) = panic "rnIPBind"
{-
************************************************************************