# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1053175752 0
# Node ID b17fe74b2af3bdd4201d594a6f6ab10c6e82bd04
# Parent  a5bb1c5181ac9f4574d9e733670daa6f2cd40580
(specbinding_func): New typedef.
(struct specbinding): Use specbinding_func, to put the `volatile'
in the right place.

(map_char_table): Declare added arg.

diff -r a5bb1c5181ac -r b17fe74b2af3 src/lisp.h
--- a/src/lisp.h	Sat May 17 12:47:55 2003 +0000
+++ b/src/lisp.h	Sat May 17 12:49:12 2003 +0000
@@ -1706,10 +1706,12 @@
    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 (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));