# HG changeset patch
# User Aidan Kehoe <kehoea@parhasard.net>
# Date 1426859296 0
# Node ID 5a311f1f46aaf7481c34f90d66d4666c3d9838d3
# Parent  f9e59cd39a9a3ac98bee0a471a22fda8e0d7c19d
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.

diff -r f9e59cd39a9a -r 5a311f1f46aa src/ChangeLog
--- 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):
diff -r f9e59cd39a9a -r 5a311f1f46aa src/data.c
--- 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;