summaryrefslogtreecommitdiffstats
path: root/vm.c
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
commite8f3a9d06b1b777d2857e9939ce0cd3c2da49e09 (patch)
tree3ac8416f3342da4425043ea66324b770eb49ab97 /vm.c
parent07bc53f2f5736ee0ecc5f152432446e7b4a200f8 (diff)
downloadtxr-e8f3a9d06b1b777d2857e9939ce0cd3c2da49e09.tar.gz
txr-e8f3a9d06b1b777d2857e9939ce0cd3c2da49e09.tar.bz2
txr-e8f3a9d06b1b777d2857e9939ce0cd3c2da49e09.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.
Diffstat (limited to 'vm.c')
-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;