1
1
mirror of https://github.com/github/semantic.git synced 2024-12-21 05:41:54 +03:00

Define renderToSymbols using renderPreciseToSymbols.

This commit is contained in:
Rob Rix 2019-10-01 11:59:26 -04:00
parent a43e947104
commit 44b0614c7d
No known key found for this signature in database
GPG Key ID: F188A01508EA1CF7

View File

@ -78,7 +78,7 @@ parseSymbols blobs = do
errorFile e = File blobPath' (bridging # blobLanguage') mempty (V.fromList [ParseError (T.pack e)]) blobOid
renderToSymbols :: IsTaggable f => Term f Loc -> File
renderToSymbols term = tagsToFile (Precise.tags blobSource (ALaCarteTerm (blobLanguage blob) term))
renderToSymbols term = renderPreciseToSymbols (ALaCarteTerm (blobLanguage blob) term)
renderPreciseToSymbols :: Precise.ToTags t => t Loc -> File
renderPreciseToSymbols term = tagsToFile (Precise.tags blobSource term)