Lines Matching defs:libdir
4975 SV *libdir;
4985 libdir = newSVpvn(PERLLIB_MANGLE(dir, len), len);
4991 if ((unix = tounixspec_ts(SvPV(libdir,len),NULL)) != NULL) {
4994 sv_usepvn(libdir,unix,len);
4999 SvPV_nolen_const(libdir));
5023 const char *libpath = SvPVX(libdir);
5024 STRLEN libpath_len = SvCUR(libdir);
5043 sv_chop(libdir, libpath + 4);
5048 libpath = SvPVX(libdir);
5049 libpath_len = SvCUR(libdir);
5085 length. libpath points somewhere into the libdir SV.
5087 libdir. */
5089 SvREFCNT_dec(libdir);
5090 /* And this is the new libdir. */
5091 libdir = tempsv;
5096 SvTAINTED_on(libdir);
5103 return libdir;
5131 SV *const libdir = mayberelocate(dir, len, flags);
5143 * BEFORE pushing libdir onto @INC we may first push version- and
5147 SV *subdir = newSVsv(libdir);
5157 subdir = S_incpush_if_exists(aTHX_ av, subdir, libdir);
5161 subdir = S_incpush_if_exists(aTHX_ av, subdir, libdir);
5169 subdir = S_incpush_if_exists(aTHX_ av, subdir, libdir);
5177 subdir = S_incpush_if_exists(aTHX_ av, subdir, libdir);
5194 av_store(inc, extra, libdir);
5213 av_push(inc, libdir);
5217 assert (SvREFCNT(libdir) == 1);
5218 SvREFCNT_dec(libdir);