(error 'operation-error :component c :operation o))))
(defmethod operation-done-p ((o compile-op) (c clsql-uffi-source-file))
(error 'operation-error :component c :operation o))))
(defmethod operation-done-p ((o compile-op) (c clsql-uffi-source-file))
(let ((lib (make-pathname :defaults (component-pathname c)
:type (uffi:default-foreign-library-type))))
(and (probe-file lib) (probe-file (component-pathname c))
(let ((lib (make-pathname :defaults (component-pathname c)
:type (uffi:default-foreign-library-type))))
(and (probe-file lib) (probe-file (component-pathname c))