blob: eb530f69a2ee7ac1fe6ee7f06df6577e8cf86dad [file] [log] [blame]
! { dg-do compile }
! { dg-additional-files "minmaxloc_18.f90" }
! { dg-additional-options "-O0 -finline-intrinsics=maxloc -fdump-tree-original" }
! { dg-final { scan-tree-dump-times "gfortran_\[sm\]?minloc" 30 "original" } }
! { dg-final { scan-tree-dump-not "gfortran_\[sm\]?maxloc" "original" } }
!
! PR fortran/90608
! Check that -O0 disables inlining and -finline-intrinsics selectively
! enables it.
include "minmaxloc_18.f90"