stdlib/bug-strtod2.c

   1 #include <locale.h>
   2 #include <math.h>
   3 #include <stdio.h>
   4 #include <stdlib.h>
   5
   6 static const char *tests[] =
   7   {
   8     "inf", "Inf", "iNf", "inF", "INf", "iNF", "INF", "InF",
   9     "infinity", "Infinity", "InfInity", "INFINITY"
  10   };
  11 #define ntests (sizeof (tests) / sizeof (tests[0]))
  12
  13 static int
  14 do_test (void)
  15 {
  16   /* The Turkish locale is notorious because tolower() maps 'I' to the
  17      dotless lowercase 'i' and toupper() maps 'i' to an 'I' with a dot
  18      above.  */
  19   if (setlocale (LC_ALL, "tr_TR.UTF-8") == NULL)
  20     {
  21       puts ("cannot set locale");
  22       return 0;
  23     }
  24
  25   int res = 0;
  26   for (int i = 0; i < ntests; ++i)
  27     {
  28       char *endp;
  29       double d = strtod (tests[i], &endp);
  30       if (*endp != '\0')
  31         {
  32           printf ("did not consume all of '%s'\n", tests[i]);
  33           res = 1;
  34         }
  35       if (!isinf (d))
  36         {
  37           printf ("'%s' does not pass isinf\n", tests[i]);
  38           res = 1;
  39         }
  40     }
  41
  42   return res;
  43 }
  44
  45 #define TEST_FUNCTION do_test ()
  46 #include "../test-skeleton.c"