|
| 1 | +use crate::ast::binop::*; |
| 2 | +use crate::value::*; |
| 3 | +use crate::vm::*; |
| 4 | + |
| 5 | +impl<'a> VM<'a> { |
| 6 | + pub(crate) fn compute_values(&mut self, left: Value, right: Value, op: AstBinopOp) -> Value { |
| 7 | + match op { |
| 8 | + AstBinopOp::PLUS => { |
| 9 | + if let Value::Number(left_num) = left { |
| 10 | + if let Value::Number(right_num) = right { |
| 11 | + return Value::Number(left_num + right_num); |
| 12 | + } |
| 13 | + } |
| 14 | + } |
| 15 | + AstBinopOp::MINUS => { |
| 16 | + if let Value::Number(left_num) = left { |
| 17 | + if let Value::Number(right_num) = right { |
| 18 | + return Value::Number(left_num - right_num); |
| 19 | + } |
| 20 | + } |
| 21 | + } |
| 22 | + AstBinopOp::MUL => { |
| 23 | + if let Value::Number(left_num) = left { |
| 24 | + if let Value::Number(right_num) = right { |
| 25 | + return Value::Number(left_num * right_num); |
| 26 | + } |
| 27 | + } |
| 28 | + } |
| 29 | + AstBinopOp::DIV => { |
| 30 | + if let Value::Number(left_num) = left { |
| 31 | + if let Value::Number(right_num) = right { |
| 32 | + if right_num == 0.0 { |
| 33 | + self.error = "division by 0".into(); |
| 34 | + return Value::Null(); |
| 35 | + } |
| 36 | + return Value::Number(left_num / right_num); |
| 37 | + } |
| 38 | + } |
| 39 | + } |
| 40 | + AstBinopOp::BITSHR => { |
| 41 | + if let Value::Number(left_num) = left { |
| 42 | + if let Value::Number(right_num) = right { |
| 43 | + return Value::Number(((left_num as i64) >> (right_num as i64)) as f64); |
| 44 | + } |
| 45 | + } |
| 46 | + } |
| 47 | + AstBinopOp::BITSHL => { |
| 48 | + if let Value::Number(left_num) = left { |
| 49 | + if let Value::Number(right_num) = right { |
| 50 | + return Value::Number(((left_num as i64) << (right_num as i64)) as f64); |
| 51 | + } |
| 52 | + } |
| 53 | + } |
| 54 | + AstBinopOp::BITAND => { |
| 55 | + if let Value::Number(left_num) = left { |
| 56 | + if let Value::Number(right_num) = right { |
| 57 | + return Value::Number(((left_num as i64) & (right_num as i64)) as f64); |
| 58 | + } |
| 59 | + } |
| 60 | + if let Value::Boolean(left) = left { |
| 61 | + if let Value::Boolean(right) = right { |
| 62 | + return Value::Number((left && right) as i64 as f64); |
| 63 | + } |
| 64 | + } |
| 65 | + } |
| 66 | + AstBinopOp::BITOR => { |
| 67 | + if let Value::Number(left_num) = left { |
| 68 | + if let Value::Number(right_num) = right { |
| 69 | + return Value::Number(((left_num as i64) | (right_num as i64)) as f64); |
| 70 | + } |
| 71 | + } |
| 72 | + if let Value::Boolean(left) = left { |
| 73 | + if let Value::Boolean(right) = right { |
| 74 | + return Value::Number((left || right) as i64 as f64); |
| 75 | + } |
| 76 | + } |
| 77 | + } |
| 78 | + AstBinopOp::EQ => { |
| 79 | + return Value::Boolean(left.equal(&right)); |
| 80 | + } |
| 81 | + AstBinopOp::NEQ => { |
| 82 | + return Value::Boolean(!left.equal(&right)); |
| 83 | + } |
| 84 | + AstBinopOp::LT => { |
| 85 | + return Value::Boolean(left.lt(&right)); |
| 86 | + } |
| 87 | + AstBinopOp::GT => { |
| 88 | + return Value::Boolean(left.gt(&right)); |
| 89 | + } |
| 90 | + AstBinopOp::LE => { |
| 91 | + return Value::Boolean(left.le(&right)); |
| 92 | + } |
| 93 | + AstBinopOp::GE => { |
| 94 | + return Value::Boolean(left.ge(&right)); |
| 95 | + } |
| 96 | + } |
| 97 | + self.error = "unmatched left and right value types".into(); |
| 98 | + return Value::Null(); |
| 99 | + } |
| 100 | + |
| 101 | + pub(crate) fn compute_stack_values(&mut self, op: AstBinopOp) -> Value { |
| 102 | + let mut left = Value::Null(); |
| 103 | + let mut right = Value::Null(); |
| 104 | + |
| 105 | + if let Some(value) = self.stack.pop() { |
| 106 | + right = value; |
| 107 | + } |
| 108 | + if let Some(value) = self.stack.pop() { |
| 109 | + left = value; |
| 110 | + } |
| 111 | + |
| 112 | + return self.compute_values(left, right, op); |
| 113 | + } |
| 114 | +} |
0 commit comments