Blame localedata/tst-sscanf.c

Packit 6c4009
#include <stdio.h>
Packit 6c4009
#include <locale.h>
Packit 6c4009
#include <assert.h>
Packit 6c4009
Packit 6c4009
#define P0 "\xDB\xB0"
Packit 6c4009
#define P1 "\xDB\xB1"
Packit 6c4009
#define P2 "\xDB\xB2"
Packit 6c4009
#define P3 "\xDB\xB3"
Packit 6c4009
#define P4 "\xDB\xB4"
Packit 6c4009
#define P5 "\xDB\xB5"
Packit 6c4009
#define P6 "\xDB\xB6"
Packit 6c4009
#define P7 "\xDB\xB7"
Packit 6c4009
#define P8 "\xDB\xB8"
Packit 6c4009
#define P9 "\xDB\xB9"
Packit 6c4009
#define PD "\xd9\xab"
Packit 6c4009
#define PT "\xd9\xac"
Packit 6c4009
Packit 6c4009
static int
Packit 6c4009
check_sscanf (const char *s, const char *format, const float n)
Packit 6c4009
{
Packit 6c4009
  float f;
Packit 6c4009
Packit 6c4009
  if (sscanf (s, format, &f) != 1)
Packit 6c4009
    {
Packit 6c4009
      printf ("nothing found for \"%s\"\n", s);
Packit 6c4009
      return 1;
Packit 6c4009
    }
Packit 6c4009
  if (f != n)
Packit 6c4009
    {
Packit 6c4009
      printf ("got %f expected %f from \"%s\"\n", f, n, s);
Packit 6c4009
      return 1;
Packit 6c4009
    }
Packit 6c4009
  return 0;
Packit 6c4009
}
Packit 6c4009
Packit 6c4009
static int
Packit 6c4009
do_test (void)
Packit 6c4009
{
Packit 6c4009
  if (setlocale (LC_ALL, "fa_IR.UTF-8") == NULL)
Packit 6c4009
    {
Packit 6c4009
      puts ("cannot set fa_IR locale");
Packit 6c4009
      return 1;
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  int r = check_sscanf (P3 PD P1 P4, "%I8f", 3.14);
Packit 6c4009
  r |= check_sscanf (P3 PT P1 P4 P5, "%I'f", 3145);
Packit 6c4009
  r |= check_sscanf (P3 PD P1 P4 P1 P5 P9, "%If", 3.14159);
Packit 6c4009
  r |= check_sscanf ("-" P3 PD P1 P4 P1 P5, "%If", -3.1415);
Packit 6c4009
  r |= check_sscanf ("+" PD P1 P4 P1 P5, "%If", +.1415);
Packit 6c4009
  r |= check_sscanf (P3 PD P1 P4 P1 P5 "e+" P2, "%Ie", 3.1415e+2);
Packit 6c4009
Packit 6c4009
  return r;
Packit 6c4009
}
Packit 6c4009
Packit 6c4009
#define TEST_FUNCTION do_test ()
Packit 6c4009
#include "../test-skeleton.c"