Lines Matching defs:mg
1040 MAGIC* mg;
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);
1154 * contiguous with the argv[]. This is used in mg.c:Perl_magic_set()