From: Juanma Barranquero <lekktu@gmail.com>
Date: Sun, 4 Jul 2010 14:40:41 +0000 (+0200)
Subject: * print.c (strout): Use const char* for arg PTR.
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~51^2~81^2~38
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dcc7404b4e06e555f110948bd509d34bf1889633;p=emacs.git

* print.c (strout): Use const char* for arg PTR.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 8be43ce844b..fecd07da955 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -6,6 +6,7 @@
 	* dired.c (file_name_completion_stat): Use DIRENTRY, not struct dirent.
 	* fileio.c (read_non_regular, read_non_regular_quit): Pass Lisp_Object,
 	as required by internal_condition_case_1.
+	* print.c (strout): Use const char* for arg PTR.
 	* regex.c (bcmp_translate): Use RE_TRANSLATE_TYPE, not Lisp_Object.
 	(analyse_first): Fix "const const".
 	* sysdep.c (set_file_times): Use EMACS_TIME, not struct timeval.
diff --git a/src/print.c b/src/print.c
index 76ce467eed0..ea00a90d37b 100644
--- a/src/print.c
+++ b/src/print.c
@@ -350,7 +350,8 @@ printchar (unsigned int ch, Lisp_Object fun)
    to data in a Lisp string.  Otherwise that is not safe.  */
 
 static void
-strout (char *ptr, int size, int size_byte, Lisp_Object printcharfun, int multibyte)
+strout (const char *ptr, int size, int size_byte, Lisp_Object printcharfun,
+	int multibyte)
 {
   if (size < 0)
     size_byte = size = strlen (ptr);