Lines Matching defs:sv_type
152 S_gv_init_sv(pTHX_ GV *gv, I32 sv_type)
154 switch (sv_type) {
643 Perl_gv_fetchpv(pTHX_ const char *nambeg, I32 add, I32 sv_type)
737 sv_type != SVt_PVCV &&
738 sv_type != SVt_PVGV &&
739 sv_type != SVt_PVFM &&
740 sv_type != SVt_PVIO &&
741 !(len == 1 && sv_type == SVt_PV && strchr("ab",*name)) )
750 else if ((sv_type == SVt_PV && !GvIMPORTED_SV(*gvp)) ||
751 (sv_type == SVt_PVAV && !GvIMPORTED_AV(*gvp)) ||
752 (sv_type == SVt_PVHV && !GvIMPORTED_HV(*gvp)) )
755 sv_type == SVt_PVAV ? '@' :
756 sv_type == SVt_PVHV ? '%' : '$',
777 (sv_type == SVt_PV ? "$"
778 : sv_type == SVt_PVAV ? "@"
779 : sv_type == SVt_PVHV ? "%"
800 gv_init_sv(gv, sv_type);
801 if (*name=='!' && sv_type == SVt_PVHV && len==1)
814 gv_init_sv(gv, sv_type);
894 sv_type == SVt_PVAV ||
895 sv_type == SVt_PVHV ||
896 sv_type == SVt_PVCV ||
897 sv_type == SVt_PVFM ||
898 sv_type == SVt_PVIO
929 if (sv_type == SVt_PVHV)
944 if (ckWARN2(WARN_DEPRECATED, WARN_SYNTAX) && len == 1 && sv_type == SVt_PV)