25 lines
536 B
Rust
25 lines
536 B
Rust
use cl_interpret::{convalue::ConValue, env::Environment, error::IResult, interpret::Interpret};
|
|
|
|
#[derive(Clone, Debug)]
|
|
pub struct Context {
|
|
pub env: Environment,
|
|
}
|
|
|
|
impl Context {
|
|
pub fn new() -> Self {
|
|
Self { env: Environment::new() }
|
|
}
|
|
pub fn with_env(env: Environment) -> Self {
|
|
Self { env }
|
|
}
|
|
pub fn run(&mut self, code: &impl Interpret) -> IResult<ConValue> {
|
|
code.interpret(&mut self.env)
|
|
}
|
|
}
|
|
|
|
impl Default for Context {
|
|
fn default() -> Self {
|
|
Self::new()
|
|
}
|
|
}
|