diff src/lisp.h @ 95430:04a952ac356f

* chartab.c (Foptimize_char_table, optimize_sub_char_table): Add a `test' argument so another predicate than `equal' can be used. (map_sub_char_table): Use `eq' rather than `equal' to merge ranges. (map_char_table): Remove unused vars `c' and `i'. * lisp.h (Foptimize_char_table): Adjust declaration. * charset.c (Fclear_charset_maps): Adjust call to Foptimize_char_table.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 30 May 2008 21:07:50 +0000
parents b8f0e53854e1
children 9a4b27c8feec
line wrap: on
line diff
--- a/src/lisp.h	Fri May 30 19:52:41 2008 +0000
+++ b/src/lisp.h	Fri May 30 21:07:50 2008 +0000
@@ -2628,7 +2628,7 @@
 EXFUN (Fchar_table_range, 2);
 EXFUN (Fset_char_table_range, 3);
 EXFUN (Fset_char_table_default, 3);
-EXFUN (Foptimize_char_table, 1);
+EXFUN (Foptimize_char_table, 2);
 EXFUN (Fmap_char_table, 2);
 extern Lisp_Object copy_char_table P_ ((Lisp_Object));
 extern Lisp_Object sub_char_table_ref P_ ((Lisp_Object, int));