Don't say Fnext_read_file_uses_dialog_p is const

[gnu-emacs] / src / eval.c

diff --git a/src/eval.c b/src/eval.c
index 7e4b016b23640c6f0a9d0639f33037e131c91ff1..5cadb1bc2dea194652ea7e7529ddbb8b853b715c 100644 (file)
--- a/src/eval.c
+++ b/src/eval.c
@@ -1162,7 +1162,8 @@ unwind_to_catch (struct handler *catch, Lisp_Object value)
 
 DEFUN ("throw", Fthrow, Sthrow, 2, 2, 0,
        doc: /* Throw to the catch for TAG and return VALUE from it.
-Both TAG and VALUE are evalled.  */)
+Both TAG and VALUE are evalled.  */
+       attributes: noreturn)
   (register Lisp_Object tag, Lisp_Object value)
 {
   struct handler *c;