gomp-20050608-branch/gcc/testsuite/gcc.dg/vmx/3a-03.c

   1 #include "harness.h"
   2
   3 /* Small expression involving non-overloaded generic vector intrinsics.  */
   4
   5 vector float
   6 f(vector float a, vector float b, vector float c)
   7 {
   8   return vec_nmsub(a, vec_re(b), vec_nmsub(b, c, vec_expte(a)));
   9 }
  10
  11 static void test()
  12 {
  13   check(vec_all_eq(f(((vector float){2,3,5,7}),
  14                      ((vector float){11,13,17,19}),
  15                      ((vector float){23,29,31,37})),
  16                    ((vector float){-249.181808, -369.230774, -495.294098, -575.368408})),
  17         "f");
  18 }