Method: (destroy wisp-object)

Source

(defmethod destroy ((object wisp-object) &key force?)
  (let ((class-btree (find-class-btree (class-of object))))
    (remove-kv (ele::oid object) class-btree)))