From a90f2c3549a5173e59755ac834c4f85505b3fcc8 Mon Sep 17 00:00:00 2001
From: Ken Raeburn <raeburn@raeburn.org>
Date: Tue, 16 Jul 2002 19:48:04 +0000
Subject: [PATCH] (Ffind_coding_systems_region_interval): Use const for pointer
 to lisp string data.

---
 src/coding.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/coding.c b/src/coding.c
index 0afe0b3ac42..23ccfbce390 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -6414,7 +6414,7 @@ DEFUN ("find-coding-systems-region-internal",
   Lisp_Object work_table, safe_codings;
   int non_ascii_p = 0;
   int single_byte_char_found = 0;
-  unsigned char *p1, *p1end, *p2, *p2end, *p;
+  const unsigned char *p1, *p1end, *p2, *p2end, *p;
 
   if (STRINGP (start))
     {
-- 
2.39.5