X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/d7cb65f2ace0ce6e923d8b8b50868eb175a47fad..4c9daa0a332325e70b55ddedfd8adb1e99f9d6b8:/embed.fnc diff --git a/embed.fnc b/embed.fnc index d5a99c5..cd7e187 100644 --- a/embed.fnc +++ b/embed.fnc @@ -46,6 +46,12 @@ : : proto.h: add __attribute__format__ (or ...null_ok__) : +: i Static inline: function in source code has a S_ prefix: +: +: proto.h: function is declared as S_foo rather than foo, +: PERL_STATIC_INLINE is added to declaration; +: embed.h: "#define foo S_foo" entries added +: : M May change: : : any doc entry is marked that function may change @@ -171,6 +177,7 @@ Anp |void |set_context |NN void *t XEop |bool |try_amagic_bin |int method|int flags XEop |bool |try_amagic_un |int method|int flags Ap |SV* |amagic_call |NN SV* left|NN SV* right|int method|int dir +Ap |SV * |amagic_deref_call|NN SV *ref|int method Ap |int |Gv_AMupdate |NN HV* stash|bool destructing ApR |CV* |gv_handler |NULLOK HV* stash|I32 id Apd |OP* |op_append_elem |I32 optype|NULLOK OP* first|NULLOK OP* last @@ -218,7 +225,7 @@ p |void |boot_core_PerlIO Ap |void |call_list |I32 oldscope|NN AV *paramList Apd |const PERL_CONTEXT * |caller_cx|I32 level \ |NULLOK const PERL_CONTEXT **dbcxp -: Used in serveral source files +: Used in several source files pR |bool |cando |Mode_t mode|bool effective|NN const Stat_t* statbufp ApR |U32 |cast_ulong |NV f ApR |I32 |cast_i32 |NV f @@ -229,13 +236,6 @@ ApR |I32 |my_chsize |int fd|Off_t length #endif : Used in perly.y pR |OP* |convert |I32 optype|I32 flags|NULLOK OP* o -Apd |HV* |cop_hints_2hv |NN const COP *cop -Apd |SV* |cop_hints_fetchpvn|NN const COP *cop|NN const char *key \ - |STRLEN klen|int flags|U32 hash -Amd |SV* |cop_hints_fetchpvs|NN const COP *cop|NN const char *const key -Amd |SV* |cop_hints_fetchpv|NN const COP *cop|NN const char *const key \ - |int flags|U32 hash -Amd |SV* |cop_hints_fetchsv|NN const COP *cop|NN SV *keysv|U32 hash : Used in op.c and perl.c pM |PERL_CONTEXT* |create_eval_scope|U32 flags Aprd |void |croak_sv |NN SV *baseex @@ -307,7 +307,6 @@ pmb |bool |do_aexec |NULLOK SV* really|NN SV** mark|NN SV** sp p |bool |do_aexec5 |NULLOK SV* really|NN SV** mark|NN SV** sp|int fd|int do_report Ap |int |do_binmode |NN PerlIO *fp|int iotype|int mode : Used in pp.c -p |void |do_chop |NN SV *astr|NN SV *sv Ap |bool |do_close |NULLOK GV* gv|bool not_implicit : Defined in doio.c, used only in pp_sys.c p |bool |do_eof |NN GV* gv @@ -345,8 +344,8 @@ p |I32 |do_semop |NN SV** mark|NN SV** sp p |I32 |do_shmio |I32 optype|NN SV** mark|NN SV** sp #endif Ap |void |do_join |NN SV *sv|NN SV *delim|NN SV **mark|NN SV **sp -: Used in pp.c and pp_hot.c -p |OP* |do_kv +: Used in pp.c and pp_hot.c, prototype generated by regen/opcode.pl +: p |OP* |do_kv Apmb |bool |do_open |NN GV* gv|NN const char* name|I32 len|int as_raw \ |int rawmode|int rawperm|NULLOK PerlIO* supplied_fp Ap |bool |do_open9 |NN GV *gv|NN const char *name|I32 len|int as_raw \ @@ -360,8 +359,6 @@ Ap |bool |do_openn |NN GV *gv|NN const char *oname|I32 len \ p |bool |do_print |NULLOK SV* sv|NN PerlIO* fp : Used in pp_sys.c pR |OP* |do_readline -: Used in pp.c -p |I32 |do_chomp |NN SV* sv : Defined in doio.c, used only in pp_sys.c p |bool |do_seek |NULLOK GV* gv|Off_t pos|int whence Ap |void |do_sprintf |NN SV* sv|I32 len|NN SV** sarg @@ -445,6 +442,7 @@ Ap |void |gv_fullname4 |NN SV* sv|NN const GV* gv|NULLOK const char* prefix|bool : Used in scope.c pMox |GP * |newGP |NN GV *const gv pX |void |cvgv_set |NN CV* cv|NULLOK GV* gv +pX |void |cvstash_set |NN CV* cv|NULLOK HV* stash Ap |void |gv_init |NN GV* gv|NULLOK HV* stash|NN const char* name|STRLEN len|int multi Ap |void |gv_name_set |NN GV* gv|NN const char *name|U32 len|U32 flags XMpd |void |gv_try_downgrade|NN GV* gv @@ -480,33 +478,38 @@ ApMdR |HE* |hv_iternext_flags|NN HV *hv|I32 flags ApdR |SV* |hv_iterval |NN HV *hv|NN HE *entry Ap |void |hv_ksplit |NN HV *hv|IV newmax Apdbm |void |hv_magic |NN HV *hv|NULLOK GV *gv|int how -: Used in B.xs -XEdpoM |HV * |refcounted_he_chain_2hv|NULLOK const struct refcounted_he *c -: Used in APItest.xs -XEpoM |SV * |refcounted_he_fetch|NULLOK const struct refcounted_he *chain \ - |NULLOK SV *keysv|NULLOK const char *key \ - |STRLEN klen, int flags, U32 hash -: Used in various files -dpoM |void |refcounted_he_free|NULLOK struct refcounted_he *he -: Used in various files -XEdpoM |struct refcounted_he *|refcounted_he_new \ - |NULLOK struct refcounted_he *const parent \ - |NULLOK SV *const key|NULLOK SV *const value #if defined(PERL_IN_HV_C) -s |struct refcounted_he * |refcounted_he_new_common \ - |NULLOK struct refcounted_he *const parent \ - |NN const char *const key_p \ - |const STRLEN key_len|const char flags \ - |char value_type|NN const void *value \ - |const STRLEN value_len -#endif +s |SV * |refcounted_he_value |NN const struct refcounted_he *he +#endif +Xpd |HV * |refcounted_he_chain_2hv|NULLOK const struct refcounted_he *c|U32 flags +Xpd |SV * |refcounted_he_fetch_pvn|NULLOK const struct refcounted_he *chain \ + |NN const char *keypv|STRLEN keylen|U32 hash|U32 flags +Xpd |SV * |refcounted_he_fetch_pv|NULLOK const struct refcounted_he *chain \ + |NN const char *key|U32 hash|U32 flags +Xpd |SV * |refcounted_he_fetch_sv|NULLOK const struct refcounted_he *chain \ + |NN SV *key|U32 hash|U32 flags +Xpd |struct refcounted_he *|refcounted_he_new_pvn \ + |NULLOK struct refcounted_he *parent \ + |NN const char *keypv|STRLEN keylen \ + |U32 hash|NULLOK SV *value|U32 flags +Xpd |struct refcounted_he *|refcounted_he_new_pv \ + |NULLOK struct refcounted_he *parent \ + |NN const char *key \ + |U32 hash|NULLOK SV *value|U32 flags +Xpd |struct refcounted_he *|refcounted_he_new_sv \ + |NULLOK struct refcounted_he *parent \ + |NN SV *key \ + |U32 hash|NULLOK SV *value|U32 flags +Xpd |void |refcounted_he_free|NULLOK struct refcounted_he *he +Xpd |struct refcounted_he *|refcounted_he_inc|NULLOK struct refcounted_he *he Abmd |SV** |hv_store |NULLOK HV *hv|NULLOK const char *key \ |I32 klen|NULLOK SV *val|U32 hash Abmd |HE* |hv_store_ent |NULLOK HV *hv|NULLOK SV *key|NULLOK SV *val\ |U32 hash AbmM |SV** |hv_store_flags |NULLOK HV *hv|NULLOK const char *key \ |I32 klen|NULLOK SV *val|U32 hash|int flags -Apd |void |hv_undef |NULLOK HV *hv +Amd |void |hv_undef |NULLOK HV *hv +poX |void |hv_undef_flags |NULLOK HV *hv|U32 flags Am |I32 |ibcmp |NN const char* a|NN const char* b|I32 len AnpP |I32 |foldEQ |NN const char* a|NN const char* b|I32 len Am |I32 |ibcmp_locale |NN const char* a|NN const char* b|I32 len @@ -517,6 +520,7 @@ Am |I32 |ibcmp_utf8 |NN const char *s1|NULLOK char **pe1|UV l1 \ Apd |I32 |foldEQ_utf8 |NN const char *s1|NULLOK char **pe1|UV l1 \ |bool u1|NN const char *s2|NULLOK char **pe2 \ |UV l2|bool u2 +AnpP |I32 |foldEQ_latin1 |NN const char* a|NN const char* b|I32 len #if defined(PERL_IN_DOIO_C) sR |bool |ingroup |Gid_t testgid|bool effective #endif @@ -611,11 +615,8 @@ s |OP* |opt_scalarhv |NN OP* rep_op s |OP* |is_inplace_av |NN OP* o|NULLOK OP* oright #endif Ap |void |leave_scope |I32 base -: Used in pp_ctl.c, and by Data::Alias -EXp |void |lex_end -: Used in various files -p |void |lex_start |NULLOK SV* line|NULLOK PerlIO *rsfp|bool new_filter : Public lexer API +AMpd |void |lex_start |NULLOK SV* line|NULLOK PerlIO *rsfp|U32 flags AMpd |bool |lex_bufutf8 AMpd |char* |lex_grow_linestr|STRLEN len AMpd |void |lex_stuff_pvn |NN const char* pv|STRLEN len|U32 flags @@ -629,6 +630,13 @@ AMpd |I32 |lex_peek_unichar|U32 flags AMpd |I32 |lex_read_unichar|U32 flags AMpd |void |lex_read_space |U32 flags : Public parser API +AMpd |OP* |parse_arithexpr|U32 flags +AMpd |OP* |parse_termexpr |U32 flags +AMpd |OP* |parse_listexpr |U32 flags +AMpd |OP* |parse_fullexpr |U32 flags +AMpd |OP* |parse_block |U32 flags +AMpd |OP* |parse_barestmt |U32 flags +AMpd |SV* |parse_label |U32 flags AMpd |OP* |parse_fullstmt |U32 flags AMpd |OP* |parse_stmtseq |U32 flags : Used in various files @@ -648,8 +656,10 @@ Ap |void |vload_module|U32 flags|NN SV* name|NULLOK SV* ver|NULLOK va_list* args p |OP* |localize |NN OP *o|I32 lex ApdR |I32 |looks_like_number|NN SV *const sv Apd |UV |grok_bin |NN const char* start|NN STRLEN* len_p|NN I32* flags|NULLOK NV *result -EXMpR |char |grok_bslash_c |const char source|const bool output_warning -EXMpR |bool |grok_bslash_o |NN const char* s|NN UV* uv|NN STRLEN* len|NN const char** error_msg|const bool output_warning +#ifdef PERL_IN_DQUOTE_STATIC_C +EMsR |char |grok_bslash_c |const char source|const bool utf8|const bool output_warning +EMsR |bool |grok_bslash_o |NN const char* s|NN UV* uv|NN STRLEN* len|NN const char** error_msg|const bool output_warning +#endif Apd |UV |grok_hex |NN const char* start|NN STRLEN* len_p|NN I32* flags|NULLOK NV *result Apd |int |grok_number |NN const char *pv|STRLEN len|NULLOK UV *valuep ApdR |bool |grok_numeric_radix|NN const char **sp|NN const char *send @@ -726,6 +736,7 @@ Apd |int |mg_copy |NN SV *sv|NN SV *nsv|NULLOK const char *key \ : Defined in mg.c, used only in scope.c pd |void |mg_localize |NN SV* sv|NN SV* nsv|bool setmagic ApdR |MAGIC* |mg_find |NULLOK const SV* sv|int type +ApdR |MAGIC* |mg_findext |NULLOK const SV* sv|int type|NULLOK const MGVTBL *vtbl Apd |int |mg_free |NN SV* sv Apd |void |mg_free_type |NN SV* sv|int how Apd |int |mg_get |NN SV* sv @@ -734,7 +745,8 @@ Apd |void |mg_magical |NN SV* sv Apd |int |mg_set |NN SV* sv Ap |I32 |mg_size |NN SV* sv Ap |void |mini_mktime |NN struct tm *ptm -: Used by MOD(), which Data::Alias uses +AMpd |OP* |op_lvalue |NULLOK OP* o|I32 type +: To be removed after 5.14 (see [perl #78908]): EXp |OP* |mod |NULLOK OP* o|I32 type : Used in op.c and pp_sys.c p |int |mode_from_discipline|NULLOK const char* s|STRLEN len @@ -785,8 +797,7 @@ Ap |OP* |newFORM |I32 floor|NULLOK OP* o|NULLOK OP* block #else Ap |void |newFORM |I32 floor|NULLOK OP* o|NULLOK OP* block #endif -Apda |OP* |newFOROP |I32 flags|NULLOK char* label|line_t forline \ - |NULLOK OP* sv|NN OP* expr|NULLOK OP* block|NULLOK OP* cont +Apda |OP* |newFOROP |I32 flags|NULLOK OP* sv|NN OP* expr|NULLOK OP* block|NULLOK OP* cont Apda |OP* |newGIVENOP |NN OP* cond|NN OP* block|PADOFFSET defsv_off Apda |OP* |newLOGOP |I32 optype|I32 flags|NN OP *first|NN OP *other Apda |OP* |newLOOPEX |I32 type|NN OP* label @@ -797,7 +808,8 @@ Ap |void |newPROG |NN OP* o Apda |OP* |newRANGE |I32 flags|NN OP* left|NN OP* right Apda |OP* |newSLICEOP |I32 flags|NULLOK OP* subscript|NULLOK OP* listop Apda |OP* |newSTATEOP |I32 flags|NULLOK char* label|NULLOK OP* o -Ap |CV* |newSUB |I32 floor|NULLOK OP* o|NULLOK OP* proto|NULLOK OP* block +Abm |CV* |newSUB |I32 floor|NULLOK OP* o|NULLOK OP* proto \ + |NULLOK OP* block ApM |CV * |newXS_flags |NULLOK const char *name|NN XSUBADDR_t subaddr\ |NN const char *const filename \ |NULLOK const char *const proto|U32 flags @@ -842,7 +854,7 @@ Apda |SV* |newSV_type |const svtype type Apda |OP* |newUNOP |I32 type|I32 flags|NULLOK OP* first Apda |OP* |newWHENOP |NULLOK OP* cond|NN OP* block Apda |OP* |newWHILEOP |I32 flags|I32 debuggable|NULLOK LOOP* loop \ - |I32 whileline|NULLOK OP* expr|NULLOK OP* block|NULLOK OP* cont \ + |NULLOK OP* expr|NULLOK OP* block|NULLOK OP* cont \ |I32 has_my Apd |CV* |rv2cv_op_cv |NN OP *cvop|U32 flags Apd |OP* |ck_entersub_args_list|NN OP *entersubop @@ -961,6 +973,10 @@ Ap |void |regdump |NN const regexp* r Ap |SV* |regclass_swash |NULLOK const regexp *prog \ |NN const struct regnode *node|bool doinit \ |NULLOK SV **listsvp|NULLOK SV **altsvp +#ifdef PERL_IN_REGCOMP_C +EXMi |U8 |set_regclass_bit|NN struct RExC_state_t* pRExC_state|NN regnode* node|const U8 value|NN HV** nonbitmap_ptr +EXMs |U8 |set_regclass_bit_fold|NN struct RExC_state_t *pRExC_state|NN regnode* node|const U8 value|NN HV** nonbitmap_ptr +#endif Ap |I32 |pregexec |NN REGEXP * const prog|NN char* stringarg \ |NN char* strend|NN char* strbeg|I32 minend \ |NN SV* screamer|U32 nosave @@ -978,6 +994,9 @@ Ap |char* |re_intuit_start|NN REGEXP * const rx|NULLOK SV* sv|NN char* strpos \ |NN char* strend|const U32 flags \ |NULLOK re_scream_pos_data *data Ap |SV* |re_intuit_string|NN REGEXP *const r +#if defined(PERL_IN_DQUOTE_STATIC_C) +EiPR |I32 |regcurly |NN const char *s +#endif Ap |I32 |regexec_flags |NN REGEXP *const rx|NN char *stringarg \ |NN char *strend|NN char *strbeg|I32 minend \ |NN SV *sv|NULLOK void *data|U32 flags @@ -1102,8 +1121,7 @@ Apd |NV |scan_bin |NN const char* start|STRLEN len|NN STRLEN* retlen Apd |NV |scan_hex |NN const char* start|STRLEN len|NN STRLEN* retlen Ap |char* |scan_num |NN const char* s|NN YYSTYPE *lvalp Apd |NV |scan_oct |NN const char* start|STRLEN len|NN STRLEN* retlen -: Used in perly.y -p |OP* |scope |NULLOK OP* o +AMpd |OP* |op_scope |NULLOK OP* o Ap |char* |screaminstr |NN SV *bigstr|NN SV *littlestr|I32 start_shift \ |I32 end_shift|NN I32 *old_posp|I32 last Apd |void |setdefout |NULLOK GV* gv @@ -1166,15 +1184,25 @@ pd |I32 |sv_clean_all : Used only in perl.c pd |void |sv_clean_objs Apd |void |sv_clear |NN SV *const orig_sv -Apd |I32 |sv_cmp |NULLOK SV *const sv1|NULLOK SV *const sv2 -Apd |I32 |sv_cmp_flags |NULLOK SV *const sv1|NULLOK SV *const sv2|const I32 flags -Apd |I32 |sv_cmp_locale |NULLOK SV *const sv1|NULLOK SV *const sv2 -Apd |I32 |sv_cmp_locale_flags |NULLOK SV *const sv1|NULLOK SV *const sv2|const I32 flags +#if defined(PERL_IN_SV_C) +s |bool |curse |NN SV * const sv|const bool check_refcnt +#endif +Aopd |I32 |sv_cmp |NULLOK SV *const sv1|NULLOK SV *const sv2 +Apd |I32 |sv_cmp_flags |NULLOK SV *const sv1|NULLOK SV *const sv2 \ + |const U32 flags +Aopd |I32 |sv_cmp_locale |NULLOK SV *const sv1|NULLOK SV *const sv2 +Apd |I32 |sv_cmp_locale_flags |NULLOK SV *const sv1 \ + |NULLOK SV *const sv2|const U32 flags #if defined(USE_LOCALE_COLLATE) Amd |char* |sv_collxfrm |NN SV *const sv|NN STRLEN *const nxp Apd |char* |sv_collxfrm_flags |NN SV *const sv|NN STRLEN *const nxp|I32 const flags #endif -Ap |OP* |sv_compile_2op |NN SV *sv|NN OP **startop \ +: Frustratingly, because regcomp.c is also compiled as ext/re/re_comp.c, +: anything it needs has to be exported. So this has to be X. I'd rather it +: wasn't. +Xpo |OP* |sv_compile_2op_is_broken|NN SV *sv|NN OP **startop \ + |NN const char *code|NN PAD **padp +ApD |OP* |sv_compile_2op |NN SV *sv|NN OP **startop \ |NN const char *code|NN PAD **padp Apd |int |getcwd_sv |NN SV* sv Apd |void |sv_dec |NULLOK SV *const sv @@ -1183,7 +1211,7 @@ Ap |void |sv_dump |NN SV* sv ApdR |bool |sv_derived_from|NN SV* sv|NN const char *const name ApdR |bool |sv_does |NN SV* sv|NN const char *const name Amd |I32 |sv_eq |NULLOK SV* sv1|NULLOK SV* sv2 -Apd |I32 |sv_eq_flags |NULLOK SV* sv1|NULLOK SV* sv2|const I32 flags +Apd |I32 |sv_eq_flags |NULLOK SV* sv1|NULLOK SV* sv2|const U32 flags Apd |void |sv_free |NULLOK SV *const sv : FIXME Used in SvREFCNT_dec() but only : if defined(__GNUC__) && !defined(PERL_GCC_BRACE_GROUPS_FORBIDDEN) @@ -1245,6 +1273,7 @@ Amdb |void |sv_setsv |NN SV *dstr|NULLOK SV *sstr Amdb |void |sv_taint |NN SV* sv ApdR |bool |sv_tainted |NN SV *const sv Apd |int |sv_unmagic |NN SV *const sv|const int type +Apd |int |sv_unmagicext |NN SV *const sv|const int type|NULLOK MGVTBL *vtbl Apdmb |void |sv_unref |NN SV* sv Apd |void |sv_unref_flags |NN SV *const ref|const U32 flags Apd |void |sv_untaint |NN SV *const sv @@ -1261,6 +1290,24 @@ Apd |void |sv_vsetpvfn |NN SV *const sv|NN const char *const pat|const STRLEN pa ApR |NV |str_to_version |NN SV *sv Ap |SV* |swash_init |NN const char* pkg|NN const char* name|NN SV* listsv|I32 minbits|I32 none Ap |UV |swash_fetch |NN SV *swash|NN const U8 *ptr|bool do_utf8 +EXMpR |HV* |_swash_inversion_hash |NN SV* const swash +EXMpR |HV* |_new_invlist |IV initial_size +EXMpR |HV* |_swash_to_invlist |NN SV* const swash +EXMp |void |_append_range_to_invlist |NN HV* const invlist|const UV start|const UV end +#ifdef PERL_IN_REGCOMP_C +EsMR |HV* |add_range_to_invlist |NN HV* const invlist|const UV start|const UV end +EiMR |UV* |invlist_array |NN HV* const invlist +EiM |void |invlist_destroy |NN HV* const invlist +EsM |void |invlist_extend |NN HV* const invlist|const UV len +EsMR |HV* |invlist_intersection |NN HV* const a|NN HV* const b +EiMR |UV |invlist_len |NN HV* const invlist +EiMR |UV |invlist_max |NN HV* const invlist +EiM |void |invlist_set_array |NN HV* const invlist|NN const UV* const array +EiM |void |invlist_set_len |NN HV* const invlist|const UV len +EiM |void |invlist_set_max |NN HV* const invlist|const UV max +EiM |void |invlist_trim |NN HV* const invlist +EsMR |HV* |invlist_union |NN HV* const a|NN HV* const b +#endif Ap |void |taint_env Ap |void |taint_proper |NULLOK const char* f|NN const char *const s Apd |UV |to_utf8_case |NN const U8 *p|NN U8* ustrp|NULLOK STRLEN *lenp \ @@ -1293,10 +1340,13 @@ AdpPR |STRLEN |utf8_length |NN const U8* s|NN const U8 *e ApdPR |IV |utf8_distance |NN const U8 *a|NN const U8 *b ApdPR |U8* |utf8_hop |NN const U8 *s|I32 off ApMd |U8* |utf8_to_bytes |NN U8 *s|NN STRLEN *len +Apd |int |bytes_cmp_utf8 |NN const U8 *b|STRLEN blen|NN const U8 *u \ + |STRLEN ulen ApMd |U8* |bytes_from_utf8|NN const U8 *s|NN STRLEN *len|NULLOK bool *is_utf8 ApMd |U8* |bytes_to_utf8 |NN const U8 *s|NN STRLEN *len Apd |UV |utf8_to_uvchr |NN const U8 *s|NULLOK STRLEN *retlen Apd |UV |utf8_to_uvuni |NN const U8 *s|NULLOK STRLEN *retlen +pM |bool |check_utf8_print |NN const U8 *s|const STRLEN len #ifdef EBCDIC Adp |UV |utf8n_to_uvchr |NN const U8 *s|STRLEN curlen|NULLOK STRLEN *retlen|U32 flags @@ -1329,7 +1379,9 @@ Ap |U32 |seed : Only used in perl.c pR |UV |get_hash_seed : Used in doio.c, pp_hot.c, pp_sys.c -p |void |report_evil_fh |NULLOK const GV *gv|NULLOK const IO *io|I32 op +p |void |report_evil_fh |NULLOK const GV *gv +: Used in doio.c, pp_hot.c, pp_sys.c +p |void |report_wrongway_fh|NULLOK const GV *gv|const char have : Used in mg.c, pp.c, pp_hot.c, regcomp.c XEpd |void |report_uninit |NULLOK const SV *uninit_sv Apd |void |warn_sv |NN SV *baseex @@ -1454,7 +1506,7 @@ ApR |HEK* |hek_dup |NULLOK HEK* e|NN CLONE_PARAMS* param Ap |void |re_dup_guts |NN const REGEXP *sstr|NN REGEXP *dstr \ |NN CLONE_PARAMS* param Ap |PerlIO*|fp_dup |NULLOK PerlIO *const fp|const char type|NN CLONE_PARAMS *const param -ApR |DIR* |dirp_dup |NULLOK DIR *const dp +ApR |DIR* |dirp_dup |NULLOK DIR *const dp|NN CLONE_PARAMS *const param ApR |GP* |gp_dup |NULLOK GP *const gp|NN CLONE_PARAMS *const param ApR |MAGIC* |mg_dup |NULLOK MAGIC *mg|NN CLONE_PARAMS *const param #if defined(PERL_IN_SV_C) @@ -1488,8 +1540,11 @@ Ap |void |sys_intern_clear Ap |void |sys_intern_init #endif +AopP |const XOP * |custom_op_xop |NN const OP *o ApR |const char * |custom_op_name |NN const OP *o ApR |const char * |custom_op_desc |NN const OP *o +Aop |void |custom_op_register |NN Perl_ppaddr_t ppaddr \ + |NN const XOP *xop Adp |void |sv_nosharing |NULLOK SV *sv Adpbm |void |sv_nolocking |NULLOK SV *sv @@ -1533,7 +1588,6 @@ sM |SV* |hv_delete_common|NULLOK HV *hv|NULLOK SV *keysv \ |NULLOK const char *key|STRLEN klen|int k_flags|I32 d_flags \ |U32 hash sM |void |clear_placeholders |NN HV *hv|U32 items -sM |SV * |refcounted_he_value |NN const struct refcounted_he *he #endif #if defined(PERL_IN_MG_C) @@ -1543,7 +1597,7 @@ s |SV* |magic_methcall1|NN SV *sv|NN const MAGIC *mg \ |NN const char *meth|U32 flags \ |int n|NULLOK SV *val s |void |restore_magic |NULLOK const void *p -s |void |unwind_handler_stack|NN const void *p +s |void |unwind_handler_stack|NULLOK const void *p #endif @@ -1625,6 +1679,7 @@ s |SV * |incpush_if_exists|NN AV *const av|NN SV *dir|NN SV *const stem #endif #if defined(PERL_IN_PP_C) +s |void |do_chomp |NN SV *retval|NN SV *sv|bool chomping s |OP* |do_delete_local sR |SV* |refto |NN SV* sv #endif @@ -1665,9 +1720,9 @@ sR |I32 |dopoptosub_at |NN const PERL_CONTEXT* cxstk|I32 startingblock sR |I32 |dopoptowhen |I32 startingblock s |void |save_lines |NULLOK AV *array|NN SV *sv s |bool |doeval |int gimme|NULLOK OP** startop|NULLOK CV* outside|U32 seq -sR |PerlIO *|check_type_and_open|NN const char *name +sR |PerlIO *|check_type_and_open|NN SV *name #ifndef PERL_DISABLE_PMC -sR |PerlIO *|doopen_pm |NN const char *name|const STRLEN namelen +sR |PerlIO *|doopen_pm |NN SV *name #endif sRn |bool |path_is_absolute|NN const char *name sR |I32 |run_user_filter|int idx|NN SV *buf_sv|int maxlen @@ -1701,10 +1756,10 @@ s |OP* |doform |NN CV *cv|NN GV *gv|NN OP *retop sR |int |dooneliner |NN const char *cmd|NN const char *filename # endif s |SV * |space_join_names_mortal|NN char *const *array -so |OP * |tied_handle_method|NN const char *const methname|NN SV **sp \ - |NN IO *const io|NN MAGIC *const mg \ - |const U32 flags|... #endif +p |OP * |tied_method|NN const char *const methname|NN SV **sp \ + |NN SV *const sv|NN const MAGIC *const mg \ + |const U32 flags|U32 argc|... #if defined(PERL_IN_REGCOMP_C) Es |regnode*|reg |NN struct RExC_state_t *pRExC_state \ @@ -1796,8 +1851,8 @@ Es |U8 |regtail_study |NN struct RExC_state_t *pRExC_state \ ERs |I32 |regmatch |NN regmatch_info *reginfo|NN regnode *prog ERs |I32 |regrepeat |NN const regexp *prog|NN const regnode *p|I32 max|int depth ERs |I32 |regtry |NN regmatch_info *reginfo|NN char **startpos -ERs |bool |reginclass |NULLOK const regexp *prog|NN const regnode *n|NN const U8 *p|NULLOK STRLEN *lenp\ - |bool do_utf8sv_is_utf8 +ERs |bool |reginclass |NULLOK const regexp * const prog|NN const regnode * const n|NN const U8 * const p|NULLOK STRLEN *lenp\ + |bool const do_utf8sv_is_utf8 Es |CHECKPOINT|regcppush |I32 parenfloor Es |char* |regcppop |NN const regexp *rex ERsn |U8* |reghop3 |NN U8 *s|I32 off|NN const U8 *lim @@ -1927,7 +1982,6 @@ s |U8* |add_utf16_textfilter|NN U8 *const s|bool reversed #endif s |void |checkcomma |NN const char *s|NN const char *name \ |NN const char *what -s |bool |feature_is_enabled|NN const char *const name|STRLEN namelen s |void |force_ident |NN const char *s|int kind s |void |incline |NN const char *s s |int |intuit_method |NN char *s|NULLOK GV *gv|NULLOK CV *cv @@ -1959,7 +2013,6 @@ s |void |printbuf |NN const char *const fmt|NN const char *const s #if defined(PERL_IN_UNIVERSAL_C) s |bool|isa_lookup |NN HV *stash|NN const char * const name -so |HV * |get_isa_hash |NN HV *const stash #endif #if defined(PERL_IN_LOCALE_C) @@ -2054,8 +2107,6 @@ s |void |deb_stack_n |NN SV** stack_base|I32 stack_min \ : Used in perl.c, pp_ctl.c, toke.c pda |PADLIST*|pad_new |int flags : Only used in op.c -pd |void |pad_undef |NN CV* cv -: Only used in op.c Mpd |PADOFFSET|pad_add_name |NN const char *name|const STRLEN len\ |const U32 flags|NULLOK HV *typestash\ |NULLOK HV *ourstash @@ -2116,6 +2167,10 @@ ApoR |HE** |hv_eiter_p |NN HV *hv Apo |void |hv_riter_set |NN HV *hv|I32 riter Apo |void |hv_eiter_set |NN HV *hv|NULLOK HE *eiter Ap |void |hv_name_set |NN HV *hv|NULLOK const char *name|U32 len|U32 flags +p |void |hv_ename_add |NN HV *hv|NN const char *name|U32 len \ + |U32 flags +p |void |hv_ename_delete|NN HV *hv|NN const char *name|U32 len \ + |U32 flags : Used in dump.c and hv.c poM |AV** |hv_backreferences_p |NN HV *hv #if defined(PERL_IN_DUMP_C) || defined(PERL_IN_HV_C) || defined(PERL_IN_SV_C) @@ -2357,12 +2412,20 @@ p |struct mro_meta* |mro_meta_dup |NN struct mro_meta* smeta|NN CLONE_PARAMS* pa Apd |AV* |mro_get_linear_isa|NN HV* stash #if defined(PERL_IN_MRO_C) sd |AV* |mro_get_linear_isa_dfs|NN HV* stash|U32 level +s |void |mro_clean_isarev|NN HV * const isa \ + |NN const char * const name \ + |const STRLEN len \ + |NULLOK HV * const exceptions +s |void |mro_gather_and_rename|NN HV * const stashes \ + |NN HV * const seen_stashes \ + |NULLOK HV *stash \ + |NULLOK HV *oldstash \ + |NN SV *namesv #endif : Used in hv.c, mg.c, pp.c, sv.c -md |void |mro_isa_changed_in|NN HV* stash -pd |void |mro_isa_changed_in3|NULLOK HV* stash|NULLOK const char *stashname|STRLEN stashname_len +pd |void |mro_isa_changed_in|NN HV* stash Apd |void |mro_method_changed_in |NN HV* stash -pdx |void |mro_package_moved |NULLOK HV * const stash|NULLOK const HV * const oldstash|NULLOK const GV * const gv|NULLOK const char *newname|I32 newname_len +pdx |void |mro_package_moved |NULLOK HV * const stash|NULLOK HV * const oldstash|NN const GV * const gv|U32 flags : Only used in perl.c p |void |boot_core_mro Apon |void |sys_init |NN int* argc|NN char*** argv @@ -2390,4 +2453,7 @@ Anop |void |clone_params_del|NN CLONE_PARAMS *param : Used in perl.c and toke.c op |void |populate_isa |NN const char *name|STRLEN len|... +: Used in keywords.c and toke.c +op |bool |feature_is_enabled|NN const char *const name|STRLEN namelen + : ex: set ts=8 sts=4 sw=4 noet: