xbasic 0.3.1

A library that allows adding a scripting language onto your project with ease. This lets your users write their own arbitrary logic.
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
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116

mod common;

use xbasic::expr::ExprValue;
use xbasic::xbasic::XBasic;

#[test]
fn wrong_arity() {
	let tio = common::TestIO::new("");
	let mut xb = XBasic::new(tio);
	assert!(xb
		.run(
			"
function a(b)
    print b
end function
    "
		)
		.is_ok());
	assert!(xb.call_function("a", &[]).is_err());
	xb.get_io().check();
}

#[test]
fn no_arguments() {
	let tio = common::TestIO::new("Hello World!\n");
	let mut xb = XBasic::new(tio);
	assert!(xb
		.run(
			"
function a()
    print \"Hello World!\"
end function
    "
		)
		.is_ok());
	assert!(xb.call_function("a", &[]).is_ok());
	xb.get_io().check();
}

#[test]
fn multiple_arguments() {
	let tio = common::TestIO::new("abc 3.4\n");
	let mut xb = XBasic::new(tio);
	assert!(xb
		.run(
			"
function func(a, b)
    print a b
end function
    "
		)
		.is_ok());
	assert!(xb
		.call_function(
			"func",
			&[ExprValue::String("abc".to_owned()), ExprValue::Decimal(3.4)]
		)
		.is_ok());
	xb.get_io().check();
}

#[test]
fn return_value() {
	let tio = common::TestIO::new("");
	let mut xb = XBasic::new(tio);
	assert!(xb
		.run(
			"
function func(a, b)
    return a - b
end function
    "
		)
		.is_ok());
	assert_eq!(
		Ok(ExprValue::Integer(3)),
		xb.call_function("func", &[ExprValue::Integer(5), ExprValue::Integer(2)])
	);
	xb.get_io().check();
}

#[test]
fn multiple_calls() {
	let tio = common::TestIO::new("");
	let mut xb = XBasic::new(tio);
	assert!(xb
		.run(
			"
function func(a, b)
    return a - b
end function
    "
		)
		.is_ok());
	assert_eq!(
		Ok(ExprValue::Integer(3)),
		xb.call_function("func", &[ExprValue::Integer(5), ExprValue::Integer(2)])
	);
	assert_eq!(
		Ok(ExprValue::Integer(4)),
		xb.call_function("func", &[ExprValue::Integer(6), ExprValue::Integer(2)])
	);
	assert_eq!(
		Ok(ExprValue::Integer(5)),
		xb.call_function("func", &[ExprValue::Integer(7), ExprValue::Integer(2)])
	);
	assert_eq!(
		Ok(ExprValue::Integer(-1)),
		xb.call_function("func", &[ExprValue::Integer(5), ExprValue::Integer(6)])
	);
	assert_eq!(
		Ok(ExprValue::Integer(3)),
		xb.call_function("func", &[ExprValue::Integer(6), ExprValue::Integer(3)])
	);
	xb.get_io().check();
}