module TreeSitter.QL ( tree_sitter_ql , getNodeTypesPath , getTestCorpusDir ) where import Foreign.Ptr import TreeSitter.Language import Paths_tree_sitter_ql foreign import ccall unsafe "vendor/tree-sitter-ql/src/parser.c tree_sitter_ql" tree_sitter_ql :: Ptr Language getNodeTypesPath :: IO FilePath getNodeTypesPath :: IO FilePath getNodeTypesPath = FilePath -> IO FilePath getDataFileName FilePath "vendor/tree-sitter-ql/src/node-types.json" getTestCorpusDir :: IO FilePath getTestCorpusDir :: IO FilePath getTestCorpusDir = FilePath -> IO FilePath getDataFileName FilePath "vendor/tree-sitter-ql/test/corpus"