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