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

Run the analysis directly in Util.

Browse Source
This commit is contained in:
Rob Rix 2018-03-21 19:45:47 -04:00
parent ba73ae1eaa
commit 21ee656538
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Semantic/Util.hs
View File

@ -65,7 +65,7 @@ evaluateFile :: forall term effects
=> Parser term
-> FilePath
-> IO (Final effects Value)
evaluateFile parser path = evaluate . snd <$> parseFile parser path
evaluateFile parser path = runAnalysis @(Evaluating term Value) . evaluateModule . snd <$> parseFile parser path
-- Evaluate a list of files (head of file list is considered the entry point).
evaluateFiles :: forall term effects