Test for RT #125513.

Raku · Jul 9, 2015 · 1cda041 · 1cda041
1 parent 87560fd
commit 1cda041
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/S12-class/interface-consistency.t b/S12-class/interface-consistency.t
@@ -4,7 +4,7 @@ use Test;
 
 # L<S12/Interface Consistency>
 
-plan 8;
+plan 9;
 
 class Foo {
     our &m1 = method m1($a) {   #OK not used
@@ -52,4 +52,8 @@ class Faz hides Fiz {
 
 is Faz.new.m1(42), 1, 'hides Fiz means we skip over Fiz in deferal';
 
+# RT #125513
+lives-ok { EVAL('class C { method foo(*%_, *@_) { } }; C.new.foo') },
+    '*%_ before a *@_ also correctly prevents generation of auto-%_';
+
 # vim: ft=perl6