diff options
| -rw-r--r-- | compiler/rename/RnSource.lhs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/rename/RnSource.lhs b/compiler/rename/RnSource.lhs index 90175c0f91..624c3b60cb 100644 --- a/compiler/rename/RnSource.lhs +++ b/compiler/rename/RnSource.lhs @@ -1475,6 +1475,7 @@ add gp loc (SpliceD splice@(SpliceDecl _ flag)) ds ; return (gp, Just (splice, ds)) } where badImplicitSplice = ptext (sLit "Parse error: naked expression at top level") + $$ ptext (sLit "Perhaps you intended to use TemplateHaskell") add gp _ (QuasiQuoteD qq) ds -- Expand quasiquotes = do { ds' <- runQuasiQuoteDecl qq |