I think I just solved my own problem here.
--- swank-backend.lisp.~1.49.~ Tue Jun 8 17:18:38 2004 +++ swank-backend.lisp Tue Jun 8 17:56:56 2004 @@ -196,7 +196,8 @@ (definterface operate-on-system (system- (operation (find-symbol operation-name :asdf))) (when (null operation) (error "Couldn't find ASDF operation ~S" operation-name)) - (apply operate operation system-name keyword-args)))) + (handler-bind ((warning #'error)) + (apply operate operation system-name keyword-args)))))
(definterface swank-compile-file (filename load-p) "Compile FILENAME signalling COMPILE-CONDITIONs.