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 | 2d613eee0e40938ae3b136ff093deab2814bafaf (patch) | |
tree | b9a4baa873bbeff8211b221c0845bf83ca88df24 | |
parent | 8b7d03c3e8d1c936ecc8329f5993e46a4a65b945 (diff) | |
download | txr-2d613eee0e40938ae3b136ff093deab2814bafaf.tar.gz txr-2d613eee0e40938ae3b136ff093deab2814bafaf.tar.bz2 txr-2d613eee0e40938ae3b136ff093deab2814bafaf.zip |
vm: null out variable arg list.
* vm.c (vm_execute_closure): Null out the vargs local
to prevent spurious retention.
-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); |