summaryrefslogtreecommitdiff
path: root/libguile/stacks.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/stacks.c')
-rw-r--r--libguile/stacks.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/stacks.c b/libguile/stacks.c
index e3d131d12..cef01e475 100644
--- a/libguile/stacks.c
+++ b/libguile/stacks.c
@@ -129,8 +129,8 @@
/* FIXME: factor this out somewhere? */
static int is_vm_bootstrap_frame (SCM f)
{
- struct scm_program *bp = SCM_PROGRAM_DATA (scm_vm_frame_program (f));
- return bp->base[bp->size-1] == scm_op_halt;
+ struct scm_objcode *bp = SCM_PROGRAM_DATA (scm_vm_frame_program (f));
+ return bp->base[bp->len-1] == scm_op_halt;
}
/* Count number of debug info frames on a stack, beginning with