summaryrefslogtreecommitdiff
path: root/compiler/GHC/Hs/Types.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/Hs/Types.hs')
-rw-r--r--compiler/GHC/Hs/Types.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Hs/Types.hs b/compiler/GHC/Hs/Types.hs
index e92928c78f..324b1dd3d2 100644
--- a/compiler/GHC/Hs/Types.hs
+++ b/compiler/GHC/Hs/Types.hs
@@ -1676,7 +1676,7 @@ hsTypeNeedsParens p = go
go (HsExplicitTupleTy{}) = False
go (HsTyLit{}) = False
go (HsWildCardTy{}) = False
- go (HsStarTy{}) = False
+ go (HsStarTy{}) = p >= starPrec
go (HsAppTy{}) = p >= appPrec
go (HsAppKindTy{}) = p >= appPrec
go (HsOpTy{}) = p >= opPrec