test for RT #76452

Raku · Oct 1, 2011 · af1e334 · af1e334
1 parent e0d5199
commit af1e334
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/S04-declarations/my.t b/S04-declarations/my.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 68;
+plan 69;
 
 #L<S04/The Relationship of Blocks and Declarations/"declarations, all
 # lexically scoped declarations are visible"> 
@@ -271,4 +271,9 @@ eval_lives_ok 'my $x = 3; class A { has $.y = $x; }; say A.new.y',
         'declaration of anonymous Hash';
 }
 
+# RT #76452
+#?rakudo todo 'RT 76452'
+eval_lives_ok 'multi f(@a) { }; multi f(*@a) { }; f(my @a = (1, 2, 3))',
+              'can declare a variable inside a sub call';
+
 # vim: ft=perl6