1 /* { dg-do compile { target { powerpc*-*-* } } } */
2 /* { dg-require-effective-target powerpc_p9vector_ok } */
3 /* { dg-options "-mdejagnu-cpu=power9" } */
4 
5 /* This test should succeed on 32-bit and 64-bit configurations.  */
6 #include <altivec.h>
7 
8 char
compare_exponents_lt(double * exponent1_p,double * exponent2_p)9 compare_exponents_lt (double *exponent1_p, double *exponent2_p)
10 {
11   double exponent1 = *exponent1_p;
12   double exponent2 = *exponent2_p;
13 
14   if (scalar_cmp_exp_lt (exponent1, exponent2))
15     return 't';
16   else
17     return 'f';
18 }
19 
20 /* { dg-final { scan-assembler "xscmpexpdp" } } */
21