summaryrefslogtreecommitdiff
path: root/compiler
diff options
context:
space:
mode:
authorKrzysztof Gogolewski <krzysztof.gogolewski@tweag.io>2021-07-23 18:21:55 +0200
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-07-27 12:03:35 -0400
commitcca08c2ca27881a94e875656fee882b9bf99d145 (patch)
treef7a861e0034ad5187590b38205a7fd44ec49bcf0 /compiler
parent9bf8d53012be8a36525e0917c67dc4b3deb033ee (diff)
downloadhaskell-cca08c2ca27881a94e875656fee882b9bf99d145.tar.gz
Parser: suggest TemplateHaskell on $$(...) (#20157)
Diffstat (limited to 'compiler')
-rw-r--r--compiler/GHC/Parser/Errors/Ppr.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/GHC/Parser/Errors/Ppr.hs b/compiler/GHC/Parser/Errors/Ppr.hs
index 2cc8b4a113..2a238190c9 100644
--- a/compiler/GHC/Parser/Errors/Ppr.hs
+++ b/compiler/GHC/Parser/Errors/Ppr.hs
@@ -601,6 +601,7 @@ instance Diagnostic PsMessage where
PsErrParse token PsErrParseDetails{..} -> case token of
"" -> []
"$" | not ped_th_enabled -> [suggestExtension LangExt.TemplateHaskell] -- #7396
+ "$$" | not ped_th_enabled -> [suggestExtension LangExt.TemplateHaskell] -- #20157
"<-" | ped_mdo_in_last_100 -> [suggestExtension LangExt.RecursiveDo]
| otherwise -> [SuggestMissingDo]
"=" | ped_do_in_last_100 -> [SuggestLetInDo] -- #15849