Method: (CONTAINER.CURRENT-COMPONENT CONTAINER)

Source

(defmethod container.current-component ((container container))
  (find-component container (container.current-component-name container)))