From @ilyabelikin

Hi there,
Rakudo 0dfcf497, example​:

my $foo = { "Yay" }; say $foo(1);
Yay
my $foo = { "Yay" }; say $foo(foo => 'bar');
FixedIntegerArray​: index out of bounds!

Ilya

From @kyleha

This is an automatically generated mail to inform you that tests are now available in t/spec/S02-builtin_data_types/anon_block.t

commit a09001edb5fe490880d97fc8e3e58fa7d18bbdb5
Author​: kyle <kyle@​c213334d-75ef-0310-aa23-eaa082d1ae64>
Date​: Mon Aug 3 02​:45​:05 2009 +0000

  [t/spec] Tests for RT #​64844
 
  git-svn-id​: http://svn.pugscode.org/pugs@&#8203;27861 c213334d-75ef-0310-aa23-eaa082d1ae64

diff --git a/t/spec/S02-builtin_data_types/anon_block.t b/t/spec/S02-builtin_data_types/anon_block.t
index 3cc0d60..41056ab 100644
--- a/t/spec/S02-builtin_data_types/anon_block.t
+++ b/t/spec/S02-builtin_data_types/anon_block.t
@@ -11,7 +11,7 @@ This covers anonymous blocks and subs, as well as pointy blocks
 
 =end description
 
-plan 31;
+plan 34;
 
 # L<S04/"The Relationship of Blocks and Declarations">
 # L<S06/"Anonymous subroutines">
@@ -30,6 +30,25 @@ my $anon_block = { 1 };
 isa_ok($anon_block, Block);
 is($anon_block(), 1, '{} <anon block> works');
 
+# RT #64844
+{
+    eval '$anon_block( 1 )';
+    #?rakudo todo 'Parrot support for zero-arg subs?'
+    ok $! ~~ Exception, 'too many parameters';
+
+    if $! !~~ Exception {
+        skip 2, q{tests don't work if previous test fails};
+    }
+    else {
+        my $errmsg = ~$!;
+
+        eval '$anon_block( foo => "RT #64844" )';
+        ok $! ~~ Exception, 'too many parameters';
+        #?rakudo todo 'RT #64844'
+        is ~$!, $errmsg, 'same error for named param as positional';
+    }
+}
+
 # L<S06/""Pointy blocks"">
 {
     # pointy subs

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

From @moritz

On Sun Apr 19 04​:31​:22 2009, ihrd wrote​:

Hi there,
Rakudo 0dfcf497, example​:

my $foo = { "Yay" }; say $foo(1);
Yay
my $foo = { "Yay" }; say $foo(foo => 'bar');
FixedIntegerArray​: index out of bounds!

10​:30 <@​moritz_> rakudo​: my $foo = { "Yay" }; say $foo(foo => 'bar');
10​:30 <+p6eval> rakudo 9d76f3​: OUTPUT«Unexpected named parameter 'foo'
  passedâ�¤in Main (file src/gen_setting.pm, line 288)â�¤Â»

I consider this error message sufficiently awesome to close this ticket.

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