diff options
Diffstat (limited to 'compiler/GHC/HsToCore/PmCheck.hs')
| -rw-r--r-- | compiler/GHC/HsToCore/PmCheck.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/compiler/GHC/HsToCore/PmCheck.hs b/compiler/GHC/HsToCore/PmCheck.hs index 3891be649d..61278391d0 100644 --- a/compiler/GHC/HsToCore/PmCheck.hs +++ b/compiler/GHC/HsToCore/PmCheck.hs @@ -32,7 +32,7 @@ import GHC.Core (CoreExpr, Expr(Var,App)) import FastString (unpackFS, lengthFS) import GHC.Driver.Session import GHC.Hs -import TcHsSyn +import TcHsSyn ( shortCutLit ) import Id import GHC.Core.ConLike import Name @@ -45,7 +45,7 @@ import GHC.Core.DataCon import GHC.Core.TyCon import Var (EvVar) import GHC.Core.Coercion -import TcEvidence +import TcEvidence ( HsWrapper(..), isIdHsWrapper ) import TcType (evVarPred) import {-# SOURCE #-} GHC.HsToCore.Expr (dsExpr, dsLExpr, dsSyntaxExpr) import {-# SOURCE #-} GHC.HsToCore.Binds (dsHsWrapper) @@ -999,7 +999,7 @@ checkGrdTree guards deltas = do tracePm "checkGrdTree {" $ vcat [ ppr guards , ppr deltas ] res <- checkGrdTree' guards deltas - tracePm "}:" (ppr res) -- braces are easier to match by tooling + tracePm "checkGrdTree }:" (ppr res) -- braces are easier to match by tooling return res -- ---------------------------------------------------------------------------- |