mirror of
https://github.com/github/semantic.git
synced 2024-11-23 16:37:50 +03:00
parameterize TSX program with Err
This commit is contained in:
parent
00b6a00492
commit
effeebaee1
@ -5,14 +5,15 @@ module Language.TSX
|
||||
, Language.TSX.Grammar.tree_sitter_tsx
|
||||
) where
|
||||
|
||||
import qualified AST.Parse as Parse
|
||||
import qualified AST.Unmarshal as TS
|
||||
import Data.Proxy
|
||||
import qualified Language.TSX.AST as TSX
|
||||
import qualified Language.TSX.Tags as TsxTags
|
||||
import qualified Tags.Tagging.Precise as Tags
|
||||
import qualified Language.TSX.Grammar (tree_sitter_tsx)
|
||||
import qualified AST.Unmarshal as TS
|
||||
|
||||
newtype Term a = Term { getTerm :: TSX.Program a }
|
||||
newtype Term a = Term { getTerm :: TSX.Program Err a }
|
||||
|
||||
instance TS.SymbolMatching Term where
|
||||
matchedSymbols _ = TS.matchedSymbols (Proxy :: Proxy TSX.Program)
|
||||
|
Loading…
Reference in New Issue
Block a user