diff options
| -rw-r--r-- | compiler/main/HscMain.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/compiler/main/HscMain.hs b/compiler/main/HscMain.hs index 71f2ce2059..7cbc6e711f 100644 --- a/compiler/main/HscMain.hs +++ b/compiler/main/HscMain.hs @@ -665,9 +665,8 @@ hscIncrementalCompile always_do_basic_recompilation_check m_tc_result hm_iface = iface, hm_linkable = Nothing }) - Right (result, mb_old_hash) -> do - (status, hmi, no_change) <- case result of - FrontendTypecheck tc_result -> + Right (FrontendTypecheck tc_result, mb_old_hash) -> do + (status, hmi, no_change) <- if hscTarget dflags /= HscNothing && ms_hsc_src mod_summary == HsSrcFile then finish hsc_env mod_summary tc_result mb_old_hash |