Test my &x; sub x {} throws useful error

Rakudo fix: rakudo/rakudo@b51a5505a6 Bug find: https://irclog.perlgeek.de/perl6/2017-02-13#i_14093827
ronaldxs · Feb 14, 2017 · 5550e4c · 5550e4c
1 parent 2685afc
commit 5550e4c
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/S06-multi/proto.t b/S06-multi/proto.t
@@ -1,6 +1,6 @@
 use v6;
 use Test;
-plan 26;
+plan 27;
 
 # Test for proto definitions
 class A { }
@@ -144,4 +144,8 @@ throws-like 'bar(41)', Exception, 'impossible dispatch failed (anon cap)';
     ], X::TypeCheck::Argument, 'proto signature is checked, not just that of the candidates';
 }
 
+# https://irclog.perlgeek.de/perl6/2017-02-13#i_14093827
+throws-like ｢my &x; sub x {}｣, X::Redeclaration,
+    'my &x; sub x {} throws useful error';
+
 # vim: ft=perl6