diff src/keymap.c @ 81794:c1184a3d99c9

(map_char_table): Use an array of int for `indices' rather than an array of Lisp_Objects (which are only ever integers anyway).
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 10 Jul 2007 15:40:06 +0000
parents 4ee4f467ca51
children b98604865ea0 0ece58f6e0aa a66921565bcb
line wrap: on
line diff
--- a/src/keymap.c	Tue Jul 10 15:23:36 2007 +0000
+++ b/src/keymap.c	Tue Jul 10 15:40:06 2007 +0000
@@ -429,7 +429,7 @@
 
       if (CHAR_TABLE_P (XCAR (list)))
 	{
-	  Lisp_Object indices[3];
+	  int indices[3];
 
 	  map_char_table (fix_submap_inheritance, Qnil,
 			  XCAR (list), XCAR (list),
@@ -728,7 +728,7 @@
 	}
       else if (CHAR_TABLE_P (binding))
 	{
-	  Lisp_Object indices[3];
+	  int indices[3];
 	  map_char_table (map_keymap_char_table_item, Qnil, binding, binding,
 			  Fcons (make_save_value (fun, 0),
 				 Fcons (make_save_value (data, 0),
@@ -1079,7 +1079,7 @@
       Lisp_Object elt = XCAR (keymap);
       if (CHAR_TABLE_P (elt))
 	{
-	  Lisp_Object indices[3];
+	  int indices[3];
 	  elt = Fcopy_sequence (elt);
 	  map_char_table (copy_keymap_1, Qnil, elt, elt, elt, 0, indices);
 	}