Add test for RT #65900

Raku · Oct 22, 2014 · 8a07d59 · 8a07d59
1 parent 698a635
commit 8a07d59
Showing 1 changed file with 9 additions and 1 deletion.
diff --git a/S03-binding/ro.t b/S03-binding/ro.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 9;
+plan 11;
 
 # L<S03/Item assignment precedence/bind and make readonly>
 
@@ -40,4 +40,12 @@ plan 9;
     is @x.join(''), 'd|e|k', 'assignment relly worked';
 }
 
+# RT #65900
+{
+    throws_like q[my $a is readonly = 5;], X::Comp::Trait::Unknown,
+        'variable trait "is readonly" is no longer valid (1)';
+    throws_like q[(my $a is readonly) = 5;], X::Comp::Trait::Unknown,
+        'variable trait "is readonly" is no longer valid (2)';
+}
+
 # vim: ft=perl6