~ 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