github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-22 22:31:36 +03:00
Code Issues Projects Releases Wiki Activity

🔥 the old commented-out alignSyntax.

Browse Source
This commit is contained in:
Rob Rix 2016-04-04 15:47:43 -04:00
parent de6696ce50
commit 5ffd45ebe5
1 changed files with 0 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Alignment.hs
View File

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