oak_ocaml/builder/
mod.rs

1use crate::{ast::OCamlRoot, language::OCamlLanguage, parser::OCamlParser};
2use oak_core::{Builder, BuilderCache, Lexer, OakDiagnostics, Parser, TextEdit, source::Source};
3
4/// A builder for OCaml.
5#[derive(Clone)]
6pub struct OCamlBuilder<'config> {
7    /// The language configuration.
8    pub config: &'config OCamlLanguage,
9}
10
11impl<'config> OCamlBuilder<'config> {
12    /// Creates a new OCaml builder.
13    pub fn new(config: &'config OCamlLanguage) -> Self {
14        Self { config }
15    }
16}
17
18impl<'config> Builder<OCamlLanguage> for OCamlBuilder<'config> {
19    fn build<'a, S: Source + ?Sized>(&self, source: &'a S, edits: &[TextEdit], _cache: &'a mut impl BuilderCache<OCamlLanguage>) -> OakDiagnostics<OCamlRoot> {
20        let parser = OCamlParser::new(self.config);
21        let lexer = crate::lexer::OCamlLexer::new(self.config);
22
23        let mut session = oak_core::parser::session::ParseSession::<OCamlLanguage>::default();
24        lexer.lex(source, edits, &mut session);
25        let parse_result = parser.parse(source, edits, &mut session);
26
27        match parse_result.result {
28            Ok(_green_tree) => {
29                let ast_root = OCamlRoot { items: vec![] };
30                OakDiagnostics { result: Ok(ast_root), diagnostics: parse_result.diagnostics }
31            }
32            Err(parse_error) => OakDiagnostics { result: Err(parse_error), diagnostics: parse_result.diagnostics },
33        }
34    }
35}
oak_ocaml/builder/mod.rs

oak_ocaml/builder/
mod.rs
