File: tst-grouping.c

package info (click to toggle)
glibc 2.24-11+deb9u4
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 225,852 kB
  • sloc: ansic: 996,505; asm: 261,827; sh: 10,484; makefile: 9,856; cpp: 4,169; python: 3,971; perl: 2,254; awk: 1,753; pascal: 1,521; yacc: 291; sed: 80
file content (83 lines) | stat: -rw-r--r-- 2,267 bytes parent folder | download | duplicates (24)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
/* BZ 12394, test by Bruno Haible.  */
#include <locale.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>


static int
do_test (void)
{
  char buf1[1000];
  char buf2[1000];
  int result = 0;

  if (setlocale (LC_NUMERIC, "de_DE.UTF-8") == NULL)
    return 1;

  sprintf (buf1, "%'.2f",  999.996);
  sprintf (buf2, "%'.2f", 1000.004);
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
  if (strcmp (buf1, buf2) != 0)
    result |= 2;

  sprintf (buf1, "%'.2f",  999999.996);
  sprintf (buf2, "%'.2f", 1000000.004);
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
  if (strcmp (buf1, buf2) != 0)
    result |= 2;

  sprintf (buf1, "%'.2f",  999999999.996);
  sprintf (buf2, "%'.2f", 1000000000.004);
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
  if (strcmp (buf1, buf2) != 0)
    result |= 2;

  sprintf (buf1, "%'.2f",  999999999999.996);
  sprintf (buf2, "%'.2f", 1000000000000.004);
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
  if (strcmp (buf1, buf2) != 0)
    result |= 2;

  sprintf (buf1, "%'.2f",  999999999999999.996);
  sprintf (buf2, "%'.2f", 1000000000000000.004);
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
  if (strcmp (buf1, buf2) != 0)
    result |= 2;

  sprintf (buf1, "%'.5g",  999.996);
  sprintf (buf2, "%'.5g", 1000.004);
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
  if (strcmp (buf1, buf2) != 0)
    result |= 4;

  sprintf (buf1, "%'.4g",  9999.996);
  sprintf (buf2, "%'.4g", 10000.004);
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
  if (strcmp (buf1, buf2) != 0)
    result |= 8;

  sprintf (buf1, "%'.5g",  99999.996);
  sprintf (buf2, "%'.5g", 100000.004);
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
  if (strcmp (buf1, buf2) != 0)
    result |= 8;

  sprintf (buf1, "%'.6g",  999999.996);
  sprintf (buf2, "%'.6g", 1000000.004);
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
  if (strcmp (buf1, buf2) != 0)
    result |= 8;

  sprintf (buf1, "%'.7g",  9999999.996);
  sprintf (buf2, "%'.7g", 10000000.004);
  printf ("%d: \"%s\" vs \"%s\"\n", __LINE__, buf1, buf2);
  if (strcmp (buf1, buf2) != 0)
    result |= 8;

  return result;
}


#define TEST_FUNCTION do_test ()
#include "../test-skeleton.c"