gcc/testsuite/gcc.target/powerpc/pr67808.c

   1 /* { dg-do compile { target { powerpc*-*-* } } } */
   2 /* { dg-skip-if "" { powerpc*-*-darwin* } } */
   3 /* { dg-require-effective-target powerpc_vsx_ok } */
   4 /* { dg-options "-O1 -mvsx -mdejagnu-cpu=power7 -mlong-double-128" } */
   5
   6 /* PR 67808: LRA ICEs on simple double to long double conversion test case */
   7
   8 #if defined(__LONG_DOUBLE_IEEE128__)
   9 /* If long double is IEEE 128-bit, we need to use the __ibm128 type instead of
  10    long double.  We can't use __ibm128 on systems that don't support IEEE
  11    128-bit floating point, because the type is not enabled on those
  12    systems.  */
  13 #define LDOUBLE __ibm128
  14
  15 #elif defined(__LONG_DOUBLE_IBM128__)
  16 #define LDOUBLE long double
  17
  18 #else
  19 #error "long double must be either IBM 128-bit or IEEE 128-bit"
  20 #endif
  21
  22 void
  23 dfoo (LDOUBLE *ldb1, double *db1)
  24 {
  25   *ldb1 = *db1;
  26 }
  27
  28 LDOUBLE
  29 dfoo2 (double *db1)
  30 {
  31   return *db1;
  32 }
  33
  34 LDOUBLE
  35 dfoo3 (double x)
  36 {
  37   return x;
  38 }
  39
  40 void
  41 ffoo (LDOUBLE *ldb1, float *db1)
  42 {
  43   *ldb1 = *db1;
  44 }
  45
  46 LDOUBLE
  47 ffoo2 (float *db1)
  48 {
  49   return *db1;
  50 }
  51
  52 LDOUBLE
  53 ffoo3 (float x)
  54 {
  55   return x;
  56 }
  57
  58 /* { dg-final { scan-assembler "xxlxor" } } */