S_pmtrans(): always use op_private flag variables

Various flag vars are set early on, such as:

    const I32 complement = o->op_private & OPpTRANS_COMPLEMENT;

but sometimes these vars weren't being used, and op_private was being
tested again.

1 files changed, 2 insertions, 3 deletions

diff --git a/op.c b/op.c
index dd4431159b..6504ef0cdd 100644
--- a/op.c
+++ b/op.c
@@ -6632,9 +6632,8 @@ S_pmtrans(pTHX_ OP *o, OP *expr, OP *repl)
     tbl = (short*)PerlMemShared_calloc(
                     /* one slot for 'extra len' count and one slot
                      * for possible storing of last replacement char */
-	(o->op_private & OPpTRANS_COMPLEMENT) &&
-	    !(o->op_private & OPpTRANS_DELETE) ? 258 : 256,
-	sizeof(short));
+                    (complement && !del) ? 258 : 256,
+                    sizeof(short));
     cPVOPo->op_pv = (char*)tbl;
 
     if (complement) {