Make Perl_op_lvalue_flags provide a no-croak option

This is in preparation for making the \$ prototype accept any lvalue.

1 files changed, 4 insertions, 0 deletions

diff --git a/op.h b/op.h
index 24463a8fd4..ce17bd53f2 100644
--- a/op.h
+++ b/op.h
@@ -765,6 +765,10 @@ preprocessing token; the type of I<arg> depends on I<which>.
 
 #define op_lvalue(op,t) Perl_op_lvalue_flags(aTHX_ op,t,0)
 
+/* flags for op_lvalue_flags */
+
+#define OP_LVALUE_NO_CROAK 1
+
 /*
 =head1 Custom Operators