diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2017-06-27 13:36:29 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-06-27 13:36:29 -0400 |
| commit | 22b917eeb1d101cf0b6af2c94826446e4e2f2cdb (patch) | |
| tree | cf842eaf2045f5ae36579b5e64200c61a8fe7b75 /utils/check-ppr | |
| parent | b0708588e87554899c2efc80a2d3eba353dbe926 (diff) | |
| download | haskell-22b917eeb1d101cf0b6af2c94826446e4e2f2cdb.tar.gz | |
Revert "Make module membership on ModuleGraph faster"
I had not intended on merging this.
This reverts commit b0708588e87554899c2efc80a2d3eba353dbe926.
Diffstat (limited to 'utils/check-ppr')
| -rw-r--r-- | utils/check-ppr/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/check-ppr/Main.hs b/utils/check-ppr/Main.hs index 2fd44b2be0..47a95659ff 100644 --- a/utils/check-ppr/Main.hs +++ b/utils/check-ppr/Main.hs @@ -77,7 +77,7 @@ parseOneFile libdir fileName = do _ <- load LoadAllTargets graph <- getModuleGraph let - modSum = case filter modByFile (mgModSummaries graph) of + modSum = case filter modByFile graph of [x] -> x xs -> error $ "Can't find module, got:" ++ show (map (ml_hs_file . ms_location) xs) |