github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-02 12:23:08 +03:00
Code Issues Projects Releases Wiki Activity

Bump haskell-tree-sitter.

Browse Source
This commit is contained in:
Rob Rix 2017-03-28 09:45:19 -04:00
parent 7438874a59
commit e1c914d90a
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/TreeSitter.hs
View File

@ -75,7 +75,7 @@ nodeRange Node{..} = Range (fromIntegral nodeStartByte) (fromIntegral nodeEndByt
nodeSpan :: Node -> SourceSpan
nodeSpan Node{..} = nodeStartPoint `seq` nodeEndPoint `seq` SourceSpan (pointPos nodeStartPoint) (pointPos nodeEndPoint)
where pointPos Point{..} = pointRow `seq` pointColumn `seq` SourcePos (1 + fromIntegral pointRow) (1 + fromIntegral pointColumn)
where pointPos TSPoint{..} = pointRow `seq` pointColumn `seq` SourcePos (1 + fromIntegral pointRow) (1 + fromIntegral pointColumn)
assignTerm :: Language -> Source -> Record '[Range, Category, SourceSpan] -> [ SyntaxTerm Text '[ Range, Category, SourceSpan ] ] -> IO [ SyntaxTerm Text '[ Range, Category, SourceSpan ] ] -> IO (SyntaxTerm Text '[ Range, Category, SourceSpan ])
assignTerm language source annotation children allChildren =

2
vendor/haskell-tree-sitter vendored

@ -1 +1 @@
Subproject commit f66e366dd7db349bd980428918072ce36bd70de6
Subproject commit 7012b85f0df0c2fb69d3b882ad986a373fcce7c6