[perl #53018] grammar not behaving as class

# New Ticket Created by  Stephane Payrard
# Please include the string:  [perl #53018]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=53018 >


# grammars don't behave as regular classes.
# I would expect A.WHAT to exist and to behave like with a regular class
# and be able to use A.a in a smart match


class B {};                       say B.WHAT;
grammar A { token a { a }  }; #   say A.WHAT; ==>  Method 'WHAT' not
found for non-object

say 'a' ~~ A.a;  #  ==> Method 'a' not found for non-object

--
cognominal stef