geam 0.1.1

Experimental Rust-embedded execution runtime for typed Gleam programs
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

use super::super::Value;
use super::write_value;

pub(super) fn write(output: &mut String, values: &[Value]) {
    output.push_str("#(");
    let mut separator = "";
    for value in values {
        output.push_str(separator);
        write_value(output, value);
        separator = ", ";
    }
    output.push(')');
}

#[cfg(test)]
mod tests {
    use super::super::super::Value;

    #[test]
    fn writes_empty_and_recursive_tuples() {
        let cases = [
            (Value::Tuple(Vec::new()), "#()"),
            (
                Value::Tuple(vec![
                    Value::Int(1.into()),
                    Value::Tuple(vec![Value::String("one".into())]),
                ]),
                r#"#(1, #("one"))"#,
            ),
        ];

        for (value, expected) in cases {
            assert_eq!(value.inspect().to_string(), expected);
        }
    }
}