scurry 0.5.0

A component-based object-oriented language
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61

use crate::ast::{AstType, TypeAnnotation};
use crate::interpreter::object::*;
use std::cell::RefCell;
use std::rc::Rc;

macro_rules! validate_args_len {
    ($args:expr, $expected:expr, $line:expr) => {
        if $args.len() != $expected {
            return Some(Err(RuntimeError::NotEnoughArgs {
                got: $args.len(),
                want: $expected,
                line: $line,
            }));
        }
    };
}

pub fn keys(bound: Object, args: Vec<Object>, line: usize) -> Option<EvalResult> {
    validate_args_len!(args, 0, line);
    if let Object::Map(obj) = bound {
        Some(Ok(Object::Array(Rc::new(RefCell::new(
            obj.borrow().keys().cloned().collect(),
        )))))
    } else {
        None
    }
}

pub fn values(bound: Object, args: Vec<Object>, line: usize) -> Option<EvalResult> {
    validate_args_len!(args, 0, line);
    if let Object::Map(obj) = bound {
        Some(Ok(Object::Array(Rc::new(RefCell::new(
            obj.borrow().values().cloned().collect(),
        )))))
    } else {
        None
    }
}

pub fn remove(bound: Object, args: Vec<Object>, line: usize) -> Option<EvalResult> {
    validate_args_len!(args, 1, line);
    if let Object::Map(obj) = bound {
        obj.borrow_mut().remove(&args[0]);
        Some(Ok(Object::Nil))
    } else {
        None
    }
}

pub fn merge(bound: Object, args: Vec<Object>, line: usize) -> Option<EvalResult> {
    validate_args_len!(args, 1, line);
    let Object::Map(map) = &args[0] else {
        return Some(Err(RuntimeError::WrongArgType { name: "map".to_owned(), expected: TypeAnnotation::from_iter([AstType::Map]), got: args[0].scurry_type().into(), line }));
    };
    if let Object::Map(obj) = bound {
        obj.borrow_mut().extend(map.borrow().clone());
        Some(Ok(Object::Nil))
    } else {
        None
    }
}