summaryrefslogtreecommitdiff
path: root/scope.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-05-11 12:21:54 -0600
committerKarl Williamson <khw@cpan.org>2022-05-11 15:02:44 -0600
commitaaa067eafc38fefd44414ddbd2207ea69f4fba6b (patch)
tree0b6219cf568583597091ba88d86d406eee1f780a /scope.c
parent97172efd384c6f391ae73e7c6082eff5fe26c4e6 (diff)
downloadperl-aaa067eafc38fefd44414ddbd2207ea69f4fba6b.tar.gz
perlintern: Document save_[ah]delete; mark internal
These implement SAVE[AH]HDELETE which are the API interfaces for this functionality.
Diffstat (limited to 'scope.c')
-rw-r--r--scope.c18
1 files changed, 18 insertions, 0 deletions
diff --git a/scope.c b/scope.c
index cf1b19c726..e902f4c852 100644
--- a/scope.c
+++ b/scope.c
@@ -711,6 +711,15 @@ Perl_save_delete(pTHX_ HV *hv, char *key, I32 klen)
save_pushptri32ptr(key, klen, SvREFCNT_inc_simple(hv), SAVEt_DELETE);
}
+/*
+=for apidoc_section $callback
+=for apidoc save_hdelete
+
+Implements C<SAVEHDELETE>.
+
+=cut
+*/
+
void
Perl_save_hdelete(pTHX_ HV *hv, SV *keysv)
{
@@ -726,6 +735,15 @@ Perl_save_hdelete(pTHX_ HV *hv, SV *keysv)
save_pushptri32ptr(savepvn(key, len), klen, hv, SAVEt_DELETE);
}
+/*
+=for apidoc_section $callback
+=for apidoc save_adelete
+
+Implements C<SAVEADELETE>.
+
+=cut
+*/
+
void
Perl_save_adelete(pTHX_ AV *av, SSize_t key)
{