From 07c9ebd607bbf27658b752974cc5869276aec8f8 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 17 May 2003 12:49:12 +0000 Subject: [PATCH] (specbinding_func): New typedef. (struct specbinding): Use specbinding_func, to put the `volatile' in the right place. (map_char_table): Declare added arg. --- src/lisp.h | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/lisp.h b/src/lisp.h index 7bd4c6af771..eb3502bd145 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -1706,10 +1706,12 @@ extern void defvar_kboard P_ ((char *, int)); means we saw a buffer-local or frame-local value. Other values of WHERE mean an internal error. */ +typedef Lisp_Object (*specbinding_func) P_ ((Lisp_Object)); + struct specbinding { volatile Lisp_Object symbol, old_value; - volatile Lisp_Object (*func) P_ ((Lisp_Object)); + volatile specbinding_func func; Lisp_Object unused; /* Dividing by 16 is faster than by 12 */ }; @@ -2313,7 +2315,7 @@ EXFUN (Fcompare_strings, 7); EXFUN (Fstring_lessp, 2); extern int char_table_translate P_ ((Lisp_Object, int)); extern void map_char_table P_ ((void (*) (Lisp_Object, Lisp_Object, Lisp_Object), - Lisp_Object, Lisp_Object, Lisp_Object, int, + Lisp_Object, Lisp_Object, Lisp_Object, Lisp_Object, int, Lisp_Object *)); extern Lisp_Object char_table_ref_and_index P_ ((Lisp_Object, int, int *)); extern void syms_of_fns P_ ((void)); -- 2.39.2