From 404be028b9f33058aa357e3ebc85890de853511b Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Sun, 9 Apr 2006 09:03:44 +0000 Subject: [PATCH] * puresize.h (pure_write_error): Mark as NO_RETURN. * lisp.h (args_out_of_range, args_out_of_range_3): Likewise. --- src/ChangeLog | 6 ++++++ src/lisp.h | 5 +++-- src/puresize.h | 2 +- 3 files changed, 10 insertions(+), 3 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index e91028e54e..d5c53ff7a0 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,9 @@ +2006-04-09 Dan Nicolaescu + + * puresize.h (pure_write_error): Mark as NO_RETURN. + + * lisp.h (args_out_of_range, args_out_of_range_3): Likewise. + 2006-04-08 Eli Zaretskii * w32fns.c (w32_wnd_proc) : Ignore mouse movements diff --git a/src/lisp.h b/src/lisp.h index f088ccb834..5d1b3266a0 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -2243,8 +2243,9 @@ EXFUN (Fmake_variable_buffer_local, 1); extern Lisp_Object indirect_variable P_ ((Lisp_Object)); extern Lisp_Object long_to_cons P_ ((unsigned long)); extern unsigned long cons_to_long P_ ((Lisp_Object)); -extern void args_out_of_range P_ ((Lisp_Object, Lisp_Object)); -extern void args_out_of_range_3 P_ ((Lisp_Object, Lisp_Object, Lisp_Object)); +extern void args_out_of_range P_ ((Lisp_Object, Lisp_Object)) NO_RETURN; +extern void args_out_of_range_3 P_ ((Lisp_Object, Lisp_Object, + Lisp_Object)) NO_RETURN; extern Lisp_Object wrong_type_argument P_ ((Lisp_Object, Lisp_Object)); extern void store_symval_forwarding P_ ((Lisp_Object, Lisp_Object, Lisp_Object, struct buffer *)); diff --git a/src/puresize.h b/src/puresize.h index 93dac70c12..7d0e868b8a 100644 --- a/src/puresize.h +++ b/src/puresize.h @@ -65,7 +65,7 @@ Boston, MA 02110-1301, USA. */ { if (PURE_P (obj)) \ pure_write_error (); } -extern void pure_write_error P_ ((void)); +extern void pure_write_error P_ ((void)) NO_RETURN; /* Define PURE_P. */ -- 2.20.1