From 70b9dd8b388668df96f457b3c6ee33fc5b35f94c Mon Sep 17 00:00:00 2001 From: Tamar Christina Date: Thu, 8 Feb 2024 11:03:31 +0000 Subject: testsuite: address Jakub's comments on vect-early-break_1-PR113808.f90 Rename pr to lowercase and drop lastprivate. gcc/testsuite/ChangeLog: PR tree-optimization/113808 * gfortran.dg/vect/vect-early-break_1-PR113808.f90: Moved to... * gfortran.dg/vect/vect-early-break_1-pr113808.f90: ...here. --- .../vect/vect-early-break_1-PR113808.f90 | 21 --------------------- .../vect/vect-early-break_1-pr113808.f90 | 21 +++++++++++++++++++++ 2 files changed, 21 insertions(+), 21 deletions(-) delete mode 100644 gcc/testsuite/gfortran.dg/vect/vect-early-break_1-PR113808.f90 create mode 100644 gcc/testsuite/gfortran.dg/vect/vect-early-break_1-pr113808.f90 (limited to 'gcc') diff --git a/gcc/testsuite/gfortran.dg/vect/vect-early-break_1-PR113808.f90 b/gcc/testsuite/gfortran.dg/vect/vect-early-break_1-PR113808.f90 deleted file mode 100644 index 5c339fa..0000000 --- a/gcc/testsuite/gfortran.dg/vect/vect-early-break_1-PR113808.f90 +++ /dev/null @@ -1,21 +0,0 @@ -! { dg-add-options vect_early_break } -! { dg-require-effective-target vect_early_break } -! { dg-require-effective-target vect_long_long } -! { dg-additional-options "-fopenmp-simd" } - -! { dg-final { scan-tree-dump "LOOP VECTORIZED" "vect" } } - -program main - integer :: n, i,k - n = 11 - do i = 1, n,2 - !$omp simd lastprivate(k) - do k = 1, i + 41 - if (k > 11 + 41 .or. k < 1) error stop - end do - end do - if (k /= 53) then - print *, k, 53 - error stop - endif -end diff --git a/gcc/testsuite/gfortran.dg/vect/vect-early-break_1-pr113808.f90 b/gcc/testsuite/gfortran.dg/vect/vect-early-break_1-pr113808.f90 new file mode 100644 index 0000000..6f92e90 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/vect/vect-early-break_1-pr113808.f90 @@ -0,0 +1,21 @@ +! { dg-add-options vect_early_break } +! { dg-require-effective-target vect_early_break } +! { dg-require-effective-target vect_long_long } +! { dg-additional-options "-fopenmp-simd" } + +! { dg-final { scan-tree-dump "LOOP VECTORIZED" "vect" } } + +program main + integer :: n, i,k + n = 11 + do i = 1, n,2 + !$omp simd + do k = 1, i + 41 + if (k > 11 + 41 .or. k < 1) error stop + end do + end do + if (k /= 53) then + print *, k, 53 + error stop + endif +end -- cgit v1.1