1
1
mirror of https://github.com/github/semantic.git synced 2024-12-18 20:31:55 +03:00

whitespace

This commit is contained in:
joshvera 2016-09-15 16:50:44 -04:00
parent c7eeb1e075
commit 3960697916

View File

@ -89,7 +89,6 @@ rws compare as bs
(as, bs, succ counterA, succ counterB, diffs <> pure (These counterA counterB, diff'), allDiffs <> pure (Index counterA))
) ([], [], 0, 0, [], []) sesDiffs
findNearestNeighbourToDiff :: TermOrIndexOrNil (UnmappedTerm f fields) -> State (Int, UnmappedTerms f fields, UnmappedTerms f fields) (Maybe (These Int Int, Free (CofreeF f (Both (Record fields))) (Patch (Cofree f (Record fields)))))
findNearestNeighbourToDiff termThing = case termThing of
Nil -> pure Nothing
@ -99,7 +98,6 @@ rws compare as bs
put (i, unA, unB)
pure Nothing
kdas = KdTree.build (Vector.toList . feature) fas
kdbs = KdTree.build (Vector.toList . feature) fbs