summaryrefslogtreecommitdiff
path: root/mro_core.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2022-05-11 10:59:56 -0600
committerKarl Williamson <khw@cpan.org>2022-05-18 04:35:55 -0600
commit83d56587f32f4600970eab2a95c3060f32b003d2 (patch)
tree95e9f04e3d6771ee3f1e08cc382193b722f7b6ff /mro_core.c
parent821a824b05274c1702a020c757a2fb9d81f6a44a (diff)
downloadperl-83d56587f32f4600970eab2a95c3060f32b003d2.tar.gz
perlapi: Document mro_get_from_name, mro_set_mro
Diffstat (limited to 'mro_core.c')
-rw-r--r--mro_core.c20
1 files changed, 20 insertions, 0 deletions
diff --git a/mro_core.c b/mro_core.c
index 85c40db2b5..42a11af035 100644
--- a/mro_core.c
+++ b/mro_core.c
@@ -102,6 +102,15 @@ Perl_mro_set_private_data(pTHX_ struct mro_meta *const smeta,
return data;
}
+/*
+=for apidoc mro_get_from_name
+
+Returns the previously registered mro with the given C<name>, or NULL if not
+registered. See L</C<mro_register>>.
+
+=cut
+*/
+
const struct mro_alg *
Perl_mro_get_from_name(pTHX_ SV *name) {
SV **data;
@@ -1369,6 +1378,17 @@ Perl_mro_method_changed_in(pTHX_ HV *stash)
HvAUX(stash)->xhv_aux_flags &= ~HvAUXf_NO_DEREF;
}
+/*
+=for apidoc mro_set_mro
+
+Set C<meta> to the value contained in the registered mro plugin whose name is
+C<name>.
+
+Croaks if C<name> hasn't been registered
+
+=cut
+*/
+
void
Perl_mro_set_mro(pTHX_ struct mro_meta *const meta, SV *const name)
{