$NetBSD$

--- src/lisp/core.lisp.in.orig  2009-08-05 09:51:44.000000000 +0000
+++ src/lisp/core.lisp.in
@@ -832,7 +832,7 @@
                   (setq result nil))
        (cond ((null result)
               (|coreError| "compilation of Lisp code failed"))
-              (failure-p
+              ((and failure-p #+:clisp (not (equal file "patches.lisp")))
               ;; Since we believe the source code must
               ;; be fixed, we don't want to leave
               ;; the generated FASL behing us, as that