diff options
Diffstat (limited to 'compiler/deSugar')
| -rw-r--r-- | compiler/deSugar/Desugar.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/compiler/deSugar/Desugar.hs b/compiler/deSugar/Desugar.hs index 75f6a3491b..c7a869d5cd 100644 --- a/compiler/deSugar/Desugar.hs +++ b/compiler/deSugar/Desugar.hs @@ -296,7 +296,10 @@ deSugar hsc_env (text "Desugar"<+>brackets (ppr mod)) (const ()) $ do { -- Desugar the program - ; let export_set = availsToNameSet exports + ; let export_set = + -- Used to be 'availsToNameSet', but we now export selectors + -- only when necessary. See #12125. + availsToNameSetWithSelectors exports target = hscTarget dflags hpcInfo = emptyHpcInfo other_hpc_info |