[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