Skip to main content

oak_fortran/language/
mod.rs

1use oak_core::{Language, LanguageCategory};
2use serde::{Deserialize, Serialize};
3
4/// Fortran 语言配置
5#[derive(Debug, Clone, Copy, PartialEq, Eq, Hash, Serialize, Deserialize)]
6pub struct FortranLanguage {
7    /// 是否启用 Fortran 2008
8    pub fortran_2008: bool,
9    /// 是否启用 Fortran 2018
10    pub fortran_2018: bool,
11    /// 是否启用固定格式(Fortran 77 风格)
12    pub fixed_format: bool,
13    /// 是否启用 OpenMP 支持
14    pub openmp: bool,
15    /// 是否启用 Coarray 支持
16    pub coarray: bool,
17}
18
19impl FortranLanguage {
20    /// 创建新的 Fortran 语言实例
21    pub fn new() -> Self {
22        Self::default()
23    }
24}
25
26impl Default for FortranLanguage {
27    fn default() -> Self {
28        Self { fortran_2008: true, fortran_2018: false, fixed_format: false, openmp: false, coarray: false }
29    }
30}
31
32impl Language for FortranLanguage {
33    const NAME: &'static str = "fortran";
34    const CATEGORY: LanguageCategory = LanguageCategory::Programming;
35
36    type TokenType = crate::kind::FortranSyntaxKind;
37    type ElementType = crate::kind::FortranSyntaxKind;
38    type TypedRoot = ();
39}