Revert 259346.

gcc/
	* lto-streamer-out.c (output_function): Revert 259346.
	* omp-expand.c (expand_oacc_for): Likewise.

	libgomp/
	* testsuite/libgomp.oacc-c-c++-common/pr84955.c: Revert 259346.
	* testsuite/libgomp.oacc-fortran/pr84955.f90:Likewise.

From-SVN: r259351
This commit is contained in:
Cesar Philippidis 2018-04-12 11:48:56 -07:00 committed by Cesar Philippidis
parent e417946035
commit 6b95d1af3e
6 changed files with 12 additions and 54 deletions

View file

@ -1,3 +1,8 @@
2018-04-12 Cesar Philippidis <cesar@codesourcery.com>
* lto-streamer-out.c (output_function): Revert 259346.
* omp-expand.c (expand_oacc_for): Likewise.
2018-04-12 Alexander Monakov <amonakov@ispras.ru>
PR rtl-optimization/85354

View file

@ -2084,9 +2084,6 @@ output_function (struct cgraph_node *node)
/* Set current_function_decl and cfun. */
push_cfun (fn);
/* Fixup loops if required to match discovery done in the reader. */
loop_optimizer_init (AVOID_CFG_MODIFICATIONS);
/* Make string 0 be a NULL string. */
streamer_write_char_stream (ob->string_stream, 0);
@ -2179,13 +2176,12 @@ output_function (struct cgraph_node *node)
streamer_write_record_start (ob, LTO_null);
output_cfg (ob, fn);
pop_cfun ();
}
else
streamer_write_uhwi (ob, 0);
loop_optimizer_finalize ();
pop_cfun ();
/* Create a section to hold the pickled output of this function. */
produce_asm (ob, function);

View file

@ -5439,14 +5439,6 @@ expand_oacc_for (struct omp_region *region, struct omp_for_data *fd)
split->flags ^= EDGE_FALLTHRU | EDGE_TRUE_VALUE;
/* Add a dummy exit for the tiled block when cont_bb is missing. */
if (cont_bb == NULL)
{
edge e = make_edge (body_bb, exit_bb, EDGE_FALSE_VALUE);
e->probability = profile_probability::even ();
split->probability = profile_probability::even ();
}
/* Initialize the user's loop vars. */
gsi = gsi_start_bb (elem_body_bb);
expand_oacc_collapse_vars (fd, true, &gsi, counts, e_offset);

View file

@ -1,3 +1,8 @@
2018-04-12 Cesar Philippidis <cesar@codesourcery.com>
* testsuite/libgomp.oacc-c-c++-common/pr84955.c: Revert 259346.
* testsuite/libgomp.oacc-fortran/pr84955.f90: Likewise.
2018-04-12 Kelvin Nilsen <kelvin@gcc.gnu.org>
PR target/85347

View file

@ -1,20 +0,0 @@
/* { dg-do compile } */
int
main ()
{
int i, j;
#pragma acc parallel loop tile(2,3)
for (i = 1; i < 10; i++)
for (j = 1; j < 10; j++)
for (;;)
;
#pragma acc parallel loop
for (i = 1; i < 10; i++)
for (;;)
;
return i + j;
}

View file

@ -1,20 +0,0 @@
! { dg-do compile }
subroutine s
integer :: i, j
!$acc parallel loop tile(2,3)
do i = 1, 10
do j = 1, 10
do
end do
end do
end do
!$acc end parallel loop
!$acc parallel loop
do i = 1, 10
do
end do
end do
!$acc end parallel loop
end subroutine s