assign (ish) to blob fields

1 files changed, 13 insertions, 0 deletions

diff --git a/src/vm.rs b/src/vm.rs
index 028f2cd..5b0abae 100644
--- a/src/vm.rs
+++ b/src/vm.rs
@@ -122,7 +122,9 @@ pub enum Op {
     Pop,
     PopUpvalue,
     Constant(Value),
+
     Get(String),
+    Set(String),
 
     Add,
     Sub,
@@ -426,6 +428,17 @@ impl VM {
                 }
             }
 
+            Op::Set(field) => {
+                let value = self.stack.pop().unwrap();
+                let inst = self.stack.pop();
+                if let Some(Value::BlobInstance(ty, mut values)) = inst {
+                    let slot = self.blobs[ty].name_to_field.get(&field).unwrap().0;
+                    values[slot] = value;
+                } else {
+                    error!(self, ErrorKind::RuntimeTypeError(Op::Get(field.clone()), vec![inst.unwrap()]));
+                }
+            }
+
             Op::Neg => {
                 match self.stack.pop().unwrap() {
                     Value::Float(a) => self.stack.push(Value::Float(-a)),