diff options
| author | Paul Eggert | 2011-06-03 11:11:17 -0700 |
|---|---|---|
| committer | Paul Eggert | 2011-06-03 11:11:17 -0700 |
| commit | 39bc618abbfc4805d4d7dec195826577ef71da77 (patch) | |
| tree | c2fdf181a953d6168200c03c497a2b2f1f5aa132 /src/charset.c | |
| parent | ea9fafe0937ebd99780610a7c1451ca08b013702 (diff) | |
| parent | 369b7e5ac5a6609433fc017d09e1f31750f033a7 (diff) | |
| download | emacs-39bc618abbfc4805d4d7dec195826577ef71da77.tar.gz emacs-39bc618abbfc4805d4d7dec195826577ef71da77.zip | |
Minor fixes for signed vs unsigned integers.
* character.h (MAYBE_UNIFY_CHAR):
* charset.c (maybe_unify_char):
* keyboard.c (read_char, reorder_modifiers):
XINT -> XFASTINT, since the integer must be nonnegative.
* ftfont.c (ftfont_spec_pattern):
* keymap.c (access_keymap, silly_event_symbol_error):
XUINT -> XFASTINT, since the integer must be nonnegative.
(Fsingle_key_description, preferred_sequence_p): XUINT -> XINT,
since it makes no difference and we prefer signed.
* keyboard.c (record_char): Use XUINT when all the neighbors do.
(access_keymap): NATNUMP -> INTEGERP, since the integer must be
nonnegative.
Diffstat (limited to 'src/charset.c')
| -rw-r--r-- | src/charset.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/charset.c b/src/charset.c index 0af21b48ad2..bfebe02f52e 100644 --- a/src/charset.c +++ b/src/charset.c | |||
| @@ -1637,7 +1637,7 @@ maybe_unify_char (int c, Lisp_Object val) | |||
| 1637 | struct charset *charset; | 1637 | struct charset *charset; |
| 1638 | 1638 | ||
| 1639 | if (INTEGERP (val)) | 1639 | if (INTEGERP (val)) |
| 1640 | return XINT (val); | 1640 | return XFASTINT (val); |
| 1641 | if (NILP (val)) | 1641 | if (NILP (val)) |
| 1642 | return c; | 1642 | return c; |
| 1643 | 1643 | ||
| @@ -1647,7 +1647,7 @@ maybe_unify_char (int c, Lisp_Object val) | |||
| 1647 | { | 1647 | { |
| 1648 | val = CHAR_TABLE_REF (Vchar_unify_table, c); | 1648 | val = CHAR_TABLE_REF (Vchar_unify_table, c); |
| 1649 | if (! NILP (val)) | 1649 | if (! NILP (val)) |
| 1650 | c = XINT (val); | 1650 | c = XFASTINT (val); |
| 1651 | } | 1651 | } |
| 1652 | else | 1652 | else |
| 1653 | { | 1653 | { |