diff options
author | Karl Williamson <khw@cpan.org> | 2020-12-21 09:26:05 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2021-02-10 07:49:20 -0700 |
commit | d9edeb134fe2401a95ccd308c53dc214034e9c6b (patch) | |
tree | 412e9fac69868915155a67be35db5291105a0e98 /regexec.c | |
parent | 7d997a145fef03ebd5e19b1e5116313520c23d6c (diff) | |
download | perl-d9edeb134fe2401a95ccd308c53dc214034e9c6b.tar.gz |
regexec.c: Make internal function static
This used to be called from utf8.c, but no longer; no need to make it
other than static. This allows the compiler to better optimize.
Diffstat (limited to 'regexec.c')
-rw-r--r-- | regexec.c | 8 |
1 files changed, 2 insertions, 6 deletions
@@ -425,10 +425,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) +STATIC bool +S_isFOO_lc(pTHX_ const U8 classnum, const U8 character) { /* Returns a boolean as to whether or not 'character' is a member of the * Posix character class given by 'classnum' that should be equivalent to a @@ -468,8 +466,6 @@ Perl_isFOO_lc(pTHX_ const U8 classnum, const U8 character) return FALSE; } -#endif - PERL_STATIC_INLINE I32 S_foldEQ_latin1_s2_folded(const char *s1, const char *s2, I32 len) { |