blob: 8f6e176f9af7f57fed3b185fd8c6aeb5eeca06a7 [file] [log] [blame]
/* { dg-do compile } */
/* { dg-require-effective-target power10_ok } */
/* { dg-options "-mdejagnu-cpu=power10 -O2" } */
#include <math.h>
/* Test generating DFmode constants with the ISA 3.1 (power10) XXSPLTIDP
instruction. */
double
scalar_double_0 (void)
{
return 0.0; /* XXSPLTIB or XXLXOR. */
}
double
scalar_double_1 (void)
{
return 1.0; /* XXSPLTIDP. */
}
#ifndef __FAST_MATH__
double
scalar_double_m0 (void)
{
return -0.0; /* XXSPLTIDP. */
}
double
scalar_double_nan (void)
{
return __builtin_nan (""); /* XXSPLTIDP. */
}
double
scalar_double_inf (void)
{
return __builtin_inf (); /* XXSPLTIDP. */
}
double
scalar_double_m_inf (void) /* XXSPLTIDP. */
{
return - __builtin_inf ();
}
#endif
double
scalar_double_pi (void)
{
return M_PI; /* PLFD. */
}
double
scalar_double_denorm (void)
{
return 0x1p-149f; /* PLFD. */
}
/* { dg-final { scan-assembler-times {\mxxspltidp\M} 5 } } */