diff options
Diffstat (limited to 'libguile/vm-engine.c')
-rw-r--r-- | libguile/vm-engine.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c index 71cb636a6..2d28bbf35 100644 --- a/libguile/vm-engine.c +++ b/libguile/vm-engine.c @@ -92,7 +92,7 @@ VM_NAME (struct scm_vm *vp, SCM program, SCM *argv, int nargs) CACHE_PROGRAM (); PUSH (program); fp = sp + 1; - ip = bp->base; + ip = SCM_C_OBJCODE_BASE (bp); /* MV-call frame, function & arguments */ PUSH ((SCM)fp); /* dynamic link */ PUSH (0); /* mvra */ |