Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

[t/spec] Test for RT #68370

git-svn-id: http://svn.pugscode.org/pugs@27948 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
commit 58322aa5f103547caa74bb7c5b8f7edfaf3129d3 1 parent c3237b6
kyle authored
Showing with 13 additions and 1 deletion.
  1. +13 −1 S12-attributes/instance.t
View
14 S12-attributes/instance.t
@@ -2,7 +2,7 @@ use v6;
use Test;
-plan 128;
+plan 129;
=begin pod
@@ -531,4 +531,16 @@ is eval('Foo7e.new.attr'), 42, "default attribute value (1)";
is C.new.s, 6, "Test class include another class which inherited from same role";
}
+# RT #68370
+{
+ class RT68370 {
+ has $!a;
+ method rt68370 { $!a = 68370 }
+ }
+
+ #?rakudo todo 'RT #68370 -- Null PMC Access in getprop()'
+ dies_ok { RT68370.rt68370() },
+ 'dies: modify instance attribute via class method call';
+}
+
# vim: ft=perl6
Please sign in to comment.
Something went wrong with that request. Please try again.