mirror of
https://sourceware.org/git/glibc.git
synced 2024-11-30 08:40:07 +00:00
72 lines
1.9 KiB
C
72 lines
1.9 KiB
C
/* Test program for %a printf formats. */
|
|
|
|
#include <array_length.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#ifndef WIDE
|
|
# define STR_LEN strlen
|
|
# define STR_CMP strcmp
|
|
# define SPRINT snprintf
|
|
# define CHAR_T char
|
|
# define PRINT printf
|
|
# define L_(Str) Str
|
|
# define S "%s"
|
|
#else
|
|
# define STR_LEN wcslen
|
|
# define SPRINT swprintf
|
|
# define STR_CMP wcscmp
|
|
# define CHAR_T wchar_t
|
|
# define PRINT wprintf
|
|
# define L_(Str) L##Str
|
|
# define S "%ls"
|
|
#endif
|
|
|
|
struct testcase
|
|
{
|
|
double value;
|
|
const CHAR_T *fmt;
|
|
const CHAR_T *expect;
|
|
};
|
|
|
|
static const struct testcase testcases[] =
|
|
{
|
|
{ 0x0.0030p+0, L_("%a"), L_("0x1.8p-11") },
|
|
{ 0x0.0040p+0, L_("%a"), L_("0x1p-10") },
|
|
{ 0x0.0030p+0, L_("%040a"), L_("0x00000000000000000000000000000001.8p-11") },
|
|
{ 0x0.0040p+0, L_("%040a"), L_("0x0000000000000000000000000000000001p-10") },
|
|
{ 0x0.0040p+0, L_("%40a"), L_(" 0x1p-10") },
|
|
{ 0x0.0040p+0, L_("%#40a"), L_(" 0x1.p-10") },
|
|
{ 0x0.0040p+0, L_("%-40a"), L_("0x1p-10 ") },
|
|
{ 0x0.0040p+0, L_("%#-40a"), L_("0x1.p-10 ") },
|
|
{ 0x0.0030p+0, L_("%040e"), L_("00000000000000000000000000007.324219e-04") },
|
|
{ 0x0.0040p+0, L_("%040e"), L_("00000000000000000000000000009.765625e-04") },
|
|
};
|
|
|
|
|
|
static int
|
|
do_test (void)
|
|
{
|
|
const struct testcase *t;
|
|
int result = 0;
|
|
|
|
for (t = testcases; t < array_end (testcases); ++t)
|
|
{
|
|
CHAR_T buf[1024];
|
|
int n = SPRINT (buf, array_length (buf), t->fmt, t->value);
|
|
if (n != STR_LEN (t->expect) || STR_CMP (buf, t->expect) != 0)
|
|
{
|
|
PRINT (L_("" S "\tExpected \"" S "\" (%Zu)\n\tGot \""
|
|
S "\" (%d, %Zu)\n"),
|
|
t->fmt, t->expect, STR_LEN (t->expect),
|
|
buf, n, STR_LEN (buf));
|
|
result = 1;
|
|
}
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
#define TEST_FUNCTION do_test ()
|
|
#include "../test-skeleton.c"
|