summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorYves Orton <demerphq@gmail.com>2022-11-04 09:19:59 +0100
committerYves Orton <demerphq@gmail.com>2022-11-04 14:51:48 +0100
commit6794399818608ae0dc08fa8d114a949907b51ef4 (patch)
treeb045f1908cba4a9212cd1d7d2844f028580fa56a /regcomp.c
parentb622b1c5ab0a4c0b6603644cfe4f489f485e11a9 (diff)
downloadperl-6794399818608ae0dc08fa8d114a949907b51ef4.tar.gz
regcomp.c - remove always true condition
RX_PRECOMP() has for some time been an expression that will always be true, thus there is not need to test it.
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/regcomp.c b/regcomp.c
index 0c380ec031..24b2cacc34 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -8109,7 +8109,6 @@ Perl_re_op_compile(pTHX_ SV ** const patternp, int pat_count,
&& !recompile
&& cBOOL(RX_UTF8(old_re)) == cBOOL(RExC_utf8)
&& ( RX_COMPFLAGS(old_re) == ( orig_rx_flags & RXf_PMf_FLAGCOPYMASK ) )
- && RX_PRECOMP(old_re)
&& RX_PRELEN(old_re) == plen
&& memEQ(RX_PRECOMP(old_re), exp, plen)
&& !runtime_code /* with runtime code, always recompile */ )