diff options
| author | Ömer Sinan Ağacan <omeragacan@gmail.com> | 2019-10-21 17:31:04 +0300 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2019-10-29 03:47:44 -0400 |
| commit | dcd40c714172c976b9cc1ce5e6c1e0b3a55d968b (patch) | |
| tree | d10b6cbe7772fe56d5a7b19f4377d67842e07b1a | |
| parent | a56433a912c8d666a113ca56aa5f19dec202cdb6 (diff) | |
| download | haskell-dcd40c714172c976b9cc1ce5e6c1e0b3a55d968b.tar.gz | |
HscMain: Move a comment closer to the relevant site
| -rw-r--r-- | compiler/main/HscMain.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/compiler/main/HscMain.hs b/compiler/main/HscMain.hs index 83e3145306..83c69af6f6 100644 --- a/compiler/main/HscMain.hs +++ b/compiler/main/HscMain.hs @@ -815,12 +815,12 @@ finish summary tc_result mb_old_hash = do _ -> panic "finish" return (hsc_status, details) - -- we usually desugar even when we are not generating code, otherwise - -- we would miss errors thrown by the desugaring (see #10600). The only - -- exceptions are when the Module is Ghc.Prim or when - -- it is not a HsSrcFile Module. if should_desugar then do + -- We usually desugar even when we are not generating code, otherwise we + -- would miss errors thrown by the desugaring (see #10600). The only + -- exceptions are when the Module is Ghc.Prim or when it is not a + -- HsSrcFile Module. desugared_guts0 <- hscDesugar' (ms_location summary) tc_result if target == HscNothing -- We are not generating code, so we can skip simplification |