Lines Matching refs:send
665 Perl_grok_numeric_radix(pTHX_ const char **sp, const char *send) in Perl_grok_numeric_radix() argument
684 if (*sp + len <= send) { in Perl_grok_numeric_radix()
700 if (*sp < send && **sp == '.') { in Perl_grok_numeric_radix()
737 Perl_grok_infnan(pTHX_ const char** sp, const char* send) in Perl_grok_infnan() argument
747 s++; if (s == send) return 0; in Perl_grok_infnan()
751 s++; if (s == send) return 0; in Perl_grok_infnan()
757 s++; if (s == send) return 0; in Perl_grok_infnan()
759 s++; if (s == send) return 0; in Perl_grok_infnan()
762 s++; if (s == send) return 0; in Perl_grok_infnan()
771 s++; if (s == send || isALPHA_FOLD_NE(*s, 'N')) return 0; in Perl_grok_infnan()
772 s++; if (s == send) return 0; in Perl_grok_infnan()
776 if (s < send && (isALPHA_FOLD_EQ(*s, 'I'))) { in Perl_grok_infnan()
778 s++; if (s == send || isALPHA_FOLD_NE(*s, 'N')) return trail; in Perl_grok_infnan()
779 s++; if (s == send || isALPHA_FOLD_NE(*s, 'I')) return trail; in Perl_grok_infnan()
780 s++; if (s == send || isALPHA_FOLD_NE(*s, 'T')) return trail; in Perl_grok_infnan()
781 s++; if (s == send || isALPHA_FOLD_NE(*s, 'Y')) return trail; in Perl_grok_infnan()
784 while (s < send && *s == '0') { /* 1.#INF00 */ in Perl_grok_infnan()
793 while (s < send && *s == '0') { /* 1.#IND00 */ in Perl_grok_infnan()
806 s++; if (s == send) return 0; in Perl_grok_infnan()
810 s++; if (s == send || isALPHA_FOLD_NE(*s, 'A')) return 0; in Perl_grok_infnan()
811 s++; if (s == send || isALPHA_FOLD_NE(*s, 'N')) return 0; in Perl_grok_infnan()
815 if (s == send) { in Perl_grok_infnan()
829 if (s == send) { in Perl_grok_infnan()
838 if (s == send) { return trail; } in Perl_grok_infnan()
840 while (t < send && *t && *t != ')') { in Perl_grok_infnan()
843 if (t == send) { return trail; } in Perl_grok_infnan()
965 while (s < send && isSPACE(*s)) in Perl_grok_infnan()
968 return flags | (s < send ? IS_NUMBER_TRAILING : 0); in Perl_grok_infnan()
971 PERL_UNUSED_ARG(send); in Perl_grok_infnan()
1025 const char * const send = pv + len; in Perl_grok_number_flags() local
1033 while (s < send) { in Perl_grok_number_flags()
1064 if (UNLIKELY(s == send)) in Perl_grok_number_flags()
1082 switch(send - s) { in Perl_grok_number_flags()
1137 if (s >= send) { in Perl_grok_number_flags()
1169 } while (s < send && isDIGIT(*s)); in Perl_grok_number_flags()
1174 } while (s < send); in Perl_grok_number_flags()
1183 if (GROK_NUMERIC_RADIX(&s, send)) { in Perl_grok_number_flags()
1185 while (s < send && isDIGIT(*s)) /* optional digits after the radix */ in Perl_grok_number_flags()
1189 else if (GROK_NUMERIC_RADIX(&s, send)) { in Perl_grok_number_flags()
1192 if (s < send && isDIGIT(*s)) { in Perl_grok_number_flags()
1195 } while (s < send && isDIGIT(*s)); in Perl_grok_number_flags()
1205 if (LIKELY(s > d) && s < send) { in Perl_grok_number_flags()
1209 if (s < send && (*s == '-' || *s == '+')) in Perl_grok_number_flags()
1211 if (s < send && isDIGIT(*s)) { in Perl_grok_number_flags()
1214 } while (s < send && isDIGIT(*s)); in Perl_grok_number_flags()
1227 while (s < send) { in Perl_grok_number_flags()
1242 if ((s + 2 < send) && UNLIKELY(memCHRs("inqs#", toFOLD(*s)))) { in Perl_grok_number_flags()
1245 const int infnan = Perl_grok_infnan(aTHX_ &d, send); in Perl_grok_number_flags()
1536 S_my_atof_infnan(pTHX_ const char* s, bool negative, const char* send, NV* value) in S_my_atof_infnan() argument
1540 const int infnan = grok_infnan(&p, send); in S_my_atof_infnan()
1631 const char* send = s + ((len != 0) in Perl_my_atof3() local
1653 while (s < send && isSPACE(*s)) in Perl_my_atof3()
1659 if ((endp = S_my_atof_infnan(aTHX_ s, FALSE, send, value))) in Perl_my_atof3()
1756 while (s < send) { in Perl_my_atof3()
1784 while (s < send && isDIGIT(*s)) { in Perl_my_atof3()
1805 else if (!seen_dp && GROK_NUMERIC_RADIX(&s, send)) { in Perl_my_atof3()
1808 while (s < send && isDIGIT(*s)) { in Perl_my_atof3()
1824 if (s < send && seen_digit && (isALPHA_FOLD_EQ(*s, 'e'))) { in Perl_my_atof3()
1835 while (s < send && isDIGIT(*s)) in Perl_my_atof3()