changeset 88927:cd7645c9842b

Remove `emacs' conditional. Doc fixes. (map_char_table_for_charset): Declare.
author Dave Love <fx@gnu.org>
date Tue, 30 Jul 2002 11:33:15 +0000
parents f026b7e4fc61
children 168e6393f622
files src/charset.c
diffstat 1 files changed, 11 insertions(+), 15 deletions(-) [+]
line wrap: on
line diff
--- a/src/charset.c	Tue Jul 30 11:32:52 2002 +0000
+++ b/src/charset.c	Tue Jul 30 11:33:15 2002 +0000
@@ -23,16 +23,11 @@
 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 Boston, MA 02111-1307, USA.  */
 
-#ifdef emacs
 #include <config.h>
-#endif
 
 #include <stdio.h>
 #include <unistd.h>
 #include <ctype.h>
-
-#ifdef emacs
-
 #include <sys/types.h>
 #include "lisp.h"
 #include "character.h"
@@ -41,13 +36,6 @@
 #include "disptab.h"
 #include "buffer.h"
 
-#else  /* not emacs */
-
-#include "mulelib.h"
-
-#endif /* emacs */
-
-
 /*** GENERAL NOTES on CODED CHARACTER SETS (CHARSETS) ***
 
   A coded character set ("charset" hereafter) is a meaningful
@@ -108,7 +96,7 @@
 Lisp_Object Vcharset_ordered_list;
 
 /* Incremented everytime we change Vcharset_ordered_list.  This is
-   unsigned short so that it fits in Lisp_Int and never match with
+   unsigned short so that it fits in Lisp_Int and never matches
    -1.  */
 unsigned short charset_ordered_list_tick;
 
@@ -128,6 +116,13 @@
 
 Lisp_Object Vchar_unified_charset_table;
 
+/* Defined in chartab.c */
+extern void
+map_char_table_for_charset P_ ((void (*c_function) (Lisp_Object, Lisp_Object),
+				Lisp_Object function, Lisp_Object table,
+				Lisp_Object arg, struct charset *charset,
+				unsigned from, unsigned to));
+
 #define CODE_POINT_TO_INDEX(charset, code)				\
   ((charset)->code_linear_p						\
    ? (code) - (charset)->min_code					\
@@ -1140,8 +1135,8 @@
 This means reading the relevant file and installing the table defined
 by CHARSET's `:unify-map' property.
 
-Optional second arg UNIFY-MAP a file name string or vector that has
-the same meaning of the `:unify-map' attribute of the function
+Optional second arg UNIFY-MAP is a file name string or a vector.  It has
+the same meaning as the `:unify-map' attribute in the function
 `define-charset' (which see).
 
 Optional third argument DEUNIFY, if non-nil, means to de-unify CHARSET.  */)
@@ -1281,6 +1276,7 @@
     {
       int c = STRING_CHAR_ADVANCE (p);
 
+      /* Fixme: comparison of unsigned expression < 0 is always false */
       if (ENCODE_CHAR (charset, c) < 0)
 	return 2;
     }