diff options
| author | Bartosz Nitka <niteria@gmail.com> | 2017-05-15 04:21:52 -0700 |
|---|---|---|
| committer | Bartosz Nitka <niteria@gmail.com> | 2017-05-15 04:21:52 -0700 |
| commit | 06ad87ef0cc77af05693916decbed72a54906e3f (patch) | |
| tree | a68172e5037cf810c3e1a196db8e36a43fc3aa7b /compiler/deSugar/DsUsage.hs | |
| parent | e527fc2e90958280a36645b6bd0223861cc50a55 (diff) | |
| download | haskell-06ad87ef0cc77af05693916decbed72a54906e3f.tar.gz | |
Revert "Stress test for nested module hierarchies"
This reverts commit e527fc2e90958280a36645b6bd0223861cc50a55.
I merged more than I intended in e527fc2e, I will merge
D3575 and D3577 separately.
Diffstat (limited to 'compiler/deSugar/DsUsage.hs')
| -rw-r--r-- | compiler/deSugar/DsUsage.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/deSugar/DsUsage.hs b/compiler/deSugar/DsUsage.hs index 8158a8e122..25d8254f55 100644 --- a/compiler/deSugar/DsUsage.hs +++ b/compiler/deSugar/DsUsage.hs @@ -16,7 +16,7 @@ import Module import Outputable import Util import UniqSet -import UniqFM +import UniqDFM import Fingerprint import Maybes @@ -37,7 +37,7 @@ mkDependencies = do -- Template Haskell used? th_used <- readIORef th_var - let dep_mods = modDepsElts (delFromUFM (imp_dep_mods imports) + let dep_mods = eltsUDFM (delFromUDFM (imp_dep_mods imports) (moduleName mod)) -- M.hi-boot can be in the imp_dep_mods, but we must remove -- it before recording the modules on which this one depends! |