# New Ticket Created by Justin DeVuyst
# Please include the string: [perl #125200]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=125200 >
Some examples that I expected would be equivalent:
1. WHAT
[jdv@wieldy ~]$ perl6 -e 'role Foo[::T] { has Int @.a }; say
Foo[Int].new.a.perl'
Array[Int].new()
[jdv@wieldy ~]$ perl6 -e 'role Foo[::T] { has T @.a }; say Foo[Int].new.a.WHAT'
(Array[T])
[jdv@wieldy ~]$
2. method call on type obj
[jdv@wieldy ~]$ perl6 -e 'role Foo[::T] { has Int @.a }; say
Foo[Int].new.a.perl'
Array[Int].new()
[jdv@wieldy ~]$ perl6 -e 'role Foo[::T] { has T @.a }; say Foo[Int].new.a.perl'
Method 'perl' not found for invocant of class 'T'
in block <unit> at -e:1
