[perl #60716] [PATCH] invoke multi-level namespace grammars from rules

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

On Sat Nov 29 08:34:39 2008, chrisdolan wrote:
> Without my patch, the first of the following succeeds but the second
> fails.  With the patch, they both succeed.  My patch allows you to use
> more than one "::" in a <> element *inside* a regex.
> 
> grammar Grammar::Deep { token foo { 'foo' }; }
> grammar GrammarShallow { token TOP { <Grammar::Deep::foo> 'bar' }; }

Yup, this patch is needed, so applied in r34045.

> 'foobar' ~~ GrammarShallow or die 'failed mixed-level namespace grammar';
> 
> So, the feature enabled by this patch is the <Grammar::Deep::foo>

'foobar' ~~ GrammarShallow isn't spec'd as doing this (we have a ticket
on that elsewhere), so the test I added does 'foobar' ~~
/<GrammarShallow::TOP>/ which is, uh, spec'dish... ;-)

Thanks!

Jonathan