re PR fortran/85841 ([F2018] reject deleted features)

2018-05-21  Janus Weil  <janus@gcc.gnu.org>

	PR fortran/85841
	PR testsuite/85865
	* testsuite/libgomp.fortran/collapse2.f90: Add option "-std=legacy".
	* testsuite/libgomp.fortran/omp_atomic2.f90: Ditto.
	* testsuite/libgomp.fortran/omp_parse1.f90: Ditto.
	* testsuite/libgomp.fortran/omp_parse3.f90: Ditto.
	* testsuite/libgomp.fortran/task2.f90: Ditto.
	* testsuite/libgomp.fortran/vla1.f90: Ditto.
	* testsuite/libgomp.fortran/vla2.f90: Ditto.
	* testsuite/libgomp.fortran/vla3.f90: Ditto.
	* testsuite/libgomp.fortran/vla4.f90: Ditto.
	* testsuite/libgomp.fortran/vla5.f90: Ditto.
	* testsuite/libgomp.fortran/vla6.f90: Ditto.
	* testsuite/libgomp.fortran/vla8.f90: Ditto.
	* testsuite/libgomp.oacc-fortran/collapse-2.f90: Ditto.
	* testsuite/libgomp.oacc-fortran/nested-function-1.f90: Ditto.

From-SVN: r260487
This commit is contained in:
Janus Weil 2018-05-21 22:48:59 +02:00
parent 54c22d9672
commit 4358400b3f
15 changed files with 36 additions and 0 deletions

View File

@ -1,3 +1,22 @@
2018-05-21 Janus Weil <janus@gcc.gnu.org>
PR fortran/85841
PR testsuite/85865
* testsuite/libgomp.fortran/collapse2.f90: Add option "-std=legacy".
* testsuite/libgomp.fortran/omp_atomic2.f90: Ditto.
* testsuite/libgomp.fortran/omp_parse1.f90: Ditto.
* testsuite/libgomp.fortran/omp_parse3.f90: Ditto.
* testsuite/libgomp.fortran/task2.f90: Ditto.
* testsuite/libgomp.fortran/vla1.f90: Ditto.
* testsuite/libgomp.fortran/vla2.f90: Ditto.
* testsuite/libgomp.fortran/vla3.f90: Ditto.
* testsuite/libgomp.fortran/vla4.f90: Ditto.
* testsuite/libgomp.fortran/vla5.f90: Ditto.
* testsuite/libgomp.fortran/vla6.f90: Ditto.
* testsuite/libgomp.fortran/vla8.f90: Ditto.
* testsuite/libgomp.oacc-fortran/collapse-2.f90: Ditto.
* testsuite/libgomp.oacc-fortran/nested-function-1.f90: Ditto.
2018-05-18 Cesar Philippidis <cesar@codesourcery.com>
PR c++/85782

View File

@ -1,4 +1,5 @@
! { dg-do run }
! { dg-options "-std=legacy" }
program collapse2
call test1

View File

@ -1,4 +1,6 @@
! { dg-do run }
! { dg-options "-std=legacy" }
real, dimension (20) :: r
integer, dimension (20) :: d
integer :: i, j, k, n

View File

@ -1,4 +1,6 @@
! { dg-do run }
! { dg-options "-std=legacy" }
use omp_lib
call test_parallel
call test_do

View File

@ -1,4 +1,5 @@
! { dg-do run }
! { dg-options "-std=legacy" }
! { dg-require-effective-target tls_runtime }
use omp_lib
common /tlsblock/ x, y

View File

@ -1,3 +1,5 @@
! { dg-options "-std=legacy" }
integer :: err
err = 0
!$omp parallel num_threads (4) default (none) shared (err)

View File

@ -1,4 +1,5 @@
! { dg-do run }
! { dg-options "-std=legacy" }
call test
contains

View File

@ -1,4 +1,5 @@
! { dg-do run }
! { dg-options "-std=legacy" }
call test
contains

View File

@ -1,4 +1,5 @@
! { dg-do run }
! { dg-options "-std=legacy" }
call test
contains

View File

@ -1,4 +1,5 @@
! { dg-do run }
! { dg-options "-std=legacy" }
call test
contains

View File

@ -1,4 +1,5 @@
! { dg-do run }
! { dg-options "-std=legacy" }
call test
contains

View File

@ -1,4 +1,5 @@
! { dg-do run }
! { dg-options "-std=legacy" }
call test
contains

View File

@ -1,4 +1,5 @@
! { dg-do run }
! { dg-options "-std=legacy" }
! { dg-timeout-factor 2.0 }
call test

View File

@ -1,4 +1,5 @@
! { dg-do run }
! { dg-options "-std=legacy" }
program collapse2
integer :: i, j, k, a(1:3, 4:6, 5:7)

View File

@ -1,6 +1,7 @@
! Exercise nested function decomposition, gcc/tree-nested.c.
! { dg-do run }
! { dg-options "-std=legacy" }
program collapse2
call test1