gnu/dist/gcc4/gcc/testsuite/gcc.dg/vect/vect-20.c

   1 /* { dg-require-effective-target vect_int } */
   2
   3 #include <stdarg.h>
   4 #include "tree-vect.h"
   5
   6 #define N 64
   7
   8 int
   9 main1 ()
  10 {
  11   int i;
  12   int ia[N];
  13   int ib[N]=
  14     {1,1,0,0,1,0,1,0,
  15      1,1,0,0,1,0,1,0,
  16      1,1,0,0,1,0,1,0,
  17      1,1,0,0,1,0,1,0,
  18      1,1,0,0,1,0,1,0,
  19      1,1,0,0,1,0,1,0,
  20      1,1,0,0,1,0,1,0,
  21      1,1,0,0,1,0,1,0};
  22
  23   signed char ca[N];
  24   signed char cb[N] =
  25     {1,1,0,0,1,0,1,0,
  26      1,1,0,0,1,0,1,0,
  27      1,1,0,0,1,0,1,0,
  28      1,1,0,0,1,0,1,0,
  29      1,1,0,0,1,0,1,0,
  30      1,1,0,0,1,0,1,0,
  31      1,1,0,0,1,0,1,0,
  32      1,1,0,0,1,0,1,0};
  33
  34   short sa[N];
  35   short sb[N] =
  36     {1,1,0,0,1,0,1,0,
  37      1,1,0,0,1,0,1,0,
  38      1,1,0,0,1,0,1,0,
  39      1,1,0,0,1,0,1,0,
  40      1,1,0,0,1,0,1,0,
  41      1,1,0,0,1,0,1,0,
  42      1,1,0,0,1,0,1,0,
  43      1,1,0,0,1,0,1,0};
  44
  45
  46   /* Check ints.  */
  47
  48   for (i = 0; i < N; i++)
  49     {
  50       ia[i] = ~ib[i];
  51     }
  52
  53   /* check results:  */
  54   for (i = 0; i <N; i++)
  55     {
  56       if (ia[i] != ~ib[i])
  57         abort ();
  58     }
  59
  60   /* Check chars.  */
  61
  62   for (i = 0; i < N; i++)
  63     {
  64       ca[i] = ~cb[i];
  65     }
  66
  67   /* check results:  */
  68   for (i = 0; i <N; i++)
  69     {
  70       if (ca[i] != ~cb[i])
  71         abort ();
  72     }
  73
  74   /* Check shorts.  */
  75
  76   for (i = 0; i < N; i++)
  77     {
  78       sa[i] = ~sb[i];
  79     }
  80
  81   /* check results:  */
  82   for (i = 0; i <N; i++)
  83     {
  84       if (sa[i] != ~sb[i])
  85         abort ();
  86     }
  87
  88   return 0;
  89 }
  90
  91 int main (void)
  92 {
  93   check_vect ();
  94
  95   return main1 ();
  96 }
  97
  98 /* { dg-final { scan-tree-dump-times "vectorized 3 loops" 1 "vect" { xfail vect_no_bitwise } } } */
  99 /* { dg-final { scan-tree-dump-times "Vectorizing an unaligned access" 0 "vect" } } */
 100 /* { dg-final { cleanup-tree-dump "vect" } } */