Function: OBJECT-ALIVE-P

Source

(defun object-alive-p (object-table object-id)
  (eql (object-info object-table object-id) :live-object))