.

src/vm/vm.cc

@@ -27,7 +27,19 @@ void VM::call(size_t n_params)
 
 void VM::run_until_return()
 {
+    size_t level = stack_.fp_level();
 
+    while (stack_.fp_level() >= level)
+        step();
+}
+
+void VM::step()
+{
+    Operation op = code_.operation(loc_.top());
+    switch (op.instruction) {
+        // TODO
+    }
+    loc_.top() = op.next_location;
 }
 
 } // tyche