gnu/dist/gcc4/gcc/testsuite/gcc.dg/vmx/gcc-bug-e.c

   1 #include "harness.h"
   2
   3 typedef struct n_a
   4 {
   5   signed char m1;
   6   short m2;
   7   int m3;
   8   double m4;
   9   vector float m5;
  10 }
  11 n_a;
  12
  13 static void
  14 initn_a(signed char p1, short p2, int p3, double p4, vector float p5)
  15 {
  16   n_a i;
  17   static struct
  18   {
  19     n_a b;
  20     char a;
  21   }
  22   x;
  23
  24   i.m1 = p1;
  25   i.m2 = p2;
  26   i.m3 = p3;
  27   i.m4 = p4;
  28   i.m5 = p5;
  29
  30   check(i.m1 == -17, "i.m1");
  31   check(i.m2 == 9165, "i.m2");
  32   check(i.m3 == -1857760764, "i.m3");
  33   check(i.m4 == 7.3e+18, "i.m4");
  34   check(vec_all_eq(i.m5, ((vector float){-5.02e+08,
  35                                           -4.34e+08,
  36                                           -1.04e+09,
  37                                            1.42e+09})), "i.m5");
  38 }
  39
  40 static void test()
  41 {
  42   initn_a(-17, 9165, -1857760764, 7.3e+18,
  43           ((vector float){-5.02e+08, -4.34e+08, -1.04e+09, 1.42e+09}));
  44 }