(defclass publish-op (asdf:operation) ((generator :initarg :generator :accessor generator) (input-file :initform nil :initarg :input-file :accessor input-file)))