Lines Matching defs:mg

331                     MAGIC *mg;
332                     mg = mg_find_mglob(targ);
333                     if (mg) {
334                         MgBYTEPOS_set(mg, targ, SvPVX(targ), -1);
377         MAGIC *mg;
385         if (!(mg = mg_find_mglob(sv))) {
386             mg = sv_magicext_mglob(sv);
388         MgBYTEPOS_set(mg, sv, SvPVX(sv), m - orig);
550     MAGIC *mg = NULL;
556     mg = doparseform(tmpForm);
558     fpc = (U32*)mg->mg_ptr;
561     formsv = mg->mg_obj;
765                     Newx(new_compiled, mg->mg_len / sizeof(U32), U32);
766                     memcpy(new_compiled, mg->mg_ptr, mg->mg_len);
768                     fpc = new_compiled + (fpc - (U32*)mg->mg_ptr);
6466     MAGIC *mg = NULL;
6476         mg = mg_find(sv, PERL_MAGIC_fm);
6481     if (mg) {
6483         SV *old = mg->mg_obj;
6489             return mg;
6493         Safefree(mg->mg_ptr);
6494         mg->mg_ptr = NULL;
6496         mg->mg_obj = NULL;
6500         mg = sv_magicext(sv, NULL, PERL_MAGIC_fm, &PL_vtbl_fm, NULL, 0);
6689     mg->mg_ptr = (char *) fops;
6690     mg->mg_len = arg * sizeof(U32);
6691     mg->mg_obj = sv_copy;
6692     mg->mg_flags |= MGf_REFCOUNTED;
6697     return mg;