diff options
| author | David Terei <davidterei@gmail.com> | 2012-08-23 00:29:02 -0700 |
|---|---|---|
| committer | David Terei <davidterei@gmail.com> | 2012-08-23 00:29:02 -0700 |
| commit | 2b5b178f4880b8034ef8c187e6227cfc09edf0d5 (patch) | |
| tree | ae988639cb9b5bea1a5be88df171b34ae889ca71 /ghc/InteractiveUI.hs | |
| parent | f26027ee187c643b74ce19c7719376e6c987d8ae (diff) | |
| download | haskell-2b5b178f4880b8034ef8c187e6227cfc09edf0d5.tar.gz | |
Improve Safe Haskell warn/error output.
Diffstat (limited to 'ghc/InteractiveUI.hs')
| -rw-r--r-- | ghc/InteractiveUI.hs | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs index f3f812a22e..732646681f 100644 --- a/ghc/InteractiveUI.hs +++ b/ghc/InteractiveUI.hs @@ -1761,11 +1761,7 @@ checkAdd ii = do m <- GHC.lookupModule modname pkgqual when safe $ do t <- GHC.isModuleTrusted m - when (not t) $ - ghcError $ CmdLineError $ - "can't import " ++ moduleNameString modname - ++ " as it isn't trusted." - + when (not t) $ ghcError $ ProgramError $ "" -- ----------------------------------------------------------------------------- -- Update the GHC API's view of the context |