This portion of this commit

> @@ -698,7 +709,8 @@ Perl_op_free(pTHX_ OP *o)
>      if (type == OP_NULL)
>         type = (OPCODE)o->op_targ;
>
> -    Slab_to_rw(o);
> +    if (o->op_slabbed)
> +        Slab_to_rw(OpSLAB(o));
>
>      /* COP* is not cleared by op_clear() so that we may track line
>       * numbers etc even after null() */

Is now generating the following build warning:

op.c: In function 'Perl_op_free':
op.c:713:30: warning: suggest braces around empty body in an 'if' statement

The patch here:

https://rt.perl.org:443/rt3/Ticket/Display.html?id=114744

fixes it (I think).

Reply via email to