1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-14 15:40:19 +02:00

Engine takes struct scm_vm* as argument

* libguile/vm-engine.c:
* libguile/vm.c (scm_c_vm_run): VM engine now takes struct scm_vm* as
  argument, not SCM vm.
This commit is contained in:
Andy Wingo 2013-11-21 17:52:00 +01:00
parent 796e54a74c
commit 9b4c3ab5fa
2 changed files with 4 additions and 4 deletions

View file

@ -424,7 +424,7 @@
((scm_t_uintptr) (ptr) % alignof_type (type) == 0)
static SCM
VM_NAME (SCM vm, SCM program, SCM *argv, size_t nargs_)
VM_NAME (struct scm_vm *vp, SCM program, SCM *argv, size_t nargs_)
{
/* Instruction pointer: A pointer to the opcode that is currently
running. */
@ -439,7 +439,6 @@ VM_NAME (SCM vm, SCM program, SCM *argv, size_t nargs_)
register scm_t_uint32 op;
/* Cached variables. */
struct scm_vm *vp = SCM_VM_DATA (vm);
scm_i_thread *current_thread = SCM_I_CURRENT_THREAD;
scm_i_jmp_buf registers; /* used for prompts */