Double magic with substr
[p5sagit/p5-mst-13.2.git] / malloc.c
index a8d4554..914436e 100644 (file)
--- a/malloc.c
+++ b/malloc.c
@@ -2463,7 +2463,7 @@ Perl_get_mstats(pTHX_ perl_mstats_t *buf, int buflen, int level)
  * frees for each size category.
  */
 void
-Perl_dump_mstats(pTHX_ char *s)
+Perl_dump_mstats(pTHX_ const char *s)
 {
 #ifdef DEBUGGING_MSTATS
        register int i;