re PR fortran/71204 (ICE with -O0 in expand_expr_real_1, at expr.c:9651)

PR fortran/71204
	* frontend-passes.c (realloc_string_callback): Clear inserted_block
	and changed_statement before calling create_var.

	* gfortran.dg/pr71204.f90: New test.

From-SVN: r236525
This commit is contained in:
Jakub Jelinek 2016-05-20 20:49:24 +02:00 committed by Jakub Jelinek
parent 78520f3ff1
commit 4f028369d0
4 changed files with 31 additions and 1 deletions

View file

@ -1,3 +1,9 @@
2016-05-20 Jakub Jelinek <jakub@redhat.com>
PR fortran/71204
* frontend-passes.c (realloc_string_callback): Clear inserted_block
and changed_statement before calling create_var.
2016-05-15 Harald Anlauf <anlauf@gmx.de>
PR fortran/69603

View file

@ -174,8 +174,10 @@ realloc_string_callback (gfc_code **c, int *walk_subtrees ATTRIBUTE_UNUSED,
if (!gfc_check_dependency (expr1, expr2, true))
return 0;
current_code = c;
inserted_block = NULL;
changed_statement = NULL;
n = create_var (expr2, "trim");
co->expr2 = n;
return 0;

View file

@ -1,3 +1,8 @@
2016-05-20 Jakub Jelinek <jakub@redhat.com>
PR fortran/71204
* gfortran.dg/pr71204.f90: New test.
2016-05-20 Cesar Philippidis <cesar@codesourcery.com>
* gcc.target/nvptx/sincos.c: New test.

View file

@ -0,0 +1,17 @@
! PR fortran/71204
! { dg-do compile }
! { dg-options "-O0" }
module pr71204
character(10), allocatable :: z(:)
end module
subroutine s1
use pr71204
z(2) = z(1)
end
subroutine s2
use pr71204
z(2) = z(1)
end