precomp in struct regexp can be const char *.

p4raw-id: //depot/perl@30812

1 files changed, 2 insertions, 1 deletions

diff --git a/regexp.h b/regexp.h
index e17b2c9c4b..e195f67053 100644
--- a/regexp.h
+++ b/regexp.h
@@ -89,8 +89,9 @@ typedef struct regexp {
         
         
         /* Information about the match that isn't often used */
-	char *precomp;		/* pre-compilation regular expression */
+	const char *precomp;	/* pre-compilation regular expression */
 	I32 prelen;		/* length of precomp */
+	/* wrapped can't be const char*, as it is returned by sv_2pv_flags */
 	char *wrapped;          /* wrapped version of the pattern */
 	I32 wraplen;		/* length of wrapped */
 	I32 seen_evals;         /* number of eval groups in the pattern - for security checks */