# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 780109162 0
# Node ID 390019f3ab08bdaf985e805f257ec7697af4ec97
# Parent  14951db9444acfc2b2817ecf140199c8857c2951
(report_error): Include reason in error message.

diff -r 14951db9444a -r 390019f3ab08 src/unexaix.c
--- a/src/unexaix.c	Tue Sep 20 23:52:38 1994 +0000
+++ b/src/unexaix.c	Wed Sep 21 00:59:22 1994 +0000
@@ -237,6 +237,7 @@
 #endif
 
 #ifdef emacs
+#include "lisp.h"
 
 static
 report_error (file, fd)
@@ -245,7 +246,7 @@
 {
   if (fd)
     close (fd);
-  error ("Failure operating on %s", file);
+  report_file_error ("Cannot unexec", Fcons (build_string (file), Qnil));
 }
 #endif /* emacs */