mirror of
https://github.com/github/semantic.git
synced 2024-12-24 15:35:14 +03:00
Merge branch 'master' into unified
This commit is contained in:
commit
45de586389
@ -22,5 +22,5 @@ lineByLineParser input = return . root . Indexed $ case foldl' annotateLeaves ([
|
||||
leaf charIndex line = Info (Range charIndex $ charIndex + T.length line) mempty :< Leaf line
|
||||
annotateLeaves (accum, charIndex) line =
|
||||
(accum ++ [ leaf charIndex (toText line) ]
|
||||
, charIndex + length line + 1)
|
||||
, charIndex + length line)
|
||||
toText = T.pack . Source.toString
|
||||
|
Loading…
Reference in New Issue
Block a user