From 2d613eee0e40938ae3b136ff093deab2814bafaf Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Wed, 25 Apr 2018 09:23:56 -0700
Subject: vm: null out variable arg list.

* vm.c (vm_execute_closure): Null out the vargs local
to prevent spurious retention.
---
 vm.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/vm.c b/vm.c
index b615e31d..29f60b8f 100644
--- a/vm.c
+++ b/vm.c
@@ -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);
-- 
cgit v1.2.3