Update of /project/movitz/cvsroot/movitz In directory common-lisp.net:/tmp/cvs-serv18229
Modified Files: procfs-image.lisp Log Message: Removed references to the old movitz-vector class.
Date: Thu Jul 8 11:53:34 2004 Author: ffjeld
Index: movitz/procfs-image.lisp diff -u movitz/procfs-image.lisp:1.8 movitz/procfs-image.lisp:1.9 --- movitz/procfs-image.lisp:1.8 Tue Jun 29 16:15:47 2004 +++ movitz/procfs-image.lisp Thu Jul 8 11:53:33 2004 @@ -10,7 +10,7 @@ ;;;; Author: Frode Vatvedt Fjeld frodef@acm.org ;;;; Created at: Fri Aug 24 11:39:37 2001 ;;;; -;;;; $Id: procfs-image.lisp,v 1.8 2004/06/29 23:15:47 ffjeld Exp $ +;;;; $Id: procfs-image.lisp,v 1.9 2004/07/08 18:53:33 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------
@@ -118,7 +118,7 @@ (movitz-vector-symbolic-data expr))) (movitz-fixnum (movitz-fixnum-value expr)) - ((or movitz-vector movitz-basic-vector) + (movitz-basic-vector (map 'vector #'movitz-print (movitz-vector-symbolic-data expr))) (movitz-cons (cons (movitz-print (movitz-car expr))