The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Pugs::Grammar::Precedence - Engine for Perl 6 Rule operator precedence

SYNOPSIS

  use Pugs::Grammar::Precedence;

  # example definition for "sub rxinfix:<|> ..."

  my $rxinfix = Pugs::Grammar::Precedence->new(
    grammar => 'rxinfix',
  );
  $rxinfix->add_op(
    name => '|',
    assoc => 'left',
    fixity => 'infix',
  );

Pseudo-code for usage inside a grammar:

    sub new_proto( $match ) {
        return ${$match<category>}.add_op(
            name => $match<name>,
            fixity => ...,
            precedence => ...,
        );
    }

    rule prototype {
        proto <category>:<name> <options>
        {
            return new_proto($/);
        }
    }

    rule statement {
        <category.parse> ...
    }

DESCRIPTION

This module provides an implementation for Perl 6 operator precedence.

METHODS

new ()

Class method. Returns a category object.

options:

  • grammar => $category_name - the name of this category (a namespace or a Grammar name).

add_op ()

Instance method. Adds a new operator to the category.

options:

  • name => $operator_name - the name of this operator, such as '+', '*'

  • name2 => $operator_name - the name of the second operator in an operator pair, such as circumfix [ '(', ')' ] or ternary [ '??', '!!' ].

     # precedence=>'tighter',
     #   tighter/looser/equiv
     # other=>'+',
     # fixity =>
     #  infix/prefix/circumfix/postcircumfix/ternary
     # assoc =>
     #  left/right/non/chain/list
     # rule=>$rule
     #  (is parsed)

AUTHORS

The Pugs Team <perl6-compiler@perl.org>.

SEE ALSO

Summary of Perl 6 Operators: http://dev.perl.org/perl6/doc/design/syn/S03.html

COPYRIGHT

Copyright 2006, 2007 by Flavio Soibelmann Glock and others.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See http://www.perl.com/perl/misc/Artistic.html