Fold the otherwise-unused PADNAME variables into their assert() expre…

…ssions so as not to get warnings of unused vars when not in -DDEBUGGING

op.c

@@ -16262,9 +16262,7 @@ Perl_subsignature_append_positional(pTHX_ OP *varop, OPCODE defmode, OP *defexpr
         assert(varop->op_type == OP_ARGELEM);
         assert((varop->op_private & OPpARGELEM_MASK) == OPpARGELEM_SV);
         assert(varop->op_targ);
-
-        PADNAME *pn = PadnamelistARRAY(PL_comppad_name)[varop->op_targ];
-        assert(PadnamePV(pn)[0] == '$');
+        assert(PadnamePV(PadnamelistARRAY(PL_comppad_name)[varop->op_targ])[0] == '$');
 
         /* Now fill in the argix */
         cUNOP_AUXx(varop)->op_aux = INT2PTR(UNOP_AUX_item *, argix);
@@ -16345,9 +16343,7 @@ Perl_subsignature_append_slurpy(pTHX_ I32 sigil, OP *varop)
         assert((varop->op_private & OPpARGELEM_MASK) ==
                 ((sigil == '@') ? OPpARGELEM_AV : OPpARGELEM_HV));
         assert(varop->op_targ);
-
-        PADNAME *pn = PadnamelistARRAY(PL_comppad_name)[varop->op_targ];
-        assert(PadnamePV(pn)[0] == sigil);
+        assert(PadnamePV(PadnamelistARRAY(PL_comppad_name)[varop->op_targ])[0] == sigil);
 
         /* Now fill in the argix */
         cUNOP_AUXx(varop)->op_aux = INT2PTR(UNOP_AUX_item *, argix);