;;; The component that is currently being compiled. TNs are allocated
;;; in this component.
(defvar *component-being-compiled*)
;;; The component that is currently being compiled. TNs are allocated
;;; in this component.
(defvar *component-being-compiled*)