This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
document what op.c:S_lvref() does
authorDavid Mitchell <davem@iabyn.com>
Tue, 4 Jun 2019 12:41:21 +0000 (13:41 +0100)
committerDavid Mitchell <davem@iabyn.com>
Mon, 24 Jun 2019 10:40:07 +0000 (11:40 +0100)
op.c

diff --git a/op.c b/op.c
index ee0cf81..df33fc5 100644 (file)
--- a/op.c
+++ b/op.c
@@ -4004,6 +4004,15 @@ S_vivifies(const OPCODE type)
     return 0;
 }
 
+
+/* apply lvalue reference (aliasing) context to the optree o.
+ * E.g. in
+ *     \($x,$y) = (...)
+ * o would be the list ($x,$y) and type would be OP_AASSIGN.
+ * It may descend and apply this to children too, for example in
+ * \( $cond ? $x, $y) = (...)
+ */
+
 static void
 S_lvref(pTHX_ OP *o, I32 type)
 {