Searched refs:IoDIRP (Results 1 – 6 of 6) sorted by relevance
3500 else if (IoDIRP(io)) { in PP()3502 PUSHi(fchdir(dirfd(IoDIRP(io))) >= 0); in PP()3834 if (IoDIRP(io)) in PP()3835 PerlDir_close(IoDIRP(io)); in PP()3836 if (!(IoDIRP(io) = PerlDir_open((char *)dirname))) in PP()3865 if (!io || !IoDIRP(io)) in PP()3869 dp = (Direntry_t *)PerlDir_read(IoDIRP(io)); in PP()3914 if (!io || !IoDIRP(io)) in PP()3917 PUSHi( PerlDir_tell(IoDIRP(io)) ); in PP()3936 if (!io || !IoDIRP(io)) in PP()[all …]
5227 if (IoDIRP(sv) && !(IoFLAGS(sv) & IOf_FAKE_DIRP)) in Perl_sv_clear()5228 PerlDir_close(IoDIRP(sv)); in Perl_sv_clear()5229 IoDIRP(sv) = (DIR*)NULL; in Perl_sv_clear()10202 if (IoDIRP(sstr) && !(IoFLAGS(sstr) & IOf_FAKE_DIRP)) in Perl_sv_dup()10203 IoDIRP(dstr) = dirp_dup(IoDIRP(sstr)); in Perl_sv_dup()10205 IoDIRP(dstr) = IoDIRP(sstr); in Perl_sv_dup()
874 #define IoDIRP(sv) ((XPVIO*) SvANY(sv))->xio_dirp macro
3619 if (io && IoDIRP(io) && !(IoFLAGS(io) & IOf_FAKE_DIRP))3629 if (gv && io && IoDIRP(io) && !(IoFLAGS(io) & IOf_FAKE_DIRP))
1398 Perl_dump_indent(aTHX_ level, file, " DIRP = 0x%"UVxf"\n", PTR2UV(IoDIRP(sv))); in Perl_do_sv_dump()
8717 Log: IoDIRP may be fake when used in source filters, mark as such17368 IoDIRP in filter_del() or sv_free() will attempt to close it