diff --git a/asdf-support.lisp b/asdf-support.lisp index 545ca9e7e64521ab339971e1d36342dafe4455aa..33137e10461d6fd358d5474ac518de34dc3a2070 100644 --- a/asdf-support.lisp +++ b/asdf-support.lisp @@ -170,10 +170,10 @@ (paths (cons (directory-namestring input) (resolve-search-path component))) (proto-impl:*protobuf-search-path* paths) (proto-impl:*protobuf-output-path* (first (input-files op component)))) - (proto-impl:process-imports-from-file - (make-pathname :type "proto-imports" - :defaults (first (input-files op component))))) - (call-next-method)) + (destructuring-bind (fasl proto-imports) + (input-files op component) + (proto-impl:process-imports-from-file proto-imports) + (load fasl)))) (defmethod operation-description ((op compile-op) (component protobuf-file)) (format nil (compatfmt "~@")