diff options
| author | Yves Orton <demerphq@gmail.com> | 2006-05-28 18:24:59 +0200 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-05-29 12:38:09 +0000 |
| commit | 3dab1dad3c281a8a3802c3e053703d7cabca032a (patch) | |
| tree | 9a20f0a4eea8eb9ed9e41c8633d91396a4399d62 /embed.fnc | |
| parent | b4244ddc1fb37466a15a6ac6569133e40413ca6f (diff) | |
| download | perl-3dab1dad3c281a8a3802c3e053703d7cabca032a.tar.gz | |
Re: [PATCH] More regex optimisations and debug enhancements (including Andys stuff too)
Message-ID: <9b18b3110605280724u54a9c53bn3b20692b6fe4f1c3@mail.gmail.com>
p4raw-id: //depot/perl@28325
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 31 |
1 files changed, 17 insertions, 14 deletions
@@ -1284,25 +1284,20 @@ s |SV * |space_join_names_mortal|NN char *const *array #endif #if defined(PERL_IN_REGCOMP_C) || defined(PERL_DECL_PROT) -Es |regnode*|reg |NN struct RExC_state_t *state|I32 paren|NN I32 *flagp +Es |regnode*|reg |NN struct RExC_state_t *state|I32 paren|NN I32 *flagp|U32 depth Es |regnode*|reganode |NN struct RExC_state_t *state|U8 op|U32 arg -Es |regnode*|regatom |NN struct RExC_state_t *state|NN I32 *flagp -Es |regnode*|regbranch |NN struct RExC_state_t *state|NN I32 *flagp|I32 first +Es |regnode*|regatom |NN struct RExC_state_t *state|NN I32 *flagp|U32 depth +Es |regnode*|regbranch |NN struct RExC_state_t *state|NN I32 *flagp|I32 first|U32 depth Es |STRLEN |reguni |NN const struct RExC_state_t *state|UV uv|NN char *s -Es |regnode*|regclass |NN struct RExC_state_t *state +Es |regnode*|regclass |NN struct RExC_state_t *state|U32 depth ERsn |I32 |regcurly |NN const char * Es |regnode*|reg_node |NN struct RExC_state_t *state|U8 op -Es |regnode*|regpiece |NN struct RExC_state_t *state|NN I32 *flagp +Es |regnode*|regpiece |NN struct RExC_state_t *state|NN I32 *flagp|U32 depth Es |void |reginsert |NN struct RExC_state_t *state|U8 op|NN regnode *opnd -Es |void |regtail |NN const struct RExC_state_t *state|NN regnode *p|NN const regnode *val +Es |void |regtail |NN struct RExC_state_t *state|NN regnode *p|NN const regnode *val|U32 depth +Es |U8 |regtail_study |NN struct RExC_state_t *state|NN regnode *p|NN const regnode *val|U32 depth EsRn |char* |regwhite |NN char *p|NN const char *e Es |char* |nextchar |NN struct RExC_state_t *state -# ifdef DEBUGGING -Es |const regnode*|dumpuntil|NN const regexp *r|NN const regnode *start \ - |NN const regnode *node \ - |NULLOK const regnode *last|NN SV* sv|I32 l -Es |void |put_byte |NN SV* sv|int c -# endif Es |void |scan_commit |NN const struct RExC_state_t* state|NN struct scan_data_t *data Esn |void |cl_anything |NN const struct RExC_state_t* state|NN struct regnode_charclass_class *cl EsRn |int |cl_is_anything |NN const struct regnode_charclass_class *cl @@ -1319,10 +1314,18 @@ EsRn |I32 |add_data |NN struct RExC_state_t* state|I32 n|NN const char *s rs |void |re_croak2 |NN const char* pat1|NN const char* pat2|... Es |I32 |regpposixcc |NN struct RExC_state_t* state|I32 value Es |void |checkposixcc |NN struct RExC_state_t* state - Es |I32 |make_trie |NN struct RExC_state_t* state|NN regnode *startbranch \ |NN regnode *first|NN regnode *last|NN regnode *tail \ - |U32 flags + |U32 flags|U32 depth +# ifdef DEBUGGING +Es |const regnode*|dumpuntil|NN const regexp *r|NN const regnode *start \ + |NN const regnode *node \ + |NULLOK const regnode *last|NN SV* sv|I32 l +Es |void |put_byte |NN SV* sv|int c +Es |void |dump_trie |NN const struct _reg_trie_data *trie|U32 depth +Es |void |dump_trie_interim_list|NN const struct _reg_trie_data *trie|U32 next_alloc|U32 depth +Es |void |dump_trie_interim_table|NN const struct _reg_trie_data *trie|U32 next_alloc|U32 depth +# endif #endif #if defined(PERL_IN_REGEXEC_C) || defined(PERL_DECL_PROT) |