Fix various mad eval leaks

[perl5.git] / x2p / util.h

diff --git a/x2p/util.h b/x2p/util.h
index 74341c2..3330a60 100644 (file)
--- a/x2p/util.h
+++ b/x2p/util.h
@@ -21,8 +21,8 @@
 char * cpy2 ( char *to, char *from, int delim );
 char * cpytill ( char *to, char *from, int delim );
 void growstr ( char **strptr, int *curlen, int newlen );
-char * instr ( char *big, char *little );
-char * savestr ( char *str );
+char * instr ( char *big, const char *little );
+char * savestr ( const char *str );
 void fatal ( const char *pat, ... );
 void warn  ( const char *pat, ... );
 int prewalk ( int numit, int level, int node, int *numericptr );