Test for RT #71034.

Raku · Apr 6, 2015 · 8d44426 · 8d44426
1 parent 6f63ff8
commit 8d44426
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/S32-exceptions/misc.t b/S32-exceptions/misc.t
@@ -3,7 +3,7 @@ use Test;
 use lib "t/spec/packages";
 use Test::Util;
 
-plan 289;
+plan 290;
 
 throws_like '42 +', X::AdHoc, "missing rhs of infix", message => rx/term/;
 
@@ -616,5 +616,7 @@ throws_like 'class Foo { trusts Bar }', X::Undeclared, symbol => 'Bar', what =>
 throws_like 'my $a = |(1, 2, 3)', X::Syntax::ArgFlattener;
 throws_like 'sub foo($x) { }; foo({ |(1, 2, 3) })', X::Syntax::ArgFlattener;
 
+# RT #71034
+throws_like 'my $a = (1, 2, 3); my @a = |$a;', X::Syntax::ArgFlattener;
 
 # vim: ft=perl6