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

Use the MappedDiff synonym in findNearestNeighboursToDiff.

Browse Source
This commit is contained in:
Rob Rix 2017-09-14 11:06:22 -04:00
parent 7f405662d3
commit bbf9d745d3
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/RWS.hs
View File

@ -124,7 +124,7 @@ findNearestNeighboursToDiff :: (Foldable syntax, Functor syntax, GAlign syntax)
-> [TermOrIndexOrNone (UnmappedTerm syntax ann2)]
-> [UnmappedTerm syntax ann1]
-> [UnmappedTerm syntax ann2]
-> ([(These Int Int, These (Term syntax ann1) (Term syntax ann2))], UnmappedTerms syntax ann1)
-> ([MappedDiff syntax ann1 ann2], UnmappedTerms syntax ann1)
findNearestNeighboursToDiff canCompare allDiffs featureAs featureBs = (diffs, remaining)
where
(diffs, (_, remaining, _)) =