Add tests for series and scoping features

This commit is contained in:
2026-03-27 08:27:40 +01:00
parent cb4162e420
commit 3a757b7551
2 changed files with 90 additions and 0 deletions
+23
View File
@@ -0,0 +1,23 @@
use myc::ast::environment::Environment;
use myc::ast::types::Value;
#[test]
fn test_series_api_with_limit() {
let env = Environment::new();
// (series limit schema)
let source = "(series 100 {:price :float})";
let result = env.compile(source).into_result();
assert!(result.is_ok(), "Series creation with limit should work: {:?}", result.err());
}
#[test]
fn test_record_structural_equality_order() {
let env = Environment::new();
// Known design choice: currently order dependent.
let source = "(= {:a 1 :b 2} {:b 2 :a 1})";
let result = env.run_script(source);
match result {
Ok(Value::Bool(false)) => {},
_ => panic!("Expected false (current implementation behavior)"),
}
}