Searched refs:mg_find (Results 1 - 22 of 22) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dtaint.c101 if ((mg = mg_find(*svp, PERL_MAGIC_envelem)) && MgTAINTEDDIR(mg)) {
116 if ((mg = mg_find(*svp, PERL_MAGIC_envelem)) && MgTAINTEDDIR(mg)) {
H A Dmg.h53 (SvRMAGICAL(sv) ? mg_find((sv),(how)) : Null(MAGIC*))
H A Dcc_runtime.h26 !((mg=mg_find(left, PERL_MAGIC_taint)) && mg->mg_len & 1)))\
H A Dav.c191 MAGIC *tied_magic = mg_find((SV*)av, PERL_MAGIC_tied);
192 if (tied_magic || mg_find((SV*)av, PERL_MAGIC_regdata)) {
279 MAGIC *tied_magic = mg_find((SV*)av, PERL_MAGIC_tied);
801 MAGIC *tied_magic = mg_find((SV*)av, PERL_MAGIC_tied);
803 if ((tied_magic || mg_find((SV*)av, PERL_MAGIC_regdata))) {
826 if (mg_find(sv, PERL_MAGIC_tiedelem)) {
883 MAGIC *tied_magic = mg_find((SV*)av, PERL_MAGIC_tied);
884 if (tied_magic || mg_find((SV*)av, PERL_MAGIC_regdata)) {
907 mg = mg_find(sv, PERL_MAGIC_tiedelem);
H A Dhv.c401 if (mg_find((SV*)hv, PERL_MAGIC_tied) || SvGMAGICAL((SV*)hv)) {
442 else if (mg_find((SV*)hv, PERL_MAGIC_env)) {
473 if (mg_find((SV*)hv, PERL_MAGIC_tied) || SvGMAGICAL((SV*)hv)) {
493 magic_existspack(svret, mg_find(sv, PERL_MAGIC_tiedelem));
500 else if (mg_find((SV*)hv, PERL_MAGIC_env)) {
542 else if (mg_find((SV*)hv, PERL_MAGIC_env)) {
564 || (SvRMAGICAL((SV*)hv) && mg_find((SV*)hv, PERL_MAGIC_env))
699 && SvRMAGICAL((SV*)hv) && mg_find((SV*)hv, PERL_MAGIC_env)) {
815 if ((SvRMAGICAL(hv) && (mg = mg_find((SV*)hv, PERL_MAGIC_tied)))) {
913 if (mg_find(s
[all...]
H A Dgv.c1299 MAGIC* mg=mg_find((SV*)stash, PERL_MAGIC_overload_table);
1422 mg = mg_find((SV*)stash, PERL_MAGIC_overload_table);
1426 mg = mg_find((SV*)stash, PERL_MAGIC_overload_table);
1466 && (mg = mg_find((SV*)stash, PERL_MAGIC_overload_table))
1584 && (mg = mg_find((SV*)stash, PERL_MAGIC_overload_table))
H A Dpp_hot.c1281 MAGIC* mg = mg_find(TARG, PERL_MAGIC_regex_global);
1372 mg = mg_find(TARG, PERL_MAGIC_regex_global);
1375 mg = mg_find(TARG, PERL_MAGIC_regex_global);
1400 mg = mg_find(TARG, PERL_MAGIC_regex_global);
1403 mg = mg_find(TARG, PERL_MAGIC_regex_global);
1462 MAGIC* mg = mg_find(TARG, PERL_MAGIC_regex_global);
1717 || mg_find((SV*)hv, PERL_MAGIC_env)
1718 || ( (mg = mg_find((SV*)hv, PERL_MAGIC_tied))
H A Dsv.c3015 && (mg = mg_find(sv, PERL_MAGIC_qr))) {
4044 MAGIC *smg = mg_find(sstr,PERL_MAGIC_vstring);
4668 if (SvMAGIC(sv) && (mg = mg_find(sv, how))) {
4895 if (SvMAGICAL(tsv) && (mg = mg_find(tsv, PERL_MAGIC_backref)))
4931 if (!SvMAGICAL(tsv) || !(mg = mg_find(tsv, PERL_MAGIC_backref)))
5421 MAGIC *mg = SvMAGICAL(sv) ? mg_find(sv, PERL_MAGIC_utf8) : 0;
5433 mg = mg_find(sv, PERL_MAGIC_utf8);
5493 *mgp = mg_find(sv, PERL_MAGIC_utf8);
5712 mg = mg_find(sv, PERL_MAGIC_utf8);
5783 mg = mg_find(s
[all...]
H A Dpp.c323 mg = mg_find(sv, PERL_MAGIC_regex_global);
743 || (SvRMAGICAL(sv) && mg_find(sv, PERL_MAGIC_tied)))
748 || (SvRMAGICAL(sv) && mg_find(sv, PERL_MAGIC_tied)))
3875 other_magic = mg_find((SV*)hv, PERL_MAGIC_env) ||
3876 ((mg = mg_find((SV*)hv, PERL_MAGIC_tied))
4708 MAGIC *mg = mg_find((SV*)svv, PERL_MAGIC_mutex);
H A Dregexec.c1688 && (mg = mg_find(sv, PERL_MAGIC_regex_global))
2103 && (mg = mg_find(PL_reg_sv, PERL_MAGIC_regex_global)))) {
2107 mg = mg_find(PL_reg_sv, PERL_MAGIC_regex_global);
2870 mg = mg_find(sv, PERL_MAGIC_qr);
2875 mg = mg_find(ret, PERL_MAGIC_qr);
H A Dscope.c208 (mg = mg_find(osv, PERL_MAGIC_taint))) {
H A Dsv.h594 #define SvVOK(sv) (SvMAGICAL(sv) && mg_find(sv,'V'))
H A Dpp_ctl.c86 mg = mg_find(sv, PERL_MAGIC_qr);
246 if (!(mg = mg_find(sv, PERL_MAGIC_regex_global))) {
248 mg = mg_find(sv, PERL_MAGIC_regex_global);
H A Dutil.c365 MAGIC *mg = SvUTF8(sv) && SvMAGICAL(sv) ? mg_find(sv, PERL_MAGIC_utf8) : NULL;
2955 mg = mg_find(sv, PERL_MAGIC_mutex);
2965 mg = mg_find(sv, PERL_MAGIC_mutex);
H A Dregcomp.c506 SvUTF8(sv) && SvMAGICAL(sv) ? mg_find(sv, PERL_MAGIC_utf8) : NULL;
934 mg_find(sv, PERL_MAGIC_utf8) : NULL;
1313 mg_find(sv, PERL_MAGIC_utf8) : NULL;
H A Dembed.h652 #define mg_find Perl_mg_find macro
3178 #define mg_find(a,b) Perl_mg_find(aTHX_ a,b) macro
H A Dperlio.c835 mg = mg_find(sv, PERL_MAGIC_ext);
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/Kstat/
H A DKstat.xs766 mg = mg_find((SV *)hash, 'P');
818 mg = mg_find((SV *)hash4, 'P');
841 mg = mg_find((SV *)self, '~');
894 mg = mg_find((SV *)hash4, 'P');
898 mg = mg_find((SV *)tie, '~');
1070 mg = mg_find((SV *)self, '~');
1247 mg = mg_find(SvRV(self), '~');
1366 mg = mg_find((SV *)tie, '~');
1414 mg = mg_find(SvRV(self), '~');
1574 mg = mg_find(sel
[all...]
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/Object/
H A DObject.xs70 mg = mg_find(SvRV(src->perl_obj), 'P');
303 mg = mg_find(SvRV(self->perl_obj), 'P');
539 mg = mg_find(SvRV(self->perl_obj), 'P');
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/
H A DExacct.xs334 mg = mg_find(SvRV(xs_obj->perl_obj), 'P');
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/List/Util/
H A DUtil.xs69 MAGIC *mg = mg_find(sv, 't');
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/
H A DStorable.xs2615 if (!(mg = mg_find(sv, mtype)))
2621 * The mg->mg_obj found by mg_find() above actually points to the
2661 if (!(mg = mg_find(sv, 'p')))
3098 if (!(mg = mg_find(sv, mtype))) {
3299 if (SvRMAGICAL(sv) && (mg_find(sv, 'p')))
3303 if (SvRMAGICAL(sv) && (mg_find(sv, 'q')))
3307 if (SvRMAGICAL(sv) && (mg_find(sv, 'P')))
3311 if (SvRMAGICAL(sv) && (mg_find(sv, 'P')))

Completed in 130 milliseconds