tree_sitter_haskell/
lib.rs

1//! This crate provides Haskell language support for the [tree-sitter][] parsing library.
2//!
3//! Typically, you will use the [language][language func] function to add this language to a
4//! tree-sitter [Parser][], and then use the parser to parse some code:
5//!
6//! ```
7//! use tree_sitter::Parser;
8//!
9//! let code = r#"
10//! main = putStrLn "Hello World!"
11//! "#;
12//! let mut parser = Parser::new();
13//! let language = tree_sitter_haskell::LANGUAGE;
14//! parser
15//!     .set_language(&language.into())
16//!     .expect("Error loading Haskell parser");
17//! let tree = parser.parse(code, None).unwrap();
18//! assert!(!tree.root_node().has_error());
19//! ```
20//!
21//! [Language]: https://docs.rs/tree-sitter/*/tree_sitter/struct.Language.html
22//! [language func]: fn.language.html
23//! [Parser]: https://docs.rs/tree-sitter/*/tree_sitter/struct.Parser.html
24//! [tree-sitter]: https://tree-sitter.github.io/
25
26use tree_sitter_language::LanguageFn;
27
28extern "C" {
29    fn tree_sitter_haskell() -> *const ();
30}
31
32/// The tree-sitter [`LanguageFn`] for this grammar.
33pub const LANGUAGE: LanguageFn = unsafe { LanguageFn::from_raw(tree_sitter_haskell) };
34
35/// The content of the [`node-types.json`][] file for this grammar.
36///
37/// [`node-types.json`]: https://tree-sitter.github.io/tree-sitter/using-parsers#static-node-types
38pub const NODE_TYPES: &str = include_str!("../../src/node-types.json");
39
40/// The syntax highlighting query for this language.
41pub const HIGHLIGHTS_QUERY: &str = include_str!("../../queries/highlights.scm");
42
43/// The syntax highlighting query for languages injected into this one.
44pub const INJECTIONS_QUERY: &str = include_str!("../../queries/injections.scm");
45
46/// The local-variable syntax highlighting query for this language.
47pub const LOCALS_QUERY: &str = include_str!("../../queries/locals.scm");
48
49#[cfg(test)]
50mod tests {
51    #[test]
52    fn test_can_load_grammar() {
53        let mut parser = tree_sitter::Parser::new();
54        parser
55            .set_language(&super::LANGUAGE.into())
56            .expect("Error loading Haskell parser");
57    }
58}
tree_sitter_haskell/lib.rs

tree_sitter_haskell/
lib.rs
