2 files changed, 8 insertions, 1 deletions

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);