Searched defs:mg (Results 1 - 17 of 17) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dtaint.c73 MAGIC* mg; local
101 if ((mg = mg_find(*svp, PERL_MAGIC_envelem)) && MgTAINTEDDIR(mg)) {
116 if ((mg = mg_find(*svp, PERL_MAGIC_envelem)) && MgTAINTEDDIR(mg)) {
H A Dav.c64 MAGIC *mg; local
65 if ((mg = SvTIED_mg((SV*)av, PERL_MAGIC_tied))) {
72 PUSHs(SvTIED_obj((SV*)av, mg));
334 MAGIC* mg = SvMAGIC(av); local
335 sv_magic(val, (SV*)av, toLOWER(mg->mg_type), 0, key);
524 MAGIC *mg; local
530 if ((mg = SvTIED_mg((SV*)av, PERL_MAGIC_tied))) {
535 PUSHs(SvTIED_obj((SV*)av, mg));
560 MAGIC* mg; local
566 if ((mg
606 MAGIC* mg; local
676 MAGIC* mg; local
737 MAGIC *mg; local
886 MAGIC *mg; local
[all...]
H A Ddump.c813 Perl_do_magic_dump(pTHX_ I32 level, PerlIO *file, MAGIC *mg, I32 nest, I32 maxnest, bool dumpops, STRLEN pvlim) argument
815 for (; mg; mg = mg->mg_moremagic) {
817 " MAGIC = 0x%"UVxf"\n", PTR2UV(mg));
818 if (mg->mg_virtual) {
819 MGVTBL *v = mg->mg_virtual;
857 if (mg->mg_private)
858 Perl_dump_indent(aTHX_ level, file, " MG_PRIVATE = %d\n", mg->mg_private);
864 if (mg
931 Perl_magic_dump(pTHX_ MAGIC *mg) argument
[all...]
H A Dpp_hot.c543 MAGIC *mg; local
551 && (mg = SvTIED_mg((SV*)io, PERL_MAGIC_tiedscalar)))
564 *MARK = SvTIED_obj((SV*)io, mg);
577 && (mg = SvTIED_mg((SV*)io, PERL_MAGIC_tiedscalar)))
1281 MAGIC* mg = mg_find(TARG, PERL_MAGIC_regex_global); local
1282 if (mg && mg->mg_len >= 0) {
1284 rx->endp[0] = rx->startp[0] = mg->mg_len;
1287 rx->endp[0] = rx->startp[0] = mg->mg_len;
1289 minmatch = (mg
1370 MAGIC* mg = 0; local
1398 MAGIC* mg = 0; local
1462 MAGIC* mg = mg_find(TARG, PERL_MAGIC_regex_global); local
1484 MAGIC *mg; local
1711 MAGIC *mg; local
2677 MAGIC *mg; local
[all...]
H A Dscope.c204 MAGIC* mg; local
208 (mg = mg_find(osv, PERL_MAGIC_taint))) {
209 SAVESPTR(mg->mg_obj);
210 mg->mg_obj = osv;
H A Dhv.c785 MAGIC *mg = SvMAGIC(hv); local
788 while (mg) {
789 if (isUPPER(mg->mg_type)) {
791 switch (mg->mg_type) {
797 mg = mg->mg_moremagic;
812 MAGIC *mg; local
815 if ((SvRMAGICAL(hv) && (mg = mg_find((SV*)hv, PERL_MAGIC_tied)))) {
816 sv = magic_scalarpack(hv, mg);
1695 MAGIC* mg; local
[all...]
H A Dmg.c5 /* mg.c
107 MAGIC* mg; local
108 for (mg = SvMAGIC(sv); mg; mg = mg->mg_moremagic) {
109 MGVTBL* vtbl = mg->mg_virtual;
111 if (vtbl->svt_get && !(mg->mg_flags & MGf_GSKIP))
133 MAGIC *newmg, *head, *cur, *mg; local
138 /* We must call svt_get(sv, mg) fo
147 CALL_FPTR(vtbl->svt_get)(aTHX_ sv, mg); local
199 MAGIC* mg; local
213 CALL_FPTR(vtbl->svt_set)(aTHX_ sv, mg); local
231 MAGIC* mg; local
261 MAGIC* mg; local
303 MAGIC* mg; local
313 CALL_FPTR(vtbl->svt_clear)(aTHX_ sv, mg); local
331 MAGIC* mg; local
353 MAGIC* mg; local
382 MAGIC* mg; local
388 CALL_FPTR(vtbl->svt_free)(aTHX_ sv, mg); local
406 Perl_magic_regdata_cnt(pTHX_ SV *sv, MAGIC *mg) argument
421 Perl_magic_regdatum_get(pTHX_ SV *sv, MAGIC *mg) argument
455 Perl_magic_regdatum_set(pTHX_ SV *sv, MAGIC *mg) argument
463 Perl_magic_len(pTHX_ SV *sv, MAGIC *mg) argument
555 Perl_magic_get(pTHX_ SV *sv, MAGIC *mg) argument
743 MAGIC* mg = SvMAGIC(sv); local
932 Perl_magic_getuvar(pTHX_ SV *sv, MAGIC *mg) argument
942 Perl_magic_setenv(pTHX_ SV *sv, MAGIC *mg) argument
1018 Perl_magic_clearenv(pTHX_ SV *sv, MAGIC *mg) argument
1026 Perl_magic_set_all_env(pTHX_ SV *sv, MAGIC *mg) argument
1047 Perl_magic_clear_all_env(pTHX_ SV *sv, MAGIC *mg) argument
1101 Perl_magic_getsig(pTHX_ SV *sv, MAGIC *mg) argument
1131 Perl_magic_clearsig(pTHX_ SV *sv, MAGIC *mg) argument
1273 Perl_magic_setsig(pTHX_ SV *sv, MAGIC *mg) argument
1396 Perl_magic_setisa(pTHX_ SV *sv, MAGIC *mg) argument
1403 Perl_magic_setamagic(pTHX_ SV *sv, MAGIC *mg) argument
1412 Perl_magic_getnkeys(pTHX_ SV *sv, MAGIC *mg) argument
1432 Perl_magic_setnkeys(pTHX_ SV *sv, MAGIC *mg) argument
1442 S_magic_methcall(pTHX_ SV *sv, MAGIC *mg, char *meth, I32 flags, int n, SV *val) argument
1469 S_magic_methpack(pTHX_ SV *sv, MAGIC *mg, char *meth) argument
1488 Perl_magic_getpack(pTHX_ SV *sv, MAGIC *mg) argument
1497 Perl_magic_setpack(pTHX_ SV *sv, MAGIC *mg) argument
1509 Perl_magic_clearpack(pTHX_ SV *sv, MAGIC *mg) argument
1516 Perl_magic_sizepack(pTHX_ SV *sv, MAGIC *mg) argument
1535 Perl_magic_wipepack(pTHX_ SV *sv, MAGIC *mg) argument
1552 Perl_magic_nextpack(pTHX_ SV *sv, MAGIC *mg, SV *key) argument
1577 Perl_magic_existspack(pTHX_ SV *sv, MAGIC *mg) argument
1583 Perl_magic_scalarpack(pTHX_ HV *hv, MAGIC *mg) argument
1618 Perl_magic_setdbline(pTHX_ SV *sv, MAGIC *mg) argument
1641 Perl_magic_getarylen(pTHX_ SV *sv, MAGIC *mg) argument
1648 Perl_magic_setarylen(pTHX_ SV *sv, MAGIC *mg) argument
1655 Perl_magic_getpos(pTHX_ SV *sv, MAGIC *mg) argument
1674 Perl_magic_setpos(pTHX_ SV *sv, MAGIC *mg) argument
1726 Perl_magic_getglob(pTHX_ SV *sv, MAGIC *mg) argument
1739 Perl_magic_setglob(pTHX_ SV *sv, MAGIC *mg) argument
1760 Perl_magic_getsubstr(pTHX_ SV *sv, MAGIC *mg) argument
1781 Perl_magic_setsubstr(pTHX_ SV *sv, MAGIC *mg) argument
1808 Perl_magic_gettaint(pTHX_ SV *sv, MAGIC *mg) argument
1816 Perl_magic_settaint(pTHX_ SV *sv, MAGIC *mg) argument
1832 Perl_magic_getvec(pTHX_ SV *sv, MAGIC *mg) argument
1846 Perl_magic_setvec(pTHX_ SV *sv, MAGIC *mg) argument
1853 Perl_magic_getdefelem(pTHX_ SV *sv, MAGIC *mg) argument
1892 Perl_magic_setdefelem(pTHX_ SV *sv, MAGIC *mg) argument
1906 MAGIC *mg; local
1947 Perl_magic_killbackrefs(pTHX_ SV *sv, MAGIC *mg) argument
1969 Perl_magic_setmglob(pTHX_ SV *sv, MAGIC *mg) argument
1977 Perl_magic_setbm(pTHX_ SV *sv, MAGIC *mg) argument
1985 Perl_magic_setfm(pTHX_ SV *sv, MAGIC *mg) argument
1993 Perl_magic_setuvar(pTHX_ SV *sv, MAGIC *mg) argument
2003 Perl_magic_setregexp(pTHX_ SV *sv, MAGIC *mg) argument
2010 Perl_magic_freeregexp(pTHX_ SV *sv, MAGIC *mg) argument
2019 Perl_magic_setcollxfrm(pTHX_ SV *sv, MAGIC *mg) argument
2036 Perl_magic_setutf8(pTHX_ SV *sv, MAGIC *mg) argument
2045 Perl_magic_set(pTHX_ SV *sv, MAGIC *mg) argument
2509 Perl_magic_mutexfree(pTHX_ SV *sv, MAGIC *mg) argument
[all...]
H A Dperl.c1040 MAGIC* mg; local
1042 for (mg = SvMAGIC(PL_mess_sv); mg; mg = moremagic) {
1043 moremagic = mg->mg_moremagic;
1044 if (mg->mg_ptr && mg->mg_type != PERL_MAGIC_regex_global
1045 && mg->mg_len >= 0)
1046 Safefree(mg->mg_ptr);
1047 Safefree(mg);
[all...]
H A Dpp.c320 MAGIC* mg; local
323 mg = mg_find(sv, PERL_MAGIC_regex_global);
324 if (mg && mg->mg_len >= 0) {
325 I32 i = mg->mg_len;
3872 MAGIC *mg; local
3876 ((mg = mg_find((SV*)hv, PERL_MAGIC_tied))
3880 && (stash = SvSTASH(SvRV(SvTIED_obj((SV*)hv, mg))))
4045 MAGIC *mg; local
4047 if ((mg
4242 MAGIC *mg; local
4298 MAGIC *mg; local
4416 MAGIC *mg = (MAGIC *) NULL; local
4708 MAGIC *mg = mg_find((SV*)svv, PERL_MAGIC_mutex); local
[all...]
H A Dpp_ctl.c73 MAGIC *mg = Null(MAGIC*); local
86 mg = mg_find(sv, PERL_MAGIC_qr);
88 if (mg) {
89 regexp *re = (regexp *)mg->mg_obj;
242 MAGIC *mg; local
246 if (!(mg = mg_find(sv, PERL_MAGIC_regex_global))) {
248 mg = mg_find(sv, PERL_MAGIC_regex_global);
253 mg->mg_len = i;
H A Dpp_sys.c525 MAGIC *mg; local
534 if (io && (mg = SvTIED_mg((SV*)io, PERL_MAGIC_tiedscalar))) {
537 *MARK-- = SvTIED_obj((SV*)io, mg);
571 MAGIC *mg; local
579 && (mg = SvTIED_mg((SV*)io, PERL_MAGIC_tiedscalar)))
582 XPUSHs(SvTIED_obj((SV*)io, mg));
657 MAGIC *mg; local
664 && (mg = SvTIED_mg((SV*)io, PERL_MAGIC_tiedscalar)))
667 XPUSHs(SvTIED_obj((SV*)io, mg));
720 MAGIC *mg; local
867 MAGIC *mg; local
906 MAGIC *mg; local
1190 MAGIC *mg; local
1438 MAGIC *mg; local
1547 MAGIC *mg; local
1785 MAGIC *mg; local
1922 MAGIC *mg; local
1969 MAGIC *mg; local
2013 MAGIC *mg; local
[all...]
H A Dregexec.c1682 MAGIC *mg; local
1688 && (mg = mg_find(sv, PERL_MAGIC_regex_global))
1689 && mg->mg_len >= 0) {
1690 PL_reg_ganch = strbeg + mg->mg_len; /* Defined pos() */
2079 MAGIC *mg; local
2103 && (mg = mg_find(PL_reg_sv, PERL_MAGIC_regex_global)))) {
2107 mg = mg_find(PL_reg_sv, PERL_MAGIC_regex_global);
2108 mg->mg_len = -1;
2110 PL_reg_magic = mg;
2111 PL_reg_oldpos = mg
2863 MAGIC *mg = Null(MAGIC*); local
[all...]
H A Dperlio.c780 perlio_mg_set(pTHX_ SV *sv, MAGIC *mg) argument
792 perlio_mg_get(pTHX_ SV *sv, MAGIC *mg) argument
804 perlio_mg_clear(pTHX_ SV *sv, MAGIC *mg) argument
811 perlio_mg_free(pTHX_ SV *sv, MAGIC *mg) argument
830 MAGIC *mg; local
835 mg = mg_find(sv, PERL_MAGIC_ext);
836 mg->mg_virtual = &perlio_vtab;
H A Dregcomp.c505 MAGIC *mg = local
507 if (mg && mg->mg_len > 0)
508 mg->mg_len = 0;
933 MAGIC *mg = SvUTF8(sv) && SvMAGICAL(sv) ? local
935 if (mg && mg->mg_len >= 0)
936 mg->mg_len += utf8_length((U8*)STRING(scan),
1311 MAGIC *mg = local
1314 if (mg
[all...]
H A Dutil.c365 MAGIC *mg = SvUTF8(sv) && SvMAGICAL(sv) ? mg_find(sv, PERL_MAGIC_utf8) : NULL; local
367 if (mg && mg->mg_len >= 0)
368 mg->mg_len++;
991 MAGIC *mg; local
995 && (mg = SvTIED_mg((SV*)io, PERL_MAGIC_tiedscalar)))
1009 PUSHs(SvTIED_obj((SV*)io, mg));
2952 MAGIC *mg; local
2955 mg = mg_find(sv, PERL_MAGIC_mutex);
2956 if (!mg) {
2990 MAGIC *mg; local
[all...]
H A Dsv.c3008 MAGIC *mg; local
3015 && (mg = mg_find(sv, PERL_MAGIC_qr))) {
3016 regexp *re = (regexp *)mg->mg_obj;
3018 if (!mg->mg_ptr) {
3041 mg->mg_len = re->prelen + 4 + left;
3068 mg->mg_len++; /* save space for it */
3075 New(616, mg->mg_ptr, mg->mg_len + 1 + left, char);
3076 Copy("(?", mg->mg_ptr, 2, char);
3077 Copy(reflags, mg
4575 MAGIC* mg; local
4652 MAGIC* mg; local
4821 MAGIC* mg; local
4831 CALL_FPTR(vtbl->svt_free)(aTHX_ sv, mg); local
4894 MAGIC *mg; local
4930 MAGIC *mg = NULL; local
5421 MAGIC *mg = SvMAGICAL(sv) ? mg_find(sv, PERL_MAGIC_utf8) : 0; local
5632 MAGIC *mg = 0; local
5706 MAGIC* mg = NULL; local
6059 MAGIC *mg; local
8001 MAGIC *mg = mg_find(sv, PERL_MAGIC_taint); local
8018 MAGIC *mg = mg_find(sv, PERL_MAGIC_taint); local
9522 Perl_mg_dup(pTHX_ MAGIC *mg, CLONE_PARAMS* param) argument
[all...]
/osnet-11/usr/src/lib/fm/topo/modules/sun4v/platform-mem/common/
H A Dmem_mdesc.c62 mem_grp_t *mg; local
144 mg = topo_mod_zalloc(mod, sizeof (mem_grp_t));
145 seg->sm_grp = mg;
146 mem->mem_group = mg;
159 bm->bm_grp = mg->mg_bank;
160 mg->mg_bank = bm;
204 mem_grp_t *mg; local
209 for (mg = mem->mem_group; mg != NULL; mg
235 mem_grp_t *mg; local
[all...]

Completed in 123 milliseconds