test X::Syntax::NonAssociative

Raku · Dec 30, 2012 · ee14752 · ee14752
1 parent 80239a7
commit ee14752
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/S32-exceptions/misc.t b/S32-exceptions/misc.t
@@ -191,6 +191,7 @@ throws_like 'sub foo;', X::Syntax::Missing, what => 'block';
 throws_like 'my $d; my class A {method x { $d }}; for () { sub }', X::Syntax::Missing, what => 'block';
 throws_like 'constant foo;', X::Syntax::Missing, what => /initializer/;
 throws_like 'constant * = 3;', X::Syntax::Missing, what => /constant/;
+throws_like '1 <=> 2 <=> 3', X::Syntax::NonAssociative, left => '<=>', right => '<=>';
 
 throws_like 'class A {...}; grammar B { ... }', X::Package::Stubbed, packages => <A B>;