~ chicken-core (chicken-5) 99d4c2caaf9eddf6745089a291a95d7ed6dd32b0

commit 99d4c2caaf9eddf6745089a291a95d7ed6dd32b0
Author:     Peter Bex <peter@more-magic.net>
AuthorDate: Sat Aug 22 17:58:19 2015 +0200
Commit:     Peter Bex <peter@more-magic.net>
CommitDate: Sat Aug 22 19:37:26 2015 +0200

    repaired rest-list allocation

diff --git a/c-backend.scm b/c-backend.scm
index 63328e19..ae99e98d 100644
--- a/c-backend.scm
+++ b/c-backend.scm
@@ -853,8 +853,8 @@
 		       (or rest external (> demand 0)) )
 		  (cond [rest
 			 (gen #t "C_save_and_reclaim((void*)" id ",c,av);}"
-			      #t "a=C_alloc((c-" n ")*3+" demand ");")
-			 (gen #t "t" n "=C_build_rest(a," n ",av);")
+			      #t "a=C_alloc((c-" n ")*C_SIZEOF_PAIR+" demand ");")
+			 (gen #t "t" n "=C_build_rest(&a,c," n ",av);")
 			 (do ([i (+ n 1) (+ i 1)]
 			      [j temps (- j 1)] )
 			     ((zero? j))