From: Andreas Schwab <schwab@suse.de>
Date: Fri, 21 Nov 1997 14:56:30 +0000 (+0000)
Subject: (close_file_unwind): Fix return type and return nil.
X-Git-Tag: emacs-20.3~2760
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b27a1703072a3cc4233d6a4d567e8a1d561a7266;p=emacs.git

(close_file_unwind): Fix return type and return nil.
(restore_point_unwind): Likewise.
---

diff --git a/src/fileio.c b/src/fileio.c
index dbeaf64435a..dfbfbb76c42 100644
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -248,19 +248,23 @@ report_file_error (string, data)
 	     Fcons (build_string (string), Fcons (errstring, data)));
 }
 
+Lisp_Object
 close_file_unwind (fd)
      Lisp_Object fd;
 {
   close (XFASTINT (fd));
+  return Qnil;
 }
 
 /* Restore point, having saved it as a marker.  */
 
+Lisp_Object
 restore_point_unwind (location)
      Lisp_Object location;
 {
   SET_PT (marker_position (location));
   Fset_marker (location, Qnil, Qnil);
+  return Qnil;
 }
 
 Lisp_Object Qexpand_file_name;