Mercurial > hg > CbC > CbC_gcc
diff gcc/testsuite/gcc.dg/vect/vect-alias-check-12.c @ 131:84e7813d76e9
gcc-8.2
author | mir3636 |
---|---|
date | Thu, 25 Oct 2018 07:37:49 +0900 |
parents | |
children | 1830386684a0 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/gcc/testsuite/gcc.dg/vect/vect-alias-check-12.c Thu Oct 25 07:37:49 2018 +0900 @@ -0,0 +1,97 @@ +#define N 87 +#define M 7 + +typedef signed char sc; +typedef unsigned char uc; +typedef signed short ss; +typedef unsigned short us; +typedef int si; +typedef unsigned int ui; +typedef signed long long sll; +typedef unsigned long long ull; + +#define FOR_EACH_TYPE(M) \ + M (sc) M (uc) \ + M (ss) M (us) \ + M (si) M (ui) \ + M (sll) M (ull) \ + M (float) M (double) + +#define TEST_VALUE1(I) ((I) * 5 / 2) +#define TEST_VALUE2(I) ((I) * 11 / 5) + +#define ADD_TEST(TYPE) \ + void __attribute__((noinline, noclone)) \ + test_##TYPE (TYPE *restrict a, TYPE *restrict b, \ + int step) \ + { \ + step = step & M; \ + for (int i = 0; i < N; ++i) \ + { \ + TYPE r1 = a[i * step + 0] += 1; \ + a[i * step + 1] += 2; \ + a[i * step + 2] += 4; \ + a[i * step + 3] += 8; \ + b[i] += r1; \ + } \ + } \ + \ + void __attribute__((noinline, noclone)) \ + ref_##TYPE (TYPE *restrict a, TYPE *restrict b, \ + int step) \ + { \ + for (unsigned short i = 0; i < N; ++i) \ + { \ + TYPE r1 = a[i * step + 0] += 1; \ + a[i * step + 1] += 2; \ + a[i * step + 2] += 4; \ + a[i * step + 3] += 8; \ + b[i] += r1; \ + asm volatile (""); \ + } \ + } + +#define DO_TEST(TYPE) \ + for (int j = 0; j <= M; ++j) \ + { \ + TYPE a1[N * M], a2[N * M], b1[N], b2[N]; \ + for (int i = 0; i < N * M; ++i) \ + a1[i] = a2[i] = TEST_VALUE1 (i); \ + for (int i = 0; i < N; ++i) \ + b1[i] = b2[i] = TEST_VALUE2 (i); \ + test_##TYPE (a1, b1, j); \ + ref_##TYPE (a2, b2, j); \ + if (__builtin_memcmp (a1, a2, sizeof (a1)) != 0) \ + __builtin_abort (); \ + if (__builtin_memcmp (b1, b2, sizeof (b1)) != 0) \ + __builtin_abort (); \ + } + +FOR_EACH_TYPE (ADD_TEST) + +int +main (void) +{ + FOR_EACH_TYPE (DO_TEST) + return 0; +} + +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* is outside \[0, 2\)} "vect" { target vect_int } } } */ +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* is outside \[0, 3\)} "vect" { target vect_int } } } */ +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* is outside \[0, 4\)} "vect" { target vect_int } } } */ +/* { dg-final { scan-tree-dump {run-time check [^\n]* unsigned \([^*]*\) >= 4} "vect" { target vect_int } } } */ + +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* \* 2[)]* is outside \[0, 4\)} "vect" { target vect_int } } } */ +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* \* 2[)]* is outside \[0, 6\)} "vect" { target vect_int } } } */ +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* \* 2[)]* is outside \[0, 8\)} "vect" { target vect_int } } } */ +/* { dg-final { scan-tree-dump {run-time check [^\n]* unsigned \([^*]* \* 2[)]* >= 8} "vect" { target vect_int } } } */ + +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* \* 4[)]* is outside \[0, 8\)} "vect" { target { vect_int || vect_float } }} } */ +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* \* 4[)]* is outside \[0, 12\)} "vect" { target { vect_int || vect_float } }} } */ +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* \* 4[)]* is outside \[0, 16\)} "vect" { target { vect_int || vect_float } }} } */ +/* { dg-final { scan-tree-dump {run-time check [^\n]* unsigned \([^*]* \* 4[)]* >= 16} "vect" { target { vect_int || vect_float } }} } */ + +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* \* 8[)]* is outside \[0, 16\)} "vect" { target vect_double } } } */ +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* \* 8[)]* is outside \[0, 24\)} "vect" { target vect_double } } } */ +/* { dg-final { scan-tree-dump {no alias between [^\n]* when [^\n]* [_a-z][^ ]* \* 8[)]* is outside \[0, 32\)} "vect" { target vect_double } } } */ +/* { dg-final { scan-tree-dump {run-time check [^\n]* unsigned \([^*]* \* 8[)]* >= 32} "vect" { target vect_double } } } */