This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
[gomp] Fix fallback from dg-require-effective-target tls-ing tests
- From: Jakub Jelinek <jakub at redhat dot com>
- To: gcc-patches at gcc dot gnu dot org
- Date: Wed, 7 Dec 2005 15:36:44 -0500
- Subject: [gomp] Fix fallback from dg-require-effective-target tls-ing tests
- Reply-to: Jakub Jelinek <jakub at redhat dot com>
Hi!
Uros' addition of /* { dg-require-effective-target tls } */
line needs adjustments when absolute line numbers were used.
Committed as obvious.
2005-12-07 Jakub Jelinek <jakub@redhat.com>
* gcc.dg/gomp/appendix-a/a.24.1.c: Adjust line numbers.
* gfortran.dg/gomp/appendix-a/a.24.1.f90: Likewise.
--- gcc/testsuite/gcc.dg/gomp/appendix-a/a.24.1.c.jj 2005-12-07 21:19:24.000000000 +0100
+++ gcc/testsuite/gcc.dg/gomp/appendix-a/a.24.1.c 2005-12-07 21:19:24.000000000 +0100
@@ -19,9 +19,9 @@ a24 (int a)
x = c; /* O.K. - x is threadprivate */
/* - c has const-qualified type */
z[i] = y;
- /* { dg-error "'i' not specified" "" { target *-*-* } 20 } */
- /* { dg-error "enclosing parallel" "" { target *-*-* } 12 } */
- /* { dg-error "'y' not specified" "" { target *-*-* } 20 } */
+ /* { dg-error "'i' not specified" "" { target *-*-* } 21 } */
+ /* { dg-error "enclosing parallel" "" { target *-*-* } 13 } */
+ /* { dg-error "'y' not specified" "" { target *-*-* } 21 } */
#pragma omp for firstprivate(y)
for (i = 0; i < 10; i++)
{
@@ -29,7 +29,7 @@ a24 (int a)
/* - y is listed in firstprivate clause */
}
z[l] = t;
- /* { dg-error "'l' not specified" "" { target *-*-* } 30 } */
- /* { dg-error "'t' not specified" "" { target *-*-* } 30 } */
+ /* { dg-error "'l' not specified" "" { target *-*-* } 31 } */
+ /* { dg-error "'t' not specified" "" { target *-*-* } 31 } */
}
}
--- gcc/testsuite/gfortran.dg/gomp/appendix-a/a.24.1.f90.jj 2005-12-07 21:20:02.000000000 +0100
+++ gcc/testsuite/gfortran.dg/gomp/appendix-a/a.24.1.f90 2005-12-07 21:20:02.000000000 +0100
@@ -18,9 +18,9 @@
! - Z is listed in SHARED clause
X=1 ! O.K. - X is THREADPRIVATE
Z(I) = Y ! Error - cannot reference I or Y here
-! { dg-error "'i' not specified" "" { target *-*-* } 19 } */
-! { dg-error "enclosing parallel" "" { target *-*-* } 13 } */
-! { dg-error "'y' not specified" "" { target *-*-* } 19 } */
+! { dg-error "'i' not specified" "" { target *-*-* } 20 } */
+! { dg-error "enclosing parallel" "" { target *-*-* } 14 } */
+! { dg-error "'y' not specified" "" { target *-*-* } 20 } */
!$OMP DO firstprivate(y)
DO I = 1,10
Z(I) = Y ! O.K. - I is the loop iteration variable
Jakub