From: Dan Nicolaescu <dann@ics.uci.edu>
Date: Mon, 26 Jul 2010 06:37:26 +0000 (-0700)
Subject: Mark functions as NO_RETURN.
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~49^2~133
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ccaf03362bc881c0f9d92d2bc28a5df1897886dc;p=emacs.git

Mark functions as NO_RETURN.
* src/lisp.h (Ftop_level, Fexit_recursive_edit)
(Fabort_recursive_edit): Mark as NO_RETURN.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 3e750aed54b..8d01797b63c 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2010-07-26  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* lisp.h (Ftop_level, Fexit_recursive_edit)
+	(Fabort_recursive_edit): Mark as NO_RETURN.
+
 2010-07-26  Kenichi Handa  <handa@m17n.org>
 
 	* font.c (Ffont_shape_gstring): Terminate GSTRING by nil if the
diff --git a/src/lisp.h b/src/lisp.h
index 6b5de400c06..85f271fa193 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -3155,7 +3155,9 @@ extern Lisp_Object Vthrow_on_input;
 extern int input_pending;
 EXFUN (Fdiscard_input, 0);
 EXFUN (Frecursive_edit, 0);
-EXFUN (Ftop_level, 0);
+EXFUN (Ftop_level, 0) NO_RETURN;
+EXFUN (Fexit_recursive_edit, 0) NO_RETURN;
+EXFUN (Fabort_recursive_edit, 0) NO_RETURN;
 EXFUN (Fcommand_execute, 4);
 EXFUN (Finput_pending_p, 0);
 extern Lisp_Object menu_bar_items (Lisp_Object);