Searched refs:omg (Results 1 – 1 of 1) sorted by relevance
4072 MAGIC * const omg = dref && SvSMAGICAL(dref) in Perl_gv_setref() local4081 if (omg) { in Perl_gv_setref()4082 if (SvTYPE(omg->mg_obj) == SVt_PVAV) { in Perl_gv_setref()4083 SV **svp = AvARRAY((AV *)omg->mg_obj); in Perl_gv_setref()4084 I32 items = AvFILLp((AV *)omg->mg_obj) + 1; in Perl_gv_setref()4094 SvREFCNT_inc_simple_NN(omg->mg_obj) in Perl_gv_setref()4104 sref, omg ? omg->mg_obj : dsv, PERL_MAGIC_isa, NULL, 0 in Perl_gv_setref()