* keyboard.c (Fexit_recursive_edit, Fabort_recursive_edit): Mark with NO_RETURN.

2 files changed, 3 insertions, 0 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index c4b4b4b5494..1cdeefff899 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -9,6 +9,7 @@
         (parse_tool_bar_item, read_key_sequence, Fread_key_sequence):
         (Fread_key_sequence_vector): Rename locals to avoid shadowing.
         (read_key_sequence): Mark locals as initialized.
+        (Fexit_recursive_edit, Fabort_recursive_edit): Mark with NO_RETURN.
 
         * keyboard.h (make_ctrl_char): New decl.
         (mark_kboards): Move decl here ...
diff --git a/src/keyboard.c b/src/keyboard.c
index 5680f32502c..afa78184179 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -1169,6 +1169,7 @@ This also exits all active minibuffers.  */)
   Fthrow (Qtop_level, Qnil);
 }
 
+Lisp_Object Fexit_recursive_edit (void) NO_RETURN;
 DEFUN ("exit-recursive-edit", Fexit_recursive_edit, Sexit_recursive_edit, 0, 0, "",
        doc: /* Exit from the innermost recursive edit or minibuffer.  */)
   (void)
@@ -1179,6 +1180,7 @@ DEFUN ("exit-recursive-edit", Fexit_recursive_edit, Sexit_recursive_edit, 0, 0,
   error ("No recursive edit is in progress");
 }
 
+Lisp_Object Fabort_recursive_edit (void) NO_RETURN;
 DEFUN ("abort-recursive-edit", Fabort_recursive_edit, Sabort_recursive_edit, 0, 0, "",
        doc: /* Abort the command that requested this recursive edit or minibuffer input.  */)
   (void)