NAME

MarpaX::Languages::C::AST::Util::Data::Find - Find data in C AST

VERSION

version 0.23

SYNOPSIS

    use strict;
    use warnings FATAL => 'all';
    use MarpaX::Languages::C::AST::Util::Data::Find;

    my $data = bless [], 'C::AST::Something';

    MarpaX::Languages::C::AST::Util::Data::Find->new(
        wanted => sub { my $o = shift;
                        my $class = blessed($o) || '';
                        return ($class eq 'C::AST::directDeclaratorIdentifier');
        },
        callback => sub { my ($datap, $o) = @_;
                          #
                          # This object has matched.
                          #
        },
        callbackArgs => [ $data ],
        )->process($data);

DESCRIPTION

This modules is a minimalist Data::Find designed for the parse tree values of Marpa on a C source file.

SUBROUTINES/METHODS

new($class, %options)

Instance a new object. Takes as optional argument a hash that may contain the following key/values:

wanted

Match callback (CODE ref).

wantedArgs

Match callback arguments (ARRAY ref). The matched callback is called like: &$wanted(@{$wantedArgs}, $object). Any true value means that $object has matched and will be a candidate to the processing callback.

callback

Process callback (CODE ref).

callbackArgs

Process callback arguments (ARRAY ref). The process callback is called like: &$callback(@{$callbackArgs}, $object) on every object that matched.

process($self, $value)

Process search on the object $value. Returns a true value is something wanted was found.

SEE ALSO

 L<Data::Find>, L<Marpa::R2>

AUTHOR

Jean-Damien Durand <jeandamiendurand@free.fr>

COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by Jean-Damien Durand.

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