Aliased named parameters broke in a recent MoarVM commit

[p6rt]

Migrated from rt.perl.org#131857 (status was 'resolved')

Searchable as RT131857$

[p6rt]

From @MasterDuke17

[22​:44] <MasterDuke> m​: sub foo(​:color(​:$colour)) { $colour + 1 }; my $s;
for ^1000000 { $s += foo(​:color($_)) }; say $s; say now - INIT now
[22​:44] <+camelia> rakudo-moar a91ad2​: OUTPUT​: «Unexpected named argument
'color' passed␤ in sub foo at <tmp> line 1␤ in block <unit> at <tmp> line
1␤␤»
[22​:44] <MasterDuke> bisectable6​: sub foo(​:color(​:$colour)) { $colour + 1
}; my $s; for ^1000000 { $s += foo(​:color($_)) }; say $s;
[22​:44] <+bisectable6> MasterDuke, Bisecting by exit code (old=2015.12
new=a91ad2d). Old exit code​: 0
[22​:44] <+bisectable6> MasterDuke, bisect log​:
https://gist.github.com/651d00f77245537de7326c9316f4513e
[22​:44] <+bisectable6> MasterDuke, (2017-08-04)
rakudo/rakudo@8bed4a6
[22​:45] <Zoffix> haw
[22​:45] <MasterDuke> c​: 2017.07 sub foo(​:color(​:$colour)) { $colour + 1 };
my $s; for ^1000000 { $s += foo(​:color($_)) }; say $s; say now - INIT now
[22​:45] <+committable6> MasterDuke, ¦2017.07​: «500000500000␤1.4953885»

[p6rt]

From @AlexDaniel

No bug with MVM_SPESH_DISABLE=1.

On 2017-08-07 19​:48​:36, ddgreen@​gmail.com wrote​:

[22​:44] <MasterDuke> m​: sub foo(​:color(​:$colour)) { $colour + 1 }; my
$s;
for ^1000000 { $s += foo(​:color($_)) }; say $s; say now - INIT now
[22​:44] <+camelia> rakudo-moar a91ad2​: OUTPUT​: «Unexpected named
argument
'color' passed␤ in sub foo at <tmp> line 1␤ in block <unit> at <tmp>
line
1␤␤»
[22​:44] <MasterDuke> bisectable6​: sub foo(​:color(​:$colour)) { $colour
+ 1
}; my $s; for ^1000000 { $s += foo(​:color($_)) }; say $s;
[22​:44] <+bisectable6> MasterDuke, Bisecting by exit code (old=2015.12
new=a91ad2d). Old exit code​: 0
[22​:44] <+bisectable6> MasterDuke, bisect log​:
https://gist.github.com/651d00f77245537de7326c9316f4513e
[22​:44] <+bisectable6> MasterDuke, (2017-08-04)
rakudo/rakudo@8bed4a6
[22​:45] <Zoffix> haw
[22​:45] <MasterDuke> c​: 2017.07 sub foo(​:color(​:$colour)) { $colour +
1 };
my $s; for ^1000000 { $s += foo(​:color($_)) }; say $s; say now - INIT
now
[22​:45] <+committable6> MasterDuke, ¦2017.07​: «500000500000␤1.4953885»

[p6rt]

The RT System itself - Status changed from 'new' to 'open'

[p6rt]

From @jnthn

On Mon, 07 Aug 2017 19​:48​:36 -0700, ddgreen@​gmail.com wrote​:

[22​:44] <MasterDuke> m​: sub foo(​:color(​:$colour)) { $colour + 1 }; my
$s;
for ^1000000 { $s += foo(​:color($_)) }; say $s; say now - INIT now
[22​:44] <+camelia> rakudo-moar a91ad2​: OUTPUT​: «Unexpected named
argument
'color' passed␤ in sub foo at <tmp> line 1␤ in block <unit> at <tmp>
line
1␤␤»
[22​:44] <MasterDuke> bisectable6​: sub foo(​:color(​:$colour)) { $colour
+ 1
}; my $s; for ^1000000 { $s += foo(​:color($_)) }; say $s;
[22​:44] <+bisectable6> MasterDuke, Bisecting by exit code (old=2015.12
new=a91ad2d). Old exit code​: 0
[22​:44] <+bisectable6> MasterDuke, bisect log​:
https://gist.github.com/651d00f77245537de7326c9316f4513e
[22​:44] <+bisectable6> MasterDuke, (2017-08-04)
rakudo/rakudo@8bed4a6
[22​:45] <Zoffix> haw
[22​:45] <MasterDuke> c​: 2017.07 sub foo(​:color(​:$colour)) { $colour +
1 };
my $s; for ^1000000 { $s += foo(​:color($_)) }; say $s; say now - INIT
now
[22​:45] <+committable6> MasterDuke, ¦2017.07​: «500000500000␤1.4953885»

Fixed; test in S06-signature/named-parameters.t.

[p6rt]

@jnthn - Status changed from 'open' to 'resolved'