use crate::{Environment, eval::apply::eval_apply, value::Value};
pub(crate) fn builtin(args: &[Value], env: &Environment) -> Option<(Value, Environment)> {
let mut local_environment = Environment::new();
if let [val] = &args[..] {
match eval_apply(val, env) {
Some((result, new_env)) => {
local_environment.extend(new_env.clone());
println!("{}", result);
Some((Value::Unit, local_environment))
}
None => {
eprintln!(
concat!(
"Error[ksl::builtin::eval_builtin]: ",
"Cannot evaluate expression {:?}."
),
val
);
None
}
}
} else {
eprintln!(
concat!(
"Error[ksl::builtin::eval_builtin]: ",
"The built-in function `Print` only accepts 1 argument, ",
"but {} were passed."
),
args.len()
);
None
}
}