Binding Failure to Array throws useful error

RT#118397: https://rt.perl.org/Ticket/Display.html?id=118397
Raku · Dec 12, 2017 · 5cd8dff · 5cd8dff
1 parent 0fb5a01
commit 5cd8dff
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/S03-binding/arrays.t b/S03-binding/arrays.t
@@ -4,7 +4,7 @@ use Test;
 
 # L<S03/Item assignment precedence>
 
-plan 47;
+plan 48;
 
 # Binding of array elements.
 # See thread "Binding of array elements" on p6l started by Ingo Blechschmidt:
@@ -228,4 +228,9 @@ plan 47;
         'can only bind Positional stuff to @a';
 }
 
+# RT #118397
+throws-like { sub foo { fail }; my @a := foo },
+    X::TypeCheck::Binding, :got(Failure),
+'binding Failure to Array throws useful error';
+
 # vim: ft=perl6