NAME

Gentoo::Dependency::AST::State - Temporal Tree State controller

VERSION

version 0.001001

METHODS

state

Return the current state object.

This is -1 on the stack array.

    $state->state;

add_dep

    $state->add_dep($depstring);

Tell current state controller $state->state that a literal dependency $depstring has been seen.

    $state->add_dep("dev-lang/perl");
    → $dep_object = ::Node::Dependency->new( depstring => "dev-lang/perl");
    → $state->state->add_dep( $state , $dep_object );

enter_notuse_group

    $state->enter_notuse_group($useflag)

Tell current state controller $state->state that a negative useflag($useflag) group opener has been seen.

    $state->enter_notuse_group("aqua");
    → $group_object = ::Node::Group::NotUse->new( useflag => "aqua" );
    → $state->state->enter_notuse_group( $state , $group_object );

enter_use_group

    $state->enter_use_group($useflag)

Tell current state controller $state->state that a useflag($useflag) group opener has been seen.

    $state->enter_use_group("qt4");
    → $group_object = ::Node::Group::Use->new( useflag => "qt4" );
    → $state->state->enter_use_group( $state , $group_object );

enter_or_group

    $state->enter_or_group()

Tell current state controller $state->state that an or group opener has been seen.

    $state->enter_or_group();
    → $group_object = ::Node::Group::Or->new();
    → $state->state->enter_or_group( $state , $group_object );

enter_and_group

    $state->enter_and_group()

Tell current state controller $state->state that an and group opener has been seen.

    $state->enter_and_group();
    → $group_object = ::Node::Group::And->new();
    → $state->state->enter_and_group( $state , $group_object );

exit_group

    $state->exit_group()

Tell current state controller $state->state that a group exit has been seen.

    $state->exit_group();
    → $state->state->exit_group();

ATTRIBUTES

stack

Contains an ARRAYREF of all the states.

Starts off as:

    [ Gentoo::Dependency::AST::Node::TopLevel->new() ]

PRIVATE METHODS

_pushstack

Set $element as the new parse state, by pushing it on to the stack.

    $state->_pushstack($element);

_popstack

Remove the top element from the stack, deferring control to its parent.

    $discarded = $state->_popstack();

AUTHOR

Kent Fredric <kentfredric@gmail.com>

COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by Kent Fredric <kentfredric@gmail.com>.

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