openmp_stack.f90: Removed.
* gfortran.dg/openmp_stack.f90: Removed. * testsuite/libgomp.fortran/stack.f90: New test. From-SVN: r128863
This commit is contained in:
parent
b0aa239057
commit
bd69daef03
@ -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.
|
||||
|
||||
|
@ -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.
|
||||
|
@ -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
|
Loading…
Reference in New Issue
Block a user