Lines Matching defs:smeta
38 Perl_mro_get_private_data(pTHX_ struct mro_meta *const smeta,
44 data = (SV **)Perl_hv_common(aTHX_ smeta->mro_linear_all, NULL,
52 if (smeta->mro_which == which)
53 smeta->mro_linear_current = *data;
59 Perl_mro_set_private_data(pTHX_ struct mro_meta *const smeta,
64 if (!smeta->mro_linear_all) {
65 if (smeta->mro_which == which) {
69 smeta->mro_linear_current = data;
75 smeta->mro_linear_all = hv;
77 if (smeta->mro_linear_current) {
80 Perl_mro_set_private_data(aTHX_ smeta, smeta->mro_which,
81 smeta->mro_linear_current);
89 if (smeta->mro_which == which) {
92 smeta->mro_linear_current = data;
95 if (!Perl_hv_common(aTHX_ smeta->mro_linear_all, NULL,
176 Perl_mro_meta_dup(pTHX_ struct mro_meta* smeta, CLONE_PARAMS* param)
183 Copy(smeta, newmeta, 1, struct mro_meta);