How to fix arnesi:clean-op.

Robert P. Goldman rpgoldman at sift.net
Sun May 8 16:15:58 UTC 2016


I'll look into this a bit. I'd be happy to see clean-op incorporated in ASDF. 

Note that budden's response about using touch is not necessary.  To force a recompile one can simply use :force

Sent from my iPhone

> On May 8, 2016, at 09:50, TANIGUCHI Masaya <ta2gch at gmail.com> wrote:
> 
> I want to do "make clean" on ASDF.
> I tried to use clean-op of ARNESI.
> 
> I got a following message,
> 
> 
> WARNING:
>   No dependency propagating scheme specified for operation class IT.BESE.ARNESI:CLEAN-OP.
> The class needs to be updated for ASDF 3.1 and specify appropriate propagation mixins.
> 
> #<IT.BESE.ARNESI:CLEAN-OP >
> #<ASDF/PLAN:SEQUENTIAL-PLAN {1003A65533}>
> 
> Definition of arnesi:clean-op is
> 
> (defclass clean-op (asdf:operation)
>  ((for-op :accessor for-op :initarg :for-op :initform 'asdf:compile-op))
>  (:documentation "Removes any files generated by an asdf component."))
> 
> (defmethod asdf:perform ((op clean-op) (c asdf:component))
>  "Delete all the output files generated by the component C."
>  (dolist (f (asdf:output-files (make-instance (for-op op)) c))
>    (when (probe-file f)
>      (delete-file f))))
> 
> (defmethod asdf:operation-done-p ((op clean-op) (c asdf:component))
>  "Returns T when the output-files of (for-op OP) C don't exist."
>  (dolist (f (asdf:output-files (make-instance (for-op op)) c))
>    (when (probe-file f) (return-from asdf:operation-done-p nil)))
>  t)
> 
> 
> How to fix it?
> 
> Thanks.
> 
> ta2gch
> 




More information about the asdf-devel mailing list