Mercurial > emacs
comparison src/keyboard.c @ 11671:8d81f3c6a0b5
(reorder_modifiers): Cast apply_modifiers arg to int.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 04 May 1995 03:49:31 +0000 |
parents | 5ec9a02755ec |
children | 7eda6c1f3d5e |
comparison
equal
deleted
inserted
replaced
11670:5ec9a02755ec | 11671:8d81f3c6a0b5 |
---|---|
3676 /* It's hopefully okay to write the code this way, since everything | 3676 /* It's hopefully okay to write the code this way, since everything |
3677 will soon be in caches, and no consing will be done at all. */ | 3677 will soon be in caches, and no consing will be done at all. */ |
3678 Lisp_Object parsed; | 3678 Lisp_Object parsed; |
3679 | 3679 |
3680 parsed = parse_modifiers (symbol); | 3680 parsed = parse_modifiers (symbol); |
3681 return apply_modifiers (XINT (XCONS (XCONS (parsed)->cdr)->car), | 3681 return apply_modifiers ((int) XINT (XCONS (XCONS (parsed)->cdr)->car), |
3682 XCONS (parsed)->car); | 3682 XCONS (parsed)->car); |
3683 } | 3683 } |
3684 | 3684 |
3685 | 3685 |
3686 /* For handling events, we often want to produce a symbol whose name | 3686 /* For handling events, we often want to produce a symbol whose name |