piske 0.1.2

The piske programming langauge for generative art
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

extern crate piske;
extern crate sindra;

use piske::parse::program;
use piske::visitor::{State, SymbolDefineVisitor, TypeComputationVisitor, EvaluateVisitor};
use piske::value::Value;

fn eval(prog: &str) -> Result<Value, String> {
    let node = program(prog).unwrap();
    let mut state = State::default();
    SymbolDefineVisitor::visit(&node, &mut state)?;
    TypeComputationVisitor::visit(&node, &mut state)?;
    EvaluateVisitor::visit(&node, &mut state)
}

#[test]
fn test_eval_assign() {
    let prog = r#"
let a = 4;
a = 3;
a
    "#;
    assert_eq!(eval(prog), Ok(Value::Int(3)));
}

#[test]
fn test_eval_add() {
    let prog = r#"
let a = 4;
a = a + 3;
a
    "#;
    assert_eq!(eval(prog), Ok(Value::Int(7)));
}


#[test]
fn test_eval_add_mixed() {
    let prog = r#"4 + 3.4"#;
    assert_eq!(eval(prog), Ok(Value::Float(7.4)));
}

#[test]
fn test_eval_raise() {
    let prog = r#"2^3"#;
    assert_eq!(eval(prog), Ok(Value::Float(8.0)));
}

#[test]
fn test_eval_divide() {
    let prog = r#"7 / 2"#;
    assert_eq!(eval(prog), Ok(Value::Int(3)));

    let prog = r#"7.0 / 2"#;
    assert_eq!(eval(prog), Ok(Value::Float(3.5)));
}

#[test]
fn test_eval_conjugate() {
    let prog = r#"7`"#;
    assert_eq!(eval(prog), Ok(Value::Float(1.0 / 7.0)));

    let prog = r#"7.0`"#;
    assert_eq!(eval(prog), Ok(Value::Float(1.0 / 7.0)));
}

#[test]
fn test_string() {
    let prog = r#""hello""#;
    assert_eq!(eval(prog), Ok(Value::String("hello".to_string())));

    let prog = r#"let a = "hello"; a"#;
    assert_eq!(eval(prog), Ok(Value::String("hello".to_string())));
}