tests for X::Bind::ZenSlice.

Raku · Mar 29, 2012 · 709242e · 709242e
1 parent 296a529
commit 709242e
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/S32-exceptions/misc.t b/S32-exceptions/misc.t
@@ -93,6 +93,9 @@ throws_like '1!foo()',
 
 throws_like 'sub f() { }; f() := 2', X::Bind::WrongLHS;
 throws_like 'my int $x := 2', X::Bind::NativeType;
+throws_like 'my @a; @a[] := <foo bar baz>', X::Bind::ZenSlice, what => 'array';
+throws_like 'my %a; %a{} := foo=>1, bar=>2, baz=>3', X::Bind::ZenSlice, what => 'hash';
+
 
 throws_like 'for (1; 1; 1) { }', X::Obsolete,
     old         => rx/<<for>>/,