diff options
| author | Dmitry Antipov | 2013-01-15 13:22:25 +0400 |
|---|---|---|
| committer | Dmitry Antipov | 2013-01-15 13:22:25 +0400 |
| commit | 2b30549c493d7b67fa92c2b4bcd2bd2e55210ae1 (patch) | |
| tree | ac4cc77344b3285eb47d5145eb0b28dd6034f54d /src/keymap.c | |
| parent | 1b971ac155006504b6b1c2688199747f976723af (diff) | |
| download | emacs-2b30549c493d7b67fa92c2b4bcd2bd2e55210ae1.tar.gz emacs-2b30549c493d7b67fa92c2b4bcd2bd2e55210ae1.zip | |
* src/lisp.h (XSAVE_POINTER, XSAVE_INTEGER): Change to allow extraction
from any Lisp_Save_Value slot. Add type checking.
* src/alloc.c, src/dired.c, src/editfns.c, src/fileio.c, src/ftfont.c:
* src/gtkutil.c, src/keymap.c, src/lread.c, src/nsterm.h, src/nsmenu.c:
* src/xfns.c, src/xmenu.c, src/xselect.c: All users changed.
* admin/coccinelle/xsave.cocci: Semantic patch to adjust users of
XSAVE_POINTER and XSAVE_INTEGER macros.
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/keymap.c b/src/keymap.c index 82c9e980221..f64c8d5a848 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -565,14 +565,14 @@ map_keymap_char_table_item (Lisp_Object args, Lisp_Object key, Lisp_Object val) | |||
| 565 | { | 565 | { |
| 566 | if (!NILP (val)) | 566 | if (!NILP (val)) |
| 567 | { | 567 | { |
| 568 | map_keymap_function_t fun = XSAVE_POINTER (XCAR (args)); | 568 | map_keymap_function_t fun = XSAVE_POINTER (XCAR (args), 0); |
| 569 | args = XCDR (args); | 569 | args = XCDR (args); |
| 570 | /* If the key is a range, make a copy since map_char_table modifies | 570 | /* If the key is a range, make a copy since map_char_table modifies |
| 571 | it in place. */ | 571 | it in place. */ |
| 572 | if (CONSP (key)) | 572 | if (CONSP (key)) |
| 573 | key = Fcons (XCAR (key), XCDR (key)); | 573 | key = Fcons (XCAR (key), XCDR (key)); |
| 574 | map_keymap_item (fun, XCDR (args), key, val, | 574 | map_keymap_item (fun, XCDR (args), key, val, |
| 575 | XSAVE_POINTER (XCAR (args))); | 575 | XSAVE_POINTER (XCAR (args), 0)); |
| 576 | } | 576 | } |
| 577 | } | 577 | } |
| 578 | 578 | ||