1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

use crate::rail_machine::{RailDef, Stack};

pub fn builtins() -> Vec<RailDef<'static>> {
    vec![
        RailDef::on_stack("type", &["a"], &["string"], |stack| {
            let (thing, stack) = stack.pop();
            stack.push_string(thing.type_name())
        }),
        RailDef::on_state("dict", &[], &["quot"], |state| {
            state.update_stack_and_dict(|stack, dictionary| {
                let mut defs = dictionary.keys().collect::<Vec<_>>();
                defs.sort();
                let quot = defs
                    .iter()
                    .fold(Stack::default(), |stack, def| stack.push_str(def));
                let stack = stack.push_quotation(quot);
                (stack, dictionary)
            })
        }),
    ]
}