X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/4fa0f9a5038a4631f76500c0f52628539e948575..f91073d438e1f6952add377836e416c47505261f:/embed.fnc diff --git a/embed.fnc b/embed.fnc index dd4daef..b65e41c 100644 --- a/embed.fnc +++ b/embed.fnc @@ -775,7 +775,6 @@ p |int |magic_settaint |NN SV* sv|NN MAGIC* mg p |int |magic_setuvar |NN SV* sv|NN MAGIC* mg p |int |magic_setvec |NN SV* sv|NN MAGIC* mg p |int |magic_setutf8 |NN SV* sv|NN MAGIC* mg -p |int |magic_setvstring|NN SV* sv|NN MAGIC* mg p |int |magic_set_all_env|NN SV* sv|NN MAGIC* mg p |U32 |magic_sizepack |NN SV* sv|NN MAGIC* mg p |int |magic_wipepack |NN SV* sv|NN MAGIC* mg @@ -1052,7 +1051,7 @@ Ap |SV* |regclass_swash |NULLOK const regexp *prog \ EMs |void |add_alternate |NN AV** alternate_ptr|NN U8* string|STRLEN len EMsR |SV* |_new_invlist_C_array|NN UV* list : Not used currently: EXMs |bool |_invlistEQ |NN SV* const a|NN SV* const b|bool complement_b -EMsR |bool |_invlist_contains_cp|NN SV* const invlist|const UV cp +EMiR |bool |_invlist_contains_cp|NN SV* const invlist|const UV cp #endif Ap |I32 |pregexec |NN REGEXP * const prog|NN char* stringarg \ |NN char* strend|NN char* strbeg|I32 minend \ @@ -1320,7 +1319,6 @@ Apd |STRLEN |sv_len |NULLOK SV *const sv Apd |STRLEN |sv_len_utf8 |NULLOK SV *const sv Apd |void |sv_magic |NN SV *const sv|NULLOK SV *const obj|const int how \ |NULLOK const char *const name|const I32 namlen -pd |bool |sv_gmagical_2iv_please|NN SV *sv Apd |MAGIC *|sv_magicext |NN SV *const sv|NULLOK SV *const obj|const int how \ |NULLOK const MGVTBL *const vtbl|NULLOK const char *const name \ |const I32 namlen @@ -1400,7 +1398,7 @@ EiMR |UV* |get_invlist_iter_addr |NN SV* invlist EiMR |UV* |get_invlist_version_id_addr |NN SV* invlist EiM |void |invlist_iterinit|NN SV* invlist EsMR |bool |invlist_iternext|NN SV* invlist|NN UV* start|NN UV* end -EsMR |IV |invlist_search |NN SV* const invlist|const UV cp +EXpMR |IV |_invlist_search |NN SV* const invlist|const UV cp EiMR |UV |invlist_highest|NN SV* const invlist #endif #if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_UTF8_C) @@ -1936,8 +1934,9 @@ Es |regnode*|reg_node |NN struct RExC_state_t *pRExC_state|U8 op Es |UV |reg_recode |const char value|NN SV **encp Es |regnode*|regpiece |NN struct RExC_state_t *pRExC_state \ |NN I32 *flagp|U32 depth -Es |regnode*|reg_namedseq |NN struct RExC_state_t *pRExC_state \ - |NULLOK UV *valuep|NULLOK I32 *flagp|U32 depth +Es |bool |grok_bslash_N |NN struct RExC_state_t *pRExC_state \ + |NULLOK regnode** nodep|NULLOK UV *valuep \ + |NULLOK I32 *flagp|U32 depth|bool in_char_class Es |void |reginsert |NN struct RExC_state_t *pRExC_state \ |U8 op|NN regnode *opnd|U32 depth Es |void |regtail |NN struct RExC_state_t *pRExC_state \