summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2021-07-31 15:31:00 +0000
committerNicholas Clark <nick@ccl4.org>2021-10-11 11:30:25 +0000
commit9710057bff258cbe68d25e718b0eeecf5c92cccc (patch)
tree4830ac7e05ab01df4a7d583ff736299e42e7516b /hv.c
parent15b39af41614cf0fa1a6931a63dba1bbbcd2c2b5 (diff)
downloadperl-9710057bff258cbe68d25e718b0eeecf5c92cccc.tar.gz
Inline S_hv_auxinit_internal() into S_hv_auxinit()
The previous commit eliminated the only other use of S_hv_auxinit_internal().
Diffstat (limited to 'hv.c')
-rw-r--r--hv.c29
1 files changed, 11 insertions, 18 deletions
diff --git a/hv.c b/hv.c
index 4a21571842..bec737ebf6 100644
--- a/hv.c
+++ b/hv.c
@@ -2194,23 +2194,6 @@ PERL_STATIC_INLINE U32 S_ptr_hash(PTRV u) {
}
static struct xpvhv_aux*
-S_hv_auxinit_internal(struct xpvhv_aux *iter) {
- PERL_ARGS_ASSERT_HV_AUXINIT_INTERNAL;
- iter->xhv_riter = -1; /* HvRITER(hv) = -1 */
- iter->xhv_eiter = NULL; /* HvEITER(hv) = NULL */
-#ifdef PERL_HASH_RANDOMIZE_KEYS
- iter->xhv_last_rand = iter->xhv_rand;
-#endif
- iter->xhv_name_u.xhvnameu_name = 0;
- iter->xhv_name_count = 0;
- iter->xhv_backreferences = 0;
- iter->xhv_mro_meta = NULL;
- iter->xhv_aux_flags = 0;
- return iter;
-}
-
-
-static struct xpvhv_aux*
S_hv_auxinit(pTHX_ HV *hv) {
struct xpvhv_aux *iter;
char *array;
@@ -2240,7 +2223,17 @@ S_hv_auxinit(pTHX_ HV *hv) {
iter = HvAUX(hv);
}
- return hv_auxinit_internal(iter);
+ iter->xhv_riter = -1; /* HvRITER(hv) = -1 */
+ iter->xhv_eiter = NULL; /* HvEITER(hv) = NULL */
+#ifdef PERL_HASH_RANDOMIZE_KEYS
+ iter->xhv_last_rand = iter->xhv_rand;
+#endif
+ iter->xhv_name_u.xhvnameu_name = 0;
+ iter->xhv_name_count = 0;
+ iter->xhv_backreferences = 0;
+ iter->xhv_mro_meta = NULL;
+ iter->xhv_aux_flags = 0;
+ return iter;
}
/*