diff options
| -rw-r--r-- | embed.fnc | 2 | ||||
| -rw-r--r-- | embed.h | 2 | ||||
| -rw-r--r-- | ext/B/B.xs | 2 | ||||
| -rw-r--r-- | global.sym | 1 | ||||
| -rw-r--r-- | pod/perlapi.pod | 14 | ||||
| -rw-r--r-- | pod/perlintern.pod | 11 |
6 files changed, 17 insertions, 15 deletions
@@ -311,7 +311,7 @@ ApMdR |HE* |hv_iternext_flags|NN HV* tb|I32 flags ApdR |SV* |hv_iterval |NN HV* tb|NN HE* entry Ap |void |hv_ksplit |NN HV* hv|IV newmax Apdbm |void |hv_magic |NN HV* hv|NULLOK GV* gv|int how -dpoM |HV * |refcounted_he_chain_2hv|NULLOK const struct refcounted_he *c +AdpoM |HV * |refcounted_he_chain_2hv|NULLOK const struct refcounted_he *c XEpoM |SV * |refcounted_he_fetch|NN const struct refcounted_he *chain \ |NULLOK SV *keysv|NULLOK const char *key \ |STRLEN klen, int flags, U32 hash @@ -2501,8 +2501,6 @@ #define hv_iternext_flags(a,b) Perl_hv_iternext_flags(aTHX_ a,b) #define hv_iterval(a,b) Perl_hv_iterval(aTHX_ a,b) #define hv_ksplit(a,b) Perl_hv_ksplit(aTHX_ a,b) -#ifdef PERL_CORE -#endif #if defined(PERL_CORE) || defined(PERL_EXT) #endif #ifdef PERL_CORE diff --git a/ext/B/B.xs b/ext/B/B.xs index 3079f8540a..b2627aae84 100644 --- a/ext/B/B.xs +++ b/ext/B/B.xs @@ -1861,6 +1861,6 @@ SV* RHE_HASH(h) B::RHE h CODE: - RETVAL = newRV( (SV*)Perl_refcounted_he_chain_2hv(h) ); + RETVAL = newRV( (SV*)Perl_refcounted_he_chain_2hv(aTHX_ h) ); OUTPUT: RETVAL diff --git a/global.sym b/global.sym index c50db9e7ee..281ab12d1a 100644 --- a/global.sym +++ b/global.sym @@ -164,6 +164,7 @@ Perl_hv_iternext_flags Perl_hv_iterval Perl_hv_ksplit Perl_hv_magic +Perl_refcounted_he_chain_2hv Perl_refcounted_he_fetch Perl_refcounted_he_new Perl_hv_store diff --git a/pod/perlapi.pod b/pod/perlapi.pod index 3ea050e943..64710810d4 100644 --- a/pod/perlapi.pod +++ b/pod/perlapi.pod @@ -1913,6 +1913,20 @@ Creates a new HV. The reference count is set to 1. =for hackers Found in file hv.c +=item refcounted_he_chain_2hv +X<refcounted_he_chain_2hv> + +Generates an returns a C<HV *> by walking up the tree starting at the passed +in C<struct refcounted_he *>. + +NOTE: this function is experimental and may change or be +removed without notice. + + HV * refcounted_he_chain_2hv(const struct refcounted_he *c) + +=for hackers +Found in file hv.c + =back diff --git a/pod/perlintern.pod b/pod/perlintern.pod index 5c901cd47d..3f5bcfc621 100644 --- a/pod/perlintern.pod +++ b/pod/perlintern.pod @@ -480,17 +480,6 @@ Found in file gv.c =over 8 -=item refcounted_he_chain_2hv -X<refcounted_he_chain_2hv> - -Generates an returns a C<HV *> by walking up the tree starting at the passed -in C<struct refcounted_he *>. - - HV * refcounted_he_chain_2hv(const struct refcounted_he *c) - -=for hackers -Found in file hv.c - =item refcounted_he_free X<refcounted_he_free> |