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
|
use std::io::{stdin, BufRead};
use crate::native::{self, NativeFunction, NativeFunctionResult};
use crate::value::{Object, ObjectType, Primitive};
use crate::VM;
fn write(vm: &mut VM, args: &[Primitive]) -> NativeFunctionResult {
let Some(Primitive::Object(ptr)) = args.get(0).cloned() else {
return Err(native::Error::InvalidArgument);
};
let object = vm
.objects()
.get(ptr as usize)
.ok_or(native::Error::InvalidArgument)?;
let ObjectType::String(str) = &object.typ else {
return Err(native::Error::InvalidArgument);
};
println!("{str}");
Ok(Primitive::Empty)
}
pub const WRITE_FUNCTION: NativeFunction = NativeFunction {
name: "write",
function: write,
arity: 1,
returns_value: false,
};
fn read(vm: &mut VM, _args: &[Primitive]) -> NativeFunctionResult {
let mut line = String::new();
stdin()
.lock()
.read_line(&mut line)
.map_err(|it| native::Error::Unknown(it.to_string()))?;
let object = Object::new(ObjectType::String(line));
let ptr = vm.objects_mut().allocate(object);
Ok(Primitive::Object(ptr as u32))
}
pub const READ_FUNCTION: NativeFunction = NativeFunction {
name: "read",
function: read,
arity: 0,
returns_value: true,
};
|
