summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEdward Z. Yang <ezyang@cs.stanford.edu>2014-11-04 13:05:13 -0800
committerEdward Z. Yang <ezyang@cs.stanford.edu>2014-11-07 13:43:30 -0800
commitf5996d9106f5b6b12e52ad93256233fc1cc459c9 (patch)
tree4744b0cf52e0cd507a0876fe52824e7adf82c777
parentc942688917e385c02b73811083f647329785f752 (diff)
downloadhaskell-f5996d9106f5b6b12e52ad93256233fc1cc459c9.tar.gz
Top-level comment for keepPackageImports.
Signed-off-by: Edward Z. Yang <ezyang@cs.stanford.edu>
-rw-r--r--ghc/InteractiveUI.hs5
1 files changed, 4 insertions, 1 deletions
diff --git a/ghc/InteractiveUI.hs b/ghc/InteractiveUI.hs
index ed4ea7bdfd..e6d1529686 100644
--- a/ghc/InteractiveUI.hs
+++ b/ghc/InteractiveUI.hs
@@ -1469,7 +1469,10 @@ setContextKeepingPackageModules keep_ctx trans_ctx = do
transient_ctx = filterSubsumed new_rem_ctx trans_ctx }
setGHCContextFromGHCiState
-
+-- | Filters a list of 'InteractiveImport', clearing out any home package
+-- imports so only imports from external packages are preserved. ('IIModule'
+-- counts as a home package import, because we are only able to bring a
+-- full top-level into scope when the source is available.)
keepPackageImports :: [InteractiveImport] -> GHCi [InteractiveImport]
keepPackageImports = filterM is_pkg_import
where