gcc-4.9/gcc/testsuite/gfortran.dg/lto/pr41521_0.f90


1
2
3
4
5
6
7
8
9

! { dg-lto-do link }
! { dg-lto-options {{-g -flto} {-g -O -flto}} }
program species
integer spk(2)
real eval(2)
spk = 2
call atom(1.1,spk,eval)
end program