[cells-cvs] CVS cells

ktilton ktilton at common-lisp.net
Fri Nov 30 22:52:37 UTC 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))




More information about the Cells-cvs mailing list