This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Uncheckedin generated files.
[perl5.git] / perlapi.c
index 0e5f9a5..bb32970 100644 (file)
--- a/perlapi.c
+++ b/perlapi.c
@@ -2319,6 +2319,13 @@ Perl_regdump(pTHXo_ regexp* r)
     ((CPerlObj*)pPerl)->Perl_regdump(r);
 }
 
+#undef  Perl_regclass_swash
+SV*
+Perl_regclass_swash(pTHXo_ struct regnode *n, bool doinit, SV **initsvp)
+{
+    return ((CPerlObj*)pPerl)->Perl_regclass_swash(n, doinit, initsvp);
+}
+
 #undef  Perl_pregexec
 I32
 Perl_pregexec(pTHXo_ regexp* prog, char* stringarg, char* strend, char* strbeg, I32 minend, SV* screamer, U32 nosave)