diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2019-09-11 21:19:39 +0200 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2019-09-20 05:14:34 -0400 |
| commit | 5119296440e6846c553c72b8a93afc5ecfa576f0 (patch) | |
| tree | ff508560a4996afffb24bf3af5dfa9c56a7e5c77 /compiler/rename/RnExpr.hs | |
| parent | 4853d962289db1b32886ec73e824cd37c9c5c002 (diff) | |
| download | haskell-5119296440e6846c553c72b8a93afc5ecfa576f0.tar.gz | |
Module hierarchy: Hs (#13009)
Add GHC.Hs module hierarchy replacing hsSyn.
Metric Increase:
haddock.compiler
Diffstat (limited to 'compiler/rename/RnExpr.hs')
| -rw-r--r-- | compiler/rename/RnExpr.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/rename/RnExpr.hs b/compiler/rename/RnExpr.hs index eadb4bca03..6485c004a6 100644 --- a/compiler/rename/RnExpr.hs +++ b/compiler/rename/RnExpr.hs @@ -26,7 +26,7 @@ import GhcPrelude import RnBinds ( rnLocalBindsAndThen, rnLocalValBindsLHS, rnLocalValBindsRHS, rnMatchGroup, rnGRHS, makeMiniFixityEnv) -import HsSyn +import GHC.Hs import TcEnv ( isBrackStage ) import TcRnMonad import Module ( getModule ) @@ -916,7 +916,7 @@ rnStmt ctxt _ (L loc (TransStmt { trS_stmts = stmts, trS_by = by, trS_form = for ; let all_fvs = fvs1 `plusFV` fvs2 `plusFV` fvs3 `plusFV` fvs4 `plusFV` fvs5 bndr_map = used_bndrs `zip` used_bndrs - -- See Note [TransStmt binder map] in HsExpr + -- See Note [TransStmt binder map] in GHC.Hs.Expr ; traceRn "rnStmt: implicitly rebound these used binders:" (ppr bndr_map) ; return (([(L loc (TransStmt { trS_ext = noExtField |