diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2018-04-25 09:23:56 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2018-04-25 09:23:56 -0700 |
commit | ae5c55a50e3637c4a0df10596a252b55d4cf014a (patch) | |
tree | b9a4baa873bbeff8211b221c0845bf83ca88df24 /vm.c | |
parent | 822562e3badbfefa2694eb9a715153a11f94078d (diff) | |
download | txr-ae5c55a50e3637c4a0df10596a252b55d4cf014a.tar.gz txr-ae5c55a50e3637c4a0df10596a252b55d4cf014a.tar.bz2 txr-ae5c55a50e3637c4a0df10596a252b55d4cf014a.zip |
vm: null out variable arg list.
* vm.c (vm_execute_closure): Null out the vargs local
to prevent spurious retention.
Diffstat (limited to 'vm.c')
-rw-r--r-- | vm.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1063,7 +1063,7 @@ val vm_execute_closure(val fun, struct args *args) vreg = vm_arg_operand_hi(argw); } - vm_set(dspl, vreg, vargs); + vm_set(dspl, vreg, z(vargs)); } return vm_execute(&vm); |