From 266d9182a2c7501b6d5686442b9273ed85be5e6f Mon Sep 17 00:00:00 2001 From: Father Chrysostomos Date: Thu, 11 Oct 2012 14:05:29 -0700 Subject: Remove PMf_MAYBE_CONST It was added in ce862d02d but has never been used. --- op.c | 3 --- 1 file changed, 3 deletions(-) (limited to 'op.c') diff --git a/op.c b/op.c index 65fb45799a..0240349517 100644 --- a/op.c +++ b/op.c @@ -4808,9 +4808,6 @@ Perl_pmruntime(pTHX_ OP *o, OP *expr, bool isreg, I32 floor) op_prepend_elem(o->op_type, scalar(repl), o); } else { - if (curop == repl && !PM_GETRE(pm)) { /* Has variables. */ - pm->op_pmflags |= PMf_MAYBE_CONST; - } NewOp(1101, rcop, 1, LOGOP); rcop->op_type = OP_SUBSTCONT; rcop->op_ppaddr = PL_ppaddr[OP_SUBSTCONT]; -- cgit v1.2.1