Update of /project/cells/cvsroot/cells/doc In directory clnet:/tmp/cvs-serv30537/doc
Modified Files: 01-Cell-basics.lisp Log Message: Mainly remove WITH-INTEGRITY wrapper from (setf md-slot-value). Big change, that.
--- /project/cells/cvsroot/cells/doc/01-Cell-basics.lisp 2006/03/16 05:24:41 1.2 +++ /project/cells/cvsroot/cells/doc/01-Cell-basics.lisp 2006/05/01 20:23:14 1.3 @@ -111,9 +111,6 @@
(in-package :cells)
-(cells-reset) - - (defmodel stone () ((accel :cell t :initarg :accel :initform 0 :accessor accel) (time-elapsed :cell t :initarg :time-elapsed @@ -210,9 +207,11 @@
#+evaluatethis
-(defparameter *s2* (make-instance 'stone - :accel 32 ;; (constant) feet per second per second - :time-elapsed (c-in 0))) +(progn + (cells-reset) + (defparameter *s2* (make-instance 'stone + :accel 32 ;; (constant) feet per second per second + :time-elapsed (c-in 0))))
#|