S_lvref() OP_[AH]SLICE => OP_LVREFSLICE flag issue

RT #128252 Assert fail in op.c

In S_lvref(), when it's converting an OP_ASLICE or OP_HSLICE into a
OP_LVREFSLICE op, it clears all private flags except those supported by
both ops.  Except that it got it wrong. OPpLVREF_ELEM isn't a valid flag
for OP_[AH]SLICE (that bit corresponds to OPpSLICEWARNING for [ah]slice)
and that bit isn't valid for OP_LVREFSLICE. So don't preserve that bit.

1 files changed, 1 insertions, 1 deletions

diff --git a/op.c b/op.c
index 8008a2146c..fccb5f65be 100644
--- a/op.c
+++ b/op.c
@@ -2744,7 +2744,7 @@ S_lvref(pTHX_ OP *o, I32 type)
     case OP_ASLICE:
     case OP_HSLICE:
         OpTYPE_set(o, OP_LVREFSLICE);
-	o->op_private &= OPpLVAL_INTRO|OPpLVREF_ELEM;
+	o->op_private &= OPpLVAL_INTRO;
 	return;
     case OP_NULL:
 	if (o->op_flags & OPf_SPECIAL)		/* do BLOCK */