diff options
| author | Craig A. Berry <craigberry@mac.com> | 2016-12-29 14:03:43 -0600 |
|---|---|---|
| committer | Craig A. Berry <craigberry@mac.com> | 2016-12-29 14:03:43 -0600 |
| commit | 9637d2a524bfab39fd1e4cbf27b8f632a8265e9e (patch) | |
| tree | 46fcc11084844983fc5ea501473277175ebda943 | |
| parent | 1146f1f7c1f33f0ef2a05fc75de4f87f7e821d93 (diff) | |
| download | perl-9637d2a524bfab39fd1e4cbf27b8f632a8265e9e.tar.gz | |
Don't define Perl_isFOO_lc in the regex extension.
Otherwise it ends up multiply defined, which annoys the VMS linker
(and probably the AIX linker too).
| -rw-r--r-- | regexec.c | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -445,6 +445,8 @@ S_regcp_restore(pTHX_ regexp *rex, I32 ix, U32 *maxopenparen_p _pDEPTH) #define regcpblow(cp) LEAVE_SCOPE(cp) /* Ignores regcppush()ed data. */ +#ifndef PERL_IN_XSUB_RE + bool Perl_isFOO_lc(pTHX_ const U8 classnum, const U8 character) { @@ -486,6 +488,8 @@ Perl_isFOO_lc(pTHX_ const U8 classnum, const U8 character) return FALSE; } +#endif + STATIC bool S_isFOO_utf8_lc(pTHX_ const U8 classnum, const U8* character) { |