Lines Matching defs:mg

1262 S_argvout_free(pTHX_ SV *io, MAGIC *mg) {
1271 if (mg->mg_obj) {
1276 dir_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_ORIG_DIRP, FALSE);
1282 (void)argvout_final(mg, (IO*)io, FALSE);
1288 assert(SvTYPE(mg->mg_obj) == SVt_PVAV);
1290 pid_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_ORIG_PID, FALSE);
1298 SV **temp_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_TEMP_NAME, FALSE);
1326 S_argvout_dup(pTHX_ MAGIC *mg, CLONE_PARAMS *param) {
1330 SvREFCNT_dec(mg->mg_obj);
1331 mg->mg_obj = NULL;
1471 MAGIC *mg;
1556 mg = sv_magicext((SV*)GvIOp(PL_argvoutgv), (SV*)magic_av, PERL_MAGIC_uvar, &argvout_vtbl, NULL, 0);
1557 mg->mg_flags |= MGf_DUP;
1636 S_dir_unchanged(pTHX_ const char *orig_pv, MAGIC *mg) {
1640 SV **stat_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_ORIG_CWD_STAT, FALSE);
1658 SV **temp_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_TEMP_NAME, FALSE);
1674 #define dir_unchanged(orig_psv, mg) \
1675 S_dir_unchanged(aTHX_ (orig_psv), (mg))
1678 S_argvout_final(pTHX_ MAGIC *mg, IO *io, bool is_explict) {
1686 SV **back_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_BACKUP_NAME, FALSE);
1687 SV **temp_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_TEMP_NAME, FALSE);
1689 SV **orig_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_ORIG_NAME, FALSE);
1690 SV **mode_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_ORIG_MODE, FALSE);
1691 SV **pid_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_ORIG_PID, FALSE);
1693 SV **dir_psv = av_fetch((AV*)mg->mg_obj, ARGVMG_ORIG_DIRP, FALSE);
1742 if (!dir_unchanged(orig_pv, mg))
1751 dir_unchanged(orig_pv, mg) &&
1764 dir_unchanged(orig_pv, mg) &&
1774 dir_unchanged(orig_pv, mg))
1811 dir_unchanged(orig_pv, mg) &&
1879 MAGIC *mg;
1896 if ((mg = mg_findext((SV*)io, PERL_MAGIC_uvar, &argvout_vtbl))
1897 && mg->mg_obj) {
1898 retval = argvout_final(mg, io, is_explict);