From: Juho S. <js...@us...> - 2005-12-15 20:18:20
|
Update of /cvsroot/sbcl/sbcl/src/code In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6167/src/code Modified Files: room.lisp Log Message: 0.9.7.29: Oops, fix cheneygc build (thanks to Jon Allen Boone). Index: room.lisp =================================================================== RCS file: /cvsroot/sbcl/sbcl/src/code/room.lisp,v retrieving revision 1.35 retrieving revision 1.36 diff -u -d -r1.35 -r1.36 --- room.lisp 14 Dec 2005 03:39:23 -0000 1.35 +++ room.lisp 15 Dec 2005 20:18:09 -0000 1.36 @@ -233,7 +233,7 @@ (declare (type system-area-pointer start end)) (declare (optimize (speed 3) (safety 0))) (let ((current start) - (skip-tests-until-addr 0)) + #!+gencgc (skip-tests-until-addr 0)) (labels ((maybe-finish-mapping () (unless (sap< current end) (aver (sap= current end)) |