Searched defs:tied (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dmg.c280 len = AvFILLp((AV *) sv); /* Fallback to non-tied array */
1587 SV *tied = SvTIED_obj((SV*)hv, mg); local
1588 HV *pkg = SvSTASH((SV*)SvRV(tied));
1607 PUSHs(tied);

Completed in 36 milliseconds