AArch64: correct constraint on Upl early clobber alternatives

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

! { dg-do compile }
! PR fortran/95500 - ICE compiling extra interface on intrinsic

program test_intrinsic
  implicit none
  intrinsic :: alog
  intrinsic :: dlog
  real (4), parameter :: one = 1

  interface ln
     procedure :: alog, dlog
  end interface ln

  write (*,*) 'ln  1', ln (one)
end program test_intrinsic