summaryrefslogtreecommitdiffstats
path: root/vm.c
diff options
context:
space:
mode:
Diffstat (limited to 'vm.c')
-rw-r--r--vm.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/vm.c b/vm.c
index a837a268..17efa503 100644
--- a/vm.c
+++ b/vm.c
@@ -219,6 +219,8 @@ static val vm_make_closure(struct vm *vm, int frsz)
vc->vd = vm->vd;
vc->dspl = dspl;
+ assert (vc->nlvl <= vm->nlvl);
+
closure = cobj(coerce(mem_t *, vc), vm_closure_s, &vm_closure_ops);
for (i = 2; i < vc->nlvl; i++) {