[svn:parrot] r18681 - in trunk: include/parrot src

[petdance]

Author: petdance
Date: Wed May 30 00:01:27 2007
New Revision: 18681

Modified:
   trunk/include/parrot/string_funcs.h
   trunk/src/string.c

Log:
string_escape_string need not have a volatile argument

Modified: trunk/include/parrot/string_funcs.h
==============================================================================
--- trunk/include/parrot/string_funcs.h (original)
+++ trunk/include/parrot/string_funcs.h Wed May 30 00:01:27 2007
@@ -100,8 +100,8 @@
 PARROT_API size_t string_hash(Interp *interp, STRING *s, size_t seed);
 PARROT_API STRING * string_unescape_cstring(Interp *,
         const char *cstring, char delimiter, const char *enc_or_charset);
-PARROT_API STRING * string_escape_string(Interp *, STRING *);
-PARROT_API STRING * string_escape_string_delimited(Interp *, STRING *,
+PARROT_API STRING * string_escape_string(Interp *, const STRING *);
+PARROT_API STRING * string_escape_string_delimited(Interp *, const STRING *,
         UINTVAL len);
 PARROT_API STRING * string_compose(Interp *, STRING *);
 

Modified: trunk/src/string.c
==============================================================================
--- trunk/src/string.c  (original)
+++ trunk/src/string.c  Wed May 30 00:01:27 2007
@@ -1991,7 +1991,7 @@
 */
 
 STRING *
-string_escape_string(Interp *interp, STRING *src)
+string_escape_string(Interp *interp, const STRING *src)
 {
     return string_escape_string_delimited(interp, src,
             (UINTVAL) ~0);
@@ -2007,7 +2007,7 @@
 
 STRING *
 string_escape_string_delimited(Interp *interp,
-        STRING *src, UINTVAL limit)
+        const STRING *src, UINTVAL limit)
 {
     STRING *result, *hex;
     UINTVAL i, len, charlen;