[movitz-cvs] CVS update: movitz/storage-types.lisp

[Frode Vatvedt Fjeld]

Update of /project/movitz/cvsroot/movitz
In directory common-lisp.net:/tmp/cvs-serv19297

Modified Files:
	storage-types.lisp 
Log Message:
Fixed class movitz-struct, which previously declared wrong (host-side)
types for some slots (i.e. erroneously used :binary-lisp-type rather
than :binary-type).

Date: Thu Feb 12 06:28:28 2004
Author: ffjeld

Index: movitz/storage-types.lisp
diff -u movitz/storage-types.lisp:1.5 movitz/storage-types.lisp:1.6
--- movitz/storage-types.lisp:1.5	Thu Feb  5 09:46:19 2004
+++ movitz/storage-types.lisp	Thu Feb 12 06:28:28 2004
@@ -9,7 +9,7 @@
 ;;;; Created at:    Sun Oct 22 00:22:43 2000
 ;;;; Distribution:  See the accompanying file COPYING.
 ;;;;                
-;;;; $Id: storage-types.lisp,v 1.5 2004/02/05 14:46:19 ffjeld Exp $
+;;;; $Id: storage-types.lisp,v 1.6 2004/02/12 11:28:28 ffjeld Exp $
 ;;;;                
 ;;;;------------------------------------------------------------------
 
@@ -1023,7 +1023,7 @@
 
 (define-binary-class movitz-struct (movitz-heap-object-other)
   ((name
-    :binary-lisp-type word
+    :binary-type word
     :map-binary-write 'movitz-intern
     :map-binary-read-delayed 'movitz-word
     :reader movitz-struct-name