]> git.eshelyaron.com Git - emacs.git/commitdiff
(find_charset_in_text, c_string_width):
authorKen Raeburn <raeburn@raeburn.org>
Tue, 16 Jul 2002 19:48:00 +0000 (19:48 +0000)
committerKen Raeburn <raeburn@raeburn.org>
Tue, 16 Jul 2002 19:48:00 +0000 (19:48 +0000)
(parse_str_as_multibyte): Declarations updated.
(FETCH_STRING_CHAR_ADVANCE):
(FETCH_STRING_CHAR_ADVANCE_NO_CHECK): Use const for pointer to
lisp string data.

src/charset.h

index c84d33ca89dd3ed1081a5d57b6c5301f2cb2e5f1..58e8f3dfb9d73b46b6bbabb4be1fce8441bb5752 100644 (file)
@@ -573,7 +573,7 @@ if (1)                                                                         \
     CHARIDX++;                                                            \
     if (STRING_MULTIBYTE (STRING))                                        \
       {                                                                           \
-       unsigned char *ptr = SDATA (STRING) + BYTEIDX;                     \
+       const unsigned char *ptr = SDATA (STRING) + BYTEIDX;               \
        int space_left = SBYTES (STRING) - BYTEIDX;                        \
        int actual_len;                                                    \
                                                                           \
@@ -590,7 +590,7 @@ else
 #define FETCH_STRING_CHAR_ADVANCE_NO_CHECK(OUTPUT, STRING, CHARIDX, BYTEIDX)  \
 if (1)                                                                       \
   {                                                                          \
-    unsigned char *fetch_string_char_ptr = SDATA (STRING) + BYTEIDX;         \
+    const unsigned char *fetch_string_char_ptr = SDATA (STRING) + BYTEIDX;    \
     int fetch_string_char_space_left = SBYTES (STRING) - BYTEIDX;            \
     int actual_len;                                                          \
                                                                              \
@@ -794,16 +794,17 @@ extern int char_to_string_1 P_ ((int, unsigned char *));
 extern int string_to_char P_ ((const unsigned char *, int, int *));
 extern int char_printable_p P_ ((int c));
 extern int multibyte_form_length P_ ((const unsigned char *, int));
-extern void parse_str_as_multibyte P_ ((unsigned char *, int, int *, int *));
+extern void parse_str_as_multibyte P_ ((const unsigned char *, int, int *,
+                                       int *));
 extern int str_as_multibyte P_ ((unsigned char *, int, int, int *));
 extern int parse_str_to_multibyte P_ ((unsigned char *, int));
 extern int str_to_multibyte P_ ((unsigned char *, int, int));
 extern int str_as_unibyte P_ ((unsigned char *, int));
 extern int get_charset_id P_ ((Lisp_Object));
-extern int find_charset_in_text P_ ((unsigned char *, int, int, int *,
+extern int find_charset_in_text P_ ((const unsigned char *, int, int, int *,
                                    Lisp_Object));
 extern int strwidth P_ ((unsigned char *, int));
-extern int c_string_width P_ ((unsigned char *, int, int, int *, int *));
+extern int c_string_width P_ ((const unsigned char *, int, int, int *, int *));
 extern int lisp_string_width P_ ((Lisp_Object, int, int *, int *));
 extern int char_bytes P_ ((int));
 extern int char_valid_p P_ ((int, int));