Lines Matching defs:mg
1682 MAGIC *mg;
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;
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->mg_len;
2863 MAGIC *mg = Null(MAGIC*);
2870 mg = mg_find(sv, PERL_MAGIC_qr);
2875 mg = mg_find(ret, PERL_MAGIC_qr);
2878 if (mg) {
2879 re = (regexp *)mg->mg_obj;