Parenthesize forall-type args in cvtTypeKind
authorRyan Scott <ryan.gl.scott@gmail.com>
Mon, 15 Jan 2018 18:51:55 +0000 (13:51 -0500)
committerBen Gamari <ben@smart-cactus.org>
Mon, 15 Jan 2018 19:26:25 +0000 (14:26 -0500)
commitb92fb5150bdc6a0a090ecba2927c14e19005116e
tree3aaa985336c5dfa484fe02d85cf1f9ff78901e3b
parent20afdaa75e269697c2f9608e6d29f720a6387d01
Parenthesize forall-type args in cvtTypeKind

Trac #14646 happened because we forgot to parenthesize `forall` types to
the left of an arrow. This simple patch fixes that.

Test Plan: make test TEST=T14646

Reviewers: alanz, goldfire, bgamari

Reviewed By: alanz

Subscribers: rwbarton, thomie, carter

GHC Trac Issues: #14646

Differential Revision: https://phabricator.haskell.org/D4298

(cherry picked from commit f380115cd834ffbe51aca60f5476a51b94cdd413)
compiler/hsSyn/Convert.hs
testsuite/tests/th/T14646.hs [new file with mode: 0644]
testsuite/tests/th/T14646.stderr [new file with mode: 0644]
testsuite/tests/th/all.T