On Thu, 11 Aug 2016 09:24:31 -0700, coke wrote:
> On Wed Oct 28 13:40:45 2015, gfldex wrote:
> > sub foo(@a is copy, :$flag){ say @a };
> > my @a = 1,2;
> > (&foo.assuming(:flag))(@a);
> >
> > # OUTPUT«replace this Array is copy logic in sub __PRIMED_ANON at
> > EVAL_2:2 in sub __PRIMED_ANON
On Wed Oct 28 13:40:45 2015, gfldex wrote:
> sub foo(@a is copy, :$flag){ say @a };
> my @a = 1,2;
> (&foo.assuming(:flag))(@a);
>
> # OUTPUT«replace this Array is copy logic in sub __PRIMED_ANON at
> EVAL_2:2 in sub __PRIMED_ANON at
> EVAL_2:1 in block at /tmp/TlcJQPUFbc:1
Coming from:
# New Ticket Created by Wenzel Peppmeyer
# Please include the string: [perl #126477]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=126477 >
sub foo(@a is copy, :$flag){ say @a };
my @a = 1,2;
(&foo.assuming(:flag))(@a);
# O