oak_perl/builder/
mod.rs

1use crate::{ast::PerlRoot, language::PerlLanguage, parser::PerlParser};
2use oak_core::{Builder, BuilderCache, OakDiagnostics, Parser, Source, SourceText, TextEdit, parser::session::ParseSession};
3
4pub struct PerlBuilder<'config> {
5    config: &'config PerlLanguage,
6}
7
8impl<'config> PerlBuilder<'config> {
9    pub fn new(config: &'config PerlLanguage) -> Self {
10        Self { config }
11    }
12}
13
14impl<'config> Builder<PerlLanguage> for PerlBuilder<'config> {
15    fn build<'a, S: Source + ?Sized>(&self, source: &S, edits: &[TextEdit], _cache: &'a mut impl BuilderCache<PerlLanguage>) -> OakDiagnostics<PerlRoot> {
16        let parser = PerlParser::new(self.config);
17
18        let mut parse_cache = ParseSession::<PerlLanguage>::default();
19        let parse_result = parser.parse(source, edits, &mut parse_cache);
20
21        match parse_result.result {
22            Ok(_green_tree) => {
23                let _source_text = SourceText::new(source.get_text_in((0..source.length()).into()).into_owned());
24                // Placeholder implementation
25                let ast_root = PerlRoot { items: Vec::new() };
26                OakDiagnostics { result: Ok(ast_root), diagnostics: parse_result.diagnostics }
27            }
28            Err(e) => OakDiagnostics { result: Err(e), diagnostics: parse_result.diagnostics },
29        }
30    }
31}
oak_perl/builder/mod.rs

oak_perl/builder/
mod.rs
