diff options
| author | Lennart Spitzner <lsp@informatik.uni-kiel.de> | 2017-05-10 16:47:19 +0200 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-05-12 18:26:51 -0400 |
| commit | 1edee7a8b5ca24156cb6e21bde6d611a0ba63882 (patch) | |
| tree | 54c39fc3958800eac6486c6819b748b59c6cc2c2 /ghc | |
| parent | ab91daf2cb8a4a8558727ebe30a662a2ddf290e1 (diff) | |
| download | haskell-1edee7a8b5ca24156cb6e21bde6d611a0ba63882.tar.gz | |
Fix crash in isModuleInterpreted for HsBoot (fixes #13591)
Rename isModuleInterpreted to moduleIsBootOrNotObjectLinkable
because a) there already is a moduleIsInterpreted function in
the same module b) I have no idea if the (new) semantic of
the bool returned matches some understanding of
"is interpreted".
Diffstat (limited to 'ghc')
| -rw-r--r-- | ghc/GHCi/UI.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/GHCi/UI.hs b/ghc/GHCi/UI.hs index 52a809ea3d..6954002645 100644 --- a/ghc/GHCi/UI.hs +++ b/ghc/GHCi/UI.hs @@ -1801,7 +1801,7 @@ modulesLoadedMsg ok mods = do dflags <- getDynFlags unqual <- GHC.getPrintUnqual let mod_name mod = do - is_interpreted <- GHC.isModuleInterpreted mod + is_interpreted <- GHC.moduleIsBootOrNotObjectLinkable mod return $ if is_interpreted then ppr (GHC.ms_mod mod) else ppr (GHC.ms_mod mod) |