~ chicken-core (chicken-5) 76115ae2c7f67091f46bbc6219e2de8d70e60331


commit 76115ae2c7f67091f46bbc6219e2de8d70e60331
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sun Jul 19 22:30:14 2015 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Sun Jul 19 22:30:14 2015 +0200

    C_save_and_reclaim clobbered count

diff --git a/runtime.c b/runtime.c
index 0ffc762e..a6bdf204 100644
--- a/runtime.c
+++ b/runtime.c
@@ -2718,10 +2718,12 @@ void C_save_and_reclaim(void *trampoline, int n, C_word *av)
 void C_save_and_reclaim_args(void *trampoline, int n, ...)
 {
   va_list v;
+  int i;
   
   va_start(v, n);
 
-  while(n--) C_save(va_arg(v, C_word));
+  for(i = 0; i < n; ++i)
+    C_save(va_arg(v, C_word));
 
   va_end(v);
   C_reclaim(trampoline, n);
Trap