mrubyedge 1.1.12

mruby/edge is yet another mruby that is specialized for running on WASM
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

extern crate mec_mrbc_sys;
extern crate mrubyedge;

mod helpers;
use std::rc::Rc;

use helpers::*;
use mrubyedge::yamrb::value::RObject;

#[test]
fn return_test() {
    let code = "
def fib(n)
  return 1 if n <= 1
  fib(n - 1) + fib(n - 2)
end
    ";
    let binary = mrbc_compile("return_fib", code);
    let mut rite = mrubyedge::rite::load(&binary).unwrap();
    let mut vm = mrubyedge::yamrb::vm::VM::open(&mut rite);
    vm.run().unwrap();

    // Assert
    let args = vec![Rc::new(RObject::integer(10))];
    let result = mrb_funcall(&mut vm, None, "fib", &args).unwrap();
    let result: i64 = result.as_ref().try_into().unwrap();
    assert_eq!(result, 89);

    // Assert 2
    let args = vec![Rc::new(RObject::integer(1))];
    let result = mrb_funcall(&mut vm, None, "fib", &args).unwrap();
    let result: i64 = result.as_ref().try_into().unwrap();
    assert_eq!(result, 1);
}

#[test]
fn return_test_toplevel_1() {
    let code = "
def fib(n)
  return 1 if n <= 1
  fib(n - 1) + fib(n - 2)
end

fib(10)
    ";
    let binary = mrbc_compile("return_fib_t1", code);
    let mut rite = mrubyedge::rite::load(&binary).unwrap();
    let mut vm = mrubyedge::yamrb::vm::VM::open(&mut rite);
    let result = vm.run().unwrap();

    let result: i64 = result.as_ref().try_into().unwrap();
    assert_eq!(result, 89);
}

#[test]
fn return_test_toplevel_2() {
    let code = "
def fib(n)
  return 1 if n <= 1
  fib(n - 1) + fib(n - 2)
end

fib(1)
    ";
    let binary = mrbc_compile("return_fib_t2", code);
    let mut rite = mrubyedge::rite::load(&binary).unwrap();
    let mut vm = mrubyedge::yamrb::vm::VM::open(&mut rite);
    let result = vm.run().unwrap();

    let result: i64 = result.as_ref().try_into().unwrap();
    assert_eq!(result, 1);
}