hush 0.1.0

Hush is a unix shell scripting language based on the Lua programming language
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

use gc::{Finalize, Trace};

use super::{
	CallContext,
	Function,
	NativeFun,
	RustFun,
	Panic,
	Value,
};


inventory::submit!{ RustFun::from(Bind) }

#[derive(Trace, Finalize)]
struct Bind;

impl NativeFun for Bind {
	fn name(&self) -> &'static str { "std.bind" }

	fn call(&self, context: CallContext) -> Result<Value, Panic> {
		match context.args() {
			[ obj, Value::Function(fun) ] => Ok(
				BindImpl {
					obj: obj.copy(),
					function: fun.copy(),
				}.into()
			),

			[ _, other ] => Err(Panic::type_error(other.copy(), "function", context.pos)),
			args => Err(Panic::invalid_args(args.len() as u32, 2, context.pos))
		}
	}
}


#[derive(Trace, Finalize)]
struct BindImpl {
	obj: Value,
	function: Function,
}

impl NativeFun for BindImpl {
	fn name(&self) -> &'static str { "std.bind<impl>" }

	fn call(&self, mut context: CallContext) -> Result<Value, Panic> {
		context.call(self.obj.copy(), &self.function, context.args_start)
	}
}