summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-05-11 13:15:51 -0600
committerKarl Williamson <khw@cpan.org>2022-05-11 15:21:10 -0600
commit32c3a37b924d18846d9640140922de78a94fddd5 (patch)
tree53774db82723e429010247d3ac624542e09773aa /util.c
parent82f65d692378c969c43a9489b004ad023b016f11 (diff)
downloadperl-32c3a37b924d18846d9640140922de78a94fddd5.tar.gz
perlintern: Document [gs]et_context; mark internal
These implement PERL_[GS]ET_CONTEXT which are the API interfaces for this functionality.
Diffstat (limited to 'util.c')
-rw-r--r--util.c18
1 files changed, 18 insertions, 0 deletions
diff --git a/util.c b/util.c
index 108e87b46a..97bb083a27 100644
--- a/util.c
+++ b/util.c
@@ -3785,6 +3785,15 @@ Perl_find_script(pTHX_ const char *scriptname, bool dosearch,
#ifndef PERL_GET_CONTEXT_DEFINED
+/*
+=for apidoc_section $embedding
+=for apidoc get_context
+
+Implements L<perlapi/C<PERL_GET_CONTEXT>>, which you should use instead.
+
+=cut
+*/
+
void *
Perl_get_context(void)
{
@@ -3805,6 +3814,15 @@ Perl_get_context(void)
#endif
}
+/*
+=for apidoc_section $embedding
+=for apidoc set_context
+
+Implements L<perlapi/C<PERL_SET_CONTEXT>>, which you should use instead.
+
+=cut
+*/
+
void
Perl_set_context(void *t)
{