dist/lib/strtol.c

203 # define L_(Ch) L##Ch
221 # define L_(Ch) Ch
239 # define INTERNAL1(X) __##X##_internal
242 # define INTERNAL(X) __/**/X/**/_internal
318   if (*s == L_('\0'))
322   if (*s == L_('-'))
327   else if (*s == L_('+'))
336   if (*s == L_('0'))
338       if ((base == 0 || base == 16) && TOUPPER (s[1]) == L_('X'))
357       for (c = *end; c != L_('\0'); c = *++end)
359 	    && ((wchar_t) c < L_('0') || (wchar_t) c > L_('9'))
360 	    && (!ISALPHA (c) || (int) (TOUPPER (c) - L_('A') + 10) >= base))
376   for (c = *s; c != L_('\0'); c = *++s)
380       if (c >= L_('0') && c <= L_('9'))
381 	c -= L_('0');
383 	c = TOUPPER (c) - L_('A') + 10;
437       if (save - nptr >= 2 && TOUPPER (save[-1]) == L_('X')
438 	  && save[-2] == L_('0'))