gcc/testsuite/gcc.target/powerpc/pr60203.c

   1 /* { dg-do compile { target { powerpc*-*-* && lp64 } } } */
   2 /* { dg-skip-if "" { powerpc*-*-darwin* } { "*" } { "" } } */
   3 /* { dg-require-effective-target powerpc_p8vector_ok } */
   4 /* { dg-options "-mcpu=power8 -O3" } */
   5
   6 union u_ld { long double ld; double d[2]; };
   7
   8 long double
   9 pack (double a, double aa)
  10 {
  11   union u_ld u;
  12   u.d[0] = a;
  13   u.d[1] = aa;
  14   return u.ld;
  15 }
  16
  17 double
  18 unpack_0 (long double x)
  19 {
  20   union u_ld u;
  21   u.ld = x;
  22   return u.d[0];
  23 }
  24
  25 double
  26 unpack_1 (long double x)
  27 {
  28   union u_ld u;
  29   u.ld = x;
  30   return u.d[1];
  31 }
  32
  33 /* { dg-final { scan-assembler-not "stfd"   } } */
  34 /* { dg-final { scan-assembler-not "lfd"    } } */
  35 /* { dg-final { scan-assembler-not "lxsdx"  } } */
  36 /* { dg-final { scan-assembler-not "stxsdx" } } */
  37 /* { dg-final { scan-assembler-not "mfvsrd" } } */
  38 /* { dg-final { scan-assembler-not "mtvsrd" } } */
  39
  40