diff options
author | Alan Zimmerman <alan.zimm@gmail.com> | 2017-01-29 22:35:41 +0200 |
---|---|---|
committer | Alan Zimmerman <alan.zimm@gmail.com> | 2017-02-10 12:42:44 +0200 |
commit | 258c719599f78178c75b58d9c49e10e498cb7c48 (patch) | |
tree | 6bb40e24d6c2886999587c6d83bdaab03d596510 /compiler/hsSyn/HsUtils.hs | |
parent | a5a6c527bed408d8ed43b83a1e9cd69693553779 (diff) | |
download | haskell-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.hs | 2 |
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 |