summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/lto/pr41521_0.f90
blob: d882779263d8a03ff31ac44dcf8e9e519ae53e07 (plain)
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