[perl #124017] [BUG] Shouldn't be allowed to declare a class called `Foo:D` in Rakudo

[jn...@jnthn.net via RT]

On Sat Aug 29 03:41:10 2015, coke wrote:
> On Sun Mar 08 07:10:57 2015, masak wrote:
> > <masak> m: class Foo:D {}; say Foo.new
> > <camelia> rakudo-moar 459c63: OUTPUT«Foo.new()␤»
> > * masak submits rakudobug
> > <masak> (the bug being that that `:D` is allowed on a class declaration)
> 
> More data:
> 
> 06:40 < [Coke]> m: class Foo:any-ole-adverbial {}; say Foo.new
> 06:40 < GLRelia> rakudo-moar 00a34b: OUTPUT«Foo.new␤»
> 06:40 <+camelia> rakudo-moar 5fb81f: OUTPUT«Foo.new␤»

Fixed by pmurias++, and tests in S12-class/basic.t and S12-class/open.t.