diff options
| author | Richard Biener <rguenther@suse.de> | 2017-02-01 12:58:27 +0000 |
|---|---|---|
| committer | Richard Biener <rguenth@gcc.gnu.org> | 2017-02-01 12:58:27 +0000 |
| commit | 3f3181b1c2faf8a5e3a34a198ba6fe050d95f031 (patch) | |
| tree | 5c145ac5600dd7422597d0681ec352c356b9873d | |
| parent | 2cf9276ba7b8df6d8298dcd55b23caf31bc9e71a (diff) | |
| download | gcc-3f3181b1c2faf8a5e3a34a198ba6fe050d95f031.zip gcc-3f3181b1c2faf8a5e3a34a198ba6fe050d95f031.tar.gz gcc-3f3181b1c2faf8a5e3a34a198ba6fe050d95f031.tar.bz2 | |
re PR tree-optimization/76957 (XFAIL: gcc.dg/graphite/scop-dsyr2k.c scan-tree-dump-times graphite "number of SCoPs)
2017-02-01 Richard Biener <rguenther@suse.de>
PR testsuite/76957
* gcc.dg/graphite/scop-dsyr2k-2.c: New testcase.
* gcc.dg/graphite/scop-dsyrk-2.c: Likewise.
* gcc.dg/graphite/scop-dsyr2k.c: XFAIL.
* gcc.dg/graphite/scop-dsyrk.c: Likewise.
From-SVN: r245094
| -rw-r--r-- | gcc/testsuite/ChangeLog | 8 | ||||
| -rw-r--r-- | gcc/testsuite/gcc.dg/graphite/scop-dsyr2k-2.c | 24 | ||||
| -rw-r--r-- | gcc/testsuite/gcc.dg/graphite/scop-dsyr2k.c | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gcc.dg/graphite/scop-dsyrk-2.c | 25 | ||||
| -rw-r--r-- | gcc/testsuite/gcc.dg/graphite/scop-dsyrk.c | 4 |
5 files changed, 61 insertions, 5 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 489ecaf..5892c43 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,5 +1,13 @@ 2017-02-01 Richard Biener <rguenther@suse.de> + PR testsuite/76957 + * gcc.dg/graphite/scop-dsyr2k-2.c: New testcase. + * gcc.dg/graphite/scop-dsyrk-2.c: Likewise. + * gcc.dg/graphite/scop-dsyr2k.c: XFAIL. + * gcc.dg/graphite/scop-dsyrk.c: Likewise. + +2017-02-01 Richard Biener <rguenther@suse.de> + PR middle-end/79315 * gfortran.dg/pr79315.f90: New testcase. diff --git a/gcc/testsuite/gcc.dg/graphite/scop-dsyr2k-2.c b/gcc/testsuite/gcc.dg/graphite/scop-dsyr2k-2.c new file mode 100644 index 0000000..06aa19a --- /dev/null +++ b/gcc/testsuite/gcc.dg/graphite/scop-dsyr2k-2.c @@ -0,0 +1,24 @@ +/* { dg-require-effective-target size32plus } */ +#define NMAX 3000 + +static double a[NMAX][NMAX], b[NMAX][NMAX], c[NMAX][NMAX]; + +typedef __INT32_TYPE__ int32_t; +typedef __INT64_TYPE__ int64_t; + +void dsyr2k(int64_t N) { + int32_t i,j,k; + +#pragma scop + for (i=0; i<N; i++) { + for (j=0; j<N; j++) { + for (k=j; k<N; k++) { + c[j][k] += a[i][j] * b[i][k] + b[i][j] * a[i][k]; + } + } + } +#pragma endscop +} + +/* { dg-final { scan-tree-dump-times "number of SCoPs: 1" 1 "graphite"} } */ + diff --git a/gcc/testsuite/gcc.dg/graphite/scop-dsyr2k.c b/gcc/testsuite/gcc.dg/graphite/scop-dsyr2k.c index f16f4a8..925ae30 100644 --- a/gcc/testsuite/gcc.dg/graphite/scop-dsyr2k.c +++ b/gcc/testsuite/gcc.dg/graphite/scop-dsyr2k.c @@ -3,7 +3,7 @@ static double a[NMAX][NMAX], b[NMAX][NMAX], c[NMAX][NMAX]; -void dsyr2k(long N) { +void dsyr2k(int N) { int i,j,k; #pragma scop @@ -17,5 +17,4 @@ void dsyr2k(long N) { #pragma endscop } -/* { dg-final { scan-tree-dump-times "number of SCoPs: 1" 1 "graphite"} } */ - +/* { dg-final { scan-tree-dump-times "number of SCoPs: 1" 1 "graphite" { xfail *-*-* } } } */ diff --git a/gcc/testsuite/gcc.dg/graphite/scop-dsyrk-2.c b/gcc/testsuite/gcc.dg/graphite/scop-dsyrk-2.c new file mode 100644 index 0000000..5622dce --- /dev/null +++ b/gcc/testsuite/gcc.dg/graphite/scop-dsyrk-2.c @@ -0,0 +1,25 @@ +/* { dg-require-effective-target size32plus } */ +#define NMAX 3000 +#define MEASURE_TIME 1 + +static double a[NMAX][NMAX], c[NMAX][NMAX]; + +typedef __INT32_TYPE__ int32_t; +typedef __INT64_TYPE__ int64_t; + +void dsyrk(int64_t N) +{ + int32_t i,j,k; + +#pragma scop + for (i=0; i<N; i++) { + for (j=0; j<N; j++) { + for (k=j; k<N; k++) { + c[j][k] += a[i][j] * a[i][k]; + } + } + } +#pragma endscop +} + +/* { dg-final { scan-tree-dump-times "number of SCoPs: 1" 1 "graphite" } } */ diff --git a/gcc/testsuite/gcc.dg/graphite/scop-dsyrk.c b/gcc/testsuite/gcc.dg/graphite/scop-dsyrk.c index c176a7c..b748946 100644 --- a/gcc/testsuite/gcc.dg/graphite/scop-dsyrk.c +++ b/gcc/testsuite/gcc.dg/graphite/scop-dsyrk.c @@ -4,7 +4,7 @@ static double a[NMAX][NMAX], c[NMAX][NMAX]; -void dsyrk(long N) +void dsyrk(int N) { int i,j,k; @@ -19,4 +19,4 @@ void dsyrk(long N) #pragma endscop } -/* { dg-final { scan-tree-dump-times "number of SCoPs: 1" 1 "graphite" } } */ +/* { dg-final { scan-tree-dump-times "number of SCoPs: 1" 1 "graphite" { xfail *-*-* } } } */ |