Mercurial > emacs
changeset 51035:b17fe74b2af3
(specbinding_func): New typedef.
(struct specbinding): Use specbinding_func, to put the `volatile'
in the right place.
(map_char_table): Declare added arg.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 17 May 2003 12:49:12 +0000 |
parents | a5bb1c5181ac |
children | 5a30d8fb640c |
files | src/lisp.h |
diffstat | 1 files changed, 4 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- 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));