SvPV() does not take a const SV*, which means that the pattern argument

to Perl_re_compile() can't be const, which means that the pattern
argument to Perl_pregcomp() can't be const, as can't the argument in
the function in the regexp engine structure.

It's a shame that no-one spotted this earlier.
(Again) I may have rendered the documentation inaccurate.

p4raw-id: //depot/perl@34672

1 files changed, 1 insertions, 1 deletions

diff --git a/regexp.h b/regexp.h
index 2bdcf26286..8cce3b32be 100644
--- a/regexp.h
+++ b/regexp.h
@@ -129,7 +129,7 @@ typedef struct re_scream_pos_data_s
  * Any regex engine implementation must be able to build one of these.
  */
 typedef struct regexp_engine {
-    REGEXP* (*comp) (pTHX_ const SV * const pattern, U32 flags);
+    REGEXP* (*comp) (pTHX_ SV * const pattern, U32 flags);
     I32     (*exec) (pTHX_ REGEXP * const rx, char* stringarg, char* strend,
                      char* strbeg, I32 minend, SV* screamer,
                      void* data, U32 flags);