diff --git a/collects/mzlib/cm.ss b/collects/mzlib/cm.ss index d88dd46..3ed5f5c 100644 --- a/collects/mzlib/cm.ss +++ b/collects/mzlib/cm.ss @@ -75,7 +75,7 @@ (cond [(and (file-exists? zo-name) (trust-existing-zos)) (touch zo-name)] [else - (with-handlers ([not-break-exn? void]) (delete-file zo-name)) + (when (file-exists? zo-name) (delete-file zo-name)) (with-handlers ([exn:get-module-code? (lambda (ex) (compilation-failure