From bd69daef031ae2afefc43f72e5050e006dc142fe Mon Sep 17 00:00:00 2001 From: Jakub Jelinek <jakub@redhat.com> Date: Fri, 28 Sep 2007 15:22:18 +0200 Subject: [PATCH] openmp_stack.f90: Removed. * gfortran.dg/openmp_stack.f90: Removed. * testsuite/libgomp.fortran/stack.f90: New test. From-SVN: r128863 --- gcc/testsuite/ChangeLog | 2 ++ libgomp/ChangeLog | 4 ++++ .../testsuite/libgomp.fortran/stack.f90 | 5 ++--- 3 files changed, 8 insertions(+), 3 deletions(-) rename gcc/testsuite/gfortran.dg/openmp_stack.f90 => libgomp/testsuite/libgomp.fortran/stack.f90 (85%) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 67e390a623b4..077e118b51d8 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,5 +1,7 @@ 2007-09-28 Jakub Jelinek <jakub@redhat.com> + * gfortran.dg/openmp_stack.f90: Removed. + PR c++/31434 * g++.dg/cpp0x/variadic80.C: New test. diff --git a/libgomp/ChangeLog b/libgomp/ChangeLog index 22d936b84ced..b11a5a051041 100644 --- a/libgomp/ChangeLog +++ b/libgomp/ChangeLog @@ -1,3 +1,7 @@ +2007-09-28 Jakub Jelinek <jakub@redhat.com> + + * testsuite/libgomp.fortran/stack.f90: New test. + 2007-09-10 Danny Smith <dannysmith@users.sourceforge.net> * config/mingw32/proc.c: New file. diff --git a/gcc/testsuite/gfortran.dg/openmp_stack.f90 b/libgomp/testsuite/libgomp.fortran/stack.f90 similarity index 85% rename from gcc/testsuite/gfortran.dg/openmp_stack.f90 rename to libgomp/testsuite/libgomp.fortran/stack.f90 index 6ec1d786fc35..b27673d01fda 100644 --- a/gcc/testsuite/gfortran.dg/openmp_stack.f90 +++ b/libgomp/testsuite/libgomp.fortran/stack.f90 @@ -1,6 +1,5 @@ ! { dg-do run } -! { dg-options "-fopenmp" } -program openmp_stack +program stack implicit none integer id integer ilocs(2) @@ -13,7 +12,7 @@ program openmp_stack ! Check that the two threads are not sharing a location for ! the array x in foo() if (ilocs(1) .eq. ilocs(2)) call abort -end program openmp_stack +end program stack integer function foo () implicit none -- GitLab