test #76298: same-name proto/has.

Raku · Dec 20, 2012 · 8625fc2 · 8625fc2
1 parent 60f15db
commit 8625fc2
Showing 1 changed file with 11 additions and 1 deletion.
diff --git a/S06-multi/proto.t b/S06-multi/proto.t
@@ -1,6 +1,6 @@
 use v6;
 use Test;
-plan 25;
+plan 27;
 
 # Test for proto definitions
 class A { }
@@ -133,6 +133,16 @@ eval_dies_ok 'proto rt68242($a){};proto rt68242($c,$d){};',
     is maybe(-5), 0, "It's ok not to dispatch to the multis";
 }
 
+#RT #76298
+{
+    eval_lives_ok q{
+        class TestA { has $.b; proto method b {} };
+    }, 'proto method after same-named attribute';
+    eval_lives_ok q{
+        class TestB { proto method b {}; has $.b };
+    }, 'proto method before same-named attribute';
+}
+
 done;
 
 # vim: ft=perl6