github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-03 21:16:12 +03:00
Code Issues Projects Releases Wiki Activity

Bring the sumCost function over.

Browse Source
This commit is contained in:
Rob Rix 2015-11-30 16:57:23 -05:00
parent e1cd992155
commit 29475a1ef6
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/SES.hs
View File

@ -35,3 +35,5 @@ diffAt (i, j) cost (a : as) (b : bs) = do
Nothing -> do
put $ Map.insert (i, j) [] cachedDiffs
return []
where
sumCost script = sum $ cost <$> script