diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2016-11-13 23:03:49 +0200 |
|---|---|---|
| committer | Alan Zimmerman <alan.zimm@gmail.com> | 2016-11-13 23:03:49 +0200 |
| commit | c1fe13d3232224031f666a1157a957fc1835c987 (patch) | |
| tree | 87faff3288f54a971070511a2ef8e56df9c864e6 /compiler/parser/Parser.y | |
| parent | 379da5809e8b2d6019b68340f61b326a49b58b24 (diff) | |
| download | haskell-wip/T3384.tar.gz | |
Adding parens into generically generated codewip/T3384
And some other bits
Diffstat (limited to 'compiler/parser/Parser.y')
| -rw-r--r-- | compiler/parser/Parser.y | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/parser/Parser.y b/compiler/parser/Parser.y index 2c90086c56..e950b09d27 100644 --- a/compiler/parser/Parser.y +++ b/compiler/parser/Parser.y @@ -1444,11 +1444,11 @@ binds :: { Located ([AddAnn],Located (HsLocalBinds RdrName)) } ,sL1 $1 $ HsValBinds val_binds)) } } | '{' dbinds '}' { sLL $1 $> ([moc $1,mcc $3] - ,sL1 $2 $ HsIPBinds (IPBinds (unLoc $2) + ,sL1 $2 $ HsIPBinds (IPBinds (reverse $ unLoc $2) emptyTcEvBinds)) } | vocurly dbinds close { L (getLoc $2) ([] - ,sL1 $2 $ HsIPBinds (IPBinds (unLoc $2) + ,sL1 $2 $ HsIPBinds (IPBinds (reverse $ unLoc $2) emptyTcEvBinds)) } |