[cells-cvs] CVS cells/doc

[ktilton]

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))))
 
 #|