42 lines
1.3 KiB
Rust
42 lines
1.3 KiB
Rust
mod var_lib_tests {
|
|
use relish::ast::{eval, lex, SymTable, Ctr};
|
|
use relish::stdlib::{static_stdlib, dynamic_stdlib};
|
|
|
|
#[test]
|
|
fn test_variable_export_and_lookup() {
|
|
let doc1 = "(def test 1)";
|
|
let doc2 = "(test)";
|
|
let result = "(1)";
|
|
|
|
let mut syms = SymTable::new();
|
|
static_stdlib(&mut syms).unwrap();
|
|
dynamic_stdlib(false, &mut syms).unwrap();
|
|
|
|
if let Ok(tree) = lex(&doc1.to_string()) {
|
|
let eval_result = *eval(&tree, &mut syms).unwrap();
|
|
if let Ctr::None = eval_result {
|
|
// pass
|
|
} else {
|
|
eprintln!("bad: {eval_result}");
|
|
assert!(false);
|
|
}
|
|
} else {
|
|
eprintln!("couldn't lex doc1");
|
|
assert!(false);
|
|
}
|
|
|
|
if let Ok(tree) = lex(&doc2.to_string()) {
|
|
println!("tree: {tree}");
|
|
let eval_result = *eval(&tree, &mut syms).unwrap();
|
|
if let Ctr::Seg(ref i) = eval_result {
|
|
assert_eq!(i.to_string(), result);
|
|
} else {
|
|
eprintln!("bad: {eval_result}");
|
|
assert!(false);
|
|
}
|
|
} else {
|
|
eprintln!("couldn't lex doc2");
|
|
assert!(false);
|
|
}
|
|
}
|
|
}
|