[perl #117193] [BUG] Internal Parrot (imcc) error when trying to 'augment slang' on existing type in Rakudo

[Will Coleda via RT]

On Sun Mar 17 03:04:22 2013, masak wrote:
> <FROGGS> moritz: where would I find something about slangs in the synopsis?
> <moritz> probably S02 or so
> <FROGGS> ahh, found it http://perlcabal.org/syn/S02.html#Slangs
> <FROGGS> r: use MONKEY_TYPING; augment slang Regex { token numish { } };
> <p6eval> rakudo d98dd5: OUTPUT«use of uninitialized value of type Mu
> in string context␤use of uninitialized value of type Mu in string
> context␤===SORRY!===␤error:imcc:Sub 'cuid_3_1363514278.31078' not
> found␤␤ in file '(file unknown)' line 120␤»
> <moritz> r: use MONKEY_TYPING; augment slang Perl6 { };
> <p6eval> rakudo d98dd5: OUTPUT«===SORRY!===␤You tried to augment slang
> Perl6, but it does not exist␤at /tmp/fFehxhhg23:1␤------> use
> MONKEY_TYPING; augment slang Perl6 ⏏{ };␤    expecting any of:␤
> scoped declarator␤        generic role␤»
> <FROGGS> ahh, looks like only packages are supported right now
> * masak submits rakudobug for the internal Parrot error

00:50 < [Coke]> r: use MONKEY_TYPING; augment slang Regex { token numish { } };
00:50 <+camelia> rakudo-{parrot,moar} d99fe0: OUTPUT«===SORRY!=== Error while
                 compiling /tmp/tmpfile␤Null regex not allowed␤at
                 /tmp/tmpfile:1␤------> G; augment slang Regex { token numish {
                 ⏏} };␤»

This seems reasonable. Closable with tests?

-- 
Will "Coke" Coleda