changeset 46466:9629aca792bb

(font_family_registry, fs_query_fontset): (list_fontsets): Use const for pointer to lisp string data.
author Ken Raeburn <raeburn@raeburn.org>
date Tue, 16 Jul 2002 19:48:21 +0000
parents 5c56d4068a01
children 1a3b3b66171c
files src/fontset.c
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/fontset.c	Tue Jul 16 19:48:17 2002 +0000
+++ b/src/fontset.c	Tue Jul 16 19:48:21 2002 +0000
@@ -370,8 +370,8 @@
      int force;
 {
   Lisp_Object family, registry;
-  char *p = SDATA (fontname);
-  char *sep[15];
+  const char *p = SDATA (fontname);
+  const char *sep[15];
   int i = 0;
 
   while (*p && i < 15)
@@ -782,7 +782,7 @@
   for (i = 0; i < ASIZE (Vfontset_table); i++)
     {
       Lisp_Object fontset;
-      unsigned char *this_name;
+      const unsigned char *this_name;
 
       fontset = FONTSET_FROM_ID (i);
       if (NILP (fontset)
@@ -847,7 +847,7 @@
   for (id = 0; id < ASIZE (Vfontset_table); id++)
     {
       Lisp_Object fontset;
-      unsigned char *name;
+      const unsigned char *name;
 
       fontset = FONTSET_FROM_ID (id);
       if (NILP (fontset)