rt_gccstream/gcc/testsuite/gfortran.dg/lto/pr41521_0.f90
apop 5c1fb0cf09 Creating a development branch for OpenMP stream extensions.
git-svn-id: svn://gcc.gnu.org/svn/gcc/branches/omp-stream@159266 138bc75d-0d04-0410-961f-82ee72b054a4
2010-05-11 10:00:02 +00:00

10 lines
158 B
Fortran

! { 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