github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-23 23:11:50 +03:00
Code Issues Projects Releases Wiki Activity

📝 withModules.

Browse Source
This commit is contained in:
Rob Rix 2018-03-21 20:14:16 -04:00
parent a640fa0de3
commit 02dbaf964f
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/Control/Abstract/Analysis.hs
View File

@ -60,6 +60,7 @@ evaluateTerm :: MonadAnalysis term value m => term -> m value
evaluateTerm = foldSubterms analyzeTerm evaluateTerm = foldSubterms analyzeTerm
-- | Run an action with the a list of 'Module's available for imports.
withModules :: MonadAnalysis term value m => [Module term] -> m a -> m a withModules :: MonadAnalysis term value m => [Module term] -> m a -> m a
withModules = localModuleTable . const . ModuleTable.fromList withModules = localModuleTable . const . ModuleTable.fromList