changeset 88860:23c58f02c558

Comments.
author Dave Love <fx@gnu.org>
date Tue, 16 Jul 2002 21:58:25 +0000
parents b3fe0014215b
children 5ca38cce6f72
files src/charset.c
diffstat 1 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/charset.c	Tue Jul 16 15:22:12 2002 +0000
+++ b/src/charset.c	Tue Jul 16 21:58:25 2002 +0000
@@ -1225,8 +1225,8 @@
 	   true for a unibyte string.  For a multibyte string, true if
 	   it contains only ASCII characters.
 
-	1: No charsets other than ascii, eight-bit-control, and
-	latin-1 are found.
+	1: No charsets other than ascii, control-1, and latin-1 are
+	   found.
 
 	2: Otherwise.
 */
@@ -1302,7 +1302,7 @@
     }
 }
 
-
+/* Fixme: returns nil for unibyte.  */
 DEFUN ("find-charset-region", Ffind_charset_region, Sfind_charset_region,
        2, 3, 0,
        doc: /* Return a list of charsets in the region between BEG and END.
@@ -1356,6 +1356,7 @@
   return val;
 }
 
+/* Fixme: returns nil for unibyte.  */
 DEFUN ("find-charset-string", Ffind_charset_string, Sfind_charset_string,
        1, 2, 0,
        doc: /* Return a list of charsets in STR.
@@ -1471,7 +1472,8 @@
 Lisp_Object charset_work;
 
 /* Return a code-point of CHAR in CHARSET.  If CHAR doesn't belong to
-   CHARSET, return CHARSET_INVALID_CODE (CHARSET).  */
+   CHARSET, return CHARSET_INVALID_CODE (CHARSET).  If STRICT is true,
+   use CHARSET's strict_max_char instead of max_char.  */
 
 unsigned
 encode_char (charset, c)