From aaa067eafc38fefd44414ddbd2207ea69f4fba6b Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Wed, 11 May 2022 12:21:54 -0600 Subject: perlintern: Document save_[ah]delete; mark internal These implement SAVE[AH]HDELETE which are the API interfaces for this functionality. --- scope.c | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) (limited to 'scope.c') 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. + +=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. + +=cut +*/ + void Perl_save_adelete(pTHX_ AV *av, SSize_t key) { -- cgit v1.2.1