main/gcc/testsuite/gcc.dg/vmx/stl-vsx.c

   1 /* { dg-skip-if "" { powerpc*-*-darwin* } { "*" } { "" } } */
   2 /* { dg-require-effective-target powerpc_vsx_ok } */
   3 /* { dg-options "-maltivec -mabi=altivec -std=gnu99 -mvsx" } */
   4
   5 #include "harness.h"
   6
   7 static unsigned long long svul[2] __attribute__ ((aligned (16)));
   8 static double svd[2] __attribute__ ((aligned (16)));
   9
  10 static void check_arrays ()
  11 {
  12   unsigned int i;
  13   for (i = 0; i < 2; ++i)
  14     {
  15       check (svul[i] == i, "svul");
  16       check (svd[i] == i * 1.0, "svd");
  17     }
  18 }
  19
  20 static void test ()
  21 {
  22   vector unsigned long long vul = {0,1};
  23   vector double vd = {0.0,1.0};
  24
  25   vec_stl (vul, 0, (vector unsigned long long *)svul);
  26   vec_stl (vd,  0, (vector double *)svd);
  27
  28   check_arrays ();
  29 }