aarch64: Add vector floating point extend pattern [PR113880, PR113869]

[official-gcc.git] / gcc / testsuite / gfortran.dg / pr91372.f90

! { dg-do compile }
! { dg-require-visibility "" }
! PR fortran/91372   
module module_sf_lake
    implicit none 
    integer, parameter ::      r8 = selected_real_kind(12) 
    integer, private  :: i
    real(r8) :: sand(2)                           ! percent sand
    data(sand(i), i=1,2)/92.,80./
end module module_sf_lake