oak_scheme/lsp/
mod.rs

1#![doc = include_str!("readme.md")]
2#[cfg(feature = "oak-highlight")]
3pub mod highlighter;
4
5#[cfg(feature = "lsp")]
6use {
7    futures::Future,
8    oak_hover::{Hover, HoverProvider},
9    oak_lsp::{service::LanguageService, workspace::WorkspaceManager},
10    oak_vfs::{Vfs, WritableVfs},
11};
12#[cfg(feature = "oak-pretty-print")]
13pub mod formatter;
14use crate::SchemeLanguage;
15use core::range::Range;
16use oak_core::tree::RedNode;
17/// Hover provider implementation for Scheme.
18#[cfg(feature = "lsp")]
19pub struct SchemeHoverProvider;
20#[cfg(feature = "lsp")]
21impl HoverProvider<SchemeLanguage> for SchemeHoverProvider {
22    fn hover(&self, node: &RedNode<SchemeLanguage>, _range: Range<usize>) -> Option<Hover> {
23        let _kind = node.green.kind;
24        // Basic Scheme hover implementation
25        None
26    }
27}
28/// Language service implementation for Scheme.
29#[cfg(feature = "lsp")]
30pub struct SchemeLanguageService<V: Vfs> {
31    vfs: V,
32    workspace: oak_lsp::workspace::WorkspaceManager,
33    hover_provider: SchemeHoverProvider,
34}
35impl<V: Vfs> SchemeLanguageService<V> {
36    /// Creates a new `SchemeLanguageService`.
37    pub fn new(vfs: V) -> Self {
38        Self { vfs, workspace: oak_lsp::workspace::WorkspaceManager::default(), hover_provider: SchemeHoverProvider }
39    }
40}
41impl<V: Vfs + Send + Sync + 'static + oak_vfs::WritableVfs> LanguageService for SchemeLanguageService<V> {
42    type Lang = SchemeLanguage;
43    type Vfs = V;
44    fn vfs(&self) -> &Self::Vfs {
45        &self.vfs
46    }
47    fn workspace(&self) -> &oak_lsp::workspace::WorkspaceManager {
48        &self.workspace
49    }
50    fn get_root(&self, uri: &str) -> impl Future<Output = Option<RedNode<'_, SchemeLanguage>>> + Send + '_ {
51        let _source = self.vfs().get_source(uri);
52        async move {
53            // Placeholder implementation
54            None
55        }
56    }
57    fn hover(&self, uri: &str, range: Range<usize>) -> impl Future<Output = Option<oak_lsp::Hover>> + Send + '_ {
58        let uri = uri.to_string();
59        async move { self.with_root(&uri, |root| self.hover_provider.hover(&root, range).map(|h| oak_lsp::Hover { contents: h.contents, range: h.range })).await.flatten() }
60    }
61}
oak_scheme/lsp/mod.rs

oak_scheme/lsp/
mod.rs
