Update of /project/movitz/cvsroot/movitz/losp In directory common-lisp.net:/tmp/cvs-serv26374 Modified Files: los0-gc.lisp Log Message: sync Date: Thu Sep 1 00:35:49 2005 Author: ffjeld Index: movitz/losp/los0-gc.lisp diff -u movitz/losp/los0-gc.lisp:1.58 movitz/losp/los0-gc.lisp:1.59 --- movitz/losp/los0-gc.lisp:1.58 Sun Aug 28 23:10:46 2005 +++ movitz/losp/los0-gc.lisp Thu Sep 1 00:35:49 2005 @@ -10,7 +10,7 @@ ;;;; Author: Frode Vatvedt Fjeld <frodef@acm.org> ;;;; Created at: Sat Feb 21 17:48:32 2004 ;;;; -;;;; $Id: los0-gc.lisp,v 1.58 2005/08/28 21:10:46 ffjeld Exp $ +;;;; $Id: los0-gc.lisp,v 1.59 2005/08/31 22:35:49 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------ @@ -358,7 +358,7 @@ (or evacuator (lambda (x location) "If x is in oldspace, migrate it to newspace." - ;; (declare (ignore location)) + (declare (ignore location)) (cond ((null x) nil)