gcc/testsuite/gcc.target/powerpc/vsx-extract-5.c

   1 /* { dg-do compile { target { powerpc*-*-* && lp64 } } } */
   2 /* { dg-skip-if "" { powerpc*-*-darwin* } } */
   3 /* { dg-require-effective-target powerpc_p8vector_ok } */
   4 /* { dg-skip-if "do not override -mcpu" { powerpc*-*-* } { "-mcpu=*" } { "-mcpu=power8" } } */
   5 /* { dg-options "-O2 -mcpu=power8" } */
   6
   7 /* { dg-final { scan-assembler-times "vspltw"      6 } } */
   8 /* { dg-final { scan-assembler-times "xvcvsxwdp"   4 } } */
   9 /* { dg-final { scan-assembler-times "xvcvuxwdp"   4 } } */
  10 /* { dg-final { scan-assembler-times "frsp\|xsrsp" 8 } } */
  11 /* { dg-final { scan-assembler-not   "mtvsrd"        } } */
  12 /* { dg-final { scan-assembler-not   "mtvsrwa"       } } */
  13 /* { dg-final { scan-assembler-not   "mtvsrwz"       } } */
  14 /* { dg-final { scan-assembler-not   "mfvsrd"        } } */
  15 /* { dg-final { scan-assembler-not   "mfvsrwz"       } } */
  16
  17 #include <altivec.h>
  18
  19 #ifndef TYPE
  20 #define TYPE float
  21 #endif
  22
  23 TYPE
  24 foo_0s (vector int v)
  25 {
  26   int c = 0;
  27   int i = vec_extract (v, c);
  28   return (TYPE) i;
  29 }
  30
  31 TYPE
  32 foo_1s (vector int v)
  33 {
  34   int c = 1;
  35   int i = vec_extract (v, c);
  36   return (TYPE) i;
  37 }
  38
  39 TYPE
  40 foo_2s (vector int v)
  41 {
  42   int c = 2;
  43   int i = vec_extract (v, c);
  44   return (TYPE) i;
  45 }
  46
  47 TYPE
  48 foo_3s (vector int v)
  49 {
  50   int c = 3;
  51   int i = vec_extract (v, c);
  52   return (TYPE) i;
  53 }
  54
  55 TYPE
  56 foo_0u (vector unsigned int v)
  57 {
  58   int c = 0;
  59   unsigned int u = vec_extract (v, c);
  60   return (TYPE) u;
  61 }
  62
  63 TYPE
  64 foo_1u (vector unsigned int v)
  65 {
  66   int c = 1;
  67   unsigned int u = vec_extract (v, c);
  68   return (TYPE) u;
  69 }
  70
  71 TYPE
  72 foo_2u (vector unsigned int v)
  73 {
  74   int c = 2;
  75   unsigned int u = vec_extract (v, c);
  76   return (TYPE) u;
  77 }
  78
  79 TYPE
  80 foo_3u (vector unsigned int v)
  81 {
  82   int c = 3;
  83   unsigned int u = vec_extract (v, c);
  84   return (TYPE) u;
  85 }