re PR lto/41576 (LTO complains about mismatches in common sections)
2012-01-05 Richard Guenther <rguenther@suse.de> PR lto/41576 * gfortran.dg/lto/pr41576_0.f90: New testcase. * gfortran.dg/lto/pr41576_1.f90: Likewise. From-SVN: r182907
This commit is contained in:
parent
543a341c1b
commit
76f5732818
@ -1,3 +1,9 @@
|
||||
2012-01-05 Richard Guenther <rguenther@suse.de>
|
||||
|
||||
PR lto/41576
|
||||
* gfortran.dg/lto/pr41576_0.f90: New testcase.
|
||||
* gfortran.dg/lto/pr41576_1.f90: Likewise.
|
||||
|
||||
2012-01-04 Jakub Jelinek <jakub@redhat.com>
|
||||
|
||||
PR debug/51695
|
||||
|
10
gcc/testsuite/gfortran.dg/lto/pr41576_0.f90
Normal file
10
gcc/testsuite/gfortran.dg/lto/pr41576_0.f90
Normal file
@ -0,0 +1,10 @@
|
||||
! { dg-lto-do run }
|
||||
! { dg-lto-options { { -O2 -flto -Werror } } }
|
||||
|
||||
subroutine foo
|
||||
common /bar/ a, b
|
||||
integer(4) :: a ,b
|
||||
a = 1
|
||||
b = 2
|
||||
end
|
||||
|
7
gcc/testsuite/gfortran.dg/lto/pr41576_1.f90
Normal file
7
gcc/testsuite/gfortran.dg/lto/pr41576_1.f90
Normal file
@ -0,0 +1,7 @@
|
||||
program test
|
||||
common /bar/ c, d
|
||||
integer(4) :: c, d
|
||||
call foo
|
||||
if (c/=1 .or. d/=2) call abort
|
||||
end program test
|
||||
|
Loading…
Reference in New Issue
Block a user