use crate::core::{RustValue, Value};
use crate::eval::{ControlFlow, EvalResult, Evaluator};
#[derive(Debug, Clone)]
pub struct EvalLoop {
pub body: Value,
}
#[crate::rust_value_any]
impl RustValue for EvalLoop {
fn dyn_clone(&self) -> Box<dyn RustValue> {
Box::new(self.clone())
}
fn eval(&self, evaluator: &mut Evaluator) -> anyhow::Result<EvalResult> {
loop {
match self.body.eval(evaluator)? {
Ok(_) => continue,
Err(ControlFlow::Break(value)) => return Ok(Ok(value)),
Err(ControlFlow::Continue) => continue,
Err(other) => return Ok(Err(other)),
}
}
}
fn str(&self) -> String {
format!("loop {}", self.body.str())
}
}