[cells-cvs] CVS cells

30 Nov 2007

Update of /project/cells/cvsroot/cells
In directory clnet:/tmp/cvs-serv30806
Modified Files:
    family.lisp 
Log Message:

--- /project/cells/cvsroot/cells/family.lisp	2007/11/30 16:51:18	1.20
+++ /project/cells/cvsroot/cells/family.lisp	2007/11/30 22:52:36	1.21
@@ -25,8 +25,7 @@
 (defmodel model ()
   ((.md-name :cell nil :initform nil :initarg :md-name :accessor md-name)
    (.fm-parent :cell nil :initform nil :initarg :fm-parent :accessor fm-parent)
-   (.value :initform nil :accessor value :initarg :value)
-   (zdbg :initform nil :accessor dbg :initarg :dbg)))
+   (.value :initform nil :accessor value :initarg :value)))
(defmethod fm-parent (other)
   (declare (ignore other))

    