Wolfgang Jeltsch pushed to branch wip/jeltsch/more-efficient-home-unit-imports-finding at Glasgow Haskell Compiler / GHC
Commits:
-
36e0da1f
by Wolfgang Jeltsch at 2026-04-29T13:17:06+03:00
1 changed file:
Changes:
| ... | ... | @@ -270,16 +270,7 @@ sortHomeUnitsByLikelihoodFor home_module_name_providers_map mod_name hpt_deps = |
| 270 | 270 | cached_module_providers = lookupWithDefaultUniqMap home_module_name_providers_map Set.empty mod_name
|
| 271 | 271 | cached_providing_deps = Set.toList (Set.intersection hpt_deps cached_module_providers)
|
| 272 | 272 | uncached_providing_deps = Set.toList (Set.difference hpt_deps cached_module_providers)
|
| 273 | - |
|
| 274 | - all_deps = cached_providing_deps ++ uncached_providing_deps
|
|
| 275 | - in
|
|
| 276 | - assertPpr
|
|
| 277 | - (hpt_deps == Set.fromList all_deps)
|
|
| 278 | - ( text "Sorting must not remove HomeUnits"
|
|
| 279 | - $$ text "Module:" <+> ppr mod_name
|
|
| 280 | - $$ text "Original:" <+> ppr hpt_deps
|
|
| 281 | - $$ text "Sorted: " <+> ppr (Set.fromList all_deps))
|
|
| 282 | - all_deps
|
|
| 273 | + in cached_providing_deps ++ uncached_providing_deps
|
|
| 283 | 274 | |
| 284 | 275 | -- | Locate a plugin module requested by the user, for a compiler
|
| 285 | 276 | -- plugin. This consults the same set of exposed packages as
|