diff options
Diffstat (limited to 'compiler/ghci/ByteCodeLink.lhs')
| -rw-r--r-- | compiler/ghci/ByteCodeLink.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/ghci/ByteCodeLink.lhs b/compiler/ghci/ByteCodeLink.lhs index 8938bfe4f1..6fcb7f4f66 100644 --- a/compiler/ghci/ByteCodeLink.lhs +++ b/compiler/ghci/ByteCodeLink.lhs @@ -240,7 +240,7 @@ lookupIE dflags ie con_nm linkFail :: String -> String -> IO a linkFail who what - = ghcError (ProgramError $ + = throwGhcException (ProgramError $ unlines [ "",who , "During interactive linking, GHCi couldn't find the following symbol:" , ' ' : ' ' : what |