gcc/testsuite/gcc.dg/vmx/mult-even-odd.c

   1 #include "harness.h"
   2
   3 static void test()
   4 {
   5   vector unsigned char vuca = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15};
   6   vector unsigned char vucb = {2,3,2,3,2,3,2,3,2,3,2,3,2,3,2,3};
   7   vector signed char vsca = {-8,-7,-6,-5,-4,-3,-2,-1,0,1,2,3,4,5,6,7};
   8   vector signed char vscb = {2,-3,2,-3,2,-3,2,-3,2,-3,2,-3,2,-3,2,-3};
   9   vector unsigned short vusa = {0,1,2,3,4,5,6,7};
  10   vector unsigned short vusb = {2,3,2,3,2,3,2,3};
  11   vector signed short vssa = {-4,-3,-2,-1,0,1,2,3};
  12   vector signed short vssb = {2,-3,2,-3,2,-3,2,-3};
  13   vector unsigned short vuse, vuso;
  14   vector signed short vsse, vsso;
  15   vector unsigned int vuie, vuio;
  16   vector signed int vsie, vsio;
  17
  18   vuse = vec_mule (vuca, vucb);
  19   vuso = vec_mulo (vuca, vucb);
  20   vsse = vec_mule (vsca, vscb);
  21   vsso = vec_mulo (vsca, vscb);
  22   vuie = vec_mule (vusa, vusb);
  23   vuio = vec_mulo (vusa, vusb);
  24   vsie = vec_mule (vssa, vssb);
  25   vsio = vec_mulo (vssa, vssb);
  26
  27   check (vec_all_eq (vuse,
  28                      ((vector unsigned short){0,4,8,12,16,20,24,28})),
  29          "vuse");
  30   check (vec_all_eq (vuso,
  31                      ((vector unsigned short){3,9,15,21,27,33,39,45})),
  32          "vuso");
  33   check (vec_all_eq (vsse,
  34                      ((vector signed short){-16,-12,-8,-4,0,4,8,12})),
  35          "vsse");
  36   check (vec_all_eq (vsso,
  37                      ((vector signed short){21,15,9,3,-3,-9,-15,-21})),
  38          "vsso");
  39   check (vec_all_eq (vuie, ((vector unsigned int){0,4,8,12})), "vuie");
  40   check (vec_all_eq (vuio, ((vector unsigned int){3,9,15,21})), "vuio");
  41   check (vec_all_eq (vsie, ((vector signed int){-8,-4,0,4})), "vsie");
  42   check (vec_all_eq (vsio, ((vector signed int){9,3,-3,-9})), "vsio");
  43 }