comparison src/alloc.c @ 50274:a617ca0d5d85

(make_string_from_bytes): Add `const' for the arg CONTENTS. (make_specified_string): Likewise.
author Kenichi Handa <handa@m17n.org>
date Sun, 23 Mar 2003 02:07:13 +0000
parents fdeb795fc0ec
children 16fdb9f87d89
comparison
equal deleted inserted replaced
50273:ea06392567c0 50274:a617ca0d5d85
1803 /* Make a string from NCHARS characters occupying NBYTES bytes at 1803 /* Make a string from NCHARS characters occupying NBYTES bytes at
1804 CONTENTS. It is a multibyte string if NBYTES != NCHARS. */ 1804 CONTENTS. It is a multibyte string if NBYTES != NCHARS. */
1805 1805
1806 Lisp_Object 1806 Lisp_Object
1807 make_string_from_bytes (contents, nchars, nbytes) 1807 make_string_from_bytes (contents, nchars, nbytes)
1808 char *contents; 1808 const char *contents;
1809 int nchars, nbytes; 1809 int nchars, nbytes;
1810 { 1810 {
1811 register Lisp_Object val; 1811 register Lisp_Object val;
1812 val = make_uninit_multibyte_string (nchars, nbytes); 1812 val = make_uninit_multibyte_string (nchars, nbytes);
1813 bcopy (contents, SDATA (val), nbytes); 1813 bcopy (contents, SDATA (val), nbytes);
1822 string as multibyte. If NCHARS is negative, it counts the number of 1822 string as multibyte. If NCHARS is negative, it counts the number of
1823 characters by itself. */ 1823 characters by itself. */
1824 1824
1825 Lisp_Object 1825 Lisp_Object
1826 make_specified_string (contents, nchars, nbytes, multibyte) 1826 make_specified_string (contents, nchars, nbytes, multibyte)
1827 char *contents; 1827 const char *contents;
1828 int nchars, nbytes; 1828 int nchars, nbytes;
1829 int multibyte; 1829 int multibyte;
1830 { 1830 {
1831 register Lisp_Object val; 1831 register Lisp_Object val;
1832 1832