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