[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/chartab.c [emacs-unicode-2]
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] Changes to emacs/src/chartab.c [emacs-unicode-2] |
Date: |
Mon, 06 Oct 2003 07:20:45 -0400 |
Index: emacs/src/chartab.c
diff -c emacs/src/chartab.c:1.1.4.2 emacs/src/chartab.c:1.1.4.3
*** emacs/src/chartab.c:1.1.4.2 Wed Sep 10 06:52:45 2003
--- emacs/src/chartab.c Mon Oct 6 07:20:45 2003
***************
*** 642,649 ****
}
/* Look up the element in TABLE at index CH, and return it as an
! integer. If the element is nil, return CH itself. (Actually we do
! that for any non-integer.) */
int
char_table_translate (table, ch)
--- 642,648 ----
}
/* Look up the element in TABLE at index CH, and return it as an
! integer. If the element is not a character, return CH itself. */
int
char_table_translate (table, ch)
***************
*** 652,658 ****
{
Lisp_Object value;
value = Faref (table, make_number (ch));
! if (! INTEGERP (value)) /* fixme: use CHARACTERP? */
return ch;
return XINT (value);
}
--- 651,657 ----
{
Lisp_Object value;
value = Faref (table, make_number (ch));
! if (! CHARACTERP (value))
return ch;
return XINT (value);
}
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/src/chartab.c [emacs-unicode-2],
Kenichi Handa <=