amvm 0.1.0

Apika's My Virtual Machine. A virtual machine with Intermediate Lenguage
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

use crate::runtime::AmvmResult;
use crate::{AmvmScope, CommandExpression, Value};

pub enum BinaryOpKind {
    Sub,
    Mult,
    Div,
}

pub fn eval(
    scope: &mut AmvmScope,
    kind: BinaryOpKind,
    a: &CommandExpression,
    b: &CommandExpression,
) -> AmvmResult {
    let a = super::eval(scope, a)?;
    let b = super::eval(scope, b)?;

    macro_rules! impl_ops {
        ($a:ident, $b:ident) => {
            match kind {
                BinaryOpKind::Sub => $a - $b,
                BinaryOpKind::Mult => $a * $b,
                BinaryOpKind::Div => $a / $b,
            }
        };
    }

    match (a, b) {
        (Value::U8(a), Value::U8(b)) => Ok(Value::U8(impl_ops!(a, b))),
        (Value::I16(a), Value::I16(b)) => Ok(Value::I16(impl_ops!(a, b))),
        (Value::F32(a), Value::F32(b)) => Ok(Value::F32(impl_ops!(a, b))),

        _ => panic!("Invalid binary operation, should be the same type"),
    }
}