1
1
mirror of https://github.com/github/semantic.git synced 2024-12-22 14:21:31 +03:00

🔥 the old commented-out alignSyntax.

This commit is contained in:
Rob Rix 2016-04-04 15:47:43 -04:00
parent de6696ce50
commit 5ffd45ebe5

View File

@ -205,9 +205,3 @@ applyThese _ _ = Nothing
modifyJoin :: (p a a -> q b b) -> Join p a -> Join q b
modifyJoin f = Join . f . runJoin
-- 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
-- _ -> []
-- where lineRanges = actualLineRanges range source