X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2Fre%2Fengine%2FHooks.pm;h=bbeb53c4cae40ae2b72d539fdc992e77762f6579;hb=39b89ebc30220f347fb9ed7977395889e2bb37ad;hp=43683e5dc123d4f5d3cb06c85586d1ca00385f19;hpb=545c54245352f76063b7cf3cf949fb5d1155780f;p=perl%2Fmodules%2Fre-engine-Hooks.git diff --git a/lib/re/engine/Hooks.pm b/lib/re/engine/Hooks.pm index 43683e5..bbeb53c 100644 --- a/lib/re/engine/Hooks.pm +++ b/lib/re/engine/Hooks.pm @@ -11,7 +11,7 @@ re::engine::Hooks - Hookable variant of the Perl core regular expression engine. =head1 VERSION -Version 0.01 +Version 0.03 =cut @@ -20,7 +20,7 @@ our ($VERSION, @ISA); sub dl_load_flags { 0x01 } BEGIN { - $VERSION = '0.01'; + $VERSION = '0.03'; require DynaLoader; push @ISA, qw; __PACKAGE__->bootstrap($VERSION); @@ -32,12 +32,12 @@ In your XS file : #include "re_engine_hooks.h" - STATIC void dri_comp_hook(pTHX_ regexp *rx, regnode *node) { + STATIC void dri_comp_node_hook(pTHX_ regexp *rx, regnode *node) { ... } - STATIC void dri_exec_hook(pTHX_ regexp *rx, regnode *node, - regmatch_info *info, regmatch_state *state) { + STATIC void dri_exec_node_hook(pTHX_ + regexp *rx, regnode *node, regmatch_info *info, regmatch_state *state) { ... } @@ -46,8 +46,8 @@ In your XS file : BOOT: { reh_config cfg; - cfg.comp = dri_comp_hook; - cfg.exec = dri_exec_hook; + cfg.comp_node = dri_comp_node_hook; + cfg.exec_node = dri_exec_node_hook; reh_register("Devel::Regexp::Instrument", &cfg); } @@ -96,19 +96,19 @@ This module provides a version of the perl regexp engine that can call user-defi The C API is made available through the F header file. -=head2 C +=head2 C -The typedef for the regexp compilation phase hook. +The typedef for the regexp node compilation phase hook. Currently evaluates to : - typedef void (*reh_comp_hook)(pTHX_ regexp *, regnode *); + typedef void (*reh_comp_node_hook)(pTHX_ regexp *, regnode *); -=head2 C +=head2 C -The typedef for the regexp execution phase hook. +The typedef for the regexp node_execution phase hook. Currently evaluates to : - typedef void (*reh_exec_hook)(pTHX_ regexp *, regnode *, regmatch_info *, regmatch_state *); + typedef void (*reh_exec_node_hook)(pTHX_ regexp *, regnode *, regmatch_info *, regmatch_state *); =head2 C @@ -119,16 +119,16 @@ It has the following members : =item * -C +C -A function pointer of type C that will be called each time a regnode is compiled. +A function pointer of type C that will be called each time a regnode is compiled. Allowed to be C if you don't want to call anything for this phase. =item * -C +C -A function pointer of type C that will be called each time a regnode is executed. +A function pointer of type C that will be called each time a regnode is executed. Allowed to be C if you don't want to call anything for this phase. =back