1
1
mirror of https://github.com/github/semantic.git synced 2024-12-23 06:41:45 +03:00

🔥 the intersects function.

This commit is contained in:
Rob Rix 2016-03-24 20:24:15 -04:00
parent 6e2de43c20
commit c5cb7da9b0

View File

@ -147,9 +147,6 @@ modifyJoin f = Join . f . runJoin
bimapJoin :: Bifunctor p => (a -> b) -> (a -> b) -> Join p a -> Join p b
bimapJoin f g = modifyJoin $ bimap f g
intersects :: Range -> Range -> Bool
intersects a b = max (start a) (start b) < min (end a) (end b)
-- alignSyntax :: Source Char -> Range -> Syntax leaf (AlignedDiff leaf) -> [Syntax leaf (SplitDiff leaf Info)]
-- alignSyntax source range syntax = case syntax of
-- Leaf s -> Leaf s <$ lineRanges