| H A D | sv.c | 1869 int numtype; 1878 numtype = grok_number(sbegin, len, NULL); 1879 return ((numtype & IS_NUMBER_TRAILING)) ? 0 : numtype; 1987 , I32 numtype 1994 DEBUG_c(PerlIO_printf(Perl_debug_log,"sv_2iuv_non '%s', IV=0x%" UVxf " NV=%" NVgf " inttype=%" UVXf "\n", SvPVX_const(sv), SvIVX(sv), SvNVX(sv), (UV)numtype)); in S_sv_setnv() 2038 /* If numtype is infnan, set the NV of the sv accordingly. in S_sv_2iuv_common() 2039 * If numtype is anything else, try setting the NV using Atof(PV). */ in S_sv_2iuv_common() 2041 S_sv_setnv(pTHX_ SV* sv, int numtype) in S_sv_2iuv_common() 2046 if ((numtype in S_sv_2iuv_common() 1817 int numtype; Perl_looks_like_number() local 1935 S_sv_2iuv_non_preserve(pTHX_ SV * const sv,I32 numtype) S_sv_2iuv_non_preserve() argument 1989 S_sv_setnv(pTHX_ SV * sv,int numtype) S_sv_setnv() argument 2113 int numtype; S_sv_2iuv_common() local 2330 const int numtype Perl_sv_2iv_flags() local 2420 const int numtype Perl_sv_2uv_flags() local 2568 const int numtype = grok_number(SvPVX_const(sv), SvCUR(sv), &value); Perl_sv_2nv_flags() local 9255 const int numtype = grok_number_flags(SvPVX_const(sv), SvCUR(sv), NULL, PERL_SCAN_TRAILING); global() local 9440 const int numtype = grok_number(SvPVX_const(sv), SvCUR(sv), NULL); global() local [all...] |