returns the number of elements of pool or nil if obj wasn't added to pool
(defun pool-add (obj pool)
"returns the number of elements of pool or nil if obj wasn't added to pool"
(if (call-add-strategie obj pool)
(incf (pool-count pool))
nil))Source Context