Revert "Mathomise save_re_context"
authorDavid Mitchell <davem@iabyn.com>
Thu, 19 Mar 2015 20:30:04 +0000 (20:30 +0000)
committerDavid Mitchell <davem@iabyn.com>
Mon, 30 Mar 2015 11:05:23 +0000 (12:05 +0100)
This reverts commit 0ddd4a5b1910c8bfa9b7e55eb0db60a115fe368c.

Turns out we need the save_re_context() function after all.

mathoms.c
regcomp.c

index bcce2ca..d659883 100644 (file)
--- a/mathoms.c
+++ b/mathoms.c
@@ -1792,12 +1792,6 @@ Perl_utf8_to_uvuni(pTHX_ const U8 *s, STRLEN *retlen)
     return NATIVE_TO_UNI(valid_utf8_to_uvchr(s, retlen));
 }
 
-void
-Perl_save_re_context(pTHX)
-{
-    PERL_UNUSED_CONTEXT;
-}
-
 /*
 =for apidoc Am|HV *|pad_compname_type|PADOFFSET po
 
index 50a9e6c..b572995 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -17710,6 +17710,17 @@ S_re_croak2(pTHX_ bool utf8, const char* pat1,const char* pat2,...)
     Perl_croak(aTHX_ "%"UTF8f, UTF8fARG(utf8, l1-1, buf));
 }
 
+/* Get this:  We have an empty void function here.  But it somehow got into
+   the API, so there you go.  */
+
+#ifndef PERL_IN_XSUB_RE
+void
+Perl_save_re_context(pTHX)
+{
+    PERL_UNUSED_CONTEXT;
+}
+#endif
+
 #ifdef DEBUGGING
 
 STATIC void