| /* { dg-do run { target { powerpc*-*-* } } } */ |
| /* { dg-require-effective-target lp64 } */ |
| /* { dg-require-effective-target p9vector_hw } */ |
| /* { dg-options "-mdejagnu-cpu=power9" } */ |
| |
| /* This test should succeed only on 64-bit configurations. */ |
| #include <altivec.h> |
| #include <stdlib.h> |
| |
| unsigned int |
| get_unbiased_exponent (double *p) |
| { |
| double source = *p; |
| |
| return scalar_extract_exp (source) - 1023; |
| } |
| |
| int |
| main () |
| { |
| double x = (double) (0x1100LL << 50); |
| double z = (double) (0x1101LL << 37); |
| |
| if (get_unbiased_exponent (&x) != 62) |
| abort (); |
| if (get_unbiased_exponent (&z) != 49) |
| abort (); |
| return 0; |
| } |