op.c:op_lvalue: Remove redundent case OP_RETURN

The default case does nothing if the type is OP_LEAVESUBLV.  This has
been so since 145b2bbb3.

diff --git a/op.c b/op.c
index c864a26..162497c 100644 (file)
--- a/op.c
+++ b/op.c
@@ -2617,11 +2617,6 @@ Perl_op_lvalue_flags(pTHX_ OP *o, I32 type, U32 flags)
                op_lvalue(kid, type);
        break;
 
-    case OP_RETURN:
-       if (type != OP_LEAVESUBLV)
-           goto nomod;
-       break; /* op_lvalue()ing was handled by ck_return() */
-
     case OP_COREARGS:
        return o;