summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2018-03-22 20:56:03 -0700
committerKaz Kylheku <kaz@kylheku.com>2018-03-22 20:56:03 -0700
commitd59d119445772c69ca100a052649844eb0aedd57 (patch)
tree3ac8416f3342da4425043ea66324b770eb49ab97
parent2c704b6f327858a068effc7dddf004b8929ebc64 (diff)
downloadtxr-d59d119445772c69ca100a052649844eb0aedd57.tar.gz
txr-d59d119445772c69ca100a052649844eb0aedd57.tar.bz2
txr-d59d119445772c69ca100a052649844eb0aedd57.zip
vm: initialize vd->funvec to nil.
* vm.c (vm_make_desc): Initialize vd->funvec to nil so that when the object is created, it doesn't have a garbage field. However, there is no risk here that the field will be traversed by the garbage collector, since immediately after allocating the objct, we initialize the fields.
-rw-r--r--vm.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/vm.c b/vm.c
index 913fb60c..9f0ff266 100644
--- a/vm.c
+++ b/vm.c
@@ -147,6 +147,7 @@ val vm_make_desc(val nlevels, val nregs, val bytecode,
vd->bytecode = nil;
vd->datavec = nil;
+ vd->funvec = nil;
vd->frsz = nlvl * 2 + nreg;