geam 0.1.1

Experimental Rust-embedded execution runtime for typed Gleam programs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55

use std::marker::PhantomData;

#[derive(Debug, Clone, PartialEq, Eq)]
pub(crate) struct FunctionReference {
    instantiation: super::FunctionInstantiation,
}

#[derive(Debug, Clone, PartialEq, Eq)]
pub(crate) struct TypedFunctionReference<Function> {
    instantiation: super::FunctionInstantiation,
    family: PhantomData<Function>,
}

pub(crate) type GenericFunctionReference = TypedFunctionReference<super::GenericExpr>;
pub(crate) type IntFunctionReference = TypedFunctionReference<super::IntExpr>;
pub(crate) type FloatFunctionReference = TypedFunctionReference<super::FloatExpr>;
pub(crate) type StringFunctionReference = TypedFunctionReference<super::StringExpr>;
pub(crate) type BitArrayFunctionReference = TypedFunctionReference<super::BitArrayExpr>;
pub(crate) type UtfCodepointFunctionReference = TypedFunctionReference<super::UtfCodepointExpr>;
pub(crate) type CustomFunctionReference = TypedFunctionReference<super::CustomExpr>;
pub(crate) type ExternalFunctionReference = TypedFunctionReference<super::ExternalExpr>;
pub(crate) type BoolFunctionReference = TypedFunctionReference<super::BoolExpr>;
pub(crate) type NilFunctionReference = TypedFunctionReference<super::NilExpr>;
pub(crate) type TupleFunctionReference = TypedFunctionReference<super::TupleExpr>;
pub(crate) type ListFunctionReference = TypedFunctionReference<super::ListExpr>;
pub(crate) type FunctionFunctionReference = TypedFunctionReference<super::FunctionExpr>;

impl FunctionReference {
    pub(crate) fn new(instantiation: super::FunctionInstantiation) -> Self {
        Self { instantiation }
    }

    pub(crate) fn into_instantiation(self) -> super::FunctionInstantiation {
        self.instantiation
    }

    pub(crate) fn substitute(&self, substitution: &super::TypeSubstitution) -> Self {
        Self {
            instantiation: self.instantiation.substitute(substitution),
        }
    }
}

impl<Function> TypedFunctionReference<Function> {
    pub(crate) fn new(instantiation: super::FunctionInstantiation) -> Self {
        Self {
            instantiation,
            family: PhantomData,
        }
    }

    pub(crate) fn instantiation(&self) -> &super::FunctionInstantiation {
        &self.instantiation
    }
}