diff options
author | Richard M. Stallman <[email protected]> | 2003-05-17 12:49:12 +0000 |
---|---|---|
committer | Richard M. Stallman <[email protected]> | 2003-05-17 12:49:12 +0000 |
commit | 07c9ebd607bbf27658b752974cc5869276aec8f8 (patch) | |
tree | 08e9f70bbb709b246e1987a82b1ccc5a36ffe0aa | |
parent | fe72189a11425cd9fe750fc12dfb48a6619f3955 (diff) |
(specbinding_func): New typedef.
(struct specbinding): Use specbinding_func, to put the `volatile'
in the right place.
(map_char_table): Declare added arg.
-rw-r--r-- | src/lisp.h | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/lisp.h b/src/lisp.h index 7bd4c6af77..eb3502bd14 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)); |