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:
parent
78520f3ff1
commit
4f028369d0
4 changed files with 31 additions and 1 deletions
|
@ -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
|
||||
|
|
|
@ -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;
|
||||
|
|
|
@ -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.
|
||||
|
|
17
gcc/testsuite/gfortran.dg/pr71204.f90
Normal file
17
gcc/testsuite/gfortran.dg/pr71204.f90
Normal 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
|
Loading…
Add table
Reference in a new issue