| /* { 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 } } */ |