On Sat, Jun 15, 2002 at 04:50:20PM +0200, Marcel Gruenauer wrote:
> On Sat, Jun 15, 2002 at 09:08:31AM -0500, Jonathan Scott Duff wrote:
>
> > At the very least you should be able to do this:
> >
> > rule leftop($leftop,$op;$rightop) {
> > $other := { (defined $rightop) ?? $rightop :: $leftop }
> > <$leftop> [$op <$other>]*
> > }
>
> Or maybe
>
> rule leftop($leftop,$op;$rightop) {
> <$leftop> [$op <{ $rightop // $leftop }>]*
> }
Indeed; I'd forgotten about //.
With all this new syntax, I can't wait until there's a perl6 I can try
it out against rather than just perl6-language.
-Scott
--
Jonathan Scott Duff
[EMAIL PROTECTED]