[cells-devel] Cells: make-kid bypasses dependencies on kids of parent ?!

[Frank Goenninger]

I have the following definition:

;; A task is a container for ops. A task holds its ops as kids. So,  
when a
;;; task is called the task will call its kids.

(defmd task (family)
   (.md-name :accessor id :initarg :id)
   fn-code
   thread
   state
   nr-ops

   :id (c-in (gensym "GNC.APP.TASK-"))
   :fn-code (c-in nil)
   :thread (c-in nil)
   :state (c-in nil)
   :nr-ops (c? (loop for kid in (^kids)
                    counting (eql (type-of kid) 'op) into ops-count
                    finally (return ops-count))))

Now, when I do

 > (setq self (make-instance 'task))
TASK1

 > (setq my-kid (make-kid 'task))
TASK 2

 > (^nr-ops)
0

... and this should now be 1, no ? Or what's the right way to add kids ?

Thx for feedback!

Best,
   Frank