Add test for RT #84280

Raku · Jan 25, 2015 · 3101a04 · 3101a04
1 parent f16e55e
commit 3101a04
Showing 1 changed file with 10 additions and 1 deletion.
diff --git a/S11-modules/export.t b/S11-modules/export.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 38;
+plan 39;
 
 # L<S11/"Exportation"/>
 
@@ -160,4 +160,13 @@ ok( ! &EXPORT::DEFAULT::exp_my_tag,
     ok EXPORT::ALL:: ~~ Stash,       'EXPORT::ALL:: is a Stash that keeps exported symbols';
 }
 
+# RT #84280
+{
+    use lib 't/spec/packages';
+    use RT84280;
+    throws_like { bar { 1 } }, X::Multi::NoMatch,
+        message => /'none of these signatures match'/,
+        'adequate error message when multi sub exported out of a module fails to bind to an argument that happens to be a block';
+}
+
 # vim: ft=perl6