diff options
Diffstat (limited to 'compiler/GHC.hs')
| -rw-r--r-- | compiler/GHC.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/GHC.hs b/compiler/GHC.hs index 60b7a3e639..f52dc5b657 100644 --- a/compiler/GHC.hs +++ b/compiler/GHC.hs @@ -301,6 +301,7 @@ import GHC.Platform.Ways import GHC.Driver.Phases ( Phase(..), isHaskellSrcFilename , isSourceFilename, startPhase ) import GHC.Driver.Env +import GHC.Driver.Errors import GHC.Driver.CmdLine import GHC.Driver.Session hiding (WarnReason(..)) import GHC.Driver.Backend @@ -889,7 +890,7 @@ checkNewInteractiveDynFlags dflags0 = do -- the REPL. See #12356. if xopt LangExt.StaticPointers dflags0 then do liftIO $ printOrThrowWarnings dflags0 $ listToBag - [mkPlainWarnMsg dflags0 interactiveSrcSpan + [mkPlainWarnMsg interactiveSrcSpan $ text "StaticPointers is not supported in GHCi interactive expressions."] return $ xopt_unset dflags0 LangExt.StaticPointers else return dflags0 |