! { dg-do compile { target aarch64*-*-* } } ! { dg-options "-O2 -funsafe-math-optimizations -fdump-rtl-combine" } subroutine f(vara,varb,varc,res) REAL, INTENT(IN) :: vara,varb,varc REAL, INTENT(out) :: res res = vara if (res .lt. varb) res = varb if (res .gt. varc) res = varc end subroutine ! { dg-final { scan-rtl-dump-not "smin" "combine" } }