gcc/testsuite/gcc.dg/vect/vect-64.c

   1 /* { dg-require-effective-target vect_int } */
   2
   3 #include <stdarg.h>
   4 #include "tree-vect.h"
   5
   6 #define N 16
   7
   8 __attribute__ ((noinline))
   9 int main1 ()
  10 {
  11   int i, j;
  12   int ib[N] = {0,3,6,9,12,15,18,21,24,27,30,33,36,39,42,45};
  13   int ia[N][4][N+1];
  14   int ic[N][N][3][13];
  15   int id[N][N][N];
  16
  17   /* Multidimensional array. Not aligned: vectorizable. */
  18   for (i = 0; i < N; i++)
  19     {
  20       for (j = 0; j < N; j++)
  21         {
  22            ia[i][1][j] = ib[i];
  23         }
  24     }
  25
  26   /* Multidimensional array. Aligned: vectorizable. */
  27   for (i = 0; i < N; i++)
  28     {
  29       for (j = 0; j < N; j++)
  30         {
  31            ic[i][1][1][j] = ib[i];
  32         }
  33     }
  34
  35   /* Multidimensional array. Not aligned: vectorizable. */
  36   for (i = 0; i < N; i++)
  37     {
  38       for (j = 0; j < N; j++)
  39         {
  40            id[i][1][j+1] = ib[i];
  41         }
  42     }
  43
  44   /* check results: */
  45   for (i = 0; i < N; i++)
  46     {
  47       for (j = 0; j < N; j++)
  48         {
  49            if (ia[i][1][j] != ib[i])
  50               abort();
  51         }
  52     }
  53
  54   /* check results: */
  55   for (i = 0; i < N; i++)
  56     {
  57       for (j = 0; j < N; j++)
  58         {
  59            if (ic[i][1][1][j] != ib[i])
  60               abort();
  61         }
  62     }
  63
  64   /* check results: */
  65   for (i = 0; i < N; i++)
  66     {
  67       for (j = 0; j < N; j++)
  68         {
  69            if (id[i][1][j+1] != ib[i])
  70               abort();
  71         }
  72     }
  73
  74   return 0;
  75 }
  76
  77 int main (void)
  78 {
  79   check_vect ();
  80
  81   return main1 ();
  82 }
  83
  84 /* { dg-final { scan-tree-dump-times "vectorized 3 loops" 1 "vect" } } */
  85 /* { dg-final { scan-tree-dump-times "Vectorizing an unaligned access" 0 "vect" } } */
  86 /* { dg-final { scan-tree-dump-times "Alignment of access forced using peeling" 2 "vect" } } */
  87 /* { dg-final { cleanup-tree-dump "vect" } } */