Mercurial > emacs
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; }