gluon 0.18.2

A static, type inferred programming language for application embedding
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

mod support;

use gluon::{
    vm::{
        api::{Hole, OpaqueValue},
        thread::ThreadInternal,
        Error as VMError,
    },
    Error, Thread, ThreadExt,
};

use crate::support::make_vm;

#[test]
fn out_of_memory() {
    let _ = ::env_logger::try_init();

    let vm = make_vm();
    vm.set_memory_limit(10);
    vm.get_database_mut().implicit_prelude(false);

    let expr = " [1, 2, 3, 4] ";
    let result = vm.run_expr::<OpaqueValue<&Thread, Hole>>("example", expr);

    match result {
        // FIXME This should just need to match on the explicit out of memory error
        Err(Error::VM(VMError::OutOfMemory { limit: 10, .. })) => (),
        Err(err) => panic!("Unexpected error `{:?}`", err),
        Ok(_) => panic!("Expected an error"),
    }
}

#[test]
fn stack_overflow() {
    let _ = ::env_logger::try_init();

    let vm = make_vm();
    vm.context().set_max_stack_size(3);
    vm.get_database_mut().implicit_prelude(false);

    let expr = " [1, 2, 3, 4] ";
    let result = vm.run_expr::<OpaqueValue<&Thread, Hole>>("example", expr);

    match result {
        Err(Error::VM(VMError::StackOverflow(3))) => (),
        Err(err) => panic!("Unexpected error `{:?}`", err),
        Ok(_) => panic!("Expected an error"),
    }
}