wander 0.5.0

The Wander scripting 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
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76

// This Source Code Form is subject to the terms of the Mozilla Public
// License, v. 2.0. If a copy of the MPL was not distributed with this
// file, You can obtain one at http://mozilla.org/MPL/2.0/.

use wander::{preludes::common, run, NoHostType, WanderValue};

#[test]
fn basic_let() {
    let input = "let val x = 5 in x end";
    let res = run(input, &mut common::<NoHostType>()).unwrap();
    let expected = WanderValue::Int(5);
    assert_eq!(res, expected);
}

#[test]
fn basic_let_multiple_vals() {
    let input = "let val x = true val y = Bool.and x in y x end";
    let res = run(input, &mut common::<NoHostType>()).unwrap();
    let expected = WanderValue::Bool(true);
    assert_eq!(res, expected);
}

#[test]
fn nested_lets() {
    let input = r#"
        let
          val x = true
          val y =
              let
                val y1 = x
              in
                y1
              end
        in
          y
        end"#;
    let res = run(input, &mut common::<NoHostType>()).unwrap();
    let expected = WanderValue::Bool(true);
    assert_eq!(res, expected);
}

#[test]
fn lets_with_function_calls_in_decl() {
    let input = r#"
        let
            val x = true
            val y = Bool.and x false
        in
            y
        end
    "#;
    let res = run(input, &mut common::<NoHostType>()).unwrap();
    let expected = WanderValue::Bool(false);
    assert_eq!(res, expected);
}

#[test]
fn nested_lets_with_function_calls() {
    let input = r#"
        let
          val x = true
          val y =
              let
                val x = true
                val y = Bool.and x false
              in
                y
              end
        in
          y
        end
        "#;
    let res = run(input, &mut common::<NoHostType>()).unwrap();
    let expected = WanderValue::Bool(false);
    assert_eq!(res, expected);
}