aarch64: Add vector floating point extend pattern [PR113880, PR113869]
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr31025.f90
blob53fecf864abeba01b1189d20f2f3f2b5c11b5d74
1 ! { dg-options "-O2" }
2 real*8 function f(x)
3 t1 = g(0)
4 if(x .eq. 0) then
5 f = 0
6 else if(x .eq. 1) then
7 f = t1 *log( t1 )
8 end if
9 end