Mercurial > hg > xemacs-beta
changeset 5873:5a311f1f46aa
Don't extract a fixnum value unnecessarily, thank you Robert Delius Royar
2015-03-20 Aidan Kehoe <kehoea@parhasard.net>
* data.c (build_fixnum_to_char_map):
Whoops, highest_value is a Lisp_Object, no need to extract the
fixnum from radix_table->default_ when initialising it. Thank you
Robert Delius Royar, Uwe Brauer, and the union build.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Fri, 20 Mar 2015 13:48:16 +0000 |
| parents | f9e59cd39a9a |
| children | 3ed83b4b4882 |
| files | src/ChangeLog src/data.c |
| diffstat | 2 files changed, 9 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Tue Mar 17 12:22:50 2015 +0000 +++ b/src/ChangeLog Fri Mar 20 13:48:16 2015 +0000 @@ -1,3 +1,10 @@ +2015-03-20 Aidan Kehoe <kehoea@parhasard.net> + + * data.c (build_fixnum_to_char_map): + Whoops, highest_value is a Lisp_Object, no need to extract the + fixnum from radix_table->default_ when initialising it. Thank you + Robert Delius Royar, Uwe Brauer, and the union build. + 2015-03-17 Aidan Kehoe <kehoea@parhasard.net> * data.c (fill_ichar_array):
--- a/src/data.c Tue Mar 17 12:22:50 2015 +0000 +++ b/src/data.c Fri Mar 20 13:48:16 2015 +0000 @@ -1517,7 +1517,8 @@ /* What's the greatest fixnum value seen? In passing, check all the char table values are fixnums. */ CHECK_FIXNUM (XCHAR_TABLE (radix_table)->default_); - highest_value = XFIXNUM (XCHAR_TABLE (radix_table)->default_); + highest_value = XCHAR_TABLE (radix_table)->default_; + map_char_table (radix_table, &ctr, find_highest_value, &highest_value); cclen = XFIXNUM (highest_value) + 1;