From f41d5e870e6bc7e23ad0c6501a5150d076f0633c Mon Sep 17 00:00:00 2001
From: Zoffix Znet <cpan@zoffix.com>
Date: Thu, 11 Jan 2018 20:28:32 -0500
Subject: [PATCH] Comment that META_ASSIGN op-doubling on :U's is by design

---
 src/Perl6/Optimizer.nqp | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/Perl6/Optimizer.nqp b/src/Perl6/Optimizer.nqp
index 44f4c6ffb17..f43439c631b 100644
--- a/src/Perl6/Optimizer.nqp
+++ b/src/Perl6/Optimizer.nqp
@@ -1704,6 +1704,9 @@ class Perl6::Optimizer {
                                     $assignee_var,
                                     $operand));
                             } else {
+                                # We end up with two calls of the op if var
+                                # is not definite. This is by design:
+                                # https://irclog.perlgeek.de/perl6-dev/2018-01-12#i_15681388
                                 $op.push(QAST::Op.new( :op($call), :name($metaop[0].name),
                                     QAST::Op.new( :op('if'),
                                         QAST::Op.new( :op('p6definite'), $assignee_var),