Blame stdio-common/tst-grouping.c

Packit 6c4009
/* BZ 12394, test by Bruno Haible.  */
Packit 6c4009
#include <locale.h>
Packit 6c4009
#include <stdio.h>
Packit 6c4009
#include <stdlib.h>
Packit 6c4009
#include <string.h>
Packit 6c4009
Packit 6c4009
Packit 6c4009
static int
Packit 6c4009
do_test (void)
Packit 6c4009
{
Packit 6c4009
  char buf1[1000];
Packit 6c4009
  char buf2[1000];
Packit 6c4009
  int result = 0;
Packit 6c4009
Packit 6c4009
  if (setlocale (LC_NUMERIC, "de_DE.UTF-8") == NULL)
Packit 6c4009
    return 1;
Packit 6c4009
Packit 6c4009
  sprintf (buf1, "%'.2f",  999.996);
Packit 6c4009
  sprintf (buf2, "%'.2f", 1000.004);
Packit 6c4009
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
Packit 6c4009
  if (strcmp (buf1, buf2) != 0)
Packit 6c4009
    result |= 2;
Packit 6c4009
Packit 6c4009
  sprintf (buf1, "%'.2f",  999999.996);
Packit 6c4009
  sprintf (buf2, "%'.2f", 1000000.004);
Packit 6c4009
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
Packit 6c4009
  if (strcmp (buf1, buf2) != 0)
Packit 6c4009
    result |= 2;
Packit 6c4009
Packit 6c4009
  sprintf (buf1, "%'.2f",  999999999.996);
Packit 6c4009
  sprintf (buf2, "%'.2f", 1000000000.004);
Packit 6c4009
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
Packit 6c4009
  if (strcmp (buf1, buf2) != 0)
Packit 6c4009
    result |= 2;
Packit 6c4009
Packit 6c4009
  sprintf (buf1, "%'.2f",  999999999999.996);
Packit 6c4009
  sprintf (buf2, "%'.2f", 1000000000000.004);
Packit 6c4009
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
Packit 6c4009
  if (strcmp (buf1, buf2) != 0)
Packit 6c4009
    result |= 2;
Packit 6c4009
Packit 6c4009
  sprintf (buf1, "%'.2f",  999999999999999.996);
Packit 6c4009
  sprintf (buf2, "%'.2f", 1000000000000000.004);
Packit 6c4009
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
Packit 6c4009
  if (strcmp (buf1, buf2) != 0)
Packit 6c4009
    result |= 2;
Packit 6c4009
Packit 6c4009
  sprintf (buf1, "%'.5g",  999.996);
Packit 6c4009
  sprintf (buf2, "%'.5g", 1000.004);
Packit 6c4009
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
Packit 6c4009
  if (strcmp (buf1, buf2) != 0)
Packit 6c4009
    result |= 4;
Packit 6c4009
Packit 6c4009
  sprintf (buf1, "%'.4g",  9999.996);
Packit 6c4009
  sprintf (buf2, "%'.4g", 10000.004);
Packit 6c4009
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
Packit 6c4009
  if (strcmp (buf1, buf2) != 0)
Packit 6c4009
    result |= 8;
Packit 6c4009
Packit 6c4009
  sprintf (buf1, "%'.5g",  99999.996);
Packit 6c4009
  sprintf (buf2, "%'.5g", 100000.004);
Packit 6c4009
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
Packit 6c4009
  if (strcmp (buf1, buf2) != 0)
Packit 6c4009
    result |= 8;
Packit 6c4009
Packit 6c4009
  sprintf (buf1, "%'.6g",  999999.996);
Packit 6c4009
  sprintf (buf2, "%'.6g", 1000000.004);
Packit 6c4009
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
Packit 6c4009
  if (strcmp (buf1, buf2) != 0)
Packit 6c4009
    result |= 8;
Packit 6c4009
Packit 6c4009
  sprintf (buf1, "%'.7g",  9999999.996);
Packit 6c4009
  sprintf (buf2, "%'.7g", 10000000.004);
Packit 6c4009
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
Packit 6c4009
  if (strcmp (buf1, buf2) != 0)
Packit 6c4009
    result |= 8;
Packit 6c4009
Packit 6c4009
  return result;
Packit 6c4009
}
Packit 6c4009
Packit 6c4009
Packit 6c4009
#define TEST_FUNCTION do_test ()
Packit 6c4009
#include "../test-skeleton.c"