Update of /project/movitz/cvsroot/movitz/losp/muerte In directory common-lisp.net:/tmp/cvs-serv16796 Modified Files: inspect.lisp Log Message: Rename copy-vector to shallow-copy-vector, and have it understand indirect-vectors. Should fix a GC issue. Date: Sat Jun 11 02:02:04 2005 Author: ffjeld Index: movitz/losp/muerte/inspect.lisp diff -u movitz/losp/muerte/inspect.lisp:1.54 movitz/losp/muerte/inspect.lisp:1.55 --- movitz/losp/muerte/inspect.lisp:1.54 Sat Jun 11 01:07:07 2005 +++ movitz/losp/muerte/inspect.lisp Sat Jun 11 02:02:04 2005 @@ -10,7 +10,7 @@ ;;;; Author: Frode Vatvedt Fjeld <frodef@acm.org> ;;;; Created at: Fri Oct 24 09:50:41 2003 ;;;; -;;;; $Id: inspect.lisp,v 1.54 2005/06/10 23:07:07 ffjeld Exp $ +;;;; $Id: inspect.lisp,v 1.55 2005/06/11 00:02:04 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------ @@ -257,7 +257,7 @@ (symbol (copy-symbol old t)) (vector - (copy-vector old)) + (shallow-copy-vector old)) (function (copy-funobj old)) (structure-object