(defun setup-to-save-swank-fasls-in-asdf-cache ()