# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 809713345 0
# Node ID 62682d1146a05c54bb75cfe415f4f9e913404fca
# Parent  ec9ae189a27505381c13b37d5706621a6970c6d5
(dired-byte-compile): Report failure if output file is not created.

diff -r ec9ae189a275 -r 62682d1146a0 lisp/dired-aux.el
--- a/lisp/dired-aux.el	Tue Aug 29 15:32:00 1995 +0000
+++ b/lisp/dired-aux.el	Tue Aug 29 16:22:25 1995 +0000
@@ -649,6 +649,8 @@
       (error
        (setq failure err)))
     (setq elc-file (byte-compile-dest-file filename))
+    (or (file-exists-p elc-file)
+	(setq failure t))
     (if failure
 	(progn
 	  (dired-log "Byte compile error for %s:\n%s\n" filename failure)