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

Factor justEvaluating into evaluateProject.

Browse Source
This commit is contained in:
Rob Rix 2019-10-23 11:38:10 -04:00
parent 2dffafa12f
commit d6d16c1c0d
No known key found for this signature in database
GPG Key ID: F188A01508EA1CF7
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
bench/Evaluation.hs
View File

@ -58,11 +58,11 @@ callGraphProject' session proxy parser path = fmap (first show) . runTask sessio
callGraphProject proxy parser paths = withOptions defaultOptions $ \ config logger statter ->
callGraphProject' (TaskSession config "" False logger statter) proxy parser paths
evalRubyProject = justEvaluating <=< evaluateProject (Proxy @'Language.Ruby) rubyParser
evalPythonProject = justEvaluating <=< evaluateProject (Proxy @'Language.Python) pythonParser
evalRubyProject = evaluateProject (Proxy @'Language.Ruby) rubyParser
evalPythonProject = evaluateProject (Proxy @'Language.Python) pythonParser
evaluateProject proxy parser path = withOptions defaultOptions $ \ config logger statter ->
evaluateProject' (TaskSession config "" False logger statter) proxy parser [Path.toString path]
justEvaluating =<< evaluateProject' (TaskSession config "" False logger statter) proxy parser [Path.toString path]
pyEval :: Path.RelFile -> Benchmarkable
pyEval p = nfIO $ () <$ evalPythonProject (Path.relDir "bench/bench-fixtures/python" </> p)