summaryrefslogtreecommitdiff
path: root/compiler/hsSyn/HsUtils.hs
diff options
context:
space:
mode:
authorAlan Zimmerman <alan.zimm@gmail.com>2017-01-29 22:35:41 +0200
committerAlan Zimmerman <alan.zimm@gmail.com>2017-02-10 12:42:44 +0200
commit258c719599f78178c75b58d9c49e10e498cb7c48 (patch)
tree6bb40e24d6c2886999587c6d83bdaab03d596510 /compiler/hsSyn/HsUtils.hs
parenta5a6c527bed408d8ed43b83a1e9cd69693553779 (diff)
downloadhaskell-258c719599f78178c75b58d9c49e10e498cb7c48.tar.gz
TH-spliced class instances are pretty-printed incorrectly post-#3384
Summary: The HsSyn prettyprinter tests patch 499e43824bda967546ebf95ee33ec1f84a114a7c broke the pretty-printing of Template Haskell-spliced class instances. Test Plan: ./validate Reviewers: RyanGlScott, austin, goldfire, bgamari Reviewed By: RyanGlScott, bgamari Subscribers: thomie Differential Revision: https://phabricator.haskell.org/D3043
Diffstat (limited to 'compiler/hsSyn/HsUtils.hs')
-rw-r--r--compiler/hsSyn/HsUtils.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/hsSyn/HsUtils.hs b/compiler/hsSyn/HsUtils.hs
index 58948cc862..8001a15d8d 100644
--- a/compiler/hsSyn/HsUtils.hs
+++ b/compiler/hsSyn/HsUtils.hs
@@ -384,7 +384,7 @@ nlLitPat :: HsLit -> LPat id
nlLitPat l = noLoc (LitPat l)
nlHsApp :: LHsExpr id -> LHsExpr id -> LHsExpr id
-nlHsApp f x = noLoc (HsApp f x)
+nlHsApp f x = noLoc (HsApp f (mkLHsPar x))
nlHsSyntaxApps :: SyntaxExpr id -> [LHsExpr id] -> LHsExpr id
nlHsSyntaxApps (SyntaxExpr { syn_expr = fun