summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-05-21 12:52:46 -0600
committerKarl Williamson <khw@cpan.org>2022-05-21 12:55:21 -0600
commit1960dc32f246285ac9ce07ece6af9c0bc0a720fd (patch)
treea53edb12f294cde3a043b9cc7639e0d337041078
parenta603a24d7c774d74696eeac3d7aad08d547a3b04 (diff)
downloadperl-1960dc32f246285ac9ce07ece6af9c0bc0a720fd.tar.gz
Revert "perlapi: Document sv_dup(_inc)?"
This reverts commit f45ba102ff7bfce07641cfd49cd18ef4e8a7f6e3, which turns out to be contentious, so at this late date revert.
-rw-r--r--embed.fnc4
-rw-r--r--sv.c21
2 files changed, 2 insertions, 23 deletions
diff --git a/embed.fnc b/embed.fnc
index baf44e17f8..7da9faa0d6 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -2829,8 +2829,8 @@ S |SV ** |sv_dup_inc_multiple|NN SV *const *source|NN SV **dest \
SR |SV* |sv_dup_common |NN const SV *const ssv \
|NN CLONE_PARAMS *const param
#endif
-ApdR |SV* |sv_dup |NULLOK const SV *const ssv|NN CLONE_PARAMS *const param
-ApdR |SV* |sv_dup_inc |NULLOK const SV *const ssv \
+ApR |SV* |sv_dup |NULLOK const SV *const ssv|NN CLONE_PARAMS *const param
+ApR |SV* |sv_dup_inc |NULLOK const SV *const ssv \
|NN CLONE_PARAMS *const param
Cp |void |rvpv_dup |NN SV *const dsv|NN const SV *const ssv|NN CLONE_PARAMS *const param
Cp |yy_parser*|parser_dup |NULLOK const yy_parser *const proto|NN CLONE_PARAMS *const param
diff --git a/sv.c b/sv.c
index 11bed2c44d..16bba941cb 100644
--- a/sv.c
+++ b/sv.c
@@ -14625,27 +14625,6 @@ S_sv_dup_common(pTHX_ const SV *const ssv, CLONE_PARAMS *const param)
return dsv;
}
-/*
-=for apidoc sv_dup
-=for apidoc_item sv_dup_inc
-
-These duplicate an SV of any type (including AV, HV etc), returning a pointer
-to the cloned object. The difference is that the new SV under C<sv_dup> has a
-reference count of 0, but 1 under C<sv_dup_inc>. Only specialized cases will
-want a zero reference count, almost certainly only when you aren't already
-holding a reference. Thus, you almost always want to use the C<sv_dup_inc>
-form.
-
-C<param> has type S<C<CLONE_PARAMS *>>. This is mostly for internal core use
-when duplicating something more complicated than an SV (code in common is
-used). Your code may inherit this parameter, which you merely pass on, but you
-can initialize it by using L</C<clone_params_new>>. Don't forget to free it
-when done, via L</C<clone_params_del>>. Its only member that is public is
-C<flags>, all which are documented in L</C<perl_clone>>.
-
-=cut
- */
-
SV *
Perl_sv_dup_inc(pTHX_ const SV *const ssv, CLONE_PARAMS *const param)
{