8230ff782d
This is an automated DistroBaker update from upstream sources. If you do not know what this is about or would like to opt out, contact the OSCI team. Source: https://src.fedoraproject.org/rpms/gcc.git#ac8f498836cb54282caf6ee9c6bb0c179029c18c
39 lines
855 B
C
39 lines
855 B
C
#include <quadmath.h>
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
|
|
int
|
|
main (void)
|
|
{
|
|
__float128 r = strtoflt128 ("1.23456789", NULL);
|
|
|
|
int prec = 20;
|
|
int width = 46;
|
|
char buf[128];
|
|
|
|
r = 2.0q;
|
|
r = sqrtq (r);
|
|
int n = quadmath_snprintf (buf, sizeof buf, "%+-#*.20Qe", width, r);
|
|
if ((size_t) n < sizeof buf)
|
|
/* Prints: +1.41421356237309504880e+00 */
|
|
printf ("%s\n", buf);
|
|
quadmath_snprintf (buf, sizeof buf, "%Qa", r);
|
|
if ((size_t) n < sizeof buf)
|
|
/* Prints: 0x1.6a09e667f3bcc908b2fb1366ea96p+0 */
|
|
printf ("%s\n", buf);
|
|
n = quadmath_snprintf (NULL, 0, "%+-#46.*Qe", prec, r);
|
|
if (n > -1)
|
|
{
|
|
char *str = malloc (n + 1);
|
|
if (str)
|
|
{
|
|
quadmath_snprintf (str, n + 1, "%+-#46.*Qe", prec, r);
|
|
/* Prints: +1.41421356237309504880e+00 */
|
|
printf ("%s\n", str);
|
|
}
|
|
free (str);
|
|
}
|
|
|
|
return 0;
|
|
}
|